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"
45 static void babel_print_v2(netdissect_options
*, const u_char
*cp
, u_int length
);
48 babel_print(netdissect_options
*ndo
,
49 const u_char
*cp
, u_int length
)
51 ndo
->ndo_protocol
= "babel";
56 if(GET_U_1(cp
) != 42) {
57 ND_PRINT(" invalid header");
60 ND_PRINT(" %u", GET_U_1(cp
+ 1));
63 switch(GET_U_1(cp
+ 1)) {
65 babel_print_v2(ndo
, cp
, length
);
68 ND_PRINT(" unknown version");
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_ROUTE_REQUEST 9
90 #define MESSAGE_SEQNO_REQUEST 10
91 #define MESSAGE_TSPC 11
92 #define MESSAGE_HMAC 12
93 #define MESSAGE_UPDATE_SRC_SPECIFIC 13 /* last appearance in draft-boutier-babel-source-specific-01 */
94 #define MESSAGE_REQUEST_SRC_SPECIFIC 14 /* idem */
95 #define MESSAGE_MH_REQUEST_SRC_SPECIFIC 15 /* idem */
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(netdissect_options
*ndo
, const u_char
*id
)
114 nd_snprintf(buf
, 25, "%02x:%02x:%02x:%02x:%02x:%02x:%02x:%02x",
115 GET_U_1(id
), GET_U_1(id
+ 1), GET_U_1(id
+ 2),
116 GET_U_1(id
+ 3), GET_U_1(id
+ 4), GET_U_1(id
+ 5),
117 GET_U_1(id
+ 6), GET_U_1(id
+ 7));
122 static const unsigned char v4prefix
[16] =
123 {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0xFF, 0xFF, 0, 0, 0, 0 };
126 format_prefix(netdissect_options
*ndo
, const u_char
*prefix
, unsigned char plen
)
129 if(plen
>= 96 && memcmp(prefix
, v4prefix
, 12) == 0)
130 nd_snprintf(buf
, 50, "%s/%u", ipaddr_string(ndo
, prefix
+ 12), plen
- 96);
132 nd_snprintf(buf
, 50, "%s/%u", ip6addr_string(ndo
, prefix
), plen
);
138 format_address(netdissect_options
*ndo
, const u_char
*prefix
)
140 if(memcmp(prefix
, v4prefix
, 12) == 0)
141 return ipaddr_string(ndo
, prefix
+ 12);
143 return ip6addr_string(ndo
, prefix
);
147 format_interval(const uint16_t i
)
149 static char buf
[sizeof("000.00s")];
152 return "0.0s (bogus)";
153 nd_snprintf(buf
, sizeof(buf
), "%u.%02us", i
/ 100, i
% 100);
158 format_interval_update(const uint16_t i
)
160 return i
== 0xFFFF ? "infinity" : format_interval(i
);
164 format_timestamp(const uint32_t i
)
166 static char buf
[sizeof("0000.000000s")];
167 nd_snprintf(buf
, sizeof(buf
), "%u.%06us", i
/ 1000000, i
% 1000000);
171 /* Return number of octets consumed from the input buffer (not the prefix length
172 * in bytes), or -1 for encoding error. */
174 network_prefix(int ae
, int plen
, unsigned int omitted
,
175 const unsigned char *p
, const unsigned char *dp
,
176 unsigned int len
, unsigned char *p_r
)
179 unsigned char prefix
[16];
192 memset(prefix
, 0, 16);
197 if(omitted
> 4 || pb
> 4 || (pb
> omitted
&& len
< pb
- omitted
))
199 memcpy(prefix
, v4prefix
, 12);
201 if (dp
== NULL
) return -1;
202 memcpy(prefix
, dp
, 12 + omitted
);
205 memcpy(prefix
+ 12 + omitted
, p
, pb
- omitted
);
206 consumed
= pb
- omitted
;
210 if(omitted
> 16 || (pb
> omitted
&& len
< pb
- omitted
))
213 if (dp
== NULL
) return -1;
214 memcpy(prefix
, dp
, omitted
);
217 memcpy(prefix
+ omitted
, p
, pb
- omitted
);
218 consumed
= pb
- omitted
;
222 if(pb
> 8 && len
< pb
- 8) return -1;
226 memcpy(prefix
+ 8, p
, pb
- 8);
234 memcpy(p_r
, prefix
, 16);
239 network_address(int ae
, const unsigned char *a
, unsigned int len
,
242 return network_prefix(ae
, -1, 0, a
, NULL
, len
, a_r
);
246 * Sub-TLVs consume the "extra data" of Babel TLVs (see Section 4.3 of RFC6126),
247 * their encoding is similar to the encoding of TLVs, but the type namespace is
250 * o Type 0 stands for Pad1 sub-TLV with the same encoding as the Pad1 TLV.
251 * o Type 1 stands for PadN sub-TLV with the same encoding as the PadN TLV.
252 * o Type 2 stands for Diversity sub-TLV, which propagates diversity routing
253 * data. Its body is a variable-length sequence of 8-bit unsigned integers,
254 * each representing per-hop number of interfering radio channel for the
255 * prefix. Channel 0 is invalid and must not be used in the sub-TLV, channel
256 * 255 interferes with any other channel.
257 * o Type 3 stands for Timestamp sub-TLV, used to compute RTT between
258 * neighbours. In the case of a Hello TLV, the body stores a 32-bits
259 * timestamp, while in the case of a IHU TLV, two 32-bits timestamps are
262 * Sub-TLV types 0 and 1 are valid for any TLV type, whether sub-TLV type 2 is
263 * only valid for TLV type 8 (Update). Note that within an Update TLV a missing
264 * Diversity sub-TLV is not the same as a Diversity sub-TLV with an empty body.
265 * The former would mean a lack of any claims about the interference, and the
266 * latter would state that interference is definitely absent.
267 * A type 3 sub-TLV is valid both for Hello and IHU TLVs, though the exact
268 * semantic of the sub-TLV is different in each case.
271 subtlvs_print(netdissect_options
*ndo
,
272 const u_char
*cp
, const u_char
*ep
, const uint8_t tlv_type
)
274 uint8_t subtype
, sublen
;
279 subtype
= GET_U_1(cp
);
281 if(subtype
== MESSAGE_SUB_PAD1
) {
282 ND_PRINT(" sub-pad1");
287 sublen
= GET_U_1(cp
);
293 case MESSAGE_SUB_PADN
:
294 ND_PRINT(" sub-padn");
297 case MESSAGE_SUB_DIVERSITY
:
298 ND_PRINT(" sub-diversity");
305 ND_PRINT("%s%s", sep
,
306 tok2str(diversity_str
, "%u", GET_U_1(cp
)));
311 if(tlv_type
!= MESSAGE_UPDATE
&&
312 tlv_type
!= MESSAGE_UPDATE_SRC_SPECIFIC
)
313 ND_PRINT(" (bogus)");
315 case MESSAGE_SUB_TIMESTAMP
:
316 ND_PRINT(" sub-timestamp");
317 if(tlv_type
== MESSAGE_HELLO
) {
321 ND_PRINT(" %s", format_timestamp(t1
));
322 } else if(tlv_type
== MESSAGE_IHU
) {
326 ND_PRINT(" %s", format_timestamp(t1
));
327 t2
= GET_BE_U_4(cp
+ 4);
328 ND_PRINT("|%s", format_timestamp(t2
));
330 ND_PRINT(" (bogus)");
334 ND_PRINT(" sub-unknown-0x%02x", subtype
);
341 nd_print_invalid(ndo
);
344 #define ICHECK(i, l) \
345 if ((i) + (l) > bodylen || (i) + (l) > length) goto invalid;
348 babel_print_v2(netdissect_options
*ndo
,
349 const u_char
*cp
, u_int length
)
353 u_char v4_prefix
[16] =
354 {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0xFF, 0xFF, 0, 0, 0, 0 };
355 u_char v6_prefix
[16] = {0};
360 bodylen
= GET_BE_U_2(cp
+ 2);
361 ND_PRINT(" (%u)", bodylen
);
363 /* Process the TLVs in the body */
366 const u_char
*message
;
369 message
= cp
+ 4 + i
;
371 ND_TCHECK_1(message
);
372 if((type
= GET_U_1(message
)) == MESSAGE_PAD1
) {
373 ND_PRINT(ndo
->ndo_vflag
? "\n\tPad 1" : " pad1");
378 ND_TCHECK_2(message
);
380 len
= GET_U_1(message
+ 1);
382 ND_TCHECK_LEN(message
, 2 + len
);
390 ND_PRINT("\n\tPad %u", len
+ 2);
394 case MESSAGE_ACK_REQ
: {
395 u_short nonce
, interval
;
397 ND_PRINT(" ack-req");
399 ND_PRINT("\n\tAcknowledgment Request ");
400 if(len
< 6) goto invalid
;
401 nonce
= GET_BE_U_2(message
+ 4);
402 interval
= GET_BE_U_2(message
+ 6);
403 ND_PRINT("%04x %s", nonce
, format_interval(interval
));
413 ND_PRINT("\n\tAcknowledgment ");
414 if(len
< 2) goto invalid
;
415 nonce
= GET_BE_U_2(message
+ 2);
416 ND_PRINT("%04x", nonce
);
421 case MESSAGE_HELLO
: {
422 u_short seqno
, interval
;
426 ND_PRINT("\n\tHello ");
427 if(len
< 6) goto invalid
;
428 seqno
= GET_BE_U_2(message
+ 4);
429 interval
= GET_BE_U_2(message
+ 6);
430 ND_PRINT("seqno %u interval %s", seqno
, format_interval(interval
));
433 subtlvs_print(ndo
, message
+ 8, message
+ 2 + len
, type
);
439 unsigned short rxcost
, interval
;
446 ND_PRINT("\n\tIHU ");
447 if(len
< 6) goto invalid
;
448 rxcost
= GET_BE_U_2(message
+ 4);
449 interval
= GET_BE_U_2(message
+ 6);
450 ae
= GET_U_1(message
+ 2);
451 rc
= network_address(ae
, message
+ 8,
453 if(rc
< 0) { nd_print_trunc(ndo
); break; }
454 ND_PRINT("%s rxcost %u interval %s",
455 ae
== 0 ? "any" : format_address(ndo
, address
),
456 rxcost
, format_interval(interval
));
458 if((u_int
)rc
< len
- 6)
459 subtlvs_print(ndo
, message
+ 8 + rc
, message
+ 2 + len
,
465 case MESSAGE_ROUTER_ID
: {
467 ND_PRINT(" router-id");
469 ND_PRINT("\n\tRouter Id");
470 if(len
< 10) goto invalid
;
471 ND_PRINT(" %s", format_id(ndo
, message
+ 4));
483 ND_PRINT("\n\tNext Hop");
484 if(len
< 2) goto invalid
;
485 ae
= GET_U_1(message
+ 2);
486 rc
= network_address(ae
, message
+ 4,
488 if(rc
< 0) goto invalid
;
489 ND_PRINT(" %s", ae
== 0 ? "invalid AE 0" : format_address(ndo
, nh
));
494 case MESSAGE_UPDATE
: {
495 if (!ndo
->ndo_vflag
) {
498 ND_PRINT("/truncated");
501 (GET_U_1(message
+ 3) & 0x80) ? "/prefix": "",
502 (GET_U_1(message
+ 3) & 0x40) ? "/id" : "",
503 (GET_U_1(message
+ 3) & 0x3f) ? "/unknown" : "");
505 u_short interval
, seqno
, metric
;
509 ND_PRINT("\n\tUpdate");
510 if(len
< 10) goto invalid
;
511 ae
= GET_U_1(message
+ 2);
512 plen
= GET_U_1(message
+ 4) + (GET_U_1(message
+ 2) == 1 ? 96 : 0);
513 rc
= network_prefix(ae
,
514 GET_U_1(message
+ 4),
515 GET_U_1(message
+ 5),
517 GET_U_1(message
+ 2) == 1 ? v4_prefix
: v6_prefix
,
519 if(rc
< 0) goto invalid
;
520 interval
= GET_BE_U_2(message
+ 6);
521 seqno
= GET_BE_U_2(message
+ 8);
522 metric
= GET_BE_U_2(message
+ 10);
523 ND_PRINT("%s%s%s %s metric %u seqno %u interval %s",
524 (GET_U_1(message
+ 3) & 0x80) ? "/prefix": "",
525 (GET_U_1(message
+ 3) & 0x40) ? "/id" : "",
526 (GET_U_1(message
+ 3) & 0x3f) ? "/unknown" : "",
527 ae
== 0 ? "any" : format_prefix(ndo
, prefix
, plen
),
528 metric
, seqno
, format_interval_update(interval
));
529 if(GET_U_1(message
+ 3) & 0x80) {
530 if(GET_U_1(message
+ 2) == 1)
531 memcpy(v4_prefix
, prefix
, 16);
533 memcpy(v6_prefix
, prefix
, 16);
536 if((u_int
)rc
< len
- 10)
537 subtlvs_print(ndo
, message
+ 12 + rc
, message
+ 2 + len
, type
);
542 case MESSAGE_ROUTE_REQUEST
: {
544 ND_PRINT(" route-request");
547 u_char prefix
[16], ae
, plen
;
548 ND_PRINT("\n\tRoute Request ");
549 if(len
< 2) goto invalid
;
550 ae
= GET_U_1(message
+ 2);
551 plen
= GET_U_1(message
+ 3) + (GET_U_1(message
+ 2) == 1 ? 96 : 0);
552 rc
= network_prefix(ae
,
553 GET_U_1(message
+ 3), 0,
554 message
+ 4, NULL
, len
- 2, prefix
);
555 if(rc
< 0) goto invalid
;
557 ae
== 0 ? "any" : format_prefix(ndo
, prefix
, plen
));
562 case MESSAGE_SEQNO_REQUEST
: {
564 ND_PRINT(" seqno-request");
568 u_char prefix
[16], ae
, plen
;
569 ND_PRINT("\n\tSeqno Request ");
570 if(len
< 14) goto invalid
;
571 ae
= GET_U_1(message
+ 2);
572 seqno
= GET_BE_U_2(message
+ 4);
573 rc
= network_prefix(ae
,
574 GET_U_1(message
+ 3), 0,
575 message
+ 16, NULL
, len
- 14, prefix
);
576 if(rc
< 0) goto invalid
;
577 plen
= GET_U_1(message
+ 3) + (GET_U_1(message
+ 2) == 1 ? 96 : 0);
578 ND_PRINT("(%u hops) for %s seqno %u id %s",
579 GET_U_1(message
+ 6),
580 ae
== 0 ? "invalid AE 0" : format_prefix(ndo
, prefix
, plen
),
581 seqno
, format_id(ndo
, message
+ 8));
589 ND_PRINT("\n\tTS/PC ");
590 if(len
< 6) goto invalid
;
591 ND_PRINT("timestamp %u packetcounter %u",
592 GET_BE_U_4(message
+ 4),
593 GET_BE_U_2(message
+ 2));
596 case MESSAGE_HMAC
: {
601 ND_PRINT("\n\tHMAC ");
602 if(len
< 18) goto invalid
;
603 ND_PRINT("key-id %u digest-%u ", GET_BE_U_2(message
+ 2),
605 for (j
= 0; j
< len
- 2; j
++)
606 ND_PRINT("%02X", GET_U_1(message
+ j
+ 4));
611 case MESSAGE_UPDATE_SRC_SPECIFIC
: {
612 if(!ndo
->ndo_vflag
) {
613 ND_PRINT(" ss-update");
615 u_char prefix
[16], src_prefix
[16];
616 u_short interval
, seqno
, metric
;
617 u_char ae
, plen
, src_plen
, omitted
;
620 ND_PRINT("\n\tSS-Update");
621 if(len
< 10) goto invalid
;
622 ae
= GET_U_1(message
+ 2);
623 src_plen
= GET_U_1(message
+ 3);
624 plen
= GET_U_1(message
+ 4);
625 omitted
= GET_U_1(message
+ 5);
626 interval
= GET_BE_U_2(message
+ 6);
627 seqno
= GET_BE_U_2(message
+ 8);
628 metric
= GET_BE_U_2(message
+ 10);
629 rc
= network_prefix(ae
, plen
, omitted
, message
+ 2 + parsed_len
,
630 ae
== 1 ? v4_prefix
: v6_prefix
,
631 len
- parsed_len
, prefix
);
632 if(rc
< 0) goto invalid
;
636 rc
= network_prefix(ae
, src_plen
, 0, message
+ 2 + parsed_len
,
637 NULL
, len
- parsed_len
, src_prefix
);
638 if(rc
< 0) goto invalid
;
643 ND_PRINT(" %s from", format_prefix(ndo
, prefix
, plen
));
644 ND_PRINT(" %s metric %u seqno %u interval %s",
645 format_prefix(ndo
, src_prefix
, src_plen
),
646 metric
, seqno
, format_interval_update(interval
));
648 if((u_int
)parsed_len
< len
)
649 subtlvs_print(ndo
, message
+ 2 + parsed_len
,
650 message
+ 2 + len
, type
);
655 case MESSAGE_REQUEST_SRC_SPECIFIC
: {
657 ND_PRINT(" ss-request");
659 int rc
, parsed_len
= 3;
660 u_char ae
, plen
, src_plen
, prefix
[16], src_prefix
[16];
661 ND_PRINT("\n\tSS-Request ");
662 if(len
< 3) goto invalid
;
663 ae
= GET_U_1(message
+ 2);
664 plen
= GET_U_1(message
+ 3);
665 src_plen
= GET_U_1(message
+ 4);
666 rc
= network_prefix(ae
, plen
, 0, message
+ 2 + parsed_len
,
667 NULL
, len
- parsed_len
, prefix
);
668 if(rc
< 0) goto invalid
;
672 rc
= network_prefix(ae
, src_plen
, 0, message
+ 2 + parsed_len
,
673 NULL
, len
- parsed_len
, src_prefix
);
674 if(rc
< 0) goto invalid
;
681 ND_PRINT("for (%s, ", format_prefix(ndo
, prefix
, plen
));
682 ND_PRINT("%s)", format_prefix(ndo
, src_prefix
, src_plen
));
688 case MESSAGE_MH_REQUEST_SRC_SPECIFIC
: {
690 ND_PRINT(" ss-mh-request");
692 int rc
, parsed_len
= 14;
694 u_char ae
, plen
, src_plen
, prefix
[16], src_prefix
[16], hopc
;
695 const u_char
*router_id
= NULL
;
696 ND_PRINT("\n\tSS-MH-Request ");
697 if(len
< 14) goto invalid
;
698 ae
= GET_U_1(message
+ 2);
699 plen
= GET_U_1(message
+ 3);
700 seqno
= GET_BE_U_2(message
+ 4);
701 hopc
= GET_U_1(message
+ 6);
702 src_plen
= GET_U_1(message
+ 7);
703 router_id
= message
+ 8;
704 rc
= network_prefix(ae
, plen
, 0, message
+ 2 + parsed_len
,
705 NULL
, len
- parsed_len
, prefix
);
706 if(rc
< 0) goto invalid
;
710 rc
= network_prefix(ae
, src_plen
, 0, message
+ 2 + parsed_len
,
711 NULL
, len
- parsed_len
, src_prefix
);
712 if(rc
< 0) goto invalid
;
715 ND_PRINT("(%u hops) for (%s, ",
716 hopc
, format_prefix(ndo
, prefix
, plen
));
717 ND_PRINT("%s) seqno %u id %s",
718 format_prefix(ndo
, src_prefix
, src_plen
),
719 seqno
, format_id(ndo
, router_id
));
726 ND_PRINT(" unknown");
728 ND_PRINT("\n\tUnknown message type %u", type
);
739 nd_print_invalid(ndo
);