2 * IS-IS Rout(e)ing protocol - isis_spf.c
5 * Copyright (C) 2001,2002 Sampo Saaristo
6 * Tampere University of Technology
7 * Institute of Communications Engineering
8 * Copyright (C) 2017 Christian Franke <chris@opensourcerouting.org>
10 * This program is free software; you can redistribute it and/or modify it
11 * under the terms of the GNU General Public Licenseas published by the Free
12 * Software Foundation; either version 2 of the License, or (at your option)
15 * This program is distributed in the hope that it will be useful,but WITHOUT
16 * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
17 * FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for
20 * You should have received a copy of the GNU General Public License along
21 * with this program; see the file COPYING; if not, write to the Free Software
22 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
32 #include "termtable.h"
39 #include "spf_backoff.h"
40 #include "srcdest_table.h"
43 #include "isis_errors.h"
44 #include "isis_constants.h"
45 #include "isis_common.h"
46 #include "isis_flags.h"
48 #include "isis_misc.h"
49 #include "isis_adjacency.h"
50 #include "isis_circuit.h"
53 #include "isis_dynhn.h"
55 #include "isis_route.h"
58 #include "isis_tlvs.h"
59 #include "isis_zebra.h"
61 #include "isis_spf_private.h"
63 DEFINE_MTYPE_STATIC(ISISD
, ISIS_SPFTREE
, "ISIS SPFtree");
64 DEFINE_MTYPE_STATIC(ISISD
, ISIS_SPF_RUN
, "ISIS SPF Run Info");
65 DEFINE_MTYPE_STATIC(ISISD
, ISIS_SPF_ADJ
, "ISIS SPF Adjacency");
66 DEFINE_MTYPE_STATIC(ISISD
, ISIS_VERTEX
, "ISIS vertex");
67 DEFINE_MTYPE_STATIC(ISISD
, ISIS_VERTEX_ADJ
, "ISIS SPF Vertex Adjacency");
69 static void spf_adj_list_parse_lsp(struct isis_spftree
*spftree
,
70 struct list
*adj_list
, struct isis_lsp
*lsp
,
71 const uint8_t *pseudo_nodeid
,
72 uint32_t pseudo_metric
);
75 * supports the given af ?
77 static bool speaks(uint8_t *protocols
, uint8_t count
, int family
)
79 for (uint8_t i
= 0; i
< count
; i
++) {
80 if (family
== AF_INET
&& protocols
[i
] == NLPID_IP
)
82 if (family
== AF_INET6
&& protocols
[i
] == NLPID_IPV6
)
89 struct isis_area
*area
;
94 static void remove_excess_adjs(struct list
*adjs
)
96 struct listnode
*node
, *excess
= NULL
;
97 struct isis_vertex_adj
*vadj
, *candidate
= NULL
;
100 for (ALL_LIST_ELEMENTS_RO(adjs
, node
, vadj
)) {
101 struct isis_adjacency
*adj
, *candidate_adj
;
103 adj
= vadj
->sadj
->adj
;
108 candidate
= listgetdata(excess
);
109 candidate_adj
= candidate
->sadj
->adj
;
111 if (candidate_adj
->sys_type
< adj
->sys_type
) {
115 if (candidate_adj
->sys_type
> adj
->sys_type
)
118 comp
= memcmp(candidate_adj
->sysid
, adj
->sysid
,
127 if (candidate_adj
->circuit
->idx
> adj
->circuit
->idx
) {
132 if (candidate_adj
->circuit
->idx
< adj
->circuit
->idx
)
135 comp
= memcmp(candidate_adj
->snpa
, adj
->snpa
, ETH_ALEN
);
142 list_delete_node(adjs
, excess
);
147 const char *vtype2string(enum vertextype vtype
)
150 case VTYPE_PSEUDO_IS
:
152 case VTYPE_PSEUDO_TE_IS
:
153 return "pseudo_TE-IS";
154 case VTYPE_NONPSEUDO_IS
:
156 case VTYPE_NONPSEUDO_TE_IS
:
160 case VTYPE_IPREACH_INTERNAL
:
161 return "IP internal";
162 case VTYPE_IPREACH_EXTERNAL
:
163 return "IP external";
164 case VTYPE_IPREACH_TE
:
166 case VTYPE_IP6REACH_INTERNAL
:
167 return "IP6 internal";
168 case VTYPE_IP6REACH_EXTERNAL
:
169 return "IP6 external";
173 return NULL
; /* Not reached */
176 const char *vid2string(const struct isis_vertex
*vertex
, char *buff
, int size
)
178 if (VTYPE_IS(vertex
->type
) || VTYPE_ES(vertex
->type
)) {
179 const char *hostname
= print_sys_hostname(vertex
->N
.id
);
180 strlcpy(buff
, hostname
, size
);
184 if (VTYPE_IP(vertex
->type
)) {
185 srcdest2str(&vertex
->N
.ip
.p
.dest
, &vertex
->N
.ip
.p
.src
, buff
,
193 static bool prefix_sid_cmp(const void *value1
, const void *value2
)
195 const struct isis_vertex
*c1
= value1
;
196 const struct isis_vertex
*c2
= value2
;
198 if (CHECK_FLAG(c1
->N
.ip
.sr
.sid
.flags
,
199 ISIS_PREFIX_SID_VALUE
| ISIS_PREFIX_SID_LOCAL
)
200 != CHECK_FLAG(c2
->N
.ip
.sr
.sid
.flags
,
201 ISIS_PREFIX_SID_VALUE
| ISIS_PREFIX_SID_LOCAL
))
204 return c1
->N
.ip
.sr
.sid
.value
== c2
->N
.ip
.sr
.sid
.value
;
207 static unsigned int prefix_sid_key_make(const void *value
)
209 const struct isis_vertex
*vertex
= value
;
211 return jhash_1word(vertex
->N
.ip
.sr
.sid
.value
, 0);
214 struct isis_vertex
*isis_spf_prefix_sid_lookup(struct isis_spftree
*spftree
,
215 struct isis_prefix_sid
*psid
)
217 struct isis_vertex lookup
= {};
219 lookup
.N
.ip
.sr
.sid
= *psid
;
220 return hash_lookup(spftree
->prefix_sids
, &lookup
);
223 void isis_vertex_adj_free(void *arg
)
225 struct isis_vertex_adj
*vadj
= arg
;
227 XFREE(MTYPE_ISIS_VERTEX_ADJ
, vadj
);
230 static struct isis_vertex
*isis_vertex_new(struct isis_spftree
*spftree
,
232 enum vertextype vtype
)
234 struct isis_vertex
*vertex
;
236 vertex
= XCALLOC(MTYPE_ISIS_VERTEX
, sizeof(struct isis_vertex
));
238 isis_vertex_id_init(vertex
, id
, vtype
);
240 vertex
->Adj_N
= list_new();
241 vertex
->Adj_N
->del
= isis_vertex_adj_free
;
242 vertex
->parents
= list_new();
244 if (CHECK_FLAG(spftree
->flags
, F_SPFTREE_HOPCOUNT_METRIC
)) {
245 vertex
->firsthops
= hash_create(isis_vertex_queue_hash_key
,
246 isis_vertex_queue_hash_cmp
,
253 void isis_vertex_del(struct isis_vertex
*vertex
)
255 list_delete(&vertex
->Adj_N
);
256 list_delete(&vertex
->parents
);
257 if (vertex
->firsthops
) {
258 hash_clean(vertex
->firsthops
, NULL
);
259 hash_free(vertex
->firsthops
);
260 vertex
->firsthops
= NULL
;
263 memset(vertex
, 0, sizeof(struct isis_vertex
));
264 XFREE(MTYPE_ISIS_VERTEX
, vertex
);
267 struct isis_vertex_adj
*
268 isis_vertex_adj_add(struct isis_spftree
*spftree
, struct isis_vertex
*vertex
,
269 struct list
*vadj_list
, struct isis_spf_adj
*sadj
,
270 struct isis_prefix_sid
*psid
, bool last_hop
)
272 struct isis_vertex_adj
*vadj
;
274 vadj
= XCALLOC(MTYPE_ISIS_VERTEX_ADJ
, sizeof(*vadj
));
277 if (vertex
->N
.ip
.sr
.present
278 && vertex
->N
.ip
.sr
.sid
.value
!= psid
->value
)
280 "ISIS-SPF: ignoring different Prefix-SID for route %pFX",
281 &vertex
->N
.ip
.p
.dest
);
283 vadj
->sr
.sid
= *psid
;
284 vadj
->sr
.label
= sr_prefix_out_label(
285 spftree
->lspdb
, vertex
->N
.ip
.p
.dest
.family
,
286 psid
, sadj
->id
, last_hop
);
287 if (vadj
->sr
.label
!= MPLS_INVALID_LABEL
)
288 vadj
->sr
.present
= true;
291 listnode_add(vadj_list
, vadj
);
296 static void isis_vertex_adj_del(struct isis_vertex
*vertex
,
297 struct isis_adjacency
*adj
)
299 struct isis_vertex_adj
*vadj
;
300 struct listnode
*node
, *nextnode
;
305 for (ALL_LIST_ELEMENTS(vertex
->Adj_N
, node
, nextnode
, vadj
)) {
306 if (vadj
->sadj
->adj
== adj
) {
307 listnode_delete(vertex
->Adj_N
, vadj
);
308 isis_vertex_adj_free(vadj
);
314 bool isis_vertex_adj_exists(const struct isis_spftree
*spftree
,
315 const struct isis_vertex
*vertex
,
316 const struct isis_spf_adj
*sadj
)
318 struct isis_vertex_adj
*tmp
;
319 struct listnode
*node
;
321 for (ALL_LIST_ELEMENTS_RO(vertex
->Adj_N
, node
, tmp
)) {
322 if (CHECK_FLAG(spftree
->flags
, F_SPFTREE_NO_ADJACENCIES
)) {
323 if (memcmp(sadj
->id
, tmp
->sadj
->id
, sizeof(sadj
->id
))
327 if (sadj
->adj
== tmp
->sadj
->adj
)
335 static void isis_spf_adj_free(void *arg
)
337 struct isis_spf_adj
*sadj
= arg
;
339 XFREE(MTYPE_ISIS_SPF_ADJ
, sadj
);
342 struct isis_spftree
*isis_spftree_new(struct isis_area
*area
,
343 struct lspdb_head
*lspdb
,
344 const uint8_t *sysid
, int level
,
345 enum spf_tree_id tree_id
,
346 enum spf_type type
, uint8_t flags
)
348 struct isis_spftree
*tree
;
350 tree
= XCALLOC(MTYPE_ISIS_SPFTREE
, sizeof(struct isis_spftree
));
352 isis_vertex_queue_init(&tree
->tents
, "IS-IS SPF tents", true);
353 isis_vertex_queue_init(&tree
->paths
, "IS-IS SPF paths", false);
354 tree
->route_table
= srcdest_table_init();
355 tree
->route_table
->cleanup
= isis_route_node_cleanup
;
356 tree
->route_table_backup
= srcdest_table_init();
357 tree
->route_table_backup
->cleanup
= isis_route_node_cleanup
;
360 tree
->prefix_sids
= hash_create(prefix_sid_key_make
, prefix_sid_cmp
,
361 "SR Prefix-SID Entries");
362 tree
->sadj_list
= list_new();
363 tree
->sadj_list
->del
= isis_spf_adj_free
;
364 tree
->last_run_timestamp
= 0;
365 tree
->last_run_monotime
= 0;
366 tree
->last_run_duration
= 0;
369 memcpy(tree
->sysid
, sysid
, ISIS_SYS_ID_LEN
);
371 tree
->tree_id
= tree_id
;
372 tree
->family
= (tree
->tree_id
== SPFTREE_IPV4
) ? AF_INET
: AF_INET6
;
374 isis_rlfa_list_init(tree
);
375 tree
->lfa
.remote
.pc_spftrees
= list_new();
376 tree
->lfa
.remote
.pc_spftrees
->del
= (void (*)(void *))isis_spftree_del
;
377 if (tree
->type
== SPF_TYPE_RLFA
|| tree
->type
== SPF_TYPE_TI_LFA
) {
378 isis_spf_node_list_init(&tree
->lfa
.p_space
);
379 isis_spf_node_list_init(&tree
->lfa
.q_space
);
385 void isis_spftree_del(struct isis_spftree
*spftree
)
387 hash_clean(spftree
->prefix_sids
, NULL
);
388 hash_free(spftree
->prefix_sids
);
389 isis_zebra_rlfa_unregister_all(spftree
);
390 isis_rlfa_list_clear(spftree
);
391 list_delete(&spftree
->lfa
.remote
.pc_spftrees
);
392 if (spftree
->type
== SPF_TYPE_RLFA
393 || spftree
->type
== SPF_TYPE_TI_LFA
) {
394 isis_spf_node_list_clear(&spftree
->lfa
.q_space
);
395 isis_spf_node_list_clear(&spftree
->lfa
.p_space
);
397 isis_spf_node_list_clear(&spftree
->adj_nodes
);
398 list_delete(&spftree
->sadj_list
);
399 isis_vertex_queue_free(&spftree
->tents
);
400 isis_vertex_queue_free(&spftree
->paths
);
401 route_table_finish(spftree
->route_table
);
402 route_table_finish(spftree
->route_table_backup
);
403 spftree
->route_table
= NULL
;
405 XFREE(MTYPE_ISIS_SPFTREE
, spftree
);
409 static void isis_spftree_adj_del(struct isis_spftree
*spftree
,
410 struct isis_adjacency
*adj
)
412 struct listnode
*node
;
413 struct isis_vertex
*v
;
416 assert(!isis_vertex_queue_count(&spftree
->tents
));
417 for (ALL_QUEUE_ELEMENTS_RO(&spftree
->paths
, node
, v
))
418 isis_vertex_adj_del(v
, adj
);
422 void spftree_area_init(struct isis_area
*area
)
424 for (int tree
= SPFTREE_IPV4
; tree
< SPFTREE_COUNT
; tree
++) {
425 for (int level
= ISIS_LEVEL1
; level
<= ISIS_LEVEL2
; level
++) {
426 if (!(area
->is_type
& level
))
428 if (area
->spftree
[tree
][level
- 1])
431 area
->spftree
[tree
][level
- 1] =
432 isis_spftree_new(area
, &area
->lspdb
[level
- 1],
433 area
->isis
->sysid
, level
, tree
,
434 SPF_TYPE_FORWARD
, 0);
439 void spftree_area_del(struct isis_area
*area
)
441 for (int tree
= SPFTREE_IPV4
; tree
< SPFTREE_COUNT
; tree
++) {
442 for (int level
= ISIS_LEVEL1
; level
<= ISIS_LEVEL2
; level
++) {
443 if (!(area
->is_type
& level
))
445 if (!area
->spftree
[tree
][level
- 1])
448 isis_spftree_del(area
->spftree
[tree
][level
- 1]);
453 static int spf_adj_state_change(struct isis_adjacency
*adj
)
455 struct isis_area
*area
= adj
->circuit
->area
;
457 if (adj
->adj_state
== ISIS_ADJ_UP
)
460 /* Remove adjacency from all SPF trees. */
461 for (int tree
= SPFTREE_IPV4
; tree
< SPFTREE_COUNT
; tree
++) {
462 for (int level
= ISIS_LEVEL1
; level
<= ISIS_LEVEL2
; level
++) {
463 if (!(area
->is_type
& level
))
465 if (!area
->spftree
[tree
][level
- 1])
467 isis_spftree_adj_del(area
->spftree
[tree
][level
- 1],
472 if (fabricd_spftree(area
) != NULL
)
473 isis_spftree_adj_del(fabricd_spftree(area
), adj
);
479 * Find the system LSP: returns the LSP in our LSP database
480 * associated with the given system ID.
482 struct isis_lsp
*isis_root_system_lsp(struct lspdb_head
*lspdb
,
483 const uint8_t *sysid
)
485 struct isis_lsp
*lsp
;
486 uint8_t lspid
[ISIS_SYS_ID_LEN
+ 2];
488 memcpy(lspid
, sysid
, ISIS_SYS_ID_LEN
);
489 LSP_PSEUDO_ID(lspid
) = 0;
490 LSP_FRAGMENT(lspid
) = 0;
491 lsp
= lsp_search(lspdb
, lspid
);
492 if (lsp
&& lsp
->hdr
.rem_lifetime
!= 0)
498 * Add this IS to the root of SPT
500 static struct isis_vertex
*isis_spf_add_root(struct isis_spftree
*spftree
)
502 struct isis_vertex
*vertex
;
504 char buff
[VID2STR_BUFFER
];
505 #endif /* EXTREME_DEBUG */
507 vertex
= isis_vertex_new(spftree
, spftree
->sysid
,
508 spftree
->area
->oldmetric
510 : VTYPE_NONPSEUDO_TE_IS
);
511 isis_vertex_queue_append(&spftree
->paths
, vertex
);
514 zlog_debug("ISIS-SPF: added this IS %s %s depth %d dist %d to PATHS",
515 vtype2string(vertex
->type
),
516 vid2string(vertex
, buff
, sizeof(buff
)), vertex
->depth
,
518 #endif /* EXTREME_DEBUG */
523 static void vertex_add_parent_firsthop(struct hash_bucket
*bucket
, void *arg
)
525 struct isis_vertex
*vertex
= arg
;
526 struct isis_vertex
*hop
= bucket
->data
;
528 hash_get(vertex
->firsthops
, hop
, hash_alloc_intern
);
531 static void vertex_update_firsthops(struct isis_vertex
*vertex
,
532 struct isis_vertex
*parent
)
534 if (vertex
->d_N
<= 2)
535 hash_get(vertex
->firsthops
, vertex
, hash_alloc_intern
);
537 if (vertex
->d_N
< 2 || !parent
)
540 hash_iterate(parent
->firsthops
, vertex_add_parent_firsthop
, vertex
);
544 * Add a vertex to TENT sorted by cost and by vertextype on tie break situation
546 static struct isis_vertex
*
547 isis_spf_add2tent(struct isis_spftree
*spftree
, enum vertextype vtype
, void *id
,
548 uint32_t cost
, int depth
, struct isis_spf_adj
*sadj
,
549 struct isis_prefix_sid
*psid
, struct isis_vertex
*parent
)
551 struct isis_vertex
*vertex
;
552 struct listnode
*node
;
554 char buff
[VID2STR_BUFFER
];
556 vertex
= isis_find_vertex(&spftree
->paths
, id
, vtype
);
557 if (vertex
!= NULL
) {
559 "%s: vertex %s of type %s already in PATH; check for sysId collisions with established neighbors",
560 __func__
, vid2string(vertex
, buff
, sizeof(buff
)),
561 vtype2string(vertex
->type
));
564 vertex
= isis_find_vertex(&spftree
->tents
, id
, vtype
);
565 if (vertex
!= NULL
) {
567 "%s: vertex %s of type %s already in TENT; check for sysId collisions with established neighbors",
568 __func__
, vid2string(vertex
, buff
, sizeof(buff
)),
569 vtype2string(vertex
->type
));
573 vertex
= isis_vertex_new(spftree
, id
, vtype
);
575 vertex
->depth
= depth
;
576 if (VTYPE_IP(vtype
) && psid
) {
577 struct isis_area
*area
= spftree
->area
;
578 struct isis_vertex
*vertex_psid
;
581 * Check if the Prefix-SID is already in use by another prefix.
583 vertex_psid
= isis_spf_prefix_sid_lookup(spftree
, psid
);
585 && !prefix_same(&vertex_psid
->N
.ip
.p
.dest
,
586 &vertex
->N
.ip
.p
.dest
)) {
588 EC_ISIS_SID_COLLISION
,
589 "ISIS-Sr (%s): collision detected, prefixes %pFX and %pFX share the same SID %s (%u)",
590 area
->area_tag
, &vertex
->N
.ip
.p
.dest
,
591 &vertex_psid
->N
.ip
.p
.dest
,
592 CHECK_FLAG(psid
->flags
, ISIS_PREFIX_SID_VALUE
)
600 local
= (vertex
->depth
== 1);
601 vertex
->N
.ip
.sr
.sid
= *psid
;
602 vertex
->N
.ip
.sr
.label
=
603 sr_prefix_in_label(area
, psid
, local
);
604 if (vertex
->N
.ip
.sr
.label
!= MPLS_INVALID_LABEL
)
605 vertex
->N
.ip
.sr
.present
= true;
607 hash_get(spftree
->prefix_sids
, vertex
,
613 listnode_add(vertex
->parents
, parent
);
616 if (CHECK_FLAG(spftree
->flags
, F_SPFTREE_HOPCOUNT_METRIC
))
617 vertex_update_firsthops(vertex
, parent
);
619 last_hop
= (vertex
->depth
== 2);
620 if (parent
&& parent
->Adj_N
&& listcount(parent
->Adj_N
) > 0) {
621 struct isis_vertex_adj
*parent_vadj
;
623 for (ALL_LIST_ELEMENTS_RO(parent
->Adj_N
, node
, parent_vadj
))
624 isis_vertex_adj_add(spftree
, vertex
, vertex
->Adj_N
,
625 parent_vadj
->sadj
, psid
, last_hop
);
627 isis_vertex_adj_add(spftree
, vertex
, vertex
->Adj_N
, sadj
, psid
,
633 "ISIS-SPF: add to TENT %s %s %s depth %d dist %d adjcount %d",
634 print_sys_hostname(vertex
->N
.id
), vtype2string(vertex
->type
),
635 vid2string(vertex
, buff
, sizeof(buff
)), vertex
->depth
,
636 vertex
->d_N
, listcount(vertex
->Adj_N
));
637 #endif /* EXTREME_DEBUG */
639 isis_vertex_queue_insert(&spftree
->tents
, vertex
);
643 static void isis_spf_add_local(struct isis_spftree
*spftree
,
644 enum vertextype vtype
, void *id
,
645 struct isis_spf_adj
*sadj
, uint32_t cost
,
646 struct isis_prefix_sid
*psid
,
647 struct isis_vertex
*parent
)
649 struct isis_vertex
*vertex
;
651 vertex
= isis_find_vertex(&spftree
->tents
, id
, vtype
);
655 if (vertex
->d_N
== cost
) {
657 bool last_hop
= (vertex
->depth
== 2);
659 isis_vertex_adj_add(spftree
, vertex
,
660 vertex
->Adj_N
, sadj
, psid
,
664 if (!CHECK_FLAG(spftree
->flags
,
665 F_SPFTREE_NO_ADJACENCIES
)
666 && listcount(vertex
->Adj_N
) > ISIS_MAX_PATH_SPLITS
)
667 remove_excess_adjs(vertex
->Adj_N
);
668 if (parent
&& (listnode_lookup(vertex
->parents
, parent
)
670 listnode_add(vertex
->parents
, parent
);
672 } else if (vertex
->d_N
< cost
) {
675 } else { /* vertex->d_N > cost */
677 isis_vertex_queue_delete(&spftree
->tents
, vertex
);
678 isis_vertex_del(vertex
);
682 isis_spf_add2tent(spftree
, vtype
, id
, cost
, 1, sadj
, psid
, parent
);
686 static void process_N(struct isis_spftree
*spftree
, enum vertextype vtype
,
687 void *id
, uint32_t dist
, uint16_t depth
,
688 struct isis_prefix_sid
*psid
, struct isis_vertex
*parent
)
690 struct isis_vertex
*vertex
;
692 char buff
[VID2STR_BUFFER
];
695 assert(spftree
&& parent
);
697 if (CHECK_FLAG(spftree
->flags
, F_SPFTREE_HOPCOUNT_METRIC
)
701 struct prefix_pair p
;
702 if (vtype
>= VTYPE_IPREACH_INTERNAL
) {
703 memcpy(&p
, id
, sizeof(p
));
705 apply_mask((struct prefix
*)&p
.src
);
709 /* RFC3787 section 5.1 */
710 if (spftree
->area
->newmetric
== 1) {
711 if (dist
> MAX_WIDE_PATH_METRIC
)
715 else if (spftree
->area
->oldmetric
== 1) {
716 if (dist
> MAX_NARROW_PATH_METRIC
)
721 vertex
= isis_find_vertex(&spftree
->paths
, id
, vtype
);
725 "ISIS-SPF: process_N %s %s %s dist %d already found from PATH",
726 print_sys_hostname(vertex
->N
.id
), vtype2string(vtype
),
727 vid2string(vertex
, buff
, sizeof(buff
)), dist
);
728 #endif /* EXTREME_DEBUG */
729 assert(dist
>= vertex
->d_N
);
733 vertex
= isis_find_vertex(&spftree
->tents
, id
, vtype
);
739 "ISIS-SPF: process_N %s %s %s dist %d parent %s adjcount %d",
740 print_sys_hostname(vertex
->N
.id
), vtype2string(vtype
),
741 vid2string(vertex
, buff
, sizeof(buff
)), dist
,
742 (parent
? print_sys_hostname(parent
->N
.id
) : "null"),
743 (parent
? listcount(parent
->Adj_N
) : 0));
744 #endif /* EXTREME_DEBUG */
745 if (vertex
->d_N
== dist
) {
746 struct listnode
*node
;
747 struct isis_vertex_adj
*parent_vadj
;
748 for (ALL_LIST_ELEMENTS_RO(parent
->Adj_N
, node
,
750 if (!isis_vertex_adj_exists(
752 parent_vadj
->sadj
)) {
753 bool last_hop
= (vertex
->depth
== 2);
755 isis_vertex_adj_add(spftree
, vertex
,
760 if (CHECK_FLAG(spftree
->flags
,
761 F_SPFTREE_HOPCOUNT_METRIC
))
762 vertex_update_firsthops(vertex
, parent
);
764 if (!CHECK_FLAG(spftree
->flags
,
765 F_SPFTREE_NO_ADJACENCIES
)
766 && listcount(vertex
->Adj_N
) > ISIS_MAX_PATH_SPLITS
)
767 remove_excess_adjs(vertex
->Adj_N
);
768 if (listnode_lookup(vertex
->parents
, parent
) == NULL
)
769 listnode_add(vertex
->parents
, parent
);
771 } else if (vertex
->d_N
< dist
) {
775 isis_vertex_queue_delete(&spftree
->tents
, vertex
);
776 isis_vertex_del(vertex
);
781 zlog_debug("ISIS-SPF: process_N add2tent %s %s dist %d parent %s",
782 print_sys_hostname(id
), vtype2string(vtype
), dist
,
783 (parent
? print_sys_hostname(parent
->N
.id
) : "null"));
784 #endif /* EXTREME_DEBUG */
786 isis_spf_add2tent(spftree
, vtype
, id
, dist
, depth
, NULL
, psid
, parent
);
793 static int isis_spf_process_lsp(struct isis_spftree
*spftree
,
794 struct isis_lsp
*lsp
, uint32_t cost
,
795 uint16_t depth
, uint8_t *root_sysid
,
796 struct isis_vertex
*parent
)
798 bool pseudo_lsp
= LSP_PSEUDO_ID(lsp
->hdr
.lsp_id
);
799 struct listnode
*fragnode
= NULL
;
801 enum vertextype vtype
;
802 static const uint8_t null_sysid
[ISIS_SYS_ID_LEN
];
803 struct isis_mt_router_info
*mt_router_info
= NULL
;
804 struct prefix_pair ip_info
;
807 if (isis_lfa_excise_node_check(spftree
, lsp
->hdr
.lsp_id
)) {
809 zlog_debug("ISIS-LFA: excising node %s",
810 print_sys_hostname(lsp
->hdr
.lsp_id
));
817 if (spftree
->mtid
!= ISIS_MT_IPV4_UNICAST
)
818 mt_router_info
= isis_tlvs_lookup_mt_router_info(lsp
->tlvs
,
821 if (!pseudo_lsp
&& (spftree
->mtid
== ISIS_MT_IPV4_UNICAST
822 && !speaks(lsp
->tlvs
->protocols_supported
.protocols
,
823 lsp
->tlvs
->protocols_supported
.count
,
828 /* RFC3787 section 4 SHOULD ignore overload bit in pseudo LSPs */
829 bool no_overload
= (pseudo_lsp
830 || (spftree
->mtid
== ISIS_MT_IPV4_UNICAST
831 && !ISIS_MASK_LSP_OL_BIT(lsp
->hdr
.lsp_bits
))
832 || (mt_router_info
&& !mt_router_info
->overload
));
835 if (lsp
->hdr
.seqno
== 0) {
837 "isis_spf_process_lsp(): lsp with 0 seq_num - ignore");
842 zlog_debug("ISIS-SPF: process_lsp %s",
843 print_sys_hostname(lsp
->hdr
.lsp_id
));
844 #endif /* EXTREME_DEBUG */
847 if ((pseudo_lsp
|| spftree
->mtid
== ISIS_MT_IPV4_UNICAST
)
848 && spftree
->area
->oldmetric
) {
849 struct isis_oldstyle_reach
*r
;
850 for (r
= (struct isis_oldstyle_reach
*)
851 lsp
->tlvs
->oldstyle_reach
.head
;
857 /* Two way connectivity */
858 if (!LSP_PSEUDO_ID(r
->id
)
859 && !memcmp(r
->id
, root_sysid
,
863 && !memcmp(r
->id
, null_sysid
,
866 dist
= cost
+ r
->metric
;
870 : VTYPE_NONPSEUDO_IS
,
871 (void *)r
->id
, dist
, depth
+ 1, NULL
,
876 if (spftree
->area
->newmetric
) {
877 struct isis_item_list
*te_neighs
= NULL
;
878 if (pseudo_lsp
|| spftree
->mtid
== ISIS_MT_IPV4_UNICAST
)
879 te_neighs
= &lsp
->tlvs
->extended_reach
;
881 te_neighs
= isis_lookup_mt_items(
882 &lsp
->tlvs
->mt_reach
, spftree
->mtid
);
884 struct isis_extended_reach
*er
;
885 for (er
= te_neighs
? (struct isis_extended_reach
*)
890 /* Two way connectivity */
891 if (!LSP_PSEUDO_ID(er
->id
)
892 && !memcmp(er
->id
, root_sysid
,
896 && !memcmp(er
->id
, null_sysid
,
900 + (CHECK_FLAG(spftree
->flags
,
901 F_SPFTREE_HOPCOUNT_METRIC
)
905 LSP_PSEUDO_ID(er
->id
)
907 : VTYPE_NONPSEUDO_TE_IS
,
908 (void *)er
->id
, dist
, depth
+ 1, NULL
,
914 if (!fabricd
&& !pseudo_lsp
&& spftree
->family
== AF_INET
915 && spftree
->mtid
== ISIS_MT_IPV4_UNICAST
916 && spftree
->area
->oldmetric
) {
917 struct isis_item_list
*reachs
[] = {
918 &lsp
->tlvs
->oldstyle_ip_reach
,
919 &lsp
->tlvs
->oldstyle_ip_reach_ext
};
921 for (unsigned int i
= 0; i
< array_size(reachs
); i
++) {
922 vtype
= i
? VTYPE_IPREACH_EXTERNAL
923 : VTYPE_IPREACH_INTERNAL
;
925 memset(&ip_info
, 0, sizeof(ip_info
));
926 ip_info
.dest
.family
= AF_INET
;
928 struct isis_oldstyle_ip_reach
*r
;
929 for (r
= (struct isis_oldstyle_ip_reach
*)reachs
[i
]
932 dist
= cost
+ r
->metric
;
933 ip_info
.dest
.u
.prefix4
= r
->prefix
.prefix
;
934 ip_info
.dest
.prefixlen
= r
->prefix
.prefixlen
;
935 process_N(spftree
, vtype
, &ip_info
,
936 dist
, depth
+ 1, NULL
, parent
);
941 /* we can skip all the rest if we're using metric style narrow */
942 if (!spftree
->area
->newmetric
)
945 if (!pseudo_lsp
&& spftree
->family
== AF_INET
) {
946 struct isis_item_list
*ipv4_reachs
;
947 if (spftree
->mtid
== ISIS_MT_IPV4_UNICAST
)
948 ipv4_reachs
= &lsp
->tlvs
->extended_ip_reach
;
950 ipv4_reachs
= isis_lookup_mt_items(
951 &lsp
->tlvs
->mt_ip_reach
, spftree
->mtid
);
953 memset(&ip_info
, 0, sizeof(ip_info
));
954 ip_info
.dest
.family
= AF_INET
;
956 struct isis_extended_ip_reach
*r
;
958 ? (struct isis_extended_ip_reach
*)
962 dist
= cost
+ r
->metric
;
963 ip_info
.dest
.u
.prefix4
= r
->prefix
.prefix
;
964 ip_info
.dest
.prefixlen
= r
->prefix
.prefixlen
;
966 /* Parse list of Prefix-SID subTLVs */
967 has_valid_psid
= false;
969 for (struct isis_item
*i
=
970 r
->subtlvs
->prefix_sids
.head
;
972 struct isis_prefix_sid
*psid
=
973 (struct isis_prefix_sid
*)i
;
975 if (psid
->algorithm
!= SR_ALGORITHM_SPF
)
978 has_valid_psid
= true;
979 process_N(spftree
, VTYPE_IPREACH_TE
,
980 &ip_info
, dist
, depth
+ 1,
983 * Stop the Prefix-SID iteration since
984 * we only support the SPF algorithm for
991 process_N(spftree
, VTYPE_IPREACH_TE
, &ip_info
,
992 dist
, depth
+ 1, NULL
, parent
);
996 if (!pseudo_lsp
&& spftree
->family
== AF_INET6
) {
997 struct isis_item_list
*ipv6_reachs
;
998 if (spftree
->mtid
== ISIS_MT_IPV4_UNICAST
)
999 ipv6_reachs
= &lsp
->tlvs
->ipv6_reach
;
1001 ipv6_reachs
= isis_lookup_mt_items(
1002 &lsp
->tlvs
->mt_ipv6_reach
, spftree
->mtid
);
1004 struct isis_ipv6_reach
*r
;
1005 for (r
= ipv6_reachs
1006 ? (struct isis_ipv6_reach
*)ipv6_reachs
->head
1009 dist
= cost
+ r
->metric
;
1010 vtype
= r
->external
? VTYPE_IP6REACH_EXTERNAL
1011 : VTYPE_IP6REACH_INTERNAL
;
1012 memset(&ip_info
, 0, sizeof(ip_info
));
1013 ip_info
.dest
.family
= AF_INET6
;
1014 ip_info
.dest
.u
.prefix6
= r
->prefix
.prefix
;
1015 ip_info
.dest
.prefixlen
= r
->prefix
.prefixlen
;
1018 && r
->subtlvs
->source_prefix
1019 && r
->subtlvs
->source_prefix
->prefixlen
) {
1020 if (spftree
->tree_id
!= SPFTREE_DSTSRC
) {
1021 char buff
[VID2STR_BUFFER
];
1022 zlog_warn("Ignoring dest-src route %s in non dest-src topology",
1025 r
->subtlvs
->source_prefix
,
1031 ip_info
.src
= *r
->subtlvs
->source_prefix
;
1034 /* Parse list of Prefix-SID subTLVs */
1035 has_valid_psid
= false;
1037 for (struct isis_item
*i
=
1038 r
->subtlvs
->prefix_sids
.head
;
1040 struct isis_prefix_sid
*psid
=
1041 (struct isis_prefix_sid
*)i
;
1043 if (psid
->algorithm
!= SR_ALGORITHM_SPF
)
1046 has_valid_psid
= true;
1047 process_N(spftree
, vtype
, &ip_info
,
1048 dist
, depth
+ 1, psid
,
1051 * Stop the Prefix-SID iteration since
1052 * we only support the SPF algorithm for
1058 if (!has_valid_psid
)
1059 process_N(spftree
, vtype
, &ip_info
, dist
,
1060 depth
+ 1, NULL
, parent
);
1066 /* if attach bit set in LSP, attached-bit receive ignore is
1067 * not configured, we are a level-1 area and we have no other
1068 * level-2 | level1-2 areas then add a default route toward
1071 if ((lsp
->hdr
.lsp_bits
& LSPBIT_ATT
) == LSPBIT_ATT
1072 && !spftree
->area
->attached_bit_rcv_ignore
1073 && spftree
->area
->is_type
== IS_LEVEL_1
1074 && !isis_area_count(spftree
->area
->isis
, IS_LEVEL_2
)) {
1075 struct prefix_pair ip_info
= { {0} };
1076 if (IS_DEBUG_RTE_EVENTS
)
1077 zlog_debug("ISIS-Spf (%s): add default %s route",
1078 rawlspid_print(lsp
->hdr
.lsp_id
),
1079 spftree
->family
== AF_INET
? "ipv4"
1082 if (spftree
->family
== AF_INET
) {
1083 ip_info
.dest
.family
= AF_INET
;
1084 vtype
= VTYPE_IPREACH_INTERNAL
;
1086 ip_info
.dest
.family
= AF_INET6
;
1087 vtype
= VTYPE_IP6REACH_INTERNAL
;
1089 process_N(spftree
, vtype
, &ip_info
, cost
, depth
+ 1, NULL
,
1093 if (fragnode
== NULL
)
1094 fragnode
= listhead(lsp
->lspu
.frags
);
1096 fragnode
= listnextnode(fragnode
);
1099 lsp
= listgetdata(fragnode
);
1106 static struct isis_adjacency
*adj_find(struct list
*adj_list
, const uint8_t *id
,
1107 int level
, uint16_t mtid
, int family
)
1109 struct isis_adjacency
*adj
;
1110 struct listnode
*node
;
1112 for (ALL_LIST_ELEMENTS_RO(adj_list
, node
, adj
)) {
1113 if (!(adj
->level
& level
))
1115 if (memcmp(adj
->sysid
, id
, ISIS_SYS_ID_LEN
) != 0)
1117 if (adj
->adj_state
!= ISIS_ADJ_UP
)
1119 if (!adj_has_mt(adj
, mtid
))
1121 if (mtid
== ISIS_MT_IPV4_UNICAST
1122 && !speaks(adj
->nlpids
.nlpids
, adj
->nlpids
.count
, family
))
1130 struct spf_preload_tent_ip_reach_args
{
1131 struct isis_spftree
*spftree
;
1132 struct isis_vertex
*parent
;
1135 static int isis_spf_preload_tent_ip_reach_cb(const struct prefix
*prefix
,
1136 uint32_t metric
, bool external
,
1137 struct isis_subtlvs
*subtlvs
,
1140 struct spf_preload_tent_ip_reach_args
*args
= arg
;
1141 struct isis_spftree
*spftree
= args
->spftree
;
1142 struct isis_vertex
*parent
= args
->parent
;
1143 struct prefix_pair ip_info
;
1144 enum vertextype vtype
;
1145 bool has_valid_psid
= false;
1148 return LSP_ITER_CONTINUE
;
1150 assert(spftree
->family
== prefix
->family
);
1151 memset(&ip_info
, 0, sizeof(ip_info
));
1152 prefix_copy(&ip_info
.dest
, prefix
);
1153 apply_mask(&ip_info
.dest
);
1155 if (prefix
->family
== AF_INET
)
1156 vtype
= VTYPE_IPREACH_INTERNAL
;
1158 vtype
= VTYPE_IP6REACH_INTERNAL
;
1160 /* Parse list of Prefix-SID subTLVs */
1162 for (struct isis_item
*i
= subtlvs
->prefix_sids
.head
; i
;
1164 struct isis_prefix_sid
*psid
=
1165 (struct isis_prefix_sid
*)i
;
1167 if (psid
->algorithm
!= SR_ALGORITHM_SPF
)
1170 has_valid_psid
= true;
1171 isis_spf_add_local(spftree
, vtype
, &ip_info
, NULL
, 0,
1175 * Stop the Prefix-SID iteration since we only support
1176 * the SPF algorithm for now.
1181 if (!has_valid_psid
)
1182 isis_spf_add_local(spftree
, vtype
, &ip_info
, NULL
, 0, NULL
,
1185 return LSP_ITER_CONTINUE
;
1188 static void isis_spf_preload_tent(struct isis_spftree
*spftree
,
1189 uint8_t *root_sysid
,
1190 struct isis_lsp
*root_lsp
,
1191 struct isis_vertex
*parent
)
1193 struct spf_preload_tent_ip_reach_args ip_reach_args
;
1194 struct isis_spf_adj
*sadj
;
1195 struct listnode
*node
;
1197 if (!CHECK_FLAG(spftree
->flags
, F_SPFTREE_HOPCOUNT_METRIC
)) {
1198 ip_reach_args
.spftree
= spftree
;
1199 ip_reach_args
.parent
= parent
;
1200 isis_lsp_iterate_ip_reach(
1201 root_lsp
, spftree
->family
, spftree
->mtid
,
1202 isis_spf_preload_tent_ip_reach_cb
, &ip_reach_args
);
1205 /* Iterate over adjacencies. */
1206 for (ALL_LIST_ELEMENTS_RO(spftree
->sadj_list
, node
, sadj
)) {
1207 const uint8_t *adj_id
;
1210 if (CHECK_FLAG(sadj
->flags
, F_ISIS_SPF_ADJ_BROADCAST
))
1211 adj_id
= sadj
->lan
.desig_is_id
;
1215 if (isis_lfa_excise_adj_check(spftree
, adj_id
)) {
1217 zlog_debug("ISIS-SPF: excising adjacency %s",
1218 isis_format_id(sadj
->id
,
1219 ISIS_SYS_ID_LEN
+ 1));
1223 metric
= CHECK_FLAG(spftree
->flags
, F_SPFTREE_HOPCOUNT_METRIC
)
1226 if (!LSP_PSEUDO_ID(sadj
->id
)) {
1227 isis_spf_add_local(spftree
,
1228 CHECK_FLAG(sadj
->flags
,
1229 F_ISIS_SPF_ADJ_OLDMETRIC
)
1230 ? VTYPE_NONPSEUDO_IS
1231 : VTYPE_NONPSEUDO_TE_IS
,
1232 sadj
->id
, sadj
, metric
, NULL
,
1234 } else if (sadj
->lsp
) {
1235 isis_spf_process_lsp(spftree
, sadj
->lsp
, metric
, 0,
1236 spftree
->sysid
, parent
);
1241 struct spf_adj_find_reverse_metric_args
{
1242 const uint8_t *id_self
;
1243 uint32_t reverse_metric
;
1246 static int spf_adj_find_reverse_metric_cb(const uint8_t *id
, uint32_t metric
,
1248 struct isis_ext_subtlvs
*subtlvs
,
1251 struct spf_adj_find_reverse_metric_args
*args
= arg
;
1253 if (memcmp(id
, args
->id_self
, ISIS_SYS_ID_LEN
))
1254 return LSP_ITER_CONTINUE
;
1256 args
->reverse_metric
= metric
;
1258 return LSP_ITER_STOP
;
1262 * Change all SPF adjacencies to use the link cost in the direction from the
1263 * next hop back towards root in place of the link cost in the direction away
1264 * from root towards the next hop.
1266 static void spf_adj_get_reverse_metrics(struct isis_spftree
*spftree
)
1268 struct isis_spf_adj
*sadj
;
1269 struct listnode
*node
, *nnode
;
1271 for (ALL_LIST_ELEMENTS(spftree
->sadj_list
, node
, nnode
, sadj
)) {
1272 uint8_t lspid
[ISIS_SYS_ID_LEN
+ 2];
1273 struct isis_lsp
*lsp_adj
;
1274 const uint8_t *id_self
;
1275 struct spf_adj_find_reverse_metric_args args
;
1277 /* Skip pseudonodes. */
1278 if (LSP_PSEUDO_ID(sadj
->id
))
1281 /* Find LSP of the corresponding adjacency. */
1282 memcpy(lspid
, sadj
->id
, ISIS_SYS_ID_LEN
);
1283 LSP_PSEUDO_ID(lspid
) = 0;
1284 LSP_FRAGMENT(lspid
) = 0;
1285 lsp_adj
= lsp_search(spftree
->lspdb
, lspid
);
1286 if (lsp_adj
== NULL
|| lsp_adj
->hdr
.rem_lifetime
== 0) {
1287 /* Delete one-way adjacency. */
1288 listnode_delete(spftree
->sadj_list
, sadj
);
1292 /* Find root node in the LSP of the adjacent router. */
1293 if (CHECK_FLAG(sadj
->flags
, F_ISIS_SPF_ADJ_BROADCAST
))
1294 id_self
= sadj
->lan
.desig_is_id
;
1296 id_self
= spftree
->sysid
;
1297 args
.id_self
= id_self
;
1298 args
.reverse_metric
= UINT32_MAX
;
1299 isis_lsp_iterate_is_reach(lsp_adj
, spftree
->mtid
,
1300 spf_adj_find_reverse_metric_cb
,
1302 if (args
.reverse_metric
== UINT32_MAX
) {
1303 /* Delete one-way adjacency. */
1304 listnode_delete(spftree
->sadj_list
, sadj
);
1307 sadj
->metric
= args
.reverse_metric
;
1311 static void spf_adj_list_parse_tlv(struct isis_spftree
*spftree
,
1312 struct list
*adj_list
, const uint8_t *id
,
1313 const uint8_t *desig_is_id
,
1314 uint32_t pseudo_metric
, uint32_t metric
,
1316 struct isis_ext_subtlvs
*subtlvs
)
1318 struct isis_spf_adj
*sadj
;
1319 uint8_t lspid
[ISIS_SYS_ID_LEN
+ 2];
1320 struct isis_lsp
*lsp
;
1323 /* Skip self in the pseudonode. */
1324 if (desig_is_id
&& !memcmp(id
, spftree
->sysid
, ISIS_SYS_ID_LEN
))
1327 /* Find LSP from the adjacency. */
1328 memcpy(lspid
, id
, ISIS_SYS_ID_LEN
+ 1);
1329 LSP_FRAGMENT(lspid
) = 0;
1330 lsp
= lsp_search(spftree
->lspdb
, lspid
);
1331 if (lsp
== NULL
|| lsp
->hdr
.rem_lifetime
== 0) {
1332 zlog_warn("ISIS-SPF: No LSP found from root to L%d %s",
1333 spftree
->level
, rawlspid_print(lspid
));
1337 sadj
= XCALLOC(MTYPE_ISIS_SPF_ADJ
, sizeof(*sadj
));
1338 memcpy(sadj
->id
, id
, sizeof(sadj
->id
));
1340 memcpy(sadj
->lan
.desig_is_id
, desig_is_id
,
1341 sizeof(sadj
->lan
.desig_is_id
));
1342 SET_FLAG(flags
, F_ISIS_SPF_ADJ_BROADCAST
);
1343 sadj
->metric
= pseudo_metric
;
1345 sadj
->metric
= metric
;
1347 SET_FLAG(flags
, F_ISIS_SPF_ADJ_OLDMETRIC
);
1349 sadj
->subtlvs
= subtlvs
;
1350 sadj
->flags
= flags
;
1352 if ((oldmetric
&& metric
== ISIS_NARROW_METRIC_INFINITY
)
1353 || (!oldmetric
&& metric
== ISIS_WIDE_METRIC_INFINITY
))
1354 SET_FLAG(flags
, F_ISIS_SPF_ADJ_METRIC_INFINITY
);
1356 /* Set real adjacency. */
1357 if (!CHECK_FLAG(spftree
->flags
, F_SPFTREE_NO_ADJACENCIES
)
1358 && !LSP_PSEUDO_ID(id
)) {
1359 struct isis_adjacency
*adj
;
1361 adj
= adj_find(adj_list
, id
, spftree
->level
, spftree
->mtid
,
1364 XFREE(MTYPE_ISIS_SPF_ADJ
, sadj
);
1368 listnode_delete(adj_list
, adj
);
1372 /* Add adjacency to the list. */
1373 listnode_add(spftree
->sadj_list
, sadj
);
1375 if (!LSP_PSEUDO_ID(id
)) {
1376 struct isis_spf_node
*node
;
1378 node
= isis_spf_node_find(&spftree
->adj_nodes
, id
);
1380 node
= isis_spf_node_new(&spftree
->adj_nodes
, id
);
1381 if (node
->best_metric
== 0 || sadj
->metric
< node
->best_metric
)
1382 node
->best_metric
= sadj
->metric
;
1383 listnode_add(node
->adjacencies
, sadj
);
1386 /* Parse pseudonode LSP too. */
1387 if (LSP_PSEUDO_ID(id
))
1388 spf_adj_list_parse_lsp(spftree
, adj_list
, lsp
, id
, metric
);
1391 static void spf_adj_list_parse_lsp(struct isis_spftree
*spftree
,
1392 struct list
*adj_list
, struct isis_lsp
*lsp
,
1393 const uint8_t *pseudo_nodeid
,
1394 uint32_t pseudo_metric
)
1396 bool pseudo_lsp
= LSP_PSEUDO_ID(lsp
->hdr
.lsp_id
);
1397 struct isis_lsp
*frag
;
1398 struct listnode
*node
;
1399 struct isis_item
*head
;
1400 struct isis_item_list
*te_neighs
;
1402 if (lsp
->hdr
.seqno
== 0 || lsp
->hdr
.rem_lifetime
== 0)
1405 /* Parse main LSP. */
1407 if (pseudo_lsp
|| spftree
->mtid
== ISIS_MT_IPV4_UNICAST
) {
1408 head
= lsp
->tlvs
->oldstyle_reach
.head
;
1409 for (struct isis_oldstyle_reach
*reach
=
1410 (struct isis_oldstyle_reach
*)head
;
1411 reach
; reach
= reach
->next
) {
1412 spf_adj_list_parse_tlv(
1413 spftree
, adj_list
, reach
->id
,
1414 pseudo_nodeid
, pseudo_metric
,
1415 reach
->metric
, true, NULL
);
1419 if (pseudo_lsp
|| spftree
->mtid
== ISIS_MT_IPV4_UNICAST
)
1420 te_neighs
= &lsp
->tlvs
->extended_reach
;
1422 te_neighs
= isis_get_mt_items(&lsp
->tlvs
->mt_reach
,
1425 head
= te_neighs
->head
;
1426 for (struct isis_extended_reach
*reach
=
1427 (struct isis_extended_reach
*)head
;
1428 reach
; reach
= reach
->next
) {
1429 spf_adj_list_parse_tlv(
1430 spftree
, adj_list
, reach
->id
,
1431 pseudo_nodeid
, pseudo_metric
,
1432 reach
->metric
, false, reach
->subtlvs
);
1437 /* Parse LSP fragments. */
1438 for (ALL_LIST_ELEMENTS_RO(lsp
->lspu
.frags
, node
, frag
)) {
1442 spf_adj_list_parse_lsp(spftree
, adj_list
, frag
, pseudo_nodeid
,
1447 static void isis_spf_build_adj_list(struct isis_spftree
*spftree
,
1448 struct isis_lsp
*lsp
)
1450 struct list
*adj_list
= NULL
;
1452 if (!CHECK_FLAG(spftree
->flags
, F_SPFTREE_NO_ADJACENCIES
))
1453 adj_list
= list_dup(spftree
->area
->adjacency_list
);
1455 spf_adj_list_parse_lsp(spftree
, adj_list
, lsp
, NULL
, 0);
1457 if (!CHECK_FLAG(spftree
->flags
, F_SPFTREE_NO_ADJACENCIES
))
1458 list_delete(&adj_list
);
1460 if (spftree
->type
== SPF_TYPE_REVERSE
)
1461 spf_adj_get_reverse_metrics(spftree
);
1465 * The parent(s) for vertex is set when added to TENT list
1466 * now we just put the child pointer(s) in place
1468 static void add_to_paths(struct isis_spftree
*spftree
,
1469 struct isis_vertex
*vertex
)
1471 #ifdef EXTREME_DEBUG
1472 char buff
[VID2STR_BUFFER
];
1473 #endif /* EXTREME_DEBUG */
1475 if (isis_find_vertex(&spftree
->paths
, &vertex
->N
, vertex
->type
))
1477 isis_vertex_queue_append(&spftree
->paths
, vertex
);
1479 #ifdef EXTREME_DEBUG
1480 zlog_debug("ISIS-SPF: added %s %s %s depth %d dist %d to PATHS",
1481 print_sys_hostname(vertex
->N
.id
), vtype2string(vertex
->type
),
1482 vid2string(vertex
, buff
, sizeof(buff
)), vertex
->depth
,
1484 #endif /* EXTREME_DEBUG */
1487 static void init_spt(struct isis_spftree
*spftree
, int mtid
)
1489 /* Clear data from previous run. */
1490 hash_clean(spftree
->prefix_sids
, NULL
);
1491 isis_spf_node_list_clear(&spftree
->adj_nodes
);
1492 list_delete_all_node(spftree
->sadj_list
);
1493 isis_vertex_queue_clear(&spftree
->tents
);
1494 isis_vertex_queue_clear(&spftree
->paths
);
1495 isis_zebra_rlfa_unregister_all(spftree
);
1496 isis_rlfa_list_clear(spftree
);
1497 list_delete_all_node(spftree
->lfa
.remote
.pc_spftrees
);
1498 memset(&spftree
->lfa
.protection_counters
, 0,
1499 sizeof(spftree
->lfa
.protection_counters
));
1501 spftree
->mtid
= mtid
;
1504 static enum spf_prefix_priority
1505 spf_prefix_priority(struct isis_spftree
*spftree
, struct isis_vertex
*vertex
)
1507 struct isis_area
*area
= spftree
->area
;
1508 struct prefix
*prefix
= &vertex
->N
.ip
.p
.dest
;
1510 for (int priority
= SPF_PREFIX_PRIO_CRITICAL
;
1511 priority
<= SPF_PREFIX_PRIO_MEDIUM
; priority
++) {
1512 struct spf_prefix_priority_acl
*ppa
;
1513 enum filter_type ret
= FILTER_PERMIT
;
1515 ppa
= &area
->spf_prefix_priorities
[priority
];
1516 switch (spftree
->family
) {
1518 ret
= access_list_apply(ppa
->list_v4
, prefix
);
1521 ret
= access_list_apply(ppa
->list_v6
, prefix
);
1527 if (ret
== FILTER_PERMIT
)
1531 /* Assign medium priority to loopback prefixes by default. */
1532 if (is_host_route(prefix
))
1533 return SPF_PREFIX_PRIO_MEDIUM
;
1535 return SPF_PREFIX_PRIO_LOW
;
1538 static void spf_path_process(struct isis_spftree
*spftree
,
1539 struct isis_vertex
*vertex
)
1541 struct isis_area
*area
= spftree
->area
;
1542 int level
= spftree
->level
;
1543 char buff
[VID2STR_BUFFER
];
1545 if (spftree
->type
== SPF_TYPE_TI_LFA
&& VTYPE_IS(vertex
->type
)
1546 && !CHECK_FLAG(spftree
->flags
, F_SPFTREE_NO_ADJACENCIES
)) {
1547 if (listcount(vertex
->Adj_N
) > 0) {
1548 struct isis_adjacency
*adj
;
1550 if (isis_tilfa_check(spftree
, vertex
) != 0)
1553 adj
= isis_adj_find(area
, level
, vertex
->N
.id
);
1555 sr_adj_sid_add_single(adj
, spftree
->family
,
1556 true, vertex
->Adj_N
);
1557 } else if (IS_DEBUG_SPF_EVENTS
)
1559 "ISIS-SPF: no adjacencies, do not install backup Adj-SID for %s depth %d dist %d",
1560 vid2string(vertex
, buff
, sizeof(buff
)),
1561 vertex
->depth
, vertex
->d_N
);
1564 if (VTYPE_IP(vertex
->type
)
1565 && !CHECK_FLAG(spftree
->flags
, F_SPFTREE_NO_ROUTES
)) {
1566 enum spf_prefix_priority priority
;
1568 priority
= spf_prefix_priority(spftree
, vertex
);
1569 vertex
->N
.ip
.priority
= priority
;
1570 if (vertex
->depth
== 1 || listcount(vertex
->Adj_N
) > 0) {
1571 struct isis_spftree
*pre_spftree
;
1572 struct route_table
*route_table
;
1575 switch (spftree
->type
) {
1577 case SPF_TYPE_TI_LFA
:
1579 > area
->lfa_priority_limit
[level
- 1]) {
1582 "ISIS-LFA: skipping %s %s (low prefix priority)",
1595 switch (spftree
->type
) {
1597 isis_rlfa_check(spftree
, vertex
);
1599 case SPF_TYPE_TI_LFA
:
1600 if (isis_tilfa_check(spftree
, vertex
) != 0)
1603 pre_spftree
= spftree
->lfa
.old
.spftree
;
1604 route_table
= pre_spftree
->route_table_backup
;
1605 allow_ecmp
= area
->lfa_load_sharing
[level
- 1];
1606 pre_spftree
->lfa
.protection_counters
1607 .tilfa
[vertex
->N
.ip
.priority
] += 1;
1610 route_table
= spftree
->route_table
;
1614 * Update LFA protection counters (ignore local
1617 if (vertex
->depth
> 1) {
1618 spftree
->lfa
.protection_counters
1619 .total
[priority
] += 1;
1620 if (listcount(vertex
->Adj_N
) > 1)
1621 spftree
->lfa
.protection_counters
1622 .ecmp
[priority
] += 1;
1628 &vertex
->N
.ip
.p
.dest
, &vertex
->N
.ip
.p
.src
,
1629 vertex
->d_N
, vertex
->depth
, &vertex
->N
.ip
.sr
,
1630 vertex
->Adj_N
, allow_ecmp
, area
, route_table
);
1631 } else if (IS_DEBUG_SPF_EVENTS
)
1633 "ISIS-SPF: no adjacencies, do not install route for %s depth %d dist %d",
1634 vid2string(vertex
, buff
, sizeof(buff
)),
1635 vertex
->depth
, vertex
->d_N
);
1639 static void isis_spf_loop(struct isis_spftree
*spftree
,
1640 uint8_t *root_sysid
)
1642 struct isis_vertex
*vertex
;
1643 struct isis_lsp
*lsp
;
1644 struct listnode
*node
;
1646 while (isis_vertex_queue_count(&spftree
->tents
)) {
1647 vertex
= isis_vertex_queue_pop(&spftree
->tents
);
1649 #ifdef EXTREME_DEBUG
1651 "ISIS-SPF: get TENT node %s %s depth %d dist %d to PATHS",
1652 print_sys_hostname(vertex
->N
.id
),
1653 vtype2string(vertex
->type
), vertex
->depth
, vertex
->d_N
);
1654 #endif /* EXTREME_DEBUG */
1656 add_to_paths(spftree
, vertex
);
1657 if (!VTYPE_IS(vertex
->type
))
1660 lsp
= lsp_for_vertex(spftree
, vertex
);
1662 zlog_warn("ISIS-SPF: No LSP found for %s",
1663 isis_format_id(vertex
->N
.id
,
1664 sizeof(vertex
->N
.id
)));
1668 isis_spf_process_lsp(spftree
, lsp
, vertex
->d_N
, vertex
->depth
,
1669 root_sysid
, vertex
);
1672 /* Generate routes once the SPT is formed. */
1673 for (ALL_QUEUE_ELEMENTS_RO(&spftree
->paths
, node
, vertex
)) {
1674 /* New-style TLVs take precedence over the old-style TLVs. */
1675 switch (vertex
->type
) {
1676 case VTYPE_IPREACH_INTERNAL
:
1677 case VTYPE_IPREACH_EXTERNAL
:
1678 if (isis_find_vertex(&spftree
->paths
, &vertex
->N
,
1686 spf_path_process(spftree
, vertex
);
1690 struct isis_spftree
*isis_run_hopcount_spf(struct isis_area
*area
,
1692 struct isis_spftree
*spftree
)
1695 spftree
= isis_spftree_new(area
, &area
->lspdb
[IS_LEVEL_2
- 1],
1696 sysid
, ISIS_LEVEL2
, SPFTREE_IPV4
,
1698 F_SPFTREE_HOPCOUNT_METRIC
);
1700 init_spt(spftree
, ISIS_MT_IPV4_UNICAST
);
1701 if (!memcmp(sysid
, area
->isis
->sysid
, ISIS_SYS_ID_LEN
)) {
1702 struct isis_lsp
*root_lsp
;
1703 struct isis_vertex
*root_vertex
;
1705 root_lsp
= isis_root_system_lsp(spftree
->lspdb
, spftree
->sysid
);
1708 * If we are running locally, initialize with
1709 * information from adjacencies
1711 root_vertex
= isis_spf_add_root(spftree
);
1713 isis_spf_preload_tent(spftree
, sysid
, root_lsp
,
1717 isis_vertex_queue_insert(
1719 isis_vertex_new(spftree
, sysid
, VTYPE_NONPSEUDO_TE_IS
));
1722 isis_spf_loop(spftree
, sysid
);
1727 void isis_run_spf(struct isis_spftree
*spftree
)
1729 struct isis_lsp
*root_lsp
;
1730 struct isis_vertex
*root_vertex
;
1731 struct timeval time_start
;
1732 struct timeval time_end
;
1733 struct isis_mt_router_info
*mt_router_info
;
1736 /* Get time that can't roll backwards. */
1737 monotime(&time_start
);
1739 root_lsp
= isis_root_system_lsp(spftree
->lspdb
, spftree
->sysid
);
1740 if (root_lsp
== NULL
) {
1741 zlog_err("ISIS-SPF: could not find own l%d LSP!",
1746 /* Get Multi-Topology ID. */
1747 switch (spftree
->tree_id
) {
1749 mtid
= ISIS_MT_IPV4_UNICAST
;
1752 mt_router_info
= isis_tlvs_lookup_mt_router_info(
1753 root_lsp
->tlvs
, ISIS_MT_IPV6_UNICAST
);
1755 mtid
= ISIS_MT_IPV6_UNICAST
;
1757 mtid
= ISIS_MT_IPV4_UNICAST
;
1759 case SPFTREE_DSTSRC
:
1760 mtid
= ISIS_MT_IPV6_DSTSRC
;
1764 "isis_run_spf should never be called with SPFTREE_COUNT as argument!");
1771 init_spt(spftree
, mtid
);
1773 root_vertex
= isis_spf_add_root(spftree
);
1775 isis_spf_build_adj_list(spftree
, root_lsp
);
1776 isis_spf_preload_tent(spftree
, spftree
->sysid
, root_lsp
, root_vertex
);
1781 if (!isis_vertex_queue_count(&spftree
->tents
)
1782 && (IS_DEBUG_SPF_EVENTS
)) {
1783 zlog_warn("ISIS-SPF: TENT is empty SPF-root:%s",
1784 print_sys_hostname(spftree
->sysid
));
1787 isis_spf_loop(spftree
, spftree
->sysid
);
1788 spftree
->runcount
++;
1789 spftree
->last_run_timestamp
= time(NULL
);
1790 spftree
->last_run_monotime
= monotime(&time_end
);
1791 spftree
->last_run_duration
=
1792 ((time_end
.tv_sec
- time_start
.tv_sec
) * 1000000)
1793 + (time_end
.tv_usec
- time_start
.tv_usec
);
1796 static void isis_run_spf_with_protection(struct isis_area
*area
,
1797 struct isis_spftree
*spftree
)
1799 /* Run forward SPF locally. */
1800 memcpy(spftree
->sysid
, area
->isis
->sysid
, ISIS_SYS_ID_LEN
);
1801 isis_run_spf(spftree
);
1803 /* Run LFA protection if configured. */
1804 if (area
->lfa_protected_links
[spftree
->level
- 1] > 0
1805 || area
->tilfa_protected_links
[spftree
->level
- 1] > 0)
1806 isis_spf_run_lfa(area
, spftree
);
1809 void isis_spf_verify_routes(struct isis_area
*area
, struct isis_spftree
**trees
)
1811 if (area
->is_type
== IS_LEVEL_1
) {
1812 isis_route_verify_table(area
, trees
[0]->route_table
,
1813 trees
[0]->route_table_backup
);
1814 } else if (area
->is_type
== IS_LEVEL_2
) {
1815 isis_route_verify_table(area
, trees
[1]->route_table
,
1816 trees
[1]->route_table_backup
);
1818 isis_route_verify_merge(area
, trees
[0]->route_table
,
1819 trees
[0]->route_table_backup
,
1820 trees
[1]->route_table
,
1821 trees
[1]->route_table_backup
);
1825 void isis_spf_invalidate_routes(struct isis_spftree
*tree
)
1827 isis_route_invalidate_table(tree
->area
, tree
->route_table
);
1829 /* Delete backup routes. */
1830 route_table_finish(tree
->route_table_backup
);
1831 tree
->route_table_backup
= srcdest_table_init();
1832 tree
->route_table_backup
->cleanup
= isis_route_node_cleanup
;
1835 static int isis_run_spf_cb(struct thread
*thread
)
1837 struct isis_spf_run
*run
= THREAD_ARG(thread
);
1838 struct isis_area
*area
= run
->area
;
1839 int level
= run
->level
;
1842 XFREE(MTYPE_ISIS_SPF_RUN
, run
);
1843 area
->spf_timer
[level
- 1] = NULL
;
1845 if (!(area
->is_type
& level
)) {
1846 if (IS_DEBUG_SPF_EVENTS
)
1847 zlog_warn("ISIS-SPF (%s) area does not share level",
1849 return ISIS_WARNING
;
1852 isis_area_delete_backup_adj_sids(area
, level
);
1853 isis_area_invalidate_routes(area
, level
);
1855 if (IS_DEBUG_SPF_EVENTS
)
1856 zlog_debug("ISIS-SPF (%s) L%d SPF needed, periodic SPF",
1857 area
->area_tag
, level
);
1859 if (area
->ip_circuits
) {
1860 isis_run_spf_with_protection(
1861 area
, area
->spftree
[SPFTREE_IPV4
][level
- 1]);
1864 if (area
->ipv6_circuits
) {
1865 isis_run_spf_with_protection(
1866 area
, area
->spftree
[SPFTREE_IPV6
][level
- 1]);
1869 if (area
->ipv6_circuits
&& isis_area_ipv6_dstsrc_enabled(area
)) {
1870 isis_run_spf_with_protection(
1871 area
, area
->spftree
[SPFTREE_DSTSRC
][level
- 1]);
1876 area
->spf_run_count
[level
]++;
1878 isis_area_verify_routes(area
);
1880 /* walk all circuits and reset any spf specific flags */
1881 struct listnode
*node
;
1882 struct isis_circuit
*circuit
;
1883 for (ALL_LIST_ELEMENTS_RO(area
->circuit_list
, node
, circuit
))
1884 UNSET_FLAG(circuit
->flags
, ISIS_CIRCUIT_FLAPPED_AFTER_SPF
);
1886 fabricd_run_spf(area
);
1891 static struct isis_spf_run
*isis_run_spf_arg(struct isis_area
*area
, int level
)
1893 struct isis_spf_run
*run
= XMALLOC(MTYPE_ISIS_SPF_RUN
, sizeof(*run
));
1901 void isis_spf_timer_free(void *run
)
1903 XFREE(MTYPE_ISIS_SPF_RUN
, run
);
1906 int _isis_spf_schedule(struct isis_area
*area
, int level
,
1907 const char *func
, const char *file
, int line
)
1909 struct isis_spftree
*spftree
= area
->spftree
[SPFTREE_IPV4
][level
- 1];
1910 time_t now
= monotime(NULL
);
1911 int diff
= now
- spftree
->last_run_monotime
;
1913 if (CHECK_FLAG(im
->options
, F_ISIS_UNIT_TEST
))
1917 assert(area
->is_type
& level
);
1919 if (IS_DEBUG_SPF_EVENTS
) {
1921 "ISIS-SPF (%s) L%d SPF schedule called, lastrun %d sec ago Caller: %s %s:%d",
1922 area
->area_tag
, level
, diff
, func
, file
, line
);
1925 thread_cancel(&area
->t_rlfa_rib_update
);
1926 if (area
->spf_delay_ietf
[level
- 1]) {
1927 /* Need to call schedule function also if spf delay is running
1929 * restart holdoff timer - compare
1930 * draft-ietf-rtgwg-backoff-algo-04 */
1932 spf_backoff_schedule(area
->spf_delay_ietf
[level
- 1]);
1933 if (area
->spf_timer
[level
- 1])
1936 thread_add_timer_msec(master
, isis_run_spf_cb
,
1937 isis_run_spf_arg(area
, level
), delay
,
1938 &area
->spf_timer
[level
- 1]);
1942 if (area
->spf_timer
[level
- 1])
1945 /* wait configured min_spf_interval before doing the SPF */
1947 if (diff
>= area
->min_spf_interval
[level
- 1]
1948 || area
->bfd_force_spf_refresh
) {
1950 * Last run is more than min interval ago or BFD signalled a
1951 * 'down' message, schedule immediate run
1955 if (area
->bfd_force_spf_refresh
) {
1957 "ISIS-SPF (%s) L%d SPF scheduled immediately due to BFD 'down' message",
1958 area
->area_tag
, level
);
1959 area
->bfd_force_spf_refresh
= false;
1962 timer
= area
->min_spf_interval
[level
- 1] - diff
;
1965 thread_add_timer(master
, isis_run_spf_cb
, isis_run_spf_arg(area
, level
),
1966 timer
, &area
->spf_timer
[level
- 1]);
1968 if (IS_DEBUG_SPF_EVENTS
)
1969 zlog_debug("ISIS-SPF (%s) L%d SPF scheduled %ld sec from now",
1970 area
->area_tag
, level
, timer
);
1975 static void isis_print_paths(struct vty
*vty
, struct isis_vertex_queue
*queue
,
1976 uint8_t *root_sysid
)
1978 struct listnode
*node
;
1979 struct isis_vertex
*vertex
;
1980 char buff
[VID2STR_BUFFER
];
1983 "Vertex Type Metric Next-Hop Interface Parent\n");
1985 for (ALL_QUEUE_ELEMENTS_RO(queue
, node
, vertex
)) {
1986 if (VTYPE_IS(vertex
->type
)
1987 && memcmp(vertex
->N
.id
, root_sysid
, ISIS_SYS_ID_LEN
) == 0) {
1988 vty_out(vty
, "%-20s %-12s %-6s",
1989 print_sys_hostname(root_sysid
), "", "");
1990 vty_out(vty
, "%-30s\n", "");
1995 struct listnode
*anode
= listhead(vertex
->Adj_N
);
1996 struct listnode
*pnode
= listhead(vertex
->parents
);
1997 struct isis_vertex_adj
*vadj
;
1998 struct isis_vertex
*pvertex
;
2000 vty_out(vty
, "%-20s %-12s %-6u ",
2001 vid2string(vertex
, buff
, sizeof(buff
)),
2002 vtype2string(vertex
->type
), vertex
->d_N
);
2003 for (unsigned int i
= 0;
2004 i
< MAX(vertex
->Adj_N
? listcount(vertex
->Adj_N
) : 0,
2005 vertex
->parents
? listcount(vertex
->parents
) : 0);
2008 vadj
= listgetdata(anode
);
2009 anode
= anode
->next
;
2015 pvertex
= listgetdata(pnode
);
2016 pnode
= pnode
->next
;
2023 vty_out(vty
, "%-20s %-12s %-6s ", "", "", "");
2027 struct isis_spf_adj
*sadj
= vadj
->sadj
;
2029 vty_out(vty
, "%-20s %-9s ",
2030 print_sys_hostname(sadj
->id
),
2031 sadj
->adj
? sadj
->adj
->circuit
2038 vty_out(vty
, "%-20s %-9s ", "", "");
2040 vty_out(vty
, "%s(%d)",
2041 vid2string(pvertex
, buff
, sizeof(buff
)),
2051 void isis_print_spftree(struct vty
*vty
, struct isis_spftree
*spftree
)
2053 const char *tree_id_text
= NULL
;
2055 if (!spftree
|| !isis_vertex_queue_count(&spftree
->paths
))
2058 switch (spftree
->tree_id
) {
2060 tree_id_text
= "that speak IP";
2063 tree_id_text
= "that speak IPv6";
2065 case SPFTREE_DSTSRC
:
2066 tree_id_text
= "that support IPv6 dst-src routing";
2069 assert(!"isis_print_spftree shouldn't be called with SPFTREE_COUNT as type");
2073 vty_out(vty
, "IS-IS paths to level-%d routers %s\n", spftree
->level
,
2075 isis_print_paths(vty
, &spftree
->paths
, spftree
->sysid
);
2079 static void show_isis_topology_common(struct vty
*vty
, int levels
,
2082 struct listnode
*node
;
2083 struct isis_area
*area
;
2085 if (!isis
->area_list
|| isis
->area_list
->count
== 0)
2088 for (ALL_LIST_ELEMENTS_RO(isis
->area_list
, node
, area
)) {
2089 vty_out(vty
, "Area %s:\n",
2090 area
->area_tag
? area
->area_tag
: "null");
2092 for (int level
= ISIS_LEVEL1
; level
<= ISIS_LEVELS
; level
++) {
2093 if ((level
& levels
) == 0)
2096 if (area
->ip_circuits
> 0) {
2099 area
->spftree
[SPFTREE_IPV4
][level
- 1]);
2101 if (area
->ipv6_circuits
> 0) {
2104 area
->spftree
[SPFTREE_IPV6
][level
- 1]);
2106 if (isis_area_ipv6_dstsrc_enabled(area
)) {
2107 isis_print_spftree(vty
,
2108 area
->spftree
[SPFTREE_DSTSRC
]
2113 if (fabricd_spftree(area
)) {
2115 "IS-IS paths to level-2 routers with hop-by-hop metric\n");
2116 isis_print_paths(vty
, &fabricd_spftree(area
)->paths
, isis
->sysid
);
2124 DEFUN(show_isis_topology
, show_isis_topology_cmd
,
2126 " [vrf <NAME|all>] topology"
2128 " [<level-1|level-2>]"
2131 SHOW_STR PROTO_HELP VRF_CMD_HELP_STR
2133 "IS-IS paths to Intermediate Systems\n"
2135 "Paths to all level-1 routers in the area\n"
2136 "Paths to all level-2 routers in the domain\n"
2140 int levels
= ISIS_LEVELS
;
2141 struct listnode
*node
;
2142 struct isis
*isis
= NULL
;
2144 const char *vrf_name
= VRF_DEFAULT_NAME
;
2145 bool all_vrf
= false;
2148 if (argv_find(argv
, argc
, "topology", &idx
)) {
2150 levels
= ISIS_LEVEL1
| ISIS_LEVEL2
;
2151 else if (strmatch(argv
[idx
+ 1]->arg
, "level-1"))
2152 levels
= ISIS_LEVEL1
;
2154 levels
= ISIS_LEVEL2
;
2158 vty_out(vty
, "IS-IS Routing Process not enabled\n");
2161 ISIS_FIND_VRF_ARGS(argv
, argc
, idx_vrf
, vrf_name
, all_vrf
);
2165 for (ALL_LIST_ELEMENTS_RO(im
->isis
, node
, isis
))
2166 show_isis_topology_common(vty
, levels
, isis
);
2169 isis
= isis_lookup_by_vrfname(vrf_name
);
2171 show_isis_topology_common(vty
, levels
, isis
);
2177 static void isis_print_route(struct ttable
*tt
, const struct prefix
*prefix
,
2178 struct isis_route_info
*rinfo
, bool prefix_sid
,
2179 bool no_adjacencies
)
2181 struct isis_nexthop
*nexthop
;
2182 struct listnode
*node
;
2184 char buf_prefix
[BUFSIZ
];
2186 (void)prefix2str(prefix
, buf_prefix
, sizeof(buf_prefix
));
2187 for (ALL_LIST_ELEMENTS_RO(rinfo
->nexthops
, node
, nexthop
)) {
2188 struct interface
*ifp
;
2189 char buf_iface
[BUFSIZ
];
2190 char buf_nhop
[BUFSIZ
];
2192 if (!no_adjacencies
) {
2193 inet_ntop(nexthop
->family
, &nexthop
->ip
, buf_nhop
,
2195 ifp
= if_lookup_by_index(nexthop
->ifindex
, VRF_DEFAULT
);
2197 strlcpy(buf_iface
, ifp
->name
,
2200 snprintf(buf_iface
, sizeof(buf_iface
),
2201 "ifindex %u", nexthop
->ifindex
);
2203 strlcpy(buf_nhop
, print_sys_hostname(nexthop
->sysid
),
2205 strlcpy(buf_iface
, "-", sizeof(buf_iface
));
2209 char buf_sid
[BUFSIZ
] = {};
2210 char buf_lblop
[BUFSIZ
] = {};
2212 if (nexthop
->sr
.present
) {
2213 snprintf(buf_sid
, sizeof(buf_sid
), "%u",
2214 nexthop
->sr
.sid
.value
);
2215 sr_op2str(buf_lblop
, sizeof(buf_lblop
),
2216 rinfo
->sr
.label
, nexthop
->sr
.label
);
2218 strlcpy(buf_sid
, "-", sizeof(buf_sid
));
2219 strlcpy(buf_lblop
, "-", sizeof(buf_lblop
));
2223 ttable_add_row(tt
, "%s|%u|%s|%s|%s|%s",
2224 buf_prefix
, rinfo
->cost
,
2225 buf_iface
, buf_nhop
, buf_sid
,
2229 ttable_add_row(tt
, "||%s|%s|%s|%s", buf_iface
,
2230 buf_nhop
, buf_sid
, buf_lblop
);
2232 char buf_labels
[BUFSIZ
] = {};
2234 if (nexthop
->label_stack
) {
2236 i
< nexthop
->label_stack
->num_labels
;
2238 char buf_label
[BUFSIZ
];
2241 nexthop
->label_stack
->label
[i
],
2242 buf_label
, sizeof(buf_label
));
2244 strlcat(buf_labels
, "/",
2245 sizeof(buf_labels
));
2246 strlcat(buf_labels
, buf_label
,
2247 sizeof(buf_labels
));
2249 } else if (nexthop
->sr
.present
)
2250 label2str(nexthop
->sr
.label
, buf_labels
,
2251 sizeof(buf_labels
));
2253 strlcpy(buf_labels
, "-", sizeof(buf_labels
));
2256 ttable_add_row(tt
, "%s|%u|%s|%s|%s", buf_prefix
,
2257 rinfo
->cost
, buf_iface
, buf_nhop
,
2261 ttable_add_row(tt
, "||%s|%s|%s", buf_iface
,
2262 buf_nhop
, buf_labels
);
2265 if (list_isempty(rinfo
->nexthops
)) {
2267 char buf_sid
[BUFSIZ
] = {};
2268 char buf_lblop
[BUFSIZ
] = {};
2270 if (rinfo
->sr
.present
) {
2271 snprintf(buf_sid
, sizeof(buf_sid
), "%u",
2272 rinfo
->sr
.sid
.value
);
2273 sr_op2str(buf_lblop
, sizeof(buf_lblop
),
2275 MPLS_LABEL_IMPLICIT_NULL
);
2277 strlcpy(buf_sid
, "-", sizeof(buf_sid
));
2278 strlcpy(buf_lblop
, "-", sizeof(buf_lblop
));
2281 ttable_add_row(tt
, "%s|%u|%s|%s|%s|%s", buf_prefix
,
2282 rinfo
->cost
, "-", "-", buf_sid
,
2285 ttable_add_row(tt
, "%s|%u|%s|%s|%s", buf_prefix
,
2286 rinfo
->cost
, "-", "-", "-");
2290 void isis_print_routes(struct vty
*vty
, struct isis_spftree
*spftree
,
2291 bool prefix_sid
, bool backup
)
2293 struct route_table
*route_table
;
2295 struct route_node
*rn
;
2296 bool no_adjacencies
= false;
2297 const char *tree_id_text
= NULL
;
2302 switch (spftree
->tree_id
) {
2304 tree_id_text
= "IPv4";
2307 tree_id_text
= "IPv6";
2309 case SPFTREE_DSTSRC
:
2310 tree_id_text
= "IPv6 (dst-src routing)";
2313 assert(!"isis_print_routes shouldn't be called with SPFTREE_COUNT as type");
2317 vty_out(vty
, "IS-IS %s %s routing table:\n\n",
2318 circuit_t2string(spftree
->level
), tree_id_text
);
2320 /* Prepare table. */
2321 tt
= ttable_new(&ttable_styles
[TTSTYLE_BLANK
]);
2323 ttable_add_row(tt
, "Prefix|Metric|Interface|Nexthop|SID|Label Op.");
2325 ttable_add_row(tt
, "Prefix|Metric|Interface|Nexthop|Label(s)");
2326 tt
->style
.cell
.rpad
= 2;
2327 tt
->style
.corner
= '+';
2329 ttable_rowseps(tt
, 0, BOTTOM
, true, '-');
2331 if (CHECK_FLAG(spftree
->flags
, F_SPFTREE_NO_ADJACENCIES
))
2332 no_adjacencies
= true;
2335 (backup
) ? spftree
->route_table_backup
: spftree
->route_table
;
2336 for (rn
= route_top(route_table
); rn
; rn
= route_next(rn
)) {
2337 struct isis_route_info
*rinfo
;
2343 isis_print_route(tt
, &rn
->p
, rinfo
, prefix_sid
, no_adjacencies
);
2346 /* Dump the generated table. */
2347 if (tt
->nrows
> 1) {
2350 table
= ttable_dump(tt
, "\n");
2351 vty_out(vty
, "%s\n", table
);
2352 XFREE(MTYPE_TMP
, table
);
2357 static void show_isis_route_common(struct vty
*vty
, int levels
,
2358 struct isis
*isis
, bool prefix_sid
,
2361 struct listnode
*node
;
2362 struct isis_area
*area
;
2364 if (!isis
->area_list
|| isis
->area_list
->count
== 0)
2367 for (ALL_LIST_ELEMENTS_RO(isis
->area_list
, node
, area
)) {
2368 vty_out(vty
, "Area %s:\n",
2369 area
->area_tag
? area
->area_tag
: "null");
2371 for (int level
= ISIS_LEVEL1
; level
<= ISIS_LEVELS
; level
++) {
2372 if ((level
& levels
) == 0)
2375 if (area
->ip_circuits
> 0) {
2378 area
->spftree
[SPFTREE_IPV4
][level
- 1],
2379 prefix_sid
, backup
);
2381 if (area
->ipv6_circuits
> 0) {
2384 area
->spftree
[SPFTREE_IPV6
][level
- 1],
2385 prefix_sid
, backup
);
2387 if (isis_area_ipv6_dstsrc_enabled(area
)) {
2388 isis_print_routes(vty
,
2389 area
->spftree
[SPFTREE_DSTSRC
]
2391 prefix_sid
, backup
);
2397 DEFUN(show_isis_route
, show_isis_route_cmd
,
2399 " [vrf <NAME|all>] route"
2401 " [<level-1|level-2>]"
2403 " [<prefix-sid|backup>]",
2404 SHOW_STR PROTO_HELP VRF_FULL_CMD_HELP_STR
2405 "IS-IS routing table\n"
2410 "Show Prefix-SID information\n"
2411 "Show backup routes\n")
2415 struct listnode
*node
;
2416 const char *vrf_name
= VRF_DEFAULT_NAME
;
2417 bool all_vrf
= false;
2418 bool prefix_sid
= false;
2419 bool backup
= false;
2422 if (argv_find(argv
, argc
, "level-1", &idx
))
2423 levels
= ISIS_LEVEL1
;
2424 else if (argv_find(argv
, argc
, "level-2", &idx
))
2425 levels
= ISIS_LEVEL2
;
2427 levels
= ISIS_LEVEL1
| ISIS_LEVEL2
;
2430 vty_out(vty
, "IS-IS Routing Process not enabled\n");
2433 ISIS_FIND_VRF_ARGS(argv
, argc
, idx
, vrf_name
, all_vrf
);
2435 if (argv_find(argv
, argc
, "prefix-sid", &idx
))
2437 if (argv_find(argv
, argc
, "backup", &idx
))
2442 for (ALL_LIST_ELEMENTS_RO(im
->isis
, node
, isis
))
2443 show_isis_route_common(vty
, levels
, isis
,
2444 prefix_sid
, backup
);
2447 isis
= isis_lookup_by_vrfname(vrf_name
);
2449 show_isis_route_common(vty
, levels
, isis
, prefix_sid
,
2456 static void isis_print_frr_summary_line(struct ttable
*tt
,
2457 const char *protection
,
2458 uint32_t counters
[SPF_PREFIX_PRIO_MAX
])
2460 uint32_t critical
, high
, medium
, low
, total
;
2462 critical
= counters
[SPF_PREFIX_PRIO_CRITICAL
];
2463 high
= counters
[SPF_PREFIX_PRIO_HIGH
];
2464 medium
= counters
[SPF_PREFIX_PRIO_MEDIUM
];
2465 low
= counters
[SPF_PREFIX_PRIO_LOW
];
2466 total
= critical
+ high
+ medium
+ low
;
2468 ttable_add_row(tt
, "%s|%u|%u|%u|%u|%u", protection
, critical
, high
,
2469 medium
, low
, total
);
2473 isis_print_frr_summary_line_coverage(struct ttable
*tt
, const char *protection
,
2474 double counters
[SPF_PREFIX_PRIO_MAX
],
2477 double critical
, high
, medium
, low
;
2479 critical
= counters
[SPF_PREFIX_PRIO_CRITICAL
] * 100;
2480 high
= counters
[SPF_PREFIX_PRIO_HIGH
] * 100;
2481 medium
= counters
[SPF_PREFIX_PRIO_MEDIUM
] * 100;
2482 low
= counters
[SPF_PREFIX_PRIO_LOW
] * 100;
2485 ttable_add_row(tt
, "%s|%.2f%%|%.2f%%|%.2f%%|%.2f%%|%.2f%%", protection
,
2486 critical
, high
, medium
, low
, total
);
2489 static void isis_print_frr_summary(struct vty
*vty
,
2490 struct isis_spftree
*spftree
)
2494 const char *tree_id_text
= NULL
;
2495 uint32_t protectd
[SPF_PREFIX_PRIO_MAX
] = {0};
2496 uint32_t unprotected
[SPF_PREFIX_PRIO_MAX
] = {0};
2497 double coverage
[SPF_PREFIX_PRIO_MAX
] = {0};
2498 uint32_t protected_total
= 0, grand_total
= 0;
2499 double coverage_total
;
2504 switch (spftree
->tree_id
) {
2506 tree_id_text
= "IPv4";
2509 tree_id_text
= "IPv6";
2511 case SPFTREE_DSTSRC
:
2512 tree_id_text
= "IPv6 (dst-src routing)";
2515 assert(!"isis_print_frr_summary shouldn't be called with SPFTREE_COUNT as type");
2519 vty_out(vty
, " IS-IS %s %s Fast ReRoute summary:\n\n",
2520 circuit_t2string(spftree
->level
), tree_id_text
);
2522 /* Prepare table. */
2523 tt
= ttable_new(&ttable_styles
[TTSTYLE_BLANK
]);
2526 "Protection \\ Priority|Critical|High |Medium |Low |Total");
2527 tt
->style
.cell
.rpad
= 2;
2528 tt
->style
.corner
= '+';
2530 ttable_rowseps(tt
, 0, BOTTOM
, true, '-');
2532 /* Compute unprotected and coverage totals. */
2533 for (int priority
= SPF_PREFIX_PRIO_CRITICAL
;
2534 priority
< SPF_PREFIX_PRIO_MAX
; priority
++) {
2535 uint32_t *lfa
= spftree
->lfa
.protection_counters
.lfa
;
2536 uint32_t *rlfa
= spftree
->lfa
.protection_counters
.rlfa
;
2537 uint32_t *tilfa
= spftree
->lfa
.protection_counters
.tilfa
;
2538 uint32_t *ecmp
= spftree
->lfa
.protection_counters
.ecmp
;
2539 uint32_t *total
= spftree
->lfa
.protection_counters
.total
;
2541 protectd
[priority
] = lfa
[priority
] + rlfa
[priority
]
2542 + tilfa
[priority
] + ecmp
[priority
];
2543 /* Safeguard to protect against possible inconsistencies. */
2544 if (protectd
[priority
] > total
[priority
])
2545 protectd
[priority
] = total
[priority
];
2546 unprotected
[priority
] = total
[priority
] - protectd
[priority
];
2547 protected_total
+= protectd
[priority
];
2548 grand_total
+= total
[priority
];
2550 if (!total
[priority
])
2551 coverage
[priority
] = 0;
2553 coverage
[priority
] =
2554 protectd
[priority
] / (double)total
[priority
];
2560 coverage_total
= protected_total
/ (double)grand_total
;
2563 isis_print_frr_summary_line(tt
, "Classic LFA",
2564 spftree
->lfa
.protection_counters
.lfa
);
2565 isis_print_frr_summary_line(tt
, "Remote LFA",
2566 spftree
->lfa
.protection_counters
.rlfa
);
2567 isis_print_frr_summary_line(tt
, "Topology Independent LFA",
2568 spftree
->lfa
.protection_counters
.tilfa
);
2569 isis_print_frr_summary_line(tt
, "ECMP",
2570 spftree
->lfa
.protection_counters
.ecmp
);
2571 isis_print_frr_summary_line(tt
, "Unprotected", unprotected
);
2572 isis_print_frr_summary_line_coverage(tt
, "Protection coverage",
2573 coverage
, coverage_total
);
2575 /* Dump the generated table. */
2576 table
= ttable_dump(tt
, "\n");
2577 vty_out(vty
, "%s\n", table
);
2578 XFREE(MTYPE_TMP
, table
);
2582 static void show_isis_frr_summary_common(struct vty
*vty
, int levels
,
2585 struct listnode
*node
;
2586 struct isis_area
*area
;
2588 if (!isis
->area_list
|| isis
->area_list
->count
== 0)
2591 for (ALL_LIST_ELEMENTS_RO(isis
->area_list
, node
, area
)) {
2592 vty_out(vty
, "Area %s:\n",
2593 area
->area_tag
? area
->area_tag
: "null");
2595 for (int level
= ISIS_LEVEL1
; level
<= ISIS_LEVELS
; level
++) {
2596 if ((level
& levels
) == 0)
2599 if (area
->ip_circuits
> 0) {
2600 isis_print_frr_summary(
2602 area
->spftree
[SPFTREE_IPV4
][level
- 1]);
2604 if (area
->ipv6_circuits
> 0) {
2605 isis_print_frr_summary(
2607 area
->spftree
[SPFTREE_IPV6
][level
- 1]);
2609 if (isis_area_ipv6_dstsrc_enabled(area
)) {
2610 isis_print_frr_summary(
2611 vty
, area
->spftree
[SPFTREE_DSTSRC
]
2618 DEFUN(show_isis_frr_summary
, show_isis_frr_summary_cmd
,
2620 " [vrf <NAME|all>] fast-reroute summary"
2622 " [<level-1|level-2>]"
2625 SHOW_STR PROTO_HELP VRF_FULL_CMD_HELP_STR
2626 "IS-IS FRR information\n"
2636 struct listnode
*node
;
2637 const char *vrf_name
= VRF_DEFAULT_NAME
;
2638 bool all_vrf
= false;
2641 if (argv_find(argv
, argc
, "level-1", &idx
))
2642 levels
= ISIS_LEVEL1
;
2643 else if (argv_find(argv
, argc
, "level-2", &idx
))
2644 levels
= ISIS_LEVEL2
;
2646 levels
= ISIS_LEVEL1
| ISIS_LEVEL2
;
2649 vty_out(vty
, "IS-IS Routing Process not enabled\n");
2652 ISIS_FIND_VRF_ARGS(argv
, argc
, idx
, vrf_name
, all_vrf
);
2656 for (ALL_LIST_ELEMENTS_RO(im
->isis
, node
, isis
))
2657 show_isis_frr_summary_common(vty
, levels
, isis
);
2660 isis
= isis_lookup_by_vrfname(vrf_name
);
2662 show_isis_frr_summary_common(vty
, levels
, isis
);
2668 void isis_spf_init(void)
2670 install_element(VIEW_NODE
, &show_isis_topology_cmd
);
2671 install_element(VIEW_NODE
, &show_isis_route_cmd
);
2672 install_element(VIEW_NODE
, &show_isis_frr_summary_cmd
);
2674 /* Register hook(s). */
2675 hook_register(isis_adj_state_change_hook
, spf_adj_state_change
);
2678 void isis_spf_print(struct isis_spftree
*spftree
, struct vty
*vty
)
2680 vty_out(vty
, " last run elapsed : ");
2681 vty_out_timestr(vty
, spftree
->last_run_timestamp
);
2684 vty_out(vty
, " last run duration : %u usec\n",
2685 (uint32_t)spftree
->last_run_duration
);
2687 vty_out(vty
, " run count : %u\n", spftree
->runcount
);