]> The Tcpdump Group git mirrors - tcpdump/blob - print-juniper.c
NDOize ISO CLNS decoder
[tcpdump] / print-juniper.c
1 /* NetBSD: print-juniper.c,v 1.2 2007/07/24 11:53:45 drochner Exp */
2
3 /*
4 * Redistribution and use in source and binary forms, with or without
5 * modification, are permitted provided that: (1) source code
6 * distributions retain the above copyright notice and this paragraph
7 * in its entirety, and (2) distributions including binary code include
8 * the above copyright notice and this paragraph in its entirety in
9 * the documentation or other materials provided with the distribution.
10 * THIS SOFTWARE IS PROVIDED ``AS IS'' AND
11 * WITHOUT ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, WITHOUT
12 * LIMITATION, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS
13 * FOR A PARTICULAR PURPOSE.
14 *
15 * Original code by Hannes Gredler (hannes@juniper.net)
16 */
17
18 #ifndef lint
19 #else
20 __RCSID("NetBSD: print-juniper.c,v 1.3 2007/07/25 06:31:32 dogcow Exp ");
21 #endif
22
23 #ifdef HAVE_CONFIG_H
24 #include "config.h"
25 #endif
26
27 #include <tcpdump-stdinc.h>
28
29 #include <stdio.h>
30
31 #include "interface.h"
32 #include "addrtoname.h"
33 #include "extract.h"
34 #include "ppp.h"
35 #include "llc.h"
36 #include "nlpid.h"
37 #include "ethertype.h"
38 #include "atm.h"
39
40 #define JUNIPER_BPF_OUT 0 /* Outgoing packet */
41 #define JUNIPER_BPF_IN 1 /* Incoming packet */
42 #define JUNIPER_BPF_PKT_IN 0x1 /* Incoming packet */
43 #define JUNIPER_BPF_NO_L2 0x2 /* L2 header stripped */
44 #define JUNIPER_BPF_IIF 0x4 /* IIF is valid */
45 #define JUNIPER_BPF_FILTER 0x40 /* BPF filtering is supported */
46 #define JUNIPER_BPF_EXT 0x80 /* extensions present */
47 #define JUNIPER_MGC_NUMBER 0x4d4743 /* = "MGC" */
48
49 #define JUNIPER_LSQ_COOKIE_RE (1 << 3)
50 #define JUNIPER_LSQ_COOKIE_DIR (1 << 2)
51 #define JUNIPER_LSQ_L3_PROTO_SHIFT 4
52 #define JUNIPER_LSQ_L3_PROTO_MASK (0x17 << JUNIPER_LSQ_L3_PROTO_SHIFT)
53 #define JUNIPER_LSQ_L3_PROTO_IPV4 (0 << JUNIPER_LSQ_L3_PROTO_SHIFT)
54 #define JUNIPER_LSQ_L3_PROTO_IPV6 (1 << JUNIPER_LSQ_L3_PROTO_SHIFT)
55 #define JUNIPER_LSQ_L3_PROTO_MPLS (2 << JUNIPER_LSQ_L3_PROTO_SHIFT)
56 #define JUNIPER_LSQ_L3_PROTO_ISO (3 << JUNIPER_LSQ_L3_PROTO_SHIFT)
57 #define AS_PIC_COOKIE_LEN 8
58
59 #define JUNIPER_IPSEC_O_ESP_ENCRYPT_ESP_AUTHEN_TYPE 1
60 #define JUNIPER_IPSEC_O_ESP_ENCRYPT_AH_AUTHEN_TYPE 2
61 #define JUNIPER_IPSEC_O_ESP_AUTHENTICATION_TYPE 3
62 #define JUNIPER_IPSEC_O_AH_AUTHENTICATION_TYPE 4
63 #define JUNIPER_IPSEC_O_ESP_ENCRYPTION_TYPE 5
64
65 static const struct tok juniper_ipsec_type_values[] = {
66 { JUNIPER_IPSEC_O_ESP_ENCRYPT_ESP_AUTHEN_TYPE, "ESP ENCR-AUTH" },
67 { JUNIPER_IPSEC_O_ESP_ENCRYPT_AH_AUTHEN_TYPE, "ESP ENCR-AH AUTH" },
68 { JUNIPER_IPSEC_O_ESP_AUTHENTICATION_TYPE, "ESP AUTH" },
69 { JUNIPER_IPSEC_O_AH_AUTHENTICATION_TYPE, "AH AUTH" },
70 { JUNIPER_IPSEC_O_ESP_ENCRYPTION_TYPE, "ESP ENCR" },
71 { 0, NULL}
72 };
73
74 static const struct tok juniper_direction_values[] = {
75 { JUNIPER_BPF_IN, "In"},
76 { JUNIPER_BPF_OUT, "Out"},
77 { 0, NULL}
78 };
79
80 /* codepoints for encoding extensions to a .pcap file */
81 enum {
82 JUNIPER_EXT_TLV_IFD_IDX = 1,
83 JUNIPER_EXT_TLV_IFD_NAME = 2,
84 JUNIPER_EXT_TLV_IFD_MEDIATYPE = 3,
85 JUNIPER_EXT_TLV_IFL_IDX = 4,
86 JUNIPER_EXT_TLV_IFL_UNIT = 5,
87 JUNIPER_EXT_TLV_IFL_ENCAPS = 6,
88 JUNIPER_EXT_TLV_TTP_IFD_MEDIATYPE = 7,
89 JUNIPER_EXT_TLV_TTP_IFL_ENCAPS = 8
90 };
91
92 /* 1 byte type and 1-byte length */
93 #define JUNIPER_EXT_TLV_OVERHEAD 2
94
95 static const struct tok jnx_ext_tlv_values[] = {
96 { JUNIPER_EXT_TLV_IFD_IDX, "Device Interface Index" },
97 { JUNIPER_EXT_TLV_IFD_NAME,"Device Interface Name" },
98 { JUNIPER_EXT_TLV_IFD_MEDIATYPE, "Device Media Type" },
99 { JUNIPER_EXT_TLV_IFL_IDX, "Logical Interface Index" },
100 { JUNIPER_EXT_TLV_IFL_UNIT,"Logical Unit Number" },
101 { JUNIPER_EXT_TLV_IFL_ENCAPS, "Logical Interface Encapsulation" },
102 { JUNIPER_EXT_TLV_TTP_IFD_MEDIATYPE, "TTP derived Device Media Type" },
103 { JUNIPER_EXT_TLV_TTP_IFL_ENCAPS, "TTP derived Logical Interface Encapsulation" },
104 { 0, NULL }
105 };
106
107 static const struct tok jnx_flag_values[] = {
108 { JUNIPER_BPF_EXT, "Ext" },
109 { JUNIPER_BPF_FILTER, "Filter" },
110 { JUNIPER_BPF_IIF, "IIF" },
111 { JUNIPER_BPF_NO_L2, "no-L2" },
112 { JUNIPER_BPF_PKT_IN, "In" },
113 { 0, NULL }
114 };
115
116 #define JUNIPER_IFML_ETHER 1
117 #define JUNIPER_IFML_FDDI 2
118 #define JUNIPER_IFML_TOKENRING 3
119 #define JUNIPER_IFML_PPP 4
120 #define JUNIPER_IFML_FRAMERELAY 5
121 #define JUNIPER_IFML_CISCOHDLC 6
122 #define JUNIPER_IFML_SMDSDXI 7
123 #define JUNIPER_IFML_ATMPVC 8
124 #define JUNIPER_IFML_PPP_CCC 9
125 #define JUNIPER_IFML_FRAMERELAY_CCC 10
126 #define JUNIPER_IFML_IPIP 11
127 #define JUNIPER_IFML_GRE 12
128 #define JUNIPER_IFML_PIM 13
129 #define JUNIPER_IFML_PIMD 14
130 #define JUNIPER_IFML_CISCOHDLC_CCC 15
131 #define JUNIPER_IFML_VLAN_CCC 16
132 #define JUNIPER_IFML_MLPPP 17
133 #define JUNIPER_IFML_MLFR 18
134 #define JUNIPER_IFML_ML 19
135 #define JUNIPER_IFML_LSI 20
136 #define JUNIPER_IFML_DFE 21
137 #define JUNIPER_IFML_ATM_CELLRELAY_CCC 22
138 #define JUNIPER_IFML_CRYPTO 23
139 #define JUNIPER_IFML_GGSN 24
140 #define JUNIPER_IFML_LSI_PPP 25
141 #define JUNIPER_IFML_LSI_CISCOHDLC 26
142 #define JUNIPER_IFML_PPP_TCC 27
143 #define JUNIPER_IFML_FRAMERELAY_TCC 28
144 #define JUNIPER_IFML_CISCOHDLC_TCC 29
145 #define JUNIPER_IFML_ETHERNET_CCC 30
146 #define JUNIPER_IFML_VT 31
147 #define JUNIPER_IFML_EXTENDED_VLAN_CCC 32
148 #define JUNIPER_IFML_ETHER_OVER_ATM 33
149 #define JUNIPER_IFML_MONITOR 34
150 #define JUNIPER_IFML_ETHERNET_TCC 35
151 #define JUNIPER_IFML_VLAN_TCC 36
152 #define JUNIPER_IFML_EXTENDED_VLAN_TCC 37
153 #define JUNIPER_IFML_CONTROLLER 38
154 #define JUNIPER_IFML_MFR 39
155 #define JUNIPER_IFML_LS 40
156 #define JUNIPER_IFML_ETHERNET_VPLS 41
157 #define JUNIPER_IFML_ETHERNET_VLAN_VPLS 42
158 #define JUNIPER_IFML_ETHERNET_EXTENDED_VLAN_VPLS 43
159 #define JUNIPER_IFML_LT 44
160 #define JUNIPER_IFML_SERVICES 45
161 #define JUNIPER_IFML_ETHER_VPLS_OVER_ATM 46
162 #define JUNIPER_IFML_FR_PORT_CCC 47
163 #define JUNIPER_IFML_FRAMERELAY_EXT_CCC 48
164 #define JUNIPER_IFML_FRAMERELAY_EXT_TCC 49
165 #define JUNIPER_IFML_FRAMERELAY_FLEX 50
166 #define JUNIPER_IFML_GGSNI 51
167 #define JUNIPER_IFML_ETHERNET_FLEX 52
168 #define JUNIPER_IFML_COLLECTOR 53
169 #define JUNIPER_IFML_AGGREGATOR 54
170 #define JUNIPER_IFML_LAPD 55
171 #define JUNIPER_IFML_PPPOE 56
172 #define JUNIPER_IFML_PPP_SUBORDINATE 57
173 #define JUNIPER_IFML_CISCOHDLC_SUBORDINATE 58
174 #define JUNIPER_IFML_DFC 59
175 #define JUNIPER_IFML_PICPEER 60
176
177 static const struct tok juniper_ifmt_values[] = {
178 { JUNIPER_IFML_ETHER, "Ethernet" },
179 { JUNIPER_IFML_FDDI, "FDDI" },
180 { JUNIPER_IFML_TOKENRING, "Token-Ring" },
181 { JUNIPER_IFML_PPP, "PPP" },
182 { JUNIPER_IFML_PPP_SUBORDINATE, "PPP-Subordinate" },
183 { JUNIPER_IFML_FRAMERELAY, "Frame-Relay" },
184 { JUNIPER_IFML_CISCOHDLC, "Cisco-HDLC" },
185 { JUNIPER_IFML_SMDSDXI, "SMDS-DXI" },
186 { JUNIPER_IFML_ATMPVC, "ATM-PVC" },
187 { JUNIPER_IFML_PPP_CCC, "PPP-CCC" },
188 { JUNIPER_IFML_FRAMERELAY_CCC, "Frame-Relay-CCC" },
189 { JUNIPER_IFML_FRAMERELAY_EXT_CCC, "Extended FR-CCC" },
190 { JUNIPER_IFML_IPIP, "IP-over-IP" },
191 { JUNIPER_IFML_GRE, "GRE" },
192 { JUNIPER_IFML_PIM, "PIM-Encapsulator" },
193 { JUNIPER_IFML_PIMD, "PIM-Decapsulator" },
194 { JUNIPER_IFML_CISCOHDLC_CCC, "Cisco-HDLC-CCC" },
195 { JUNIPER_IFML_VLAN_CCC, "VLAN-CCC" },
196 { JUNIPER_IFML_EXTENDED_VLAN_CCC, "Extended-VLAN-CCC" },
197 { JUNIPER_IFML_MLPPP, "Multilink-PPP" },
198 { JUNIPER_IFML_MLFR, "Multilink-FR" },
199 { JUNIPER_IFML_MFR, "Multilink-FR-UNI-NNI" },
200 { JUNIPER_IFML_ML, "Multilink" },
201 { JUNIPER_IFML_LS, "LinkService" },
202 { JUNIPER_IFML_LSI, "LSI" },
203 { JUNIPER_IFML_ATM_CELLRELAY_CCC, "ATM-CCC-Cell-Relay" },
204 { JUNIPER_IFML_CRYPTO, "IPSEC-over-IP" },
205 { JUNIPER_IFML_GGSN, "GGSN" },
206 { JUNIPER_IFML_PPP_TCC, "PPP-TCC" },
207 { JUNIPER_IFML_FRAMERELAY_TCC, "Frame-Relay-TCC" },
208 { JUNIPER_IFML_FRAMERELAY_EXT_TCC, "Extended FR-TCC" },
209 { JUNIPER_IFML_CISCOHDLC_TCC, "Cisco-HDLC-TCC" },
210 { JUNIPER_IFML_ETHERNET_CCC, "Ethernet-CCC" },
211 { JUNIPER_IFML_VT, "VPN-Loopback-tunnel" },
212 { JUNIPER_IFML_ETHER_OVER_ATM, "Ethernet-over-ATM" },
213 { JUNIPER_IFML_ETHER_VPLS_OVER_ATM, "Ethernet-VPLS-over-ATM" },
214 { JUNIPER_IFML_MONITOR, "Monitor" },
215 { JUNIPER_IFML_ETHERNET_TCC, "Ethernet-TCC" },
216 { JUNIPER_IFML_VLAN_TCC, "VLAN-TCC" },
217 { JUNIPER_IFML_EXTENDED_VLAN_TCC, "Extended-VLAN-TCC" },
218 { JUNIPER_IFML_CONTROLLER, "Controller" },
219 { JUNIPER_IFML_ETHERNET_VPLS, "VPLS" },
220 { JUNIPER_IFML_ETHERNET_VLAN_VPLS, "VLAN-VPLS" },
221 { JUNIPER_IFML_ETHERNET_EXTENDED_VLAN_VPLS, "Extended-VLAN-VPLS" },
222 { JUNIPER_IFML_LT, "Logical-tunnel" },
223 { JUNIPER_IFML_SERVICES, "General-Services" },
224 { JUNIPER_IFML_PPPOE, "PPPoE" },
225 { JUNIPER_IFML_ETHERNET_FLEX, "Flexible-Ethernet-Services" },
226 { JUNIPER_IFML_FRAMERELAY_FLEX, "Flexible-FrameRelay" },
227 { JUNIPER_IFML_COLLECTOR, "Flow-collection" },
228 { JUNIPER_IFML_PICPEER, "PIC Peer" },
229 { JUNIPER_IFML_DFC, "Dynamic-Flow-Capture" },
230 {0, NULL}
231 };
232
233 #define JUNIPER_IFLE_ATM_SNAP 2
234 #define JUNIPER_IFLE_ATM_NLPID 3
235 #define JUNIPER_IFLE_ATM_VCMUX 4
236 #define JUNIPER_IFLE_ATM_LLC 5
237 #define JUNIPER_IFLE_ATM_PPP_VCMUX 6
238 #define JUNIPER_IFLE_ATM_PPP_LLC 7
239 #define JUNIPER_IFLE_ATM_PPP_FUNI 8
240 #define JUNIPER_IFLE_ATM_CCC 9
241 #define JUNIPER_IFLE_FR_NLPID 10
242 #define JUNIPER_IFLE_FR_SNAP 11
243 #define JUNIPER_IFLE_FR_PPP 12
244 #define JUNIPER_IFLE_FR_CCC 13
245 #define JUNIPER_IFLE_ENET2 14
246 #define JUNIPER_IFLE_IEEE8023_SNAP 15
247 #define JUNIPER_IFLE_IEEE8023_LLC 16
248 #define JUNIPER_IFLE_PPP 17
249 #define JUNIPER_IFLE_CISCOHDLC 18
250 #define JUNIPER_IFLE_PPP_CCC 19
251 #define JUNIPER_IFLE_IPIP_NULL 20
252 #define JUNIPER_IFLE_PIM_NULL 21
253 #define JUNIPER_IFLE_GRE_NULL 22
254 #define JUNIPER_IFLE_GRE_PPP 23
255 #define JUNIPER_IFLE_PIMD_DECAPS 24
256 #define JUNIPER_IFLE_CISCOHDLC_CCC 25
257 #define JUNIPER_IFLE_ATM_CISCO_NLPID 26
258 #define JUNIPER_IFLE_VLAN_CCC 27
259 #define JUNIPER_IFLE_MLPPP 28
260 #define JUNIPER_IFLE_MLFR 29
261 #define JUNIPER_IFLE_LSI_NULL 30
262 #define JUNIPER_IFLE_AGGREGATE_UNUSED 31
263 #define JUNIPER_IFLE_ATM_CELLRELAY_CCC 32
264 #define JUNIPER_IFLE_CRYPTO 33
265 #define JUNIPER_IFLE_GGSN 34
266 #define JUNIPER_IFLE_ATM_TCC 35
267 #define JUNIPER_IFLE_FR_TCC 36
268 #define JUNIPER_IFLE_PPP_TCC 37
269 #define JUNIPER_IFLE_CISCOHDLC_TCC 38
270 #define JUNIPER_IFLE_ETHERNET_CCC 39
271 #define JUNIPER_IFLE_VT 40
272 #define JUNIPER_IFLE_ATM_EOA_LLC 41
273 #define JUNIPER_IFLE_EXTENDED_VLAN_CCC 42
274 #define JUNIPER_IFLE_ATM_SNAP_TCC 43
275 #define JUNIPER_IFLE_MONITOR 44
276 #define JUNIPER_IFLE_ETHERNET_TCC 45
277 #define JUNIPER_IFLE_VLAN_TCC 46
278 #define JUNIPER_IFLE_EXTENDED_VLAN_TCC 47
279 #define JUNIPER_IFLE_MFR 48
280 #define JUNIPER_IFLE_ETHERNET_VPLS 49
281 #define JUNIPER_IFLE_ETHERNET_VLAN_VPLS 50
282 #define JUNIPER_IFLE_ETHERNET_EXTENDED_VLAN_VPLS 51
283 #define JUNIPER_IFLE_SERVICES 52
284 #define JUNIPER_IFLE_ATM_ETHER_VPLS_ATM_LLC 53
285 #define JUNIPER_IFLE_FR_PORT_CCC 54
286 #define JUNIPER_IFLE_ATM_MLPPP_LLC 55
287 #define JUNIPER_IFLE_ATM_EOA_CCC 56
288 #define JUNIPER_IFLE_LT_VLAN 57
289 #define JUNIPER_IFLE_COLLECTOR 58
290 #define JUNIPER_IFLE_AGGREGATOR 59
291 #define JUNIPER_IFLE_LAPD 60
292 #define JUNIPER_IFLE_ATM_PPPOE_LLC 61
293 #define JUNIPER_IFLE_ETHERNET_PPPOE 62
294 #define JUNIPER_IFLE_PPPOE 63
295 #define JUNIPER_IFLE_PPP_SUBORDINATE 64
296 #define JUNIPER_IFLE_CISCOHDLC_SUBORDINATE 65
297 #define JUNIPER_IFLE_DFC 66
298 #define JUNIPER_IFLE_PICPEER 67
299
300 static const struct tok juniper_ifle_values[] = {
301 { JUNIPER_IFLE_AGGREGATOR, "Aggregator" },
302 { JUNIPER_IFLE_ATM_CCC, "CCC over ATM" },
303 { JUNIPER_IFLE_ATM_CELLRELAY_CCC, "ATM CCC Cell Relay" },
304 { JUNIPER_IFLE_ATM_CISCO_NLPID, "CISCO compatible NLPID" },
305 { JUNIPER_IFLE_ATM_EOA_CCC, "Ethernet over ATM CCC" },
306 { JUNIPER_IFLE_ATM_EOA_LLC, "Ethernet over ATM LLC" },
307 { JUNIPER_IFLE_ATM_ETHER_VPLS_ATM_LLC, "Ethernet VPLS over ATM LLC" },
308 { JUNIPER_IFLE_ATM_LLC, "ATM LLC" },
309 { JUNIPER_IFLE_ATM_MLPPP_LLC, "MLPPP over ATM LLC" },
310 { JUNIPER_IFLE_ATM_NLPID, "ATM NLPID" },
311 { JUNIPER_IFLE_ATM_PPPOE_LLC, "PPPoE over ATM LLC" },
312 { JUNIPER_IFLE_ATM_PPP_FUNI, "PPP over FUNI" },
313 { JUNIPER_IFLE_ATM_PPP_LLC, "PPP over ATM LLC" },
314 { JUNIPER_IFLE_ATM_PPP_VCMUX, "PPP over ATM VCMUX" },
315 { JUNIPER_IFLE_ATM_SNAP, "ATM SNAP" },
316 { JUNIPER_IFLE_ATM_SNAP_TCC, "ATM SNAP TCC" },
317 { JUNIPER_IFLE_ATM_TCC, "ATM VCMUX TCC" },
318 { JUNIPER_IFLE_ATM_VCMUX, "ATM VCMUX" },
319 { JUNIPER_IFLE_CISCOHDLC, "C-HDLC" },
320 { JUNIPER_IFLE_CISCOHDLC_CCC, "C-HDLC CCC" },
321 { JUNIPER_IFLE_CISCOHDLC_SUBORDINATE, "C-HDLC via dialer" },
322 { JUNIPER_IFLE_CISCOHDLC_TCC, "C-HDLC TCC" },
323 { JUNIPER_IFLE_COLLECTOR, "Collector" },
324 { JUNIPER_IFLE_CRYPTO, "Crypto" },
325 { JUNIPER_IFLE_ENET2, "Ethernet" },
326 { JUNIPER_IFLE_ETHERNET_CCC, "Ethernet CCC" },
327 { JUNIPER_IFLE_ETHERNET_EXTENDED_VLAN_VPLS, "Extended VLAN VPLS" },
328 { JUNIPER_IFLE_ETHERNET_PPPOE, "PPPoE over Ethernet" },
329 { JUNIPER_IFLE_ETHERNET_TCC, "Ethernet TCC" },
330 { JUNIPER_IFLE_ETHERNET_VLAN_VPLS, "VLAN VPLS" },
331 { JUNIPER_IFLE_ETHERNET_VPLS, "VPLS" },
332 { JUNIPER_IFLE_EXTENDED_VLAN_CCC, "Extended VLAN CCC" },
333 { JUNIPER_IFLE_EXTENDED_VLAN_TCC, "Extended VLAN TCC" },
334 { JUNIPER_IFLE_FR_CCC, "FR CCC" },
335 { JUNIPER_IFLE_FR_NLPID, "FR NLPID" },
336 { JUNIPER_IFLE_FR_PORT_CCC, "FR CCC" },
337 { JUNIPER_IFLE_FR_PPP, "FR PPP" },
338 { JUNIPER_IFLE_FR_SNAP, "FR SNAP" },
339 { JUNIPER_IFLE_FR_TCC, "FR TCC" },
340 { JUNIPER_IFLE_GGSN, "GGSN" },
341 { JUNIPER_IFLE_GRE_NULL, "GRE NULL" },
342 { JUNIPER_IFLE_GRE_PPP, "PPP over GRE" },
343 { JUNIPER_IFLE_IPIP_NULL, "IPIP" },
344 { JUNIPER_IFLE_LAPD, "LAPD" },
345 { JUNIPER_IFLE_LSI_NULL, "LSI Null" },
346 { JUNIPER_IFLE_LT_VLAN, "LT VLAN" },
347 { JUNIPER_IFLE_MFR, "MFR" },
348 { JUNIPER_IFLE_MLFR, "MLFR" },
349 { JUNIPER_IFLE_MLPPP, "MLPPP" },
350 { JUNIPER_IFLE_MONITOR, "Monitor" },
351 { JUNIPER_IFLE_PIMD_DECAPS, "PIMd" },
352 { JUNIPER_IFLE_PIM_NULL, "PIM Null" },
353 { JUNIPER_IFLE_PPP, "PPP" },
354 { JUNIPER_IFLE_PPPOE, "PPPoE" },
355 { JUNIPER_IFLE_PPP_CCC, "PPP CCC" },
356 { JUNIPER_IFLE_PPP_SUBORDINATE, "" },
357 { JUNIPER_IFLE_PPP_TCC, "PPP TCC" },
358 { JUNIPER_IFLE_SERVICES, "General Services" },
359 { JUNIPER_IFLE_VLAN_CCC, "VLAN CCC" },
360 { JUNIPER_IFLE_VLAN_TCC, "VLAN TCC" },
361 { JUNIPER_IFLE_VT, "VT" },
362 {0, NULL}
363 };
364
365 struct juniper_cookie_table_t {
366 u_int32_t pictype; /* pic type */
367 u_int8_t cookie_len; /* cookie len */
368 const char *s; /* pic name */
369 };
370
371 static const struct juniper_cookie_table_t juniper_cookie_table[] = {
372 #ifdef DLT_JUNIPER_ATM1
373 { DLT_JUNIPER_ATM1, 4, "ATM1"},
374 #endif
375 #ifdef DLT_JUNIPER_ATM2
376 { DLT_JUNIPER_ATM2, 8, "ATM2"},
377 #endif
378 #ifdef DLT_JUNIPER_MLPPP
379 { DLT_JUNIPER_MLPPP, 2, "MLPPP"},
380 #endif
381 #ifdef DLT_JUNIPER_MLFR
382 { DLT_JUNIPER_MLFR, 2, "MLFR"},
383 #endif
384 #ifdef DLT_JUNIPER_MFR
385 { DLT_JUNIPER_MFR, 4, "MFR"},
386 #endif
387 #ifdef DLT_JUNIPER_PPPOE
388 { DLT_JUNIPER_PPPOE, 0, "PPPoE"},
389 #endif
390 #ifdef DLT_JUNIPER_PPPOE_ATM
391 { DLT_JUNIPER_PPPOE_ATM, 0, "PPPoE ATM"},
392 #endif
393 #ifdef DLT_JUNIPER_GGSN
394 { DLT_JUNIPER_GGSN, 8, "GGSN"},
395 #endif
396 #ifdef DLT_JUNIPER_MONITOR
397 { DLT_JUNIPER_MONITOR, 8, "MONITOR"},
398 #endif
399 #ifdef DLT_JUNIPER_SERVICES
400 { DLT_JUNIPER_SERVICES, 8, "AS"},
401 #endif
402 #ifdef DLT_JUNIPER_ES
403 { DLT_JUNIPER_ES, 0, "ES"},
404 #endif
405 { 0, 0, NULL }
406 };
407
408 struct juniper_l2info_t {
409 u_int32_t length;
410 u_int32_t caplen;
411 u_int32_t pictype;
412 u_int8_t direction;
413 u_int8_t header_len;
414 u_int8_t cookie_len;
415 u_int8_t cookie_type;
416 u_int8_t cookie[8];
417 u_int8_t bundle;
418 u_int16_t proto;
419 u_int8_t flags;
420 };
421
422 #define LS_COOKIE_ID 0x54
423 #define AS_COOKIE_ID 0x47
424 #define LS_MLFR_COOKIE_LEN 4
425 #define ML_MLFR_COOKIE_LEN 2
426 #define LS_MFR_COOKIE_LEN 6
427 #define ATM1_COOKIE_LEN 4
428 #define ATM2_COOKIE_LEN 8
429
430 #define ATM2_PKT_TYPE_MASK 0x70
431 #define ATM2_GAP_COUNT_MASK 0x3F
432
433 #define JUNIPER_PROTO_NULL 1
434 #define JUNIPER_PROTO_IPV4 2
435 #define JUNIPER_PROTO_IPV6 6
436
437 #define MFR_BE_MASK 0xc0
438
439 static const struct tok juniper_protocol_values[] = {
440 { JUNIPER_PROTO_NULL, "Null" },
441 { JUNIPER_PROTO_IPV4, "IPv4" },
442 { JUNIPER_PROTO_IPV6, "IPv6" },
443 { 0, NULL}
444 };
445
446 int ip_heuristic_guess(register const u_char *, u_int);
447 int juniper_ppp_heuristic_guess(register const u_char *, u_int);
448 int juniper_read_tlv_value(const u_char *, u_int, u_int);
449 static int juniper_parse_header (const u_char *, const struct pcap_pkthdr *, struct juniper_l2info_t *);
450
451 #ifdef DLT_JUNIPER_GGSN
452 u_int
453 juniper_ggsn_print(const struct pcap_pkthdr *h, register const u_char *p)
454 {
455 struct juniper_l2info_t l2info;
456 struct juniper_ggsn_header {
457 u_int8_t svc_id;
458 u_int8_t flags_len;
459 u_int8_t proto;
460 u_int8_t flags;
461 u_int8_t vlan_id[2];
462 u_int8_t res[2];
463 };
464 const struct juniper_ggsn_header *gh;
465
466 l2info.pictype = DLT_JUNIPER_GGSN;
467 if(juniper_parse_header(p, h, &l2info) == 0)
468 return l2info.header_len;
469
470 p+=l2info.header_len;
471 gh = (struct juniper_ggsn_header *)&l2info.cookie;
472
473 if (eflag) {
474 printf("proto %s (%u), vlan %u: ",
475 tok2str(juniper_protocol_values,"Unknown",gh->proto),
476 gh->proto,
477 EXTRACT_16BITS(&gh->vlan_id[0]));
478 }
479
480 switch (gh->proto) {
481 case JUNIPER_PROTO_IPV4:
482 ip_print(gndo, p, l2info.length);
483 break;
484 #ifdef INET6
485 case JUNIPER_PROTO_IPV6:
486 ip6_print(gndo, p, l2info.length);
487 break;
488 #endif /* INET6 */
489 default:
490 if (!eflag)
491 printf("unknown GGSN proto (%u)", gh->proto);
492 }
493
494 return l2info.header_len;
495 }
496 #endif
497
498 #ifdef DLT_JUNIPER_ES
499 u_int
500 juniper_es_print(const struct pcap_pkthdr *h, register const u_char *p)
501 {
502 struct juniper_l2info_t l2info;
503 struct juniper_ipsec_header {
504 u_int8_t sa_index[2];
505 u_int8_t ttl;
506 u_int8_t type;
507 u_int8_t spi[4];
508 u_int8_t src_ip[4];
509 u_int8_t dst_ip[4];
510 };
511 u_int rewrite_len,es_type_bundle;
512 const struct juniper_ipsec_header *ih;
513
514 l2info.pictype = DLT_JUNIPER_ES;
515 if(juniper_parse_header(p, h, &l2info) == 0)
516 return l2info.header_len;
517
518 p+=l2info.header_len;
519 ih = (struct juniper_ipsec_header *)p;
520
521 switch (ih->type) {
522 case JUNIPER_IPSEC_O_ESP_ENCRYPT_ESP_AUTHEN_TYPE:
523 case JUNIPER_IPSEC_O_ESP_ENCRYPT_AH_AUTHEN_TYPE:
524 rewrite_len = 0;
525 es_type_bundle = 1;
526 break;
527 case JUNIPER_IPSEC_O_ESP_AUTHENTICATION_TYPE:
528 case JUNIPER_IPSEC_O_AH_AUTHENTICATION_TYPE:
529 case JUNIPER_IPSEC_O_ESP_ENCRYPTION_TYPE:
530 rewrite_len = 16;
531 es_type_bundle = 0;
532 break;
533 default:
534 printf("ES Invalid type %u, length %u",
535 ih->type,
536 l2info.length);
537 return l2info.header_len;
538 }
539
540 l2info.length-=rewrite_len;
541 p+=rewrite_len;
542
543 if (eflag) {
544 if (!es_type_bundle) {
545 printf("ES SA, index %u, ttl %u type %s (%u), spi %u, Tunnel %s > %s, length %u\n",
546 EXTRACT_16BITS(&ih->sa_index),
547 ih->ttl,
548 tok2str(juniper_ipsec_type_values,"Unknown",ih->type),
549 ih->type,
550 EXTRACT_32BITS(&ih->spi),
551 ipaddr_string(&ih->src_ip),
552 ipaddr_string(&ih->dst_ip),
553 l2info.length);
554 } else {
555 printf("ES SA, index %u, ttl %u type %s (%u), length %u\n",
556 EXTRACT_16BITS(&ih->sa_index),
557 ih->ttl,
558 tok2str(juniper_ipsec_type_values,"Unknown",ih->type),
559 ih->type,
560 l2info.length);
561 }
562 }
563
564 ip_print(gndo, p, l2info.length);
565 return l2info.header_len;
566 }
567 #endif
568
569 #ifdef DLT_JUNIPER_MONITOR
570 u_int
571 juniper_monitor_print(const struct pcap_pkthdr *h, register const u_char *p)
572 {
573 struct juniper_l2info_t l2info;
574 struct juniper_monitor_header {
575 u_int8_t pkt_type;
576 u_int8_t padding;
577 u_int8_t iif[2];
578 u_int8_t service_id[4];
579 };
580 const struct juniper_monitor_header *mh;
581
582 l2info.pictype = DLT_JUNIPER_MONITOR;
583 if(juniper_parse_header(p, h, &l2info) == 0)
584 return l2info.header_len;
585
586 p+=l2info.header_len;
587 mh = (struct juniper_monitor_header *)p;
588
589 if (eflag)
590 printf("service-id %u, iif %u, pkt-type %u: ",
591 EXTRACT_32BITS(&mh->service_id),
592 EXTRACT_16BITS(&mh->iif),
593 mh->pkt_type);
594
595 /* no proto field - lets guess by first byte of IP header*/
596 ip_heuristic_guess(p, l2info.length);
597
598 return l2info.header_len;
599 }
600 #endif
601
602 #ifdef DLT_JUNIPER_SERVICES
603 u_int
604 juniper_services_print(const struct pcap_pkthdr *h, register const u_char *p)
605 {
606 struct juniper_l2info_t l2info;
607 struct juniper_services_header {
608 u_int8_t svc_id;
609 u_int8_t flags_len;
610 u_int8_t svc_set_id[2];
611 u_int8_t dir_iif[4];
612 };
613 const struct juniper_services_header *sh;
614
615 l2info.pictype = DLT_JUNIPER_SERVICES;
616 if(juniper_parse_header(p, h, &l2info) == 0)
617 return l2info.header_len;
618
619 p+=l2info.header_len;
620 sh = (struct juniper_services_header *)p;
621
622 if (eflag)
623 printf("service-id %u flags 0x%02x service-set-id 0x%04x iif %u: ",
624 sh->svc_id,
625 sh->flags_len,
626 EXTRACT_16BITS(&sh->svc_set_id),
627 EXTRACT_24BITS(&sh->dir_iif[1]));
628
629 /* no proto field - lets guess by first byte of IP header*/
630 ip_heuristic_guess(p, l2info.length);
631
632 return l2info.header_len;
633 }
634 #endif
635
636 #ifdef DLT_JUNIPER_PPPOE
637 u_int
638 juniper_pppoe_print(const struct pcap_pkthdr *h, register const u_char *p)
639 {
640 struct juniper_l2info_t l2info;
641
642 l2info.pictype = DLT_JUNIPER_PPPOE;
643 if(juniper_parse_header(p, h, &l2info) == 0)
644 return l2info.header_len;
645
646 p+=l2info.header_len;
647 /* this DLT contains nothing but raw ethernet frames */
648 ether_print(gndo, p, l2info.length, l2info.caplen, NULL, NULL);
649 return l2info.header_len;
650 }
651 #endif
652
653 #ifdef DLT_JUNIPER_ETHER
654 u_int
655 juniper_ether_print(const struct pcap_pkthdr *h, register const u_char *p)
656 {
657 struct juniper_l2info_t l2info;
658
659 l2info.pictype = DLT_JUNIPER_ETHER;
660 if(juniper_parse_header(p, h, &l2info) == 0)
661 return l2info.header_len;
662
663 p+=l2info.header_len;
664 /* this DLT contains nothing but raw Ethernet frames */
665 ether_print(gndo, p, l2info.length, l2info.caplen, NULL, NULL);
666 return l2info.header_len;
667 }
668 #endif
669
670 #ifdef DLT_JUNIPER_PPP
671 u_int
672 juniper_ppp_print(const struct pcap_pkthdr *h, register const u_char *p)
673 {
674 struct juniper_l2info_t l2info;
675
676 l2info.pictype = DLT_JUNIPER_PPP;
677 if(juniper_parse_header(p, h, &l2info) == 0)
678 return l2info.header_len;
679
680 p+=l2info.header_len;
681 /* this DLT contains nothing but raw ppp frames */
682 ppp_print(p, l2info.length);
683 return l2info.header_len;
684 }
685 #endif
686
687 #ifdef DLT_JUNIPER_FRELAY
688 u_int
689 juniper_frelay_print(const struct pcap_pkthdr *h, register const u_char *p)
690 {
691 struct juniper_l2info_t l2info;
692
693 l2info.pictype = DLT_JUNIPER_FRELAY;
694 if(juniper_parse_header(p, h, &l2info) == 0)
695 return l2info.header_len;
696
697 p+=l2info.header_len;
698 /* this DLT contains nothing but raw frame-relay frames */
699 fr_print(gndo, p, l2info.length);
700 return l2info.header_len;
701 }
702 #endif
703
704 #ifdef DLT_JUNIPER_CHDLC
705 u_int
706 juniper_chdlc_print(const struct pcap_pkthdr *h, register const u_char *p)
707 {
708 struct juniper_l2info_t l2info;
709
710 l2info.pictype = DLT_JUNIPER_CHDLC;
711 if(juniper_parse_header(p, h, &l2info) == 0)
712 return l2info.header_len;
713
714 p+=l2info.header_len;
715 /* this DLT contains nothing but raw c-hdlc frames */
716 chdlc_print(gndo, p, l2info.length);
717 return l2info.header_len;
718 }
719 #endif
720
721 #ifdef DLT_JUNIPER_PPPOE_ATM
722 u_int
723 juniper_pppoe_atm_print(const struct pcap_pkthdr *h, register const u_char *p)
724 {
725 struct juniper_l2info_t l2info;
726 u_int16_t extracted_ethertype;
727
728 l2info.pictype = DLT_JUNIPER_PPPOE_ATM;
729 if(juniper_parse_header(p, h, &l2info) == 0)
730 return l2info.header_len;
731
732 p+=l2info.header_len;
733
734 extracted_ethertype = EXTRACT_16BITS(p);
735 /* this DLT contains nothing but raw PPPoE frames,
736 * prepended with a type field*/
737 if (ethertype_print(gndo, extracted_ethertype,
738 p+ETHERTYPE_LEN,
739 l2info.length-ETHERTYPE_LEN,
740 l2info.caplen-ETHERTYPE_LEN) == 0)
741 /* ether_type not known, probably it wasn't one */
742 printf("unknown ethertype 0x%04x", extracted_ethertype);
743
744 return l2info.header_len;
745 }
746 #endif
747
748 #ifdef DLT_JUNIPER_MLPPP
749 u_int
750 juniper_mlppp_print(const struct pcap_pkthdr *h, register const u_char *p)
751 {
752 struct juniper_l2info_t l2info;
753
754 l2info.pictype = DLT_JUNIPER_MLPPP;
755 if(juniper_parse_header(p, h, &l2info) == 0)
756 return l2info.header_len;
757
758 /* suppress Bundle-ID if frame was captured on a child-link
759 * best indicator if the cookie looks like a proto */
760 if (eflag &&
761 EXTRACT_16BITS(&l2info.cookie) != PPP_OSI &&
762 EXTRACT_16BITS(&l2info.cookie) != (PPP_ADDRESS << 8 | PPP_CONTROL))
763 printf("Bundle-ID %u: ",l2info.bundle);
764
765 p+=l2info.header_len;
766
767 /* first try the LSQ protos */
768 switch(l2info.proto) {
769 case JUNIPER_LSQ_L3_PROTO_IPV4:
770 /* IP traffic going to the RE would not have a cookie
771 * -> this must be incoming IS-IS over PPP
772 */
773 if (l2info.cookie[4] == (JUNIPER_LSQ_COOKIE_RE|JUNIPER_LSQ_COOKIE_DIR))
774 ppp_print(p, l2info.length);
775 else
776 ip_print(gndo, p, l2info.length);
777 return l2info.header_len;
778 #ifdef INET6
779 case JUNIPER_LSQ_L3_PROTO_IPV6:
780 ip6_print(gndo, p,l2info.length);
781 return l2info.header_len;
782 #endif
783 case JUNIPER_LSQ_L3_PROTO_MPLS:
784 mpls_print(gndo, p, l2info.length);
785 return l2info.header_len;
786 case JUNIPER_LSQ_L3_PROTO_ISO:
787 isoclns_print(gndo, p, l2info.length, l2info.caplen);
788 return l2info.header_len;
789 default:
790 break;
791 }
792
793 /* zero length cookie ? */
794 switch (EXTRACT_16BITS(&l2info.cookie)) {
795 case PPP_OSI:
796 ppp_print(p-2,l2info.length+2);
797 break;
798 case (PPP_ADDRESS << 8 | PPP_CONTROL): /* fall through */
799 default:
800 ppp_print(p,l2info.length);
801 break;
802 }
803
804 return l2info.header_len;
805 }
806 #endif
807
808
809 #ifdef DLT_JUNIPER_MFR
810 u_int
811 juniper_mfr_print(const struct pcap_pkthdr *h, register const u_char *p)
812 {
813 struct juniper_l2info_t l2info;
814
815 l2info.pictype = DLT_JUNIPER_MFR;
816 if(juniper_parse_header(p, h, &l2info) == 0)
817 return l2info.header_len;
818
819 p+=l2info.header_len;
820
821 /* child-link ? */
822 if (l2info.cookie_len == 0) {
823 mfr_print(gndo, p, l2info.length);
824 return l2info.header_len;
825 }
826
827 /* first try the LSQ protos */
828 if (l2info.cookie_len == AS_PIC_COOKIE_LEN) {
829 switch(l2info.proto) {
830 case JUNIPER_LSQ_L3_PROTO_IPV4:
831 ip_print(gndo, p, l2info.length);
832 return l2info.header_len;
833 #ifdef INET6
834 case JUNIPER_LSQ_L3_PROTO_IPV6:
835 ip6_print(gndo, p,l2info.length);
836 return l2info.header_len;
837 #endif
838 case JUNIPER_LSQ_L3_PROTO_MPLS:
839 mpls_print(gndo, p, l2info.length);
840 return l2info.header_len;
841 case JUNIPER_LSQ_L3_PROTO_ISO:
842 isoclns_print(gndo, p, l2info.length, l2info.caplen);
843 return l2info.header_len;
844 default:
845 break;
846 }
847 return l2info.header_len;
848 }
849
850 /* suppress Bundle-ID if frame was captured on a child-link */
851 if (eflag && EXTRACT_32BITS(l2info.cookie) != 1) printf("Bundle-ID %u, ",l2info.bundle);
852 switch (l2info.proto) {
853 case (LLCSAP_ISONS<<8 | LLCSAP_ISONS):
854 isoclns_print(gndo, p + 1, l2info.length - 1, l2info.caplen - 1);
855 break;
856 case (LLC_UI<<8 | NLPID_Q933):
857 case (LLC_UI<<8 | NLPID_IP):
858 case (LLC_UI<<8 | NLPID_IP6):
859 /* pass IP{4,6} to the OSI layer for proper link-layer printing */
860 isoclns_print(gndo, p - 1, l2info.length + 1, l2info.caplen + 1);
861 break;
862 default:
863 printf("unknown protocol 0x%04x, length %u",l2info.proto, l2info.length);
864 }
865
866 return l2info.header_len;
867 }
868 #endif
869
870 #ifdef DLT_JUNIPER_MLFR
871 u_int
872 juniper_mlfr_print(const struct pcap_pkthdr *h, register const u_char *p)
873 {
874 struct juniper_l2info_t l2info;
875
876 l2info.pictype = DLT_JUNIPER_MLFR;
877 if(juniper_parse_header(p, h, &l2info) == 0)
878 return l2info.header_len;
879
880 p+=l2info.header_len;
881
882 /* suppress Bundle-ID if frame was captured on a child-link */
883 if (eflag && EXTRACT_32BITS(l2info.cookie) != 1) printf("Bundle-ID %u, ",l2info.bundle);
884 switch (l2info.proto) {
885 case (LLC_UI):
886 case (LLC_UI<<8):
887 isoclns_print(gndo, p, l2info.length, l2info.caplen);
888 break;
889 case (LLC_UI<<8 | NLPID_Q933):
890 case (LLC_UI<<8 | NLPID_IP):
891 case (LLC_UI<<8 | NLPID_IP6):
892 /* pass IP{4,6} to the OSI layer for proper link-layer printing */
893 isoclns_print(gndo, p - 1, l2info.length + 1, l2info.caplen + 1);
894 break;
895 default:
896 printf("unknown protocol 0x%04x, length %u",l2info.proto, l2info.length);
897 }
898
899 return l2info.header_len;
900 }
901 #endif
902
903 /*
904 * ATM1 PIC cookie format
905 *
906 * +-----+-------------------------+-------------------------------+
907 * |fmtid| vc index | channel ID |
908 * +-----+-------------------------+-------------------------------+
909 */
910
911 #ifdef DLT_JUNIPER_ATM1
912 u_int
913 juniper_atm1_print(const struct pcap_pkthdr *h, register const u_char *p)
914 {
915 u_int16_t extracted_ethertype;
916
917 struct juniper_l2info_t l2info;
918
919 l2info.pictype = DLT_JUNIPER_ATM1;
920 if(juniper_parse_header(p, h, &l2info) == 0)
921 return l2info.header_len;
922
923 p+=l2info.header_len;
924
925 if (l2info.cookie[0] == 0x80) { /* OAM cell ? */
926 oam_print(gndo, p, l2info.length, ATM_OAM_NOHEC);
927 return l2info.header_len;
928 }
929
930 if (EXTRACT_24BITS(p) == 0xfefe03 || /* NLPID encaps ? */
931 EXTRACT_24BITS(p) == 0xaaaa03) { /* SNAP encaps ? */
932
933 if (llc_print(gndo, p, l2info.length, l2info.caplen, NULL, NULL,
934 &extracted_ethertype) != 0)
935 return l2info.header_len;
936 }
937
938 if (p[0] == 0x03) { /* Cisco style NLPID encaps ? */
939 isoclns_print(gndo, p + 1, l2info.length - 1, l2info.caplen - 1);
940 /* FIXME check if frame was recognized */
941 return l2info.header_len;
942 }
943
944 if(ip_heuristic_guess(p, l2info.length) != 0) /* last try - vcmux encaps ? */
945 return l2info.header_len;
946
947 return l2info.header_len;
948 }
949 #endif
950
951 /*
952 * ATM2 PIC cookie format
953 *
954 * +-------------------------------+---------+---+-----+-----------+
955 * | channel ID | reserv |AAL| CCRQ| gap cnt |
956 * +-------------------------------+---------+---+-----+-----------+
957 */
958
959 #ifdef DLT_JUNIPER_ATM2
960 u_int
961 juniper_atm2_print(const struct pcap_pkthdr *h, register const u_char *p)
962 {
963 u_int16_t extracted_ethertype;
964
965 struct juniper_l2info_t l2info;
966
967 l2info.pictype = DLT_JUNIPER_ATM2;
968 if(juniper_parse_header(p, h, &l2info) == 0)
969 return l2info.header_len;
970
971 p+=l2info.header_len;
972
973 if (l2info.cookie[7] & ATM2_PKT_TYPE_MASK) { /* OAM cell ? */
974 oam_print(gndo, p, l2info.length, ATM_OAM_NOHEC);
975 return l2info.header_len;
976 }
977
978 if (EXTRACT_24BITS(p) == 0xfefe03 || /* NLPID encaps ? */
979 EXTRACT_24BITS(p) == 0xaaaa03) { /* SNAP encaps ? */
980
981 if (llc_print(gndo, p, l2info.length, l2info.caplen, NULL, NULL,
982 &extracted_ethertype) != 0)
983 return l2info.header_len;
984 }
985
986 if (l2info.direction != JUNIPER_BPF_PKT_IN && /* ether-over-1483 encaps ? */
987 (EXTRACT_32BITS(l2info.cookie) & ATM2_GAP_COUNT_MASK)) {
988 ether_print(gndo, p, l2info.length, l2info.caplen, NULL, NULL);
989 return l2info.header_len;
990 }
991
992 if (p[0] == 0x03) { /* Cisco style NLPID encaps ? */
993 isoclns_print(gndo, p + 1, l2info.length - 1, l2info.caplen - 1);
994 /* FIXME check if frame was recognized */
995 return l2info.header_len;
996 }
997
998 if(juniper_ppp_heuristic_guess(p, l2info.length) != 0) /* PPPoA vcmux encaps ? */
999 return l2info.header_len;
1000
1001 if(ip_heuristic_guess(p, l2info.length) != 0) /* last try - vcmux encaps ? */
1002 return l2info.header_len;
1003
1004 return l2info.header_len;
1005 }
1006 #endif
1007
1008
1009 /* try to guess, based on all PPP protos that are supported in
1010 * a juniper router if the payload data is encapsulated using PPP */
1011 int
1012 juniper_ppp_heuristic_guess(register const u_char *p, u_int length) {
1013
1014 switch(EXTRACT_16BITS(p)) {
1015 case PPP_IP :
1016 case PPP_OSI :
1017 case PPP_MPLS_UCAST :
1018 case PPP_MPLS_MCAST :
1019 case PPP_IPCP :
1020 case PPP_OSICP :
1021 case PPP_MPLSCP :
1022 case PPP_LCP :
1023 case PPP_PAP :
1024 case PPP_CHAP :
1025 case PPP_ML :
1026 #ifdef INET6
1027 case PPP_IPV6 :
1028 case PPP_IPV6CP :
1029 #endif
1030 ppp_print(p, length);
1031 break;
1032
1033 default:
1034 return 0; /* did not find a ppp header */
1035 break;
1036 }
1037 return 1; /* we printed a ppp packet */
1038 }
1039
1040 int
1041 ip_heuristic_guess(register const u_char *p, u_int length) {
1042
1043 switch(p[0]) {
1044 case 0x45:
1045 case 0x46:
1046 case 0x47:
1047 case 0x48:
1048 case 0x49:
1049 case 0x4a:
1050 case 0x4b:
1051 case 0x4c:
1052 case 0x4d:
1053 case 0x4e:
1054 case 0x4f:
1055 ip_print(gndo, p, length);
1056 break;
1057 #ifdef INET6
1058 case 0x60:
1059 case 0x61:
1060 case 0x62:
1061 case 0x63:
1062 case 0x64:
1063 case 0x65:
1064 case 0x66:
1065 case 0x67:
1066 case 0x68:
1067 case 0x69:
1068 case 0x6a:
1069 case 0x6b:
1070 case 0x6c:
1071 case 0x6d:
1072 case 0x6e:
1073 case 0x6f:
1074 ip6_print(gndo, p, length);
1075 break;
1076 #endif
1077 default:
1078 return 0; /* did not find a ip header */
1079 break;
1080 }
1081 return 1; /* we printed an v4/v6 packet */
1082 }
1083
1084 int
1085 juniper_read_tlv_value(const u_char *p, u_int tlv_type, u_int tlv_len) {
1086
1087 int tlv_value;
1088
1089 /* TLVs < 128 are little endian encoded */
1090 if (tlv_type < 128) {
1091 switch (tlv_len) {
1092 case 1:
1093 tlv_value = *p;
1094 break;
1095 case 2:
1096 tlv_value = EXTRACT_LE_16BITS(p);
1097 break;
1098 case 3:
1099 tlv_value = EXTRACT_LE_24BITS(p);
1100 break;
1101 case 4:
1102 tlv_value = EXTRACT_LE_32BITS(p);
1103 break;
1104 default:
1105 tlv_value = -1;
1106 break;
1107 }
1108 } else {
1109 /* TLVs >= 128 are big endian encoded */
1110 switch (tlv_len) {
1111 case 1:
1112 tlv_value = *p;
1113 break;
1114 case 2:
1115 tlv_value = EXTRACT_16BITS(p);
1116 break;
1117 case 3:
1118 tlv_value = EXTRACT_24BITS(p);
1119 break;
1120 case 4:
1121 tlv_value = EXTRACT_32BITS(p);
1122 break;
1123 default:
1124 tlv_value = -1;
1125 break;
1126 }
1127 }
1128 return tlv_value;
1129 }
1130
1131 static int
1132 juniper_parse_header (const u_char *p, const struct pcap_pkthdr *h, struct juniper_l2info_t *l2info) {
1133
1134 const struct juniper_cookie_table_t *lp = juniper_cookie_table;
1135 u_int idx, jnx_ext_len, jnx_header_len = 0;
1136 u_int8_t tlv_type,tlv_len;
1137 u_int32_t control_word;
1138 int tlv_value;
1139 const u_char *tptr;
1140
1141
1142 l2info->header_len = 0;
1143 l2info->cookie_len = 0;
1144 l2info->proto = 0;
1145
1146
1147 l2info->length = h->len;
1148 l2info->caplen = h->caplen;
1149 TCHECK2(p[0],4);
1150 l2info->flags = p[3];
1151 l2info->direction = p[3]&JUNIPER_BPF_PKT_IN;
1152
1153 if (EXTRACT_24BITS(p) != JUNIPER_MGC_NUMBER) { /* magic number found ? */
1154 printf("no magic-number found!");
1155 return 0;
1156 }
1157
1158 if (eflag) /* print direction */
1159 printf("%3s ",tok2str(juniper_direction_values,"---",l2info->direction));
1160
1161 /* magic number + flags */
1162 jnx_header_len = 4;
1163
1164 if (vflag>1)
1165 printf("\n\tJuniper PCAP Flags [%s]",
1166 bittok2str(jnx_flag_values, "none", l2info->flags));
1167
1168 /* extensions present ? - calculate how much bytes to skip */
1169 if ((l2info->flags & JUNIPER_BPF_EXT ) == JUNIPER_BPF_EXT ) {
1170
1171 tptr = p+jnx_header_len;
1172
1173 /* ok to read extension length ? */
1174 TCHECK2(tptr[0], 2);
1175 jnx_ext_len = EXTRACT_16BITS(tptr);
1176 jnx_header_len += 2;
1177 tptr +=2;
1178
1179 /* nail up the total length -
1180 * just in case something goes wrong
1181 * with TLV parsing */
1182 jnx_header_len += jnx_ext_len;
1183
1184 if (vflag>1)
1185 printf(", PCAP Extension(s) total length %u",
1186 jnx_ext_len);
1187
1188 TCHECK2(tptr[0], jnx_ext_len);
1189 while (jnx_ext_len > JUNIPER_EXT_TLV_OVERHEAD) {
1190 tlv_type = *(tptr++);
1191 tlv_len = *(tptr++);
1192 tlv_value = 0;
1193
1194 /* sanity check */
1195 if (tlv_type == 0 || tlv_len == 0)
1196 break;
1197
1198 if (vflag>1)
1199 printf("\n\t %s Extension TLV #%u, length %u, value ",
1200 tok2str(jnx_ext_tlv_values,"Unknown",tlv_type),
1201 tlv_type,
1202 tlv_len);
1203
1204 tlv_value = juniper_read_tlv_value(tptr, tlv_type, tlv_len);
1205 switch (tlv_type) {
1206 case JUNIPER_EXT_TLV_IFD_NAME:
1207 /* FIXME */
1208 break;
1209 case JUNIPER_EXT_TLV_IFD_MEDIATYPE:
1210 case JUNIPER_EXT_TLV_TTP_IFD_MEDIATYPE:
1211 if (tlv_value != -1) {
1212 if (vflag>1)
1213 printf("%s (%u)",
1214 tok2str(juniper_ifmt_values, "Unknown", tlv_value),
1215 tlv_value);
1216 }
1217 break;
1218 case JUNIPER_EXT_TLV_IFL_ENCAPS:
1219 case JUNIPER_EXT_TLV_TTP_IFL_ENCAPS:
1220 if (tlv_value != -1) {
1221 if (vflag>1)
1222 printf("%s (%u)",
1223 tok2str(juniper_ifle_values, "Unknown", tlv_value),
1224 tlv_value);
1225 }
1226 break;
1227 case JUNIPER_EXT_TLV_IFL_IDX: /* fall through */
1228 case JUNIPER_EXT_TLV_IFL_UNIT:
1229 case JUNIPER_EXT_TLV_IFD_IDX:
1230 default:
1231 if (tlv_value != -1) {
1232 if (vflag>1)
1233 printf("%u",tlv_value);
1234 }
1235 break;
1236 }
1237
1238 tptr+=tlv_len;
1239 jnx_ext_len -= tlv_len+JUNIPER_EXT_TLV_OVERHEAD;
1240 }
1241
1242 if (vflag>1)
1243 printf("\n\t-----original packet-----\n\t");
1244 }
1245
1246 if ((l2info->flags & JUNIPER_BPF_NO_L2 ) == JUNIPER_BPF_NO_L2 ) {
1247 if (eflag)
1248 printf("no-L2-hdr, ");
1249
1250 /* there is no link-layer present -
1251 * perform the v4/v6 heuristics
1252 * to figure out what it is
1253 */
1254 TCHECK2(p[jnx_header_len+4],1);
1255 if(ip_heuristic_guess(p+jnx_header_len+4,l2info->length-(jnx_header_len+4)) == 0)
1256 printf("no IP-hdr found!");
1257
1258 l2info->header_len=jnx_header_len+4;
1259 return 0; /* stop parsing the output further */
1260
1261 }
1262 l2info->header_len = jnx_header_len;
1263 p+=l2info->header_len;
1264 l2info->length -= l2info->header_len;
1265 l2info->caplen -= l2info->header_len;
1266
1267 /* search through the cookie table and copy values matching for our PIC type */
1268 while (lp->s != NULL) {
1269 if (lp->pictype == l2info->pictype) {
1270
1271 l2info->cookie_len += lp->cookie_len;
1272
1273 switch (p[0]) {
1274 case LS_COOKIE_ID:
1275 l2info->cookie_type = LS_COOKIE_ID;
1276 l2info->cookie_len += 2;
1277 break;
1278 case AS_COOKIE_ID:
1279 l2info->cookie_type = AS_COOKIE_ID;
1280 l2info->cookie_len = 8;
1281 break;
1282
1283 default:
1284 l2info->bundle = l2info->cookie[0];
1285 break;
1286 }
1287
1288
1289 #ifdef DLT_JUNIPER_MFR
1290 /* MFR child links don't carry cookies */
1291 if (l2info->pictype == DLT_JUNIPER_MFR &&
1292 (p[0] & MFR_BE_MASK) == MFR_BE_MASK) {
1293 l2info->cookie_len = 0;
1294 }
1295 #endif
1296
1297 l2info->header_len += l2info->cookie_len;
1298 l2info->length -= l2info->cookie_len;
1299 l2info->caplen -= l2info->cookie_len;
1300
1301 if (eflag)
1302 printf("%s-PIC, cookie-len %u",
1303 lp->s,
1304 l2info->cookie_len);
1305
1306 if (l2info->cookie_len > 0) {
1307 TCHECK2(p[0],l2info->cookie_len);
1308 if (eflag)
1309 printf(", cookie 0x");
1310 for (idx = 0; idx < l2info->cookie_len; idx++) {
1311 l2info->cookie[idx] = p[idx]; /* copy cookie data */
1312 if (eflag) printf("%02x",p[idx]);
1313 }
1314 }
1315
1316 if (eflag) printf(": "); /* print demarc b/w L2/L3*/
1317
1318
1319 l2info->proto = EXTRACT_16BITS(p+l2info->cookie_len);
1320 break;
1321 }
1322 ++lp;
1323 }
1324 p+=l2info->cookie_len;
1325
1326 /* DLT_ specific parsing */
1327 switch(l2info->pictype) {
1328 #ifdef DLT_JUNIPER_MLPPP
1329 case DLT_JUNIPER_MLPPP:
1330 switch (l2info->cookie_type) {
1331 case LS_COOKIE_ID:
1332 l2info->bundle = l2info->cookie[1];
1333 break;
1334 case AS_COOKIE_ID:
1335 l2info->bundle = (EXTRACT_16BITS(&l2info->cookie[6])>>3)&0xfff;
1336 l2info->proto = (l2info->cookie[5])&JUNIPER_LSQ_L3_PROTO_MASK;
1337 break;
1338 default:
1339 l2info->bundle = l2info->cookie[0];
1340 break;
1341 }
1342 break;
1343 #endif
1344 #ifdef DLT_JUNIPER_MLFR
1345 case DLT_JUNIPER_MLFR:
1346 switch (l2info->cookie_type) {
1347 case LS_COOKIE_ID:
1348 l2info->bundle = l2info->cookie[1];
1349 l2info->proto = EXTRACT_16BITS(p);
1350 l2info->header_len += 2;
1351 l2info->length -= 2;
1352 l2info->caplen -= 2;
1353 break;
1354 case AS_COOKIE_ID:
1355 l2info->bundle = (EXTRACT_16BITS(&l2info->cookie[6])>>3)&0xfff;
1356 l2info->proto = (l2info->cookie[5])&JUNIPER_LSQ_L3_PROTO_MASK;
1357 break;
1358 default:
1359 l2info->bundle = l2info->cookie[0];
1360 l2info->header_len += 2;
1361 l2info->length -= 2;
1362 l2info->caplen -= 2;
1363 break;
1364 }
1365 break;
1366 #endif
1367 #ifdef DLT_JUNIPER_MFR
1368 case DLT_JUNIPER_MFR:
1369 switch (l2info->cookie_type) {
1370 case LS_COOKIE_ID:
1371 l2info->bundle = l2info->cookie[1];
1372 l2info->proto = EXTRACT_16BITS(p);
1373 l2info->header_len += 2;
1374 l2info->length -= 2;
1375 l2info->caplen -= 2;
1376 break;
1377 case AS_COOKIE_ID:
1378 l2info->bundle = (EXTRACT_16BITS(&l2info->cookie[6])>>3)&0xfff;
1379 l2info->proto = (l2info->cookie[5])&JUNIPER_LSQ_L3_PROTO_MASK;
1380 break;
1381 default:
1382 l2info->bundle = l2info->cookie[0];
1383 break;
1384 }
1385 break;
1386 #endif
1387 #ifdef DLT_JUNIPER_ATM2
1388 case DLT_JUNIPER_ATM2:
1389 TCHECK2(p[0],4);
1390 /* ATM cell relay control word present ? */
1391 if (l2info->cookie[7] & ATM2_PKT_TYPE_MASK) {
1392 control_word = EXTRACT_32BITS(p);
1393 /* some control word heuristics */
1394 switch(control_word) {
1395 case 0: /* zero control word */
1396 case 0x08000000: /* < JUNOS 7.4 control-word */
1397 case 0x08380000: /* cntl word plus cell length (56) >= JUNOS 7.4*/
1398 l2info->header_len += 4;
1399 break;
1400 default:
1401 break;
1402 }
1403
1404 if (eflag)
1405 printf("control-word 0x%08x ", control_word);
1406 }
1407 break;
1408 #endif
1409 #ifdef DLT_JUNIPER_GGSN
1410 case DLT_JUNIPER_GGSN:
1411 break;
1412 #endif
1413 #ifdef DLT_JUNIPER_ATM1
1414 case DLT_JUNIPER_ATM1:
1415 break;
1416 #endif
1417 #ifdef DLT_JUNIPER_PPP
1418 case DLT_JUNIPER_PPP:
1419 break;
1420 #endif
1421 #ifdef DLT_JUNIPER_CHDLC
1422 case DLT_JUNIPER_CHDLC:
1423 break;
1424 #endif
1425 #ifdef DLT_JUNIPER_ETHER
1426 case DLT_JUNIPER_ETHER:
1427 break;
1428 #endif
1429 #ifdef DLT_JUNIPER_FRELAY
1430 case DLT_JUNIPER_FRELAY:
1431 break;
1432 #endif
1433
1434 default:
1435 printf("Unknown Juniper DLT_ type %u: ", l2info->pictype);
1436 break;
1437 }
1438
1439 if (eflag > 1)
1440 printf("hlen %u, proto 0x%04x, ",l2info->header_len,l2info->proto);
1441
1442 return 1; /* everything went ok so far. continue parsing */
1443 trunc:
1444 printf("[|juniper_hdr], length %u",h->len);
1445 return 0;
1446 }
1447
1448
1449 /*
1450 * Local Variables:
1451 * c-style: whitesmith
1452 * c-basic-offset: 4
1453 * End:
1454 */