The Tcpdump Group git mirrors - tcpdump/blob - print-arp.c

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