home *** CD-ROM | disk | FTP | other *** search
/ Chip 2002 October / Chip_2002-10_cd1.bin / zkuste / pdf / download / gs704w32.exe / gs7.04 / lib / ps2epsi < prev    next >
Encoding:
Text File  |  2002-01-31  |  1.7 KB  |  77 lines
  1. #!/bin/sh
  2. # $Id: ps2epsi,v 1.7 2001/06/22 16:09:22 lpd Exp $
  3.  
  4. tmpfile=/tmp/ps2epsi$$
  5.  
  6. export outfile
  7.  
  8. if [ $# -lt 1 -o $# -gt 2 ]; then
  9.     echo "Usage: `basename $0` file.ps [file.epsi]" 1>&2
  10.     exit 1
  11. fi
  12.  
  13. infile=$1;
  14.  
  15. if [ $# -eq 1 ]
  16. then
  17.     case "${infile}" in
  18.       *.ps)        base=`basename "${infile}" .ps` ;;
  19.       *.cps)    base=`basename "${infile}" .cps` ;;
  20.       *.eps)    base=`basename "${infile}" .eps` ;;
  21.       *.epsf)    base=`basename "${infile}" .epsf` ;;
  22.       *)        base=`basename "${infile}"` ;;
  23.     esac
  24.     outfile=${base}.epsi
  25. else
  26.     outfile=$2
  27. fi
  28.  
  29. ls -l "${infile}" |
  30. awk 'F==1    {
  31.         cd="%%CreationDate: " $6 " " $7 " " $8;
  32.         t="%%Title: " $9;
  33.         f="%%For:" U " " $3;
  34.         c="%%Creator: Ghostscript ps2epsi from " $9;
  35.         next;
  36.         }
  37.     /^%!/    {next;}
  38.     /^%%Title:/    {t=$0; next;}
  39.     /^%%Creator:/    {c=$0; next;}
  40.     /^%%CreationDate:/    {cd=$0; next;}
  41.     /^%%For:/    {f=$0; next;}
  42.     !/^%/    {
  43.         print "/ps2edict 30 dict def";
  44.         print "ps2edict begin";
  45.         print "/epsititle (" t "\\n) def";
  46.         print "/epsicreator (" c "\\n) def";
  47.         print "/epsicrdt (" cd "\\n) def";
  48.         print "/epsifor (" f "\\n) def";
  49.         print "end";
  50.         exit(0);
  51.         }
  52.     ' U="$USERNAME$LOGNAME"  F=1 - F=2 "${infile}" >$tmpfile
  53.  
  54. gs -q -dNOPAUSE -dSAFER -dDELAYSAFER -r72 -sDEVICE=bit -sOutputFile=/dev/null $tmpfile ps2epsi.ps $tmpfile <"${infile}" 1>&2
  55. rm -f $tmpfile
  56.  
  57. (
  58. cat << BEGINEPS
  59. save countdictstack mark newpath /showpage {} def /setpagedevice {pop} def
  60. %%EndProlog
  61. %%Page 1 1
  62. BEGINEPS
  63.  
  64. cat "${infile}" |
  65. sed -e '/^%%BeginPreview:/,/^%%EndPreview[^!-~]*$/d' -e '/^%!PS-Adobe/d'\
  66.     -e '/^%%[A-Za-z][A-Za-z]*[^!-~]*$/d' -e '/^%%[A-Za-z][A-Za-z]*: /d'
  67.  
  68. cat << ENDEPS
  69. %%Trailer
  70. cleartomark countdictstack exch sub { end } repeat restore
  71. %%EOF
  72. ENDEPS
  73.  
  74. ) >> "${outfile}"
  75.  
  76. exit 0
  77.