]> git.proxmox.com Git - mirror_frr.git/blob - eigrpd/eigrp_dump.c
Merge pull request #7821 from donaldsharp/evpn_flag_dump
[mirror_frr.git] / eigrpd / eigrp_dump.c
1 /*
2 * EIGRP Dump Functions and Debugging.
3 * Copyright (C) 2013-2014
4 * Authors:
5 * Donnie Savage
6 * Jan Janovic
7 * Matej Perina
8 * Peter Orsag
9 * Peter Paluch
10 *
11 * This file is part of GNU Zebra.
12 *
13 * GNU Zebra is free software; you can redistribute it and/or modify it
14 * under the terms of the GNU General Public License as published by the
15 * Free Software Foundation; either version 2, or (at your option) any
16 * later version.
17 *
18 * GNU Zebra is distributed in the hope that it will be useful, but
19 * WITHOUT ANY WARRANTY; without even the implied warranty of
20 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
21 * General Public License for more details.
22 *
23 * You should have received a copy of the GNU General Public License along
24 * with this program; see the file COPYING; if not, write to the Free Software
25 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
26 */
27
28 #include <zebra.h>
29
30 #include "linklist.h"
31 #include "thread.h"
32 #include "prefix.h"
33 #include "command.h"
34 #include "stream.h"
35 #include "log.h"
36 #include "sockopt.h"
37 #include "table.h"
38 #include "keychain.h"
39
40 #include "eigrpd/eigrp_structs.h"
41 #include "eigrpd/eigrpd.h"
42 #include "eigrpd/eigrp_interface.h"
43 #include "eigrpd/eigrp_neighbor.h"
44 #include "eigrpd/eigrp_packet.h"
45 #include "eigrpd/eigrp_zebra.h"
46 #include "eigrpd/eigrp_vty.h"
47 #include "eigrpd/eigrp_network.h"
48 #include "eigrpd/eigrp_dump.h"
49 #include "eigrpd/eigrp_topology.h"
50
51 /* Enable debug option variables -- valid only session. */
52 unsigned long term_debug_eigrp = 0;
53 unsigned long term_debug_eigrp_nei = 0;
54 unsigned long term_debug_eigrp_packet[11] = {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0};
55 unsigned long term_debug_eigrp_zebra = 6;
56 unsigned long term_debug_eigrp_transmit = 0;
57
58 /* Configuration debug option variables. */
59 unsigned long conf_debug_eigrp = 0;
60 unsigned long conf_debug_eigrp_nei = 0;
61 unsigned long conf_debug_eigrp_packet[11] = {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0};
62 unsigned long conf_debug_eigrp_zebra = 0;
63 unsigned long conf_debug_eigrp_transmit = 0;
64
65
66 static int config_write_debug(struct vty *vty)
67 {
68 int write = 0;
69 int i;
70
71 const char *type_str[] = {"update", "request", "query", "reply",
72 "hello", "", "probe", "ack",
73 "", "SIA query", "SIA reply", "stub",
74 "all"};
75 const char *detail_str[] = {
76 "", " send", " recv", "",
77 " detail", " send detail", " recv detail", " detail"};
78
79
80 /* debug eigrp event. */
81
82 /* debug eigrp packet */
83 for (i = 0; i < 10; i++) {
84 if (conf_debug_eigrp_packet[i] == 0
85 && term_debug_eigrp_packet[i] == 0)
86 continue;
87
88 vty_out(vty, "debug eigrp packet %s%s\n", type_str[i],
89 detail_str[conf_debug_eigrp_packet[i]]);
90 write = 1;
91 }
92
93 return write;
94 }
95
96 static int eigrp_neighbor_packet_queue_sum(struct eigrp_interface *ei)
97 {
98 struct eigrp_neighbor *nbr;
99 struct listnode *node, *nnode;
100 int sum;
101 sum = 0;
102
103 for (ALL_LIST_ELEMENTS(ei->nbrs, node, nnode, nbr)) {
104 sum += nbr->retrans_queue->count;
105 }
106
107 return sum;
108 }
109
110 /*
111 * Expects header to be in host order
112 */
113 void eigrp_ip_header_dump(struct ip *iph)
114 {
115 /* IP Header dump. */
116 zlog_debug("ip_v %u", iph->ip_v);
117 zlog_debug("ip_hl %u", iph->ip_hl);
118 zlog_debug("ip_tos %u", iph->ip_tos);
119 zlog_debug("ip_len %u", iph->ip_len);
120 zlog_debug("ip_id %u", (uint32_t)iph->ip_id);
121 zlog_debug("ip_off %u", (uint32_t)iph->ip_off);
122 zlog_debug("ip_ttl %u", iph->ip_ttl);
123 zlog_debug("ip_p %u", iph->ip_p);
124 zlog_debug("ip_sum 0x%x", (uint32_t)iph->ip_sum);
125 zlog_debug("ip_src %pI4", &iph->ip_src);
126 zlog_debug("ip_dst %pI4", &iph->ip_dst);
127 }
128
129 /*
130 * Expects header to be in host order
131 */
132 void eigrp_header_dump(struct eigrp_header *eigrph)
133 {
134 /* EIGRP Header dump. */
135 zlog_debug("eigrp_version %u", eigrph->version);
136 zlog_debug("eigrp_opcode %u", eigrph->opcode);
137 zlog_debug("eigrp_checksum 0x%x", ntohs(eigrph->checksum));
138 zlog_debug("eigrp_flags 0x%x", ntohl(eigrph->flags));
139 zlog_debug("eigrp_sequence %u", ntohl(eigrph->sequence));
140 zlog_debug("eigrp_ack %u", ntohl(eigrph->ack));
141 zlog_debug("eigrp_vrid %u", ntohs(eigrph->vrid));
142 zlog_debug("eigrp_AS %u", ntohs(eigrph->ASNumber));
143 }
144
145 const char *eigrp_if_name_string(struct eigrp_interface *ei)
146 {
147 if (!ei)
148 return "inactive";
149
150 return ei->ifp->name;
151 }
152
153 void show_ip_eigrp_interface_header(struct vty *vty, struct eigrp *eigrp)
154 {
155
156 vty_out(vty,
157 "\nEIGRP interfaces for AS(%d)\n\n%-16s %-10s %-10s %-6s %-12s %-7s %-14s %-12s %-8s %-8s %-8s\n %-44s %-12s %-7s %-14s %-12s %-8s\n",
158 eigrp->AS, "Interface", "Bandwidth", "Delay", "Peers",
159 "Xmit Queue", "Mean", "Pacing Time", "Multicast", "Pending",
160 "Hello", "Holdtime", "", "Un/Reliable", "SRTT", "Un/Reliable",
161 "Flow Timer", "Routes");
162 }
163
164 void show_ip_eigrp_interface_sub(struct vty *vty, struct eigrp *eigrp,
165 struct eigrp_interface *ei)
166 {
167 vty_out(vty, "%-16s ", IF_NAME(ei));
168 vty_out(vty, "%-11u", ei->params.bandwidth);
169 vty_out(vty, "%-11u", ei->params.delay);
170 vty_out(vty, "%-7u", ei->nbrs->count);
171 vty_out(vty, "%u %c %-10u", 0, '/',
172 eigrp_neighbor_packet_queue_sum(ei));
173 vty_out(vty, "%-7u %-14u %-12u %-8u", 0, 0, 0, 0);
174 vty_out(vty, "%-8u %-8u \n", ei->params.v_hello, ei->params.v_wait);
175 }
176
177 void show_ip_eigrp_interface_detail(struct vty *vty, struct eigrp *eigrp,
178 struct eigrp_interface *ei)
179 {
180 vty_out(vty, "%-2s %s %d %-3s \n", "", "Hello interval is ", 0, " sec");
181 vty_out(vty, "%-2s %s %s \n", "", "Next xmit serial", "<none>");
182 vty_out(vty, "%-2s %s %d %s %d %s %d %s %d \n", "",
183 "Un/reliable mcasts: ", 0, "/", 0, "Un/reliable ucasts: ", 0,
184 "/", 0);
185 vty_out(vty, "%-2s %s %d %s %d %s %d \n", "", "Mcast exceptions: ", 0,
186 " CR packets: ", 0, " ACKs suppressed: ", 0);
187 vty_out(vty, "%-2s %s %d %s %d \n", "", "Retransmissions sent: ", 0,
188 "Out-of-sequence rcvd: ", 0);
189 vty_out(vty, "%-2s %s %s %s \n", "", "Authentication mode is ", "not",
190 "set");
191 vty_out(vty, "%-2s %s \n", "", "Use multicast");
192 }
193
194 void show_ip_eigrp_neighbor_header(struct vty *vty, struct eigrp *eigrp)
195 {
196 vty_out(vty,
197 "\nEIGRP neighbors for AS(%d)\n\n%-3s %-17s %-20s %-6s %-8s %-6s %-5s %-5s %-5s\n %-41s %-6s %-8s %-6s %-4s %-6s %-5s \n",
198 eigrp->AS, "H", "Address", "Interface", "Hold", "Uptime",
199 "SRTT", "RTO", "Q", "Seq", "", "(sec)", "", "(ms)", "", "Cnt",
200 "Num");
201 }
202
203 void show_ip_eigrp_neighbor_sub(struct vty *vty, struct eigrp_neighbor *nbr,
204 int detail)
205 {
206
207 vty_out(vty, "%-3u %-17pI4 %-21s", 0, &nbr->src, IF_NAME(nbr->ei));
208 if (nbr->t_holddown)
209 vty_out(vty, "%-7lu",
210 thread_timer_remain_second(nbr->t_holddown));
211 else
212 vty_out(vty, "- ");
213 vty_out(vty, "%-8u %-6u %-5u", 0, 0, EIGRP_PACKET_RETRANS_TIME);
214 vty_out(vty, "%-7lu", nbr->retrans_queue->count);
215 vty_out(vty, "%u\n", nbr->recv_sequence_number);
216
217
218 if (detail) {
219 vty_out(vty, " Version %u.%u/%u.%u", nbr->os_rel_major,
220 nbr->os_rel_minor, nbr->tlv_rel_major,
221 nbr->tlv_rel_minor);
222 vty_out(vty, ", Retrans: %lu, Retries: %lu",
223 nbr->retrans_queue->count, 0UL);
224 vty_out(vty, ", %s\n", eigrp_nbr_state_str(nbr));
225 }
226 }
227
228 /*
229 * Print standard header for show EIGRP topology output
230 */
231 void show_ip_eigrp_topology_header(struct vty *vty, struct eigrp *eigrp)
232 {
233 vty_out(vty, "\nEIGRP Topology Table for AS(%d)/ID(%pI4)\n\n",
234 eigrp->AS, &eigrp->router_id);
235 vty_out(vty,
236 "Codes: P - Passive, A - Active, U - Update, Q - Query, R - Reply\n r - reply Status, s - sia Status\n\n");
237 }
238
239 void show_ip_eigrp_prefix_descriptor(struct vty *vty,
240 struct eigrp_prefix_descriptor *tn)
241 {
242 struct list *successors = eigrp_topology_get_successor(tn);
243
244 vty_out(vty, "%-3c", (tn->state > 0) ? 'A' : 'P');
245
246 vty_out(vty, "%pFX, ", tn->destination);
247 vty_out(vty, "%u successors, ", (successors) ? successors->count : 0);
248 vty_out(vty, "FD is %u, serno: %" PRIu64 " \n", tn->fdistance,
249 tn->serno);
250
251 if (successors)
252 list_delete(&successors);
253 }
254
255 void show_ip_eigrp_route_descriptor(struct vty *vty, struct eigrp *eigrp,
256 struct eigrp_route_descriptor *te,
257 bool *first)
258 {
259 if (te->reported_distance == EIGRP_MAX_METRIC)
260 return;
261
262 if (*first) {
263 show_ip_eigrp_prefix_descriptor(vty, te->prefix);
264 *first = false;
265 }
266
267 if (te->adv_router == eigrp->neighbor_self)
268 vty_out(vty, "%-7s%s, %s\n", " ", "via Connected",
269 IF_NAME(te->ei));
270 else {
271 vty_out(vty, "%-7s%s%pI4 (%u/%u), %s\n", " ", "via ",
272 &te->adv_router->src, te->distance,
273 te->reported_distance, IF_NAME(te->ei));
274 }
275 }
276
277
278 DEFUN_NOSH (show_debugging_eigrp,
279 show_debugging_eigrp_cmd,
280 "show debugging [eigrp]",
281 SHOW_STR
282 DEBUG_STR
283 EIGRP_STR)
284 {
285 int i;
286
287 vty_out(vty, "EIGRP debugging status:\n");
288
289 /* Show debug status for events. */
290 if (IS_DEBUG_EIGRP(event, EVENT))
291 vty_out(vty, " EIGRP event debugging is on\n");
292
293 /* Show debug status for EIGRP Packets. */
294 for (i = 0; i < 11; i++) {
295 if (i == 8)
296 continue;
297
298 if (IS_DEBUG_EIGRP_PACKET(i, SEND)
299 && IS_DEBUG_EIGRP_PACKET(i, RECV)) {
300 vty_out(vty, " EIGRP packet %s%s debugging is on\n",
301 lookup_msg(eigrp_packet_type_str, i + 1, NULL),
302 IS_DEBUG_EIGRP_PACKET(i, PACKET_DETAIL)
303 ? " detail"
304 : "");
305 } else {
306 if (IS_DEBUG_EIGRP_PACKET(i, SEND))
307 vty_out(vty,
308 " EIGRP packet %s send%s debugging is on\n",
309 lookup_msg(eigrp_packet_type_str, i + 1,
310 NULL),
311 IS_DEBUG_EIGRP_PACKET(i, PACKET_DETAIL)
312 ? " detail"
313 : "");
314 if (IS_DEBUG_EIGRP_PACKET(i, RECV))
315 vty_out(vty,
316 " EIGRP packet %s receive%s debugging is on\n",
317 lookup_msg(eigrp_packet_type_str, i + 1,
318 NULL),
319 IS_DEBUG_EIGRP_PACKET(i, PACKET_DETAIL)
320 ? " detail"
321 : "");
322 }
323 }
324
325 return CMD_SUCCESS;
326 }
327
328
329 /*
330 [no] debug eigrp packet (hello|dd|ls-request|ls-update|ls-ack|all)
331 [send|recv [detail]]
332 */
333
334 DEFUN (debug_eigrp_transmit,
335 debug_eigrp_transmit_cmd,
336 "debug eigrp transmit <send|recv|all> [detail]",
337 DEBUG_STR
338 EIGRP_STR
339 "EIGRP transmission events\n"
340 "packet sent\n"
341 "packet received\n"
342 "all packets\n"
343 "Detailed Information\n")
344 {
345 int flag = 0;
346 int idx = 2;
347
348 /* send or recv. */
349 if (argv_find(argv, argc, "send", &idx))
350 flag = EIGRP_DEBUG_SEND;
351 else if (argv_find(argv, argc, "recv", &idx))
352 flag = EIGRP_DEBUG_RECV;
353 else if (argv_find(argv, argc, "all", &idx))
354 flag = EIGRP_DEBUG_SEND_RECV;
355
356 /* detail option */
357 if (argv_find(argv, argc, "detail", &idx))
358 flag = EIGRP_DEBUG_PACKET_DETAIL;
359
360 if (vty->node == CONFIG_NODE)
361 DEBUG_TRANSMIT_ON(0, flag);
362 else
363 TERM_DEBUG_TRANSMIT_ON(0, flag);
364
365 return CMD_SUCCESS;
366 }
367
368 DEFUN (no_debug_eigrp_transmit,
369 no_debug_eigrp_transmit_cmd,
370 "no debug eigrp transmit <send|recv|all> [detail]",
371 NO_STR
372 UNDEBUG_STR
373 EIGRP_STR
374 "EIGRP transmission events\n"
375 "packet sent\n"
376 "packet received\n"
377 "all packets\n"
378 "Detailed Information\n")
379 {
380 int flag = 0;
381 int idx = 3;
382
383 /* send or recv. */
384 if (argv_find(argv, argc, "send", &idx))
385 flag = EIGRP_DEBUG_SEND;
386 else if (argv_find(argv, argc, "recv", &idx))
387 flag = EIGRP_DEBUG_RECV;
388 else if (argv_find(argv, argc, "all", &idx))
389 flag = EIGRP_DEBUG_SEND_RECV;
390
391 /* detail option */
392 if (argv_find(argv, argc, "detail", &idx))
393 flag = EIGRP_DEBUG_PACKET_DETAIL;
394
395 if (vty->node == CONFIG_NODE)
396 DEBUG_TRANSMIT_OFF(0, flag);
397 else
398 TERM_DEBUG_TRANSMIT_OFF(0, flag);
399
400 return CMD_SUCCESS;
401 }
402
403 DEFUN (debug_eigrp_packets,
404 debug_eigrp_packets_all_cmd,
405 "debug eigrp packets <siaquery|siareply|ack|hello|probe|query|reply|request|retry|stub|terse|update|all> [send|receive] [detail]",
406 DEBUG_STR
407 EIGRP_STR
408 "EIGRP packets\n"
409 "EIGRP SIA-Query packets\n"
410 "EIGRP SIA-Reply packets\n"
411 "EIGRP ack packets\n"
412 "EIGRP hello packets\n"
413 "EIGRP probe packets\n"
414 "EIGRP query packets\n"
415 "EIGRP reply packets\n"
416 "EIGRP request packets\n"
417 "EIGRP retransmissions\n"
418 "EIGRP stub packets\n"
419 "Display all EIGRP packets except Hellos\n"
420 "EIGRP update packets\n"
421 "Display all EIGRP packets\n"
422 "Send Packets\n"
423 "Receive Packets\n"
424 "Detail Information\n")
425 {
426 int type = 0;
427 int flag = 0;
428 int i;
429 int idx = 0;
430
431 /* Check packet type. */
432 if (argv_find(argv, argc, "hello", &idx))
433 type = EIGRP_DEBUG_HELLO;
434 if (argv_find(argv, argc, "update", &idx))
435 type = EIGRP_DEBUG_UPDATE;
436 if (argv_find(argv, argc, "query", &idx))
437 type = EIGRP_DEBUG_QUERY;
438 if (argv_find(argv, argc, "ack", &idx))
439 type = EIGRP_DEBUG_ACK;
440 if (argv_find(argv, argc, "probe", &idx))
441 type = EIGRP_DEBUG_PROBE;
442 if (argv_find(argv, argc, "stub", &idx))
443 type = EIGRP_DEBUG_STUB;
444 if (argv_find(argv, argc, "reply", &idx))
445 type = EIGRP_DEBUG_REPLY;
446 if (argv_find(argv, argc, "request", &idx))
447 type = EIGRP_DEBUG_REQUEST;
448 if (argv_find(argv, argc, "siaquery", &idx))
449 type = EIGRP_DEBUG_SIAQUERY;
450 if (argv_find(argv, argc, "siareply", &idx))
451 type = EIGRP_DEBUG_SIAREPLY;
452 if (argv_find(argv, argc, "all", &idx))
453 type = EIGRP_DEBUG_PACKETS_ALL;
454
455
456 /* All packet types, both send and recv. */
457 flag = EIGRP_DEBUG_SEND_RECV;
458
459 /* send or recv. */
460 if (argv_find(argv, argc, "s", &idx))
461 flag = EIGRP_DEBUG_SEND;
462 else if (argv_find(argv, argc, "r", &idx))
463 flag = EIGRP_DEBUG_RECV;
464
465 /* detail. */
466 if (argv_find(argv, argc, "detail", &idx))
467 flag |= EIGRP_DEBUG_PACKET_DETAIL;
468
469 for (i = 0; i < 11; i++)
470 if (type & (0x01 << i)) {
471 if (vty->node == CONFIG_NODE)
472 DEBUG_PACKET_ON(i, flag);
473 else
474 TERM_DEBUG_PACKET_ON(i, flag);
475 }
476
477 return CMD_SUCCESS;
478 }
479
480 DEFUN (no_debug_eigrp_packets,
481 no_debug_eigrp_packets_all_cmd,
482 "no debug eigrp packets <siaquery|siareply|ack|hello|probe|query|reply|request|retry|stub|terse|update|all> [send|receive] [detail]",
483 NO_STR
484 UNDEBUG_STR
485 EIGRP_STR
486 "EIGRP packets\n"
487 "EIGRP SIA-Query packets\n"
488 "EIGRP SIA-Reply packets\n"
489 "EIGRP ack packets\n"
490 "EIGRP hello packets\n"
491 "EIGRP probe packets\n"
492 "EIGRP query packets\n"
493 "EIGRP reply packets\n"
494 "EIGRP request packets\n"
495 "EIGRP retransmissions\n"
496 "EIGRP stub packets\n"
497 "Display all EIGRP packets except Hellos\n"
498 "EIGRP update packets\n"
499 "Display all EIGRP packets\n"
500 "Send Packets\n"
501 "Receive Packets\n"
502 "Detailed Information\n")
503 {
504 int type = 0;
505 int flag = 0;
506 int i;
507 int idx = 0;
508
509 /* Check packet type. */
510 if (argv_find(argv, argc, "hello", &idx))
511 type = EIGRP_DEBUG_HELLO;
512 if (argv_find(argv, argc, "update", &idx))
513 type = EIGRP_DEBUG_UPDATE;
514 if (argv_find(argv, argc, "query", &idx))
515 type = EIGRP_DEBUG_QUERY;
516 if (argv_find(argv, argc, "ack", &idx))
517 type = EIGRP_DEBUG_ACK;
518 if (argv_find(argv, argc, "probe", &idx))
519 type = EIGRP_DEBUG_PROBE;
520 if (argv_find(argv, argc, "stub", &idx))
521 type = EIGRP_DEBUG_STUB;
522 if (argv_find(argv, argc, "reply", &idx))
523 type = EIGRP_DEBUG_REPLY;
524 if (argv_find(argv, argc, "request", &idx))
525 type = EIGRP_DEBUG_REQUEST;
526 if (argv_find(argv, argc, "siaquery", &idx))
527 type = EIGRP_DEBUG_SIAQUERY;
528 if (argv_find(argv, argc, "siareply", &idx))
529 type = EIGRP_DEBUG_SIAREPLY;
530
531 /* Default, both send and recv. */
532 flag = EIGRP_DEBUG_SEND_RECV;
533
534 /* send or recv. */
535 if (argv_find(argv, argc, "send", &idx))
536 flag = EIGRP_DEBUG_SEND;
537 else if (argv_find(argv, argc, "reply", &idx))
538 flag = EIGRP_DEBUG_RECV;
539
540 /* detail. */
541 if (argv_find(argv, argc, "detail", &idx))
542 flag |= EIGRP_DEBUG_PACKET_DETAIL;
543
544 for (i = 0; i < 11; i++)
545 if (type & (0x01 << i)) {
546 if (vty->node == CONFIG_NODE)
547 DEBUG_PACKET_OFF(i, flag);
548 else
549 TERM_DEBUG_PACKET_OFF(i, flag);
550 }
551
552 return CMD_SUCCESS;
553 }
554
555 /* Debug node. */
556 static int config_write_debug(struct vty *vty);
557 static struct cmd_node eigrp_debug_node = {
558 .name = "debug",
559 .node = DEBUG_NODE,
560 .prompt = "",
561 .config_write = config_write_debug,
562 };
563
564 /* Initialize debug commands. */
565 void eigrp_debug_init(void)
566 {
567 install_node(&eigrp_debug_node);
568
569 install_element(ENABLE_NODE, &show_debugging_eigrp_cmd);
570 install_element(ENABLE_NODE, &debug_eigrp_packets_all_cmd);
571 install_element(ENABLE_NODE, &no_debug_eigrp_packets_all_cmd);
572 install_element(ENABLE_NODE, &debug_eigrp_transmit_cmd);
573 install_element(ENABLE_NODE, &no_debug_eigrp_transmit_cmd);
574
575 install_element(CONFIG_NODE, &show_debugging_eigrp_cmd);
576 install_element(CONFIG_NODE, &debug_eigrp_packets_all_cmd);
577 install_element(CONFIG_NODE, &no_debug_eigrp_packets_all_cmd);
578 install_element(CONFIG_NODE, &debug_eigrp_transmit_cmd);
579 install_element(CONFIG_NODE, &no_debug_eigrp_transmit_cmd);
580 }