the Fink project is an effort to port
popular Unix programs to Mac OS X
Package: ec-fonts-mftraced
Version: 1.0.12
Revision: 2
Depends: tetex-base, mftrace
Maintainer: Matthias Neeracher
Source: http://www.lilypond.org/download/fonts/%n-%v.tar.gz
Source-MD5: 4b355f668ca9cc01677e94c6eecdac40
PatchScript: perl -pi -e 's,--potrace,--potrace=%p/bin/potrace,' GNUmakefile
CompileScript: <<
make -j1 prefix=%p TEXDIR=%i/etc/texmf.local TEXCONFDIR=%i/etc/texmf.local
<<
InstallScript: <<
make -j1 install prefix=%i TEXDIR=%i/etc/texmf.local TEXCONFDIR=%i/etc/texmf.local
<<
PostInstScript: <<
if [ -f %p/bin/mktexlsr ]; then mktexlsr %p/etc/texmf.local; fi
<<
PostRmScript: if [ -f %p/bin/mktexlsr ]; then mktexlsr %p/etc/texmf.local; fi
DocFiles: LICENSE README ChangeLog
Description: Sauter EC PostScript Type1 Fonts
DescDetail: <<
Sauter EC PostScript Type1 fonts with TFMs for TeX
These are PostScript Type1 renderings and TFMs of the Sauter variants
of the standard TeX CMR font family. These fonts include characters
with European accents.
<<
DescPackaging: <<
dmacks fixed makefile for new mftrace, in which the path argument
to --potrace is not optional.
<<
License: Public Domain
Homepage: http://www.lilypond.org
diff -ruN ec-fonts-mftraced/rpm2cpio.pl ec-fonts-mftraced/rpm2cpio.pl
--- ec-fonts-mftraced/rpm2cpio.pl 1969-12-31 16:00:00.000000000 -0800
+++ ec-fonts-mftraced/rpm2cpio.pl 2004-05-16 01:36:33.000000000 -0700
@@ -0,0 +1,88 @@
+#!/usr/bin/perl
+
+# Why does the world need another rpm2cpio? Because the existing one
+# won't build unless you have half a ton of things that aren't really
+# required for it, since it uses the same library used to extract RPMs.
+# In particular, it won't build on the HPsUX box I'm on.
+
+#
+# Expanded quick-reference help by Rick Moen (not the original author
+# of this script).
+#
+
+# add a path if desired
+$gzip = "gzip";
+
+sub printhelp {
+ print "\n";
+ print "rpm2cpio, perl version by orabidoo
+ print "\n";
+ print "use: rpm2cpio [file.rpm]\n";
+ print "dumps the contents to stdout as a GNU cpio archive\n";
+ print "\n";
+ print "In case it's non-obvious, you'll need to redirect output\n";
+ print "from this script, e.g., './rpm2cpio package.rpm > package.cpio'.\n";
+ print "Then, unpack in, say, /tmp with a cpio incantation like this one:\n";
+ print "'cpio -ivd < package.cpio'\n";
+ print "\n";
+ print "You can optionally combine both steps:\n";
+ print "'rpm2cpio package.rpm | cpio -iduv'\n";
+ print "\n";
+ print "In either event, you will also need the 'cpio' utility available\n";
+ print "on your system. If you can't find it elsewhere, source code for\n";
+ print "GNU cpio is always available at ftp://ftp.gnu.org/gnu/cpio/.)\n";
+ print "You'll also, of course, need Perl, and will want this Perl script\n";
+ print "set as executable, i.e., by doing 'chmod 775 rpm2cpio'\n";
+ print "\n";
+ print "Be aware that this script works ONLY on version 3-format RPM\n";
+ print "archives. You can check an archive's RPM-format version using\n";
+ print "the Unix 'file' utility. Also, be aware that the 'cpio'\n";
+ print "incantations above will unpack files at the current directory\n";
+ print "level.\n";
+ print "\n";
+
+ exit 0;
+}
+
+if ($#ARGV == -1) {
+ printhelp if -t STDIN;
+ $f = "STDIN";
+} elsif ($#ARGV == 0) {
+ open(F, "< $ARGV[0]") or die "Can't read file $ARGV[0]\n";
+ $f = 'F';
+} else {
+ printhelp;
+}
+
+printhelp if -t STDOUT;
+
+# gobble the file up
+undef $/;
+$|=1;
+$rpm = <$f>;
+close ($f);
+
+($magic, $major, $minor, $crap) = unpack("NCC C90", $rpm);
+
+die "Not an RPM\n" if $magic != 0xedabeedb;
+die "Not a version 3 RPM\n" if $major != 3;
+
+$rpm = substr($rpm, 96);
+
+while ($rpm ne '') {
+ $rpm =~ s/^\c@*//s;
+ ($magic, $crap, $sections, $bytes) = unpack("N4", $rpm);
+ $smagic = unpack("n", $rpm);
+ last if $smagic eq 0x1f8b;
+ die "Error: header not recognized\n" if $magic != 0x8eade801;
+ $rpm = substr($rpm, 16*(1+$sections) + $bytes);
+}
+
+die "bogus RPM\n" if $rpm eq '';
+
+open(ZCAT, "|gzip -cd") || die "can't pipe to gzip\n";
+print STDERR "CPIO archive found!\n";
+
+print ZCAT $rpm;
+close ZCAT;
+