Initial revision
[obnox/wireshark/wip.git] / print.ps
1 %!
2 %
3 % Code between start/end remarks is put into ps.c
4 % Anything else is thrown away, and is for testing only.
5 %
6 % ---- ethereal preamble start ---- %
7 %!
8 %!PS-Adobe-2.0
9 %
10 % Ethereal - Network traffic analyzer
11 % By Gerald Combs <gerald@zing.org>
12 % Copyright 1998 Gerald Combs
13 %
14 %%Creator: Ethereal
15 %%Title: ethereal.ps
16 %%DocumentFonts: Helvetica Courier
17 %%EndComments
18 %!
19
20 % Get the Imagable Area of the page
21 clippath pathbbox
22
23 % Set vmax to the vertical size of the page,
24 % hmax to the horizontal size of the page.
25 /vmax exch def
26 /hmax exch def
27 pop pop         % junk
28
29 % 1-inch margins
30 /lmargin 72 def
31 /tmargin vmax 72 sub def
32 /bmargin 72 def
33
34 % Counters
35 /vpos vmax 70 sub def
36
37 /putline {
38         exch 10 mul lmargin add         % X
39         vpos                                            % Y
40         moveto
41         show
42
43         /vpos vpos 10 sub def
44
45         vpos bmargin le                         % is vpos <= bottom margin?
46         {showpage
47                 /vpos tmargin def}
48         if                                                      % then formfeed and start at top
49 } def
50
51 /hexdump {
52         lmargin                                         % X
53         vpos                                            % Y
54         moveto
55         show
56
57         /vpos vpos 10 sub def
58
59         vpos bmargin le                         % is vpos <= bottom margin?
60         {showpage
61                 /vpos tmargin def}
62         if                                                      % then formfeed and start at top
63 } def
64
65 % Set the font to 10 point
66 /Helvetica findfont 10 scalefont setfont
67
68 % Display our output lines.
69 % ---- ethereal preamble end ---- %
70 0 (Ethernet II \(98 on wire, 68 captured\)) putline
71 1 (Destination: 00:00:0c:36:00:2a) putline
72 1 (Source: 00:c0:4f:c7:eb:c0) putline
73 1 (Type: IP \(0x0800\)) putline
74 0 (Ethernet II \(98 on wire, 68 captured\)) putline
75 1 (Source: 00:c0:4f:c7:eb:c0) putline
76 1 (Type: IP \(0x0800\)) putline
77 0 (Source: 00:c0:4f:c7:eb:c0) putline
78
79 % ---- ethereal hex start ---- %
80 % Set the font to 10 point
81 /Courier findfont 10 scalefont setfont
82 () hexdump
83 % ---- ethereal hex end ---- %
84
85 (   0  cc00 0000 0000 0702 0000 0000 0000 0000   ................ ) hexdump
86 (  10  0000 bd0e fe16 0100 3e00 0308 584c 2038   ........>...XL 8 ) hexdump
87 (  20  3020 494d 3300 1601 0034 0016 0101 3500   0 IM3....4....5. ) hexdump
88 (  30  1601 0236 0016 0103 6e00 1601 ff6f 0016   ...6....n....o.. ) hexdump
89 (  40  01ff 7000 1601 ff71 0016 01ff 4800 0104   ..p....q....H... ) hexdump
90 (  50  ff03 0700 2400 0101 0525 0001 0105 2600   ....$....%....&. ) hexdump
91 (  60  0101 0527 0001 0105 6a00 0101 006b 0001   ...'....j....k.. ) hexdump
92 (  70  0100 6c00 0101 006d 0001 0100 3d00 0102   ..l....m....=... ) hexdump
93 (  80  0200 c000 0308 8000 0000 0000 0000 b400   ................ ) hexdump
94 (  90  0104 c0a8 42ef 3900 1608 0505 0505 0000   ....B.9......... ) hexdump
95 (  a0  0000 0003 2036 4120 5269 6e67 0000 0000   .... 6A Ring.... ) hexdump
96 (  b0  0000 0000 0000                            ......           ) hexdump
97
98 % ---- ethereal finale start ---- %
99 showpage
100 % ---- ethereal finale end ---- %