3 % Code between start/end remarks is put into ps.c
4 % Anything else is thrown away, and is for testing only.
6 % ---- ethereal preamble start ---- %
10 % Ethereal - Network traffic analyzer
11 % By Gerald Combs <gerald@zing.org>
12 % Copyright 1998 Gerald Combs
16 %%DocumentFonts: Helvetica Courier
20 % Get the Imagable Area of the page
23 % Set vmax to the vertical size of the page,
24 % hmax to the horizontal size of the page.
31 /tmargin vmax 72 sub def
33 /pagenumtab hmax 72 sub def
40 /pagenostr 7 string def
42 % Prints text with possible indenting
44 exch 10 mul lmargin add % X
51 vpos bmargin le % is vpos <= bottom margin?
56 if % then formfeed and start at top
59 % A putline with no indenting
68 vpos bmargin le % is vpos <= bottom margin?
73 if % then formfeed and start at top
76 % A put line with smaller spacing and no formfeed
86 % Prints the page number at the top right
89 % Set the font to 8 point
90 /Helvetica findfont 8 scalefont setfont
96 thispagenum pagenostr cvs show
99 /thispagenum thispagenum 1 add def
103 % Set the font to 8 point
104 /Helvetica findfont 8 scalefont setfont
109 % Reset the vertical position
112 % Set the font to 10 point
113 /Courier findfont 10 scalefont setfont
114 % ---- ethereal preamble end ---- %
116 % Display our output lines.
117 0 (Ethernet II \(98 on wire, 68 captured\)) putline
118 1 (Destination: 00:00:0c:36:00:2a) putline
119 1 (Source: 00:c0:4f:c7:eb:c0) putline
120 1 (Type: IP \(0x0800\)) putline
121 0 (Ethernet II \(98 on wire, 68 captured\)) putline
122 1 (Source: 00:c0:4f:c7:eb:c0) putline
123 1 (Type: IP \(0x0800\)) putline
124 0 (Source: 00:c0:4f:c7:eb:c0) putline
126 % ---- ethereal hex start ---- %
127 % Set the font to 10 point
128 /Courier findfont 10 scalefont setfont
130 % ---- ethereal hex end ---- %
132 ( 0 cc00 0000 0000 0702 0000 0000 0000 0000 ................ ) hexdump
133 ( 10 0000 bd0e fe16 0100 3e00 0308 584c 2038 ........>...XL 8 ) hexdump
134 ( 20 3020 494d 3300 1601 0034 0016 0101 3500 0 IM3....4....5. ) hexdump
135 ( 30 1601 0236 0016 0103 6e00 1601 ff6f 0016 ...6....n....o.. ) hexdump
136 ( 40 01ff 7000 1601 ff71 0016 01ff 4800 0104 ..p....q....H... ) hexdump
137 ( 50 ff03 0700 2400 0101 0525 0001 0105 2600 ....$....%....&. ) hexdump
138 ( 60 0101 0527 0001 0105 6a00 0101 006b 0001 ...'....j....k.. ) hexdump
139 ( 70 0100 6c00 0101 006d 0001 0100 3d00 0102 ..l....m....=... ) hexdump
140 ( 80 0200 c000 0308 8000 0000 0000 0000 b400 ................ ) hexdump
141 ( 90 0104 c0a8 42ef 3900 1608 0505 0505 0000 ....B.9......... ) hexdump
142 ( a0 0000 0003 2036 4120 5269 6e67 0000 0000 .... 6A Ring.... ) hexdump
143 ( b0 0000 0000 0000 ...... ) hexdump
145 % ---- ethereal finale start ---- %
146 % If this is not the first page, then print the page number
147 thispagenum 1 gt % is thispagenum > 1 ?
154 % ---- ethereal finale end ---- %