]> CyberLeo.Net >> Repos - FreeBSD/releng/7.2.git/blob - contrib/tcpdump/print-bootp.c
Create releng/7.2 from stable/7 in preparation for 7.2-RELEASE.
[FreeBSD/releng/7.2.git] / contrib / tcpdump / print-bootp.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  * Format and print bootp packets.
22  *
23  * $FreeBSD$
24  */
25 #ifndef lint
26 static const char rcsid[] _U_ =
27     "@(#) $Header: /tcpdump/master/tcpdump/print-bootp.c,v 1.78.2.9 2007/08/21 22:02:08 guy Exp $ (LBL)";
28 #endif
29
30 #ifdef HAVE_CONFIG_H
31 #include "config.h"
32 #endif
33
34 #include <tcpdump-stdinc.h>
35
36 #include <stdio.h>
37 #include <string.h>
38
39 #include "interface.h"
40 #include "addrtoname.h"
41 #include "extract.h"
42 #include "ether.h"
43 #include "bootp.h"
44
45 static void rfc1048_print(const u_char *);
46 static void cmu_print(const u_char *);
47 static char *client_fqdn_flags(u_int flags);
48
49 static char tstr[] = " [|bootp]";
50
51 static const struct tok bootp_flag_values[] = {
52     { 0x8000,                   "Broadcast" },
53     { 0, NULL}
54 };
55
56 static const struct tok bootp_op_values[] = {
57     { BOOTPREQUEST,             "Request" },
58     { BOOTPREPLY,               "Reply" },
59     { 0, NULL}
60 };
61
62 /*
63  * Print bootp requests
64  */
65 void
66 bootp_print(register const u_char *cp, u_int length)
67 {
68         register const struct bootp *bp;
69         static const u_char vm_cmu[4] = VM_CMU;
70         static const u_char vm_rfc1048[4] = VM_RFC1048;
71
72         bp = (const struct bootp *)cp;
73         TCHECK(bp->bp_op);
74
75         printf("BOOTP/DHCP, %s",
76                tok2str(bootp_op_values, "unknown (0x%02x)", bp->bp_op));
77
78         if (bp->bp_htype == 1 && bp->bp_hlen == 6 && bp->bp_op == BOOTPREQUEST) {
79                 TCHECK2(bp->bp_chaddr[0], 6);
80                 printf(" from %s", etheraddr_string(bp->bp_chaddr));
81         }
82
83         printf(", length %u", length);
84
85         if (!vflag)
86             return;
87
88         TCHECK(bp->bp_secs);
89
90         /* The usual hardware address type is 1 (10Mb Ethernet) */
91         if (bp->bp_htype != 1)
92                 printf(", htype %d", bp->bp_htype);
93
94         /* The usual length for 10Mb Ethernet address is 6 bytes */
95         if (bp->bp_htype != 1 || bp->bp_hlen != 6)
96                 printf(", hlen %d", bp->bp_hlen);
97
98         /* Only print interesting fields */
99         if (bp->bp_hops)
100                 printf(", hops %d", bp->bp_hops);
101         if (bp->bp_xid)
102                 printf(", xid 0x%x", EXTRACT_32BITS(&bp->bp_xid));
103         if (bp->bp_secs)
104                 printf(", secs %d", EXTRACT_16BITS(&bp->bp_secs));
105
106         printf(", Flags [%s]",
107                 bittok2str(bootp_flag_values, "none", EXTRACT_16BITS(&bp->bp_flags)));
108         if (vflag > 1)
109                 printf(" (0x%04x)", EXTRACT_16BITS(&bp->bp_flags));
110
111         /* Client's ip address */
112         TCHECK(bp->bp_ciaddr);
113         if (bp->bp_ciaddr.s_addr)
114                 printf("\n\t  Client-IP %s", ipaddr_string(&bp->bp_ciaddr));
115
116         /* 'your' ip address (bootp client) */
117         TCHECK(bp->bp_yiaddr);
118         if (bp->bp_yiaddr.s_addr)
119                 printf("\n\t  Your-IP %s", ipaddr_string(&bp->bp_yiaddr));
120
121         /* Server's ip address */
122         TCHECK(bp->bp_siaddr);
123         if (bp->bp_siaddr.s_addr)
124                 printf("\n\t  Server-IP %s", ipaddr_string(&bp->bp_siaddr));
125
126         /* Gateway's ip address */
127         TCHECK(bp->bp_giaddr);
128         if (bp->bp_giaddr.s_addr)
129                 printf("\n\t  Gateway-IP %s", ipaddr_string(&bp->bp_giaddr));
130
131         /* Client's Ethernet address */
132         if (bp->bp_htype == 1 && bp->bp_hlen == 6) {
133                 TCHECK2(bp->bp_chaddr[0], 6);
134                 printf("\n\t  Client-Ethernet-Address %s", etheraddr_string(bp->bp_chaddr));
135         }
136
137         TCHECK2(bp->bp_sname[0], 1);            /* check first char only */
138         if (*bp->bp_sname) {
139                 printf("\n\t  sname \"");
140                 if (fn_print(bp->bp_sname, snapend)) {
141                         putchar('"');
142                         fputs(tstr + 1, stdout);
143                         return;
144                 }
145                 putchar('"');
146         }
147         TCHECK2(bp->bp_file[0], 1);             /* check first char only */
148         if (*bp->bp_file) {
149                 printf("\n\t  file \"");
150                 if (fn_print(bp->bp_file, snapend)) {
151                         putchar('"');
152                         fputs(tstr + 1, stdout);
153                         return;
154                 }
155                 putchar('"');
156         }
157
158         /* Decode the vendor buffer */
159         TCHECK(bp->bp_vend[0]);
160         if (memcmp((const char *)bp->bp_vend, vm_rfc1048,
161                  sizeof(u_int32_t)) == 0)
162                 rfc1048_print(bp->bp_vend);
163         else if (memcmp((const char *)bp->bp_vend, vm_cmu,
164                       sizeof(u_int32_t)) == 0)
165                 cmu_print(bp->bp_vend);
166         else {
167                 u_int32_t ul;
168
169                 ul = EXTRACT_32BITS(&bp->bp_vend);
170                 if (ul != 0)
171                         printf("\n\t  Vendor-#0x%x", ul);
172         }
173
174         return;
175 trunc:
176         fputs(tstr, stdout);
177 }
178
179 /*
180  * The first character specifies the format to print:
181  *     i - ip address (32 bits)
182  *     p - ip address pairs (32 bits + 32 bits)
183  *     l - long (32 bits)
184  *     L - unsigned long (32 bits)
185  *     s - short (16 bits)
186  *     b - period-seperated decimal bytes (variable length)
187  *     x - colon-seperated hex bytes (variable length)
188  *     a - ascii string (variable length)
189  *     B - on/off (8 bits)
190  *     $ - special (explicit code to handle)
191  */
192 static struct tok tag2str[] = {
193 /* RFC1048 tags */
194         { TAG_PAD,              " PAD" },
195         { TAG_SUBNET_MASK,      "iSubnet-Mask" },       /* subnet mask (RFC950) */
196         { TAG_TIME_OFFSET,      "LTime-Zone" }, /* seconds from UTC */
197         { TAG_GATEWAY,          "iDefault-Gateway" },   /* default gateway */
198         { TAG_TIME_SERVER,      "iTime-Server" },       /* time servers (RFC868) */
199         { TAG_NAME_SERVER,      "iIEN-Name-Server" },   /* IEN name servers (IEN116) */
200         { TAG_DOMAIN_SERVER,    "iDomain-Name-Server" },        /* domain name (RFC1035) */
201         { TAG_LOG_SERVER,       "iLOG" },       /* MIT log servers */
202         { TAG_COOKIE_SERVER,    "iCS" },        /* cookie servers (RFC865) */
203         { TAG_LPR_SERVER,       "iLPR-Server" },        /* lpr server (RFC1179) */
204         { TAG_IMPRESS_SERVER,   "iIM" },        /* impress servers (Imagen) */
205         { TAG_RLP_SERVER,       "iRL" },        /* resource location (RFC887) */
206         { TAG_HOSTNAME,         "aHostname" },  /* ascii hostname */
207         { TAG_BOOTSIZE,         "sBS" },        /* 512 byte blocks */
208         { TAG_END,              " END" },
209 /* RFC1497 tags */
210         { TAG_DUMPPATH,         "aDP" },
211         { TAG_DOMAINNAME,       "aDomain-Name" },
212         { TAG_SWAP_SERVER,      "iSS" },
213         { TAG_ROOTPATH,         "aRP" },
214         { TAG_EXTPATH,          "aEP" },
215 /* RFC2132 tags */
216         { TAG_IP_FORWARD,       "BIPF" },
217         { TAG_NL_SRCRT,         "BSRT" },
218         { TAG_PFILTERS,         "pPF" },
219         { TAG_REASS_SIZE,       "sRSZ" },
220         { TAG_DEF_TTL,          "bTTL" },
221         { TAG_MTU_TIMEOUT,      "lMTU-Timeout" },
222         { TAG_MTU_TABLE,        "sMTU-Table" },
223         { TAG_INT_MTU,          "sMTU" },
224         { TAG_LOCAL_SUBNETS,    "BLSN" },
225         { TAG_BROAD_ADDR,       "iBR" },
226         { TAG_DO_MASK_DISC,     "BMD" },
227         { TAG_SUPPLY_MASK,      "BMS" },
228         { TAG_DO_RDISC,         "BRouter-Discovery" },
229         { TAG_RTR_SOL_ADDR,     "iRSA" },
230         { TAG_STATIC_ROUTE,     "pStatic-Route" },
231         { TAG_USE_TRAILERS,     "BUT" },
232         { TAG_ARP_TIMEOUT,      "lAT" },
233         { TAG_ETH_ENCAP,        "BIE" },
234         { TAG_TCP_TTL,          "bTT" },
235         { TAG_TCP_KEEPALIVE,    "lKI" },
236         { TAG_KEEPALIVE_GO,     "BKG" },
237         { TAG_NIS_DOMAIN,       "aYD" },
238         { TAG_NIS_SERVERS,      "iYS" },
239         { TAG_NTP_SERVERS,      "iNTP" },
240         { TAG_VENDOR_OPTS,      "bVendor-Option" },
241         { TAG_NETBIOS_NS,       "iNetbios-Name-Server" },
242         { TAG_NETBIOS_DDS,      "iWDD" },
243         { TAG_NETBIOS_NODE,     "$Netbios-Node" },
244         { TAG_NETBIOS_SCOPE,    "aNetbios-Scope" },
245         { TAG_XWIN_FS,          "iXFS" },
246         { TAG_XWIN_DM,          "iXDM" },
247         { TAG_NIS_P_DOMAIN,     "sN+D" },
248         { TAG_NIS_P_SERVERS,    "iN+S" },
249         { TAG_MOBILE_HOME,      "iMH" },
250         { TAG_SMPT_SERVER,      "iSMTP" },
251         { TAG_POP3_SERVER,      "iPOP3" },
252         { TAG_NNTP_SERVER,      "iNNTP" },
253         { TAG_WWW_SERVER,       "iWWW" },
254         { TAG_FINGER_SERVER,    "iFG" },
255         { TAG_IRC_SERVER,       "iIRC" },
256         { TAG_STREETTALK_SRVR,  "iSTS" },
257         { TAG_STREETTALK_STDA,  "iSTDA" },
258         { TAG_REQUESTED_IP,     "iRequested-IP" },
259         { TAG_IP_LEASE,         "lLease-Time" },
260         { TAG_OPT_OVERLOAD,     "$OO" },
261         { TAG_TFTP_SERVER,      "aTFTP" },
262         { TAG_BOOTFILENAME,     "aBF" },
263         { TAG_DHCP_MESSAGE,     " DHCP-Message" },
264         { TAG_SERVER_ID,        "iServer-ID" },
265         { TAG_PARM_REQUEST,     "bParameter-Request" },
266         { TAG_MESSAGE,          "aMSG" },
267         { TAG_MAX_MSG_SIZE,     "sMSZ" },
268         { TAG_RENEWAL_TIME,     "lRN" },
269         { TAG_REBIND_TIME,      "lRB" },
270         { TAG_VENDOR_CLASS,     "aVendor-Class" },
271         { TAG_CLIENT_ID,        "$Client-ID" },
272 /* RFC 2485 */
273         { TAG_OPEN_GROUP_UAP,   "aUAP" },
274 /* RFC 2563 */
275         { TAG_DISABLE_AUTOCONF, "BNOAUTO" },
276 /* RFC 2610 */
277         { TAG_SLP_DA,           "bSLP-DA" },    /*"b" is a little wrong */
278         { TAG_SLP_SCOPE,        "bSLP-SCOPE" }, /*"b" is a little wrong */
279 /* RFC 2937 */
280         { TAG_NS_SEARCH,        "sNSSEARCH" },  /* XXX 's' */
281 /* RFC 3011 */
282         { TAG_IP4_SUBNET_SELECT, "iSUBNET" },
283 /* RFC 3442 */
284         { TAG_CLASSLESS_STATIC_RT, "$Classless-Static-Route" },
285         { TAG_CLASSLESS_STA_RT_MS, "$Classless-Static-Route-Microsoft" },
286 /* http://www.iana.org/assignments/bootp-dhcp-extensions/index.htm */
287         { TAG_USER_CLASS,       "aCLASS" },
288         { TAG_SLP_NAMING_AUTH,  "aSLP-NA" },
289         { TAG_CLIENT_FQDN,      "$FQDN" },
290         { TAG_AGENT_CIRCUIT,    "$Agent-Information" },
291         { TAG_AGENT_REMOTE,     "bARMT" },
292         { TAG_AGENT_MASK,       "bAMSK" },
293         { TAG_TZ_STRING,        "aTZSTR" },
294         { TAG_FQDN_OPTION,      "bFQDNS" },     /* XXX 'b' */
295         { TAG_AUTH,             "bAUTH" },      /* XXX 'b' */
296         { TAG_VINES_SERVERS,    "iVINES" },
297         { TAG_SERVER_RANK,      "sRANK" },
298         { TAG_CLIENT_ARCH,      "sARCH" },
299         { TAG_CLIENT_NDI,       "bNDI" },       /* XXX 'b' */
300         { TAG_CLIENT_GUID,      "bGUID" },      /* XXX 'b' */
301         { TAG_LDAP_URL,         "aLDAP" },
302         { TAG_6OVER4,           "i6o4" },
303         { TAG_PRINTER_NAME,     "aPRTR" },
304         { TAG_MDHCP_SERVER,     "bMDHCP" },     /* XXX 'b' */
305         { TAG_IPX_COMPAT,       "bIPX" },       /* XXX 'b' */
306         { TAG_NETINFO_PARENT,   "iNI" },
307         { TAG_NETINFO_PARENT_TAG, "aNITAG" },
308         { TAG_URL,              "aURL" },
309         { TAG_FAILOVER,         "bFAIL" },      /* XXX 'b' */
310         { 0,                    NULL }
311 };
312 /* 2-byte extended tags */
313 static struct tok xtag2str[] = {
314         { 0,                    NULL }
315 };
316
317 /* DHCP "options overload" types */
318 static struct tok oo2str[] = {
319         { 1,                    "file" },
320         { 2,                    "sname" },
321         { 3,                    "file+sname" },
322         { 0,                    NULL }
323 };
324
325 /* NETBIOS over TCP/IP node type options */
326 static struct tok nbo2str[] = {
327         { 0x1,                  "b-node" },
328         { 0x2,                  "p-node" },
329         { 0x4,                  "m-node" },
330         { 0x8,                  "h-node" },
331         { 0,                    NULL }
332 };
333
334 /* ARP Hardware types, for Client-ID option */
335 static struct tok arp2str[] = {
336         { 0x1,                  "ether" },
337         { 0x6,                  "ieee802" },
338         { 0x7,                  "arcnet" },
339         { 0xf,                  "frelay" },
340         { 0x17,                 "strip" },
341         { 0x18,                 "ieee1394" },
342         { 0,                    NULL }
343 };
344
345 static struct tok dhcp_msg_values[] = {
346         { DHCPDISCOVER, "Discover" },
347         { DHCPOFFER, "Offer" },
348         { DHCPREQUEST, "Request" },
349         { DHCPDECLINE, "Decline" },
350         { DHCPACK, "ACK" },
351         { DHCPNAK, "NACK" },
352         { DHCPRELEASE, "Release" },
353         { DHCPINFORM, "Inform" },
354         { 0,                    NULL }
355 };
356
357 #define AGENT_SUBOPTION_CIRCUIT_ID 1
358 static struct tok agent_suboption_values[] = {
359         { AGENT_SUBOPTION_CIRCUIT_ID, "Circuit-ID" },
360         { 0,                    NULL }
361 };
362
363
364 static void
365 rfc1048_print(register const u_char *bp)
366 {
367         register u_int16_t tag;
368         register u_int len;
369         register const char *cp;
370         register char c;
371         int first, idx;
372         u_int32_t ul;
373         u_int16_t us;
374         u_int8_t uc, subopt, suboptlen;
375
376         printf("\n\t  Vendor-rfc1048 Extensions");
377
378         /* Step over magic cookie */
379         printf("\n\t    Magic Cookie 0x%08x", EXTRACT_32BITS(bp));
380         bp += sizeof(int32_t);
381
382         /* Loop while we there is a tag left in the buffer */
383         while (TTEST2(*bp, 1)) {
384                 tag = *bp++;
385                 if (tag == TAG_PAD && vflag < 3)
386                         continue;
387                 if (tag == TAG_END && vflag < 3)
388                         return;
389                 if (tag == TAG_EXTENDED_OPTION) {
390                         TCHECK2(*(bp + 1), 2);
391                         tag = EXTRACT_16BITS(bp + 1);
392                         /* XXX we don't know yet if the IANA will
393                          * preclude overlap of 1-byte and 2-byte spaces.
394                          * If not, we need to offset tag after this step.
395                          */
396                         cp = tok2str(xtag2str, "?xT%u", tag);
397                 } else
398                         cp = tok2str(tag2str, "?T%u", tag);
399                 c = *cp++;
400
401                 if (tag == TAG_PAD || tag == TAG_END)
402                         len = 0;
403                 else {
404                         /* Get the length; check for truncation */
405                         TCHECK2(*bp, 1);
406                         len = *bp++;
407                 }
408
409                 printf("\n\t    %s Option %u, length %u%s", cp, tag, len,
410                     len > 0 ? ": " : "");
411
412                 if (tag == TAG_PAD && vflag > 2) {
413                         u_int ntag = 1;
414                         while (TTEST2(*bp, 1) && *bp == TAG_PAD) {
415                                 bp++;
416                                 ntag++;
417                         }
418                         if (ntag > 1)
419                                 printf(", occurs %u", ntag);
420                 }
421
422                 if (!TTEST2(*bp, len)) {
423                         printf("[|rfc1048 %u]", len);
424                         return;
425                 }
426
427                 if (tag == TAG_DHCP_MESSAGE && len == 1) {
428                         uc = *bp++;
429                         printf("%s", tok2str(dhcp_msg_values, "Unknown (%u)", uc));
430                         continue;
431                 }
432
433                 if (tag == TAG_PARM_REQUEST) {
434                         idx = 0;
435                         while (len-- > 0) {
436                                 uc = *bp++;
437                                 cp = tok2str(tag2str, "?Option %u", uc);
438                                 if (idx % 4 == 0)
439                                         printf("\n\t      ");
440                                 else
441                                         printf(", ");
442                                 printf("%s", cp + 1);
443                                 idx++;
444                         }
445                         continue;
446                 }
447
448                 if (tag == TAG_EXTENDED_REQUEST) {
449                         first = 1;
450                         while (len > 1) {
451                                 len -= 2;
452                                 us = EXTRACT_16BITS(bp);
453                                 bp += 2;
454                                 cp = tok2str(xtag2str, "?xT%u", us);
455                                 if (!first)
456                                         putchar('+');
457                                 printf("%s", cp + 1);
458                                 first = 0;
459                         }
460                         continue;
461                 }
462
463                 /* Print data */
464                 if (c == '?') {
465                         /* Base default formats for unknown tags on data size */
466                         if (len & 1)
467                                 c = 'b';
468                         else if (len & 2)
469                                 c = 's';
470                         else
471                                 c = 'l';
472                 }
473                 first = 1;
474                 switch (c) {
475
476                 case 'a':
477                         /* ascii strings */
478                         putchar('"');
479                         if (fn_printn(bp, len, snapend)) {
480                                 putchar('"');
481                                 goto trunc;
482                         }
483                         putchar('"');
484                         bp += len;
485                         len = 0;
486                         break;
487
488                 case 'i':
489                 case 'l':
490                 case 'L':
491                         /* ip addresses/32-bit words */
492                         while (len >= sizeof(ul)) {
493                                 if (!first)
494                                         putchar(',');
495                                 ul = EXTRACT_32BITS(bp);
496                                 if (c == 'i') {
497                                         ul = htonl(ul);
498                                         printf("%s", ipaddr_string(&ul));
499                                 } else if (c == 'L')
500                                         printf("%d", ul);
501                                 else
502                                         printf("%u", ul);
503                                 bp += sizeof(ul);
504                                 len -= sizeof(ul);
505                                 first = 0;
506                         }
507                         break;
508
509                 case 'p':
510                         /* IP address pairs */
511                         while (len >= 2*sizeof(ul)) {
512                                 if (!first)
513                                         putchar(',');
514                                 memcpy((char *)&ul, (const char *)bp, sizeof(ul));
515                                 printf("(%s:", ipaddr_string(&ul));
516                                 bp += sizeof(ul);
517                                 memcpy((char *)&ul, (const char *)bp, sizeof(ul));
518                                 printf("%s)", ipaddr_string(&ul));
519                                 bp += sizeof(ul);
520                                 len -= 2*sizeof(ul);
521                                 first = 0;
522                         }
523                         break;
524
525                 case 's':
526                         /* shorts */
527                         while (len >= sizeof(us)) {
528                                 if (!first)
529                                         putchar(',');
530                                 us = EXTRACT_16BITS(bp);
531                                 printf("%u", us);
532                                 bp += sizeof(us);
533                                 len -= sizeof(us);
534                                 first = 0;
535                         }
536                         break;
537
538                 case 'B':
539                         /* boolean */
540                         while (len > 0) {
541                                 if (!first)
542                                         putchar(',');
543                                 switch (*bp) {
544                                 case 0:
545                                         putchar('N');
546                                         break;
547                                 case 1:
548                                         putchar('Y');
549                                         break;
550                                 default:
551                                         printf("%u?", *bp);
552                                         break;
553                                 }
554                                 ++bp;
555                                 --len;
556                                 first = 0;
557                         }
558                         break;
559
560                 case 'b':
561                 case 'x':
562                 default:
563                         /* Bytes */
564                         while (len > 0) {
565                                 if (!first)
566                                         putchar(c == 'x' ? ':' : '.');
567                                 if (c == 'x')
568                                         printf("%02x", *bp);
569                                 else
570                                         printf("%u", *bp);
571                                 ++bp;
572                                 --len;
573                                 first = 0;
574                         }
575                         break;
576
577                 case '$':
578                         /* Guys we can't handle with one of the usual cases */
579                         switch (tag) {
580
581                         case TAG_NETBIOS_NODE:
582                                 /* this option should be at least 1 byte long */
583                                 if (len < 1)  {
584                                         printf("ERROR: option %u len %u < 1 bytes",
585                                             TAG_NETBIOS_NODE, len);
586                                         bp += len;
587                                         len = 0;
588                                         break;
589                                 }
590                                 tag = *bp++;
591                                 --len;
592                                 fputs(tok2str(nbo2str, NULL, tag), stdout);
593                                 break;
594
595                         case TAG_OPT_OVERLOAD:
596                                 /* this option should be at least 1 byte long */
597                                 if (len < 1)  {
598                                         printf("ERROR: option %u len %u < 1 bytes",
599                                             TAG_OPT_OVERLOAD, len);
600                                         bp += len;
601                                         len = 0;
602                                         break;
603                                 }
604                                 tag = *bp++;
605                                 --len;
606                                 fputs(tok2str(oo2str, NULL, tag), stdout);
607                                 break;
608
609                         case TAG_CLIENT_FQDN:
610                                 /* this option should be at least 3 bytes long */
611                                 if (len < 3)  {
612                                         printf("ERROR: option %u len %u < 3 bytes",
613                                             TAG_CLIENT_FQDN, len);
614                                         bp += len;
615                                         len = 0;
616                                         break;
617                                 }
618                                 if (*bp)
619                                         printf("[%s] ", client_fqdn_flags(*bp));
620                                 bp++;
621                                 if (*bp || *(bp+1))
622                                         printf("%u/%u ", *bp, *(bp+1));
623                                 bp += 2;
624                                 putchar('"');
625                                 if (fn_printn(bp, len - 3, snapend)) {
626                                         putchar('"');
627                                         goto trunc;
628                                 }
629                                 putchar('"');
630                                 bp += len - 3;
631                                 len = 0;
632                                 break;
633
634                         case TAG_CLIENT_ID:
635                             {   int type;
636
637                                 /* this option should be at least 1 byte long */
638                                 if (len < 1)  {
639                                         printf("ERROR: option %u len %u < 1 bytes",
640                                             TAG_CLIENT_ID, len);
641                                         bp += len;
642                                         len = 0;
643                                         break;
644                                 }
645                                 type = *bp++;
646                                 len--;
647                                 if (type == 0) {
648                                         putchar('"');
649                                         if (fn_printn(bp, len, snapend)) {
650                                                 putchar('"');
651                                                 goto trunc;
652                                         }
653                                         putchar('"');
654                                         bp += len;
655                                         len = 0;
656                                         break;
657                                 } else {
658                                         printf("%s ", tok2str(arp2str, "hardware-type %u,", type));
659                                         while (len > 0) {
660                                                 if (!first)
661                                                         putchar(':');
662                                                 printf("%02x", *bp);
663                                                 ++bp;
664                                                 --len;
665                                                 first = 0;
666                                         }
667                                 }
668                                 break;
669                             }
670
671                         case TAG_AGENT_CIRCUIT:
672                                 while (len >= 2) {
673                                         subopt = *bp++;
674                                         suboptlen = *bp++;
675                                         len -= 2;
676                                         if (suboptlen > len) {
677                                                 printf("\n\t      %s SubOption %u, length %u: length goes past end of option",
678                                                    tok2str(agent_suboption_values, "Unknown", subopt),
679                                                    subopt,
680                                                    suboptlen);
681                                                 bp += len;
682                                                 len = 0;
683                                                 break;
684                                         }
685                                         printf("\n\t      %s SubOption %u, length %u: ",
686                                            tok2str(agent_suboption_values, "Unknown", subopt),
687                                            subopt,
688                                            suboptlen);
689                                         switch (subopt) {
690
691                                         case AGENT_SUBOPTION_CIRCUIT_ID:
692                                                 fn_printn(bp, suboptlen, NULL);
693                                                 break;
694
695                                         default:
696                                                 print_unknown_data(bp, "\n\t\t", suboptlen);
697                                         }
698
699                                         len -= suboptlen;
700                                         bp += suboptlen;
701                             }
702                             break;
703
704                         case TAG_CLASSLESS_STATIC_RT:
705                         case TAG_CLASSLESS_STA_RT_MS:
706                         {       
707                                 u_int mask_width, significant_octets, i;
708
709                                 /* this option should be at least 5 bytes long */
710                                 if (len < 5)  {
711                                         printf("ERROR: option %u len %u < 5 bytes",
712                                             TAG_CLASSLESS_STATIC_RT, len);
713                                         bp += len;
714                                         len = 0;
715                                         break;
716                                 }
717                                 while (len > 0) {
718                                         if (!first)
719                                                 putchar(',');
720                                         mask_width = *bp++;
721                                         len--;
722                                         /* mask_width <= 32 */
723                                         if (mask_width > 32) {
724                                                 printf("[ERROR: Mask width (%d) > 32]",  mask_width);
725                                                 bp += len;
726                                                 len = 0;
727                                                 break;
728                                         }
729                                         significant_octets = (mask_width + 7) / 8;
730                                         /* significant octets + router(4) */
731                                         if (len < significant_octets + 4) {
732                                                 printf("[ERROR: Remaining length (%u) < %u bytes]",  len, significant_octets + 4);
733                                                 bp += len;
734                                                 len = 0;
735                                                 break;
736                                         }
737                                         putchar('(');
738                                         if (mask_width == 0)
739                                                 printf("default");
740                                         else {
741                                                 for (i = 0; i < significant_octets ; i++) {
742                                                         if (i > 0)
743                                                                 putchar('.');
744                                                         printf("%d", *bp++);
745                                                 }
746                                                 for (i = significant_octets ; i < 4 ; i++)
747                                                         printf(".0");
748                                                 printf("/%d", mask_width);
749                                         }
750                                         memcpy((char *)&ul, (const char *)bp, sizeof(ul));
751                                         printf(":%s)", ipaddr_string(&ul));
752                                         bp += sizeof(ul);
753                                         len -= (significant_octets + 4);
754                                         first = 0;
755                                 }
756                         }
757                         break;
758
759                         default:
760                                 printf("[unknown special tag %u, size %u]",
761                                     tag, len);
762                                 bp += len;
763                                 len = 0;
764                                 break;
765                         }
766                         break;
767                 }
768                 /* Data left over? */
769                 if (len) {
770                         printf("\n\t  trailing data length %u", len);
771                         bp += len;
772                 }
773         }
774         return;
775 trunc:
776         printf("|[rfc1048]");
777 }
778
779 static void
780 cmu_print(register const u_char *bp)
781 {
782         register const struct cmu_vend *cmu;
783
784 #define PRINTCMUADDR(m, s) { TCHECK(cmu->m); \
785     if (cmu->m.s_addr != 0) \
786         printf(" %s:%s", s, ipaddr_string(&cmu->m.s_addr)); }
787
788         printf(" vend-cmu");
789         cmu = (const struct cmu_vend *)bp;
790
791         /* Only print if there are unknown bits */
792         TCHECK(cmu->v_flags);
793         if ((cmu->v_flags & ~(VF_SMASK)) != 0)
794                 printf(" F:0x%x", cmu->v_flags);
795         PRINTCMUADDR(v_dgate, "DG");
796         PRINTCMUADDR(v_smask, cmu->v_flags & VF_SMASK ? "SM" : "SM*");
797         PRINTCMUADDR(v_dns1, "NS1");
798         PRINTCMUADDR(v_dns2, "NS2");
799         PRINTCMUADDR(v_ins1, "IEN1");
800         PRINTCMUADDR(v_ins2, "IEN2");
801         PRINTCMUADDR(v_ts1, "TS1");
802         PRINTCMUADDR(v_ts2, "TS2");
803         return;
804
805 trunc:
806         fputs(tstr, stdout);
807 #undef PRINTCMUADDR
808 }
809
810 static char *
811 client_fqdn_flags(u_int flags)
812 {
813         static char buf[8+1];
814         int i = 0;
815
816         if (flags & CLIENT_FQDN_FLAGS_S)
817                 buf[i++] = 'S';
818         if (flags & CLIENT_FQDN_FLAGS_O)
819                 buf[i++] = 'O';
820         if (flags & CLIENT_FQDN_FLAGS_E)
821                 buf[i++] = 'E';
822         if (flags & CLIENT_FQDN_FLAGS_N)
823                 buf[i++] = 'N';
824         buf[i] = '\0';
825
826         return buf;
827 }