/usr/lib/dvi2ps/headers/dvi2.ps is in dvi2ps 5.1j-1.2build1.
This file is owned by root:root, with mode 0o644.
The actual contents of the file can be viewed below.
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 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 138 139 140 141 142 143 144 145 146 147 148 149 150 151 152 153 154 155 156 157 158 159 160 161 162 163 164 165 166 167 168 169 170 171 172 173 174 175 176 177 178 179 180 181 182 183 184 185 186 187 188 189 190 191 192 193 194 195 196 197 198 199 200 201 202 203 204 205 206 207 208 209 210 211 212 213 214 215 216 217 218 219 220 221 222 223 224 225 226 227 228 229 230 231 232 233 234 235 236 237 238 239 240 241 242 243 244 245 246 247 248 249 250 251 252 253 254 255 256 257 258 259 260 261 262 263 264 265 266 267 268 | %
/TeXDict 300 dict def
TeXDict begin
/inch {72 mul} bind def
/largepaperarray [
/letter /legal /11x17
/b4 /b5 /a5 /a4 /a3
] def
/smallpaperarray [
/note dup where {
pop
}{
pop /lettersmall dup where {
pop
}{
pop /letter
} ifelse
} ifelse
/legal /11x17
/b4 /b5 /a5
/a4small dup where {
pop
}{
pop /note dup where {
pop
}{
pop /a4
} ifelse
} ifelse
/a3
] def
/setpaper {
papertray {
dup where {
exch get exec
}{
pop
} ifelse
}{
pop
} ifelse
} bind def
/trayarray [
/lettertray /legaltray /11x17tray
/b4tray /b5tray /a5tray /a4tray /a3tray
] def
/settray {
dup statusdict exch known manualfeed not and {
mark exch statusdict begin load
{
exec
} stopped {
$error /newerror get {
$error /errorname get /rangecheck eq {
(Tray not found, using default tray.\n) print flush
TeXDict /papertray false put
}{
handleerror
} ifelse
$error /newerror false put
} if
} if
end cleartomark
}{
pop
} ifelse
} bind def
/papertray true def
/widtharray [
8.5 inch 8.5 inch 11 inch
10.12 inch 7.17 inch
5.83 inch 8.27 inch 11.69 inch
] def
/heightarray [
11 inch 14 inch 17 inch
14.33 inch 10.12 inch
8.27 inch 11.69 inch 16.54 inch
] def
/xoffset 0 def
/yoffset 0 def
/leftm 72 def
/topm 72 def
/landscape false def
/manualfeed false def
/sizesetup {
dup widtharray exch get /paperwidth exch def
heightarray exch get /paperheight exch def
} bind def
/pagesetup {
dup sizesetup
dup trayarray exch get settray
large {largepaperarray}{smallpaperarray} ifelse
exch get setpaper
} bind def
/@lettersize {0 sizesetup} def
/@legalsize {1 sizesetup} def
/@tabloidsize {2 sizesetup} def
/@b4size {3 sizesetup} def
/@b5size {4 sizesetup} def
/@a5size {5 sizesetup} def
/@a4size {6 sizesetup} def
/@a3size {7 sizesetup} def
/@letter {0 pagesetup} def
/@legal {1 pagesetup} def
/@tabloid {2 pagesetup} def
/@b4 {3 pagesetup} def
/@b5 {4 pagesetup} def
/@a5 {5 pagesetup} def
/@a4 {6 pagesetup} def
/@a3 {7 pagesetup} def
/@landscape {/landscape true def} bind def
/@manualfeed {
/manualfeed true def
statusdict /manualfeed known {
statusdict /manualfeed true put
statusdict /manualfeedtimeout 120 put
} if
} bind def
/@large {/large true def} bind def
/@small {/large false def} bind def
/@envelope {
/xoffset 4.28 inch def
/yoffset 1.5 inch def
@letter
} bind def
/COPIES {
/#copies exch def
} bind def
/NF {
/newname exch def
/fsize exch def
/corr exch def
newname 7 dict def
newname load begin
/FontType 3 def
/FontMatrix [corr 0 0 corr neg 0 0] def
/FontBBox [0 0 1 1] def
/BitMaps fsize array def
/BuildChar /CharBuilder load def
/Encoding 256 array def
0 1 255 {Encoding exch /.notdef put} for
end
newname newname load definefont pop
} bind def
/ch-image {ch-data 0 get} bind def
/ch-width {ch-data 1 get} bind def
/ch-height {ch-data 2 get} bind def
/ch-xoff {ch-data 3 get} bind def
/ch-yoff {ch-data 4 get} bind def
/ch-tfmw {ch-data 5 get} bind def
/CharBuilder {
/ch-code exch def
/font-dict exch def
/ch-data font-dict /BitMaps get ch-code get def
ch-data null eq not {
ch-tfmw 0
ch-xoff neg ch-yoff neg ch-width ch-xoff sub ch-height ch-yoff sub
setcachedevice
ch-width ch-height true [1 0 0 1 ch-xoff ch-yoff]
{ch-image} imagemask
} if
} bind def
/NF2 {
/newname exch def
/fsize exch def
/corr exch def
newname 7 dict def
newname load begin
/FontType 3 def
/FontMatrix [corr 0 0 corr neg 0 0] def
/FontBBox [0 0 1 1] def
/BitMaps fsize array def
/BuildChar /CharBuilder2 load def
/Encoding 256 array def
0 1 255 {Encoding exch /.notdef put} for
end
newname newname load definefont pop
} bind def
/CharBuilder2 {
/ch-code exch def
/font-dict exch def
/ch-data font-dict /BitMaps get ch-code get def
ch-data null eq not {
ch-tfmw 0
ch-xoff neg ch-yoff neg ch-width ch-xoff sub ch-height ch-yoff sub
setcachedevice
ch-xoff neg ch-yoff neg translate
ch-image exec
} if
} bind def
/BFT {
/bf-v exch def
/bf-h exch def
findfont [bf-h 0 0 bf-v 0 0] makefont def
} bind def
/BFE /BFT load def
/BFF {
/bf-v exch def
/bf-h exch def
/savecurfont currentfont def
findfont dup setfont
3 -1 roll
/bf-stand exch def
[
bf-stand stringwidth pop
dup bf-h exch div
exch bf-v exch div 0 0 3 -1 roll
0 0
] makefont def
savecurfont setfont
} bind def
/SF /setfont load def
/s3 3 string def
/D {
/ch-code exch def
/ch-data exch def
currentfont /BitMaps get ch-code ch-data put
currentfont /Encoding get ch-code
dup s3 cvs cvn
put
} bind def
/BP {
userdict /bop-hook known { bop-hook } if
/SaveImage save def
xoffset yoffset translate
leftm topm
landscape {
exch translate
90 rotate
}{
paperheight exch sub translate
} ifelse
72 Resolution div dup neg scale
0 0 moveto
} def
/EP {
SaveImage restore
userdict /eop-hook known { eop-hook } if
showpage
} def
/START {
userdict /start-hook known { start-hook } if
/DVImag exch def
/magscale true def
/Resolution exch def
} def
/l /lineto load def
/p /moveto load def
/r {
0 rmoveto
} bind def
/s /show load def
/c /curveto load def
/rs {
90 rotate show -90 rotate
} bind def
/ru {
/dy exch neg def
/dx exch def
/x currentpoint /y exch def def
newpath x y moveto
dx 0 rlineto
0 dy rlineto
dx neg 0 rlineto
closepath fill
x y moveto
} bind def
end
|