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
));
276 if (spftree
->area
->srdb
.enabled
&& psid
) {
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 if (IS_DEBUG_SPF_EVENTS
)
516 "ISIS-SPF: added this IS %s %s depth %d dist %d to PATHS",
517 vtype2string(vertex
->type
),
518 vid2string(vertex
, buff
, sizeof(buff
)), vertex
->depth
,
520 #endif /* EXTREME_DEBUG */
525 static void vertex_add_parent_firsthop(struct hash_bucket
*bucket
, void *arg
)
527 struct isis_vertex
*vertex
= arg
;
528 struct isis_vertex
*hop
= bucket
->data
;
530 (void)hash_get(vertex
->firsthops
, hop
, hash_alloc_intern
);
533 static void vertex_update_firsthops(struct isis_vertex
*vertex
,
534 struct isis_vertex
*parent
)
536 if (vertex
->d_N
<= 2)
537 (void)hash_get(vertex
->firsthops
, vertex
, hash_alloc_intern
);
539 if (vertex
->d_N
< 2 || !parent
)
542 hash_iterate(parent
->firsthops
, vertex_add_parent_firsthop
, vertex
);
546 * Add a vertex to TENT sorted by cost and by vertextype on tie break situation
548 static struct isis_vertex
*
549 isis_spf_add2tent(struct isis_spftree
*spftree
, enum vertextype vtype
, void *id
,
550 uint32_t cost
, int depth
, struct isis_spf_adj
*sadj
,
551 struct isis_prefix_sid
*psid
, struct isis_vertex
*parent
)
553 struct isis_vertex
*vertex
;
554 struct listnode
*node
;
556 char buff
[VID2STR_BUFFER
];
558 vertex
= isis_find_vertex(&spftree
->paths
, id
, vtype
);
559 if (vertex
!= NULL
) {
561 "%s: vertex %s of type %s already in PATH; check for sysId collisions with established neighbors",
562 __func__
, vid2string(vertex
, buff
, sizeof(buff
)),
563 vtype2string(vertex
->type
));
566 vertex
= isis_find_vertex(&spftree
->tents
, id
, vtype
);
567 if (vertex
!= NULL
) {
569 "%s: vertex %s of type %s already in TENT; check for sysId collisions with established neighbors",
570 __func__
, vid2string(vertex
, buff
, sizeof(buff
)),
571 vtype2string(vertex
->type
));
575 vertex
= isis_vertex_new(spftree
, id
, vtype
);
577 vertex
->depth
= depth
;
578 if (VTYPE_IP(vtype
) && spftree
->area
->srdb
.enabled
&& psid
) {
579 struct isis_area
*area
= spftree
->area
;
580 struct isis_vertex
*vertex_psid
;
583 * Check if the Prefix-SID is already in use by another prefix.
585 vertex_psid
= isis_spf_prefix_sid_lookup(spftree
, psid
);
587 && !prefix_same(&vertex_psid
->N
.ip
.p
.dest
,
588 &vertex
->N
.ip
.p
.dest
)) {
590 EC_ISIS_SID_COLLISION
,
591 "ISIS-Sr (%s): collision detected, prefixes %pFX and %pFX share the same SID %s (%u)",
592 area
->area_tag
, &vertex
->N
.ip
.p
.dest
,
593 &vertex_psid
->N
.ip
.p
.dest
,
594 CHECK_FLAG(psid
->flags
, ISIS_PREFIX_SID_VALUE
)
602 local
= (vertex
->depth
== 1);
603 vertex
->N
.ip
.sr
.sid
= *psid
;
604 vertex
->N
.ip
.sr
.label
=
605 sr_prefix_in_label(area
, psid
, local
);
606 if (vertex
->N
.ip
.sr
.label
!= MPLS_INVALID_LABEL
)
607 vertex
->N
.ip
.sr
.present
= true;
609 (void)hash_get(spftree
->prefix_sids
, vertex
,
615 listnode_add(vertex
->parents
, parent
);
618 if (CHECK_FLAG(spftree
->flags
, F_SPFTREE_HOPCOUNT_METRIC
))
619 vertex_update_firsthops(vertex
, parent
);
621 last_hop
= (vertex
->depth
== 2);
622 if (parent
&& parent
->Adj_N
&& listcount(parent
->Adj_N
) > 0) {
623 struct isis_vertex_adj
*parent_vadj
;
625 for (ALL_LIST_ELEMENTS_RO(parent
->Adj_N
, node
, parent_vadj
))
626 isis_vertex_adj_add(spftree
, vertex
, vertex
->Adj_N
,
627 parent_vadj
->sadj
, psid
, last_hop
);
629 isis_vertex_adj_add(spftree
, vertex
, vertex
->Adj_N
, sadj
, psid
,
634 if (IS_DEBUG_SPF_EVENTS
)
636 "ISIS-SPF: add to TENT %s %s %s depth %d dist %d adjcount %d",
637 print_sys_hostname(vertex
->N
.id
),
638 vtype2string(vertex
->type
),
639 vid2string(vertex
, buff
, sizeof(buff
)), vertex
->depth
,
640 vertex
->d_N
, listcount(vertex
->Adj_N
));
641 #endif /* EXTREME_DEBUG */
643 isis_vertex_queue_insert(&spftree
->tents
, vertex
);
647 static void isis_spf_add_local(struct isis_spftree
*spftree
,
648 enum vertextype vtype
, void *id
,
649 struct isis_spf_adj
*sadj
, uint32_t cost
,
650 struct isis_prefix_sid
*psid
,
651 struct isis_vertex
*parent
)
653 struct isis_vertex
*vertex
;
655 vertex
= isis_find_vertex(&spftree
->tents
, id
, vtype
);
659 if (vertex
->d_N
== cost
) {
661 bool last_hop
= (vertex
->depth
== 2);
663 isis_vertex_adj_add(spftree
, vertex
,
664 vertex
->Adj_N
, sadj
, psid
,
668 if (!CHECK_FLAG(spftree
->flags
,
669 F_SPFTREE_NO_ADJACENCIES
)
670 && listcount(vertex
->Adj_N
) > ISIS_MAX_PATH_SPLITS
)
671 remove_excess_adjs(vertex
->Adj_N
);
672 if (parent
&& (listnode_lookup(vertex
->parents
, parent
)
674 listnode_add(vertex
->parents
, parent
);
676 } else if (vertex
->d_N
< cost
) {
679 } else { /* vertex->d_N > cost */
681 isis_vertex_queue_delete(&spftree
->tents
, vertex
);
682 isis_vertex_del(vertex
);
686 isis_spf_add2tent(spftree
, vtype
, id
, cost
, 1, sadj
, psid
, parent
);
690 static void process_N(struct isis_spftree
*spftree
, enum vertextype vtype
,
691 void *id
, uint32_t dist
, uint16_t depth
,
692 struct isis_prefix_sid
*psid
, struct isis_vertex
*parent
)
694 struct isis_vertex
*vertex
;
696 char buff
[VID2STR_BUFFER
];
699 assert(spftree
&& parent
);
701 if (CHECK_FLAG(spftree
->flags
, F_SPFTREE_HOPCOUNT_METRIC
)
705 struct prefix_pair p
;
706 if (vtype
>= VTYPE_IPREACH_INTERNAL
) {
707 memcpy(&p
, id
, sizeof(p
));
713 /* RFC3787 section 5.1 */
714 if (spftree
->area
->newmetric
== 1) {
715 if (dist
> MAX_WIDE_PATH_METRIC
)
719 else if (spftree
->area
->oldmetric
== 1) {
720 if (dist
> MAX_NARROW_PATH_METRIC
)
725 vertex
= isis_find_vertex(&spftree
->paths
, id
, vtype
);
728 if (IS_DEBUG_SPF_EVENTS
)
730 "ISIS-SPF: process_N %s %s %s dist %d already found from PATH",
731 print_sys_hostname(vertex
->N
.id
),
733 vid2string(vertex
, buff
, sizeof(buff
)), dist
);
734 #endif /* EXTREME_DEBUG */
735 assert(dist
>= vertex
->d_N
);
739 vertex
= isis_find_vertex(&spftree
->tents
, id
, vtype
);
744 if (IS_DEBUG_SPF_EVENTS
)
746 "ISIS-SPF: process_N %s %s %s dist %d parent %s adjcount %d",
747 print_sys_hostname(vertex
->N
.id
),
749 vid2string(vertex
, buff
, sizeof(buff
)), dist
,
750 (parent
? print_sys_hostname(parent
->N
.id
)
752 (parent
? listcount(parent
->Adj_N
) : 0));
753 #endif /* EXTREME_DEBUG */
754 if (vertex
->d_N
== dist
) {
755 struct listnode
*node
;
756 struct isis_vertex_adj
*parent_vadj
;
757 for (ALL_LIST_ELEMENTS_RO(parent
->Adj_N
, node
,
759 if (!isis_vertex_adj_exists(
761 parent_vadj
->sadj
)) {
762 bool last_hop
= (vertex
->depth
== 2);
764 isis_vertex_adj_add(spftree
, vertex
,
769 if (CHECK_FLAG(spftree
->flags
,
770 F_SPFTREE_HOPCOUNT_METRIC
))
771 vertex_update_firsthops(vertex
, parent
);
773 if (!CHECK_FLAG(spftree
->flags
,
774 F_SPFTREE_NO_ADJACENCIES
)
775 && listcount(vertex
->Adj_N
) > ISIS_MAX_PATH_SPLITS
)
776 remove_excess_adjs(vertex
->Adj_N
);
777 if (listnode_lookup(vertex
->parents
, parent
) == NULL
)
778 listnode_add(vertex
->parents
, parent
);
780 } else if (vertex
->d_N
< dist
) {
784 isis_vertex_queue_delete(&spftree
->tents
, vertex
);
785 isis_vertex_del(vertex
);
790 if (IS_DEBUG_SPF_EVENTS
)
792 "ISIS-SPF: process_N add2tent %s %s dist %d parent %s",
793 print_sys_hostname(id
), vtype2string(vtype
), dist
,
794 (parent
? print_sys_hostname(parent
->N
.id
) : "null"));
795 #endif /* EXTREME_DEBUG */
797 isis_spf_add2tent(spftree
, vtype
, id
, dist
, depth
, NULL
, psid
, parent
);
804 static int isis_spf_process_lsp(struct isis_spftree
*spftree
,
805 struct isis_lsp
*lsp
, uint32_t cost
,
806 uint16_t depth
, uint8_t *root_sysid
,
807 struct isis_vertex
*parent
)
809 bool pseudo_lsp
= LSP_PSEUDO_ID(lsp
->hdr
.lsp_id
);
810 struct listnode
*fragnode
= NULL
;
812 enum vertextype vtype
;
813 static const uint8_t null_sysid
[ISIS_SYS_ID_LEN
];
814 struct isis_mt_router_info
*mt_router_info
= NULL
;
815 struct prefix_pair ip_info
;
818 if (isis_lfa_excise_node_check(spftree
, lsp
->hdr
.lsp_id
)) {
820 zlog_debug("ISIS-LFA: excising node %s",
821 print_sys_hostname(lsp
->hdr
.lsp_id
));
828 if (spftree
->mtid
!= ISIS_MT_IPV4_UNICAST
)
829 mt_router_info
= isis_tlvs_lookup_mt_router_info(lsp
->tlvs
,
832 if (!pseudo_lsp
&& (spftree
->mtid
== ISIS_MT_IPV4_UNICAST
833 && !speaks(lsp
->tlvs
->protocols_supported
.protocols
,
834 lsp
->tlvs
->protocols_supported
.count
,
839 /* RFC3787 section 4 SHOULD ignore overload bit in pseudo LSPs */
840 bool no_overload
= (pseudo_lsp
841 || (spftree
->mtid
== ISIS_MT_IPV4_UNICAST
842 && !ISIS_MASK_LSP_OL_BIT(lsp
->hdr
.lsp_bits
))
843 || (mt_router_info
&& !mt_router_info
->overload
));
846 if (lsp
->hdr
.seqno
== 0) {
848 "isis_spf_process_lsp(): lsp with 0 seq_num - ignore");
853 if (IS_DEBUG_SPF_EVENTS
)
854 zlog_debug("ISIS-SPF: process_lsp %s",
855 print_sys_hostname(lsp
->hdr
.lsp_id
));
856 #endif /* EXTREME_DEBUG */
859 if ((pseudo_lsp
|| spftree
->mtid
== ISIS_MT_IPV4_UNICAST
)
860 && spftree
->area
->oldmetric
) {
861 struct isis_oldstyle_reach
*r
;
862 for (r
= (struct isis_oldstyle_reach
*)
863 lsp
->tlvs
->oldstyle_reach
.head
;
869 /* Two way connectivity */
870 if (!LSP_PSEUDO_ID(r
->id
)
871 && !memcmp(r
->id
, root_sysid
,
875 && !memcmp(r
->id
, null_sysid
,
878 dist
= cost
+ r
->metric
;
882 : VTYPE_NONPSEUDO_IS
,
883 (void *)r
->id
, dist
, depth
+ 1, NULL
,
888 if (spftree
->area
->newmetric
) {
889 struct isis_item_list
*te_neighs
= NULL
;
890 if (pseudo_lsp
|| spftree
->mtid
== ISIS_MT_IPV4_UNICAST
)
891 te_neighs
= &lsp
->tlvs
->extended_reach
;
893 te_neighs
= isis_lookup_mt_items(
894 &lsp
->tlvs
->mt_reach
, spftree
->mtid
);
896 struct isis_extended_reach
*er
;
897 for (er
= te_neighs
? (struct isis_extended_reach
*)
902 /* Two way connectivity */
903 if (!LSP_PSEUDO_ID(er
->id
)
904 && !memcmp(er
->id
, root_sysid
,
908 && !memcmp(er
->id
, null_sysid
,
912 + (CHECK_FLAG(spftree
->flags
,
913 F_SPFTREE_HOPCOUNT_METRIC
)
917 LSP_PSEUDO_ID(er
->id
)
919 : VTYPE_NONPSEUDO_TE_IS
,
920 (void *)er
->id
, dist
, depth
+ 1, NULL
,
926 if (!fabricd
&& !pseudo_lsp
&& spftree
->family
== AF_INET
927 && spftree
->mtid
== ISIS_MT_IPV4_UNICAST
928 && spftree
->area
->oldmetric
) {
929 struct isis_item_list
*reachs
[] = {
930 &lsp
->tlvs
->oldstyle_ip_reach
,
931 &lsp
->tlvs
->oldstyle_ip_reach_ext
};
933 for (unsigned int i
= 0; i
< array_size(reachs
); i
++) {
934 vtype
= i
? VTYPE_IPREACH_EXTERNAL
935 : VTYPE_IPREACH_INTERNAL
;
937 memset(&ip_info
, 0, sizeof(ip_info
));
938 ip_info
.dest
.family
= AF_INET
;
940 struct isis_oldstyle_ip_reach
*r
;
941 for (r
= (struct isis_oldstyle_ip_reach
*)reachs
[i
]
944 dist
= cost
+ r
->metric
;
945 ip_info
.dest
.u
.prefix4
= r
->prefix
.prefix
;
946 ip_info
.dest
.prefixlen
= r
->prefix
.prefixlen
;
947 process_N(spftree
, vtype
, &ip_info
,
948 dist
, depth
+ 1, NULL
, parent
);
953 /* we can skip all the rest if we're using metric style narrow */
954 if (!spftree
->area
->newmetric
)
957 if (!pseudo_lsp
&& spftree
->family
== AF_INET
) {
958 struct isis_item_list
*ipv4_reachs
;
959 if (spftree
->mtid
== ISIS_MT_IPV4_UNICAST
)
960 ipv4_reachs
= &lsp
->tlvs
->extended_ip_reach
;
962 ipv4_reachs
= isis_lookup_mt_items(
963 &lsp
->tlvs
->mt_ip_reach
, spftree
->mtid
);
965 memset(&ip_info
, 0, sizeof(ip_info
));
966 ip_info
.dest
.family
= AF_INET
;
968 struct isis_extended_ip_reach
*r
;
970 ? (struct isis_extended_ip_reach
*)
974 dist
= cost
+ r
->metric
;
975 ip_info
.dest
.u
.prefix4
= r
->prefix
.prefix
;
976 ip_info
.dest
.prefixlen
= r
->prefix
.prefixlen
;
978 /* Parse list of Prefix-SID subTLVs if SR is enabled */
979 has_valid_psid
= false;
980 if (spftree
->area
->srdb
.enabled
&& r
->subtlvs
) {
981 for (struct isis_item
*i
=
982 r
->subtlvs
->prefix_sids
.head
;
984 struct isis_prefix_sid
*psid
=
985 (struct isis_prefix_sid
*)i
;
987 if (psid
->algorithm
!= SR_ALGORITHM_SPF
)
990 has_valid_psid
= true;
991 process_N(spftree
, VTYPE_IPREACH_TE
,
992 &ip_info
, dist
, depth
+ 1,
995 * Stop the Prefix-SID iteration since
996 * we only support the SPF algorithm for
1002 if (!has_valid_psid
)
1003 process_N(spftree
, VTYPE_IPREACH_TE
, &ip_info
,
1004 dist
, depth
+ 1, NULL
, parent
);
1008 if (!pseudo_lsp
&& spftree
->family
== AF_INET6
) {
1009 struct isis_item_list
*ipv6_reachs
;
1010 if (spftree
->mtid
== ISIS_MT_IPV4_UNICAST
)
1011 ipv6_reachs
= &lsp
->tlvs
->ipv6_reach
;
1013 ipv6_reachs
= isis_lookup_mt_items(
1014 &lsp
->tlvs
->mt_ipv6_reach
, spftree
->mtid
);
1016 struct isis_ipv6_reach
*r
;
1017 for (r
= ipv6_reachs
1018 ? (struct isis_ipv6_reach
*)ipv6_reachs
->head
1021 dist
= cost
+ r
->metric
;
1022 vtype
= r
->external
? VTYPE_IP6REACH_EXTERNAL
1023 : VTYPE_IP6REACH_INTERNAL
;
1024 memset(&ip_info
, 0, sizeof(ip_info
));
1025 ip_info
.dest
.family
= AF_INET6
;
1026 ip_info
.dest
.u
.prefix6
= r
->prefix
.prefix
;
1027 ip_info
.dest
.prefixlen
= r
->prefix
.prefixlen
;
1029 if (spftree
->area
->srdb
.enabled
&& r
->subtlvs
&&
1030 r
->subtlvs
->source_prefix
&&
1031 r
->subtlvs
->source_prefix
->prefixlen
) {
1032 if (spftree
->tree_id
!= SPFTREE_DSTSRC
) {
1033 char buff
[VID2STR_BUFFER
];
1034 zlog_warn("Ignoring dest-src route %s in non dest-src topology",
1037 r
->subtlvs
->source_prefix
,
1043 ip_info
.src
= *r
->subtlvs
->source_prefix
;
1046 /* Parse list of Prefix-SID subTLVs */
1047 has_valid_psid
= false;
1049 for (struct isis_item
*i
=
1050 r
->subtlvs
->prefix_sids
.head
;
1052 struct isis_prefix_sid
*psid
=
1053 (struct isis_prefix_sid
*)i
;
1055 if (psid
->algorithm
!= SR_ALGORITHM_SPF
)
1058 has_valid_psid
= true;
1059 process_N(spftree
, vtype
, &ip_info
,
1060 dist
, depth
+ 1, psid
,
1063 * Stop the Prefix-SID iteration since
1064 * we only support the SPF algorithm for
1070 if (!has_valid_psid
)
1071 process_N(spftree
, vtype
, &ip_info
, dist
,
1072 depth
+ 1, NULL
, parent
);
1078 /* if attach bit set in LSP, attached-bit receive ignore is
1079 * not configured, we are a level-1 area and we have no other
1080 * level-2 | level1-2 areas then add a default route toward
1083 if ((lsp
->hdr
.lsp_bits
& LSPBIT_ATT
) == LSPBIT_ATT
1084 && !spftree
->area
->attached_bit_rcv_ignore
1085 && (spftree
->area
->is_type
& IS_LEVEL_1
)
1086 && !isis_level2_adj_up(spftree
->area
)) {
1087 struct prefix_pair ip_info
= { {0} };
1088 if (IS_DEBUG_RTE_EVENTS
)
1089 zlog_debug("ISIS-Spf (%s): add default %s route",
1090 rawlspid_print(lsp
->hdr
.lsp_id
),
1091 spftree
->family
== AF_INET
? "ipv4"
1094 if (spftree
->family
== AF_INET
) {
1095 ip_info
.dest
.family
= AF_INET
;
1096 vtype
= VTYPE_IPREACH_INTERNAL
;
1098 ip_info
.dest
.family
= AF_INET6
;
1099 vtype
= VTYPE_IP6REACH_INTERNAL
;
1101 process_N(spftree
, vtype
, &ip_info
, cost
, depth
+ 1, NULL
,
1105 if (fragnode
== NULL
)
1106 fragnode
= listhead(lsp
->lspu
.frags
);
1108 fragnode
= listnextnode(fragnode
);
1111 lsp
= listgetdata(fragnode
);
1118 static struct isis_adjacency
*adj_find(struct list
*adj_list
, const uint8_t *id
,
1119 int level
, uint16_t mtid
, int family
)
1121 struct isis_adjacency
*adj
;
1122 struct listnode
*node
;
1124 for (ALL_LIST_ELEMENTS_RO(adj_list
, node
, adj
)) {
1125 if (!(adj
->level
& level
))
1127 if (memcmp(adj
->sysid
, id
, ISIS_SYS_ID_LEN
) != 0)
1129 if (adj
->adj_state
!= ISIS_ADJ_UP
)
1131 if (!adj_has_mt(adj
, mtid
))
1133 if (mtid
== ISIS_MT_IPV4_UNICAST
1134 && !speaks(adj
->nlpids
.nlpids
, adj
->nlpids
.count
, family
))
1142 struct spf_preload_tent_ip_reach_args
{
1143 struct isis_spftree
*spftree
;
1144 struct isis_vertex
*parent
;
1147 static int isis_spf_preload_tent_ip_reach_cb(const struct prefix
*prefix
,
1148 uint32_t metric
, bool external
,
1149 struct isis_subtlvs
*subtlvs
,
1152 struct spf_preload_tent_ip_reach_args
*args
= arg
;
1153 struct isis_spftree
*spftree
= args
->spftree
;
1154 struct isis_vertex
*parent
= args
->parent
;
1155 struct prefix_pair ip_info
;
1156 enum vertextype vtype
;
1157 bool has_valid_psid
= false;
1160 return LSP_ITER_CONTINUE
;
1162 assert(spftree
->family
== prefix
->family
);
1163 memset(&ip_info
, 0, sizeof(ip_info
));
1164 prefix_copy(&ip_info
.dest
, prefix
);
1165 apply_mask(&ip_info
.dest
);
1167 if (prefix
->family
== AF_INET
)
1168 vtype
= VTYPE_IPREACH_INTERNAL
;
1170 vtype
= VTYPE_IP6REACH_INTERNAL
;
1172 /* Parse list of Prefix-SID subTLVs if SR is enabled */
1173 if (spftree
->area
->srdb
.enabled
&& subtlvs
) {
1174 for (struct isis_item
*i
= subtlvs
->prefix_sids
.head
; i
;
1176 struct isis_prefix_sid
*psid
=
1177 (struct isis_prefix_sid
*)i
;
1179 if (psid
->algorithm
!= SR_ALGORITHM_SPF
)
1182 has_valid_psid
= true;
1183 isis_spf_add_local(spftree
, vtype
, &ip_info
, NULL
, 0,
1187 * Stop the Prefix-SID iteration since we only support
1188 * the SPF algorithm for now.
1193 if (!has_valid_psid
)
1194 isis_spf_add_local(spftree
, vtype
, &ip_info
, NULL
, 0, NULL
,
1197 return LSP_ITER_CONTINUE
;
1200 static void isis_spf_preload_tent(struct isis_spftree
*spftree
,
1201 uint8_t *root_sysid
,
1202 struct isis_lsp
*root_lsp
,
1203 struct isis_vertex
*parent
)
1205 struct spf_preload_tent_ip_reach_args ip_reach_args
;
1206 struct isis_spf_adj
*sadj
;
1207 struct listnode
*node
;
1209 if (!CHECK_FLAG(spftree
->flags
, F_SPFTREE_HOPCOUNT_METRIC
)) {
1210 ip_reach_args
.spftree
= spftree
;
1211 ip_reach_args
.parent
= parent
;
1212 isis_lsp_iterate_ip_reach(
1213 root_lsp
, spftree
->family
, spftree
->mtid
,
1214 isis_spf_preload_tent_ip_reach_cb
, &ip_reach_args
);
1217 /* Iterate over adjacencies. */
1218 for (ALL_LIST_ELEMENTS_RO(spftree
->sadj_list
, node
, sadj
)) {
1219 const uint8_t *adj_id
;
1222 if (CHECK_FLAG(sadj
->flags
, F_ISIS_SPF_ADJ_BROADCAST
))
1223 adj_id
= sadj
->lan
.desig_is_id
;
1227 if (isis_lfa_excise_adj_check(spftree
, adj_id
)) {
1229 zlog_debug("ISIS-SPF: excising adjacency %s",
1230 isis_format_id(sadj
->id
,
1231 ISIS_SYS_ID_LEN
+ 1));
1235 metric
= CHECK_FLAG(spftree
->flags
, F_SPFTREE_HOPCOUNT_METRIC
)
1238 if (!LSP_PSEUDO_ID(sadj
->id
)) {
1239 isis_spf_add_local(spftree
,
1240 CHECK_FLAG(sadj
->flags
,
1241 F_ISIS_SPF_ADJ_OLDMETRIC
)
1242 ? VTYPE_NONPSEUDO_IS
1243 : VTYPE_NONPSEUDO_TE_IS
,
1244 sadj
->id
, sadj
, metric
, NULL
,
1246 } else if (sadj
->lsp
) {
1247 isis_spf_process_lsp(spftree
, sadj
->lsp
, metric
, 0,
1248 spftree
->sysid
, parent
);
1253 struct spf_adj_find_reverse_metric_args
{
1254 const uint8_t *id_self
;
1255 uint32_t reverse_metric
;
1258 static int spf_adj_find_reverse_metric_cb(const uint8_t *id
, uint32_t metric
,
1260 struct isis_ext_subtlvs
*subtlvs
,
1263 struct spf_adj_find_reverse_metric_args
*args
= arg
;
1265 if (memcmp(id
, args
->id_self
, ISIS_SYS_ID_LEN
))
1266 return LSP_ITER_CONTINUE
;
1268 args
->reverse_metric
= metric
;
1270 return LSP_ITER_STOP
;
1274 * Change all SPF adjacencies to use the link cost in the direction from the
1275 * next hop back towards root in place of the link cost in the direction away
1276 * from root towards the next hop.
1278 static void spf_adj_get_reverse_metrics(struct isis_spftree
*spftree
)
1280 struct isis_spf_adj
*sadj
;
1281 struct listnode
*node
, *nnode
;
1283 for (ALL_LIST_ELEMENTS(spftree
->sadj_list
, node
, nnode
, sadj
)) {
1284 uint8_t lspid
[ISIS_SYS_ID_LEN
+ 2];
1285 struct isis_lsp
*lsp_adj
;
1286 const uint8_t *id_self
;
1287 struct spf_adj_find_reverse_metric_args args
;
1289 /* Skip pseudonodes. */
1290 if (LSP_PSEUDO_ID(sadj
->id
))
1293 /* Find LSP of the corresponding adjacency. */
1294 memcpy(lspid
, sadj
->id
, ISIS_SYS_ID_LEN
);
1295 LSP_PSEUDO_ID(lspid
) = 0;
1296 LSP_FRAGMENT(lspid
) = 0;
1297 lsp_adj
= lsp_search(spftree
->lspdb
, lspid
);
1298 if (lsp_adj
== NULL
|| lsp_adj
->hdr
.rem_lifetime
== 0) {
1299 /* Delete one-way adjacency. */
1300 listnode_delete(spftree
->sadj_list
, sadj
);
1304 /* Find root node in the LSP of the adjacent router. */
1305 if (CHECK_FLAG(sadj
->flags
, F_ISIS_SPF_ADJ_BROADCAST
))
1306 id_self
= sadj
->lan
.desig_is_id
;
1308 id_self
= spftree
->sysid
;
1309 args
.id_self
= id_self
;
1310 args
.reverse_metric
= UINT32_MAX
;
1311 isis_lsp_iterate_is_reach(lsp_adj
, spftree
->mtid
,
1312 spf_adj_find_reverse_metric_cb
,
1314 if (args
.reverse_metric
== UINT32_MAX
) {
1315 /* Delete one-way adjacency. */
1316 listnode_delete(spftree
->sadj_list
, sadj
);
1319 sadj
->metric
= args
.reverse_metric
;
1323 static void spf_adj_list_parse_tlv(struct isis_spftree
*spftree
,
1324 struct list
*adj_list
, const uint8_t *id
,
1325 const uint8_t *desig_is_id
,
1326 uint32_t pseudo_metric
, uint32_t metric
,
1328 struct isis_ext_subtlvs
*subtlvs
)
1330 struct isis_spf_adj
*sadj
;
1331 uint8_t lspid
[ISIS_SYS_ID_LEN
+ 2];
1332 struct isis_lsp
*lsp
;
1335 /* Skip self in the pseudonode. */
1336 if (desig_is_id
&& !memcmp(id
, spftree
->sysid
, ISIS_SYS_ID_LEN
))
1339 /* Find LSP from the adjacency. */
1340 memcpy(lspid
, id
, ISIS_SYS_ID_LEN
+ 1);
1341 LSP_FRAGMENT(lspid
) = 0;
1342 lsp
= lsp_search(spftree
->lspdb
, lspid
);
1343 if (lsp
== NULL
|| lsp
->hdr
.rem_lifetime
== 0) {
1344 zlog_warn("ISIS-SPF: No LSP found from root to L%d %s",
1345 spftree
->level
, rawlspid_print(lspid
));
1349 sadj
= XCALLOC(MTYPE_ISIS_SPF_ADJ
, sizeof(*sadj
));
1350 memcpy(sadj
->id
, id
, sizeof(sadj
->id
));
1352 memcpy(sadj
->lan
.desig_is_id
, desig_is_id
,
1353 sizeof(sadj
->lan
.desig_is_id
));
1354 SET_FLAG(flags
, F_ISIS_SPF_ADJ_BROADCAST
);
1355 sadj
->metric
= pseudo_metric
;
1357 sadj
->metric
= metric
;
1359 SET_FLAG(flags
, F_ISIS_SPF_ADJ_OLDMETRIC
);
1361 sadj
->subtlvs
= subtlvs
;
1362 sadj
->flags
= flags
;
1364 if ((oldmetric
&& metric
== ISIS_NARROW_METRIC_INFINITY
)
1365 || (!oldmetric
&& metric
== ISIS_WIDE_METRIC_INFINITY
))
1366 SET_FLAG(flags
, F_ISIS_SPF_ADJ_METRIC_INFINITY
);
1368 /* Set real adjacency. */
1369 if (!CHECK_FLAG(spftree
->flags
, F_SPFTREE_NO_ADJACENCIES
)
1370 && !LSP_PSEUDO_ID(id
)) {
1371 struct isis_adjacency
*adj
;
1373 adj
= adj_find(adj_list
, id
, spftree
->level
, spftree
->mtid
,
1376 XFREE(MTYPE_ISIS_SPF_ADJ
, sadj
);
1380 listnode_delete(adj_list
, adj
);
1384 /* Add adjacency to the list. */
1385 listnode_add(spftree
->sadj_list
, sadj
);
1387 if (!LSP_PSEUDO_ID(id
)) {
1388 struct isis_spf_node
*node
;
1390 node
= isis_spf_node_find(&spftree
->adj_nodes
, id
);
1392 node
= isis_spf_node_new(&spftree
->adj_nodes
, id
);
1393 if (node
->best_metric
== 0 || sadj
->metric
< node
->best_metric
)
1394 node
->best_metric
= sadj
->metric
;
1395 listnode_add(node
->adjacencies
, sadj
);
1398 /* Parse pseudonode LSP too. */
1399 if (LSP_PSEUDO_ID(id
))
1400 spf_adj_list_parse_lsp(spftree
, adj_list
, lsp
, id
, metric
);
1403 static void spf_adj_list_parse_lsp(struct isis_spftree
*spftree
,
1404 struct list
*adj_list
, struct isis_lsp
*lsp
,
1405 const uint8_t *pseudo_nodeid
,
1406 uint32_t pseudo_metric
)
1408 bool pseudo_lsp
= LSP_PSEUDO_ID(lsp
->hdr
.lsp_id
);
1409 struct isis_lsp
*frag
;
1410 struct listnode
*node
;
1411 struct isis_item
*head
;
1412 struct isis_item_list
*te_neighs
;
1414 if (lsp
->hdr
.seqno
== 0 || lsp
->hdr
.rem_lifetime
== 0)
1419 if (pseudo_lsp
|| spftree
->mtid
== ISIS_MT_IPV4_UNICAST
) {
1420 head
= lsp
->tlvs
->oldstyle_reach
.head
;
1421 for (struct isis_oldstyle_reach
*reach
=
1422 (struct isis_oldstyle_reach
*)head
;
1423 reach
; reach
= reach
->next
) {
1424 spf_adj_list_parse_tlv(
1425 spftree
, adj_list
, reach
->id
,
1426 pseudo_nodeid
, pseudo_metric
,
1427 reach
->metric
, true, NULL
);
1431 if (pseudo_lsp
|| spftree
->mtid
== ISIS_MT_IPV4_UNICAST
)
1432 te_neighs
= &lsp
->tlvs
->extended_reach
;
1434 te_neighs
= isis_get_mt_items(&lsp
->tlvs
->mt_reach
,
1437 head
= te_neighs
->head
;
1438 for (struct isis_extended_reach
*reach
=
1439 (struct isis_extended_reach
*)head
;
1440 reach
; reach
= reach
->next
) {
1441 spf_adj_list_parse_tlv(
1442 spftree
, adj_list
, reach
->id
,
1443 pseudo_nodeid
, pseudo_metric
,
1444 reach
->metric
, false, reach
->subtlvs
);
1449 if (LSP_FRAGMENT(lsp
->hdr
.lsp_id
))
1452 /* Parse LSP fragments. */
1453 for (ALL_LIST_ELEMENTS_RO(lsp
->lspu
.frags
, node
, frag
)) {
1457 spf_adj_list_parse_lsp(spftree
, adj_list
, frag
, pseudo_nodeid
,
1462 static void isis_spf_build_adj_list(struct isis_spftree
*spftree
,
1463 struct isis_lsp
*lsp
)
1465 struct list
*adj_list
= NULL
;
1467 if (!CHECK_FLAG(spftree
->flags
, F_SPFTREE_NO_ADJACENCIES
))
1468 adj_list
= list_dup(spftree
->area
->adjacency_list
);
1470 spf_adj_list_parse_lsp(spftree
, adj_list
, lsp
, NULL
, 0);
1472 if (!CHECK_FLAG(spftree
->flags
, F_SPFTREE_NO_ADJACENCIES
))
1473 list_delete(&adj_list
);
1475 if (spftree
->type
== SPF_TYPE_REVERSE
)
1476 spf_adj_get_reverse_metrics(spftree
);
1480 * The parent(s) for vertex is set when added to TENT list
1481 * now we just put the child pointer(s) in place
1483 static void add_to_paths(struct isis_spftree
*spftree
,
1484 struct isis_vertex
*vertex
)
1486 #ifdef EXTREME_DEBUG
1487 char buff
[VID2STR_BUFFER
];
1488 #endif /* EXTREME_DEBUG */
1490 if (isis_find_vertex(&spftree
->paths
, &vertex
->N
, vertex
->type
))
1492 isis_vertex_queue_append(&spftree
->paths
, vertex
);
1494 #ifdef EXTREME_DEBUG
1495 if (IS_DEBUG_SPF_EVENTS
)
1496 zlog_debug("ISIS-SPF: added %s %s %s depth %d dist %d to PATHS",
1497 print_sys_hostname(vertex
->N
.id
),
1498 vtype2string(vertex
->type
),
1499 vid2string(vertex
, buff
, sizeof(buff
)),
1500 vertex
->depth
, vertex
->d_N
);
1501 #endif /* EXTREME_DEBUG */
1504 static void init_spt(struct isis_spftree
*spftree
, int mtid
)
1506 /* Clear data from previous run. */
1507 hash_clean(spftree
->prefix_sids
, NULL
);
1508 isis_spf_node_list_clear(&spftree
->adj_nodes
);
1509 list_delete_all_node(spftree
->sadj_list
);
1510 isis_vertex_queue_clear(&spftree
->tents
);
1511 isis_vertex_queue_clear(&spftree
->paths
);
1512 isis_zebra_rlfa_unregister_all(spftree
);
1513 isis_rlfa_list_clear(spftree
);
1514 list_delete_all_node(spftree
->lfa
.remote
.pc_spftrees
);
1515 memset(&spftree
->lfa
.protection_counters
, 0,
1516 sizeof(spftree
->lfa
.protection_counters
));
1518 spftree
->mtid
= mtid
;
1521 static enum spf_prefix_priority
1522 spf_prefix_priority(struct isis_spftree
*spftree
, struct isis_vertex
*vertex
)
1524 struct isis_area
*area
= spftree
->area
;
1525 struct prefix
*prefix
= &vertex
->N
.ip
.p
.dest
;
1527 for (int priority
= SPF_PREFIX_PRIO_CRITICAL
;
1528 priority
<= SPF_PREFIX_PRIO_MEDIUM
; priority
++) {
1529 struct spf_prefix_priority_acl
*ppa
;
1530 enum filter_type ret
= FILTER_PERMIT
;
1532 ppa
= &area
->spf_prefix_priorities
[priority
];
1533 switch (spftree
->family
) {
1535 ret
= access_list_apply(ppa
->list_v4
, prefix
);
1538 ret
= access_list_apply(ppa
->list_v6
, prefix
);
1544 if (ret
== FILTER_PERMIT
)
1548 /* Assign medium priority to loopback prefixes by default. */
1549 if (is_host_route(prefix
))
1550 return SPF_PREFIX_PRIO_MEDIUM
;
1552 return SPF_PREFIX_PRIO_LOW
;
1555 static void spf_path_process(struct isis_spftree
*spftree
,
1556 struct isis_vertex
*vertex
)
1558 struct isis_area
*area
= spftree
->area
;
1559 int level
= spftree
->level
;
1560 char buff
[VID2STR_BUFFER
];
1562 if (spftree
->type
== SPF_TYPE_TI_LFA
&& VTYPE_IS(vertex
->type
)
1563 && !CHECK_FLAG(spftree
->flags
, F_SPFTREE_NO_ADJACENCIES
)) {
1564 if (listcount(vertex
->Adj_N
) > 0) {
1565 struct isis_adjacency
*adj
;
1567 if (isis_tilfa_check(spftree
, vertex
) != 0)
1570 adj
= isis_adj_find(area
, level
, vertex
->N
.id
);
1572 sr_adj_sid_add_single(adj
, spftree
->family
,
1573 true, vertex
->Adj_N
);
1574 } else if (IS_DEBUG_SPF_EVENTS
)
1576 "ISIS-SPF: no adjacencies, do not install backup Adj-SID for %s depth %d dist %d",
1577 vid2string(vertex
, buff
, sizeof(buff
)),
1578 vertex
->depth
, vertex
->d_N
);
1581 if (VTYPE_IP(vertex
->type
)
1582 && !CHECK_FLAG(spftree
->flags
, F_SPFTREE_NO_ROUTES
)) {
1583 enum spf_prefix_priority priority
;
1585 priority
= spf_prefix_priority(spftree
, vertex
);
1586 vertex
->N
.ip
.priority
= priority
;
1587 if (vertex
->depth
== 1 || listcount(vertex
->Adj_N
) > 0) {
1588 struct isis_spftree
*pre_spftree
;
1589 struct route_table
*route_table
;
1592 switch (spftree
->type
) {
1594 case SPF_TYPE_TI_LFA
:
1596 > area
->lfa_priority_limit
[level
- 1]) {
1599 "ISIS-LFA: skipping %s %s (low prefix priority)",
1612 switch (spftree
->type
) {
1614 isis_rlfa_check(spftree
, vertex
);
1616 case SPF_TYPE_TI_LFA
:
1617 if (isis_tilfa_check(spftree
, vertex
) != 0)
1620 pre_spftree
= spftree
->lfa
.old
.spftree
;
1621 route_table
= pre_spftree
->route_table_backup
;
1622 allow_ecmp
= area
->lfa_load_sharing
[level
- 1];
1623 pre_spftree
->lfa
.protection_counters
1624 .tilfa
[vertex
->N
.ip
.priority
] += 1;
1627 route_table
= spftree
->route_table
;
1631 * Update LFA protection counters (ignore local
1634 if (vertex
->depth
> 1) {
1635 spftree
->lfa
.protection_counters
1636 .total
[priority
] += 1;
1637 if (listcount(vertex
->Adj_N
) > 1)
1638 spftree
->lfa
.protection_counters
1639 .ecmp
[priority
] += 1;
1645 &vertex
->N
.ip
.p
.dest
, &vertex
->N
.ip
.p
.src
,
1646 vertex
->d_N
, vertex
->depth
, &vertex
->N
.ip
.sr
,
1647 vertex
->Adj_N
, allow_ecmp
, area
, route_table
);
1648 } else if (IS_DEBUG_SPF_EVENTS
)
1650 "ISIS-SPF: no adjacencies, do not install route for %s depth %d dist %d",
1651 vid2string(vertex
, buff
, sizeof(buff
)),
1652 vertex
->depth
, vertex
->d_N
);
1656 static void isis_spf_loop(struct isis_spftree
*spftree
,
1657 uint8_t *root_sysid
)
1659 struct isis_vertex
*vertex
;
1660 struct isis_lsp
*lsp
;
1661 struct listnode
*node
;
1663 while (isis_vertex_queue_count(&spftree
->tents
)) {
1664 vertex
= isis_vertex_queue_pop(&spftree
->tents
);
1666 #ifdef EXTREME_DEBUG
1667 if (IS_DEBUG_SPF_EVENTS
)
1669 "ISIS-SPF: get TENT node %s %s depth %d dist %d to PATHS",
1670 print_sys_hostname(vertex
->N
.id
),
1671 vtype2string(vertex
->type
), vertex
->depth
,
1673 #endif /* EXTREME_DEBUG */
1675 add_to_paths(spftree
, vertex
);
1676 if (!VTYPE_IS(vertex
->type
))
1679 lsp
= lsp_for_vertex(spftree
, vertex
);
1681 zlog_warn("ISIS-SPF: No LSP found for %s",
1682 isis_format_id(vertex
->N
.id
,
1683 sizeof(vertex
->N
.id
)));
1687 isis_spf_process_lsp(spftree
, lsp
, vertex
->d_N
, vertex
->depth
,
1688 root_sysid
, vertex
);
1691 /* Generate routes once the SPT is formed. */
1692 for (ALL_QUEUE_ELEMENTS_RO(&spftree
->paths
, node
, vertex
)) {
1693 /* New-style TLVs take precedence over the old-style TLVs. */
1694 switch (vertex
->type
) {
1695 case VTYPE_IPREACH_INTERNAL
:
1696 case VTYPE_IPREACH_EXTERNAL
:
1697 if (isis_find_vertex(&spftree
->paths
, &vertex
->N
,
1705 spf_path_process(spftree
, vertex
);
1709 struct isis_spftree
*isis_run_hopcount_spf(struct isis_area
*area
,
1711 struct isis_spftree
*spftree
)
1714 spftree
= isis_spftree_new(area
, &area
->lspdb
[IS_LEVEL_2
- 1],
1715 sysid
, ISIS_LEVEL2
, SPFTREE_IPV4
,
1717 F_SPFTREE_HOPCOUNT_METRIC
);
1719 init_spt(spftree
, ISIS_MT_IPV4_UNICAST
);
1720 if (!memcmp(sysid
, area
->isis
->sysid
, ISIS_SYS_ID_LEN
)) {
1721 struct isis_lsp
*root_lsp
;
1722 struct isis_vertex
*root_vertex
;
1724 root_lsp
= isis_root_system_lsp(spftree
->lspdb
, spftree
->sysid
);
1727 * If we are running locally, initialize with
1728 * information from adjacencies
1730 root_vertex
= isis_spf_add_root(spftree
);
1732 isis_spf_preload_tent(spftree
, sysid
, root_lsp
,
1736 isis_vertex_queue_insert(
1738 isis_vertex_new(spftree
, sysid
, VTYPE_NONPSEUDO_TE_IS
));
1741 isis_spf_loop(spftree
, sysid
);
1746 void isis_run_spf(struct isis_spftree
*spftree
)
1748 struct isis_lsp
*root_lsp
;
1749 struct isis_vertex
*root_vertex
;
1750 struct timeval time_start
;
1751 struct timeval time_end
;
1752 struct isis_mt_router_info
*mt_router_info
;
1755 /* Get time that can't roll backwards. */
1756 monotime(&time_start
);
1758 root_lsp
= isis_root_system_lsp(spftree
->lspdb
, spftree
->sysid
);
1759 if (root_lsp
== NULL
) {
1760 zlog_err("ISIS-SPF: could not find own l%d LSP!",
1765 /* Get Multi-Topology ID. */
1766 switch (spftree
->tree_id
) {
1768 mtid
= ISIS_MT_IPV4_UNICAST
;
1771 mt_router_info
= isis_tlvs_lookup_mt_router_info(
1772 root_lsp
->tlvs
, ISIS_MT_IPV6_UNICAST
);
1774 mtid
= ISIS_MT_IPV6_UNICAST
;
1776 mtid
= ISIS_MT_IPV4_UNICAST
;
1778 case SPFTREE_DSTSRC
:
1779 mtid
= ISIS_MT_IPV6_DSTSRC
;
1783 "isis_run_spf should never be called with SPFTREE_COUNT as argument!");
1790 init_spt(spftree
, mtid
);
1792 root_vertex
= isis_spf_add_root(spftree
);
1794 isis_spf_build_adj_list(spftree
, root_lsp
);
1795 isis_spf_preload_tent(spftree
, spftree
->sysid
, root_lsp
, root_vertex
);
1800 if (!isis_vertex_queue_count(&spftree
->tents
)
1801 && (IS_DEBUG_SPF_EVENTS
)) {
1802 zlog_warn("ISIS-SPF: TENT is empty SPF-root:%s",
1803 print_sys_hostname(spftree
->sysid
));
1806 isis_spf_loop(spftree
, spftree
->sysid
);
1807 spftree
->runcount
++;
1808 spftree
->last_run_timestamp
= time(NULL
);
1809 spftree
->last_run_monotime
= monotime(&time_end
);
1810 spftree
->last_run_duration
=
1811 ((time_end
.tv_sec
- time_start
.tv_sec
) * 1000000)
1812 + (time_end
.tv_usec
- time_start
.tv_usec
);
1815 static void isis_run_spf_with_protection(struct isis_area
*area
,
1816 struct isis_spftree
*spftree
)
1818 /* Run forward SPF locally. */
1819 memcpy(spftree
->sysid
, area
->isis
->sysid
, ISIS_SYS_ID_LEN
);
1820 isis_run_spf(spftree
);
1822 /* Run LFA protection if configured. */
1823 if (area
->lfa_protected_links
[spftree
->level
- 1] > 0
1824 || area
->tilfa_protected_links
[spftree
->level
- 1] > 0)
1825 isis_spf_run_lfa(area
, spftree
);
1828 void isis_spf_verify_routes(struct isis_area
*area
, struct isis_spftree
**trees
)
1830 if (area
->is_type
== IS_LEVEL_1
) {
1831 isis_route_verify_table(area
, trees
[0]->route_table
,
1832 trees
[0]->route_table_backup
);
1833 } else if (area
->is_type
== IS_LEVEL_2
) {
1834 isis_route_verify_table(area
, trees
[1]->route_table
,
1835 trees
[1]->route_table_backup
);
1837 isis_route_verify_merge(area
, trees
[0]->route_table
,
1838 trees
[0]->route_table_backup
,
1839 trees
[1]->route_table
,
1840 trees
[1]->route_table_backup
);
1844 void isis_spf_invalidate_routes(struct isis_spftree
*tree
)
1846 isis_route_invalidate_table(tree
->area
, tree
->route_table
);
1848 /* Delete backup routes. */
1849 route_table_finish(tree
->route_table_backup
);
1850 tree
->route_table_backup
= srcdest_table_init();
1851 tree
->route_table_backup
->cleanup
= isis_route_node_cleanup
;
1854 void isis_spf_switchover_routes(struct isis_area
*area
,
1855 struct isis_spftree
**trees
, int family
,
1856 union g_addr
*nexthop_ip
, ifindex_t ifindex
,
1859 isis_route_switchover_nexthop(area
, trees
[level
- 1]->route_table
,
1860 family
, nexthop_ip
, ifindex
);
1863 static void isis_run_spf_cb(struct thread
*thread
)
1865 struct isis_spf_run
*run
= THREAD_ARG(thread
);
1866 struct isis_area
*area
= run
->area
;
1867 int level
= run
->level
;
1870 XFREE(MTYPE_ISIS_SPF_RUN
, run
);
1872 if (!(area
->is_type
& level
)) {
1873 if (IS_DEBUG_SPF_EVENTS
)
1874 zlog_warn("ISIS-SPF (%s) area does not share level",
1879 isis_area_delete_backup_adj_sids(area
, level
);
1880 isis_area_invalidate_routes(area
, level
);
1882 if (IS_DEBUG_SPF_EVENTS
)
1883 zlog_debug("ISIS-SPF (%s) L%d SPF needed, periodic SPF",
1884 area
->area_tag
, level
);
1886 if (area
->ip_circuits
) {
1887 isis_run_spf_with_protection(
1888 area
, area
->spftree
[SPFTREE_IPV4
][level
- 1]);
1891 if (area
->ipv6_circuits
) {
1892 isis_run_spf_with_protection(
1893 area
, area
->spftree
[SPFTREE_IPV6
][level
- 1]);
1896 if (area
->ipv6_circuits
&& isis_area_ipv6_dstsrc_enabled(area
)) {
1897 isis_run_spf_with_protection(
1898 area
, area
->spftree
[SPFTREE_DSTSRC
][level
- 1]);
1903 area
->spf_run_count
[level
]++;
1905 isis_area_verify_routes(area
);
1907 /* walk all circuits and reset any spf specific flags */
1908 struct listnode
*node
;
1909 struct isis_circuit
*circuit
;
1910 for (ALL_LIST_ELEMENTS_RO(area
->circuit_list
, node
, circuit
))
1911 UNSET_FLAG(circuit
->flags
, ISIS_CIRCUIT_FLAPPED_AFTER_SPF
);
1913 fabricd_run_spf(area
);
1916 static struct isis_spf_run
*isis_run_spf_arg(struct isis_area
*area
, int level
)
1918 struct isis_spf_run
*run
= XMALLOC(MTYPE_ISIS_SPF_RUN
, sizeof(*run
));
1926 void isis_spf_timer_free(void *run
)
1928 XFREE(MTYPE_ISIS_SPF_RUN
, run
);
1931 int _isis_spf_schedule(struct isis_area
*area
, int level
,
1932 const char *func
, const char *file
, int line
)
1934 struct isis_spftree
*spftree
= area
->spftree
[SPFTREE_IPV4
][level
- 1];
1935 time_t now
= monotime(NULL
);
1936 int diff
= now
- spftree
->last_run_monotime
;
1938 if (CHECK_FLAG(im
->options
, F_ISIS_UNIT_TEST
))
1942 assert(area
->is_type
& level
);
1944 if (IS_DEBUG_SPF_EVENTS
) {
1946 "ISIS-SPF (%s) L%d SPF schedule called, lastrun %d sec ago Caller: %s %s:%d",
1947 area
->area_tag
, level
, diff
, func
, file
, line
);
1950 thread_cancel(&area
->t_rlfa_rib_update
);
1951 if (area
->spf_delay_ietf
[level
- 1]) {
1952 /* Need to call schedule function also if spf delay is running
1954 * restart holdoff timer - compare
1955 * draft-ietf-rtgwg-backoff-algo-04 */
1957 spf_backoff_schedule(area
->spf_delay_ietf
[level
- 1]);
1958 if (area
->spf_timer
[level
- 1])
1961 thread_add_timer_msec(master
, isis_run_spf_cb
,
1962 isis_run_spf_arg(area
, level
), delay
,
1963 &area
->spf_timer
[level
- 1]);
1967 if (area
->spf_timer
[level
- 1])
1970 /* wait configured min_spf_interval before doing the SPF */
1972 if (diff
>= area
->min_spf_interval
[level
- 1]
1973 || area
->bfd_force_spf_refresh
) {
1975 * Last run is more than min interval ago or BFD signalled a
1976 * 'down' message, schedule immediate run
1980 if (area
->bfd_force_spf_refresh
) {
1982 "ISIS-SPF (%s) L%d SPF scheduled immediately due to BFD 'down' message",
1983 area
->area_tag
, level
);
1984 area
->bfd_force_spf_refresh
= false;
1987 timer
= area
->min_spf_interval
[level
- 1] - diff
;
1990 thread_add_timer(master
, isis_run_spf_cb
, isis_run_spf_arg(area
, level
),
1991 timer
, &area
->spf_timer
[level
- 1]);
1993 if (IS_DEBUG_SPF_EVENTS
)
1994 zlog_debug("ISIS-SPF (%s) L%d SPF scheduled %ld sec from now",
1995 area
->area_tag
, level
, timer
);
2000 static void isis_print_paths(struct vty
*vty
, struct isis_vertex_queue
*queue
,
2001 uint8_t *root_sysid
)
2003 struct listnode
*node
;
2004 struct isis_vertex
*vertex
;
2005 char buff
[VID2STR_BUFFER
];
2008 "Vertex Type Metric Next-Hop Interface Parent\n");
2010 for (ALL_QUEUE_ELEMENTS_RO(queue
, node
, vertex
)) {
2011 if (VTYPE_IS(vertex
->type
)
2012 && memcmp(vertex
->N
.id
, root_sysid
, ISIS_SYS_ID_LEN
) == 0) {
2013 vty_out(vty
, "%-20s %-12s %-6s",
2014 print_sys_hostname(root_sysid
), "", "");
2015 vty_out(vty
, "%-30s\n", "");
2020 struct listnode
*anode
= listhead(vertex
->Adj_N
);
2021 struct listnode
*pnode
= listhead(vertex
->parents
);
2022 struct isis_vertex_adj
*vadj
;
2023 struct isis_vertex
*pvertex
;
2025 vty_out(vty
, "%-20s %-12s %-6u ",
2026 vid2string(vertex
, buff
, sizeof(buff
)),
2027 vtype2string(vertex
->type
), vertex
->d_N
);
2028 for (unsigned int i
= 0;
2029 i
< MAX(vertex
->Adj_N
? listcount(vertex
->Adj_N
) : 0,
2030 vertex
->parents
? listcount(vertex
->parents
) : 0);
2033 vadj
= listgetdata(anode
);
2034 anode
= anode
->next
;
2040 pvertex
= listgetdata(pnode
);
2041 pnode
= pnode
->next
;
2048 vty_out(vty
, "%-20s %-12s %-6s ", "", "", "");
2052 struct isis_spf_adj
*sadj
= vadj
->sadj
;
2054 vty_out(vty
, "%-20s %-9s ",
2055 print_sys_hostname(sadj
->id
),
2056 sadj
->adj
? sadj
->adj
->circuit
2063 vty_out(vty
, "%-20s %-9s ", "", "");
2065 vty_out(vty
, "%s(%d)",
2066 vid2string(pvertex
, buff
, sizeof(buff
)),
2076 void isis_print_spftree(struct vty
*vty
, struct isis_spftree
*spftree
)
2078 const char *tree_id_text
= NULL
;
2080 if (!spftree
|| !isis_vertex_queue_count(&spftree
->paths
))
2083 switch (spftree
->tree_id
) {
2085 tree_id_text
= "that speak IP";
2088 tree_id_text
= "that speak IPv6";
2090 case SPFTREE_DSTSRC
:
2091 tree_id_text
= "that support IPv6 dst-src routing";
2094 assert(!"isis_print_spftree shouldn't be called with SPFTREE_COUNT as type");
2098 vty_out(vty
, "IS-IS paths to level-%d routers %s\n", spftree
->level
,
2100 isis_print_paths(vty
, &spftree
->paths
, spftree
->sysid
);
2104 static void show_isis_topology_common(struct vty
*vty
, int levels
,
2107 struct listnode
*node
;
2108 struct isis_area
*area
;
2110 if (!isis
->area_list
|| isis
->area_list
->count
== 0)
2113 for (ALL_LIST_ELEMENTS_RO(isis
->area_list
, node
, area
)) {
2114 vty_out(vty
, "Area %s:\n",
2115 area
->area_tag
? area
->area_tag
: "null");
2117 for (int level
= ISIS_LEVEL1
; level
<= ISIS_LEVELS
; level
++) {
2118 if ((level
& levels
) == 0)
2121 if (area
->ip_circuits
> 0) {
2124 area
->spftree
[SPFTREE_IPV4
][level
- 1]);
2126 if (area
->ipv6_circuits
> 0) {
2129 area
->spftree
[SPFTREE_IPV6
][level
- 1]);
2131 if (isis_area_ipv6_dstsrc_enabled(area
)) {
2132 isis_print_spftree(vty
,
2133 area
->spftree
[SPFTREE_DSTSRC
]
2138 if (fabricd_spftree(area
)) {
2140 "IS-IS paths to level-2 routers with hop-by-hop metric\n");
2141 isis_print_paths(vty
, &fabricd_spftree(area
)->paths
, isis
->sysid
);
2149 DEFUN(show_isis_topology
, show_isis_topology_cmd
,
2151 " [vrf <NAME|all>] topology"
2153 " [<level-1|level-2>]"
2156 SHOW_STR PROTO_HELP VRF_CMD_HELP_STR
2158 "IS-IS paths to Intermediate Systems\n"
2160 "Paths to all level-1 routers in the area\n"
2161 "Paths to all level-2 routers in the domain\n"
2165 int levels
= ISIS_LEVELS
;
2166 struct listnode
*node
;
2167 struct isis
*isis
= NULL
;
2169 const char *vrf_name
= VRF_DEFAULT_NAME
;
2170 bool all_vrf
= false;
2173 if (argv_find(argv
, argc
, "topology", &idx
)) {
2175 levels
= ISIS_LEVEL1
| ISIS_LEVEL2
;
2176 else if (strmatch(argv
[idx
+ 1]->arg
, "level-1"))
2177 levels
= ISIS_LEVEL1
;
2179 levels
= ISIS_LEVEL2
;
2183 vty_out(vty
, "IS-IS Routing Process not enabled\n");
2186 ISIS_FIND_VRF_ARGS(argv
, argc
, idx_vrf
, vrf_name
, all_vrf
);
2190 for (ALL_LIST_ELEMENTS_RO(im
->isis
, node
, isis
))
2191 show_isis_topology_common(vty
, levels
, isis
);
2194 isis
= isis_lookup_by_vrfname(vrf_name
);
2196 show_isis_topology_common(vty
, levels
, isis
);
2202 static void isis_print_route(struct ttable
*tt
, const struct prefix
*prefix
,
2203 struct isis_route_info
*rinfo
, bool prefix_sid
,
2204 bool no_adjacencies
)
2206 struct isis_nexthop
*nexthop
;
2207 struct listnode
*node
;
2209 char buf_prefix
[BUFSIZ
];
2211 (void)prefix2str(prefix
, buf_prefix
, sizeof(buf_prefix
));
2212 for (ALL_LIST_ELEMENTS_RO(rinfo
->nexthops
, node
, nexthop
)) {
2213 struct interface
*ifp
;
2214 char buf_iface
[BUFSIZ
];
2215 char buf_nhop
[BUFSIZ
];
2217 if (!no_adjacencies
) {
2218 inet_ntop(nexthop
->family
, &nexthop
->ip
, buf_nhop
,
2220 ifp
= if_lookup_by_index(nexthop
->ifindex
, VRF_DEFAULT
);
2222 strlcpy(buf_iface
, ifp
->name
,
2225 snprintf(buf_iface
, sizeof(buf_iface
),
2226 "ifindex %u", nexthop
->ifindex
);
2228 strlcpy(buf_nhop
, print_sys_hostname(nexthop
->sysid
),
2230 strlcpy(buf_iface
, "-", sizeof(buf_iface
));
2234 char buf_sid
[BUFSIZ
] = {};
2235 char buf_lblop
[BUFSIZ
] = {};
2237 if (nexthop
->sr
.present
) {
2238 snprintf(buf_sid
, sizeof(buf_sid
), "%u",
2239 nexthop
->sr
.sid
.value
);
2240 sr_op2str(buf_lblop
, sizeof(buf_lblop
),
2241 rinfo
->sr
.label
, nexthop
->sr
.label
);
2243 strlcpy(buf_sid
, "-", sizeof(buf_sid
));
2244 strlcpy(buf_lblop
, "-", sizeof(buf_lblop
));
2248 ttable_add_row(tt
, "%s|%u|%s|%s|%s|%s",
2249 buf_prefix
, rinfo
->cost
,
2250 buf_iface
, buf_nhop
, buf_sid
,
2254 ttable_add_row(tt
, "||%s|%s|%s|%s", buf_iface
,
2255 buf_nhop
, buf_sid
, buf_lblop
);
2257 char buf_labels
[BUFSIZ
] = {};
2259 if (nexthop
->label_stack
) {
2261 i
< nexthop
->label_stack
->num_labels
;
2263 char buf_label
[BUFSIZ
];
2266 nexthop
->label_stack
->label
[i
],
2267 buf_label
, sizeof(buf_label
));
2269 strlcat(buf_labels
, "/",
2270 sizeof(buf_labels
));
2271 strlcat(buf_labels
, buf_label
,
2272 sizeof(buf_labels
));
2274 } else if (nexthop
->sr
.present
)
2275 label2str(nexthop
->sr
.label
, buf_labels
,
2276 sizeof(buf_labels
));
2278 strlcpy(buf_labels
, "-", sizeof(buf_labels
));
2281 ttable_add_row(tt
, "%s|%u|%s|%s|%s", buf_prefix
,
2282 rinfo
->cost
, buf_iface
, buf_nhop
,
2286 ttable_add_row(tt
, "||%s|%s|%s", buf_iface
,
2287 buf_nhop
, buf_labels
);
2290 if (list_isempty(rinfo
->nexthops
)) {
2292 char buf_sid
[BUFSIZ
] = {};
2293 char buf_lblop
[BUFSIZ
] = {};
2295 if (rinfo
->sr
.present
) {
2296 snprintf(buf_sid
, sizeof(buf_sid
), "%u",
2297 rinfo
->sr
.sid
.value
);
2298 sr_op2str(buf_lblop
, sizeof(buf_lblop
),
2300 MPLS_LABEL_IMPLICIT_NULL
);
2302 strlcpy(buf_sid
, "-", sizeof(buf_sid
));
2303 strlcpy(buf_lblop
, "-", sizeof(buf_lblop
));
2306 ttable_add_row(tt
, "%s|%u|%s|%s|%s|%s", buf_prefix
,
2307 rinfo
->cost
, "-", "-", buf_sid
,
2310 ttable_add_row(tt
, "%s|%u|%s|%s|%s", buf_prefix
,
2311 rinfo
->cost
, "-", "-", "-");
2315 void isis_print_routes(struct vty
*vty
, struct isis_spftree
*spftree
,
2316 bool prefix_sid
, bool backup
)
2318 struct route_table
*route_table
;
2320 struct route_node
*rn
;
2321 bool no_adjacencies
= false;
2322 const char *tree_id_text
= NULL
;
2327 switch (spftree
->tree_id
) {
2329 tree_id_text
= "IPv4";
2332 tree_id_text
= "IPv6";
2334 case SPFTREE_DSTSRC
:
2335 tree_id_text
= "IPv6 (dst-src routing)";
2338 assert(!"isis_print_routes shouldn't be called with SPFTREE_COUNT as type");
2342 vty_out(vty
, "IS-IS %s %s routing table:\n\n",
2343 circuit_t2string(spftree
->level
), tree_id_text
);
2345 /* Prepare table. */
2346 tt
= ttable_new(&ttable_styles
[TTSTYLE_BLANK
]);
2348 ttable_add_row(tt
, "Prefix|Metric|Interface|Nexthop|SID|Label Op.");
2350 ttable_add_row(tt
, "Prefix|Metric|Interface|Nexthop|Label(s)");
2351 tt
->style
.cell
.rpad
= 2;
2352 tt
->style
.corner
= '+';
2354 ttable_rowseps(tt
, 0, BOTTOM
, true, '-');
2356 if (CHECK_FLAG(spftree
->flags
, F_SPFTREE_NO_ADJACENCIES
))
2357 no_adjacencies
= true;
2360 (backup
) ? spftree
->route_table_backup
: spftree
->route_table
;
2361 for (rn
= route_top(route_table
); rn
; rn
= route_next(rn
)) {
2362 struct isis_route_info
*rinfo
;
2368 isis_print_route(tt
, &rn
->p
, rinfo
, prefix_sid
, no_adjacencies
);
2371 /* Dump the generated table. */
2372 if (tt
->nrows
> 1) {
2375 table
= ttable_dump(tt
, "\n");
2376 vty_out(vty
, "%s\n", table
);
2377 XFREE(MTYPE_TMP
, table
);
2382 static void show_isis_route_common(struct vty
*vty
, int levels
,
2383 struct isis
*isis
, bool prefix_sid
,
2386 struct listnode
*node
;
2387 struct isis_area
*area
;
2389 if (!isis
->area_list
|| isis
->area_list
->count
== 0)
2392 for (ALL_LIST_ELEMENTS_RO(isis
->area_list
, node
, area
)) {
2393 vty_out(vty
, "Area %s:\n",
2394 area
->area_tag
? area
->area_tag
: "null");
2396 for (int level
= ISIS_LEVEL1
; level
<= ISIS_LEVELS
; level
++) {
2397 if ((level
& levels
) == 0)
2400 if (area
->ip_circuits
> 0) {
2403 area
->spftree
[SPFTREE_IPV4
][level
- 1],
2404 prefix_sid
, backup
);
2406 if (area
->ipv6_circuits
> 0) {
2409 area
->spftree
[SPFTREE_IPV6
][level
- 1],
2410 prefix_sid
, backup
);
2412 if (isis_area_ipv6_dstsrc_enabled(area
)) {
2413 isis_print_routes(vty
,
2414 area
->spftree
[SPFTREE_DSTSRC
]
2416 prefix_sid
, backup
);
2422 DEFUN(show_isis_route
, show_isis_route_cmd
,
2424 " [vrf <NAME|all>] route"
2426 " [<level-1|level-2>]"
2428 " [<prefix-sid|backup>]",
2429 SHOW_STR PROTO_HELP VRF_FULL_CMD_HELP_STR
2430 "IS-IS routing table\n"
2435 "Show Prefix-SID information\n"
2436 "Show backup routes\n")
2440 struct listnode
*node
;
2441 const char *vrf_name
= VRF_DEFAULT_NAME
;
2442 bool all_vrf
= false;
2443 bool prefix_sid
= false;
2444 bool backup
= false;
2447 if (argv_find(argv
, argc
, "level-1", &idx
))
2448 levels
= ISIS_LEVEL1
;
2449 else if (argv_find(argv
, argc
, "level-2", &idx
))
2450 levels
= ISIS_LEVEL2
;
2452 levels
= ISIS_LEVEL1
| ISIS_LEVEL2
;
2455 vty_out(vty
, "IS-IS Routing Process not enabled\n");
2458 ISIS_FIND_VRF_ARGS(argv
, argc
, idx
, vrf_name
, all_vrf
);
2460 if (argv_find(argv
, argc
, "prefix-sid", &idx
))
2462 if (argv_find(argv
, argc
, "backup", &idx
))
2467 for (ALL_LIST_ELEMENTS_RO(im
->isis
, node
, isis
))
2468 show_isis_route_common(vty
, levels
, isis
,
2469 prefix_sid
, backup
);
2472 isis
= isis_lookup_by_vrfname(vrf_name
);
2474 show_isis_route_common(vty
, levels
, isis
, prefix_sid
,
2481 static void isis_print_frr_summary_line(struct ttable
*tt
,
2482 const char *protection
,
2483 uint32_t counters
[SPF_PREFIX_PRIO_MAX
])
2485 uint32_t critical
, high
, medium
, low
, total
;
2487 critical
= counters
[SPF_PREFIX_PRIO_CRITICAL
];
2488 high
= counters
[SPF_PREFIX_PRIO_HIGH
];
2489 medium
= counters
[SPF_PREFIX_PRIO_MEDIUM
];
2490 low
= counters
[SPF_PREFIX_PRIO_LOW
];
2491 total
= critical
+ high
+ medium
+ low
;
2493 ttable_add_row(tt
, "%s|%u|%u|%u|%u|%u", protection
, critical
, high
,
2494 medium
, low
, total
);
2498 isis_print_frr_summary_line_coverage(struct ttable
*tt
, const char *protection
,
2499 double counters
[SPF_PREFIX_PRIO_MAX
],
2502 double critical
, high
, medium
, low
;
2504 critical
= counters
[SPF_PREFIX_PRIO_CRITICAL
] * 100;
2505 high
= counters
[SPF_PREFIX_PRIO_HIGH
] * 100;
2506 medium
= counters
[SPF_PREFIX_PRIO_MEDIUM
] * 100;
2507 low
= counters
[SPF_PREFIX_PRIO_LOW
] * 100;
2510 ttable_add_row(tt
, "%s|%.2f%%|%.2f%%|%.2f%%|%.2f%%|%.2f%%", protection
,
2511 critical
, high
, medium
, low
, total
);
2514 static void isis_print_frr_summary(struct vty
*vty
,
2515 struct isis_spftree
*spftree
)
2519 const char *tree_id_text
= NULL
;
2520 uint32_t protectd
[SPF_PREFIX_PRIO_MAX
] = {0};
2521 uint32_t unprotected
[SPF_PREFIX_PRIO_MAX
] = {0};
2522 double coverage
[SPF_PREFIX_PRIO_MAX
] = {0};
2523 uint32_t protected_total
= 0, grand_total
= 0;
2524 double coverage_total
;
2529 switch (spftree
->tree_id
) {
2531 tree_id_text
= "IPv4";
2534 tree_id_text
= "IPv6";
2536 case SPFTREE_DSTSRC
:
2537 tree_id_text
= "IPv6 (dst-src routing)";
2540 assert(!"isis_print_frr_summary shouldn't be called with SPFTREE_COUNT as type");
2544 vty_out(vty
, " IS-IS %s %s Fast ReRoute summary:\n\n",
2545 circuit_t2string(spftree
->level
), tree_id_text
);
2547 /* Prepare table. */
2548 tt
= ttable_new(&ttable_styles
[TTSTYLE_BLANK
]);
2551 "Protection \\ Priority|Critical|High |Medium |Low |Total");
2552 tt
->style
.cell
.rpad
= 2;
2553 tt
->style
.corner
= '+';
2555 ttable_rowseps(tt
, 0, BOTTOM
, true, '-');
2557 /* Compute unprotected and coverage totals. */
2558 for (int priority
= SPF_PREFIX_PRIO_CRITICAL
;
2559 priority
< SPF_PREFIX_PRIO_MAX
; priority
++) {
2560 uint32_t *lfa
= spftree
->lfa
.protection_counters
.lfa
;
2561 uint32_t *rlfa
= spftree
->lfa
.protection_counters
.rlfa
;
2562 uint32_t *tilfa
= spftree
->lfa
.protection_counters
.tilfa
;
2563 uint32_t *ecmp
= spftree
->lfa
.protection_counters
.ecmp
;
2564 uint32_t *total
= spftree
->lfa
.protection_counters
.total
;
2566 protectd
[priority
] = lfa
[priority
] + rlfa
[priority
]
2567 + tilfa
[priority
] + ecmp
[priority
];
2568 /* Safeguard to protect against possible inconsistencies. */
2569 if (protectd
[priority
] > total
[priority
])
2570 protectd
[priority
] = total
[priority
];
2571 unprotected
[priority
] = total
[priority
] - protectd
[priority
];
2572 protected_total
+= protectd
[priority
];
2573 grand_total
+= total
[priority
];
2575 if (!total
[priority
])
2576 coverage
[priority
] = 0;
2578 coverage
[priority
] =
2579 protectd
[priority
] / (double)total
[priority
];
2585 coverage_total
= protected_total
/ (double)grand_total
;
2588 isis_print_frr_summary_line(tt
, "Classic LFA",
2589 spftree
->lfa
.protection_counters
.lfa
);
2590 isis_print_frr_summary_line(tt
, "Remote LFA",
2591 spftree
->lfa
.protection_counters
.rlfa
);
2592 isis_print_frr_summary_line(tt
, "Topology Independent LFA",
2593 spftree
->lfa
.protection_counters
.tilfa
);
2594 isis_print_frr_summary_line(tt
, "ECMP",
2595 spftree
->lfa
.protection_counters
.ecmp
);
2596 isis_print_frr_summary_line(tt
, "Unprotected", unprotected
);
2597 isis_print_frr_summary_line_coverage(tt
, "Protection coverage",
2598 coverage
, coverage_total
);
2600 /* Dump the generated table. */
2601 table
= ttable_dump(tt
, "\n");
2602 vty_out(vty
, "%s\n", table
);
2603 XFREE(MTYPE_TMP
, table
);
2607 static void show_isis_frr_summary_common(struct vty
*vty
, int levels
,
2610 struct listnode
*node
;
2611 struct isis_area
*area
;
2613 if (!isis
->area_list
|| isis
->area_list
->count
== 0)
2616 for (ALL_LIST_ELEMENTS_RO(isis
->area_list
, node
, area
)) {
2617 vty_out(vty
, "Area %s:\n",
2618 area
->area_tag
? area
->area_tag
: "null");
2620 for (int level
= ISIS_LEVEL1
; level
<= ISIS_LEVELS
; level
++) {
2621 if ((level
& levels
) == 0)
2624 if (area
->ip_circuits
> 0) {
2625 isis_print_frr_summary(
2627 area
->spftree
[SPFTREE_IPV4
][level
- 1]);
2629 if (area
->ipv6_circuits
> 0) {
2630 isis_print_frr_summary(
2632 area
->spftree
[SPFTREE_IPV6
][level
- 1]);
2634 if (isis_area_ipv6_dstsrc_enabled(area
)) {
2635 isis_print_frr_summary(
2636 vty
, area
->spftree
[SPFTREE_DSTSRC
]
2643 DEFUN(show_isis_frr_summary
, show_isis_frr_summary_cmd
,
2645 " [vrf <NAME|all>] fast-reroute summary"
2647 " [<level-1|level-2>]"
2650 SHOW_STR PROTO_HELP VRF_FULL_CMD_HELP_STR
2651 "IS-IS FRR information\n"
2661 struct listnode
*node
;
2662 const char *vrf_name
= VRF_DEFAULT_NAME
;
2663 bool all_vrf
= false;
2666 if (argv_find(argv
, argc
, "level-1", &idx
))
2667 levels
= ISIS_LEVEL1
;
2668 else if (argv_find(argv
, argc
, "level-2", &idx
))
2669 levels
= ISIS_LEVEL2
;
2671 levels
= ISIS_LEVEL1
| ISIS_LEVEL2
;
2674 vty_out(vty
, "IS-IS Routing Process not enabled\n");
2677 ISIS_FIND_VRF_ARGS(argv
, argc
, idx
, vrf_name
, all_vrf
);
2681 for (ALL_LIST_ELEMENTS_RO(im
->isis
, node
, isis
))
2682 show_isis_frr_summary_common(vty
, levels
, isis
);
2685 isis
= isis_lookup_by_vrfname(vrf_name
);
2687 show_isis_frr_summary_common(vty
, levels
, isis
);
2693 void isis_spf_init(void)
2695 install_element(VIEW_NODE
, &show_isis_topology_cmd
);
2696 install_element(VIEW_NODE
, &show_isis_route_cmd
);
2697 install_element(VIEW_NODE
, &show_isis_frr_summary_cmd
);
2699 /* Register hook(s). */
2700 hook_register(isis_adj_state_change_hook
, spf_adj_state_change
);
2703 void isis_spf_print(struct isis_spftree
*spftree
, struct vty
*vty
)
2705 vty_out(vty
, " last run elapsed : ");
2706 vty_out_timestr(vty
, spftree
->last_run_timestamp
);
2709 vty_out(vty
, " last run duration : %u usec\n",
2710 (uint32_t)spftree
->last_run_duration
);
2712 vty_out(vty
, " run count : %u\n", spftree
->runcount
);
2714 void isis_spf_print_json(struct isis_spftree
*spftree
, struct json_object
*json
)
2716 char uptime
[MONOTIME_STRLEN
];
2719 cur
-= spftree
->last_run_timestamp
;
2720 frrtime_to_interval(cur
, uptime
, sizeof(uptime
));
2721 json_object_string_add(json
, "last-run-elapsed", uptime
);
2722 json_object_int_add(json
, "last-run-duration-usec",
2723 spftree
->last_run_duration
);
2724 json_object_int_add(json
, "last-run-count", spftree
->runcount
);