1151497Sru#! /bin/sh 275584Sru# Fix the path name of an AFM file. 375584Sruif test -f "$1" 475584Sruthen 575584Sru echo "$1" 675584Sruelse 775584Sru echo `dirname $1`/`basename $1 .afm | awk ' 875584Sru/^AvantGarde-Book$/ { print "avangbk" } 975584Sru/^AvantGarde-BookOblique$/ { print "avangbko" } 1075584Sru/^AvantGarde-Demi$/ { print "avangd" } 1175584Sru/^AvantGarde-DemiOblique$/ { print "avangdo" } 1275584Sru/^Bookman-Demi$/ { print "bookmd" } 1375584Sru/^Bookman-DemiItalic$/ { print "bookmdi" } 1475584Sru/^Bookman-Light$/ { print "bookml" } 1575584Sru/^Bookman-LightItalic$/ { print "bookmli" } 1675584Sru/^Courier$/ { print "couri" } 1775584Sru/^Courier-Bold$/ { print "courib" } 1875584Sru/^Courier-BoldOblique$/ { print "couribo" } 1975584Sru/^Courier-Oblique$/ { print "courio" } 2075584Sru/^Helvetica$/ { print "helve" } 2175584Sru/^Helvetica-Bold$/ { print "helveb" } 2275584Sru/^Helvetica-BoldOblique$/ { print "helvebo" } 2375584Sru/^Helvetica-Narrow$/ { print "helven" } 2475584Sru/^Helvetica-Narrow-Bold$/ { print "helvenb" } 2575584Sru/^Helvetica-Narrow-BoldOblique$/ { print "helvenbo" } 2675584Sru/^Helvetica-Narrow-Oblique$/ { print "helveno" } 2775584Sru/^Helvetica-Oblique$/ { print "helveo" } 2875584Sru/^NewCenturySchlbk-Bold$/ { print "newcsb" } 2975584Sru/^NewCenturySchlbk-BoldItalic$/ { print "newcsbi" } 3075584Sru/^NewCenturySchlbk-Italic$/ { print "newcsi" } 3175584Sru/^NewCenturySchlbk-Roman$/ { print "newcsr" } 3275584Sru/^Palatino-Bold$/ { print "palatb" } 3375584Sru/^Palatino-BoldItalic$/ { print "palatbi" } 3475584Sru/^Palatino-Italic$/ { print "palati" } 3575584Sru/^Palatino-Roman$/ { print "palatr" } 3675584Sru/^Symbol$/ { print "symbol" } 3775584Sru/^Times-Bold$/ { print "timesb" } 3875584Sru/^Times-BoldItalic$/ { print "timesbi" } 3975584Sru/^Times-Italic$/ { print "timesi" } 4075584Sru/^Times-Roman$/ { print "timesr" } 4175584Sru/^ZapfChancery-MediumItalic$/ { print "zapfcmi" } 4275584Sru/^ZapfDingbats$/ { print "zapfd" } 4375584Sru' `.afm 4475584Srufi 45