mkisofs.ps

来自「刻录光盘的程序」· PS 代码 · 共 2,395 行 · 第 1/5 页

%!PS
%%Version: 3.15
%%DocumentFonts: (atend)
%%Pages: (atend)
%%EndComments
%ident	"@(#)lp:filter/postscript/postscript/dpost.ps	1.1"
%
% Version 3.16 prologue for troff files.
%

/#copies 1 store
/aspectratio 1 def
/formsperpage 1 def
/landscape false def
/linewidth .3 def
/magnification 1 def
/margin 0 def
/orientation 0 def
/resolution 720 def
/xoffset 0 def
/yoffset 0 def

/roundpage true def
/useclippath true def
/pagebbox [0 0 612 792] def

/R  /Times-Roman def
/I  /Times-Italic def
/B  /Times-Bold def
/BI /Times-BoldItalic def
/H  /Helvetica def
/HI /Helvetica-Oblique def
/HB /Helvetica-Bold def
/HX /Helvetica-BoldOblique def
/CW /Courier def
/CO /Courier def
/CI /Courier-Oblique def
/CB /Courier-Bold def
/CX /Courier-BoldOblique def
/PA /Palatino-Roman def
/PI /Palatino-Italic def
/PB /Palatino-Bold def
/PX /Palatino-BoldItalic def
/Hr /Helvetica-Narrow def
/Hi /Helvetica-Narrow-Oblique def
/Hb /Helvetica-Narrow-Bold def
/Hx /Helvetica-Narrow-BoldOblique def
/KR /Bookman-Light def
/KI /Bookman-LightItalic def
/KB /Bookman-Demi def
/KX /Bookman-DemiItalic def
/AR /AvantGarde-Book def
/AI /AvantGarde-BookOblique def
/AB /AvantGarde-Demi def
/AX /AvantGarde-DemiOblique def
/NR /NewCenturySchlbk-Roman def
/NI /NewCenturySchlbk-Italic def
/NB /NewCenturySchlbk-Bold def
/NX /NewCenturySchlbk-BoldItalic def
/ZD /ZapfDingbats def
/ZI /ZapfChancery-MediumItalic def
/VR /Varitimes#Roman def
/VI /Varitimes#Italic def
/VB /Varitimes#Bold def
/VX /Varitimes#BoldItalic def
/S  /S def
/S1 /S1 def
/GR /Symbol def

/inch {72 mul} bind def
/min {2 copy gt {exch} if pop} bind def

/setup {
	counttomark 2 idiv {def} repeat pop

	landscape {/orientation 90 orientation add def} if
	/scaling 72 resolution div def
	linewidth setlinewidth
	1 setlinecap

	pagedimensions
	xcenter ycenter translate
	orientation neg rotate
	width 2 div neg height 2 div translate
	xoffset inch yoffset inch translate
	margin 2 div dup neg translate
	magnification dup aspectratio mul scale
	scaling scaling scale

	/Symbol /S Sdefs cf
	/Times-Roman /S1 S1defs cf
	0 0 moveto
} def

/pagedimensions {
	useclippath userdict /gotpagebbox known not and {
		/pagebbox [clippath pathbbox newpath] def
		roundpage currentdict /roundpagebbox known and {roundpagebbox} if
	} if
	pagebbox aload pop
	4 -1 roll exch 4 1 roll 4 copy
	landscape {4 2 roll} if
	sub /width exch def
	sub /height exch def
	add 2 div /xcenter exch def
	add 2 div /ycenter exch def
	userdict /gotpagebbox true put
} def

/pagesetup {
	/page exch def
	currentdict /pagedict known currentdict page known and {
		page load pagedict exch get cvx exec
	} if
} def

/decodingdefs [
	{counttomark 2 idiv {y moveto show} repeat}
	{neg /y exch def counttomark 2 idiv {y moveto show} repeat}
	{neg moveto {2 index stringwidth pop sub exch div 0 32 4 -1 roll widthshow} repeat}
	{neg moveto {spacewidth sub 0.0 32 4 -1 roll widthshow} repeat}
	{counttomark 2 idiv {y moveto show} repeat}
	{neg setfunnytext}
] def

/setdecoding {/t decodingdefs 3 -1 roll get bind def} bind def

/w {neg moveto show} bind def
/m {neg dup /y exch def moveto} bind def
/done {/lastpage where {pop lastpage} if} def

