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