Warning: Attempt to read property "date" on null in /usr/local/www/websvn.planix.org/blame.php on line 247

Warning: Attempt to read property "msg" on null in /usr/local/www/websvn.planix.org/blame.php on line 247
WebSVN – planix.SVN – Blame – /os/branches/feature_unix/sys/src/cmd/gs/lib/ps2pdfxx.bat – Rev 2

Subversion Repositories planix.SVN

Rev

Go to most recent revision | Details | Last modification | View Log | RSS feed

Rev Author Line No. Line
2 - 1
@echo off
2
@rem $Id: ps2pdfxx.bat,v 1.13 2002/11/20 03:01:23 alexcher Exp $
3
rem Internal batch file for calling pdfwrite driver.
4
 
5
rem The files that call this one (ps2pdf*.bat) write the command-line
6
rem options into _.at, and then pass the last 2 (or fewer) arguments
7
rem to this file.
8
 
9
call gssetgs.bat
10
echo -q -dSAFER -dNOPAUSE -dBATCH -sDEVICE#pdfwrite >_.at2
11
 
12
if "%OS%"=="Windows_NT" goto nt
13
 
14
rem	Run ps2pdf on any Microsoft OS.
15
 
16
if %1/==/ goto usage
17
if %2/==/ goto usage
18
 
19
rem Watcom C deletes = signs, so use # instead.
20
rem We have to include the options twice because -I only takes effect if it
21
rem appears before other options.
22
 
23
:run
24
echo -sOutputFile#%2 >>_.at2
25
copy /b /y _.at2+_.at >NUL
26
echo -c .setpdfwrite -f %1 >>_.at2
27
%GSC% @_.at @_.at2
28
goto end
29
 
30
:usage
31
echo Usage: ps2pdf [options...] input.[e]ps output.pdf
32
goto end
33
 
34
rem	Run ps2pdf on Windows NT.
35
 
36
:nt
37
if not CMDEXTVERSION 1 goto run
38
if %1/==/ goto ntusage
39
if %2/==/ goto nooutfile
40
goto run
41
 
42
:ntusage
43
echo Usage: ps2pdf input.ps [output.pdf]
44
echo    or: ps2pdf [options...] input.[e]ps output.pdf
45
goto end
46
 
47
:nooutfile
48
rem We don't know why the circumlocution with _1 is needed....
49
set _1=%1
50
set _outf=%_1:.PS=.pdf%
51
if %_1%==%_outf% goto addsuff
52
call ps2pdfxx %1 %_outf%
53
goto postsuff
54
 
55
:addsuff
56
call ps2pdfxx %1 %1%.pdf
57
 
58
:postsuff
59
set _1=
60
set _outf=
61
 
62
:end
63
rem	Clean up.
64
if exist _.at erase _.at
65
if exist _.at2 erase _.at2