File: ps2epsi

package info (click to toggle)
gs 3.33-7
  • links: PTS
  • area: main
  • in suites: hamm
  • size: 7,436 kB
  • ctags: 15,511
  • sloc: ansic: 92,150; asm: 684; sh: 486; makefile: 91
file content (49 lines) | stat: -rw-r--r-- 723 bytes parent folder | download
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
#!/bin/sh

export outfile

if [ $# -lt 1 -o $# -gt 2 ]; then
	echo "Usage: `basename $0` file.ps [file.epsi]" 1>&2
	exit 1
fi

infile=$1

if [ $# -eq 1 ]
then
	case "${infile}" in
	  *.ps)		base=`basename ${infile} .ps` ;;
	  *.cps)	base=`basename ${infile} .cps` ;;
	  *.eps)	base=`basename ${infile} .eps` ;;
	  *.epsf)	base=`basename ${infile} .epsf` ;;
	  *)		base=`basename ${infile}` ;;
	esac
	outfile=${base}.epsi
else
	outfile=$2
fi

gs -q -dNOPAUSE -sDEVICE=bit -sOutputFile=/dev/null ps2epsi.ps < ${infile} 1>&2

(
cat << BEGINEPS
save
countdictstack
mark
newpath
/showpage {} def
BEGINEPS

cat ${infile}

cat << ENDEPS
cleartomark
countdictstack exch sub { end } repeat
restore
ENDEPS

) >> ${outfile}

exit 0