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@ethereal.com>
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
129 % ---- ethereal hex end ---- %
132 (0000 cc 00 00 00 00 00 07 02 00 00 00 00 00 00 00 00 ................ ) hexdump
133 (0010 00 00 bd 0e fe 16 01 00 3e 00 03 08 58 4c 20 38 ........>...XL 8 ) hexdump
134 (0020 30 20 49 4d 33 00 16 01 00 34 00 16 01 01 35 00 0 IM3....4....5. ) hexdump
135 (0030 16 01 02 36 00 16 01 03 6e 00 16 01 ff 6f 00 16 ...6....n....o.. ) hexdump
136 (0040 01 ff 70 00 16 01 ff 71 00 16 01 ff 48 00 01 04 ..p....q....H... ) hexdump
137 (0050 ff 03 07 00 24 00 01 01 05 25 00 01 01 05 26 00 ....$....%....&. ) hexdump
138 (0060 01 01 05 27 00 01 01 05 6a 00 01 01 00 6b 00 01 ...'....j....k.. ) hexdump
139 (0070 01 00 6c 00 01 01 00 6d 00 01 01 00 3d 00 01 02 ..l....m....=... ) hexdump
140 (0080 02 00 c0 00 03 08 80 00 00 00 00 00 00 00 b4 00 ................ ) hexdump
141 (0090 01 04 c0 a8 42 ef 39 00 16 08 05 05 05 05 00 00 ....B.9......... ) hexdump
142 (00a0 00 00 00 03 20 36 41 20 52 69 6e 67 00 00 00 00 .... 6A Ring.... ) hexdump
143 (00b0 00 00 00 00 00 00 ...... ) 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 ---- %