/f {
	dup /font exch def findfont exch
	dup /ptsize exch def scaling div dup /size exch def scalefont setfont
	linewidth ptsize mul scaling 10 mul div setlinewidth
	/spacewidth ( ) stringwidth pop def
} bind def

/changefont {
	/fontheight exch def
	/fontslant exch def
	currentfont [
		1 0
		fontheight ptsize div fontslant sin mul fontslant cos div
		fontheight ptsize div
		0 0
	] makefont setfont
} bind def

/sf {f} bind def

/cf {
	dup length 2 idiv
	/entries exch def
	/chtab exch def
	/newfont exch def

	findfont dup length 1 add dict
	/newdict exch def
	{1 index /FID ne {newdict 3 1 roll put} {pop pop} ifelse} forall

	newdict /Metrics entries dict put
	newdict /Metrics get
	begin
		chtab aload pop
		1 1 entries {pop def} for
		newfont newdict definefont pop
	end
} bind def

%
% A few arrays used to adjust reference points and character widths in some
% of the printer resident fonts. If square roots are too high try changing
% the lines describing /radical and /radicalex to,
%
%	/radical	[0 -75 550 0]
%	/radicalex	[-50 -75 500 0]
%

/Sdefs [
	/bracketlefttp		[220 500]
	/bracketleftbt		[220 500]
	/bracketrighttp		[-70 380]
	/bracketrightbt		[-70 380]
	/braceleftbt		[220 490]
	/bracketrightex		[220 -125 500 0]
	/radical		[0 0 550 0]
	% NeWSprint's \(br is too low, compensate
	statusdict /product get (NeWS Server) eq {
		/radicalex		[-50 100 500 0]
		/parenleftex		[-20 100 0 0]

	} {
		/radicalex		[-50 0 500 0]
		/parenleftex		[-20 -170 0 0]
	} ifelse
	/integral		[100 -50 500 0]
	/infinity		[10 -75 730 0]
] def

