/* $NetBSD: print-bootp.c,v 1.8 2001/02/20 19:18:32 joda Exp $ */ /* * Copyright (c) 1990, 1991, 1993, 1994, 1995, 1996, 1997 * The Regents of the University of California. All rights reserved. * * Redistribution and use in source and binary forms, with or without * modification, are permitted provided that: (1) source code distributions * retain the above copyright notice and this paragraph in its entirety, (2) * distributions including binary code include the above copyright notice and * this paragraph in its entirety in the documentation or other materials * provided with the distribution, and (3) all advertising materials mentioning * features or use of this software display the following acknowledgement: * ``This product includes software developed by the University of California, * Lawrence Berkeley Laboratory and its contributors.'' Neither the name of * the University nor the names of its contributors may be used to endorse * or promote products derived from this software without specific prior * written permission. * THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR IMPLIED * WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED WARRANTIES OF * MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE. * * Format and print bootp packets. */ #include #ifndef lint #if 0 static const char rcsid[] = "@(#) Header: print-bootp.c,v 1.45 97/06/15 13:20:28 leres Exp (LBL)"; #else __RCSID("$NetBSD: print-bootp.c,v 1.8 2001/02/20 19:18:32 joda Exp $"); #endif #endif #include #include #include #if __STDC__ struct mbuf; struct rtentry; #endif #include #include #ifdef __NetBSD__ #include #else #include #endif #include #ifdef HAVE_MEMORY_H #include #endif #include #include #include "interface.h" #include "addrtoname.h" #include "bootp.h" static void rfc1048_print(const u_char *, u_int); static void cmu_print(const u_char *, u_int); static char tstr[] = " [|bootp]"; /* * Print bootp requests */ void bootp_print(register const u_char *cp, u_int length, u_short sport, u_short dport) { register const struct bootp *bp; static u_char vm_cmu[4] = VM_CMU; static u_char vm_rfc1048[4] = VM_RFC1048; bp = (struct bootp *)cp; TCHECK(bp->bp_op); switch (bp->bp_op) { case BOOTREQUEST: /* Usually, a request goes from a client to a server */ if (sport != IPPORT_BOOTPC || dport != IPPORT_BOOTPS) printf(" (request)"); break; case BOOTREPLY: /* Usually, a reply goes from a server to a client */ if (sport != IPPORT_BOOTPS || dport != IPPORT_BOOTPC) printf(" (reply)"); break; default: printf(" bootp-#%d", bp->bp_op); } TCHECK(bp->bp_secs); /* The usual hardware address type is 1 (10Mb Ethernet) */ if (bp->bp_htype != 1) printf(" htype-#%d", bp->bp_htype); /* The usual length for 10Mb Ethernet address is 6 bytes */ if (bp->bp_htype != 1 || bp->bp_hlen != 6) printf(" hlen:%d", bp->bp_hlen); /* Only print interesting fields */ if (bp->bp_hops) printf(" hops:%d", bp->bp_hops); if (bp->bp_xid) printf(" xid:0x%x", (u_int32_t)ntohl(bp->bp_xid)); if (bp->bp_secs) printf(" secs:%d", ntohs(bp->bp_secs)); /* Client's ip address */ TCHECK(bp->bp_ciaddr); if (bp->bp_ciaddr.s_addr) printf(" C:%s", ipaddr_string(&bp->bp_ciaddr)); /* 'your' ip address (bootp client) */ TCHECK(bp->bp_yiaddr); if (bp->bp_yiaddr.s_addr) printf(" Y:%s", ipaddr_string(&bp->bp_yiaddr)); /* Server's ip address */ TCHECK(bp->bp_siaddr); if (bp->bp_siaddr.s_addr) printf(" S:%s", ipaddr_string(&bp->bp_siaddr)); /* Gateway's ip address */ TCHECK(bp->bp_giaddr); if (bp->bp_giaddr.s_addr) printf(" G:%s", ipaddr_string(&bp->bp_giaddr)); /* Client's Ethernet address */ if (bp->bp_htype == 1 && bp->bp_hlen == 6) { register const struct ether_header *eh; register const char *e; TCHECK2(bp->bp_chaddr[0], 6); eh = (struct ether_header *)packetp; if (bp->bp_op == BOOTREQUEST) e = (const char *)ESRC(eh); else if (bp->bp_op == BOOTREPLY) e = (const char *)EDST(eh); else e = 0; if (e == 0 || memcmp((char *)bp->bp_chaddr, e, 6) != 0) printf(" ether %s", etheraddr_string(bp->bp_chaddr)); } TCHECK2(bp->bp_sname[0], 1); /* check first char only */ if (*bp->bp_sname) { printf(" sname \""); if (fn_print(bp->bp_sname, snapend)) { putchar('"'); fputs(tstr + 1, stdout); return; } putchar('"'); } TCHECK2(bp->bp_sname[0], 1); /* check first char only */ if (*bp->bp_file) { printf(" file \""); if (fn_print(bp->bp_file, snapend)) { putchar('"'); fputs(tstr + 1, stdout); return; } putchar('"'); } /* Decode the vendor buffer */ TCHECK(bp->bp_vend[0]); length -= sizeof(*bp) - sizeof(bp->bp_vend); if (memcmp((char *)bp->bp_vend, (char *)vm_rfc1048, sizeof(u_int32_t)) == 0) rfc1048_print(bp->bp_vend, length); else if (memcmp((char *)bp->bp_vend, (char *)vm_cmu, sizeof(u_int32_t)) == 0) cmu_print(bp->bp_vend, length); else { u_int32_t ul; memcpy((char *)&ul, (char *)bp->bp_vend, sizeof(ul)); if (ul != 0) printf("vend-#0x%x", ul); } return; trunc: fputs(tstr, stdout); } /* The first character specifies the format to print */ static struct tok tag2str[] = { /* RFC1048 tags */ { TAG_PAD, " PAD" }, { TAG_SUBNET_MASK, "iSM" }, /* subnet mask (RFC950) */ { TAG_TIME_OFFSET, "lTZ" }, /* seconds from UTC */ { TAG_GATEWAY, "iDG" }, /* default gateway */ { TAG_TIME_SERVER, "iTS" }, /* time servers (RFC868) */ { TAG_NAME_SERVER, "iIEN" }, /* IEN name servers (IEN116) */ { TAG_DOMAIN_SERVER, "iNS" }, /* domain name (RFC1035) */ { TAG_LOG_SERVER, "iLOG" }, /* MIT log servers */ { TAG_COOKIE_SERVER, "iCS" }, /* cookie servers (RFC865) */ { TAG_LPR_SERVER, "iLPR" }, /* lpr server (RFC1179) */ { TAG_IMPRESS_SERVER, "iIM" }, /* impress servers (Imagen) */ { TAG_RLP_SERVER, "iRL" }, /* resource location (RFC887) */ { TAG_HOSTNAME, "aHN" }, /* ascii hostname */ { TAG_BOOTSIZE, "sBS" }, /* 512 byte blocks */ { TAG_END, " END" }, /* RFC1497 tags */ { TAG_DUMPPATH, "aDP" }, /* merit dump file */ { TAG_DOMAINNAME, "aDN" }, /* domain name */ { TAG_SWAP_SERVER, "iSS" }, /* swap server */ { TAG_ROOTPATH, "aRP" }, /* root path */ { TAG_EXTPATH, "aEP" }, /* extensions path */ /* RFC1533 tags */ { TAG_IP_FORWARD, "bip-fw" }, { TAG_IP_SRCRT, "bip-sr" }, { TAG_IP_FILTER, "iip-fil" }, { TAG_IP_REASS, "sip-reass" }, { TAG_IP_TTL, "bip-ttl" }, { TAG_IP_PMTUTO, "lip-mtuto" }, { TAG_IP_PMTUPTAB, "sip-mtutab" }, { TAG_IPIF_MTU, "sif-mtu" }, { TAG_IPIF_LSUBNET, "bif-lsubnet" }, { TAG_IPIF_BADDR, "iif-bcast" }, { TAG_IPIF_MDISC, "bif-mdisc" }, { TAG_IPIF_MSUPP, "bif-msupp" }, { TAG_IPIF_RDISC, "bif-rdisc" }, { TAG_IPIF_RSOLADDR, "iif-rsoladdr" }, { TAG_IPIF_SROUTE, "iif-staticroute" }, { TAG_LINK_TRAILER, "blink-trailer" }, { TAG_LINK_ARPTO, "blink-arpto" }, { TAG_LINK_ETHER802, "blink-ether822" }, { TAG_TCP_DEFTTL, "btcp-defttl" }, { TAG_TCP_KAINT, "ltcp-kaint" }, { TAG_TCP_KAGARBAGE, "btcp-kagarbage" }, { TAG_APP_NISDOM, "anis-dom" }, { TAG_APP_NISOPT, "inis-srv" }, { TAG_APP_NTPSRV, "intp-srv" }, { TAG_VENDOR, "bvendor" }, { TAG_APP_NB_NS_SERVER, "inetbios-ns-srv" }, { TAG_APP_NB_DD_SERVER, "inetbios-dd-srv" }, { TAG_APP_NB_NODETYPE, "bnetbios-nodetype" }, { TAG_APP_NB_SCOPE, "inetbios-scope" }, { TAG_APP_X_FS, "ix-fs" }, { TAG_APP_X_DM, "ix-dm" }, { TAG_APP_NISPDOM, "anis+-dom" }, { TAG_APP_NISPSRV, "inis+-srv" }, { TAG_APP_MIPHA, "imip-ha" }, { TAG_APP_SMTPSRV, "ismtp-srv" }, { TAG_APP_POP3SRV, "ipop3-srv" }, { TAG_APP_NNTPSRV, "inntp-srv" }, { TAG_APP_HTTPSRV, "ihttp-srv" }, { TAG_APP_FINGERSRV, "ifinger-srv" }, { TAG_APP_IRCSRV, "iirc-srv" }, { TAG_APP_STREETTALKSRV,"istreettalk-srv" }, { TAG_APP_STREETTALKDA, "istreettalk-da" }, /* (post-)RFC1533 DHCP extensions */ { TAG_DHCP_REQIPADDR, "idhcp-reqipaddr" }, { TAG_DHCP_LEASETIME, "ldhcp-leasetime" }, { TAG_DHCP_OVERLOAD, "bdhcp-oerload" }, { TAG_DHCP_TFTPSRV, "adhcp-tftpsrv" }, { TAG_DHCP_BOOTFILE, "adhcp-bootfile" }, { TAG_DHCP_MSGTYP, "bdhcp-msgtyp" }, { TAG_DHCP_SRVID, "idhpc-srvid" }, { TAG_DHCP_PRMREQ, "bdhcp-prmreq" }, { TAG_DHCP_MSG, "adhcp-msg" }, { TAG_DHCP_MAXSIZ, "sdhpc-maxsiz" }, { TAG_DHCP_T1, "ldhcp-t1" }, { TAG_DHCP_T2, "ldhcp-t2" }, { TAG_DHCP_CLASSID, "bdhcp-classid" }, { TAG_DHCP_CLIENTID, "bdhcp-cliid" }, { 0, NULL } }; static void rfc1048_print(register const u_char *bp, register u_int length) { register u_char tag; register u_int len, size; register const char *cp; register char c; int first; u_int32_t ul; u_short us; printf(" vend-rfc1048"); /* Step over magic cookie */ bp += sizeof(int32_t); /* Loop while we there is a tag left in the buffer */ while (bp + 1 < snapend) { tag = *bp++; if (tag == TAG_PAD) continue; if (tag == TAG_END) return; cp = tok2str(tag2str, "?T%d", tag); c = *cp++; printf(" %s:", cp); /* Get the length; check for truncation */ if (bp + 1 >= snapend) { fputs(tstr, stdout); return; } len = *bp++; if (bp + len >= snapend) { fputs(tstr, stdout); return; } /* Print data */ size = len; if (c == '?') { /* Base default formats for unknown tags on data size */ if (size & 1) c = 'b'; else if (size & 2) c = 's'; else c = 'l'; } first = 1; switch (c) { case 'a': /* ascii strings */ putchar('"'); (void)fn_printn(bp, size, NULL); putchar('"'); bp += size; size = 0; break; case 'i': case 'l': /* ip addresses/32-bit words */ while (size >= sizeof(ul)) { if (!first) putchar(','); memcpy((char *)&ul, (char *)bp, sizeof(ul)); if (c == 'i') printf("%s", ipaddr_string(&ul)); else printf("%u", ntohl(ul)); bp += sizeof(ul); size -= sizeof(ul); first = 0; } break; case 's': /* shorts */ while (size >= sizeof(us)) { if (!first) putchar(','); memcpy((char *)&us, (char *)bp, sizeof(us)); printf("%d", ntohs(us)); bp += sizeof(us); size -= sizeof(us); first = 0; } break; case 'b': default: /* Bytes */ while (size > 0) { if (!first) putchar('.'); printf("%d", *bp); ++bp; --size; first = 0; } break; } /* Data left over? */ if (size) printf("[len %d]", len); } } static void cmu_print(register const u_char *bp, register u_int length) { register const struct cmu_vend *cmu; const char fmt[] = " %s:%s"; #define PRINTCMUADDR(m, s) { TCHECK(cmu->m); \ if (cmu->m.s_addr != 0) \ printf(fmt, s, ipaddr_string(&cmu->m.s_addr)); } printf(" vend-cmu"); cmu = (struct cmu_vend *)bp; /* Only print if there are unknown bits */ TCHECK(cmu->v_flags); if ((cmu->v_flags & ~(VF_SMASK)) != 0) printf(" F:0x%x", cmu->v_flags); PRINTCMUADDR(v_dgate, "DG"); PRINTCMUADDR(v_smask, cmu->v_flags & VF_SMASK ? "SM" : "SM*"); PRINTCMUADDR(v_dns1, "NS1"); PRINTCMUADDR(v_dns2, "NS2"); PRINTCMUADDR(v_ins1, "IEN1"); PRINTCMUADDR(v_ins2, "IEN2"); PRINTCMUADDR(v_ts1, "TS1"); PRINTCMUADDR(v_ts2, "TS2"); return; trunc: fputs(tstr, stdout); #undef PRINTCMUADDR }