Home | History | Annotate | Line # | Download | only in generate
afmname revision 1.1.1.1
      1  1.1  christos #! /bin/sh
      2  1.1  christos # Fix the path name of an AFM file.
      3  1.1  christos if test -f "$1"
      4  1.1  christos then
      5  1.1  christos 	echo "$1"
      6  1.1  christos else
      7  1.1  christos 	echo `dirname $1`/`basename $1 .afm | awk '
      8  1.1  christos /^AvantGarde-Book$/ { print "avangbk" }
      9  1.1  christos /^AvantGarde-BookOblique$/ { print "avangbko" }
     10  1.1  christos /^AvantGarde-Demi$/ { print "avangd" }
     11  1.1  christos /^AvantGarde-DemiOblique$/ { print "avangdo" }
     12  1.1  christos /^Bookman-Demi$/ { print "bookmd" }
     13  1.1  christos /^Bookman-DemiItalic$/ { print "bookmdi" }
     14  1.1  christos /^Bookman-Light$/ { print "bookml" }
     15  1.1  christos /^Bookman-LightItalic$/ { print "bookmli" }
     16  1.1  christos /^Courier$/ { print "couri" }
     17  1.1  christos /^Courier-Bold$/ { print "courib" }
     18  1.1  christos /^Courier-BoldOblique$/ { print "couribo" }
     19  1.1  christos /^Courier-Oblique$/ { print "courio" }
     20  1.1  christos /^Helvetica$/ { print "helve" }
     21  1.1  christos /^Helvetica-Bold$/ { print "helveb" }
     22  1.1  christos /^Helvetica-BoldOblique$/ { print "helvebo" }
     23  1.1  christos /^Helvetica-Narrow$/ { print "helven" }
     24  1.1  christos /^Helvetica-Narrow-Bold$/ { print "helvenb" }
     25  1.1  christos /^Helvetica-Narrow-BoldOblique$/ { print "helvenbo" }
     26  1.1  christos /^Helvetica-Narrow-Oblique$/ { print "helveno" }
     27  1.1  christos /^Helvetica-Oblique$/ { print "helveo" }
     28  1.1  christos /^NewCenturySchlbk-Bold$/ { print "newcsb" }
     29  1.1  christos /^NewCenturySchlbk-BoldItalic$/ { print "newcsbi" }
     30  1.1  christos /^NewCenturySchlbk-Italic$/ { print "newcsi" }
     31  1.1  christos /^NewCenturySchlbk-Roman$/ { print "newcsr" }
     32  1.1  christos /^Palatino-Bold$/ { print "palatb" }
     33  1.1  christos /^Palatino-BoldItalic$/ { print "palatbi" }
     34  1.1  christos /^Palatino-Italic$/ { print "palati" }
     35  1.1  christos /^Palatino-Roman$/ { print "palatr" }
     36  1.1  christos /^Symbol$/ { print "symbol" }
     37  1.1  christos /^Times-Bold$/ { print "timesb" }
     38  1.1  christos /^Times-BoldItalic$/ { print "timesbi" }
     39  1.1  christos /^Times-Italic$/ { print "timesi" }
     40  1.1  christos /^Times-Roman$/ { print "timesr" }
     41  1.1  christos /^ZapfChancery-MediumItalic$/ { print "zapfcmi" }
     42  1.1  christos /^ZapfDingbats$/ { print "zapfd" }
     43  1.1  christos ' `.afm
     44  1.1  christos fi
     45