]> git.proxmox.com Git - mirror_frr.git/blob - isisd/isis_te.c
projects / mirror_frr.git / blob
? search:


c4a0b9230be17f4284c5a49641c5eb4378c4b0bb
[mirror_frr.git] / isisd / isis_te.c
1 /*
2 * IS-IS Rout(e)ing protocol - isis_te.c
3 *
4 * This is an implementation of RFC5305 & RFC 7810
5 *
6 * Copyright (C) 2014 Orange Labs
7 * http://www.orange.com
8 *
9 * This file is part of GNU Zebra.
10 *
11 * GNU Zebra is free software; you can redistribute it and/or modify it
12 * under the terms of the GNU General Public License as published by the
13 * Free Software Foundation; either version 2, or (at your option) any
14 * later version.
15 *
16 * GNU Zebra is distributed in the hope that it will be useful, but
17 * WITHOUT ANY WARRANTY; without even the implied warranty of
18 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
19 * General Public License for more details.
20 *
21 * You should have received a copy of the GNU General Public License along
22 * with this program; see the file COPYING; if not, write to the Free Software
23 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
24 */
25
26 #include <zebra.h>
27 #include <math.h>
28
29 #include "linklist.h"
30 #include "thread.h"
31 #include "vty.h"
32 #include "stream.h"
33 #include "memory.h"
34 #include "log.h"
35 #include "prefix.h"
36 #include "command.h"
37 #include "hash.h"
38 #include "if.h"
39 #include "vrf.h"
40 #include "checksum.h"
41 #include "md5.h"
42 #include "sockunion.h"
43 #include "network.h"
44
45 #include "isisd/dict.h"
46 #include "isisd/isis_constants.h"
47 #include "isisd/isis_common.h"
48 #include "isisd/isis_flags.h"
49 #include "isisd/isis_circuit.h"
50 #include "isisd/isisd.h"
51 #include "isisd/isis_tlv.h"
52 #include "isisd/isis_lsp.h"
53 #include "isisd/isis_pdu.h"
54 #include "isisd/isis_dynhn.h"
55 #include "isisd/isis_misc.h"
56 #include "isisd/isis_csm.h"
57 #include "isisd/isis_adjacency.h"
58 #include "isisd/isis_spf.h"
59 #include "isisd/isis_te.h"
60
61 /* Global varial for MPLS TE management */
62 struct isis_mpls_te isisMplsTE;
63
64 const char *mode2text[] = { "Disable", "Area", "AS", "Emulate" };
65
66 /*------------------------------------------------------------------------*
67 * Followings are control functions for MPLS-TE parameters management.
68 *------------------------------------------------------------------------*/
69
70 /* Search MPLS TE Circuit context from Interface */
71 static struct mpls_te_circuit *
72 lookup_mpls_params_by_ifp (struct interface *ifp)
73 {
74 struct isis_circuit *circuit;
75
76 if ((circuit = circuit_scan_by_ifp (ifp)) == NULL)
77 return NULL;
78
79 return circuit->mtc;
80 }
81
82 /* Create new MPLS TE Circuit context */
83 struct mpls_te_circuit *
84 mpls_te_circuit_new()
85 {
86 struct mpls_te_circuit *mtc;
87
88 zlog_debug ("ISIS MPLS-TE: Create new MPLS TE Circuit context");
89
90 mtc = XCALLOC(MTYPE_ISIS_MPLS_TE, sizeof (struct mpls_te_circuit));
91
92 if (mtc == NULL)
93 return NULL;
94
95 mtc->status = disable;
96 mtc->type = STD_TE;
97 mtc->length = 0;
98
99 return mtc;
100
101 }
102
103 /* Copy SUB TLVs parameters into a buffer - No space verification are performed */
104 /* Caller must verify before that there is enough free space in the buffer */
105 u_char
106 add_te_subtlvs(u_char *buf, struct mpls_te_circuit *mtc)
107 {
108 u_char size, *tlvs = buf;
109
110 zlog_debug ("ISIS MPLS-TE: Add TE Sub TLVs to buffer");
111
112 if (mtc == NULL)
113 {
114 zlog_debug("ISIS MPLS-TE: Abort! No MPLS TE Circuit available has been specified");
115 return 0;
116 }
117
118 /* Create buffer if not provided */
119 if (buf == NULL)
120 {
121 zlog_debug("ISIS MPLS-TE: Abort! No Buffer has been specified");
122 return 0;
123 }
124
125 /* TE_SUBTLV_ADMIN_GRP */
126 if (SUBTLV_TYPE(mtc->admin_grp) != 0)
127 {
128 size = SUBTLV_SIZE (&(mtc->admin_grp.header));
129 memcpy(tlvs, &(mtc->admin_grp), size);
130 tlvs += size;
131 }
132
133 /* TE_SUBTLV_LLRI */
134 if (SUBTLV_TYPE(mtc->llri) != 0)
135 {
136 size = SUBTLV_SIZE (&(mtc->llri.header));
137 memcpy(tlvs, &(mtc->llri), size);
138 tlvs += size;
139 }
140
141 /* TE_SUBTLV_LCLIF_IPADDR */
142 if (SUBTLV_TYPE(mtc->local_ipaddr) != 0)
143 {
144 size = SUBTLV_SIZE (&(mtc->local_ipaddr.header));
145 memcpy(tlvs, &(mtc->local_ipaddr), size);
146 tlvs += size;
147 }
148
149 /* TE_SUBTLV_RMTIF_IPADDR */
150 if (SUBTLV_TYPE(mtc->rmt_ipaddr) != 0)
151 {
152 size = SUBTLV_SIZE (&(mtc->rmt_ipaddr.header));
153 memcpy(tlvs, &(mtc->rmt_ipaddr), size);
154 tlvs += size;
155 }
156
157 /* TE_SUBTLV_MAX_BW */
158 if (SUBTLV_TYPE(mtc->max_bw) != 0)
159 {
160 size = SUBTLV_SIZE (&(mtc->max_bw.header));
161 memcpy(tlvs, &(mtc->max_bw), size);
162 tlvs += size;
163 }
164
165 /* TE_SUBTLV_MAX_RSV_BW */
166 if (SUBTLV_TYPE(mtc->max_rsv_bw) != 0)
167 {
168 size = SUBTLV_SIZE (&(mtc->max_rsv_bw.header));
169 memcpy(tlvs, &(mtc->max_rsv_bw), size);
170 tlvs += size;
171 }
172
173 /* TE_SUBTLV_UNRSV_BW */
174 if (SUBTLV_TYPE(mtc->unrsv_bw) != 0)
175 {
176 size = SUBTLV_SIZE (&(mtc->unrsv_bw.header));
177 memcpy(tlvs, &(mtc->unrsv_bw), size);
178 tlvs += size;
179 }
180
181 /* TE_SUBTLV_TE_METRIC */
182 if (SUBTLV_TYPE(mtc->te_metric) != 0)
183 {
184 size = SUBTLV_SIZE (&(mtc->te_metric.header));
185 memcpy(tlvs, &(mtc->te_metric), size);
186 tlvs += size;
187 }
188
189 /* TE_SUBTLV_AV_DELAY */
190 if (SUBTLV_TYPE(mtc->av_delay) != 0)
191 {
192 size = SUBTLV_SIZE (&(mtc->av_delay.header));
193 memcpy(tlvs, &(mtc->av_delay), size);
194 tlvs += size;
195 }
196
197 /* TE_SUBTLV_MM_DELAY */
198 if (SUBTLV_TYPE(mtc->mm_delay) != 0)
199 {
200 size = SUBTLV_SIZE (&(mtc->mm_delay.header));
201 memcpy(tlvs, &(mtc->mm_delay), size);
202 tlvs += size;
203 }
204
205 /* TE_SUBTLV_DELAY_VAR */
206 if (SUBTLV_TYPE(mtc->delay_var) != 0)
207 {
208 size = SUBTLV_SIZE (&(mtc->delay_var.header));
209 memcpy(tlvs, &(mtc->delay_var), size);
210 tlvs += size;
211 }
212
213 /* TE_SUBTLV_PKT_LOSS */
214 if (SUBTLV_TYPE(mtc->pkt_loss) != 0)
215 {
216 size = SUBTLV_SIZE (&(mtc->pkt_loss.header));
217 memcpy(tlvs, &(mtc->pkt_loss), size);
218 tlvs += size;
219 }
220
221 /* TE_SUBTLV_RES_BW */
222 if (SUBTLV_TYPE(mtc->res_bw) != 0)
223 {
224 size = SUBTLV_SIZE (&(mtc->res_bw.header));
225 memcpy(tlvs, &(mtc->res_bw), size);
226 tlvs += size;
227 }
228
229 /* TE_SUBTLV_AVA_BW */
230 if (SUBTLV_TYPE(mtc->ava_bw) != 0)
231 {
232 size = SUBTLV_SIZE (&(mtc->ava_bw.header));
233 memcpy(tlvs, &(mtc->ava_bw), size);
234 tlvs += size;
235 }
236
237 /* TE_SUBTLV_USE_BW */
238 if (SUBTLV_TYPE(mtc->use_bw) != 0)
239 {
240 size = SUBTLV_SIZE (&(mtc->use_bw.header));
241 memcpy(tlvs, &(mtc->use_bw), size);
242 tlvs += size;
243 }
244
245 /* Update SubTLVs length */
246 mtc->length = subtlvs_len(mtc);
247
248 zlog_debug("ISIS MPLS-TE: Add %d bytes length SubTLVs", mtc->length);
249
250 return mtc->length;
251 }
252
253 /* Compute total Sub-TLVs size */
254 u_char
255 subtlvs_len (struct mpls_te_circuit *mtc)
256 {
257 int length = 0;
258
259 /* Sanity Check */
260 if (mtc == NULL)
261 return 0;
262
263 /* TE_SUBTLV_ADMIN_GRP */
264 if (SUBTLV_TYPE(mtc->admin_grp) != 0)
265 length += SUBTLV_SIZE (&(mtc->admin_grp.header));
266
267 /* TE_SUBTLV_LLRI */
268 if (SUBTLV_TYPE(mtc->llri) != 0)
269 length += SUBTLV_SIZE (&mtc->llri.header);
270
271 /* TE_SUBTLV_LCLIF_IPADDR */
272 if (SUBTLV_TYPE(mtc->local_ipaddr) != 0)
273 length += SUBTLV_SIZE (&mtc->local_ipaddr.header);
274
275 /* TE_SUBTLV_RMTIF_IPADDR */
276 if (SUBTLV_TYPE(mtc->rmt_ipaddr) != 0)
277 length += SUBTLV_SIZE (&mtc->rmt_ipaddr.header);
278
279 /* TE_SUBTLV_MAX_BW */
280 if (SUBTLV_TYPE(mtc->max_bw) != 0)
281 length += SUBTLV_SIZE (&mtc->max_bw.header);
282
283 /* TE_SUBTLV_MAX_RSV_BW */
284 if (SUBTLV_TYPE(mtc->max_rsv_bw) != 0)
285 length += SUBTLV_SIZE (&mtc->max_rsv_bw.header);
286
287 /* TE_SUBTLV_UNRSV_BW */
288 if (SUBTLV_TYPE(mtc->unrsv_bw) != 0)
289 length += SUBTLV_SIZE (&mtc->unrsv_bw.header);
290
291 /* TE_SUBTLV_TE_METRIC */
292 if (SUBTLV_TYPE(mtc->te_metric) != 0)
293 length += SUBTLV_SIZE (&mtc->te_metric.header);
294
295 /* TE_SUBTLV_AV_DELAY */
296 if (SUBTLV_TYPE(mtc->av_delay) != 0)
297 length += SUBTLV_SIZE (&mtc->av_delay.header);
298
299 /* TE_SUBTLV_MM_DELAY */
300 if (SUBTLV_TYPE(mtc->mm_delay) != 0)
301 length += SUBTLV_SIZE (&mtc->mm_delay.header);
302
303 /* TE_SUBTLV_DELAY_VAR */
304 if (SUBTLV_TYPE(mtc->delay_var) != 0)
305 length += SUBTLV_SIZE (&mtc->delay_var.header);
306
307 /* TE_SUBTLV_PKT_LOSS */
308 if (SUBTLV_TYPE(mtc->pkt_loss) != 0)
309 length += SUBTLV_SIZE (&mtc->pkt_loss.header);
310
311 /* TE_SUBTLV_RES_BW */
312 if (SUBTLV_TYPE(mtc->res_bw) != 0)
313 length += SUBTLV_SIZE (&mtc->res_bw.header);
314
315 /* TE_SUBTLV_AVA_BW */
316 if (SUBTLV_TYPE(mtc->ava_bw) != 0)
317 length += SUBTLV_SIZE (&mtc->ava_bw.header);
318
319 /* TE_SUBTLV_USE_BW */
320 if (SUBTLV_TYPE(mtc->use_bw) != 0)
321 length += SUBTLV_SIZE (&mtc->use_bw.header);
322
323 /* Check that length is lower than the MAXIMUM SUBTLV size i.e. 256 */
324 if (length > MAX_SUBTLV_SIZE)
325 {
326 mtc->length = 0;
327 return 0;
328 }
329
330 mtc->length = (u_char)length;
331
332 return mtc->length;
333 }
334
335 /* Following are various functions to set MPLS TE parameters */
336 static void
337 set_circuitparams_admin_grp (struct mpls_te_circuit *mtc, u_int32_t admingrp)
338 {
339 SUBTLV_TYPE(mtc->admin_grp) = TE_SUBTLV_ADMIN_GRP;
340 SUBTLV_LEN(mtc->admin_grp) = SUBTLV_DEF_SIZE;
341 mtc->admin_grp.value = htonl(admingrp);
342 return;
343 }
344
345 static void __attribute__ ((unused))
346 set_circuitparams_llri (struct mpls_te_circuit *mtc, u_int32_t local, u_int32_t remote)
347 {
348 SUBTLV_TYPE(mtc->llri) = TE_SUBTLV_LLRI;
349 SUBTLV_LEN(mtc->llri) = TE_SUBTLV_LLRI_SIZE;
350 mtc->llri.local = htonl(local);
351 mtc->llri.remote = htonl(remote);
352 }
353
354 void
355 set_circuitparams_local_ipaddr (struct mpls_te_circuit *mtc, struct in_addr addr)
356 {
357
358 SUBTLV_TYPE(mtc->local_ipaddr) = TE_SUBTLV_LOCAL_IPADDR;
359 SUBTLV_LEN(mtc->local_ipaddr) = SUBTLV_DEF_SIZE;
360 mtc->local_ipaddr.value.s_addr = addr.s_addr;
361 return;
362 }
363
364 void
365 set_circuitparams_rmt_ipaddr (struct mpls_te_circuit *mtc, struct in_addr addr)
366 {
367
368 SUBTLV_TYPE(mtc->rmt_ipaddr) = TE_SUBTLV_RMT_IPADDR;
369 SUBTLV_LEN(mtc->rmt_ipaddr) = SUBTLV_DEF_SIZE;
370 mtc->rmt_ipaddr.value.s_addr = addr.s_addr;
371 return;
372 }
373
374 static void
375 set_circuitparams_max_bw (struct mpls_te_circuit *mtc, float fp)
376 {
377 SUBTLV_TYPE(mtc->max_bw) = TE_SUBTLV_MAX_BW;
378 SUBTLV_LEN(mtc->max_bw) = SUBTLV_DEF_SIZE;
379 mtc->max_bw.value = htonf(fp);
380 return;
381 }
382
383 static void
384 set_circuitparams_max_rsv_bw (struct mpls_te_circuit *mtc, float fp)
385 {
386 SUBTLV_TYPE(mtc->max_rsv_bw) = TE_SUBTLV_MAX_RSV_BW;
387 SUBTLV_LEN(mtc->max_rsv_bw) = SUBTLV_DEF_SIZE;
388 mtc->max_rsv_bw.value = htonf(fp);
389 return;
390 }
391
392 static void
393 set_circuitparams_unrsv_bw (struct mpls_te_circuit *mtc, int priority, float fp)
394 {
395 /* Note that TLV-length field is the size of array. */
396 SUBTLV_TYPE(mtc->unrsv_bw) = TE_SUBTLV_UNRSV_BW;
397 SUBTLV_LEN(mtc->unrsv_bw) = TE_SUBTLV_UNRSV_SIZE;
398 mtc->unrsv_bw.value[priority] = htonf(fp);
399 return;
400 }
401
402 static void
403 set_circuitparams_te_metric (struct mpls_te_circuit *mtc, u_int32_t te_metric)
404 {
405 SUBTLV_TYPE(mtc->te_metric) = TE_SUBTLV_TE_METRIC;
406 SUBTLV_LEN(mtc->te_metric) = TE_SUBTLV_TE_METRIC_SIZE;
407 mtc->te_metric.value[0] = (te_metric >> 16) & 0xFF;
408 mtc->te_metric.value[1] = (te_metric >> 8) & 0xFF;
409 mtc->te_metric.value[2] = te_metric & 0xFF;
410 return;
411 }
412
413 static void
414 set_circuitparams_inter_as (struct mpls_te_circuit *mtc, struct in_addr addr, u_int32_t as)
415 {
416
417 /* Set the Remote ASBR IP address and then the associated AS number */
418 SUBTLV_TYPE(mtc->rip) = TE_SUBTLV_RIP;
419 SUBTLV_LEN(mtc->rip) = SUBTLV_DEF_SIZE;
420 mtc->rip.value.s_addr = addr.s_addr;
421
422 SUBTLV_TYPE(mtc->ras) = TE_SUBTLV_RAS;
423 SUBTLV_LEN(mtc->ras) = SUBTLV_DEF_SIZE;
424 mtc->ras.value = htonl(as);
425 }
426
427 static void
428 unset_circuitparams_inter_as (struct mpls_te_circuit *mtc)
429 {
430
431 /* Reset the Remote ASBR IP address and then the associated AS number */
432 SUBTLV_TYPE(mtc->rip) = 0;
433 SUBTLV_LEN(mtc->rip) = 0;
434 mtc->rip.value.s_addr = 0;
435
436 SUBTLV_TYPE(mtc->ras) = 0;
437 SUBTLV_LEN(mtc->ras) = 0;
438 mtc->ras.value = 0;
439 }
440
441 static void
442 set_circuitparams_av_delay (struct mpls_te_circuit *mtc, u_int32_t delay, u_char anormal)
443 {
444 u_int32_t tmp;
445 /* Note that TLV-length field is the size of array. */
446 SUBTLV_TYPE(mtc->av_delay) = TE_SUBTLV_AV_DELAY;
447 SUBTLV_LEN(mtc->av_delay) = SUBTLV_DEF_SIZE;
448 tmp = delay & TE_EXT_MASK;
449 if (anormal)
450 tmp |= TE_EXT_ANORMAL;
451 mtc->av_delay.value = htonl(tmp);
452 return;
453 }
454
455 static void
456 set_circuitparams_mm_delay (struct mpls_te_circuit *mtc, u_int32_t low, u_int32_t high, u_char anormal)
457 {
458 u_int32_t tmp;
459 /* Note that TLV-length field is the size of array. */
460 SUBTLV_TYPE(mtc->mm_delay) = TE_SUBTLV_MM_DELAY;
461 SUBTLV_LEN(mtc->mm_delay) = TE_SUBTLV_MM_DELAY_SIZE;
462 tmp = low & TE_EXT_MASK;
463 if (anormal)
464 tmp |= TE_EXT_ANORMAL;
465 mtc->mm_delay.low = htonl(tmp);
466 mtc->mm_delay.high = htonl(high);
467 return;
468 }
469
470 static void
471 set_circuitparams_delay_var (struct mpls_te_circuit *mtc, u_int32_t jitter)
472 {
473 /* Note that TLV-length field is the size of array. */
474 SUBTLV_TYPE(mtc->delay_var) = TE_SUBTLV_DELAY_VAR;
475 SUBTLV_LEN(mtc->delay_var) = SUBTLV_DEF_SIZE;
476 mtc->delay_var.value = htonl(jitter & TE_EXT_MASK);
477 return;
478 }
479
480 static void
481 set_circuitparams_pkt_loss (struct mpls_te_circuit *mtc, u_int32_t loss, u_char anormal)
482 {
483 u_int32_t tmp;
484 /* Note that TLV-length field is the size of array. */
485 SUBTLV_TYPE(mtc->pkt_loss) = TE_SUBTLV_PKT_LOSS;
486 SUBTLV_LEN(mtc->pkt_loss) = SUBTLV_DEF_SIZE;
487 tmp = loss & TE_EXT_MASK;
488 if (anormal)
489 tmp |= TE_EXT_ANORMAL;
490 mtc->pkt_loss.value = htonl(tmp);
491 return;
492 }
493
494 static void
495 set_circuitparams_res_bw (struct mpls_te_circuit *mtc, float fp)
496 {
497 /* Note that TLV-length field is the size of array. */
498 SUBTLV_TYPE(mtc->res_bw) = TE_SUBTLV_RES_BW;
499 SUBTLV_LEN(mtc->res_bw) = SUBTLV_DEF_SIZE;
500 mtc->res_bw.value = htonf(fp);
501 return;
502 }
503
504 static void
505 set_circuitparams_ava_bw (struct mpls_te_circuit *mtc, float fp)
506 {
507 /* Note that TLV-length field is the size of array. */
508 SUBTLV_TYPE(mtc->ava_bw) = TE_SUBTLV_AVA_BW;
509 SUBTLV_LEN(mtc->ava_bw) = SUBTLV_DEF_SIZE;
510 mtc->ava_bw.value = htonf(fp);
511 return;
512 }
513
514 static void
515 set_circuitparams_use_bw (struct mpls_te_circuit *mtc, float fp)
516 {
517 /* Note that TLV-length field is the size of array. */
518 SUBTLV_TYPE(mtc->use_bw) = TE_SUBTLV_USE_BW;
519 SUBTLV_LEN(mtc->use_bw) = SUBTLV_DEF_SIZE;
520 mtc->use_bw.value = htonf(fp);
521 return;
522 }
523
524 /* Main initialization / update function of the MPLS TE Circuit context */
525 /* Call when interface TE Link parameters are modified */
526 void
527 isis_link_params_update (struct isis_circuit *circuit, struct interface *ifp)
528 {
529 int i;
530 struct prefix_ipv4 *addr;
531 struct mpls_te_circuit *mtc;
532
533 /* Sanity Check */
534 if ((circuit == NULL) || (ifp == NULL))
535 return;
536
537 zlog_info ("MPLS-TE: Initialize circuit parameters for interface %s", ifp->name);
538
539 /* Check if MPLS TE Circuit context has not been already created */
540 if (circuit->mtc == NULL)
541 circuit->mtc = mpls_te_circuit_new();
542
543 mtc = circuit->mtc;
544
545 /* Fulfil MTC TLV from ifp TE Link parameters */
546 if (HAS_LINK_PARAMS(ifp))
547 {
548 mtc->status = enable;
549 /* STD_TE metrics */
550 if (IS_PARAM_SET(ifp->link_params, LP_ADM_GRP))
551 set_circuitparams_admin_grp (mtc, ifp->link_params->admin_grp);
552 else
553 SUBTLV_TYPE(mtc->admin_grp) = 0;
554
555 /* If not already set, register local IP addr from ip_addr list if it exists */
556 if (SUBTLV_TYPE(mtc->local_ipaddr) == 0)
557 {
558 if (circuit->ip_addrs != NULL && listcount(circuit->ip_addrs) != 0)
559 {
560 addr = (struct prefix_ipv4 *)listgetdata ((struct listnode *)listhead (circuit->ip_addrs));
561 set_circuitparams_local_ipaddr (mtc, addr->prefix);
562 }
563 }
564
565 /* If not already set, try to determine Remote IP addr if circuit is P2P */
566 if ((SUBTLV_TYPE(mtc->rmt_ipaddr) == 0) && (circuit->circ_type == CIRCUIT_T_P2P))
567 {
568 struct isis_adjacency *adj = circuit->u.p2p.neighbor;
569 if (adj->ipv4_addrs != NULL && listcount(adj->ipv4_addrs) != 0)
570 {
571 struct in_addr *ip_addr;
572 ip_addr = (struct in_addr *)listgetdata ((struct listnode *)listhead (adj->ipv4_addrs));
573 set_circuitparams_rmt_ipaddr (mtc, *ip_addr);
574 }
575 }
576
577 if (IS_PARAM_SET(ifp->link_params, LP_MAX_BW))
578 set_circuitparams_max_bw (mtc, ifp->link_params->max_bw);
579 else
580 SUBTLV_TYPE(mtc->max_bw) = 0;
581
582 if (IS_PARAM_SET(ifp->link_params, LP_MAX_RSV_BW))
583 set_circuitparams_max_rsv_bw (mtc, ifp->link_params->max_rsv_bw);
584 else
585 SUBTLV_TYPE(mtc->max_rsv_bw) = 0;
586
587 if (IS_PARAM_SET(ifp->link_params, LP_UNRSV_BW))
588 for (i = 0; i < MAX_CLASS_TYPE; i++)
589 set_circuitparams_unrsv_bw (mtc, i, ifp->link_params->unrsv_bw[i]);
590 else
591 SUBTLV_TYPE(mtc->unrsv_bw) = 0;
592
593 if (IS_PARAM_SET(ifp->link_params, LP_TE_METRIC))
594 set_circuitparams_te_metric(mtc, ifp->link_params->te_metric);
595 else
596 SUBTLV_TYPE(mtc->te_metric) = 0;
597
598 /* TE metric Extensions */
599 if (IS_PARAM_SET(ifp->link_params, LP_DELAY))
600 set_circuitparams_av_delay(mtc, ifp->link_params->av_delay, 0);
601 else
602 SUBTLV_TYPE(mtc->av_delay) = 0;
603
604 if (IS_PARAM_SET(ifp->link_params, LP_MM_DELAY))
605 set_circuitparams_mm_delay(mtc, ifp->link_params->min_delay, ifp->link_params->max_delay, 0);
606 else
607 SUBTLV_TYPE(mtc->mm_delay) = 0;
608
609 if (IS_PARAM_SET(ifp->link_params, LP_DELAY_VAR))
610 set_circuitparams_delay_var(mtc, ifp->link_params->delay_var);
611 else
612 SUBTLV_TYPE(mtc->delay_var) = 0;
613
614 if (IS_PARAM_SET(ifp->link_params, LP_PKT_LOSS))
615 set_circuitparams_pkt_loss(mtc, ifp->link_params->pkt_loss, 0);
616 else
617 SUBTLV_TYPE(mtc->pkt_loss) = 0;
618
619 if (IS_PARAM_SET(ifp->link_params, LP_RES_BW))
620 set_circuitparams_res_bw(mtc, ifp->link_params->res_bw);
621 else
622 SUBTLV_TYPE(mtc->res_bw) = 0;
623
624 if (IS_PARAM_SET(ifp->link_params, LP_AVA_BW))
625 set_circuitparams_ava_bw(mtc, ifp->link_params->ava_bw);
626 else
627 SUBTLV_TYPE(mtc->ava_bw) = 0;
628
629 if (IS_PARAM_SET(ifp->link_params, LP_USE_BW))
630 set_circuitparams_use_bw(mtc, ifp->link_params->use_bw);
631 else
632 SUBTLV_TYPE(mtc->use_bw) = 0;
633
634 /* INTER_AS */
635 if (IS_PARAM_SET(ifp->link_params, LP_RMT_AS))
636 set_circuitparams_inter_as(mtc, ifp->link_params->rmt_ip, ifp->link_params->rmt_as);
637 else
638 /* reset inter-as TE params */
639 unset_circuitparams_inter_as (mtc);
640
641 /* Compute total length of SUB TLVs */
642 mtc->length = subtlvs_len(mtc);
643
644 }
645 else
646 mtc->status = disable;
647
648 /* Finally Update LSP */
649 #if 0
650 if (IS_MPLS_TE(isisMplsTE) && circuit->area)
651 lsp_regenerate_schedule (circuit->area, circuit->is_type, 0);
652 #endif
653 return;
654 }
655
656 void
657 isis_mpls_te_update (struct interface *ifp)
658 {
659 struct isis_circuit *circuit;
660
661 /* Sanity Check */
662 if (ifp == NULL)
663 return;
664
665 /* Get circuit context from interface */
666 if ((circuit = circuit_scan_by_ifp(ifp)) == NULL)
667 return;
668
669 /* Update TE TLVs ... */
670 isis_link_params_update(circuit, ifp);
671
672 /* ... and LSP */
673 if (IS_MPLS_TE(isisMplsTE) && circuit->area)
674 lsp_regenerate_schedule (circuit->area, circuit->is_type, 0);
675
676 return;
677 }
678
679 /*------------------------------------------------------------------------*
680 * Followings are vty session control functions.
681 *------------------------------------------------------------------------*/
682
683 static u_char
684 show_vty_subtlv_admin_grp (struct vty *vty, struct te_subtlv_admin_grp *tlv)
685 {
686
687 if (vty != NULL)
688 vty_outln (vty, " Administrative Group: 0x%x",
689 (u_int32_t)ntohl(tlv->value));
690 else
691 zlog_debug (" Administrative Group: 0x%x",
692 (u_int32_t) ntohl (tlv->value));
693
694 return (SUBTLV_HDR_SIZE + SUBTLV_DEF_SIZE);
695 }
696
697 static u_char
698 show_vty_subtlv_llri (struct vty *vty, struct te_subtlv_llri *tlv)
699 {
700 if (vty != NULL)
701 {
702 vty_outln (vty, " Link Local ID: %d",(u_int32_t)ntohl(tlv->local));
703 vty_outln (vty, " Link Remote ID: %d",
704 (u_int32_t)ntohl(tlv->remote));
705 }
706 else
707 {
708 zlog_debug (" Link Local ID: %d", (u_int32_t) ntohl (tlv->local));
709 zlog_debug (" Link Remote ID: %d", (u_int32_t) ntohl (tlv->remote));
710 }
711
712 return (SUBTLV_HDR_SIZE + TE_SUBTLV_LLRI_SIZE);
713 }
714
715 static u_char
716 show_vty_subtlv_local_ipaddr (struct vty *vty, struct te_subtlv_local_ipaddr *tlv)
717 {
718 if (vty != NULL)
719 vty_outln (vty, " Local Interface IP Address(es): %s",
720 inet_ntoa(tlv->value));
721 else
722 zlog_debug (" Local Interface IP Address(es): %s", inet_ntoa (tlv->value));
723
724 return (SUBTLV_HDR_SIZE + SUBTLV_DEF_SIZE);
725 }
726
727 static u_char
728 show_vty_subtlv_rmt_ipaddr (struct vty *vty, struct te_subtlv_rmt_ipaddr *tlv)
729 {
730 if (vty != NULL)
731 vty_outln (vty, " Remote Interface IP Address(es): %s",
732 inet_ntoa(tlv->value));
733 else
734 zlog_debug (" Remote Interface IP Address(es): %s", inet_ntoa (tlv->value));
735
736 return (SUBTLV_HDR_SIZE + SUBTLV_DEF_SIZE);
737 }
738
739 static u_char
740 show_vty_subtlv_max_bw (struct vty *vty, struct te_subtlv_max_bw *tlv)
741 {
742 float fval;
743
744 fval = ntohf (tlv->value);
745
746 if (vty != NULL)
747 vty_outln (vty, " Maximum Bandwidth: %g (Bytes/sec)", fval);
748 else
749 zlog_debug (" Maximum Bandwidth: %g (Bytes/sec)", fval);
750
751 return (SUBTLV_HDR_SIZE + SUBTLV_DEF_SIZE);
752 }
753
754 static u_char
755 show_vty_subtlv_max_rsv_bw (struct vty *vty, struct te_subtlv_max_rsv_bw *tlv)
756 {
757 float fval;
758
759 fval = ntohf (tlv->value);
760
761 if (vty != NULL)
762 vty_outln (vty, " Maximum Reservable Bandwidth: %g (Bytes/sec)",fval);
763 else
764 zlog_debug (" Maximum Reservable Bandwidth: %g (Bytes/sec)", fval);
765
766 return (SUBTLV_HDR_SIZE + SUBTLV_DEF_SIZE);
767 }
768
769 static u_char
770 show_vty_subtlv_unrsv_bw (struct vty *vty, struct te_subtlv_unrsv_bw *tlv)
771 {
772 float fval1, fval2;
773 int i;
774
775 if (vty != NULL)
776 vty_outln (vty, " Unreserved Bandwidth:");
777 else
778 zlog_debug (" Unreserved Bandwidth:");
779
780 for (i = 0; i < MAX_CLASS_TYPE; i+=2)
781 {
782 fval1 = ntohf (tlv->value[i]);
783 fval2 = ntohf (tlv->value[i+1]);
784 if (vty != NULL)
785 vty_outln (vty, " [%d]: %g (Bytes/sec),\t[%d]: %g (Bytes/sec)", i, fval1, i+1,
786 fval2);
787 else
788 zlog_debug (" [%d]: %g (Bytes/sec),\t[%d]: %g (Bytes/sec)", i, fval1, i+1, fval2);
789 }
790
791 return (SUBTLV_HDR_SIZE + TE_SUBTLV_UNRSV_SIZE);
792 }
793
794 static u_char
795 show_vty_subtlv_te_metric (struct vty *vty, struct te_subtlv_te_metric *tlv)
796 {
797 u_int32_t te_metric;
798
799 te_metric = tlv->value[2] | tlv->value[1] << 8 | tlv->value[0] << 16;
800 if (vty != NULL)
801 vty_outln (vty, " Traffic Engineering Metric: %u", te_metric);
802 else
803 zlog_debug (" Traffic Engineering Metric: %u", te_metric);
804
805 return (SUBTLV_HDR_SIZE + SUBTLV_DEF_SIZE);
806 }
807
808 static u_char
809 show_vty_subtlv_ras (struct vty *vty, struct te_subtlv_ras *tlv)
810 {
811 if (vty != NULL)
812 vty_outln (vty, " Inter-AS TE Remote AS number: %u",
813 ntohl(tlv->value));
814 else
815 zlog_debug (" Inter-AS TE Remote AS number: %u", ntohl (tlv->value));
816
817 return (SUBTLV_HDR_SIZE + SUBTLV_DEF_SIZE);
818 }
819
820 static u_char
821 show_vty_subtlv_rip (struct vty *vty, struct te_subtlv_rip *tlv)
822 {
823 if (vty != NULL)
824 vty_outln (vty, " Inter-AS TE Remote ASBR IP address: %s",
825 inet_ntoa(tlv->value));
826 else
827 zlog_debug (" Inter-AS TE Remote ASBR IP address: %s", inet_ntoa (tlv->value));
828
829 return (SUBTLV_HDR_SIZE + SUBTLV_DEF_SIZE);
830 }
831
832 static u_char
833 show_vty_subtlv_av_delay (struct vty *vty, struct te_subtlv_av_delay *tlv)
834 {
835 u_int32_t delay;
836 u_int32_t A;
837
838 delay = (u_int32_t) ntohl (tlv->value) & TE_EXT_MASK;
839 A = (u_int32_t) ntohl (tlv->value) & TE_EXT_ANORMAL;
840
841 if (vty != NULL)
842 vty_outln (vty, " %s Average Link Delay: %d (micro-sec)", A ? "Anomalous" : "Normal",
843 delay);
844 else
845 zlog_debug (" %s Average Link Delay: %d (micro-sec)", A ? "Anomalous" : "Normal", delay);
846
847 return (SUBTLV_HDR_SIZE + SUBTLV_DEF_SIZE);
848 }
849
850 static u_char
851 show_vty_subtlv_mm_delay (struct vty *vty, struct te_subtlv_mm_delay *tlv)
852 {
853 u_int32_t low, high;
854 u_int32_t A;
855
856 low = (u_int32_t) ntohl (tlv->low) & TE_EXT_MASK;
857 A = (u_int32_t) ntohl (tlv->low) & TE_EXT_ANORMAL;
858 high = (u_int32_t) ntohl (tlv->high) & TE_EXT_MASK;
859
860 if (vty != NULL)
861 vty_outln (vty, " %s Min/Max Link Delay: %d / %d (micro-sec)", A ? "Anomalous" : "Normal", low,
862 high);
863 else
864 zlog_debug (" %s Min/Max Link Delay: %d / %d (micro-sec)", A ? "Anomalous" : "Normal", low, high);
865
866 return (SUBTLV_HDR_SIZE + SUBTLV_DEF_SIZE);
867 }
868
869 static u_char
870 show_vty_subtlv_delay_var (struct vty *vty, struct te_subtlv_delay_var *tlv)
871 {
872 u_int32_t jitter;
873
874 jitter = (u_int32_t) ntohl (tlv->value) & TE_EXT_MASK;
875
876 if (vty != NULL)
877 vty_outln (vty, " Delay Variation: %d (micro-sec)", jitter);
878 else
879 zlog_debug (" Delay Variation: %d (micro-sec)", jitter);
880
881 return (SUBTLV_HDR_SIZE + SUBTLV_DEF_SIZE);
882 }
883
884 static u_char
885 show_vty_subtlv_pkt_loss (struct vty *vty, struct te_subtlv_pkt_loss *tlv)
886 {
887 u_int32_t loss;
888 u_int32_t A;
889 float fval;
890
891 loss = (u_int32_t) ntohl (tlv->value) & TE_EXT_MASK;
892 fval = (float) (loss * LOSS_PRECISION);
893 A = (u_int32_t) ntohl (tlv->value) & TE_EXT_ANORMAL;
894
895 if (vty != NULL)
896 vty_outln (vty, " %s Link Packet Loss: %g (%%)", A ? "Anomalous" : "Normal",
897 fval);
898 else
899 zlog_debug (" %s Link Packet Loss: %g (%%)", A ? "Anomalous" : "Normal", fval);
900
901 return (SUBTLV_HDR_SIZE + SUBTLV_DEF_SIZE);
902 }
903
904 static u_char
905 show_vty_subtlv_res_bw (struct vty *vty, struct te_subtlv_res_bw *tlv)
906 {
907 float fval;
908
909 fval = ntohf(tlv->value);
910
911 if (vty != NULL)
912 vty_outln (vty, " Unidirectional Residual Bandwidth: %g (Bytes/sec)",
913 fval);
914 else
915 zlog_debug (" Unidirectional Residual Bandwidth: %g (Bytes/sec)", fval);
916
917 return (SUBTLV_HDR_SIZE + SUBTLV_DEF_SIZE);
918 }
919
920 static u_char
921 show_vty_subtlv_ava_bw (struct vty *vty, struct te_subtlv_ava_bw *tlv)
922 {
923 float fval;
924
925 fval = ntohf (tlv->value);
926
927 if (vty != NULL)
928 vty_outln (vty, " Unidirectional Available Bandwidth: %g (Bytes/sec)",
929 fval);
930 else
931 zlog_debug (" Unidirectional Available Bandwidth: %g (Bytes/sec)", fval);
932
933 return (SUBTLV_HDR_SIZE + SUBTLV_DEF_SIZE);
934 }
935
936 static u_char
937 show_vty_subtlv_use_bw (struct vty *vty, struct te_subtlv_use_bw *tlv)
938 {
939 float fval;
940
941 fval = ntohf (tlv->value);
942
943 if (vty != NULL)
944 vty_outln (vty, " Unidirectional Utilized Bandwidth: %g (Bytes/sec)",
945 fval);
946 else
947 zlog_debug (" Unidirectional Utilized Bandwidth: %g (Bytes/sec)", fval);
948
949 return (SUBTLV_HDR_SIZE + SUBTLV_DEF_SIZE);
950 }
951
952 static u_char
953 show_vty_unknown_tlv (struct vty *vty, struct subtlv_header *tlvh)
954 {
955 int i, rtn = 1;
956 u_char *v = (u_char *)tlvh;
957
958 if (vty != NULL)
959 {
960 if (tlvh->length != 0)
961 {
962 vty_outln (vty, " Unknown TLV: [type(%#.2x), length(%#.2x)]",
963 tlvh->type, tlvh->length);
964 vty_out(vty, " Dump: [00]");
965 rtn = 1; /* initialize end of line counter */
966 for (i = 0; i < tlvh->length; i++)
967 {
968 vty_out (vty, " %#.2x", v[i]);
969 if (rtn == 8)
970 {
971 vty_out (vty, "%s [%.2x]", VTYNL, i + 1);
972 rtn = 1;
973 }
974 else
975 rtn++;
976 }
977 vty_out (vty, VTYNL);
978 }
979 else
980 vty_outln (vty, " Unknown TLV: [type(%#.2x), length(%#.2x)]",
981 tlvh->type, tlvh->length);
982 }
983 else
984 {
985 zlog_debug (" Unknown TLV: [type(%#.2x), length(%#.2x)]",
986 tlvh->type, tlvh->length);
987 }
988
989 return SUBTLV_SIZE(tlvh);
990 }
991
992 /* Main Show function */
993 void
994 mpls_te_print_detail(struct vty *vty, struct te_is_neigh *te)
995 {
996 struct subtlv_header *tlvh;
997 u_int16_t sum = 0;
998
999 zlog_debug ("ISIS MPLS-TE: Show database TE detail");
1000
1001 tlvh = (struct subtlv_header *)te->sub_tlvs;
1002
1003 for (; sum < te->sub_tlvs_length; tlvh = SUBTLV_HDR_NEXT (tlvh))
1004 {
1005 switch (tlvh->type)
1006 {
1007 case TE_SUBTLV_ADMIN_GRP:
1008 sum += show_vty_subtlv_admin_grp (vty, (struct te_subtlv_admin_grp *)tlvh);
1009 break;
1010 case TE_SUBTLV_LLRI:
1011 sum += show_vty_subtlv_llri (vty, (struct te_subtlv_llri *)tlvh);
1012 break;
1013 case TE_SUBTLV_LOCAL_IPADDR:
1014 sum += show_vty_subtlv_local_ipaddr (vty, (struct te_subtlv_local_ipaddr *)tlvh);
1015 break;
1016 case TE_SUBTLV_RMT_IPADDR:
1017 sum += show_vty_subtlv_rmt_ipaddr (vty, (struct te_subtlv_rmt_ipaddr *)tlvh);
1018 break;
1019 case TE_SUBTLV_MAX_BW:
1020 sum += show_vty_subtlv_max_bw (vty, (struct te_subtlv_max_bw *)tlvh);
1021 break;
1022 case TE_SUBTLV_MAX_RSV_BW:
1023 sum += show_vty_subtlv_max_rsv_bw (vty, (struct te_subtlv_max_rsv_bw *)tlvh);
1024 break;
1025 case TE_SUBTLV_UNRSV_BW:
1026 sum += show_vty_subtlv_unrsv_bw (vty, (struct te_subtlv_unrsv_bw *)tlvh);
1027 break;
1028 case TE_SUBTLV_TE_METRIC:
1029 sum += show_vty_subtlv_te_metric (vty, (struct te_subtlv_te_metric *)tlvh);
1030 break;
1031 case TE_SUBTLV_RAS:
1032 sum += show_vty_subtlv_ras (vty, (struct te_subtlv_ras *)tlvh);
1033 break;
1034 case TE_SUBTLV_RIP:
1035 sum += show_vty_subtlv_rip (vty, (struct te_subtlv_rip *)tlvh);
1036 break;
1037 case TE_SUBTLV_AV_DELAY:
1038 sum += show_vty_subtlv_av_delay (vty, (struct te_subtlv_av_delay *)tlvh);
1039 break;
1040 case TE_SUBTLV_MM_DELAY:
1041 sum += show_vty_subtlv_mm_delay (vty, (struct te_subtlv_mm_delay *)tlvh);
1042 break;
1043 case TE_SUBTLV_DELAY_VAR:
1044 sum += show_vty_subtlv_delay_var (vty, (struct te_subtlv_delay_var *)tlvh);
1045 break;
1046 case TE_SUBTLV_PKT_LOSS:
1047 sum += show_vty_subtlv_pkt_loss (vty, (struct te_subtlv_pkt_loss *)tlvh);
1048 break;
1049 case TE_SUBTLV_RES_BW:
1050 sum += show_vty_subtlv_res_bw (vty, (struct te_subtlv_res_bw *)tlvh);
1051 break;
1052 case TE_SUBTLV_AVA_BW:
1053 sum += show_vty_subtlv_ava_bw (vty, (struct te_subtlv_ava_bw *)tlvh);
1054 break;
1055 case TE_SUBTLV_USE_BW:
1056 sum += show_vty_subtlv_use_bw (vty, (struct te_subtlv_use_bw *)tlvh);
1057 break;
1058 default:
1059 sum += show_vty_unknown_tlv (vty, tlvh);
1060 break;
1061 }
1062 }
1063 return;
1064 }
1065
1066 /* Specific MPLS TE router parameters write function */
1067 void
1068 isis_mpls_te_config_write_router (struct vty *vty)
1069 {
1070 if (IS_MPLS_TE(isisMplsTE))
1071 {
1072 vty_outln (vty, " mpls-te on");
1073 vty_outln (vty, " mpls-te router-address %s",
1074 inet_ntoa(isisMplsTE.router_id));
1075 }
1076
1077 return;
1078 }
1079
1080
1081 /*------------------------------------------------------------------------*
1082 * Followings are vty command functions.
1083 *------------------------------------------------------------------------*/
1084
1085 DEFUN (isis_mpls_te_on,
1086 isis_mpls_te_on_cmd,
1087 "mpls-te on",
1088 MPLS_TE_STR
1089 "Enable MPLS-TE functionality\n")
1090 {
1091 struct listnode *node;
1092 struct isis_circuit *circuit;
1093
1094 if (IS_MPLS_TE(isisMplsTE))
1095 return CMD_SUCCESS;
1096
1097 if (IS_DEBUG_ISIS(DEBUG_TE))
1098 zlog_debug ("ISIS MPLS-TE: OFF -> ON");
1099
1100 isisMplsTE.status = enable;
1101
1102 /*
1103 * Following code is intended to handle two cases;
1104 *
1105 * 1) MPLS-TE was disabled at startup time, but now become enabled.
1106 * In this case, we must enable MPLS-TE Circuit regarding interface MPLS_TE flag
1107 * 2) MPLS-TE was once enabled then disabled, and now enabled again.
1108 */
1109 for (ALL_LIST_ELEMENTS_RO (isisMplsTE.cir_list, node, circuit))
1110 {
1111 if (circuit->mtc == NULL || IS_FLOOD_AS (circuit->mtc->type))
1112 continue;
1113
1114 if ((circuit->mtc->status == disable)
1115 && HAS_LINK_PARAMS(circuit->interface))
1116 circuit->mtc->status = enable;
1117 else
1118 continue;
1119
1120 /* Reoriginate STD_TE & GMPLS circuits */
1121 if (circuit->area)
1122 lsp_regenerate_schedule (circuit->area, circuit->is_type, 0);
1123 }
1124
1125 return CMD_SUCCESS;
1126 }
1127
1128 DEFUN (no_isis_mpls_te_on,
1129 no_isis_mpls_te_on_cmd,
1130 "no mpls-te",
1131 NO_STR
1132 "Disable the MPLS-TE functionality\n")
1133 {
1134 struct listnode *node;
1135 struct isis_circuit *circuit;
1136
1137 if (isisMplsTE.status == disable)
1138 return CMD_SUCCESS;
1139
1140 if (IS_DEBUG_ISIS(DEBUG_TE))
1141 zlog_debug ("ISIS MPLS-TE: ON -> OFF");
1142
1143 isisMplsTE.status = disable;
1144
1145 /* Flush LSP if circuit engage */
1146 for (ALL_LIST_ELEMENTS_RO (isisMplsTE.cir_list, node, circuit))
1147 {
1148 if (circuit->mtc == NULL || (circuit->mtc->status == disable))
1149 continue;
1150
1151 /* disable MPLS_TE Circuit */
1152 circuit->mtc->status = disable;
1153
1154 /* Re-originate circuit without STD_TE & GMPLS parameters */
1155 if (circuit->area)
1156 lsp_regenerate_schedule (circuit->area, circuit->is_type, 0);
1157 }
1158
1159 return CMD_SUCCESS;
1160 }
1161
1162 DEFUN (isis_mpls_te_router_addr,
1163 isis_mpls_te_router_addr_cmd,
1164 "mpls-te router-address A.B.C.D",
1165 MPLS_TE_STR
1166 "Stable IP address of the advertising router\n"
1167 "MPLS-TE router address in IPv4 address format\n")
1168 {
1169 int idx_ipv4 = 2;
1170 struct in_addr value;
1171 struct listnode *node;
1172 struct isis_area *area;
1173
1174 if (! inet_aton (argv[idx_ipv4]->arg, &value))
1175 {
1176 vty_outln (vty, "Please specify Router-Addr by A.B.C.D");
1177 return CMD_WARNING;
1178 }
1179
1180 isisMplsTE.router_id.s_addr = value.s_addr;
1181
1182 if (isisMplsTE.status == disable)
1183 return CMD_SUCCESS;
1184
1185 /* Update main Router ID in isis global structure */
1186 isis->router_id = value.s_addr;
1187 /* And re-schedule LSP update */
1188 for (ALL_LIST_ELEMENTS_RO (isis->area_list, node, area))
1189 if (listcount (area->area_addrs) > 0)
1190 lsp_regenerate_schedule (area, area->is_type, 0);
1191
1192 return CMD_SUCCESS;
1193 }
1194
1195 DEFUN (isis_mpls_te_inter_as,
1196 isis_mpls_te_inter_as_cmd,
1197 "mpls-te inter-as <level-1|level-1-2|level-2-only>",
1198 MPLS_TE_STR
1199 "Configure MPLS-TE Inter-AS support\n"
1200 "AREA native mode self originate INTER-AS LSP with L1 only flooding scope)\n"
1201 "AREA native mode self originate INTER-AS LSP with L1 and L2 flooding scope)\n"
1202 "AS native mode self originate INTER-AS LSP with L2 only flooding scope\n")
1203 {
1204 vty_outln (vty, "Not yet supported");
1205 return CMD_SUCCESS;
1206 }
1207
1208 DEFUN (no_isis_mpls_te_inter_as,
1209 no_isis_mpls_te_inter_as_cmd,
1210 "no mpls-te inter-as",
1211 NO_STR
1212 "Disable the MPLS-TE functionality\n"
1213 "Disable MPLS-TE Inter-AS support\n")
1214 {
1215
1216 vty_outln (vty, "Not yet supported");
1217 return CMD_SUCCESS;
1218 }
1219
1220 DEFUN (show_isis_mpls_te_router,
1221 show_isis_mpls_te_router_cmd,
1222 "show isis mpls-te router",
1223 SHOW_STR
1224 ISIS_STR
1225 MPLS_TE_STR
1226 "Router information\n")
1227 {
1228 if (IS_MPLS_TE(isisMplsTE))
1229 {
1230 vty_outln (vty, "--- MPLS-TE router parameters ---");
1231
1232 if (ntohs (isisMplsTE.router_id.s_addr) != 0)
1233 vty_outln (vty, " Router-Address: %s",
1234 inet_ntoa(isisMplsTE.router_id));
1235 else
1236 vty_outln (vty, " N/A");
1237 }
1238 else
1239 vty_outln (vty, " MPLS-TE is disable on this router");
1240
1241 return CMD_SUCCESS;
1242 }
1243
1244 static void
1245 show_mpls_te_sub (struct vty *vty, struct interface *ifp)
1246 {
1247 struct mpls_te_circuit *mtc;
1248
1249 if ((IS_MPLS_TE(isisMplsTE))
1250 && ((mtc = lookup_mpls_params_by_ifp (ifp)) != NULL))
1251 {
1252 /* Continue only if interface is not passive or support Inter-AS TEv2 */
1253 if (mtc->status != enable)
1254 {
1255 if (IS_INTER_AS(mtc->type))
1256 {
1257 vty_outln (vty, "-- Inter-AS TEv2 link parameters for %s --",
1258 ifp->name);
1259 }
1260 else
1261 {
1262 /* MPLS-TE is not activate on this interface */
1263 /* or this interface is passive and Inter-AS TEv2 is not activate */
1264 vty_outln (vty, " %s: MPLS-TE is disabled on this interface",
1265 ifp->name);
1266 return;
1267 }
1268 }
1269 else
1270 {
1271 vty_outln (vty, "-- MPLS-TE link parameters for %s --",
1272 ifp->name);
1273 }
1274
1275 show_vty_subtlv_admin_grp (vty, &mtc->admin_grp);
1276
1277 if (SUBTLV_TYPE(mtc->local_ipaddr) != 0)
1278 show_vty_subtlv_local_ipaddr (vty, &mtc->local_ipaddr);
1279 if (SUBTLV_TYPE(mtc->rmt_ipaddr) != 0)
1280 show_vty_subtlv_rmt_ipaddr (vty, &mtc->rmt_ipaddr);
1281
1282 show_vty_subtlv_max_bw (vty, &mtc->max_bw);
1283 show_vty_subtlv_max_rsv_bw (vty, &mtc->max_rsv_bw);
1284 show_vty_subtlv_unrsv_bw (vty, &mtc->unrsv_bw);
1285 show_vty_subtlv_te_metric (vty, &mtc->te_metric);
1286
1287 if (IS_INTER_AS(mtc->type))
1288 {
1289 if (SUBTLV_TYPE(mtc->ras) != 0)
1290 show_vty_subtlv_ras (vty, &mtc->ras);
1291 if (SUBTLV_TYPE(mtc->rip) != 0)
1292 show_vty_subtlv_rip (vty, &mtc->rip);
1293 }
1294
1295 show_vty_subtlv_av_delay (vty, &mtc->av_delay);
1296 show_vty_subtlv_mm_delay (vty, &mtc->mm_delay);
1297 show_vty_subtlv_delay_var (vty, &mtc->delay_var);
1298 show_vty_subtlv_pkt_loss (vty, &mtc->pkt_loss);
1299 show_vty_subtlv_res_bw (vty, &mtc->res_bw);
1300 show_vty_subtlv_ava_bw (vty, &mtc->ava_bw);
1301 show_vty_subtlv_use_bw (vty, &mtc->use_bw);
1302 vty_outln (vty, "---------------%s", VTYNL);
1303 }
1304 else
1305 {
1306 vty_outln (vty, " %s: MPLS-TE is disabled on this interface",
1307 ifp->name);
1308 }
1309
1310 return;
1311 }
1312
1313 DEFUN (show_isis_mpls_te_interface,
1314 show_isis_mpls_te_interface_cmd,
1315 "show isis mpls-te interface [INTERFACE]",
1316 SHOW_STR
1317 ISIS_STR
1318 MPLS_TE_STR
1319 "Interface information\n"
1320 "Interface name\n")
1321 {
1322 int idx_interface = 4;
1323 struct interface *ifp;
1324 struct listnode *node;
1325
1326 /* Show All Interfaces. */
1327 if (argc == 4)
1328 {
1329 for (ALL_LIST_ELEMENTS_RO (vrf_iflist (VRF_DEFAULT), node, ifp))
1330 show_mpls_te_sub (vty, ifp);
1331 }
1332 /* Interface name is specified. */
1333 else
1334 {
1335 if ((ifp = if_lookup_by_name (argv[idx_interface]->arg, VRF_DEFAULT)) == NULL)
1336 vty_outln (vty, "No such interface name");
1337 else
1338 show_mpls_te_sub (vty, ifp);
1339 }
1340
1341 return CMD_SUCCESS;
1342 }
1343
1344 /* Initialize MPLS_TE */
1345 void
1346 isis_mpls_te_init (void)
1347 {
1348
1349 zlog_debug("ISIS MPLS-TE: Initialize");
1350
1351 /* Initialize MPLS_TE structure */
1352 isisMplsTE.status = disable;
1353 isisMplsTE.level = 0;
1354 isisMplsTE.inter_as = off;
1355 isisMplsTE.interas_areaid.s_addr = 0;
1356 isisMplsTE.cir_list = list_new();
1357 isisMplsTE.router_id.s_addr = 0;
1358
1359 /* Register new VTY commands */
1360 install_element (VIEW_NODE, &show_isis_mpls_te_router_cmd);
1361 install_element (VIEW_NODE, &show_isis_mpls_te_interface_cmd);
1362
1363 install_element (ISIS_NODE, &isis_mpls_te_on_cmd);
1364 install_element (ISIS_NODE, &no_isis_mpls_te_on_cmd);
1365 install_element (ISIS_NODE, &isis_mpls_te_router_addr_cmd);
1366 install_element (ISIS_NODE, &isis_mpls_te_inter_as_cmd);
1367 install_element (ISIS_NODE, &no_isis_mpls_te_inter_as_cmd);
1368
1369 return;
1370 }
FRRouting mirror