From f07bb53970ee2ecc53f81a206a3d3a67ef665e4a Mon Sep 17 00:00:00 2001 From: Karl Berry Date: Mon, 9 Jan 2006 00:56:57 +0000 Subject: doc 6 git-svn-id: svn://tug.org/texlive/trunk@85 c570f23f-e606-0410-a88d-b1316a301751 --- Master/texmf-dist/doc/generic/epsf/fndbadps | 18 ++++++++++++++++++ 1 file changed, 18 insertions(+) create mode 100755 Master/texmf-dist/doc/generic/epsf/fndbadps (limited to 'Master/texmf-dist/doc/generic/epsf/fndbadps') diff --git a/Master/texmf-dist/doc/generic/epsf/fndbadps b/Master/texmf-dist/doc/generic/epsf/fndbadps new file mode 100755 index 00000000000..bf91a717111 --- /dev/null +++ b/Master/texmf-dist/doc/generic/epsf/fndbadps @@ -0,0 +1,18 @@ +#!/bin/sh +# Find forbidden PostScript operators in the files specified +# on stdin. +# [21-May-1999] -- update with extended list for PostScript Level 3, +# from pp. 802--803 of the PostScript Language Reference +# Manual, 3rd edition, 1999. +# [29-Jun-1996] -- update to show matching bad operator +# [23-Oct-1992] + +# Level 2 list (19 operators): +# /banddevice|grestoreall|nulldevice|setpageparams|copypage|initclip|quit|setsccbatch|erasepage|initgraphics|renderbands|setscreen|exitserver|initmatrix|setdevice|settransfer|framedevice|note|setmatrix/ + +# Level 3 list (36 operators): +nawk ' +/^%/ {next} +match($0,/[^A-Za-z](banddevice|clear|cleardictstack|copypage|erasepage|executive|exitserver|framedevice|grestoreall|initclip|initgraphics|initmatrix|nulldevice|quit|renderbands|setblackgeneration|setcolorrendering|setcolorscreen|setcolortransfer|setflat|setglobal|setgstate|sethalftone|setmatrix|setoverprint|setpagedevice|setscreen|setshared|setsmoothness|settransfer|setundercolorremoval|startjob|statusdict|undefinefont|undefineresource|userdict)[^A-Za-z]/) { + print FILENAME ":" NR ": " $0 ": [" substr($0,RSTART,RLENGTH) "] illegal in EPS file" +}' $* -- cgit v1.2.3