home *** CD-ROM | disk | FTP | other *** search
/ Fresh Fish 4 / FreshFish_May-June1994.bin / bbs / gnu / groff-1.09-bin.lha / lib / groff / font / devps / generate / afmname next >
Encoding:
Text File  |  1994-02-22  |  1.5 KB  |  45 lines
  1. #!/bin/sh
  2. # Fix the path name of an AFM file.
  3. if test -f "$1"
  4. then
  5.     echo "$1"
  6. else
  7.     echo `dirname $1`/`basename $1 .afm | awk -e '
  8. /^AvantGarde-Book$/ { print "avangbk" }
  9. /^AvantGarde-BookOblique$/ { print "avangbko" }
  10. /^AvantGarde-Demi$/ { print "avangd" }
  11. /^AvantGarde-DemiOblique$/ { print "avangdo" }
  12. /^Bookman-Demi$/ { print "bookmd" }
  13. /^Bookman-DemiItalic$/ { print "bookmdi" }
  14. /^Bookman-Light$/ { print "bookml" }
  15. /^Bookman-LightItalic$/ { print "bookmli" }
  16. /^Courier$/ { print "couri" }
  17. /^Courier-Bold$/ { print "courib" }
  18. /^Courier-BoldOblique$/ { print "couribo" }
  19. /^Courier-Oblique$/ { print "courio" }
  20. /^Helvetica$/ { print "helve" }
  21. /^Helvetica-Bold$/ { print "helveb" }
  22. /^Helvetica-BoldOblique$/ { print "helvebo" }
  23. /^Helvetica-Narrow$/ { print "helven" }
  24. /^Helvetica-Narrow-Bold$/ { print "helvenb" }
  25. /^Helvetica-Narrow-BoldOblique$/ { print "helvenbo" }
  26. /^Helvetica-Narrow-Oblique$/ { print "helveno" }
  27. /^Helvetica-Oblique$/ { print "helveo" }
  28. /^NewCenturySchlbk-Bold$/ { print "newcsb" }
  29. /^NewCenturySchlbk-BoldItalic$/ { print "newcsbi" }
  30. /^NewCenturySchlbk-Italic$/ { print "newcsi" }
  31. /^NewCenturySchlbk-Roman$/ { print "newcsr" }
  32. /^Palatino-Bold$/ { print "palatb" }
  33. /^Palatino-BoldItalic$/ { print "palatbi" }
  34. /^Palatino-Italic$/ { print "palati" }
  35. /^Palatino-Roman$/ { print "palatr" }
  36. /^Symbol$/ { print "symbol" }
  37. /^Times-Bold$/ { print "timesb" }
  38. /^Times-BoldItalic$/ { print "timesbi" }
  39. /^Times-Italic$/ { print "timesi" }
  40. /^Times-Roman$/ { print "timesr" }
  41. /^ZapfChancery-MediumItalic$/ { print "zapfcmi" }
  42. /^ZapfDingbats$/ { print "zapfd" }
  43. ' `.afm
  44. fi
  45.