1 /* 2 * Copyright (c) 1988, 1989, 1990, 1991, 1992, 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 22 #include <sys/cdefs.h> 23 #ifndef lint 24 __RCSID("$NetBSD: print-arp.c,v 1.11 2024/09/02 16:15:30 christos Exp $"); 25 #endif 26 27 /* \summary: Address Resolution Protocol (ARP) printer */ 28 29 #include <config.h> 30 31 #include "netdissect-stdinc.h" 32 33 #define ND_LONGJMP_FROM_TCHECK 34 #include "netdissect.h" 35 #include "addrtoname.h" 36 #include "ethertype.h" 37 #include "extract.h" 38 39 40 /* 41 * Address Resolution Protocol. 42 * 43 * See RFC 826 for protocol description. ARP packets are variable 44 * in size; the arphdr structure defines the fixed-length portion. 45 * Protocol type values are the same as those for 10 Mb/s Ethernet. 46 * It is followed by the variable-sized fields ar_sha, arp_spa, 47 * arp_tha and arp_tpa in that order, according to the lengths 48 * specified. Field names used correspond to RFC 826. 49 */ 50 struct arp_pkthdr { 51 nd_uint16_t ar_hrd; /* format of hardware address */ 52 #define ARPHRD_ETHER 1 /* ethernet hardware format */ 53 #define ARPHRD_IEEE802 6 /* token-ring hardware format */ 54 #define ARPHRD_ARCNET 7 /* arcnet hardware format */ 55 #define ARPHRD_FRELAY 15 /* frame relay hardware format */ 56 #define ARPHRD_ATM2225 19 /* ATM (RFC 2225) */ 57 #define ARPHRD_STRIP 23 /* Ricochet Starmode Radio hardware format */ 58 #define ARPHRD_IEEE1394 24 /* IEEE 1394 (FireWire) hardware format */ 59 #define ARPHRD_INFINIBAND 32 /* InfiniBand RFC 4391 */ 60 nd_uint16_t ar_pro; /* format of protocol address */ 61 nd_uint8_t ar_hln; /* length of hardware address */ 62 nd_uint8_t ar_pln; /* length of protocol address */ 63 nd_uint16_t ar_op; /* one of: */ 64 #define ARPOP_REQUEST 1 /* request to resolve address */ 65 #define ARPOP_REPLY 2 /* response to previous request */ 66 #define ARPOP_REVREQUEST 3 /* request protocol address given hardware */ 67 #define ARPOP_REVREPLY 4 /* response giving protocol address */ 68 #define ARPOP_INVREQUEST 8 /* request to identify peer */ 69 #define ARPOP_INVREPLY 9 /* response identifying peer */ 70 #define ARPOP_NAK 10 /* NAK - only valid for ATM ARP */ 71 72 /* 73 * The remaining fields are variable in size, 74 * according to the sizes above. 75 */ 76 #ifdef COMMENT_ONLY 77 nd_byte ar_sha[]; /* sender hardware address */ 78 nd_byte ar_spa[]; /* sender protocol address */ 79 nd_byte ar_tha[]; /* target hardware address */ 80 nd_byte ar_tpa[]; /* target protocol address */ 81 #endif 82 #define ar_sha(ap) (((const u_char *)((ap)+1))+ 0) 83 #define ar_spa(ap) (((const u_char *)((ap)+1))+ GET_U_1((ap)->ar_hln)) 84 #define ar_tha(ap) (((const u_char *)((ap)+1))+ GET_U_1((ap)->ar_hln)+GET_U_1((ap)->ar_pln)) 85 #define ar_tpa(ap) (((const u_char *)((ap)+1))+2*GET_U_1((ap)->ar_hln)+GET_U_1((ap)->ar_pln)) 86 }; 87 88 #define ARP_HDRLEN 8 89 90 #define HRD(ap) GET_BE_U_2((ap)->ar_hrd) 91 #define HRD_LEN(ap) GET_U_1((ap)->ar_hln) 92 #define PROTO_LEN(ap) GET_U_1((ap)->ar_pln) 93 #define OP(ap) GET_BE_U_2((ap)->ar_op) 94 #define PRO(ap) GET_BE_U_2((ap)->ar_pro) 95 #define SHA(ap) (ar_sha(ap)) 96 #define SPA(ap) (ar_spa(ap)) 97 #define THA(ap) (ar_tha(ap)) 98 #define TPA(ap) (ar_tpa(ap)) 99 100 101 static const struct tok arpop_values[] = { 102 { ARPOP_REQUEST, "Request" }, 103 { ARPOP_REPLY, "Reply" }, 104 { ARPOP_REVREQUEST, "Reverse Request" }, 105 { ARPOP_REVREPLY, "Reverse Reply" }, 106 { ARPOP_INVREQUEST, "Inverse Request" }, 107 { ARPOP_INVREPLY, "Inverse Reply" }, 108 { ARPOP_NAK, "NACK Reply" }, 109 { 0, NULL } 110 }; 111 112 static const struct tok arphrd_values[] = { 113 { ARPHRD_ETHER, "Ethernet" }, 114 { ARPHRD_IEEE802, "TokenRing" }, 115 { ARPHRD_ARCNET, "ArcNet" }, 116 { ARPHRD_FRELAY, "FrameRelay" }, 117 { ARPHRD_STRIP, "Strip" }, 118 { ARPHRD_IEEE1394, "IEEE 1394" }, 119 { ARPHRD_ATM2225, "ATM" }, 120 { ARPHRD_INFINIBAND, "InfiniBand" }, 121 { 0, NULL } 122 }; 123 124 /* 125 * ATM Address Resolution Protocol. 126 * 127 * See RFC 2225 for protocol description. ATMARP packets are similar 128 * to ARP packets, except that there are no length fields for the 129 * protocol address - instead, there are type/length fields for 130 * the ATM number and subaddress - and the hardware addresses consist 131 * of an ATM number and an ATM subaddress. 132 */ 133 struct atmarp_pkthdr { 134 nd_uint16_t aar_hrd; /* format of hardware address */ 135 nd_uint16_t aar_pro; /* format of protocol address */ 136 nd_uint8_t aar_shtl; /* length of source ATM number */ 137 nd_uint8_t aar_sstl; /* length of source ATM subaddress */ 138 #define ATMARP_IS_E164 0x40 /* bit in type/length for E.164 format */ 139 #define ATMARP_LEN_MASK 0x3F /* length of {sub}address in type/length */ 140 nd_uint16_t aar_op; /* same as regular ARP */ 141 nd_uint8_t aar_spln; /* length of source protocol address */ 142 nd_uint8_t aar_thtl; /* length of target ATM number */ 143 nd_uint8_t aar_tstl; /* length of target ATM subaddress */ 144 nd_uint8_t aar_tpln; /* length of target protocol address */ 145 /* 146 * The remaining fields are variable in size, 147 * according to the sizes above. 148 */ 149 #ifdef COMMENT_ONLY 150 nd_byte aar_sha[]; /* source ATM number */ 151 nd_byte aar_ssa[]; /* source ATM subaddress */ 152 nd_byte aar_spa[]; /* sender protocol address */ 153 nd_byte aar_tha[]; /* target ATM number */ 154 nd_byte aar_tsa[]; /* target ATM subaddress */ 155 nd_byte aar_tpa[]; /* target protocol address */ 156 #endif 157 158 #define ATMHRD(ap) GET_BE_U_2((ap)->aar_hrd) 159 #define ATMSHRD_LEN(ap) (GET_U_1((ap)->aar_shtl) & ATMARP_LEN_MASK) 160 #define ATMSSLN(ap) (GET_U_1((ap)->aar_sstl) & ATMARP_LEN_MASK) 161 #define ATMSPROTO_LEN(ap) GET_U_1((ap)->aar_spln) 162 #define ATMOP(ap) GET_BE_U_2((ap)->aar_op) 163 #define ATMPRO(ap) GET_BE_U_2((ap)->aar_pro) 164 #define ATMTHRD_LEN(ap) (GET_U_1((ap)->aar_thtl) & ATMARP_LEN_MASK) 165 #define ATMTSLN(ap) (GET_U_1((ap)->aar_tstl) & ATMARP_LEN_MASK) 166 #define ATMTPROTO_LEN(ap) GET_U_1((ap)->aar_tpln) 167 #define aar_sha(ap) ((const u_char *)((ap)+1)) 168 #define aar_ssa(ap) (aar_sha(ap) + ATMSHRD_LEN(ap)) 169 #define aar_spa(ap) (aar_ssa(ap) + ATMSSLN(ap)) 170 #define aar_tha(ap) (aar_spa(ap) + ATMSPROTO_LEN(ap)) 171 #define aar_tsa(ap) (aar_tha(ap) + ATMTHRD_LEN(ap)) 172 #define aar_tpa(ap) (aar_tsa(ap) + ATMTSLN(ap)) 173 }; 174 175 #define ATMSHA(ap) (aar_sha(ap)) 176 #define ATMSSA(ap) (aar_ssa(ap)) 177 #define ATMSPA(ap) (aar_spa(ap)) 178 #define ATMTHA(ap) (aar_tha(ap)) 179 #define ATMTSA(ap) (aar_tsa(ap)) 180 #define ATMTPA(ap) (aar_tpa(ap)) 181 182 static int 183 isnonzero(netdissect_options *ndo, const u_char *a, size_t len) 184 { 185 while (len > 0) { 186 if (GET_U_1(a) != 0) 187 return (1); 188 a++; 189 len--; 190 } 191 return (0); 192 } 193 194 static void 195 tpaddr_print_ip(netdissect_options *ndo, 196 const struct arp_pkthdr *ap, u_short pro) 197 { 198 if (pro != ETHERTYPE_IP && pro != ETHERTYPE_TRAIL) 199 ND_PRINT("<wrong proto type>"); 200 else if (PROTO_LEN(ap) != 4) 201 ND_PRINT("<wrong len>"); 202 else 203 ND_PRINT("%s", GET_IPADDR_STRING(TPA(ap))); 204 } 205 206 static void 207 spaddr_print_ip(netdissect_options *ndo, 208 const struct arp_pkthdr *ap, u_short pro) 209 { 210 if (pro != ETHERTYPE_IP && pro != ETHERTYPE_TRAIL) 211 ND_PRINT("<wrong proto type>"); 212 else if (PROTO_LEN(ap) != 4) 213 ND_PRINT("<wrong len>"); 214 else 215 ND_PRINT("%s", GET_IPADDR_STRING(SPA(ap))); 216 } 217 218 static void 219 atmarp_addr_print(netdissect_options *ndo, 220 const u_char *ha, u_int ha_len, const u_char *srca, 221 u_int srca_len) 222 { 223 if (ha_len == 0) 224 ND_PRINT("<No address>"); 225 else { 226 ND_PRINT("%s", GET_LINKADDR_STRING(ha, LINKADDR_ATM, ha_len)); 227 if (srca_len != 0) 228 ND_PRINT(",%s", 229 GET_LINKADDR_STRING(srca, LINKADDR_ATM, srca_len)); 230 } 231 } 232 233 static void 234 atmarp_tpaddr_print(netdissect_options *ndo, 235 const struct atmarp_pkthdr *ap, u_short pro) 236 { 237 if (pro != ETHERTYPE_IP && pro != ETHERTYPE_TRAIL) 238 ND_PRINT("<wrong proto type>"); 239 else if (ATMTPROTO_LEN(ap) != 4) 240 ND_PRINT("<wrong tplen>"); 241 else 242 ND_PRINT("%s", GET_IPADDR_STRING(ATMTPA(ap))); 243 } 244 245 static void 246 atmarp_spaddr_print(netdissect_options *ndo, 247 const struct atmarp_pkthdr *ap, u_short pro) 248 { 249 if (pro != ETHERTYPE_IP && pro != ETHERTYPE_TRAIL) 250 ND_PRINT("<wrong proto type>"); 251 else if (ATMSPROTO_LEN(ap) != 4) 252 ND_PRINT("<wrong splen>"); 253 else 254 ND_PRINT("%s", GET_IPADDR_STRING(ATMSPA(ap))); 255 } 256 257 static void 258 atmarp_print(netdissect_options *ndo, 259 const u_char *bp, u_int length, u_int caplen) 260 { 261 const struct atmarp_pkthdr *ap; 262 u_short pro, hrd, op; 263 264 ap = (const struct atmarp_pkthdr *)bp; 265 ND_TCHECK_SIZE(ap); 266 267 hrd = ATMHRD(ap); 268 pro = ATMPRO(ap); 269 op = ATMOP(ap); 270 271 ND_TCHECK_LEN(ATMTPA(ap), ATMTPROTO_LEN(ap)); 272 273 if (!ndo->ndo_eflag) { 274 ND_PRINT("ARP, "); 275 } 276 277 if ((pro != ETHERTYPE_IP && pro != ETHERTYPE_TRAIL) || 278 ATMSPROTO_LEN(ap) != 4 || 279 ATMTPROTO_LEN(ap) != 4 || 280 ndo->ndo_vflag) { 281 ND_PRINT("%s, %s (len %u/%u)", 282 tok2str(arphrd_values, "Unknown Hardware (%u)", hrd), 283 tok2str(ethertype_values, "Unknown Protocol (0x%04x)", pro), 284 ATMSPROTO_LEN(ap), 285 ATMTPROTO_LEN(ap)); 286 287 /* don't know about the address formats */ 288 if (!ndo->ndo_vflag) { 289 goto out; 290 } 291 } 292 293 /* print operation */ 294 ND_PRINT("%s%s ", 295 ndo->ndo_vflag ? ", " : "", 296 tok2str(arpop_values, "Unknown (%u)", op)); 297 298 switch (op) { 299 300 case ARPOP_REQUEST: 301 ND_PRINT("who-has "); 302 atmarp_tpaddr_print(ndo, ap, pro); 303 if (ATMTHRD_LEN(ap) != 0) { 304 ND_PRINT(" ("); 305 atmarp_addr_print(ndo, ATMTHA(ap), ATMTHRD_LEN(ap), 306 ATMTSA(ap), ATMTSLN(ap)); 307 ND_PRINT(")"); 308 } 309 ND_PRINT(" tell "); 310 atmarp_spaddr_print(ndo, ap, pro); 311 break; 312 313 case ARPOP_REPLY: 314 atmarp_spaddr_print(ndo, ap, pro); 315 ND_PRINT(" is-at "); 316 atmarp_addr_print(ndo, ATMSHA(ap), ATMSHRD_LEN(ap), ATMSSA(ap), 317 ATMSSLN(ap)); 318 break; 319 320 case ARPOP_INVREQUEST: 321 ND_PRINT("who-is "); 322 atmarp_addr_print(ndo, ATMTHA(ap), ATMTHRD_LEN(ap), ATMTSA(ap), 323 ATMTSLN(ap)); 324 ND_PRINT(" tell "); 325 atmarp_addr_print(ndo, ATMSHA(ap), ATMSHRD_LEN(ap), ATMSSA(ap), 326 ATMSSLN(ap)); 327 break; 328 329 case ARPOP_INVREPLY: 330 atmarp_addr_print(ndo, ATMSHA(ap), ATMSHRD_LEN(ap), ATMSSA(ap), 331 ATMSSLN(ap)); 332 ND_PRINT("at "); 333 atmarp_spaddr_print(ndo, ap, pro); 334 break; 335 336 case ARPOP_NAK: 337 ND_PRINT("for "); 338 atmarp_spaddr_print(ndo, ap, pro); 339 break; 340 341 default: 342 ND_DEFAULTPRINT((const u_char *)ap, caplen); 343 return; 344 } 345 346 out: 347 ND_PRINT(", length %u", length); 348 } 349 350 void 351 arp_print(netdissect_options *ndo, 352 const u_char *bp, u_int length, u_int caplen) 353 { 354 const struct arp_pkthdr *ap; 355 u_short pro, hrd, op, linkaddr; 356 357 ndo->ndo_protocol = "arp"; 358 ap = (const struct arp_pkthdr *)bp; 359 ND_TCHECK_SIZE(ap); 360 361 hrd = HRD(ap); 362 pro = PRO(ap); 363 op = OP(ap); 364 365 366 /* if its ATM then call the ATM ARP printer 367 for Frame-relay ARP most of the fields 368 are similar to Ethernet so overload the Ethernet Printer 369 and set the linkaddr type for GET_LINKADDR_STRING() accordingly */ 370 371 switch(hrd) { 372 case ARPHRD_ATM2225: 373 atmarp_print(ndo, bp, length, caplen); 374 return; 375 case ARPHRD_FRELAY: 376 linkaddr = LINKADDR_FRELAY; 377 break; 378 default: 379 linkaddr = LINKADDR_ETHER; 380 break; 381 } 382 383 ND_TCHECK_LEN(TPA(ap), PROTO_LEN(ap)); 384 385 if (!ndo->ndo_eflag) { 386 ND_PRINT("ARP, "); 387 } 388 389 /* print hardware type/len and proto type/len */ 390 if ((pro != ETHERTYPE_IP && pro != ETHERTYPE_TRAIL) || 391 PROTO_LEN(ap) != 4 || 392 HRD_LEN(ap) == 0 || 393 ndo->ndo_vflag) { 394 ND_PRINT("%s (len %u), %s (len %u)", 395 tok2str(arphrd_values, "Unknown Hardware (%u)", hrd), 396 HRD_LEN(ap), 397 tok2str(ethertype_values, "Unknown Protocol (0x%04x)", pro), 398 PROTO_LEN(ap)); 399 400 /* don't know about the address formats */ 401 if (!ndo->ndo_vflag) { 402 goto out; 403 } 404 } 405 406 /* print operation */ 407 ND_PRINT("%s%s ", 408 ndo->ndo_vflag ? ", " : "", 409 tok2str(arpop_values, "Unknown (%u)", op)); 410 411 switch (op) { 412 413 case ARPOP_REQUEST: 414 ND_PRINT("who-has "); 415 tpaddr_print_ip(ndo, ap, pro); 416 if (isnonzero(ndo, (const u_char *)THA(ap), HRD_LEN(ap))) 417 ND_PRINT(" (%s)", 418 GET_LINKADDR_STRING(THA(ap), linkaddr, HRD_LEN(ap))); 419 ND_PRINT(" tell "); 420 spaddr_print_ip(ndo, ap, pro); 421 break; 422 423 case ARPOP_REPLY: 424 spaddr_print_ip(ndo, ap, pro); 425 ND_PRINT(" is-at %s", 426 GET_LINKADDR_STRING(SHA(ap), linkaddr, HRD_LEN(ap))); 427 break; 428 429 case ARPOP_REVREQUEST: 430 /* 431 * XXX - GET_LINKADDR_STRING() may return a pointer to 432 * a static buffer, so we only have one call to it per 433 * ND_PRINT() call. 434 * 435 * This should be done in a cleaner fashion. 436 */ 437 ND_PRINT("who-is %s", 438 GET_LINKADDR_STRING(THA(ap), linkaddr, HRD_LEN(ap))); 439 ND_PRINT(" tell %s", 440 GET_LINKADDR_STRING(SHA(ap), linkaddr, HRD_LEN(ap))); 441 break; 442 443 case ARPOP_REVREPLY: 444 ND_PRINT("%s at ", 445 GET_LINKADDR_STRING(THA(ap), linkaddr, HRD_LEN(ap))); 446 tpaddr_print_ip(ndo, ap, pro); 447 break; 448 449 case ARPOP_INVREQUEST: 450 /* 451 * XXX - GET_LINKADDR_STRING() may return a pointer to 452 * a static buffer, so we only have one call to it per 453 * ND_PRINT() call. 454 * 455 * This should be done in a cleaner fashion. 456 */ 457 ND_PRINT("who-is %s", 458 GET_LINKADDR_STRING(THA(ap), linkaddr, HRD_LEN(ap))); 459 ND_PRINT(" tell %s", 460 GET_LINKADDR_STRING(SHA(ap), linkaddr, HRD_LEN(ap))); 461 break; 462 463 case ARPOP_INVREPLY: 464 ND_PRINT("%s at ", 465 GET_LINKADDR_STRING(SHA(ap), linkaddr, HRD_LEN(ap))); 466 spaddr_print_ip(ndo, ap, pro); 467 break; 468 469 default: 470 ND_DEFAULTPRINT((const u_char *)ap, caplen); 471 return; 472 } 473 474 out: 475 ND_PRINT(", length %u", length); 476 } 477