2 * IS-IS Rout(e)ing protocol - Multi Topology Support
4 * Copyright (C) 2017 Christian Franke
6 * This file is part of FreeRangeRouting (FRR)
8 * FRR is free software; you can redistribute it and/or modify it
9 * under the terms of the GNU General Public License as published by the
10 * Free Software Foundation; either version 2, or (at your option) any
13 * FRR is distributed in the hope that it will be useful, but
14 * WITHOUT ANY WARRANTY; without even the implied warranty of
15 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
16 * General Public License for more details.
18 * You should have received a copy of the GNU General Public License along
19 * with this program; see the file COPYING; if not, write to the Free Software
20 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
23 #include "isisd/isisd.h"
24 #include "isisd/isis_memory.h"
25 #include "isisd/isis_circuit.h"
26 #include "isisd/isis_adjacency.h"
27 #include "isisd/isis_misc.h"
28 #include "isisd/isis_lsp.h"
29 #include "isisd/isis_mt.h"
30 #include "isisd/isis_tlvs.h"
32 DEFINE_MTYPE_STATIC(ISISD
, MT_AREA_SETTING
, "ISIS MT Area Setting")
33 DEFINE_MTYPE_STATIC(ISISD
, MT_CIRCUIT_SETTING
, "ISIS MT Circuit Setting")
34 DEFINE_MTYPE_STATIC(ISISD
, MT_ADJ_INFO
, "ISIS MT Adjacency Info")
36 bool isis_area_ipv6_dstsrc_enabled(struct isis_area
*area
)
38 struct isis_area_mt_setting
*area_mt_setting
;
39 area_mt_setting
= area_lookup_mt_setting(area
, ISIS_MT_IPV6_DSTSRC
);
41 return (area_mt_setting
&& area_mt_setting
->enabled
);
44 uint16_t isis_area_ipv6_topology(struct isis_area
*area
)
46 struct isis_area_mt_setting
*area_mt_setting
;
47 area_mt_setting
= area_lookup_mt_setting(area
, ISIS_MT_IPV6_UNICAST
);
49 if (area_mt_setting
&& area_mt_setting
->enabled
)
50 return ISIS_MT_IPV6_UNICAST
;
51 return ISIS_MT_IPV4_UNICAST
;
55 const char *isis_mtid2str(uint16_t mtid
)
57 static char buf
[sizeof("65535")];
60 case ISIS_MT_IPV4_UNICAST
:
61 return "ipv4-unicast";
62 case ISIS_MT_IPV4_MGMT
:
64 case ISIS_MT_IPV6_UNICAST
:
65 return "ipv6-unicast";
66 case ISIS_MT_IPV4_MULTICAST
:
67 return "ipv4-multicast";
68 case ISIS_MT_IPV6_MULTICAST
:
69 return "ipv6-multicast";
70 case ISIS_MT_IPV6_MGMT
:
72 case ISIS_MT_IPV6_DSTSRC
:
75 snprintf(buf
, sizeof(buf
), "%" PRIu16
, mtid
);
80 uint16_t isis_str2mtid(const char *name
)
82 if (!strcmp(name
, "ipv4-unicast"))
83 return ISIS_MT_IPV4_UNICAST
;
84 if (!strcmp(name
, "ipv4-mgmt"))
85 return ISIS_MT_IPV4_MGMT
;
86 if (!strcmp(name
, "ipv6-unicast"))
87 return ISIS_MT_IPV6_UNICAST
;
88 if (!strcmp(name
, "ipv4-multicast"))
89 return ISIS_MT_IPV4_MULTICAST
;
90 if (!strcmp(name
, "ipv6-multicast"))
91 return ISIS_MT_IPV6_MULTICAST
;
92 if (!strcmp(name
, "ipv6-mgmt"))
93 return ISIS_MT_IPV6_MGMT
;
94 if (!strcmp(name
, "ipv6-dstsrc"))
95 return ISIS_MT_IPV6_DSTSRC
;
99 /* General MT settings api */
105 static void *lookup_mt_setting(struct list
*mt_list
, uint16_t mtid
)
107 struct listnode
*node
;
108 struct mt_setting
*setting
;
110 for (ALL_LIST_ELEMENTS_RO(mt_list
, node
, setting
)) {
111 if (setting
->mtid
== mtid
)
117 static void add_mt_setting(struct list
**mt_list
, void *setting
)
120 *mt_list
= list_new();
121 listnode_add(*mt_list
, setting
);
124 /* Area specific MT settings api */
126 struct isis_area_mt_setting
*area_lookup_mt_setting(struct isis_area
*area
,
129 return lookup_mt_setting(area
->mt_settings
, mtid
);
132 struct isis_area_mt_setting
*area_new_mt_setting(struct isis_area
*area
,
135 struct isis_area_mt_setting
*setting
;
137 setting
= XCALLOC(MTYPE_MT_AREA_SETTING
, sizeof(*setting
));
138 setting
->mtid
= mtid
;
142 static void area_free_mt_setting(void *setting
)
144 XFREE(MTYPE_MT_AREA_SETTING
, setting
);
147 void area_add_mt_setting(struct isis_area
*area
,
148 struct isis_area_mt_setting
*setting
)
150 add_mt_setting(&area
->mt_settings
, setting
);
153 void area_mt_init(struct isis_area
*area
)
155 struct isis_area_mt_setting
*v4_unicast_setting
;
157 /* MTID 0 is always enabled */
158 v4_unicast_setting
= area_new_mt_setting(area
, ISIS_MT_IPV4_UNICAST
);
159 v4_unicast_setting
->enabled
= true;
160 add_mt_setting(&area
->mt_settings
, v4_unicast_setting
);
161 area
->mt_settings
->del
= area_free_mt_setting
;
164 void area_mt_finish(struct isis_area
*area
)
166 list_delete(&area
->mt_settings
);
169 struct isis_area_mt_setting
*area_get_mt_setting(struct isis_area
*area
,
172 struct isis_area_mt_setting
*setting
;
174 setting
= area_lookup_mt_setting(area
, mtid
);
176 setting
= area_new_mt_setting(area
, mtid
);
177 area_add_mt_setting(area
, setting
);
182 int area_write_mt_settings(struct isis_area
*area
, struct vty
*vty
)
185 struct listnode
*node
;
186 struct isis_area_mt_setting
*setting
;
188 for (ALL_LIST_ELEMENTS_RO(area
->mt_settings
, node
, setting
)) {
189 const char *name
= isis_mtid2str(setting
->mtid
);
190 if (name
&& setting
->enabled
) {
191 if (setting
->mtid
== ISIS_MT_IPV4_UNICAST
)
192 continue; /* always enabled, no need to write
194 vty_out(vty
, " topology %s%s\n", name
,
195 setting
->overload
? " overload" : "");
202 bool area_is_mt(struct isis_area
*area
)
204 struct listnode
*node
, *node2
;
205 struct isis_area_mt_setting
*setting
;
206 struct isis_circuit
*circuit
;
207 struct isis_circuit_mt_setting
*csetting
;
209 for (ALL_LIST_ELEMENTS_RO(area
->mt_settings
, node
, setting
)) {
210 if (setting
->enabled
&& setting
->mtid
!= ISIS_MT_IPV4_UNICAST
)
213 for (ALL_LIST_ELEMENTS_RO(area
->circuit_list
, node
, circuit
)) {
214 for (ALL_LIST_ELEMENTS_RO(circuit
->mt_settings
, node2
,
216 if (!csetting
->enabled
217 && csetting
->mtid
== ISIS_MT_IPV4_UNICAST
)
225 struct isis_area_mt_setting
**area_mt_settings(struct isis_area
*area
,
226 unsigned int *mt_count
)
228 static unsigned int size
= 0;
229 static struct isis_area_mt_setting
**rv
= NULL
;
231 unsigned int count
= 0;
232 struct listnode
*node
;
233 struct isis_area_mt_setting
*setting
;
235 for (ALL_LIST_ELEMENTS_RO(area
->mt_settings
, node
, setting
)) {
236 if (!setting
->enabled
)
241 rv
= XREALLOC(MTYPE_TMP
, rv
, count
* sizeof(*rv
));
244 rv
[count
- 1] = setting
;
251 /* Circuit specific MT settings api */
253 struct isis_circuit_mt_setting
*
254 circuit_lookup_mt_setting(struct isis_circuit
*circuit
, uint16_t mtid
)
256 return lookup_mt_setting(circuit
->mt_settings
, mtid
);
259 struct isis_circuit_mt_setting
*
260 circuit_new_mt_setting(struct isis_circuit
*circuit
, uint16_t mtid
)
262 struct isis_circuit_mt_setting
*setting
;
264 setting
= XCALLOC(MTYPE_MT_CIRCUIT_SETTING
, sizeof(*setting
));
265 setting
->mtid
= mtid
;
266 setting
->enabled
= true; /* Enabled is default for circuit */
270 static void circuit_free_mt_setting(void *setting
)
272 XFREE(MTYPE_MT_CIRCUIT_SETTING
, setting
);
275 void circuit_add_mt_setting(struct isis_circuit
*circuit
,
276 struct isis_circuit_mt_setting
*setting
)
278 add_mt_setting(&circuit
->mt_settings
, setting
);
281 void circuit_mt_init(struct isis_circuit
*circuit
)
283 circuit
->mt_settings
= list_new();
284 circuit
->mt_settings
->del
= circuit_free_mt_setting
;
287 void circuit_mt_finish(struct isis_circuit
*circuit
)
289 list_delete(&circuit
->mt_settings
);
292 struct isis_circuit_mt_setting
*
293 circuit_get_mt_setting(struct isis_circuit
*circuit
, uint16_t mtid
)
295 struct isis_circuit_mt_setting
*setting
;
297 setting
= circuit_lookup_mt_setting(circuit
, mtid
);
299 setting
= circuit_new_mt_setting(circuit
, mtid
);
300 circuit_add_mt_setting(circuit
, setting
);
305 static int circuit_write_mt_settings(struct isis_circuit
*circuit
,
309 struct listnode
*node
;
310 struct isis_circuit_mt_setting
*setting
;
312 for (ALL_LIST_ELEMENTS_RO(circuit
->mt_settings
, node
, setting
)) {
313 const char *name
= isis_mtid2str(setting
->mtid
);
314 if (name
&& !setting
->enabled
) {
315 vty_out(vty
, " no " PROTO_NAME
" topology %s\n", name
);
322 struct isis_circuit_mt_setting
**
323 circuit_mt_settings(struct isis_circuit
*circuit
, unsigned int *mt_count
)
325 static unsigned int size
= 0;
326 static struct isis_circuit_mt_setting
**rv
= NULL
;
328 struct isis_area_mt_setting
**area_settings
;
329 unsigned int area_count
;
331 unsigned int count
= 0;
333 struct listnode
*node
;
334 struct isis_circuit_mt_setting
*setting
;
336 area_settings
= area_mt_settings(circuit
->area
, &area_count
);
338 for (unsigned int i
= 0; i
< area_count
; i
++) {
339 for (ALL_LIST_ELEMENTS_RO(circuit
->mt_settings
, node
,
341 if (setting
->mtid
!= area_settings
[i
]->mtid
)
346 setting
= circuit_get_mt_setting(
347 circuit
, area_settings
[i
]->mtid
);
349 if (!setting
->enabled
)
354 rv
= XREALLOC(MTYPE_TMP
, rv
, count
* sizeof(*rv
));
357 rv
[count
- 1] = setting
;
364 /* ADJ specific MT API */
365 static void adj_mt_set(struct isis_adjacency
*adj
, unsigned int index
,
368 if (adj
->mt_count
< index
+ 1) {
369 adj
->mt_set
= XREALLOC(MTYPE_MT_ADJ_INFO
, adj
->mt_set
,
370 (index
+ 1) * sizeof(*adj
->mt_set
));
371 adj
->mt_count
= index
+ 1;
373 adj
->mt_set
[index
] = mtid
;
376 bool tlvs_to_adj_mt_set(struct isis_tlvs
*tlvs
, bool v4_usable
, bool v6_usable
,
377 struct isis_adjacency
*adj
)
379 struct isis_circuit_mt_setting
**mt_settings
;
380 unsigned int circuit_mt_count
;
382 unsigned int intersect_count
= 0;
384 uint16_t *old_mt_set
= NULL
;
385 unsigned int old_mt_count
;
387 old_mt_count
= adj
->mt_count
;
390 XCALLOC(MTYPE_TMP
, old_mt_count
* sizeof(*old_mt_set
));
391 memcpy(old_mt_set
, adj
->mt_set
,
392 old_mt_count
* sizeof(*old_mt_set
));
395 mt_settings
= circuit_mt_settings(adj
->circuit
, &circuit_mt_count
);
396 for (unsigned int i
= 0; i
< circuit_mt_count
; i
++) {
397 if (!tlvs
->mt_router_info
.count
398 && !tlvs
->mt_router_info_empty
) {
399 /* Other end does not have MT enabled */
400 if (mt_settings
[i
]->mtid
== ISIS_MT_IPV4_UNICAST
401 && (v4_usable
|| v6_usable
))
402 adj_mt_set(adj
, intersect_count
++,
403 ISIS_MT_IPV4_UNICAST
);
405 struct isis_mt_router_info
*info_head
;
407 info_head
= (struct isis_mt_router_info
*)
408 tlvs
->mt_router_info
.head
;
409 for (struct isis_mt_router_info
*info
= info_head
; info
;
411 if (mt_settings
[i
]->mtid
== info
->mtid
) {
413 switch (info
->mtid
) {
414 case ISIS_MT_IPV4_UNICAST
:
415 case ISIS_MT_IPV4_MGMT
:
416 case ISIS_MT_IPV4_MULTICAST
:
419 case ISIS_MT_IPV6_UNICAST
:
420 case ISIS_MT_IPV6_MGMT
:
421 case ISIS_MT_IPV6_MULTICAST
:
436 adj
->mt_count
= intersect_count
;
438 bool changed
= false;
440 if (adj
->mt_count
!= old_mt_count
)
443 if (!changed
&& old_mt_count
444 && memcmp(adj
->mt_set
, old_mt_set
,
445 old_mt_count
* sizeof(*old_mt_set
)))
449 XFREE(MTYPE_TMP
, old_mt_set
);
454 bool adj_has_mt(struct isis_adjacency
*adj
, uint16_t mtid
)
456 for (unsigned int i
= 0; i
< adj
->mt_count
; i
++)
457 if (adj
->mt_set
[i
] == mtid
)
462 void adj_mt_finish(struct isis_adjacency
*adj
)
464 XFREE(MTYPE_MT_ADJ_INFO
, adj
->mt_set
);
468 static void mt_set_add(uint16_t **mt_set
, unsigned int *size
,
469 unsigned int *index
, uint16_t mtid
)
471 for (unsigned int i
= 0; i
< *index
; i
++) {
472 if ((*mt_set
)[i
] == mtid
)
476 if (*index
>= *size
) {
477 *mt_set
= XREALLOC(MTYPE_TMP
, *mt_set
,
478 sizeof(**mt_set
) * ((*index
) + 1));
479 *size
= (*index
) + 1;
482 (*mt_set
)[*index
] = mtid
;
483 *index
= (*index
) + 1;
486 static uint16_t *circuit_bcast_mt_set(struct isis_circuit
*circuit
, int level
,
487 unsigned int *mt_count
)
490 static unsigned int size
;
491 struct listnode
*node
;
492 struct isis_adjacency
*adj
;
494 unsigned int count
= 0;
496 if (circuit
->circ_type
!= CIRCUIT_T_BROADCAST
) {
501 for (ALL_LIST_ELEMENTS_RO(circuit
->u
.bc
.adjdb
[level
- 1], node
, adj
)) {
502 if (adj
->adj_state
!= ISIS_ADJ_UP
)
504 for (unsigned int i
= 0; i
< adj
->mt_count
; i
++)
505 mt_set_add(&rv
, &size
, &count
, adj
->mt_set
[i
]);
512 static void tlvs_add_mt_set(struct isis_area
*area
, struct isis_tlvs
*tlvs
,
513 unsigned int mt_count
, uint16_t *mt_set
,
514 uint8_t *id
, uint32_t metric
,
515 struct isis_ext_subtlvs
*ext
)
517 for (unsigned int i
= 0; i
< mt_count
; i
++) {
518 uint16_t mtid
= mt_set
[i
];
519 if (mt_set
[i
] == ISIS_MT_IPV4_UNICAST
) {
521 "ISIS (%s): Adding %s.%02x as te-style neighbor",
522 area
->area_tag
, sysid_print(id
),
526 "ISIS (%s): Adding %s.%02x as mt-style neighbor for %s",
527 area
->area_tag
, sysid_print(id
),
528 LSP_PSEUDO_ID(id
), isis_mtid2str(mtid
));
530 isis_tlvs_add_extended_reach(tlvs
, mtid
, id
, metric
, ext
);
534 void tlvs_add_mt_bcast(struct isis_tlvs
*tlvs
, struct isis_circuit
*circuit
,
535 int level
, uint8_t *id
, uint32_t metric
)
537 unsigned int mt_count
;
538 uint16_t *mt_set
= circuit_bcast_mt_set(circuit
, level
, &mt_count
);
540 tlvs_add_mt_set(circuit
->area
, tlvs
, mt_count
, mt_set
, id
, metric
,
544 void tlvs_add_mt_p2p(struct isis_tlvs
*tlvs
, struct isis_circuit
*circuit
,
545 uint8_t *id
, uint32_t metric
)
547 struct isis_adjacency
*adj
= circuit
->u
.p2p
.neighbor
;
549 tlvs_add_mt_set(circuit
->area
, tlvs
, adj
->mt_count
, adj
->mt_set
, id
,
550 metric
, circuit
->ext
);
555 hook_register(isis_circuit_config_write
,
556 circuit_write_mt_settings
);