contrib/tcpdump/print-hncp.c

   1 /*
   2  * Copyright (c) 2016 Antonin Décimo, Jean-Raphaël Gaglione
   3  *
   4  * Redistribution and use in source and binary forms, with or without
   5  * modification, are permitted provided that the following conditions
   6  * are met:
   7  * 1. Redistributions of source code must retain the above copyright
   8  *    notice, this list of conditions and the following disclaimer.
   9  * 2. Redistributions in binary form must reproduce the above copyright
  10  *    notice, this list of conditions and the following disclaimer in the
  11  *    documentation and/or other materials provided with the distribution.
  12  * 3. Neither the name of the project nor the names of its contributors
  13  *    may be used to endorse or promote products derived from this software
  14  *    without specific prior written permission.
  15  *
  16  * THIS SOFTWARE IS PROVIDED BY THE PROJECT AND CONTRIBUTORS ``AS IS'' AND
  17  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  18  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  19  * ARE DISCLAIMED.  IN NO EVENT SHALL THE PROJECT OR CONTRIBUTORS BE LIABLE
  20  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  21  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
  22  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  23  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
  24  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
  25  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
  26  * SUCH DAMAGE.
  27  */
  28
  29 /* \summary: Home Networking Control Protocol (HNCP) printer */
  30
  31 #ifdef HAVE_CONFIG_H
  32 #include "config.h"
  33 #endif
  34
  35 #include <netdissect-stdinc.h>
  36
  37 #include <stdlib.h>
  38 #include <string.h>
  39
  40 #include "netdissect.h"
  41 #include "addrtoname.h"
  42 #include "extract.h"
  43
  44 static void
  45 hncp_print_rec(netdissect_options *ndo,
  46                const u_char *cp, u_int length, int indent);
  47
  48 void
  49 hncp_print(netdissect_options *ndo,
  50            const u_char *cp, u_int length)
  51 {
  52     ND_PRINT((ndo, "hncp (%d)", length));
  53     hncp_print_rec(ndo, cp, length, 1);
  54 }
  55
  56 /* RFC7787 */
  57 #define DNCP_REQUEST_NETWORK_STATE  1
  58 #define DNCP_REQUEST_NODE_STATE     2
  59 #define DNCP_NODE_ENDPOINT          3
  60 #define DNCP_NETWORK_STATE          4
  61 #define DNCP_NODE_STATE             5
  62 #define DNCP_PEER                   8
  63 #define DNCP_KEEP_ALIVE_INTERVAL    9
  64 #define DNCP_TRUST_VERDICT         10
  65
  66 /* RFC7788 */
  67 #define HNCP_HNCP_VERSION          32
  68 #define HNCP_EXTERNAL_CONNECTION   33
  69 #define HNCP_DELEGATED_PREFIX      34
  70 #define HNCP_PREFIX_POLICY         43
  71 #define HNCP_DHCPV4_DATA           37
  72 #define HNCP_DHCPV6_DATA           38
  73 #define HNCP_ASSIGNED_PREFIX       35
  74 #define HNCP_NODE_ADDRESS          36
  75 #define HNCP_DNS_DELEGATED_ZONE    39
  76 #define HNCP_DOMAIN_NAME           40
  77 #define HNCP_NODE_NAME             41
  78 #define HNCP_MANAGED_PSK           42
  79
  80 /* See type_mask in hncp_print_rec below */
  81 #define RANGE_DNCP_RESERVED    0x10000
  82 #define RANGE_HNCP_UNASSIGNED  0x10001
  83 #define RANGE_DNCP_PRIVATE_USE 0x10002
  84 #define RANGE_DNCP_FUTURE_USE  0x10003
  85
  86 static const struct tok type_values[] = {
  87     { DNCP_REQUEST_NETWORK_STATE, "Request network state" },
  88     { DNCP_REQUEST_NODE_STATE,    "Request node state" },
  89     { DNCP_NODE_ENDPOINT,         "Node endpoint" },
  90     { DNCP_NETWORK_STATE,         "Network state" },
  91     { DNCP_NODE_STATE,            "Node state" },
  92     { DNCP_PEER,                  "Peer" },
  93     { DNCP_KEEP_ALIVE_INTERVAL,   "Keep-alive interval" },
  94     { DNCP_TRUST_VERDICT,         "Trust-Verdict" },
  95
  96     { HNCP_HNCP_VERSION,        "HNCP-Version" },
  97     { HNCP_EXTERNAL_CONNECTION, "External-Connection" },
  98     { HNCP_DELEGATED_PREFIX,    "Delegated-Prefix" },
  99     { HNCP_PREFIX_POLICY,       "Prefix-Policy" },
 100     { HNCP_DHCPV4_DATA,         "DHCPv4-Data" },
 101     { HNCP_DHCPV6_DATA,         "DHCPv6-Data" },
 102     { HNCP_ASSIGNED_PREFIX,     "Assigned-Prefix" },
 103     { HNCP_NODE_ADDRESS,        "Node-Address" },
 104     { HNCP_DNS_DELEGATED_ZONE,  "DNS-Delegated-Zone" },
 105     { HNCP_DOMAIN_NAME,         "Domain-Name" },
 106     { HNCP_NODE_NAME,           "Node-Name" },
 107     { HNCP_MANAGED_PSK,         "Managed-PSK" },
 108
 109     { RANGE_DNCP_RESERVED,    "Reserved" },
 110     { RANGE_HNCP_UNASSIGNED,  "Unassigned" },
 111     { RANGE_DNCP_PRIVATE_USE, "Private use" },
 112     { RANGE_DNCP_FUTURE_USE,  "Future use" },
 113
 114     { 0, NULL}
 115 };
 116
 117 #define DH4OPT_DNS_SERVERS 6     /* RFC2132 */
 118 #define DH4OPT_NTP_SERVERS 42    /* RFC2132 */
 119 #define DH4OPT_DOMAIN_SEARCH 119 /* RFC3397 */
 120
 121 static const struct tok dh4opt_str[] = {
 122     { DH4OPT_DNS_SERVERS, "DNS-server" },
 123     { DH4OPT_NTP_SERVERS, "NTP-server"},
 124     { DH4OPT_DOMAIN_SEARCH, "DNS-search" },
 125     { 0, NULL }
 126 };
 127
 128 #define DH6OPT_DNS_SERVERS 23   /* RFC3646 */
 129 #define DH6OPT_DOMAIN_LIST 24   /* RFC3646 */
 130 #define DH6OPT_SNTP_SERVERS 31  /* RFC4075 */
 131
 132 static const struct tok dh6opt_str[] = {
 133     { DH6OPT_DNS_SERVERS,  "DNS-server" },
 134     { DH6OPT_DOMAIN_LIST,  "DNS-search-list" },
 135     { DH6OPT_SNTP_SERVERS, "SNTP-servers" },
 136     { 0, NULL }
 137 };
 138
 139 /*
 140  * For IPv4-mapped IPv6 addresses, length of the prefix that precedes
 141  * the 4 bytes of IPv4 address at the end of the IPv6 address.
 142  */
 143 #define IPV4_MAPPED_HEADING_LEN    12
 144
 145 /*
 146  * Is an IPv6 address an IPv4-mapped address?
 147  */
 148 static inline int
 149 is_ipv4_mapped_address(const u_char *addr)
 150 {
 151     /* The value of the prefix */
 152     static const u_char ipv4_mapped_heading[IPV4_MAPPED_HEADING_LEN] =
 153         { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0xFF, 0xFF };
 154
 155     return memcmp(addr, ipv4_mapped_heading, IPV4_MAPPED_HEADING_LEN) == 0;
 156 }
 157
 158 static const char *
 159 format_nid(const u_char *data)
 160 {
 161     static char buf[4][11+5];
 162     static int i = 0;
 163     i = (i + 1) % 4;
 164     snprintf(buf[i], 16, "%02x:%02x:%02x:%02x",
 165              data[0], data[1], data[2], data[3]);
 166     return buf[i];
 167 }
 168
 169 static const char *
 170 format_256(const u_char *data)
 171 {
 172     static char buf[4][64+5];
 173     static int i = 0;
 174     i = (i + 1) % 4;
 175     snprintf(buf[i], 28, "%016" PRIx64 "%016" PRIx64 "%016" PRIx64 "%016" PRIx64,
 176          EXTRACT_64BITS(data),
 177          EXTRACT_64BITS(data + 8),
 178          EXTRACT_64BITS(data + 16),
 179          EXTRACT_64BITS(data + 24)
 180     );
 181     return buf[i];
 182 }
 183
 184 static const char *
 185 format_interval(const uint32_t n)
 186 {
 187     static char buf[4][sizeof("0000000.000s")];
 188     static int i = 0;
 189     i = (i + 1) % 4;
 190     snprintf(buf[i], sizeof(buf[i]), "%u.%03us", n / 1000, n % 1000);
 191     return buf[i];
 192 }
 193
 194 static const char *
 195 format_ip6addr(netdissect_options *ndo, const u_char *cp)
 196 {
 197     if (is_ipv4_mapped_address(cp))
 198         return ipaddr_string(ndo, cp + IPV4_MAPPED_HEADING_LEN);
 199     else
 200         return ip6addr_string(ndo, cp);
 201 }
 202
 203 static int
 204 print_prefix(netdissect_options *ndo, const u_char *prefix, u_int max_length)
 205 {
 206     int plenbytes;
 207     char buf[sizeof("xxxx:xxxx:xxxx:xxxx:xxxx:xxxx:xxxx:xxxx::/128")];
 208
 209     if (prefix[0] >= 96 && max_length >= IPV4_MAPPED_HEADING_LEN + 1 &&
 210         is_ipv4_mapped_address(&prefix[1])) {
 211         struct in_addr addr;
 212         u_int plen;
 213
 214         plen = prefix[0]-96;
 215         if (32 < plen)
 216             return -1;
 217         max_length -= 1;
 218
 219         memset(&addr, 0, sizeof(addr));
 220         plenbytes = (plen + 7) / 8;
 221         if (max_length < (u_int)plenbytes + IPV4_MAPPED_HEADING_LEN)
 222             return -3;
 223         memcpy(&addr, &prefix[1 + IPV4_MAPPED_HEADING_LEN], plenbytes);
 224         if (plen % 8) {
 225                 ((u_char *)&addr)[plenbytes - 1] &=
 226                         ((0xff00 >> (plen % 8)) & 0xff);
 227         }
 228         snprintf(buf, sizeof(buf), "%s/%d", ipaddr_string(ndo, &addr), plen);
 229         plenbytes += 1 + IPV4_MAPPED_HEADING_LEN;
 230     } else {
 231         plenbytes = decode_prefix6(ndo, prefix, max_length, buf, sizeof(buf));
 232     }
 233
 234     ND_PRINT((ndo, "%s", buf));
 235     return plenbytes;
 236 }
 237
 238 static int
 239 print_dns_label(netdissect_options *ndo,
 240                 const u_char *cp, u_int max_length, int print)
 241 {
 242     u_int length = 0;
 243     while (length < max_length) {
 244         u_int lab_length = cp[length++];
 245         if (lab_length == 0)
 246             return (int)length;
 247         if (length > 1 && print)
 248             safeputchar(ndo, '.');
 249         if (length+lab_length > max_length) {
 250             if (print)
 251                 safeputs(ndo, cp+length, max_length-length);
 252             break;
 253         }
 254         if (print)
 255             safeputs(ndo, cp+length, lab_length);
 256         length += lab_length;
 257     }
 258     if (print)
 259         ND_PRINT((ndo, "[|DNS]"));
 260     return -1;
 261 }
 262
 263 static int
 264 dhcpv4_print(netdissect_options *ndo,
 265              const u_char *cp, u_int length, int indent)
 266 {
 267     u_int i, t;
 268     const u_char *tlv, *value;
 269     uint8_t type, optlen;
 270
 271     i = 0;
 272     while (i < length) {
 273         if (i + 2 > length)
 274             return -1;
 275         tlv = cp + i;
 276         type = (uint8_t)tlv[0];
 277         optlen = (uint8_t)tlv[1];
 278         value = tlv + 2;
 279
 280         ND_PRINT((ndo, "\n"));
 281         for (t = indent; t > 0; t--)
 282             ND_PRINT((ndo, "\t"));
 283
 284         ND_PRINT((ndo, "%s", tok2str(dh4opt_str, "Unknown", type)));
 285         ND_PRINT((ndo," (%u)", optlen + 2 ));
 286         if (i + 2 + optlen > length)
 287             return -1;
 288
 289         switch (type) {
 290         case DH4OPT_DNS_SERVERS:
 291         case DH4OPT_NTP_SERVERS: {
 292             if (optlen < 4 || optlen % 4 != 0) {
 293                 return -1;
 294             }
 295             for (t = 0; t < optlen; t += 4)
 296                 ND_PRINT((ndo, " %s", ipaddr_string(ndo, value + t)));
 297         }
 298             break;
 299         case DH4OPT_DOMAIN_SEARCH: {
 300             const u_char *tp = value;
 301             while (tp < value + optlen) {
 302                 ND_PRINT((ndo, " "));
 303                 if ((tp = ns_nprint(ndo, tp, value + optlen)) == NULL)
 304                     return -1;
 305             }
 306         }
 307             break;
 308         }
 309
 310         i += 2 + optlen;
 311     }
 312     return 0;
 313 }
 314
 315 static int
 316 dhcpv6_print(netdissect_options *ndo,
 317              const u_char *cp, u_int length, int indent)
 318 {
 319     u_int i, t;
 320     const u_char *tlv, *value;
 321     uint16_t type, optlen;
 322
 323     i = 0;
 324     while (i < length) {
 325         if (i + 4 > length)
 326             return -1;
 327         tlv = cp + i;
 328         type = EXTRACT_16BITS(tlv);
 329         optlen = EXTRACT_16BITS(tlv + 2);
 330         value = tlv + 4;
 331
 332         ND_PRINT((ndo, "\n"));
 333         for (t = indent; t > 0; t--)
 334             ND_PRINT((ndo, "\t"));
 335
 336         ND_PRINT((ndo, "%s", tok2str(dh6opt_str, "Unknown", type)));
 337         ND_PRINT((ndo," (%u)", optlen + 4 ));
 338         if (i + 4 + optlen > length)
 339             return -1;
 340
 341         switch (type) {
 342             case DH6OPT_DNS_SERVERS:
 343             case DH6OPT_SNTP_SERVERS: {
 344                 if (optlen % 16 != 0) {
 345                     ND_PRINT((ndo, " %s", istr));
 346                     return -1;
 347                 }
 348                 for (t = 0; t < optlen; t += 16)
 349                     ND_PRINT((ndo, " %s", ip6addr_string(ndo, value + t)));
 350             }
 351                 break;
 352             case DH6OPT_DOMAIN_LIST: {
 353                 const u_char *tp = value;
 354                 while (tp < value + optlen) {
 355                     ND_PRINT((ndo, " "));
 356                     if ((tp = ns_nprint(ndo, tp, value + optlen)) == NULL)
 357                         return -1;
 358                 }
 359             }
 360                 break;
 361         }
 362
 363         i += 4 + optlen;
 364     }
 365     return 0;
 366 }
 367
 368 /* Determine in-line mode */
 369 static int
 370 is_in_line(netdissect_options *ndo, int indent)
 371 {
 372     return indent - 1 >= ndo->ndo_vflag && ndo->ndo_vflag < 3;
 373 }
 374
 375 static void
 376 print_type_in_line(netdissect_options *ndo,
 377                    uint32_t type, int count, int indent, int *first_one)
 378 {
 379     if (count > 0) {
 380         if (*first_one) {
 381             *first_one = 0;
 382             if (indent > 1) {
 383                 u_int t;
 384                 ND_PRINT((ndo, "\n"));
 385                 for (t = indent; t > 0; t--)
 386                     ND_PRINT((ndo, "\t"));
 387             } else {
 388                 ND_PRINT((ndo, " "));
 389             }
 390         } else {
 391             ND_PRINT((ndo, ", "));
 392         }
 393         ND_PRINT((ndo, "%s", tok2str(type_values, "Easter Egg", type)));
 394         if (count > 1)
 395             ND_PRINT((ndo, " (x%d)", count));
 396     }
 397 }
 398
 399 void
 400 hncp_print_rec(netdissect_options *ndo,
 401                const u_char *cp, u_int length, int indent)
 402 {
 403     const int in_line = is_in_line(ndo, indent);
 404     int first_one = 1;
 405
 406     u_int i, t;
 407
 408     uint32_t last_type_mask = 0xffffffffU;
 409     int last_type_count = -1;
 410
 411     const u_char *tlv, *value;
 412     uint16_t type, bodylen;
 413     uint32_t type_mask;
 414
 415     i = 0;
 416     while (i < length) {
 417         tlv = cp + i;
 418
 419         if (!in_line) {
 420             ND_PRINT((ndo, "\n"));
 421             for (t = indent; t > 0; t--)
 422                 ND_PRINT((ndo, "\t"));
 423         }
 424
 425         ND_TCHECK2(*tlv, 4);
 426         if (i + 4 > length)
 427             goto invalid;
 428
 429         type = EXTRACT_16BITS(tlv);
 430         bodylen = EXTRACT_16BITS(tlv + 2);
 431         value = tlv + 4;
 432         ND_TCHECK2(*value, bodylen);
 433         if (i + bodylen + 4 > length)
 434             goto invalid;
 435
 436         type_mask =
 437             (type == 0)                   ? RANGE_DNCP_RESERVED:
 438             (44 <= type && type <= 511)   ? RANGE_HNCP_UNASSIGNED:
 439             (768 <= type && type <= 1023) ? RANGE_DNCP_PRIVATE_USE:
 440                                             RANGE_DNCP_FUTURE_USE;
 441         if (type == 6 || type == 7)
 442             type_mask = RANGE_DNCP_FUTURE_USE;
 443
 444         /* defined types */
 445         {
 446             t = 0;
 447             while (1) {
 448                 u_int key = type_values[t++].v;
 449                 if (key > 0xffff)
 450                     break;
 451                 if (key == type) {
 452                     type_mask = type;
 453                     break;
 454                 }
 455             }
 456         }
 457
 458         if (in_line) {
 459             if (last_type_mask == type_mask) {
 460                 last_type_count++;
 461             } else {
 462                 print_type_in_line(ndo, last_type_mask, last_type_count, indent, &first_one);
 463                 last_type_mask = type_mask;
 464                 last_type_count = 1;
 465             }
 466
 467             goto skip_multiline;
 468         }
 469
 470         ND_PRINT((ndo,"%s", tok2str(type_values, "Easter Egg (42)", type_mask) ));
 471         if (type_mask > 0xffff)
 472             ND_PRINT((ndo,": type=%u", type ));
 473         ND_PRINT((ndo," (%u)", bodylen + 4 ));
 474
 475         switch (type_mask) {
 476
 477         case DNCP_REQUEST_NETWORK_STATE: {
 478             if (bodylen != 0)
 479                 ND_PRINT((ndo, " %s", istr));
 480         }
 481             break;
 482
 483         case DNCP_REQUEST_NODE_STATE: {
 484             const char *node_identifier;
 485             if (bodylen != 4) {
 486                 ND_PRINT((ndo, " %s", istr));
 487                 break;
 488             }
 489             node_identifier = format_nid(value);
 490             ND_PRINT((ndo, " NID: %s", node_identifier));
 491         }
 492             break;
 493
 494         case DNCP_NODE_ENDPOINT: {
 495             const char *node_identifier;
 496             uint32_t endpoint_identifier;
 497             if (bodylen != 8) {
 498                 ND_PRINT((ndo, " %s", istr));
 499                 break;
 500             }
 501             node_identifier = format_nid(value);
 502             endpoint_identifier = EXTRACT_32BITS(value + 4);
 503             ND_PRINT((ndo, " NID: %s EPID: %08x",
 504                 node_identifier,
 505                 endpoint_identifier
 506             ));
 507         }
 508             break;
 509
 510         case DNCP_NETWORK_STATE: {
 511             uint64_t hash;
 512             if (bodylen != 8) {
 513                 ND_PRINT((ndo, " %s", istr));
 514                 break;
 515             }
 516             hash = EXTRACT_64BITS(value);
 517             ND_PRINT((ndo, " hash: %016" PRIx64, hash));
 518         }
 519             break;
 520
 521         case DNCP_NODE_STATE: {
 522             const char *node_identifier, *interval;
 523             uint32_t sequence_number;
 524             uint64_t hash;
 525             if (bodylen < 20) {
 526                 ND_PRINT((ndo, " %s", istr));
 527                 break;
 528             }
 529             node_identifier = format_nid(value);
 530             sequence_number = EXTRACT_32BITS(value + 4);
 531             interval = format_interval(EXTRACT_32BITS(value + 8));
 532             hash = EXTRACT_64BITS(value + 12);
 533             ND_PRINT((ndo, " NID: %s seqno: %u %s hash: %016" PRIx64,
 534                 node_identifier,
 535                 sequence_number,
 536                 interval,
 537                 hash
 538             ));
 539             hncp_print_rec(ndo, value+20, bodylen-20, indent+1);
 540         }
 541             break;
 542
 543         case DNCP_PEER: {
 544             const char *peer_node_identifier;
 545             uint32_t peer_endpoint_identifier, endpoint_identifier;
 546             if (bodylen != 12) {
 547                 ND_PRINT((ndo, " %s", istr));
 548                 break;
 549             }
 550             peer_node_identifier = format_nid(value);
 551             peer_endpoint_identifier = EXTRACT_32BITS(value + 4);
 552             endpoint_identifier = EXTRACT_32BITS(value + 8);
 553             ND_PRINT((ndo, " Peer-NID: %s Peer-EPID: %08x Local-EPID: %08x",
 554                 peer_node_identifier,
 555                 peer_endpoint_identifier,
 556                 endpoint_identifier
 557             ));
 558         }
 559             break;
 560
 561         case DNCP_KEEP_ALIVE_INTERVAL: {
 562             uint32_t endpoint_identifier;
 563             const char *interval;
 564             if (bodylen < 8) {
 565                 ND_PRINT((ndo, " %s", istr));
 566                 break;
 567             }
 568             endpoint_identifier = EXTRACT_32BITS(value);
 569             interval = format_interval(EXTRACT_32BITS(value + 4));
 570             ND_PRINT((ndo, " EPID: %08x Interval: %s",
 571                 endpoint_identifier,
 572                 interval
 573             ));
 574         }
 575             break;
 576
 577         case DNCP_TRUST_VERDICT: {
 578             if (bodylen <= 36) {
 579                 ND_PRINT((ndo, " %s", istr));
 580                 break;
 581             }
 582             ND_PRINT((ndo, " Verdict: %u Fingerprint: %s Common Name: ",
 583                 *value,
 584                 format_256(value + 4)));
 585             safeputs(ndo, value + 36, bodylen - 36);
 586         }
 587             break;
 588
 589         case HNCP_HNCP_VERSION: {
 590             uint16_t capabilities;
 591             uint8_t M, P, H, L;
 592             if (bodylen < 5) {
 593                 ND_PRINT((ndo, " %s", istr));
 594                 break;
 595             }
 596             capabilities = EXTRACT_16BITS(value + 2);
 597             M = (uint8_t)((capabilities >> 12) & 0xf);
 598             P = (uint8_t)((capabilities >> 8) & 0xf);
 599             H = (uint8_t)((capabilities >> 4) & 0xf);
 600             L = (uint8_t)(capabilities & 0xf);
 601             ND_PRINT((ndo, " M: %u P: %u H: %u L: %u User-agent: ",
 602                 M, P, H, L
 603             ));
 604             safeputs(ndo, value + 4, bodylen - 4);
 605         }
 606             break;
 607
 608         case HNCP_EXTERNAL_CONNECTION: {
 609             /* Container TLV */
 610             hncp_print_rec(ndo, value, bodylen, indent+1);
 611         }
 612             break;
 613
 614         case HNCP_DELEGATED_PREFIX: {
 615             int l;
 616             if (bodylen < 9 || bodylen < 9 + (value[8] + 7) / 8) {
 617                 ND_PRINT((ndo, " %s", istr));
 618                 break;
 619             }
 620             ND_PRINT((ndo, " VLSO: %s PLSO: %s Prefix: ",
 621                 format_interval(EXTRACT_32BITS(value)),
 622                 format_interval(EXTRACT_32BITS(value + 4))
 623             ));
 624             l = print_prefix(ndo, value + 8, bodylen - 8);
 625             if (l == -1) {
 626                 ND_PRINT((ndo, "(length is invalid)"));
 627                 break;
 628             }
 629             if (l < 0) {
 630                 /*
 631                  * We've already checked that we've captured the
 632                  * entire TLV, based on its length, so this will
 633                  * either be -1, meaning "the prefix length is
 634                  * greater than the longest possible address of
 635                  * that type" (i.e., > 32 for IPv4 or > 128 for
 636                  * IPv6", or -3, meaning "the prefix runs past
 637                  * the end of the TLV".
 638                  */
 639                 ND_PRINT((ndo, " %s", istr));
 640                 break;
 641             }
 642             l += 8 + (-l & 3);
 643
 644             if (bodylen >= l)
 645                 hncp_print_rec(ndo, value + l, bodylen - l, indent+1);
 646         }
 647             break;
 648
 649         case HNCP_PREFIX_POLICY: {
 650             uint8_t policy;
 651             int l;
 652             if (bodylen < 1) {
 653                 ND_PRINT((ndo, " %s", istr));
 654                 break;
 655             }
 656             policy = value[0];
 657             ND_PRINT((ndo, " type: "));
 658             if (policy == 0) {
 659                 if (bodylen != 1) {
 660                     ND_PRINT((ndo, " %s", istr));
 661                     break;
 662                 }
 663                 ND_PRINT((ndo, "Internet connectivity"));
 664             } else if (policy >= 1 && policy <= 128) {
 665                 ND_PRINT((ndo, "Dest-Prefix: "));
 666                 l = print_prefix(ndo, value, bodylen);
 667                 if (l == -1) {
 668                     ND_PRINT((ndo, "(length is invalid)"));
 669                     break;
 670                 }
 671                 if (l < 0) {
 672                     /*
 673                      * We've already checked that we've captured the
 674                      * entire TLV, based on its length, so this will
 675                      * either be -1, meaning "the prefix length is
 676                      * greater than the longest possible address of
 677                      * that type" (i.e., > 32 for IPv4 or > 128 for
 678                      * IPv6", or -3, meaning "the prefix runs past
 679                      * the end of the TLV".
 680                      */
 681                     ND_PRINT((ndo, " %s", istr));
 682                     break;
 683                 }
 684             } else if (policy == 129) {
 685                 ND_PRINT((ndo, "DNS domain: "));
 686                 print_dns_label(ndo, value+1, bodylen-1, 1);
 687             } else if (policy == 130) {
 688                 ND_PRINT((ndo, "Opaque UTF-8: "));
 689                 safeputs(ndo, value + 1, bodylen - 1);
 690             } else if (policy == 131) {
 691                 if (bodylen != 1) {
 692                     ND_PRINT((ndo, " %s", istr));
 693                     break;
 694                 }
 695                 ND_PRINT((ndo, "Restrictive assignment"));
 696             } else if (policy >= 132) {
 697                 ND_PRINT((ndo, "Unknown (%u)", policy)); /* Reserved for future additions */
 698             }
 699         }
 700             break;
 701
 702         case HNCP_DHCPV4_DATA: {
 703             if (bodylen == 0) {
 704                 ND_PRINT((ndo, " %s", istr));
 705                 break;
 706             }
 707             if (dhcpv4_print(ndo, value, bodylen, indent+1) != 0)
 708                 goto invalid;
 709         }
 710             break;
 711
 712         case HNCP_DHCPV6_DATA: {
 713             if (bodylen == 0) {
 714                 ND_PRINT((ndo, " %s", istr));
 715                 break;
 716             }
 717             if (dhcpv6_print(ndo, value, bodylen, indent+1) != 0) {
 718                 ND_PRINT((ndo, " %s", istr));
 719                 break;
 720             }
 721         }
 722             break;
 723
 724         case HNCP_ASSIGNED_PREFIX: {
 725             uint8_t prty;
 726             int l;
 727             if (bodylen < 6 || bodylen < 6 + (value[5] + 7) / 8) {
 728                 ND_PRINT((ndo, " %s", istr));
 729                 break;
 730             }
 731             prty = (uint8_t)(value[4] & 0xf);
 732             ND_PRINT((ndo, " EPID: %08x Prty: %u",
 733                 EXTRACT_32BITS(value),
 734                 prty
 735             ));
 736             ND_PRINT((ndo, " Prefix: "));
 737             if ((l = print_prefix(ndo, value + 5, bodylen - 5)) < 0) {
 738                 ND_PRINT((ndo, " %s", istr));
 739                 break;
 740             }
 741             l += 5;
 742             l += -l & 3;
 743
 744             if (bodylen >= l)
 745                 hncp_print_rec(ndo, value + l, bodylen - l, indent+1);
 746         }
 747             break;
 748
 749         case HNCP_NODE_ADDRESS: {
 750             uint32_t endpoint_identifier;
 751             const char *ip_address;
 752             if (bodylen < 20) {
 753                 ND_PRINT((ndo, " %s", istr));
 754                 break;
 755             }
 756             endpoint_identifier = EXTRACT_32BITS(value);
 757             ip_address = format_ip6addr(ndo, value + 4);
 758             ND_PRINT((ndo, " EPID: %08x IP Address: %s",
 759                 endpoint_identifier,
 760                 ip_address
 761             ));
 762
 763             hncp_print_rec(ndo, value + 20, bodylen - 20, indent+1);
 764         }
 765             break;
 766
 767         case HNCP_DNS_DELEGATED_ZONE: {
 768             const char *ip_address;
 769             int len;
 770             if (bodylen < 17) {
 771                 ND_PRINT((ndo, " %s", istr));
 772                 break;
 773             }
 774             ip_address = format_ip6addr(ndo, value);
 775             ND_PRINT((ndo, " IP-Address: %s %c%c%c ",
 776                 ip_address,
 777                 (value[16] & 4) ? 'l' : '-',
 778                 (value[16] & 2) ? 'b' : '-',
 779                 (value[16] & 1) ? 's' : '-'
 780             ));
 781             len = print_dns_label(ndo, value+17, bodylen-17, 1);
 782             if (len < 0) {
 783                 ND_PRINT((ndo, " %s", istr));
 784                 break;
 785             }
 786             len += 17;
 787             len += -len & 3;
 788             if (bodylen >= len)
 789                 hncp_print_rec(ndo, value+len, bodylen-len, indent+1);
 790         }
 791             break;
 792
 793         case HNCP_DOMAIN_NAME: {
 794             if (bodylen == 0) {
 795                 ND_PRINT((ndo, " %s", istr));
 796                 break;
 797             }
 798             ND_PRINT((ndo, " Domain: "));
 799             print_dns_label(ndo, value, bodylen, 1);
 800         }
 801             break;
 802
 803         case HNCP_NODE_NAME: {
 804             u_int l;
 805             if (bodylen < 17) {
 806                 ND_PRINT((ndo, " %s", istr));
 807                 break;
 808             }
 809             l = value[16];
 810             if (bodylen < 17 + l) {
 811                 ND_PRINT((ndo, " %s", istr));
 812                 break;
 813             }
 814             ND_PRINT((ndo, " IP-Address: %s Name: ",
 815                 format_ip6addr(ndo, value)
 816             ));
 817             if (l < 64) {
 818                 safeputchar(ndo, '"');
 819                 safeputs(ndo, value + 17, l);
 820                 safeputchar(ndo, '"');
 821             } else {
 822                 ND_PRINT((ndo, "%s", istr));
 823             }
 824             l += 17;
 825             l += -l & 3;
 826             if (bodylen >= l)
 827                 hncp_print_rec(ndo, value + l, bodylen - l, indent+1);
 828         }
 829             break;
 830
 831         case HNCP_MANAGED_PSK: {
 832             if (bodylen < 32) {
 833                 ND_PRINT((ndo, " %s", istr));
 834                 break;
 835             }
 836             ND_PRINT((ndo, " PSK: %s", format_256(value)));
 837             hncp_print_rec(ndo, value + 32, bodylen - 32, indent+1);
 838         }
 839             break;
 840
 841         case RANGE_DNCP_RESERVED:
 842         case RANGE_HNCP_UNASSIGNED:
 843         case RANGE_DNCP_PRIVATE_USE:
 844         case RANGE_DNCP_FUTURE_USE:
 845             break;
 846
 847         }
 848     skip_multiline:
 849
 850         i += 4 + bodylen + (-bodylen & 3);
 851     }
 852     print_type_in_line(ndo, last_type_mask, last_type_count, indent, &first_one);
 853
 854     return;
 855
 856  trunc:
 857     ND_PRINT((ndo, "%s", "[|hncp]"));
 858     return;
 859
 860  invalid:
 861     ND_PRINT((ndo, "%s", istr));
 862     return;
 863 }