]> The Tcpdump Group git mirrors - tcpdump/blob - print-lisp.c
projects / tcpdump / blob


24255564d8dc3f5d16ad80fe9fd998629ffbe965
[tcpdump] / print-lisp.c
1 /*
2 * Copyright (c) 2015 Ritesh Ranjan (r.ranjan789@gmail.com)
3 * All rights reserved.
4 *
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that the following conditions
7 * are met:
8 * 1. Redistributions of source code must retain the above copyright
9 * notice, this list of conditions and the following disclaimer.
10 * 2. Redistributions in binary form must reproduce the above copyright
11 * notice, this list of conditions and the following disclaimer in the
12 * documentation and/or other materials provided with the distribution.
13 * 3. The name of the author may not be used to endorse or promote products
14 * derived from this software without specific prior written permission.
15 *
16 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
17 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
18 * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
19 * DISCLAIMED. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT,
20 * INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
21 * (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR
22 * SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
23 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT,
24 * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN
25 * ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
26 * POSSIBILITY OF SUCH DAMAGE.
27 */
28
29 /* \summary: - Locator/Identifier Separation Protocol (LISP) printer */
30
31 /*
32 * specification: RFC 6830
33 *
34 *
35 * The Map-Register message format is:
36 *
37 * 0 1 2 3
38 * 0 1 2 3 4 5 6 7 8 9 0 1 2 3 4 5 6 7 8 9 0 1 2 3 4 5 6 7 8 9 0 1
39 * +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+
40 * |Type=3 |P|S|I|R| Reserved |M| Record Count |
41 * +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+
42 * | Nonce . . . |
43 * +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+
44 * | . . . Nonce |
45 * +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+
46 * | Key ID | Authentication Data Length |
47 * +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+
48 * ~ Authentication Data ~
49 * +-> +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+
50 * | | Record TTL |
51 * | +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+
52 * R | Locator Count | EID mask-len | ACT |A| Reserved |
53 * e +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+
54 * c | Rsvd | Map-Version Number | EID-Prefix-AFI |
55 * o +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+
56 * r | EID-Prefix |
57 * d +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+
58 * | /| Priority | Weight | M Priority | M Weight |
59 * | L +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+
60 * | o | Unused Flags |L|p|R| Loc-AFI |
61 * | c +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+
62 * | \| Locator |
63 * +-> +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+
64 *
65 *
66 * The Map-Notify message format is:
67 *
68 * 0 1 2 3
69 * 0 1 2 3 4 5 6 7 8 9 0 1 2 3 4 5 6 7 8 9 0 1 2 3 4 5 6 7 8 9 0 1
70 * +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+
71 * |Type=4 |I|R| Reserved | Record Count |
72 * +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+
73 * | Nonce . . . |
74 * +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+
75 * | . . . Nonce |
76 * +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+
77 * | Key ID | Authentication Data Length |
78 * +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+
79 * ~ Authentication Data ~
80 * +-> +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+
81 * | | Record TTL |
82 * | +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+
83 * R | Locator Count | EID mask-len | ACT |A| Reserved |
84 * e +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+
85 * c | Rsvd | Map-Version Number | EID-Prefix-AFI |
86 * o +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+
87 * r | EID-Prefix |
88 * d +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+
89 * | /| Priority | Weight | M Priority | M Weight |
90 * | L +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+
91 * | o | Unused Flags |L|p|R| Loc-AFI |
92 * | c +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+
93 * | \| Locator |
94 * +-> +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+
95 */
96
97 #include <config.h>
98
99 #include "netdissect-stdinc.h"
100
101 #define ND_LONGJMP_FROM_TCHECK
102 #include "netdissect.h"
103
104 #include "ip.h"
105 #include "ip6.h"
106
107 #include "extract.h"
108 #include "addrtoname.h"
109
110 #define IPv4_AFI 1
111 #define IPv6_AFI 2
112 #define TYPE_INDEX 4
113 #define LISP_MAP_NOTIFY_IBIT_MASK 8
114 #define LISP_MAP_REGISTER_IBIT_MASK 2
115
116 enum {
117 LISP_MAP_REQUEST = 1,
118 LISP_MAP_REPLY,
119 LISP_MAP_REGISTER,
120 LISP_MAP_NOTIFY,
121 LISP_ENCAPSULATED_CONTROL_MESSAGE = 8
122 };
123
124 enum {
125 LISP_AUTH_NONE,
126 LISP_AUTH_SHA1,
127 LISP_AUTH_SHA256
128 };
129
130 static const struct tok lisp_type [] = {
131 { 0, "LISP-Reserved" },
132 { 1, "LISP-Map-Request" },
133 { 2, "LISP-Map-Reply" },
134 { 3, "LISP-Map-Register" },
135 { 4, "LISP-Map-Notify" },
136 { 8, "LISP-Encapsulated-Control-Message" },
137 { 0, NULL }
138 };
139
140 /*
141 * P-Bit : Request for Proxy Map-Reply from the MS/MR
142 * S-Bit : Security Enhancement. ETR is LISP-SEC enabled. draft-ietf-lisp-sec
143 * I-Bit : 128 bit xTR-ID and 64 bit Site-ID present.
144 * xTR-ID and Site-ID help in differentiation of xTRs in multi xTR
145 * and multi Site deployment scenarios.
146 * R-Bit : Built for a Reencapsulating-Tunnel-Router. Used in Traffic
147 * Engineering and Service Chaining
148 */
149 static const struct tok map_register_hdr_flag[] = {
150 { 0x08000000, "P-Proxy-Map-Reply" },
151 { 0x04000000, "S-LISP-SEC-Capable" },
152 { 0x02000000, "I-xTR-ID-Present" },
153 { 0x01000000, "R-Build-For-RTR" },
154 { 0x00000100, "M-Want-Map-Notify" },
155 { 0, NULL }
156 };
157
158 static const struct tok map_notify_hdr_flag[] = {
159 { 0x08000000, "I-xTR-ID-Present" },
160 { 0x04000000, "R-Build-For-RTR" },
161 { 0, NULL }
162 };
163
164 static const struct tok auth_type[] = {
165 { LISP_AUTH_NONE, "None" },
166 { LISP_AUTH_SHA1, "SHA1" },
167 { LISP_AUTH_SHA256, "SHA256" },
168 { 0, NULL}
169 };
170
171 static const struct tok lisp_eid_action[] = {
172 { 0, "No-Action" },
173 { 1, "Natively-Forward" },
174 { 2, "Send-Map-Request" },
175 { 3, "Drop" },
176 { 0, NULL}
177 };
178
179 static const struct tok lisp_loc_flag[] = {
180 { 0x0004, "Local-Locator" },
181 { 0x0002, "RLoc-Probed" },
182 { 0x0001, "Reachable" },
183 { 0, NULL }
184 };
185
186 typedef struct map_register_hdr {
187 nd_uint8_t type_and_flag;
188 nd_uint8_t reserved;
189 nd_uint8_t reserved_and_flag2;
190 nd_uint8_t record_count;
191 nd_uint64_t nonce;
192 nd_uint16_t key_id;
193 nd_uint16_t auth_data_len;
194 } lisp_map_register_hdr;
195
196 #define MAP_REGISTER_HDR_LEN sizeof(lisp_map_register_hdr)
197
198 typedef struct map_register_eid {
199 nd_uint32_t ttl;
200 nd_uint8_t locator_count;
201 nd_uint8_t eid_prefix_mask_length;
202 nd_uint8_t act_auth_inc_res;
203 nd_uint8_t reserved;
204 nd_uint16_t reserved_and_version;
205 nd_uint16_t eid_prefix_afi;
206 } lisp_map_register_eid;
207
208 #define MAP_REGISTER_EID_LEN sizeof(lisp_map_register_eid)
209
210 typedef struct map_register_loc {
211 nd_uint8_t priority;
212 nd_uint8_t weight;
213 nd_uint8_t m_priority;
214 nd_uint8_t m_weight;
215 nd_uint16_t unused_and_flag;
216 nd_uint16_t locator_afi;
217 } lisp_map_register_loc;
218
219 #define MAP_REGISTER_LOC_LEN sizeof(lisp_map_register_loc)
220
221 static uint8_t extract_lisp_type(uint8_t);
222 static uint8_t is_xtr_data_present(uint8_t, uint8_t);
223 static void lisp_hdr_flag(netdissect_options *, const lisp_map_register_hdr *);
224 static void action_flag(netdissect_options *, uint8_t);
225 static void loc_hdr_flag(netdissect_options *, uint16_t);
226
227 void
228 lisp_print(netdissect_options *ndo, const u_char *bp, u_int length)
229 {
230 uint8_t type_and_flag;
231 uint8_t type;
232 uint8_t mask_len;
233 uint8_t loc_count;
234 uint8_t xtr_present;
235 uint8_t record_count;
236 uint16_t key_id;
237 uint16_t eid_afi;
238 uint16_t loc_afi;
239 uint16_t map_version;
240 uint16_t packet_offset;
241 uint16_t auth_data_len;
242 uint32_t ttl;
243 const lisp_map_register_hdr *lisp_hdr;
244 const lisp_map_register_eid *lisp_eid;
245 const lisp_map_register_loc *lisp_loc;
246
247 ndo->ndo_protocol = "lisp";
248 lisp_hdr = (const lisp_map_register_hdr *) bp;
249 lisp_hdr_flag(ndo, lisp_hdr);
250 /* Supporting only MAP NOTIFY and MAP REGISTER LISP packets */
251 type_and_flag = GET_U_1(lisp_hdr->type_and_flag);
252 type = extract_lisp_type(type_and_flag);
253 if ((type != LISP_MAP_REGISTER) && (type != LISP_MAP_NOTIFY)) {
254 ND_TCHECK_LEN(bp, MAP_REGISTER_HDR_LEN);
255 return;
256 }
257
258 /* Find if the packet contains xTR and Site-ID data */
259 xtr_present = is_xtr_data_present(type, type_and_flag);
260
261 /* Extract the number of EID records present */
262 auth_data_len = GET_BE_U_2(lisp_hdr->auth_data_len);
263 packet_offset = MAP_REGISTER_HDR_LEN;
264 record_count = GET_U_1(lisp_hdr->record_count);
265
266 if (ndo->ndo_vflag) {
267 key_id = GET_BE_U_2(lisp_hdr->key_id);
268 ND_PRINT("\n %u record(s), ", record_count);
269 ND_PRINT("Authentication %s,",
270 tok2str(auth_type, "unknown-type", key_id));
271 hex_print(ndo, "\n Authentication-Data: ",
272 bp + packet_offset, auth_data_len);
273 } else {
274 ND_PRINT(" %u record(s),", record_count);
275 }
276 packet_offset += auth_data_len;
277
278 ND_ICHECK_U(record_count, ==, 0);
279
280 /* Print all the EID records */
281 while ((length > packet_offset) && (record_count != 0)) {
282 record_count--;
283 ND_TCHECK_LEN(bp + packet_offset, MAP_REGISTER_EID_LEN);
284 ND_PRINT("\n");
285 lisp_eid = (const lisp_map_register_eid *) (bp + packet_offset);
286 packet_offset += MAP_REGISTER_EID_LEN;
287 mask_len = GET_U_1(lisp_eid->eid_prefix_mask_length);
288 eid_afi = GET_BE_U_2(lisp_eid->eid_prefix_afi);
289 loc_count = GET_U_1(lisp_eid->locator_count);
290
291 if (ndo->ndo_vflag) {
292 ttl = GET_BE_U_4(lisp_eid->ttl);
293 ND_PRINT(" Record TTL %u,", ttl);
294 action_flag(ndo, GET_U_1(lisp_eid->act_auth_inc_res));
295 map_version = GET_BE_U_2(lisp_eid->reserved_and_version) & 0x0FFF;
296 ND_PRINT(" Map Version: %u,", map_version);
297 }
298
299 switch (eid_afi) {
300 case IPv4_AFI:
301 ND_PRINT(" EID %s/%u,",
302 GET_IPADDR_STRING(bp + packet_offset),
303 mask_len);
304 packet_offset += 4;
305 break;
306 case IPv6_AFI:
307 ND_PRINT(" EID %s/%u,",
308 GET_IP6ADDR_STRING(bp + packet_offset),
309 mask_len);
310 packet_offset += 16;
311 break;
312 default:
313 /*
314 * No support for LCAF right now.
315 */
316 return;
317 }
318
319 ND_PRINT(" %u locator(s)", loc_count);
320
321 while (loc_count != 0) {
322 loc_count--;
323 ND_TCHECK_LEN(bp + packet_offset, MAP_REGISTER_LOC_LEN);
324 lisp_loc = (const lisp_map_register_loc *) (bp + packet_offset);
325 packet_offset += MAP_REGISTER_LOC_LEN;
326 loc_afi = GET_BE_U_2(lisp_loc->locator_afi);
327
328 if (ndo->ndo_vflag)
329 ND_PRINT("\n ");
330
331 switch (loc_afi) {
332 case IPv4_AFI:
333 ND_PRINT(" LOC %s",
334 GET_IPADDR_STRING(bp + packet_offset));
335 packet_offset += 4;
336 break;
337 case IPv6_AFI:
338 ND_PRINT(" LOC %s",
339 GET_IP6ADDR_STRING(bp + packet_offset));
340 packet_offset += 16;
341 break;
342 default:
343 break;
344 }
345 if (ndo->ndo_vflag) {
346 ND_PRINT("\n Priority/Weight %u/%u,"
347 " Multicast Priority/Weight %u/%u,",
348 GET_U_1(lisp_loc->priority),
349 GET_U_1(lisp_loc->weight),
350 GET_U_1(lisp_loc->m_priority),
351 GET_U_1(lisp_loc->m_weight));
352 loc_hdr_flag(ndo,
353 GET_BE_U_2(lisp_loc->unused_and_flag));
354 }
355 }
356 }
357
358 /*
359 * Print xTR and Site ID.
360 * If the xTR_ID_Present bit is not set, and we still have data to
361 * display, show it as hex data.
362 */
363 if (xtr_present) {
364 hex_print(ndo, "\n xTR-ID: ", bp + packet_offset, 16);
365 ND_PRINT("\n SITE-ID: %" PRIu64,
366 GET_BE_U_8(bp + packet_offset + 16));
367 } else {
368 /* If there's at least one byte to print */
369 if (ND_TTEST_LEN(bp + packet_offset, 1)) {
370 hex_print(ndo, "\n Data: ", bp + packet_offset,
371 ND_BYTES_AVAILABLE_AFTER(bp + packet_offset));
372 }
373 }
374 return;
375
376 invalid:
377 nd_print_invalid(ndo);
378 }
379
380 static uint8_t
381 extract_lisp_type(uint8_t lisp_hdr_flags)
382 {
383 return (lisp_hdr_flags) >> TYPE_INDEX;
384 }
385
386 static uint8_t
387 is_xtr_data_present(uint8_t type, uint8_t lisp_hdr_flags)
388 {
389 uint8_t xtr_present = 0;
390
391 if (type == LISP_MAP_REGISTER)
392 xtr_present = (lisp_hdr_flags) & LISP_MAP_REGISTER_IBIT_MASK;
393 else if (type == LISP_MAP_NOTIFY)
394 xtr_present = (lisp_hdr_flags) & LISP_MAP_NOTIFY_IBIT_MASK;
395
396 return xtr_present;
397 }
398
399 static void lisp_hdr_flag(netdissect_options *ndo, const lisp_map_register_hdr *lisp_hdr)
400 {
401 uint8_t type = extract_lisp_type(GET_U_1(lisp_hdr->type_and_flag));
402
403 ND_PRINT("%s,", tok2str(lisp_type, "unknown-type-%u", type));
404 if (!ndo->ndo_vflag)
405 return;
406
407 if (type == LISP_MAP_REGISTER) {
408 ND_PRINT(" flags [%s],", bittok2str(map_register_hdr_flag,
409 "none", GET_BE_U_4(lisp_hdr)));
410 } else if (type == LISP_MAP_NOTIFY) {
411 ND_PRINT(" flags [%s],", bittok2str(map_notify_hdr_flag,
412 "none", GET_BE_U_4(lisp_hdr)));
413 }
414 }
415
416 static void action_flag(netdissect_options *ndo, uint8_t act_auth_inc_res)
417 {
418 uint8_t action;
419 uint8_t authoritative;
420
421 authoritative = ((act_auth_inc_res >> 4) & 1);
422
423 if (authoritative)
424 ND_PRINT(" Authoritative,");
425 else
426 ND_PRINT(" Non-Authoritative,");
427
428 action = act_auth_inc_res >> 5;
429 ND_PRINT(" %s,", tok2str(lisp_eid_action, "unknown", action));
430 }
431
432 static void loc_hdr_flag(netdissect_options *ndo, uint16_t flag)
433 {
434 ND_PRINT(" flags [%s],", bittok2str(lisp_loc_flag, "none", flag));
435 }
[mirror] the TCPdump network dissector