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