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