2 * Copyright (c) 2007-2011 Grégoire Henry, Juliusz Chroboczek
4 * Redistribution and use in source and binary forms, with or without
5 * modification, are permitted provided that the following conditions
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.
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
29 /* \summary: Babel Routing Protocol printer */
35 #include <netdissect-stdinc.h>
40 #include "netdissect.h"
41 #include "addrtoname.h"
44 static const char tstr[] = "[|babel]";
46 static void babel_print_v2(netdissect_options *, const u_char *cp, u_int length);
49 babel_print(netdissect_options *ndo,
50 const u_char *cp, u_int length)
52 ND_PRINT((ndo, "babel"));
57 ND_PRINT((ndo, " invalid header"));
60 ND_PRINT((ndo, " %d", cp[1]));
65 babel_print_v2(ndo, cp, length);
68 ND_PRINT((ndo, " unknown version"));
75 ND_PRINT((ndo, " %s", tstr));
80 #define MESSAGE_PAD1 0
81 #define MESSAGE_PADN 1
82 #define MESSAGE_ACK_REQ 2
84 #define MESSAGE_HELLO 4
86 #define MESSAGE_ROUTER_ID 6
88 #define MESSAGE_UPDATE 8
89 #define MESSAGE_REQUEST 9
90 #define MESSAGE_MH_REQUEST 10
91 #define MESSAGE_TSPC 11
92 #define MESSAGE_HMAC 12
93 #define MESSAGE_UPDATE_SRC_SPECIFIC 13
94 #define MESSAGE_REQUEST_SRC_SPECIFIC 14
95 #define MESSAGE_MH_REQUEST_SRC_SPECIFIC 15
98 #define MESSAGE_SUB_PAD1 0
99 #define MESSAGE_SUB_PADN 1
100 #define MESSAGE_SUB_DIVERSITY 2
101 #define MESSAGE_SUB_TIMESTAMP 3
103 /* Diversity sub-TLV channel codes */
104 static const struct tok diversity_str[] = {
111 format_id(const u_char *id)
114 snprintf(buf, 25, "%02x:%02x:%02x:%02x:%02x:%02x:%02x:%02x",
115 id[0], id[1], id[2], id[3], id[4], id[5], id[6], id[7]);
120 static const unsigned char v4prefix[16] =
121 {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0xFF, 0xFF, 0, 0, 0, 0 };
124 format_prefix(netdissect_options *ndo, const u_char *prefix, unsigned char plen)
127 if(plen >= 96 && memcmp(prefix, v4prefix, 12) == 0)
128 snprintf(buf, 50, "%s/%u", ipaddr_string(ndo, prefix + 12), plen - 96);
130 snprintf(buf, 50, "%s/%u", ip6addr_string(ndo, prefix), plen);
136 format_address(netdissect_options *ndo, const u_char *prefix)
138 if(memcmp(prefix, v4prefix, 12) == 0)
139 return ipaddr_string(ndo, prefix + 12);
141 return ip6addr_string(ndo, prefix);
145 format_interval(const uint16_t i)
147 static char buf[sizeof("000.00s")];
150 return "0.0s (bogus)";
151 snprintf(buf, sizeof(buf), "%u.%02us", i / 100, i % 100);
156 format_interval_update(const uint16_t i)
158 return i == 0xFFFF ? "infinity" : format_interval(i);
162 format_timestamp(const uint32_t i)
164 static char buf[sizeof("0000.000000s")];
165 snprintf(buf, sizeof(buf), "%u.%06us", i / 1000000, i % 1000000);
169 /* Return number of octets consumed from the input buffer (not the prefix length
170 * in bytes), or -1 for encoding error. */
172 network_prefix(int ae, int plen, unsigned int omitted,
173 const unsigned char *p, const unsigned char *dp,
174 unsigned int len, unsigned char *p_r)
177 unsigned char prefix[16];
190 memset(prefix, 0, 16);
195 if(omitted > 4 || pb > 4 || (pb > omitted && len < pb - omitted))
197 memcpy(prefix, v4prefix, 12);
199 if (dp == NULL) return -1;
200 memcpy(prefix, dp, 12 + omitted);
203 memcpy(prefix + 12 + omitted, p, pb - omitted);
204 consumed = pb - omitted;
208 if(omitted > 16 || (pb > omitted && len < pb - omitted))
211 if (dp == NULL) return -1;
212 memcpy(prefix, dp, omitted);
215 memcpy(prefix + omitted, p, pb - omitted);
216 consumed = pb - omitted;
220 if(pb > 8 && len < pb - 8) return -1;
224 memcpy(prefix + 8, p, pb - 8);
232 memcpy(p_r, prefix, 16);
237 network_address(int ae, const unsigned char *a, unsigned int len,
240 return network_prefix(ae, -1, 0, a, NULL, len, a_r);
244 * Sub-TLVs consume the "extra data" of Babel TLVs (see Section 4.3 of RFC6126),
245 * their encoding is similar to the encoding of TLVs, but the type namespace is
248 * o Type 0 stands for Pad1 sub-TLV with the same encoding as the Pad1 TLV.
249 * o Type 1 stands for PadN sub-TLV with the same encoding as the PadN TLV.
250 * o Type 2 stands for Diversity sub-TLV, which propagates diversity routing
251 * data. Its body is a variable-length sequence of 8-bit unsigned integers,
252 * each representing per-hop number of interferring radio channel for the
253 * prefix. Channel 0 is invalid and must not be used in the sub-TLV, channel
254 * 255 interferes with any other channel.
255 * o Type 3 stands for Timestamp sub-TLV, used to compute RTT between
256 * neighbours. In the case of a Hello TLV, the body stores a 32-bits
257 * timestamp, while in the case of a IHU TLV, two 32-bits timestamps are
260 * Sub-TLV types 0 and 1 are valid for any TLV type, whether sub-TLV type 2 is
261 * only valid for TLV type 8 (Update). Note that within an Update TLV a missing
262 * Diversity sub-TLV is not the same as a Diversity sub-TLV with an empty body.
263 * The former would mean a lack of any claims about the interference, and the
264 * latter would state that interference is definitely absent.
265 * A type 3 sub-TLV is valid both for Hello and IHU TLVs, though the exact
266 * semantic of the sub-TLV is different in each case.
269 subtlvs_print(netdissect_options *ndo,
270 const u_char *cp, const u_char *ep, const uint8_t tlv_type)
272 uint8_t subtype, sublen;
278 if(subtype == MESSAGE_SUB_PAD1) {
279 ND_PRINT((ndo, " sub-pad1"));
289 case MESSAGE_SUB_PADN:
290 ND_PRINT((ndo, " sub-padn"));
293 case MESSAGE_SUB_DIVERSITY:
294 ND_PRINT((ndo, " sub-diversity"));
296 ND_PRINT((ndo, " empty"));
301 ND_PRINT((ndo, "%s%s", sep, tok2str(diversity_str, "%u", *cp++)));
304 if(tlv_type != MESSAGE_UPDATE &&
305 tlv_type != MESSAGE_UPDATE_SRC_SPECIFIC)
306 ND_PRINT((ndo, " (bogus)"));
308 case MESSAGE_SUB_TIMESTAMP:
309 ND_PRINT((ndo, " sub-timestamp"));
310 if(tlv_type == MESSAGE_HELLO) {
313 t1 = EXTRACT_32BITS(cp);
314 ND_PRINT((ndo, " %s", format_timestamp(t1)));
315 } else if(tlv_type == MESSAGE_IHU) {
318 t1 = EXTRACT_32BITS(cp);
319 ND_PRINT((ndo, " %s", format_timestamp(t1)));
320 t2 = EXTRACT_32BITS(cp + 4);
321 ND_PRINT((ndo, "|%s", format_timestamp(t2)));
323 ND_PRINT((ndo, " (bogus)"));
327 ND_PRINT((ndo, " sub-unknown-0x%02x", subtype));
334 ND_PRINT((ndo, "%s", istr));
337 #define ICHECK(i, l) \
338 if ((i) + (l) > bodylen || (i) + (l) > length) goto invalid;
341 babel_print_v2(netdissect_options *ndo,
342 const u_char *cp, u_int length)
346 u_char v4_prefix[16] =
347 {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0xFF, 0xFF, 0, 0, 0, 0 };
348 u_char v6_prefix[16] = {0};
353 bodylen = EXTRACT_16BITS(cp + 2);
354 ND_PRINT((ndo, " (%u)", bodylen));
355 if (4U + bodylen > length)
358 /* Process the TLVs in the body */
361 const u_char *message;
364 message = cp + 4 + i;
366 ND_TCHECK2(*message, 1);
367 if((type = message[0]) == MESSAGE_PAD1) {
368 ND_PRINT((ndo, ndo->ndo_vflag ? "\n\tPad 1" : " pad1"));
373 ND_TCHECK2(*message, 2);
377 ND_TCHECK2(*message, 2 + len);
383 ND_PRINT((ndo, " padN"));
385 ND_PRINT((ndo, "\n\tPad %d", len + 2));
389 case MESSAGE_ACK_REQ: {
390 u_short nonce, interval;
392 ND_PRINT((ndo, " ack-req"));
394 ND_PRINT((ndo, "\n\tAcknowledgment Request "));
395 if(len < 6) goto invalid;
396 nonce = EXTRACT_16BITS(message + 4);
397 interval = EXTRACT_16BITS(message + 6);
398 ND_PRINT((ndo, "%04x %s", nonce, format_interval(interval)));
406 ND_PRINT((ndo, " ack"));
408 ND_PRINT((ndo, "\n\tAcknowledgment "));
409 if(len < 2) goto invalid;
410 nonce = EXTRACT_16BITS(message + 2);
411 ND_PRINT((ndo, "%04x", nonce));
416 case MESSAGE_HELLO: {
417 u_short seqno, interval;
419 ND_PRINT((ndo, " hello"));
421 ND_PRINT((ndo, "\n\tHello "));
422 if(len < 6) goto invalid;
423 seqno = EXTRACT_16BITS(message + 4);
424 interval = EXTRACT_16BITS(message + 6);
425 ND_PRINT((ndo, "seqno %u interval %s", seqno, format_interval(interval)));
428 subtlvs_print(ndo, message + 8, message + 2 + len, type);
434 unsigned short txcost, interval;
436 ND_PRINT((ndo, " ihu"));
440 ND_PRINT((ndo, "\n\tIHU "));
441 if(len < 6) goto invalid;
442 txcost = EXTRACT_16BITS(message + 4);
443 interval = EXTRACT_16BITS(message + 6);
444 rc = network_address(message[2], message + 8, len - 6, address);
445 if(rc < 0) { ND_PRINT((ndo, "%s", tstr)); break; }
446 ND_PRINT((ndo, "%s txcost %u interval %s",
447 format_address(ndo, address), txcost, format_interval(interval)));
449 if((u_int)rc < len - 6)
450 subtlvs_print(ndo, message + 8 + rc, message + 2 + len,
456 case MESSAGE_ROUTER_ID: {
458 ND_PRINT((ndo, " router-id"));
460 ND_PRINT((ndo, "\n\tRouter Id"));
461 if(len < 10) goto invalid;
462 ND_PRINT((ndo, " %s", format_id(message + 4)));
469 ND_PRINT((ndo, " nh"));
473 ND_PRINT((ndo, "\n\tNext Hop"));
474 if(len < 2) goto invalid;
475 rc = network_address(message[2], message + 4, len - 2, nh);
476 if(rc < 0) goto invalid;
477 ND_PRINT((ndo, " %s", format_address(ndo, nh)));
482 case MESSAGE_UPDATE: {
483 if (!ndo->ndo_vflag) {
484 ND_PRINT((ndo, " update"));
486 ND_PRINT((ndo, "/truncated"));
488 ND_PRINT((ndo, "%s%s%s",
489 (message[3] & 0x80) ? "/prefix": "",
490 (message[3] & 0x40) ? "/id" : "",
491 (message[3] & 0x3f) ? "/unknown" : ""));
493 u_short interval, seqno, metric;
497 ND_PRINT((ndo, "\n\tUpdate"));
498 if(len < 10) goto invalid;
499 plen = message[4] + (message[2] == 1 ? 96 : 0);
500 rc = network_prefix(message[2], message[4], message[5],
502 message[2] == 1 ? v4_prefix : v6_prefix,
504 if(rc < 0) goto invalid;
505 interval = EXTRACT_16BITS(message + 6);
506 seqno = EXTRACT_16BITS(message + 8);
507 metric = EXTRACT_16BITS(message + 10);
508 ND_PRINT((ndo, "%s%s%s %s metric %u seqno %u interval %s",
509 (message[3] & 0x80) ? "/prefix": "",
510 (message[3] & 0x40) ? "/id" : "",
511 (message[3] & 0x3f) ? "/unknown" : "",
512 format_prefix(ndo, prefix, plen),
513 metric, seqno, format_interval_update(interval)));
514 if(message[3] & 0x80) {
516 memcpy(v4_prefix, prefix, 16);
518 memcpy(v6_prefix, prefix, 16);
521 if((u_int)rc < len - 10)
522 subtlvs_print(ndo, message + 12 + rc, message + 2 + len, type);
527 case MESSAGE_REQUEST: {
529 ND_PRINT((ndo, " request"));
532 u_char prefix[16], plen;
533 ND_PRINT((ndo, "\n\tRequest "));
534 if(len < 2) goto invalid;
535 plen = message[3] + (message[2] == 1 ? 96 : 0);
536 rc = network_prefix(message[2], message[3], 0,
537 message + 4, NULL, len - 2, prefix);
538 if(rc < 0) goto invalid;
539 ND_PRINT((ndo, "for %s",
540 message[2] == 0 ? "any" : format_prefix(ndo, prefix, plen)));
545 case MESSAGE_MH_REQUEST : {
547 ND_PRINT((ndo, " mh-request"));
551 u_char prefix[16], plen;
552 ND_PRINT((ndo, "\n\tMH-Request "));
553 if(len < 14) goto invalid;
554 seqno = EXTRACT_16BITS(message + 4);
555 rc = network_prefix(message[2], message[3], 0,
556 message + 16, NULL, len - 14, prefix);
557 if(rc < 0) goto invalid;
558 plen = message[3] + (message[2] == 1 ? 96 : 0);
559 ND_PRINT((ndo, "(%u hops) for %s seqno %u id %s",
560 message[6], format_prefix(ndo, prefix, plen),
561 seqno, format_id(message + 8)));
567 ND_PRINT((ndo, " tspc"));
569 ND_PRINT((ndo, "\n\tTS/PC "));
570 if(len < 6) goto invalid;
571 ND_PRINT((ndo, "timestamp %u packetcounter %u", EXTRACT_32BITS (message + 4),
572 EXTRACT_16BITS(message + 2)));
575 case MESSAGE_HMAC : {
577 ND_PRINT((ndo, " hmac"));
580 ND_PRINT((ndo, "\n\tHMAC "));
581 if(len < 18) goto invalid;
582 ND_PRINT((ndo, "key-id %u digest-%u ", EXTRACT_16BITS(message + 2), len - 2));
583 for (j = 0; j < len - 2; j++)
584 ND_PRINT((ndo, "%02X", message[4 + j]));
589 case MESSAGE_UPDATE_SRC_SPECIFIC : {
590 if(!ndo->ndo_vflag) {
591 ND_PRINT((ndo, " ss-update"));
593 u_char prefix[16], src_prefix[16];
594 u_short interval, seqno, metric;
595 u_char ae, plen, src_plen, omitted;
598 ND_PRINT((ndo, "\n\tSS-Update"));
599 if(len < 10) goto invalid;
601 src_plen = message[3];
603 omitted = message[5];
604 interval = EXTRACT_16BITS(message + 6);
605 seqno = EXTRACT_16BITS(message + 8);
606 metric = EXTRACT_16BITS(message + 10);
607 rc = network_prefix(ae, plen, omitted, message + 2 + parsed_len,
608 ae == 1 ? v4_prefix : v6_prefix,
609 len - parsed_len, prefix);
610 if(rc < 0) goto invalid;
614 rc = network_prefix(ae, src_plen, 0, message + 2 + parsed_len,
615 NULL, len - parsed_len, src_prefix);
616 if(rc < 0) goto invalid;
621 ND_PRINT((ndo, " %s from", format_prefix(ndo, prefix, plen)));
622 ND_PRINT((ndo, " %s metric %u seqno %u interval %s",
623 format_prefix(ndo, src_prefix, src_plen),
624 metric, seqno, format_interval_update(interval)));
626 if((u_int)parsed_len < len)
627 subtlvs_print(ndo, message + 2 + parsed_len,
628 message + 2 + len, type);
633 case MESSAGE_REQUEST_SRC_SPECIFIC : {
635 ND_PRINT((ndo, " ss-request"));
637 int rc, parsed_len = 3;
638 u_char ae, plen, src_plen, prefix[16], src_prefix[16];
639 ND_PRINT((ndo, "\n\tSS-Request "));
640 if(len < 3) goto invalid;
643 src_plen = message[4];
644 rc = network_prefix(ae, plen, 0, message + 2 + parsed_len,
645 NULL, len - parsed_len, prefix);
646 if(rc < 0) goto invalid;
650 rc = network_prefix(ae, src_plen, 0, message + 2 + parsed_len,
651 NULL, len - parsed_len, src_prefix);
652 if(rc < 0) goto invalid;
657 ND_PRINT((ndo, "for any"));
659 ND_PRINT((ndo, "for (%s, ", format_prefix(ndo, prefix, plen)));
660 ND_PRINT((ndo, "%s)", format_prefix(ndo, src_prefix, src_plen)));
666 case MESSAGE_MH_REQUEST_SRC_SPECIFIC : {
668 ND_PRINT((ndo, " ss-mh-request"));
670 int rc, parsed_len = 14;
672 u_char ae, plen, src_plen, prefix[16], src_prefix[16], hopc;
673 const u_char *router_id = NULL;
674 ND_PRINT((ndo, "\n\tSS-MH-Request "));
675 if(len < 14) goto invalid;
678 seqno = EXTRACT_16BITS(message + 4);
680 src_plen = message[7];
681 router_id = message + 8;
682 rc = network_prefix(ae, plen, 0, message + 2 + parsed_len,
683 NULL, len - parsed_len, prefix);
684 if(rc < 0) goto invalid;
688 rc = network_prefix(ae, src_plen, 0, message + 2 + parsed_len,
689 NULL, len - parsed_len, src_prefix);
690 if(rc < 0) goto invalid;
693 ND_PRINT((ndo, "(%u hops) for (%s, ",
694 hopc, format_prefix(ndo, prefix, plen)));
695 ND_PRINT((ndo, "%s) seqno %u id %s",
696 format_prefix(ndo, src_prefix, src_plen),
697 seqno, format_id(router_id)));
704 ND_PRINT((ndo, " unknown"));
706 ND_PRINT((ndo, "\n\tUnknown message type %d", type));
713 ND_PRINT((ndo, " %s", tstr));
717 ND_PRINT((ndo, "%s", istr));