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