/S1defs [
	/underscore		[0 80 500 0]
	/endash			[7 90 650 0]
] def
%%EndProlog
%%BeginSetup
mark
/resolution 720 def
setup
2 setdecoding
%%EndSetup
%%Page: 1 1
save
mark
1 pagesetup
10 R f
( \( 8 \))3 164( MKISOFS)1 1681( Procedures)1 476( Maintenance)1 1761(MKISOFS \( 8 \))3 598 5 720 480 t
9 B f
(NAME)720 960 w
10 R f
(mkisofs)1080 1080 w
10 S1 f
(\261)1430 1080 w
10 R f
(create a iso9660 \256lesystem with optional Rock Ridge attributes.)8 2621 1 1528 1080 t
9 B f
(SYNOPSIS)720 1248 w
10 B f
(mkisofs)1080 1368 w
10 R f
([)1488 1368 w
10 S1 f
(\261)1601 1368 w
10 B f
(a)1666 1368 w
10 R f
(] [)1 146 1 1796 1368 t
10 S1 f
(\261)2022 1368 w
10 B f
(abstract)2087 1368 w
10 I f
(FILE)2516 1368 w
10 R f
(] [)1 146 1 2807 1368 t
10 S1 f
(\261)3033 1368 w
10 B f
(biblio)3098 1368 w
10 I f
(FILE)3424 1368 w
10 R f
(] [)1 146 1 3715 1368 t
10 S1 f
(\261)3941 1368 w
10 B f
(b)4006 1368 w
10 I f
(eltorito)4142 1368 w
10 S f
(_)4437 1368 w
10 I f
(boot)4487 1368 w
10 S f
(_)4665 1368 w
10 I f
(image)4715 1368 w
10 R f
(] [)1 147 1 5040 1368 t
10 S1 f
(\261)5268 1368 w
10 B f
(B)5333 1368 w
10 I f
(sparc)1080 1488 w
10 S f
(_)1302 1488 w
10 I f
(boot)1352 1488 w
10 S f
(_)1530 1488 w
10 I f
(image)1580 1488 w
10 S f
(_)1824 1488 w
10 I f
(list)1874 1488 w
10 R f
(] [)1 110 1 2041 1488 t
10 S1 f
(\261)2195 1488 w
10 B f
(G)2260 1488 w
10 I f
(generic)2382 1488 w
10 S f
(_)2681 1488 w
10 I f
(boot)2731 1488 w
10 S f
(_)2909 1488 w
10 I f
(image)2959 1488 w
10 R f
(] [)1 110 1 3247 1488 t
10 S1 f
(\261)3401 1488 w
10 B f
(gui)3466 1488 w
10 R f
(] [)1 109 1 3644 1488 t
10 S1 f
(\261)3796 1488 w
10 B f
(C)3861 1488 w
10 S1 f
(#)3976 1488 w
10 I f
(,)4026 1488 w
10 S1 f
(#)4051 1488 w
10 R f
(] [)1 109 1 4144 1488 t
10 S1 f
(\261)4296 1488 w
10 B f
(hard-disk-boot)4361 1488 w
10 R f
(] [)1 109 1 5044 1488 t
10 S1 f
(\261)5196 1488 w
10 B f
(no-)5261 1488 w
(emul-boot)1080 1608 w
10 R f
(] [)1 99 1 1546 1608 t
10 S1 f
(\261)1678 1608 w
10 B f
(no-boot)1743 1608 w
10 R f
(] [)1 99 1 2104 1608 t
10 S1 f
(\261)2236 1608 w
10 B f
(boot-load-seg)2301 1608 w
10 R f
(] [)1 99 1 2906 1608 t
10 S1 f
(\261)3038 1608 w
10 B f
(boot-load-size)3103 1608 w
10 R f
(] [)1 99 1 3730 1608 t
10 S1 f
(\261)3863 1608 w
10 B f
(boot-info-table)3928 1608 w
10 R f
(] [)1 100 1 4595 1608 t
10 S1 f
(\261)4729 1608 w
10 B f
(c)4794 1608 w
10 I f
(boot)4872 1608 w
10 S f
(_)5050 1608 w
10 I f
(catalog)5100 1608 w
10 R f
(] [)1 108 1 1080 1728 t
10 S1 f
(\261)1230 1728 w
10 B f
(copyright)1295 1728 w
10 I f
(FILE)1748 1728 w
10 R f
(] [)1 107 1 2000 1728 t
10 S1 f
(\261)2148 1728 w
10 B f
(A)2213 1728 w
10 I f
(application)2326 1728 w
10 S f
(_)2782 1728 w
10 I f
(id)2832 1728 w
10 R f
(] [)1 107 1 2951 1728 t
10 S1 f
(\261)3099 1728 w
10 B f
(f)3164 1728 w
10 R f
(] [)1 107 1 3238 1728 t
10 S1 f
(\261)3386 1728 w
10 B f
(d)3451 1728 w
10 R f
(] [)1 107 1 3548 1728 t
10 S1 f
(\261)3696 1728 w
10 B f
(D)3761 1728 w
10 R f
(] [)1 107 1 3874 1728 t
10 S1 f
(\261)4022 1728 w
10 B f
(hide)4087 1728 w
10 I f
(glob)4312 1728 w
10 R f
(] [)1 107 1 4531 1728 t
10 S1 f
(\261)4679 1728 w
10 B f
(hide-list)4744 1728 w
10 I f
(\256le)5130 1728 w
10 R f
(] [)1 107 1 5293 1728 t
10 S1 f
(\261)1080 1848 w
10 B f
(hide-joliet)1145 1848 w
10 I f
(glob)1613 1848 w
10 R f
(] [)1 101 1 1826 1848 t
10 S1 f
(\261)1962 1848 w
10 B f
(hide-joliet-list)2027 1848 w
10 I f
(\256le)2656 1848 w
10 R f
(] [)1 101 1 2813 1848 t
10 S1 f
(\261)2949 1848 w
10 B f
(hide-joliet-trans-tbl)3014 1848 w
10 R f
(] [)1 101 1 3887 1848 t
10 S1 f
(\261)4023 1848 w
10 B f
(hide-rr-moved)4088 1848 w
10 R f
(] [)1 101 1 4744 1848 t
10 S1 f
(\261)4880 1848 w
10 B f
(J)4945 1848 w
10 R f
(] [)1 102 1 5031 1848 t
10 S1 f
(\261)5169 1848 w
10 B f
(l)5234 1848 w
10 R f
(] [)1 102 1 5298 1848 t
10 S1 f
(\261)1080 1968 w
10 B f
(L)1145 1968 w
10 R f
(] [)1 101 1 1247 1968 t
10 S1 f
(\261)1383 1968 w
10 B f
(log-\256le)1448 1968 w
10 I f
(log)1772 1968 w
10 S f