]> The Tcpdump Group git mirrors - tcpdump/blob - print-ppp.c
projects / tcpdump / blob
summary | shortlog | log | commit | commitdiff | tree
history | raw | HEAD
Make nd_uint8_t and nd_int8_t arrays, to catch direct references.
[tcpdump] / print-ppp.c
1 /*
2 * Copyright (c) 1990, 1991, 1993, 1994, 1995, 1996, 1997
3 * The Regents of the University of California. All rights reserved.
4 *
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that: (1) source code distributions
7 * retain the above copyright notice and this paragraph in its entirety, (2)
8 * distributions including binary code include the above copyright notice and
9 * this paragraph in its entirety in the documentation or other materials
10 * provided with the distribution, and (3) all advertising materials mentioning
11 * features or use of this software display the following acknowledgement:
12 * ``This product includes software developed by the University of California,
13 * Lawrence Berkeley Laboratory and its contributors.'' Neither the name of
14 * the University nor the names of its contributors may be used to endorse
15 * or promote products derived from this software without specific prior
16 * written permission.
17 * THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR IMPLIED
18 * WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED WARRANTIES OF
19 * MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.
20 *
21 * Extensively modified by Motonori Shindo (mshindo@mshindo.net) for more
22 * complete PPP support.
23 */
24
25 /* \summary: Point to Point Protocol (PPP) printer */
26
27 /*
28 * TODO:
29 * o resolve XXX as much as possible
30 * o MP support
31 * o BAP support
32 */
33
34 #ifdef HAVE_CONFIG_H
35 #include "config.h"
36 #endif
37
38 #include <netdissect-stdinc.h>
39
40 #ifdef __bsdi__
41 #include <net/slcompress.h>
42 #include <net/if_ppp.h>
43 #endif
44
45 #include <stdlib.h>
46
47 #include "netdissect.h"
48 #include "extract.h"
49 #include "addrtoname.h"
50 #include "ppp.h"
51 #include "chdlc.h"
52 #include "ethertype.h"
53 #include "oui.h"
54
55 /*
56 * The following constatns are defined by IANA. Please refer to
57 * http://www.isi.edu/in-notes/iana/assignments/ppp-numbers
58 * for the up-to-date information.
59 */
60
61 /* Protocol Codes defined in ppp.h */
62
63 static const struct tok ppptype2str[] = {
64 { PPP_IP, "IP" },
65 { PPP_OSI, "OSI" },
66 { PPP_NS, "NS" },
67 { PPP_DECNET, "DECNET" },
68 { PPP_APPLE, "APPLE" },
69 { PPP_IPX, "IPX" },
70 { PPP_VJC, "VJC IP" },
71 { PPP_VJNC, "VJNC IP" },
72 { PPP_BRPDU, "BRPDU" },
73 { PPP_STII, "STII" },
74 { PPP_VINES, "VINES" },
75 { PPP_MPLS_UCAST, "MPLS" },
76 { PPP_MPLS_MCAST, "MPLS" },
77 { PPP_COMP, "Compressed"},
78 { PPP_ML, "MLPPP"},
79 { PPP_IPV6, "IP6"},
80
81 { PPP_HELLO, "HELLO" },
82 { PPP_LUXCOM, "LUXCOM" },
83 { PPP_SNS, "SNS" },
84 { PPP_IPCP, "IPCP" },
85 { PPP_OSICP, "OSICP" },
86 { PPP_NSCP, "NSCP" },
87 { PPP_DECNETCP, "DECNETCP" },
88 { PPP_APPLECP, "APPLECP" },
89 { PPP_IPXCP, "IPXCP" },
90 { PPP_STIICP, "STIICP" },
91 { PPP_VINESCP, "VINESCP" },
92 { PPP_IPV6CP, "IP6CP" },
93 { PPP_MPLSCP, "MPLSCP" },
94
95 { PPP_LCP, "LCP" },
96 { PPP_PAP, "PAP" },
97 { PPP_LQM, "LQM" },
98 { PPP_CHAP, "CHAP" },
99 { PPP_EAP, "EAP" },
100 { PPP_SPAP, "SPAP" },
101 { PPP_SPAP_OLD, "Old-SPAP" },
102 { PPP_BACP, "BACP" },
103 { PPP_BAP, "BAP" },
104 { PPP_MPCP, "MLPPP-CP" },
105 { PPP_CCP, "CCP" },
106 { 0, NULL }
107 };
108
109 /* Control Protocols (LCP/IPCP/CCP etc.) Codes defined in RFC 1661 */
110
111 #define CPCODES_VEXT 0 /* Vendor-Specific (RFC2153) */
112 #define CPCODES_CONF_REQ 1 /* Configure-Request */
113 #define CPCODES_CONF_ACK 2 /* Configure-Ack */
114 #define CPCODES_CONF_NAK 3 /* Configure-Nak */
115 #define CPCODES_CONF_REJ 4 /* Configure-Reject */
116 #define CPCODES_TERM_REQ 5 /* Terminate-Request */
117 #define CPCODES_TERM_ACK 6 /* Terminate-Ack */
118 #define CPCODES_CODE_REJ 7 /* Code-Reject */
119 #define CPCODES_PROT_REJ 8 /* Protocol-Reject (LCP only) */
120 #define CPCODES_ECHO_REQ 9 /* Echo-Request (LCP only) */
121 #define CPCODES_ECHO_RPL 10 /* Echo-Reply (LCP only) */
122 #define CPCODES_DISC_REQ 11 /* Discard-Request (LCP only) */
123 #define CPCODES_ID 12 /* Identification (LCP only) RFC1570 */
124 #define CPCODES_TIME_REM 13 /* Time-Remaining (LCP only) RFC1570 */
125 #define CPCODES_RESET_REQ 14 /* Reset-Request (CCP only) RFC1962 */
126 #define CPCODES_RESET_REP 15 /* Reset-Reply (CCP only) */
127
128 static const struct tok cpcodes[] = {
129 {CPCODES_VEXT, "Vendor-Extension"}, /* RFC2153 */
130 {CPCODES_CONF_REQ, "Conf-Request"},
131 {CPCODES_CONF_ACK, "Conf-Ack"},
132 {CPCODES_CONF_NAK, "Conf-Nack"},
133 {CPCODES_CONF_REJ, "Conf-Reject"},
134 {CPCODES_TERM_REQ, "Term-Request"},
135 {CPCODES_TERM_ACK, "Term-Ack"},
136 {CPCODES_CODE_REJ, "Code-Reject"},
137 {CPCODES_PROT_REJ, "Prot-Reject"},
138 {CPCODES_ECHO_REQ, "Echo-Request"},
139 {CPCODES_ECHO_RPL, "Echo-Reply"},
140 {CPCODES_DISC_REQ, "Disc-Req"},
141 {CPCODES_ID, "Ident"}, /* RFC1570 */
142 {CPCODES_TIME_REM, "Time-Rem"}, /* RFC1570 */
143 {CPCODES_RESET_REQ, "Reset-Req"}, /* RFC1962 */
144 {CPCODES_RESET_REP, "Reset-Ack"}, /* RFC1962 */
145 {0, NULL}
146 };
147
148 /* LCP Config Options */
149
150 #define LCPOPT_VEXT 0
151 #define LCPOPT_MRU 1
152 #define LCPOPT_ACCM 2
153 #define LCPOPT_AP 3
154 #define LCPOPT_QP 4
155 #define LCPOPT_MN 5
156 #define LCPOPT_DEP6 6
157 #define LCPOPT_PFC 7
158 #define LCPOPT_ACFC 8
159 #define LCPOPT_FCSALT 9
160 #define LCPOPT_SDP 10
161 #define LCPOPT_NUMMODE 11
162 #define LCPOPT_DEP12 12
163 #define LCPOPT_CBACK 13
164 #define LCPOPT_DEP14 14
165 #define LCPOPT_DEP15 15
166 #define LCPOPT_DEP16 16
167 #define LCPOPT_MLMRRU 17
168 #define LCPOPT_MLSSNHF 18
169 #define LCPOPT_MLED 19
170 #define LCPOPT_PROP 20
171 #define LCPOPT_DCEID 21
172 #define LCPOPT_MPP 22
173 #define LCPOPT_LD 23
174 #define LCPOPT_LCPAOPT 24
175 #define LCPOPT_COBS 25
176 #define LCPOPT_PE 26
177 #define LCPOPT_MLHF 27
178 #define LCPOPT_I18N 28
179 #define LCPOPT_SDLOS 29
180 #define LCPOPT_PPPMUX 30
181
182 static const char *lcpconfopts[] = {
183 "Vend-Ext", /* (0) */
184 "MRU", /* (1) */
185 "ACCM", /* (2) */
186 "Auth-Prot", /* (3) */
187 "Qual-Prot", /* (4) */
188 "Magic-Num", /* (5) */
189 "deprecated(6)", /* used to be a Quality Protocol */
190 "PFC", /* (7) */
191 "ACFC", /* (8) */
192 "FCS-Alt", /* (9) */
193 "SDP", /* (10) */
194 "Num-Mode", /* (11) */
195 "deprecated(12)", /* used to be a Multi-Link-Procedure*/
196 "Call-Back", /* (13) */
197 "deprecated(14)", /* used to be a Connect-Time */
198 "deprecated(15)", /* used to be a Compund-Frames */
199 "deprecated(16)", /* used to be a Nominal-Data-Encap */
200 "MRRU", /* (17) */
201 "12-Bit seq #", /* (18) */
202 "End-Disc", /* (19) */
203 "Proprietary", /* (20) */
204 "DCE-Id", /* (21) */
205 "MP+", /* (22) */
206 "Link-Disc", /* (23) */
207 "LCP-Auth-Opt", /* (24) */
208 "COBS", /* (25) */
209 "Prefix-elision", /* (26) */
210 "Multilink-header-Form",/* (27) */
211 "I18N", /* (28) */
212 "SDL-over-SONET/SDH", /* (29) */
213 "PPP-Muxing", /* (30) */
214 };
215
216 #define NUM_LCPOPTS (sizeof lcpconfopts / sizeof lcpconfopts[0])
217
218 /* ECP - to be supported */
219
220 /* CCP Config Options */
221
222 #define CCPOPT_OUI 0 /* RFC1962 */
223 #define CCPOPT_PRED1 1 /* RFC1962 */
224 #define CCPOPT_PRED2 2 /* RFC1962 */
225 #define CCPOPT_PJUMP 3 /* RFC1962 */
226 /* 4-15 unassigned */
227 #define CCPOPT_HPPPC 16 /* RFC1962 */
228 #define CCPOPT_STACLZS 17 /* RFC1974 */
229 #define CCPOPT_MPPC 18 /* RFC2118 */
230 #define CCPOPT_GFZA 19 /* RFC1962 */
231 #define CCPOPT_V42BIS 20 /* RFC1962 */
232 #define CCPOPT_BSDCOMP 21 /* RFC1977 */
233 /* 22 unassigned */
234 #define CCPOPT_LZSDCP 23 /* RFC1967 */
235 #define CCPOPT_MVRCA 24 /* RFC1975 */
236 #define CCPOPT_DEC 25 /* RFC1976 */
237 #define CCPOPT_DEFLATE 26 /* RFC1979 */
238 /* 27-254 unassigned */
239 #define CCPOPT_RESV 255 /* RFC1962 */
240
241 static const struct tok ccpconfopts_values[] = {
242 { CCPOPT_OUI, "OUI" },
243 { CCPOPT_PRED1, "Pred-1" },
244 { CCPOPT_PRED2, "Pred-2" },
245 { CCPOPT_PJUMP, "Puddle" },
246 { CCPOPT_HPPPC, "HP-PPC" },
247 { CCPOPT_STACLZS, "Stac-LZS" },
248 { CCPOPT_MPPC, "MPPC" },
249 { CCPOPT_GFZA, "Gand-FZA" },
250 { CCPOPT_V42BIS, "V.42bis" },
251 { CCPOPT_BSDCOMP, "BSD-Comp" },
252 { CCPOPT_LZSDCP, "LZS-DCP" },
253 { CCPOPT_MVRCA, "MVRCA" },
254 { CCPOPT_DEC, "DEC" },
255 { CCPOPT_DEFLATE, "Deflate" },
256 { CCPOPT_RESV, "Reserved"},
257 {0, NULL}
258 };
259
260 /* BACP Config Options */
261
262 #define BACPOPT_FPEER 1 /* RFC2125 */
263
264 static const struct tok bacconfopts_values[] = {
265 { BACPOPT_FPEER, "Favored-Peer" },
266 {0, NULL}
267 };
268
269
270 /* SDCP - to be supported */
271
272 /* IPCP Config Options */
273 #define IPCPOPT_2ADDR 1 /* RFC1172, RFC1332 (deprecated) */
274 #define IPCPOPT_IPCOMP 2 /* RFC1332 */
275 #define IPCPOPT_ADDR 3 /* RFC1332 */
276 #define IPCPOPT_MOBILE4 4 /* RFC2290 */
277 #define IPCPOPT_PRIDNS 129 /* RFC1877 */
278 #define IPCPOPT_PRINBNS 130 /* RFC1877 */
279 #define IPCPOPT_SECDNS 131 /* RFC1877 */
280 #define IPCPOPT_SECNBNS 132 /* RFC1877 */
281
282 static const struct tok ipcpopt_values[] = {
283 { IPCPOPT_2ADDR, "IP-Addrs" },
284 { IPCPOPT_IPCOMP, "IP-Comp" },
285 { IPCPOPT_ADDR, "IP-Addr" },
286 { IPCPOPT_MOBILE4, "Home-Addr" },
287 { IPCPOPT_PRIDNS, "Pri-DNS" },
288 { IPCPOPT_PRINBNS, "Pri-NBNS" },
289 { IPCPOPT_SECDNS, "Sec-DNS" },
290 { IPCPOPT_SECNBNS, "Sec-NBNS" },
291 { 0, NULL }
292 };
293
294 #define IPCPOPT_IPCOMP_HDRCOMP 0x61 /* rfc3544 */
295 #define IPCPOPT_IPCOMP_MINLEN 14
296
297 static const struct tok ipcpopt_compproto_values[] = {
298 { PPP_VJC, "VJ-Comp" },
299 { IPCPOPT_IPCOMP_HDRCOMP, "IP Header Compression" },
300 { 0, NULL }
301 };
302
303 static const struct tok ipcpopt_compproto_subopt_values[] = {
304 { 1, "RTP-Compression" },
305 { 2, "Enhanced RTP-Compression" },
306 { 0, NULL }
307 };
308
309 /* IP6CP Config Options */
310 #define IP6CP_IFID 1
311
312 static const struct tok ip6cpopt_values[] = {
313 { IP6CP_IFID, "Interface-ID" },
314 { 0, NULL }
315 };
316
317 /* ATCP - to be supported */
318 /* OSINLCP - to be supported */
319 /* BVCP - to be supported */
320 /* BCP - to be supported */
321 /* IPXCP - to be supported */
322 /* MPLSCP - to be supported */
323
324 /* Auth Algorithms */
325
326 /* 0-4 Reserved (RFC1994) */
327 #define AUTHALG_CHAPMD5 5 /* RFC1994 */
328 #define AUTHALG_MSCHAP1 128 /* RFC2433 */
329 #define AUTHALG_MSCHAP2 129 /* RFC2795 */
330
331 static const struct tok authalg_values[] = {
332 { AUTHALG_CHAPMD5, "MD5" },
333 { AUTHALG_MSCHAP1, "MS-CHAPv1" },
334 { AUTHALG_MSCHAP2, "MS-CHAPv2" },
335 { 0, NULL }
336 };
337
338 /* FCS Alternatives - to be supported */
339
340 /* Multilink Endpoint Discriminator (RFC1717) */
341 #define MEDCLASS_NULL 0 /* Null Class */
342 #define MEDCLASS_LOCAL 1 /* Locally Assigned */
343 #define MEDCLASS_IPV4 2 /* Internet Protocol (IPv4) */
344 #define MEDCLASS_MAC 3 /* IEEE 802.1 global MAC address */
345 #define MEDCLASS_MNB 4 /* PPP Magic Number Block */
346 #define MEDCLASS_PSNDN 5 /* Public Switched Network Director Number */
347
348 /* PPP LCP Callback */
349 #define CALLBACK_AUTH 0 /* Location determined by user auth */
350 #define CALLBACK_DSTR 1 /* Dialing string */
351 #define CALLBACK_LID 2 /* Location identifier */
352 #define CALLBACK_E164 3 /* E.164 number */
353 #define CALLBACK_X500 4 /* X.500 distinguished name */
354 #define CALLBACK_CBCP 6 /* Location is determined during CBCP nego */
355
356 static const struct tok ppp_callback_values[] = {
357 { CALLBACK_AUTH, "UserAuth" },
358 { CALLBACK_DSTR, "DialString" },
359 { CALLBACK_LID, "LocalID" },
360 { CALLBACK_E164, "E.164" },
361 { CALLBACK_X500, "X.500" },
362 { CALLBACK_CBCP, "CBCP" },
363 { 0, NULL }
364 };
365
366 /* CHAP */
367
368 #define CHAP_CHAL 1
369 #define CHAP_RESP 2
370 #define CHAP_SUCC 3
371 #define CHAP_FAIL 4
372
373 static const struct tok chapcode_values[] = {
374 { CHAP_CHAL, "Challenge" },
375 { CHAP_RESP, "Response" },
376 { CHAP_SUCC, "Success" },
377 { CHAP_FAIL, "Fail" },
378 { 0, NULL}
379 };
380
381 /* PAP */
382
383 #define PAP_AREQ 1
384 #define PAP_AACK 2
385 #define PAP_ANAK 3
386
387 static const struct tok papcode_values[] = {
388 { PAP_AREQ, "Auth-Req" },
389 { PAP_AACK, "Auth-ACK" },
390 { PAP_ANAK, "Auth-NACK" },
391 { 0, NULL }
392 };
393
394 /* BAP */
395 #define BAP_CALLREQ 1
396 #define BAP_CALLRES 2
397 #define BAP_CBREQ 3
398 #define BAP_CBRES 4
399 #define BAP_LDQREQ 5
400 #define BAP_LDQRES 6
401 #define BAP_CSIND 7
402 #define BAP_CSRES 8
403
404 static u_int print_lcp_config_options(netdissect_options *, const u_char *p, u_int);
405 static u_int print_ipcp_config_options(netdissect_options *, const u_char *p, u_int);
406 static u_int print_ip6cp_config_options(netdissect_options *, const u_char *p, u_int);
407 static u_int print_ccp_config_options(netdissect_options *, const u_char *p, u_int);
408 static u_int print_bacp_config_options(netdissect_options *, const u_char *p, u_int);
409 static void handle_ppp(netdissect_options *, u_int proto, const u_char *p, u_int length);
410
411 /* generic Control Protocol (e.g. LCP, IPCP, CCP, etc.) handler */
412 static void
413 handle_ctrl_proto(netdissect_options *ndo,
414 u_int proto, const u_char *pptr, u_int length)
415 {
416 const char *typestr;
417 u_int code, len;
418 u_int (*pfunc)(netdissect_options *, const u_char *, u_int);
419 u_int x, j;
420 const u_char *tptr;
421
422 tptr=pptr;
423
424 typestr = tok2str(ppptype2str, "unknown ctrl-proto (0x%04x)", proto);
425 ND_PRINT((ndo, "%s, ", typestr));
426
427 if (length < 4) /* FIXME weak boundary checking */
428 goto trunc;
429 ND_TCHECK_2(tptr);
430
431 code = EXTRACT_U_1(tptr);
432 tptr++;
433
434 ND_PRINT((ndo, "%s (0x%02x), id %u, length %u",
435 tok2str(cpcodes, "Unknown Opcode",code),
436 code,
437 EXTRACT_U_1(tptr), /* ID */
438 length + 2));
439 tptr++;
440
441 if (!ndo->ndo_vflag)
442 return;
443
444 ND_TCHECK_2(tptr);
445 len = EXTRACT_BE_U_2(tptr);
446 tptr += 2;
447
448 if (len < 4) {
449 ND_PRINT((ndo, "\n\tencoded length %u (< 4))", len));
450 return;
451 }
452
453 if (len > length) {
454 ND_PRINT((ndo, "\n\tencoded length %u (> packet length %u))", len, length));
455 return;
456 }
457 length = len;
458
459 ND_PRINT((ndo, "\n\tencoded length %u (=Option(s) length %u)", len, len - 4));
460
461 if (length == 4)
462 return; /* there may be a NULL confreq etc. */
463
464 if (ndo->ndo_vflag > 1)
465 print_unknown_data(ndo, pptr - 2, "\n\t", 6);
466
467
468 switch (code) {
469 case CPCODES_VEXT:
470 if (length < 11)
471 break;
472 ND_TCHECK_4(tptr);
473 ND_PRINT((ndo, "\n\t Magic-Num 0x%08x", EXTRACT_BE_U_4(tptr)));
474 tptr += 4;
475 ND_TCHECK_3(tptr);
476 ND_PRINT((ndo, " Vendor: %s (%u)",
477 tok2str(oui_values,"Unknown",EXTRACT_BE_U_3(tptr)),
478 EXTRACT_BE_U_3(tptr)));
479 /* XXX: need to decode Kind and Value(s)? */
480 break;
481 case CPCODES_CONF_REQ:
482 case CPCODES_CONF_ACK:
483 case CPCODES_CONF_NAK:
484 case CPCODES_CONF_REJ:
485 x = len - 4; /* Code(1), Identifier(1) and Length(2) */
486 do {
487 switch (proto) {
488 case PPP_LCP:
489 pfunc = print_lcp_config_options;
490 break;
491 case PPP_IPCP:
492 pfunc = print_ipcp_config_options;
493 break;
494 case PPP_IPV6CP:
495 pfunc = print_ip6cp_config_options;
496 break;
497 case PPP_CCP:
498 pfunc = print_ccp_config_options;
499 break;
500 case PPP_BACP:
501 pfunc = print_bacp_config_options;
502 break;
503 default:
504 /*
505 * No print routine for the options for
506 * this protocol.
507 */
508 pfunc = NULL;
509 break;
510 }
511
512 if (pfunc == NULL) /* catch the above null pointer if unknown CP */
513 break;
514
515 if ((j = (*pfunc)(ndo, tptr, len)) == 0)
516 break;
517 x -= j;
518 tptr += j;
519 } while (x != 0);
520 break;
521
522 case CPCODES_TERM_REQ:
523 case CPCODES_TERM_ACK:
524 /* XXX: need to decode Data? */
525 break;
526 case CPCODES_CODE_REJ:
527 /* XXX: need to decode Rejected-Packet? */
528 break;
529 case CPCODES_PROT_REJ:
530 if (length < 6)
531 break;
532 ND_TCHECK_2(tptr);
533 ND_PRINT((ndo, "\n\t Rejected %s Protocol (0x%04x)",
534 tok2str(ppptype2str,"unknown", EXTRACT_BE_U_2(tptr)),
535 EXTRACT_BE_U_2(tptr)));
536 /* XXX: need to decode Rejected-Information? - hexdump for now */
537 if (len > 6) {
538 ND_PRINT((ndo, "\n\t Rejected Packet"));
539 print_unknown_data(ndo, tptr + 2, "\n\t ", len - 2);
540 }
541 break;
542 case CPCODES_ECHO_REQ:
543 case CPCODES_ECHO_RPL:
544 case CPCODES_DISC_REQ:
545 if (length < 8)
546 break;
547 ND_TCHECK_4(tptr);
548 ND_PRINT((ndo, "\n\t Magic-Num 0x%08x", EXTRACT_BE_U_4(tptr)));
549 /* XXX: need to decode Data? - hexdump for now */
550 if (len > 8) {
551 ND_PRINT((ndo, "\n\t -----trailing data-----"));
552 ND_TCHECK2(tptr[4], len - 8);
553 print_unknown_data(ndo, tptr + 4, "\n\t ", len - 8);
554 }
555 break;
556 case CPCODES_ID:
557 if (length < 8)
558 break;
559 ND_TCHECK_4(tptr);
560 ND_PRINT((ndo, "\n\t Magic-Num 0x%08x", EXTRACT_BE_U_4(tptr)));
561 /* RFC 1661 says this is intended to be human readable */
562 if (len > 8) {
563 ND_PRINT((ndo, "\n\t Message\n\t "));
564 if (fn_printn(ndo, tptr + 4, len - 4, ndo->ndo_snapend))
565 goto trunc;
566 }
567 break;
568 case CPCODES_TIME_REM:
569 if (length < 12)
570 break;
571 ND_TCHECK_4(tptr);
572 ND_PRINT((ndo, "\n\t Magic-Num 0x%08x", EXTRACT_BE_U_4(tptr)));
573 ND_TCHECK_4(tptr + 4);
574 ND_PRINT((ndo, ", Seconds-Remaining %us", EXTRACT_BE_U_4(tptr + 4)));
575 /* XXX: need to decode Message? */
576 break;
577 default:
578 /* XXX this is dirty but we do not get the
579 * original pointer passed to the begin
580 * the PPP packet */
581 if (ndo->ndo_vflag <= 1)
582 print_unknown_data(ndo, pptr - 2, "\n\t ", length + 2);
583 break;
584 }
585 return;
586
587 trunc:
588 ND_PRINT((ndo, "[|%s]", typestr));
589 }
590
591 /* LCP config options */
592 static u_int
593 print_lcp_config_options(netdissect_options *ndo,
594 const u_char *p, u_int length)
595 {
596 u_int opt, len;
597
598 if (length < 2)
599 return 0;
600 ND_TCHECK_2(p);
601 opt = EXTRACT_U_1(p);
602 len = EXTRACT_U_1(p + 1);
603 if (length < len)
604 return 0;
605 if (len < 2) {
606 if (opt < NUM_LCPOPTS)
607 ND_PRINT((ndo, "\n\t %s Option (0x%02x), length %u (length bogus, should be >= 2)",
608 lcpconfopts[opt], opt, len));
609 else
610 ND_PRINT((ndo, "\n\tunknown LCP option 0x%02x", opt));
611 return 0;
612 }
613 if (opt < NUM_LCPOPTS)
614 ND_PRINT((ndo, "\n\t %s Option (0x%02x), length %u", lcpconfopts[opt], opt, len));
615 else {
616 ND_PRINT((ndo, "\n\tunknown LCP option 0x%02x", opt));
617 return len;
618 }
619
620 switch (opt) {
621 case LCPOPT_VEXT:
622 if (len < 6) {
623 ND_PRINT((ndo, " (length bogus, should be >= 6)"));
624 return len;
625 }
626 ND_TCHECK_3(p + 2);
627 ND_PRINT((ndo, ": Vendor: %s (%u)",
628 tok2str(oui_values,"Unknown",EXTRACT_BE_U_3(p + 2)),
629 EXTRACT_BE_U_3(p + 2)));
630 #if 0
631 ND_TCHECK_1(p + 5);
632 ND_PRINT((ndo, ", kind: 0x%02x", EXTRACT_U_1(p + 5)));
633 ND_PRINT((ndo, ", Value: 0x"));
634 for (i = 0; i < len - 6; i++) {
635 ND_TCHECK_1(p + 6 + i);
636 ND_PRINT((ndo, "%02x", EXTRACT_U_1(p + 6 + i)));
637 }
638 #endif
639 break;
640 case LCPOPT_MRU:
641 if (len != 4) {
642 ND_PRINT((ndo, " (length bogus, should be = 4)"));
643 return len;
644 }
645 ND_TCHECK_2(p + 2);
646 ND_PRINT((ndo, ": %u", EXTRACT_BE_U_2(p + 2)));
647 break;
648 case LCPOPT_ACCM:
649 if (len != 6) {
650 ND_PRINT((ndo, " (length bogus, should be = 6)"));
651 return len;
652 }
653 ND_TCHECK_4(p + 2);
654 ND_PRINT((ndo, ": 0x%08x", EXTRACT_BE_U_4(p + 2)));
655 break;
656 case LCPOPT_AP:
657 if (len < 4) {
658 ND_PRINT((ndo, " (length bogus, should be >= 4)"));
659 return len;
660 }
661 ND_TCHECK_2(p + 2);
662 ND_PRINT((ndo, ": %s", tok2str(ppptype2str, "Unknown Auth Proto (0x04x)", EXTRACT_BE_U_2(p + 2))));
663
664 switch (EXTRACT_BE_U_2(p + 2)) {
665 case PPP_CHAP:
666 ND_TCHECK_1(p + 4);
667 ND_PRINT((ndo, ", %s", tok2str(authalg_values, "Unknown Auth Alg %u", EXTRACT_U_1(p + 4))));
668 break;
669 case PPP_PAP: /* fall through */
670 case PPP_EAP:
671 case PPP_SPAP:
672 case PPP_SPAP_OLD:
673 break;
674 default:
675 print_unknown_data(ndo, p, "\n\t", len);
676 }
677 break;
678 case LCPOPT_QP:
679 if (len < 4) {
680 ND_PRINT((ndo, " (length bogus, should be >= 4)"));
681 return 0;
682 }
683 ND_TCHECK_2(p + 2);
684 if (EXTRACT_BE_U_2(p + 2) == PPP_LQM)
685 ND_PRINT((ndo, ": LQR"));
686 else
687 ND_PRINT((ndo, ": unknown"));
688 break;
689 case LCPOPT_MN:
690 if (len != 6) {
691 ND_PRINT((ndo, " (length bogus, should be = 6)"));
692 return 0;
693 }
694 ND_TCHECK_4(p + 2);
695 ND_PRINT((ndo, ": 0x%08x", EXTRACT_BE_U_4(p + 2)));
696 break;
697 case LCPOPT_PFC:
698 break;
699 case LCPOPT_ACFC:
700 break;
701 case LCPOPT_LD:
702 if (len != 4) {
703 ND_PRINT((ndo, " (length bogus, should be = 4)"));
704 return 0;
705 }
706 ND_TCHECK_2(p + 2);
707 ND_PRINT((ndo, ": 0x%04x", EXTRACT_BE_U_2(p + 2)));
708 break;
709 case LCPOPT_CBACK:
710 if (len < 3) {
711 ND_PRINT((ndo, " (length bogus, should be >= 3)"));
712 return 0;
713 }
714 ND_PRINT((ndo, ": "));
715 ND_TCHECK_1(p + 2);
716 ND_PRINT((ndo, ": Callback Operation %s (%u)",
717 tok2str(ppp_callback_values, "Unknown", EXTRACT_U_1(p + 2)),
718 EXTRACT_U_1(p + 2)));
719 break;
720 case LCPOPT_MLMRRU:
721 if (len != 4) {
722 ND_PRINT((ndo, " (length bogus, should be = 4)"));
723 return 0;
724 }
725 ND_TCHECK_2(p + 2);
726 ND_PRINT((ndo, ": %u", EXTRACT_BE_U_2(p + 2)));
727 break;
728 case LCPOPT_MLED:
729 if (len < 3) {
730 ND_PRINT((ndo, " (length bogus, should be >= 3)"));
731 return 0;
732 }
733 ND_TCHECK_1(p + 2);
734 switch (EXTRACT_U_1(p + 2)) { /* class */
735 case MEDCLASS_NULL:
736 ND_PRINT((ndo, ": Null"));
737 break;
738 case MEDCLASS_LOCAL:
739 ND_PRINT((ndo, ": Local")); /* XXX */
740 break;
741 case MEDCLASS_IPV4:
742 if (len != 7) {
743 ND_PRINT((ndo, " (length bogus, should be = 7)"));
744 return 0;
745 }
746 ND_TCHECK_4(p + 3);
747 ND_PRINT((ndo, ": IPv4 %s", ipaddr_string(ndo, p + 3)));
748 break;
749 case MEDCLASS_MAC:
750 if (len != 9) {
751 ND_PRINT((ndo, " (length bogus, should be = 9)"));
752 return 0;
753 }
754 ND_TCHECK_6(p + 3);
755 ND_PRINT((ndo, ": MAC %s", etheraddr_string(ndo, p + 3)));
756 break;
757 case MEDCLASS_MNB:
758 ND_PRINT((ndo, ": Magic-Num-Block")); /* XXX */
759 break;
760 case MEDCLASS_PSNDN:
761 ND_PRINT((ndo, ": PSNDN")); /* XXX */
762 break;
763 default:
764 ND_PRINT((ndo, ": Unknown class %u", EXTRACT_U_1(p + 2)));
765 break;
766 }
767 break;
768
769 /* XXX: to be supported */
770 #if 0
771 case LCPOPT_DEP6:
772 case LCPOPT_FCSALT:
773 case LCPOPT_SDP:
774 case LCPOPT_NUMMODE:
775 case LCPOPT_DEP12:
776 case LCPOPT_DEP14:
777 case LCPOPT_DEP15:
778 case LCPOPT_DEP16:
779 case LCPOPT_MLSSNHF:
780 case LCPOPT_PROP:
781 case LCPOPT_DCEID:
782 case LCPOPT_MPP:
783 case LCPOPT_LCPAOPT:
784 case LCPOPT_COBS:
785 case LCPOPT_PE:
786 case LCPOPT_MLHF:
787 case LCPOPT_I18N:
788 case LCPOPT_SDLOS:
789 case LCPOPT_PPPMUX:
790 break;
791 #endif
792 default:
793 /*
794 * Unknown option; dump it as raw bytes now if we're
795 * not going to do so below.
796 */
797 if (ndo->ndo_vflag < 2)
798 print_unknown_data(ndo, p + 2, "\n\t ", len - 2);
799 break;
800 }
801
802 if (ndo->ndo_vflag > 1)
803 print_unknown_data(ndo, p + 2, "\n\t ", len - 2); /* exclude TLV header */
804
805 return len;
806
807 trunc:
808 ND_PRINT((ndo, "[|lcp]"));
809 return 0;
810 }
811
812 /* ML-PPP*/
813 static const struct tok ppp_ml_flag_values[] = {
814 { 0x80, "begin" },
815 { 0x40, "end" },
816 { 0, NULL }
817 };
818
819 static void
820 handle_mlppp(netdissect_options *ndo,
821 const u_char *p, u_int length)
822 {
823 if (!ndo->ndo_eflag)
824 ND_PRINT((ndo, "MLPPP, "));
825
826 if (length < 2) {
827 ND_PRINT((ndo, "[|mlppp]"));
828 return;
829 }
830 if (!ND_TTEST_2(p)) {
831 ND_PRINT((ndo, "[|mlppp]"));
832 return;
833 }
834
835 ND_PRINT((ndo, "seq 0x%03x, Flags [%s], length %u",
836 (EXTRACT_BE_U_2(p))&0x0fff, /* only support 12-Bit sequence space for now */
837 bittok2str(ppp_ml_flag_values, "none", EXTRACT_U_1(p) & 0xc0),
838 length));
839 }
840
841 /* CHAP */
842 static void
843 handle_chap(netdissect_options *ndo,
844 const u_char *p, u_int length)
845 {
846 u_int code, len;
847 u_int val_size, name_size, msg_size;
848 const u_char *p0;
849 u_int i;
850
851 p0 = p;
852 if (length < 1) {
853 ND_PRINT((ndo, "[|chap]"));
854 return;
855 } else if (length < 4) {
856 ND_TCHECK_1(p);
857 ND_PRINT((ndo, "[|chap 0x%02x]", EXTRACT_U_1(p)));
858 return;
859 }
860
861 ND_TCHECK_1(p);
862 code = EXTRACT_U_1(p);
863 ND_PRINT((ndo, "CHAP, %s (0x%02x)",
864 tok2str(chapcode_values,"unknown",code),
865 code));
866 p++;
867
868 ND_TCHECK_1(p);
869 ND_PRINT((ndo, ", id %u", EXTRACT_U_1(p))); /* ID */
870 p++;
871
872 ND_TCHECK_2(p);
873 len = EXTRACT_BE_U_2(p);
874 p += 2;
875
876 /*
877 * Note that this is a generic CHAP decoding routine. Since we
878 * don't know which flavor of CHAP (i.e. CHAP-MD5, MS-CHAPv1,
879 * MS-CHAPv2) is used at this point, we can't decode packet
880 * specifically to each algorithms. Instead, we simply decode
881 * the GCD (Gratest Common Denominator) for all algorithms.
882 */
883 switch (code) {
884 case CHAP_CHAL:
885 case CHAP_RESP:
886 if (length - (p - p0) < 1)
887 return;
888 ND_TCHECK_1(p);
889 val_size = EXTRACT_U_1(p); /* value size */
890 p++;
891 if (length - (p - p0) < val_size)
892 return;
893 ND_PRINT((ndo, ", Value "));
894 for (i = 0; i < val_size; i++) {
895 ND_TCHECK_1(p);
896 ND_PRINT((ndo, "%02x", EXTRACT_U_1(p)));
897 p++;
898 }
899 name_size = len - (p - p0);
900 ND_PRINT((ndo, ", Name "));
901 for (i = 0; i < name_size; i++) {
902 ND_TCHECK_1(p);
903 safeputchar(ndo, EXTRACT_U_1(p));
904 p++;
905 }
906 break;
907 case CHAP_SUCC:
908 case CHAP_FAIL:
909 msg_size = len - (p - p0);
910 ND_PRINT((ndo, ", Msg "));
911 for (i = 0; i< msg_size; i++) {
912 ND_TCHECK_1(p);
913 safeputchar(ndo, EXTRACT_U_1(p));
914 p++;
915 }
916 break;
917 }
918 return;
919
920 trunc:
921 ND_PRINT((ndo, "[|chap]"));
922 }
923
924 /* PAP (see RFC 1334) */
925 static void
926 handle_pap(netdissect_options *ndo,
927 const u_char *p, u_int length)
928 {
929 u_int code, len;
930 u_int peerid_len, passwd_len, msg_len;
931 const u_char *p0;
932 u_int i;
933
934 p0 = p;
935 if (length < 1) {
936 ND_PRINT((ndo, "[|pap]"));
937 return;
938 } else if (length < 4) {
939 ND_TCHECK_1(p);
940 ND_PRINT((ndo, "[|pap 0x%02x]", EXTRACT_U_1(p)));
941 return;
942 }
943
944 ND_TCHECK_1(p);
945 code = EXTRACT_U_1(p);
946 ND_PRINT((ndo, "PAP, %s (0x%02x)",
947 tok2str(papcode_values, "unknown", code),
948 code));
949 p++;
950
951 ND_TCHECK_1(p);
952 ND_PRINT((ndo, ", id %u", EXTRACT_U_1(p))); /* ID */
953 p++;
954
955 ND_TCHECK_2(p);
956 len = EXTRACT_BE_U_2(p);
957 p += 2;
958
959 if (len > length) {
960 ND_PRINT((ndo, ", length %u > packet size", len));
961 return;
962 }
963 length = len;
964 if (length < (size_t)(p - p0)) {
965 ND_PRINT((ndo, ", length %u < PAP header length", length));
966 return;
967 }
968
969 switch (code) {
970 case PAP_AREQ:
971 /* A valid Authenticate-Request is 6 or more octets long. */
972 if (len < 6)
973 goto trunc;
974 if (length - (p - p0) < 1)
975 return;
976 ND_TCHECK_1(p);
977 peerid_len = EXTRACT_U_1(p); /* Peer-ID Length */
978 p++;
979 if (length - (p - p0) < peerid_len)
980 return;
981 ND_PRINT((ndo, ", Peer "));
982 for (i = 0; i < peerid_len; i++) {
983 ND_TCHECK_1(p);
984 safeputchar(ndo, EXTRACT_U_1(p));
985 p++;
986 }
987
988 if (length - (p - p0) < 1)
989 return;
990 ND_TCHECK_1(p);
991 passwd_len = EXTRACT_U_1(p); /* Password Length */
992 p++;
993 if (length - (p - p0) < passwd_len)
994 return;
995 ND_PRINT((ndo, ", Name "));
996 for (i = 0; i < passwd_len; i++) {
997 ND_TCHECK_1(p);
998 safeputchar(ndo, EXTRACT_U_1(p));
999 p++;
1000 }
1001 break;
1002 case PAP_AACK:
1003 case PAP_ANAK:
1004 /* Although some implementations ignore truncation at
1005 * this point and at least one generates a truncated
1006 * packet, RFC 1334 section 2.2.2 clearly states that
1007 * both AACK and ANAK are at least 5 bytes long.
1008 */
1009 if (len < 5)
1010 goto trunc;
1011 if (length - (p - p0) < 1)
1012 return;
1013 ND_TCHECK_1(p);
1014 msg_len = EXTRACT_U_1(p); /* Msg-Length */
1015 p++;
1016 if (length - (p - p0) < msg_len)
1017 return;
1018 ND_PRINT((ndo, ", Msg "));
1019 for (i = 0; i< msg_len; i++) {
1020 ND_TCHECK_1(p);
1021 safeputchar(ndo, EXTRACT_U_1(p));
1022 p++;
1023 }
1024 break;
1025 }
1026 return;
1027
1028 trunc:
1029 ND_PRINT((ndo, "[|pap]"));
1030 }
1031
1032 /* BAP */
1033 static void
1034 handle_bap(netdissect_options *ndo _U_,
1035 const u_char *p _U_, u_int length _U_)
1036 {
1037 /* XXX: to be supported!! */
1038 }
1039
1040
1041 /* IPCP config options */
1042 static u_int
1043 print_ipcp_config_options(netdissect_options *ndo,
1044 const u_char *p, u_int length)
1045 {
1046 u_int opt, len;
1047 u_int compproto, ipcomp_subopttotallen, ipcomp_subopt, ipcomp_suboptlen;
1048
1049 if (length < 2)
1050 return 0;
1051 ND_TCHECK_2(p);
1052 opt = EXTRACT_U_1(p);
1053 len = EXTRACT_U_1(p + 1);
1054 if (length < len)
1055 return 0;
1056 if (len < 2) {
1057 ND_PRINT((ndo, "\n\t %s Option (0x%02x), length %u (length bogus, should be >= 2)",
1058 tok2str(ipcpopt_values,"unknown",opt),
1059 opt,
1060 len));
1061 return 0;
1062 }
1063
1064 ND_PRINT((ndo, "\n\t %s Option (0x%02x), length %u",
1065 tok2str(ipcpopt_values,"unknown",opt),
1066 opt,
1067 len));
1068
1069 switch (opt) {
1070 case IPCPOPT_2ADDR: /* deprecated */
1071 if (len != 10) {
1072 ND_PRINT((ndo, " (length bogus, should be = 10)"));
1073 return len;
1074 }
1075 ND_TCHECK_4(p + 6);
1076 ND_PRINT((ndo, ": src %s, dst %s",
1077 ipaddr_string(ndo, p + 2),
1078 ipaddr_string(ndo, p + 6)));
1079 break;
1080 case IPCPOPT_IPCOMP:
1081 if (len < 4) {
1082 ND_PRINT((ndo, " (length bogus, should be >= 4)"));
1083 return 0;
1084 }
1085 ND_TCHECK_2(p + 2);
1086 compproto = EXTRACT_BE_U_2(p + 2);
1087
1088 ND_PRINT((ndo, ": %s (0x%02x):",
1089 tok2str(ipcpopt_compproto_values, "Unknown", compproto),
1090 compproto));
1091
1092 switch (compproto) {
1093 case PPP_VJC:
1094 /* XXX: VJ-Comp parameters should be decoded */
1095 break;
1096 case IPCPOPT_IPCOMP_HDRCOMP:
1097 if (len < IPCPOPT_IPCOMP_MINLEN) {
1098 ND_PRINT((ndo, " (length bogus, should be >= %u)",
1099 IPCPOPT_IPCOMP_MINLEN));
1100 return 0;
1101 }
1102
1103 ND_TCHECK2(*(p + 2), IPCPOPT_IPCOMP_MINLEN);
1104 ND_PRINT((ndo, "\n\t TCP Space %u, non-TCP Space %u" \
1105 ", maxPeriod %u, maxTime %u, maxHdr %u",
1106 EXTRACT_BE_U_2(p + 4),
1107 EXTRACT_BE_U_2(p + 6),
1108 EXTRACT_BE_U_2(p + 8),
1109 EXTRACT_BE_U_2(p + 10),
1110 EXTRACT_BE_U_2(p + 12)));
1111
1112 /* suboptions present ? */
1113 if (len > IPCPOPT_IPCOMP_MINLEN) {
1114 ipcomp_subopttotallen = len - IPCPOPT_IPCOMP_MINLEN;
1115 p += IPCPOPT_IPCOMP_MINLEN;
1116
1117 ND_PRINT((ndo, "\n\t Suboptions, length %u", ipcomp_subopttotallen));
1118
1119 while (ipcomp_subopttotallen >= 2) {
1120 ND_TCHECK_2(p);
1121 ipcomp_subopt = EXTRACT_U_1(p);
1122 ipcomp_suboptlen = EXTRACT_U_1(p + 1);
1123
1124 /* sanity check */
1125 if (ipcomp_subopt == 0 ||
1126 ipcomp_suboptlen == 0 )
1127 break;
1128
1129 /* XXX: just display the suboptions for now */
1130 ND_PRINT((ndo, "\n\t\t%s Suboption #%u, length %u",
1131 tok2str(ipcpopt_compproto_subopt_values,
1132 "Unknown",
1133 ipcomp_subopt),
1134 ipcomp_subopt,
1135 ipcomp_suboptlen));
1136
1137 ipcomp_subopttotallen -= ipcomp_suboptlen;
1138 p += ipcomp_suboptlen;
1139 }
1140 }
1141 break;
1142 default:
1143 break;
1144 }
1145 break;
1146
1147 case IPCPOPT_ADDR: /* those options share the same format - fall through */
1148 case IPCPOPT_MOBILE4:
1149 case IPCPOPT_PRIDNS:
1150 case IPCPOPT_PRINBNS:
1151 case IPCPOPT_SECDNS:
1152 case IPCPOPT_SECNBNS:
1153 if (len != 6) {
1154 ND_PRINT((ndo, " (length bogus, should be = 6)"));
1155 return 0;
1156 }
1157 ND_TCHECK_4(p + 2);
1158 ND_PRINT((ndo, ": %s", ipaddr_string(ndo, p + 2)));
1159 break;
1160 default:
1161 /*
1162 * Unknown option; dump it as raw bytes now if we're
1163 * not going to do so below.
1164 */
1165 if (ndo->ndo_vflag < 2)
1166 print_unknown_data(ndo, p + 2, "\n\t ", len - 2);
1167 break;
1168 }
1169 if (ndo->ndo_vflag > 1)
1170 print_unknown_data(ndo, p + 2, "\n\t ", len - 2); /* exclude TLV header */
1171 return len;
1172
1173 trunc:
1174 ND_PRINT((ndo, "[|ipcp]"));
1175 return 0;
1176 }
1177
1178 /* IP6CP config options */
1179 static u_int
1180 print_ip6cp_config_options(netdissect_options *ndo,
1181 const u_char *p, u_int length)
1182 {
1183 u_int opt, len;
1184
1185 if (length < 2)
1186 return 0;
1187 ND_TCHECK_2(p);
1188 opt = EXTRACT_U_1(p);
1189 len = EXTRACT_U_1(p + 1);
1190 if (length < len)
1191 return 0;
1192 if (len < 2) {
1193 ND_PRINT((ndo, "\n\t %s Option (0x%02x), length %u (length bogus, should be >= 2)",
1194 tok2str(ip6cpopt_values,"unknown",opt),
1195 opt,
1196 len));
1197 return 0;
1198 }
1199
1200 ND_PRINT((ndo, "\n\t %s Option (0x%02x), length %u",
1201 tok2str(ip6cpopt_values,"unknown",opt),
1202 opt,
1203 len));
1204
1205 switch (opt) {
1206 case IP6CP_IFID:
1207 if (len != 10) {
1208 ND_PRINT((ndo, " (length bogus, should be = 10)"));
1209 return len;
1210 }
1211 ND_TCHECK_8(p + 2);
1212 ND_PRINT((ndo, ": %04x:%04x:%04x:%04x",
1213 EXTRACT_BE_U_2(p + 2),
1214 EXTRACT_BE_U_2(p + 4),
1215 EXTRACT_BE_U_2(p + 6),
1216 EXTRACT_BE_U_2(p + 8)));
1217 break;
1218 default:
1219 /*
1220 * Unknown option; dump it as raw bytes now if we're
1221 * not going to do so below.
1222 */
1223 if (ndo->ndo_vflag < 2)
1224 print_unknown_data(ndo, p + 2, "\n\t ", len - 2);
1225 break;
1226 }
1227 if (ndo->ndo_vflag > 1)
1228 print_unknown_data(ndo, p + 2, "\n\t ", len - 2); /* exclude TLV header */
1229
1230 return len;
1231
1232 trunc:
1233 ND_PRINT((ndo, "[|ip6cp]"));
1234 return 0;
1235 }
1236
1237
1238 /* CCP config options */
1239 static u_int
1240 print_ccp_config_options(netdissect_options *ndo,
1241 const u_char *p, u_int length)
1242 {
1243 u_int opt, len;
1244
1245 if (length < 2)
1246 return 0;
1247 ND_TCHECK_2(p);
1248 opt = EXTRACT_U_1(p);
1249 len = EXTRACT_U_1(p + 1);
1250 if (length < len)
1251 return 0;
1252 if (len < 2) {
1253 ND_PRINT((ndo, "\n\t %s Option (0x%02x), length %u (length bogus, should be >= 2)",
1254 tok2str(ccpconfopts_values, "Unknown", opt),
1255 opt,
1256 len));
1257 return 0;
1258 }
1259
1260 ND_PRINT((ndo, "\n\t %s Option (0x%02x), length %u",
1261 tok2str(ccpconfopts_values, "Unknown", opt),
1262 opt,
1263 len));
1264
1265 switch (opt) {
1266 case CCPOPT_BSDCOMP:
1267 if (len < 3) {
1268 ND_PRINT((ndo, " (length bogus, should be >= 3)"));
1269 return len;
1270 }
1271 ND_TCHECK_1(p + 2);
1272 ND_PRINT((ndo, ": Version: %u, Dictionary Bits: %u",
1273 EXTRACT_U_1(p + 2) >> 5,
1274 EXTRACT_U_1(p + 2) & 0x1f));
1275 break;
1276 case CCPOPT_MVRCA:
1277 if (len < 4) {
1278 ND_PRINT((ndo, " (length bogus, should be >= 4)"));
1279 return len;
1280 }
1281 ND_TCHECK_1(p + 3);
1282 ND_PRINT((ndo, ": Features: %u, PxP: %s, History: %u, #CTX-ID: %u",
1283 (EXTRACT_U_1(p + 2) & 0xc0) >> 6,
1284 (EXTRACT_U_1(p + 2) & 0x20) ? "Enabled" : "Disabled",
1285 EXTRACT_U_1(p + 2) & 0x1f,
1286 EXTRACT_U_1(p + 3)));
1287 break;
1288 case CCPOPT_DEFLATE:
1289 if (len < 4) {
1290 ND_PRINT((ndo, " (length bogus, should be >= 4)"));
1291 return len;
1292 }
1293 ND_TCHECK_1(p + 3);
1294 ND_PRINT((ndo, ": Window: %uK, Method: %s (0x%x), MBZ: %u, CHK: %u",
1295 (EXTRACT_U_1(p + 2) & 0xf0) >> 4,
1296 ((EXTRACT_U_1(p + 2) & 0x0f) == 8) ? "zlib" : "unknown",
1297 EXTRACT_U_1(p + 2) & 0x0f,
1298 (EXTRACT_U_1(p + 3) & 0xfc) >> 2,
1299 EXTRACT_U_1(p + 3) & 0x03));
1300 break;
1301
1302 /* XXX: to be supported */
1303 #if 0
1304 case CCPOPT_OUI:
1305 case CCPOPT_PRED1:
1306 case CCPOPT_PRED2:
1307 case CCPOPT_PJUMP:
1308 case CCPOPT_HPPPC:
1309 case CCPOPT_STACLZS:
1310 case CCPOPT_MPPC:
1311 case CCPOPT_GFZA:
1312 case CCPOPT_V42BIS:
1313 case CCPOPT_LZSDCP:
1314 case CCPOPT_DEC:
1315 case CCPOPT_RESV:
1316 break;
1317 #endif
1318 default:
1319 /*
1320 * Unknown option; dump it as raw bytes now if we're
1321 * not going to do so below.
1322 */
1323 if (ndo->ndo_vflag < 2)
1324 print_unknown_data(ndo, p + 2, "\n\t ", len - 2);
1325 break;
1326 }
1327 if (ndo->ndo_vflag > 1)
1328 print_unknown_data(ndo, p + 2, "\n\t ", len - 2); /* exclude TLV header */
1329
1330 return len;
1331
1332 trunc:
1333 ND_PRINT((ndo, "[|ccp]"));
1334 return 0;
1335 }
1336
1337 /* BACP config options */
1338 static u_int
1339 print_bacp_config_options(netdissect_options *ndo,
1340 const u_char *p, u_int length)
1341 {
1342 u_int opt, len;
1343
1344 if (length < 2)
1345 return 0;
1346 ND_TCHECK_2(p);
1347 opt = EXTRACT_U_1(p);
1348 len = EXTRACT_U_1(p + 1);
1349 if (length < len)
1350 return 0;
1351 if (len < 2) {
1352 ND_PRINT((ndo, "\n\t %s Option (0x%02x), length %u (length bogus, should be >= 2)",
1353 tok2str(bacconfopts_values, "Unknown", opt),
1354 opt,
1355 len));
1356 return 0;
1357 }
1358
1359 ND_PRINT((ndo, "\n\t %s Option (0x%02x), length %u",
1360 tok2str(bacconfopts_values, "Unknown", opt),
1361 opt,
1362 len));
1363
1364 switch (opt) {
1365 case BACPOPT_FPEER:
1366 if (len != 6) {
1367 ND_PRINT((ndo, " (length bogus, should be = 6)"));
1368 return len;
1369 }
1370 ND_TCHECK_4(p + 2);
1371 ND_PRINT((ndo, ": Magic-Num 0x%08x", EXTRACT_BE_U_4(p + 2)));
1372 break;
1373 default:
1374 /*
1375 * Unknown option; dump it as raw bytes now if we're
1376 * not going to do so below.
1377 */
1378 if (ndo->ndo_vflag < 2)
1379 print_unknown_data(ndo, p + 2, "\n\t ", len - 2);
1380 break;
1381 }
1382 if (ndo->ndo_vflag > 1)
1383 print_unknown_data(ndo, p + 2, "\n\t ", len - 2); /* exclude TLV header */
1384
1385 return len;
1386
1387 trunc:
1388 ND_PRINT((ndo, "[|bacp]"));
1389 return 0;
1390 }
1391
1392 static void
1393 ppp_hdlc(netdissect_options *ndo,
1394 const u_char *p, u_int length)
1395 {
1396 u_char *b, *t, c;
1397 const u_char *s;
1398 u_int i, proto;
1399 const void *se;
1400
1401 if (length == 0)
1402 return;
1403
1404 b = (u_char *)malloc(length);
1405 if (b == NULL)
1406 return;
1407
1408 /*
1409 * Unescape all the data into a temporary, private, buffer.
1410 * Do this so that we dont overwrite the original packet
1411 * contents.
1412 */
1413 for (s = p, t = b, i = length; i != 0 && ND_TTEST(*s); i--) {
1414 c = EXTRACT_U_1(s);
1415 s++;
1416 if (c == 0x7d) {
1417 if (i <= 1 || !ND_TTEST_1(s))
1418 break;
1419 i--;
1420 c = EXTRACT_U_1(s) ^ 0x20;
1421 s++;
1422 }
1423 *t++ = c;
1424 }
1425
1426 /*
1427 * Change the end pointer, so bounds checks work.
1428 */
1429 se = ndo->ndo_snapend;
1430 ndo->ndo_snapend = t;
1431 length = t - b;
1432
1433 /* now lets guess about the payload codepoint format */
1434 if (length < 1)
1435 goto trunc;
1436 proto = EXTRACT_U_1(b); /* start with a one-octet codepoint guess */
1437
1438 switch (proto) {
1439 case PPP_IP:
1440 ip_print(ndo, b + 1, length - 1);
1441 goto cleanup;
1442 case PPP_IPV6:
1443 ip6_print(ndo, b + 1, length - 1);
1444 goto cleanup;
1445 default: /* no luck - try next guess */
1446 break;
1447 }
1448
1449 if (length < 2)
1450 goto trunc;
1451 proto = EXTRACT_BE_U_2(b); /* next guess - load two octets */
1452
1453 switch (proto) {
1454 case (PPP_ADDRESS << 8 | PPP_CONTROL): /* looks like a PPP frame */
1455 if (length < 4)
1456 goto trunc;
1457 proto = EXTRACT_BE_U_2(b + 2); /* load the PPP proto-id */
1458 handle_ppp(ndo, proto, b + 4, length - 4);
1459 break;
1460 default: /* last guess - proto must be a PPP proto-id */
1461 handle_ppp(ndo, proto, b + 2, length - 2);
1462 break;
1463 }
1464
1465 cleanup:
1466 ndo->ndo_snapend = se;
1467 free(b);
1468 return;
1469
1470 trunc:
1471 ndo->ndo_snapend = se;
1472 free(b);
1473 ND_PRINT((ndo, "[|ppp]"));
1474 }
1475
1476
1477 /* PPP */
1478 static void
1479 handle_ppp(netdissect_options *ndo,
1480 u_int proto, const u_char *p, u_int length)
1481 {
1482 if ((proto & 0xff00) == 0x7e00) { /* is this an escape code ? */
1483 ppp_hdlc(ndo, p - 1, length);
1484 return;
1485 }
1486
1487 switch (proto) {
1488 case PPP_LCP: /* fall through */
1489 case PPP_IPCP:
1490 case PPP_OSICP:
1491 case PPP_MPLSCP:
1492 case PPP_IPV6CP:
1493 case PPP_CCP:
1494 case PPP_BACP:
1495 handle_ctrl_proto(ndo, proto, p, length);
1496 break;
1497 case PPP_ML:
1498 handle_mlppp(ndo, p, length);
1499 break;
1500 case PPP_CHAP:
1501 handle_chap(ndo, p, length);
1502 break;
1503 case PPP_PAP:
1504 handle_pap(ndo, p, length);
1505 break;
1506 case PPP_BAP: /* XXX: not yet completed */
1507 handle_bap(ndo, p, length);
1508 break;
1509 case ETHERTYPE_IP: /*XXX*/
1510 case PPP_VJNC:
1511 case PPP_IP:
1512 ip_print(ndo, p, length);
1513 break;
1514 case ETHERTYPE_IPV6: /*XXX*/
1515 case PPP_IPV6:
1516 ip6_print(ndo, p, length);
1517 break;
1518 case ETHERTYPE_IPX: /*XXX*/
1519 case PPP_IPX:
1520 ipx_print(ndo, p, length);
1521 break;
1522 case PPP_OSI:
1523 isoclns_print(ndo, p, length);
1524 break;
1525 case PPP_MPLS_UCAST:
1526 case PPP_MPLS_MCAST:
1527 mpls_print(ndo, p, length);
1528 break;
1529 case PPP_COMP:
1530 ND_PRINT((ndo, "compressed PPP data"));
1531 break;
1532 default:
1533 ND_PRINT((ndo, "%s ", tok2str(ppptype2str, "unknown PPP protocol (0x%04x)", proto)));
1534 print_unknown_data(ndo, p, "\n\t", length);
1535 break;
1536 }
1537 }
1538
1539 /* Standard PPP printer */
1540 u_int
1541 ppp_print(netdissect_options *ndo,
1542 register const u_char *p, u_int length)
1543 {
1544 u_int proto,ppp_header;
1545 u_int olen = length; /* _o_riginal length */
1546 u_int hdr_len = 0;
1547
1548 /*
1549 * Here, we assume that p points to the Address and Control
1550 * field (if they present).
1551 */
1552 if (length < 2)
1553 goto trunc;
1554 ND_TCHECK_2(p);
1555 ppp_header = EXTRACT_BE_U_2(p);
1556
1557 switch(ppp_header) {
1558 case (PPP_WITHDIRECTION_IN << 8 | PPP_CONTROL):
1559 if (ndo->ndo_eflag) ND_PRINT((ndo, "In "));
1560 p += 2;
1561 length -= 2;
1562 hdr_len += 2;
1563 break;
1564 case (PPP_WITHDIRECTION_OUT << 8 | PPP_CONTROL):
1565 if (ndo->ndo_eflag) ND_PRINT((ndo, "Out "));
1566 p += 2;
1567 length -= 2;
1568 hdr_len += 2;
1569 break;
1570 case (PPP_ADDRESS << 8 | PPP_CONTROL):
1571 p += 2; /* ACFC not used */
1572 length -= 2;
1573 hdr_len += 2;
1574 break;
1575
1576 default:
1577 break;
1578 }
1579
1580 if (length < 2)
1581 goto trunc;
1582 ND_TCHECK_1(p);
1583 if (EXTRACT_U_1(p) % 2) {
1584 proto = EXTRACT_U_1(p); /* PFC is used */
1585 p++;
1586 length--;
1587 hdr_len++;
1588 } else {
1589 ND_TCHECK_2(p);
1590 proto = EXTRACT_BE_U_2(p);
1591 p += 2;
1592 length -= 2;
1593 hdr_len += 2;
1594 }
1595
1596 if (ndo->ndo_eflag)
1597 ND_PRINT((ndo, "%s (0x%04x), length %u: ",
1598 tok2str(ppptype2str, "unknown", proto),
1599 proto,
1600 olen));
1601
1602 handle_ppp(ndo, proto, p, length);
1603 return (hdr_len);
1604 trunc:
1605 ND_PRINT((ndo, "[|ppp]"));
1606 return (0);
1607 }
1608
1609
1610 /* PPP I/F printer */
1611 u_int
1612 ppp_if_print(netdissect_options *ndo,
1613 const struct pcap_pkthdr *h, register const u_char *p)
1614 {
1615 register u_int length = h->len;
1616 register u_int caplen = h->caplen;
1617
1618 if (caplen < PPP_HDRLEN) {
1619 ND_PRINT((ndo, "[|ppp]"));
1620 return (caplen);
1621 }
1622
1623 #if 0
1624 /*
1625 * XXX: seems to assume that there are 2 octets prepended to an
1626 * actual PPP frame. The 1st octet looks like Input/Output flag
1627 * while 2nd octet is unknown, at least to me
1628 * (mshindo@mshindo.net).
1629 *
1630 * That was what the original tcpdump code did.
1631 *
1632 * FreeBSD's "if_ppp.c" *does* set the first octet to 1 for outbound
1633 * packets and 0 for inbound packets - but only if the
1634 * protocol field has the 0x8000 bit set (i.e., it's a network
1635 * control protocol); it does so before running the packet through
1636 * "bpf_filter" to see if it should be discarded, and to see
1637 * if we should update the time we sent the most recent packet...
1638 *
1639 * ...but it puts the original address field back after doing
1640 * so.
1641 *
1642 * NetBSD's "if_ppp.c" doesn't set the first octet in that fashion.
1643 *
1644 * I don't know if any PPP implementation handed up to a BPF
1645 * device packets with the first octet being 1 for outbound and
1646 * 0 for inbound packets, so I (guy@alum.mit.edu) don't know
1647 * whether that ever needs to be checked or not.
1648 *
1649 * Note that NetBSD has a DLT_PPP_SERIAL, which it uses for PPP,
1650 * and its tcpdump appears to assume that the frame always
1651 * begins with an address field and a control field, and that
1652 * the address field might be 0x0f or 0x8f, for Cisco
1653 * point-to-point with HDLC framing as per section 4.3.1 of RFC
1654 * 1547, as well as 0xff, for PPP in HDLC-like framing as per
1655 * RFC 1662.
1656 *
1657 * (Is the Cisco framing in question what DLT_C_HDLC, in
1658 * BSD/OS, is?)
1659 */
1660 if (ndo->ndo_eflag)
1661 ND_PRINT((ndo, "%c %4d %02x ", EXTRACT_U_1(p) ? 'O' : 'I',
1662 length, EXTRACT_U_1(p + 1)));
1663 #endif
1664
1665 ppp_print(ndo, p, length);
1666
1667 return (0);
1668 }
1669
1670 /*
1671 * PPP I/F printer to use if we know that RFC 1662-style PPP in HDLC-like
1672 * framing, or Cisco PPP with HDLC framing as per section 4.3.1 of RFC 1547,
1673 * is being used (i.e., we don't check for PPP_ADDRESS and PPP_CONTROL,
1674 * discard them *if* those are the first two octets, and parse the remaining
1675 * packet as a PPP packet, as "ppp_print()" does).
1676 *
1677 * This handles, for example, DLT_PPP_SERIAL in NetBSD.
1678 */
1679 u_int
1680 ppp_hdlc_if_print(netdissect_options *ndo,
1681 const struct pcap_pkthdr *h, register const u_char *p)
1682 {
1683 register u_int length = h->len;
1684 register u_int caplen = h->caplen;
1685 u_int proto;
1686 u_int hdrlen = 0;
1687
1688 if (caplen < 2) {
1689 ND_PRINT((ndo, "[|ppp]"));
1690 return (caplen);
1691 }
1692
1693 switch (EXTRACT_U_1(p)) {
1694
1695 case PPP_ADDRESS:
1696 if (caplen < 4 || length < 4) {
1697 ND_PRINT((ndo, "[|ppp]"));
1698 return (caplen);
1699 }
1700
1701 if (ndo->ndo_eflag)
1702 ND_PRINT((ndo, "%02x %02x %u ", EXTRACT_U_1(p),
1703 EXTRACT_U_1(p + 1), length));
1704 p += 2;
1705 length -= 2;
1706 hdrlen += 2;
1707
1708 proto = EXTRACT_BE_U_2(p);
1709 p += 2;
1710 length -= 2;
1711 hdrlen += 2;
1712 ND_PRINT((ndo, "%s: ", tok2str(ppptype2str, "unknown PPP protocol (0x%04x)", proto)));
1713
1714 handle_ppp(ndo, proto, p, length);
1715 break;
1716
1717 case CHDLC_UNICAST:
1718 case CHDLC_BCAST:
1719 return (chdlc_if_print(ndo, h, p));
1720
1721 default:
1722 if (caplen < 4) {
1723 ND_PRINT((ndo, "[|ppp]"));
1724 return (caplen);
1725 }
1726
1727 if (ndo->ndo_eflag)
1728 ND_PRINT((ndo, "%02x %02x %d ", EXTRACT_U_1(p),
1729 EXTRACT_U_1(p + 1), length));
1730 p += 2;
1731 hdrlen += 2;
1732
1733 /*
1734 * XXX - NetBSD's "ppp_netbsd_serial_if_print()" treats
1735 * the next two octets as an Ethernet type; does that
1736 * ever happen?
1737 */
1738 ND_PRINT((ndo, "unknown addr %02x; ctrl %02x", EXTRACT_U_1(p),
1739 EXTRACT_U_1(p + 1)));
1740 break;
1741 }
1742
1743 return (hdrlen);
1744 }
1745
1746 #define PPP_BSDI_HDRLEN 24
1747
1748 /* BSD/OS specific PPP printer */
1749 u_int
1750 ppp_bsdos_if_print(netdissect_options *ndo _U_,
1751 const struct pcap_pkthdr *h _U_, register const u_char *p _U_)
1752 {
1753 register u_int hdrlength;
1754 #ifdef __bsdi__
1755 register u_int length = h->len;
1756 register u_int caplen = h->caplen;
1757 uint16_t ptype;
1758 uint8_t llhl;
1759 const u_char *q;
1760 u_int i;
1761
1762 if (caplen < PPP_BSDI_HDRLEN) {
1763 ND_PRINT((ndo, "[|ppp]"));
1764 return (caplen)
1765 }
1766
1767 hdrlength = 0;
1768
1769 #if 0
1770 if (EXTRACT_U_1(p) == PPP_ADDRESS &&
1771 EXTRACT_U_1(p + 1) == PPP_CONTROL) {
1772 if (ndo->ndo_eflag)
1773 ND_PRINT((ndo, "%02x %02x ", EXTRACT_U_1(p),
1774 EXTRACT_U_1(p + 1)));
1775 p += 2;
1776 hdrlength = 2;
1777 }
1778
1779 if (ndo->ndo_eflag)
1780 ND_PRINT((ndo, "%d ", length));
1781 /* Retrieve the protocol type */
1782 if (EXTRACT_U_1(p) & 01) {
1783 /* Compressed protocol field */
1784 ptype = EXTRACT_U_1(p);
1785 if (ndo->ndo_eflag)
1786 ND_PRINT((ndo, "%02x ", ptype));
1787 p++;
1788 hdrlength += 1;
1789 } else {
1790 /* Un-compressed protocol field */
1791 ptype = EXTRACT_BE_U_2(p);
1792 if (ndo->ndo_eflag)
1793 ND_PRINT((ndo, "%04x ", ptype));
1794 p += 2;
1795 hdrlength += 2;
1796 }
1797 #else
1798 ptype = 0; /*XXX*/
1799 if (ndo->ndo_eflag)
1800 ND_PRINT((ndo, "%c ", EXTRACT_U_1(p + SLC_DIR) ? 'O' : 'I'));
1801 llhl = EXTRACT_U_1(p + SLC_LLHL);
1802 if (llhl) {
1803 /* link level header */
1804 struct ppp_header *ph;
1805
1806 q = p + SLC_BPFHDRLEN;
1807 ph = (struct ppp_header *)q;
1808 if (ph->phdr_addr == PPP_ADDRESS
1809 && ph->phdr_ctl == PPP_CONTROL) {
1810 if (ndo->ndo_eflag)
1811 ND_PRINT((ndo, "%02x %02x ", EXTRACT_U_1(q),
1812 EXTRACT_U_1(q + 1)));
1813 ptype = EXTRACT_BE_U_2(&ph->phdr_type);
1814 if (ndo->ndo_eflag && (ptype == PPP_VJC || ptype == PPP_VJNC)) {
1815 ND_PRINT((ndo, "%s ", tok2str(ppptype2str,
1816 "proto-#%d", ptype)));
1817 }
1818 } else {
1819 if (ndo->ndo_eflag) {
1820 ND_PRINT((ndo, "LLH=["));
1821 for (i = 0; i < llhl; i++)
1822 ND_PRINT((ndo, "%02x", EXTRACT_U_1(q + i)));
1823 ND_PRINT((ndo, "] "));
1824 }
1825 }
1826 }
1827 if (ndo->ndo_eflag)
1828 ND_PRINT((ndo, "%d ", length));
1829 if (EXTRACT_U_1(p + SLC_CHL)) {
1830 q = p + SLC_BPFHDRLEN + llhl;
1831
1832 switch (ptype) {
1833 case PPP_VJC:
1834 ptype = vjc_print(ndo, q, ptype);
1835 hdrlength = PPP_BSDI_HDRLEN;
1836 p += hdrlength;
1837 switch (ptype) {
1838 case PPP_IP:
1839 ip_print(ndo, p, length);
1840 break;
1841 case PPP_IPV6:
1842 ip6_print(ndo, p, length);
1843 break;
1844 case PPP_MPLS_UCAST:
1845 case PPP_MPLS_MCAST:
1846 mpls_print(ndo, p, length);
1847 break;
1848 }
1849 goto printx;
1850 case PPP_VJNC:
1851 ptype = vjc_print(ndo, q, ptype);
1852 hdrlength = PPP_BSDI_HDRLEN;
1853 p += hdrlength;
1854 switch (ptype) {
1855 case PPP_IP:
1856 ip_print(ndo, p, length);
1857 break;
1858 case PPP_IPV6:
1859 ip6_print(ndo, p, length);
1860 break;
1861 case PPP_MPLS_UCAST:
1862 case PPP_MPLS_MCAST:
1863 mpls_print(ndo, p, length);
1864 break;
1865 }
1866 goto printx;
1867 default:
1868 if (ndo->ndo_eflag) {
1869 ND_PRINT((ndo, "CH=["));
1870 for (i = 0; i < llhl; i++)
1871 ND_PRINT((ndo, "%02x",
1872 EXTRACT_U_1(q + i)));
1873 ND_PRINT((ndo, "] "));
1874 }
1875 break;
1876 }
1877 }
1878
1879 hdrlength = PPP_BSDI_HDRLEN;
1880 #endif
1881
1882 length -= hdrlength;
1883 p += hdrlength;
1884
1885 switch (ptype) {
1886 case PPP_IP:
1887 ip_print(p, length);
1888 break;
1889 case PPP_IPV6:
1890 ip6_print(ndo, p, length);
1891 break;
1892 case PPP_MPLS_UCAST:
1893 case PPP_MPLS_MCAST:
1894 mpls_print(ndo, p, length);
1895 break;
1896 default:
1897 ND_PRINT((ndo, "%s ", tok2str(ppptype2str, "unknown PPP protocol (0x%04x)", ptype)));
1898 }
1899
1900 printx:
1901 #else /* __bsdi */
1902 hdrlength = 0;
1903 #endif /* __bsdi__ */
1904 return (hdrlength);
1905 }
1906
1907
1908 /*
1909 * Local Variables:
1910 * c-style: whitesmith
1911 * c-basic-offset: 8
1912 * End:
1913 */
[mirror] the TCPdump network dissector