?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
tprintf: xutils: Move tput*_safe to tprintf.c
[netsniff-ng.git] / proto_lldp.c
blob0d01d3c5c28ec38a29f732157759f98505dfe49b
1 /*
2 * netsniff-ng - the packet sniffing beast
3 * Copyright 2012, 2013 Tobias Klauser <tklauser@distanz.ch>
4 * Subject to the GPL, version 2.
5 */
6
7 #include <stdint.h>
8 #include <arpa/inet.h> /* for inet_ntop() */
9 #include <netinet/in.h> /* for ntohs()/ntohl() */
10
11 #include "built_in.h"
12 #include "oui.h"
13 #include "pkt_buff.h"
14 #include "proto.h"
15 #include "protos.h"
16 #include "xutils.h"
17
18 #define EXTRACT_16BIT(x) ntohs(*((uint16_t *) (x)))
19 #define EXTRACT_32BIT(x) ntohl(*((uint32_t *) (x)))
20
21 #define LLDP_TLV_TYPE(tlv) (((tlv) & 0xFE00) >> 9)
22 #define LLDP_TLV_LENGTH(tlv) ((tlv) & 0x01FF)
23
24 /*
25 * LLDP TLV types
26 */
27 #define LLDP_TLV_END 0
28 #define LLDP_TLV_CHASSIS_ID 1
29 #define LLDP_TLV_PORT_ID 2
30 #define LLDP_TLV_TTL 3
31 #define LLDP_TLV_PORT_DESC 4
32 #define LLDP_TLV_SYSTEM_NAME 5
33 #define LLDP_TLV_SYSTEM_DESC 6
34 #define LLDP_TLV_SYSTEM_CAP 7
35 #define LLDP_TLV_MGMT_ADDR 8
36 #define LLDP_TLV_ORG_SPECIFIC 127
37
38 /*
39 * Chassis ID subtypes
40 */
41 #define LLDP_CHASSIS_SUBTYPE_CHASSIS 1
42 #define LLDP_CHASSIS_SUBTYPE_IF_ALIAS 2
43 #define LLDP_CHASSIS_SUBTYPE_PORT 3
44 #define LLDP_CHASSIS_SUBTYPE_MAC_ADDR 4
45 #define LLDP_CHASSIS_SUBTYPE_NET_ADDR 5
46 #define LLDP_CHASSIS_SUBTYPE_IF_NAME 6
47 #define LLDP_CHASSIS_SUBTYPE_LOCAL 7
48
49 /*
50 * Port ID subtypes
51 */
52 #define LLDP_PORT_SUBTYPE_IF_ALIAS 1
53 #define LLDP_PORT_SUBTYPE_PORT_COMP 2
54 #define LLDP_PORT_SUBTYPE_MAC_ADDR 3
55 #define LLDP_PORT_SUBTYPE_NET_ADDR 4
56 #define LLDP_PORT_SUBTYPE_IF_NAME 5
57 #define LLDP_PORT_SUBTYPE_AGENT_CIRC_ID 6
58 #define LLDP_PORT_SUBTYPE_LOCAL 7
59
60 /*
61 * System capabilits bit masks
62 */
63 #define LLDP_SYSTEM_CAP_OTHER (1 << 0)
64 #define LLDP_SYSTEM_CAP_REPEATER (1 << 1)
65 #define LLDP_SYSTEM_CAP_BRIDGE (1 << 2)
66 #define LLDP_SYSTEM_CAP_WLAN_AP (1 << 3)
67 #define LLDP_SYSTEM_CAP_ROUTER (1 << 4)
68 #define LLDP_SYSTEM_CAP_TELEPHONE (1 << 5)
69 #define LLDP_SYSTEM_CAP_DOCSIS (1 << 6)
70 #define LLDP_SYSTEM_CAP_STATION_ONLY (1 << 7)
71
72 /*
73 * Interface number subtypes (for Management addres TLV)
74 */
75 #define LLDP_IFACE_NUM_SUBTYPE_UNKNOWN 1
76 #define LLDP_IFACE_NUM_SUBTYPE_IF_INDEX 2
77 #define LLDP_IFACE_NUM_SUBTYPE_SYS_PORT 3
78
79 /*
80 * IANA address family numbers (only the ones we actually use)
81 * http://www.iana.org/assignments/address-family-numbers/address-family-numbers.txt
82 *
83 * TODO: Move these into own header if there are other users?
84 */
85 #define IANA_AF_IPV4 1
86 #define IANA_AF_IPV6 2
87 #define IANA_AF_802 6
88
89 static int lldp_print_net_addr(const uint8_t *addr, size_t addrlen)
90 {
91 uint8_t af;
92 char buf[64];
93
94 if (addrlen < 1)
95 return -EINVAL;
96
97 af = *addr++;
98 addrlen--;
99 switch (af) {
100 case IANA_AF_IPV4:
101 if (addrlen < 4)
102 return -EINVAL;
103 inet_ntop(AF_INET, addr, buf, sizeof(buf));
104 tprintf("%s", buf);
105 break;
106 case IANA_AF_IPV6:
107 if (addrlen < 16)
108 return -EINVAL;
109 inet_ntop(AF_INET6, addr, buf, sizeof(buf));
110 tprintf("%s", buf);
111 break;
112 case IANA_AF_802:
113 if (addrlen < 6)
114 return -EINVAL;
115 tprintf("%.2x:%.2x:%.2x:%.2x:%.2x:%.2x",
116 addr[0], addr[1], addr[2], addr[3], addr[4], addr[5]);
117 break;
118 default:
119 tprintf("unknown address family");
120 break;
121 }
122
123 return 0;
124 }
125
126 static void lldp_print_cap(uint16_t cap)
127 {
128 unsigned int prev = 0;
129
130 if (cap & LLDP_SYSTEM_CAP_OTHER)
131 tprintf("%sOther", prev++ ? ", " : "");
132 if (cap & LLDP_SYSTEM_CAP_REPEATER)
133 tprintf("%sRepeater", prev++ ? ", " : "");
134 if (cap & LLDP_SYSTEM_CAP_BRIDGE)
135 tprintf("%sBridge", prev++ ? ", " : "");
136 if (cap & LLDP_SYSTEM_CAP_WLAN_AP)
137 tprintf("%sWLAN AP", prev++ ? ", " : "");
138 if (cap & LLDP_SYSTEM_CAP_ROUTER)
139 tprintf("%sRouter", prev++ ? ", " : "");
140 if (cap & LLDP_SYSTEM_CAP_TELEPHONE)
141 tprintf("%sTelephone", prev++ ? ", " : "");
142 if (cap & LLDP_SYSTEM_CAP_DOCSIS)
143 tprintf("%sDOCSIS", prev++ ? ", " : "");
144 if (cap & LLDP_SYSTEM_CAP_STATION_ONLY)
145 tprintf("%sStation only", prev++ ? ", " : "");
146 }
147
148 static void lldp(struct pkt_buff *pkt)
149 {
150 bool seen_chassis_id = false;
151 uint8_t subtype, mgmt_alen, mgmt_oidlen;
152 uint16_t tlv_hdr;
153 unsigned int tlv_type, tlv_len;
154 unsigned int len;
155 uint8_t *tlv_info_str;
156 uint16_t sys_cap, en_cap;
157 uint32_t oui;
158
159 len = pkt_len(pkt);
160 if (len == 0)
161 return;
162
163 tprintf(" [ LLDP ");
164
165 while (len >= sizeof(tlv_hdr)) {
166 tlv_hdr = EXTRACT_16BIT(pkt_pull(pkt, sizeof(tlv_hdr)));
167 tlv_type = LLDP_TLV_TYPE(tlv_hdr);
168 tlv_len = LLDP_TLV_LENGTH(tlv_hdr);
169
170 len -= sizeof(tlv_hdr);
171
172 if (tlv_type == LLDP_TLV_END || tlv_len == 0)
173 break;
174 if (len < tlv_len)
175 goto out_invalid;
176 if (!seen_chassis_id && tlv_type != LLDP_TLV_CHASSIS_ID)
177 goto out_invalid;
178
179 switch (tlv_type) {
180 case LLDP_TLV_CHASSIS_ID:
181 if (seen_chassis_id)
182 goto out_invalid;
183
184 tprintf("Chassis ID");
185
186 if (tlv_len < 2)
187 goto out_invalid;
188
189 tlv_info_str = pkt_pull(pkt, tlv_len);
190 if (tlv_info_str == NULL)
191 goto out_invalid;
192
193 subtype = *tlv_info_str++;
194 tprintf(" (Subtype %u => ", subtype);
195
196 switch (subtype) {
197 case LLDP_CHASSIS_SUBTYPE_MAC_ADDR:
198 if (tlv_len < 7)
199 goto out_invalid;
200
201 tprintf("%.2x:%.2x:%.2x:%.2x:%.2x:%.2x",
202 tlv_info_str[0], tlv_info_str[1],
203 tlv_info_str[2], tlv_info_str[3],
204 tlv_info_str[4], tlv_info_str[5]);
205 break;
206 case LLDP_CHASSIS_SUBTYPE_NET_ADDR:
207 if (lldp_print_net_addr(tlv_info_str, tlv_len))
208 goto out_invalid;
209 break;
210 case LLDP_CHASSIS_SUBTYPE_CHASSIS:
211 case LLDP_CHASSIS_SUBTYPE_IF_ALIAS:
212 case LLDP_CHASSIS_SUBTYPE_PORT:
213 case LLDP_CHASSIS_SUBTYPE_IF_NAME:
214 case LLDP_CHASSIS_SUBTYPE_LOCAL:
215 tputs_safe((const char *) tlv_info_str, tlv_len - 1);
216 break;
217 default:
218 tprintf("Reserved");
219 break;
220 }
221
222 tprintf(")");
223 seen_chassis_id = true;
224 break;
225 case LLDP_TLV_PORT_ID:
226 tprintf(", Port ID");
227
228 if (tlv_len < 2)
229 goto out_invalid;
230
231 tlv_info_str = pkt_pull(pkt, tlv_len);
232 if (tlv_info_str == NULL)
233 goto out_invalid;
234
235 subtype = *tlv_info_str++;
236 tprintf(" (Subtype %u => ", subtype);
237
238 switch (subtype) {
239 case LLDP_PORT_SUBTYPE_MAC_ADDR:
240 if (tlv_len < 7)
241 goto out_invalid;
242
243 tprintf("%.2x:%.2x:%.2x:%.2x:%.2x:%.2x",
244 tlv_info_str[0], tlv_info_str[1],
245 tlv_info_str[2], tlv_info_str[3],
246 tlv_info_str[4], tlv_info_str[5]);
247 break;
248 case LLDP_PORT_SUBTYPE_NET_ADDR:
249 if (lldp_print_net_addr(tlv_info_str, tlv_len))
250 goto out_invalid;
251 break;
252 case LLDP_PORT_SUBTYPE_IF_ALIAS:
253 case LLDP_PORT_SUBTYPE_PORT_COMP:
254 case LLDP_PORT_SUBTYPE_IF_NAME:
255 case LLDP_PORT_SUBTYPE_AGENT_CIRC_ID:
256 case LLDP_PORT_SUBTYPE_LOCAL:
257 tputs_safe((const char *) tlv_info_str, tlv_len - 1);
258 break;
259 default:
260 tprintf("Reserved");
261 break;
262 }
263
264 tprintf(")");
265 break;
266 case LLDP_TLV_TTL:
267 tprintf(", TTL");
268
269 if (tlv_len != 2)
270 goto out_invalid;
271
272 tlv_info_str = pkt_pull(pkt, tlv_len);
273 if (tlv_info_str == NULL)
274 goto out_invalid;
275
276 tprintf(" (%u)", EXTRACT_16BIT(tlv_info_str));
277 break;
278 case LLDP_TLV_PORT_DESC:
279 tprintf(", Port desc (");
280
281 tlv_info_str = pkt_pull(pkt, tlv_len);
282 if (tlv_info_str == NULL)
283 tprintf("none");
284 else
285 tputs_safe((const char *) tlv_info_str, tlv_len);
286
287 tprintf(")");
288 break;
289 case LLDP_TLV_SYSTEM_NAME:
290 tprintf(", Sys name (");
291
292 tlv_info_str = pkt_pull(pkt, tlv_len);
293 if (tlv_info_str == NULL)
294 tprintf("none");
295 else
296 tputs_safe((const char *) tlv_info_str, tlv_len);
297
298 tprintf(")");
299 break;
300 case LLDP_TLV_SYSTEM_DESC:
301 tprintf(", Sys desc (");
302
303 tlv_info_str = pkt_pull(pkt, tlv_len);
304 if (tlv_info_str == NULL)
305 tprintf("none");
306 else
307 tputs_safe((const char *) tlv_info_str, tlv_len);
308
309 tprintf(")");
310 break;
311 case LLDP_TLV_SYSTEM_CAP:
312 tprintf(", Sys Cap");
313
314 if (tlv_len != 4)
315 goto out_invalid;
316
317 tlv_info_str = pkt_pull(pkt, tlv_len);
318 if (tlv_info_str == NULL)
319 goto out_invalid;
320
321 sys_cap = EXTRACT_16BIT(tlv_info_str);
322 tlv_info_str += 2;
323 en_cap = EXTRACT_16BIT(tlv_info_str);
324
325 tprintf(" (");
326 lldp_print_cap(sys_cap);
327 tprintf(")");
328 tprintf(" Ena Cap (");
329 lldp_print_cap(en_cap);
330 tprintf(")");
331 break;
332 case LLDP_TLV_MGMT_ADDR:
333 tprintf(", Mgmt Addr (");
334
335 if (tlv_len < 9 || tlv_len > 167)
336 goto out_invalid;
337
338 tlv_info_str = pkt_pull(pkt, tlv_len);
339 if (tlv_info_str == NULL)
340 goto out_invalid;
341
342 mgmt_alen = *tlv_info_str;
343 tlv_info_str++;
344 if (tlv_len - 1 < mgmt_alen)
345 goto out_invalid;
346
347 if (lldp_print_net_addr(tlv_info_str, mgmt_alen))
348 goto out_invalid;
349 tlv_info_str += mgmt_alen;
350
351 tprintf(", Iface Subtype %d/", *tlv_info_str);
352 switch (*tlv_info_str) {
353 case LLDP_IFACE_NUM_SUBTYPE_IF_INDEX:
354 tprintf("ifIndex");
355 break;
356 case LLDP_IFACE_NUM_SUBTYPE_SYS_PORT:
357 tprintf("System Port Number");
358 break;
359 default:
360 tprintf("Unknown");
361 break;
362 }
363
364 tlv_info_str++;
365 tprintf(", Iface Number %u", EXTRACT_32BIT(tlv_info_str));
366
367 tlv_info_str += 4;
368 mgmt_oidlen = *tlv_info_str;
369 if (mgmt_oidlen > 0) {
370 tprintf(", OID ");
371 tputs_safe((const char *) tlv_info_str + 1, mgmt_oidlen);
372 }
373
374 tprintf(")");
375 break;
376 case LLDP_TLV_ORG_SPECIFIC:
377 tprintf(", Org specific");
378
379 if (tlv_len < 4)
380 goto out_invalid;
381
382 tlv_info_str = pkt_pull(pkt, 4);
383 if (tlv_info_str == NULL)
384 goto out_invalid;
385
386 oui = ntohl(*((uint32_t *) tlv_info_str));
387 subtype = oui & 0xff;
388 oui >>= 8;
389 tprintf(" (OUI %s, Subtype %u)", lookup_vendor_str(oui),
390 subtype);
391
392 /* Just eat it up, we don't know how to interpret it */
393 pkt_pull(pkt, tlv_len - 4);
394 break;
395 default:
396 tprintf(", Unknown");
397 pkt_pull(pkt, tlv_len);
398 break;
399 }
400
401 len -= tlv_len;
402 }
403
404 if (!seen_chassis_id)
405 goto out_invalid;
406
407 tprintf(" ]\n");
408 return;
409
410 out_invalid:
411 tprintf(" INVALID ]\n");
412 }
413
414 static void lldp_less(struct pkt_buff *pkt)
415 {
416 unsigned int len, n_tlv = 0;
417 unsigned int tlv_type, tlv_len;
418 uint16_t tlv_hdr;
419
420 len = pkt_len(pkt);
421
422 while (len >= sizeof(tlv_hdr)) {
423 tlv_hdr = EXTRACT_16BIT(pkt_pull(pkt, sizeof(tlv_hdr)));
424 tlv_type = LLDP_TLV_TYPE(tlv_hdr);
425 tlv_len = LLDP_TLV_LENGTH(tlv_hdr);
426
427 n_tlv++;
428 len -= sizeof(tlv_hdr);
429
430 if (tlv_type == LLDP_TLV_END || tlv_len == 0)
431 break;
432 if (len < tlv_len)
433 break;
434
435 pkt_pull(pkt, tlv_len);
436
437 len -= tlv_len;
438 }
439
440 tprintf(" %u TLV%s", n_tlv, n_tlv == 1 ? "" : "s");
441 }
442
443 struct protocol lldp_ops = {
444 .key = 0x88cc,
445 .print_full = lldp,
446 .print_less = lldp_less,
447 };
netsniff-ng toolkit, the packet sniffing beast, staging tree