]> git.proxmox.com Git - mirror_frr.git/blob - bgpd/bgp_routemap.c
projects / mirror_frr.git / blob
? search:
summary | shortlog | log | commit | commitdiff | tree
blame | history | raw | HEAD
bgpd: conditional advertisement - with route-map filter
[mirror_frr.git] / bgpd / bgp_routemap.c
1 /* Route map function of bgpd.
2 * Copyright (C) 1998, 1999 Kunihiro Ishiguro
3 *
4 * This file is part of GNU Zebra.
5 *
6 * GNU Zebra is free software; you can redistribute it and/or modify it
7 * under the terms of the GNU General Public License as published by the
8 * Free Software Foundation; either version 2, or (at your option) any
9 * later version.
10 *
11 * GNU Zebra is distributed in the hope that it will be useful, but
12 * WITHOUT ANY WARRANTY; without even the implied warranty of
13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
14 * General Public License for more details.
15 *
16 * You should have received a copy of the GNU General Public License along
17 * with this program; see the file COPYING; if not, write to the Free Software
18 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
19 */
20
21 #include <zebra.h>
22
23 #include "prefix.h"
24 #include "filter.h"
25 #include "routemap.h"
26 #include "command.h"
27 #include "linklist.h"
28 #include "plist.h"
29 #include "memory.h"
30 #include "log.h"
31 #include "frrlua.h"
32 #ifdef HAVE_LIBPCREPOSIX
33 #include <pcreposix.h>
34 #else
35 #include <regex.h>
36 #endif /* HAVE_LIBPCREPOSIX */
37 #include "buffer.h"
38 #include "sockunion.h"
39 #include "hash.h"
40 #include "queue.h"
41 #include "frrstr.h"
42 #include "network.h"
43
44 #include "bgpd/bgpd.h"
45 #include "bgpd/bgp_table.h"
46 #include "bgpd/bgp_attr.h"
47 #include "bgpd/bgp_aspath.h"
48 #include "bgpd/bgp_packet.h"
49 #include "bgpd/bgp_route.h"
50 #include "bgpd/bgp_zebra.h"
51 #include "bgpd/bgp_regex.h"
52 #include "bgpd/bgp_community.h"
53 #include "bgpd/bgp_clist.h"
54 #include "bgpd/bgp_filter.h"
55 #include "bgpd/bgp_mplsvpn.h"
56 #include "bgpd/bgp_ecommunity.h"
57 #include "bgpd/bgp_lcommunity.h"
58 #include "bgpd/bgp_vty.h"
59 #include "bgpd/bgp_debug.h"
60 #include "bgpd/bgp_evpn.h"
61 #include "bgpd/bgp_evpn_private.h"
62 #include "bgpd/bgp_evpn_vty.h"
63 #include "bgpd/bgp_mplsvpn.h"
64 #include "bgpd/bgp_pbr.h"
65 #include "bgpd/bgp_flowspec_util.h"
66 #include "bgpd/bgp_encap_types.h"
67 #include "bgpd/bgp_mpath.h"
68
69 #ifdef ENABLE_BGP_VNC
70 #include "bgpd/rfapi/bgp_rfapi_cfg.h"
71 #endif
72
73 #ifndef VTYSH_EXTRACT_PL
74 #include "bgpd/bgp_routemap_clippy.c"
75 #endif
76
77 /* Memo of route-map commands.
78
79 o Cisco route-map
80
81 match as-path : Done
82 community : Done
83 interface : Done
84 ip address : Done
85 ip next-hop : Done
86 ip route-source : Done
87 ip prefix-list : Done
88 ipv6 address : Done
89 ipv6 next-hop : Done
90 ipv6 route-source: (This will not be implemented by bgpd)
91 ipv6 prefix-list : Done
92 length : (This will not be implemented by bgpd)
93 metric : Done
94 route-type : (This will not be implemented by bgpd)
95 tag : Done
96 local-preference : Done
97
98 set as-path prepend : Done
99 as-path tag : Not yet
100 automatic-tag : (This will not be implemented by bgpd)
101 community : Done
102 large-community : Done
103 large-comm-list : Done
104 comm-list : Not yet
105 dampning : Not yet
106 default : (This will not be implemented by bgpd)
107 interface : (This will not be implemented by bgpd)
108 ip default : (This will not be implemented by bgpd)
109 ip next-hop : Done
110 ip precedence : (This will not be implemented by bgpd)
111 ip tos : (This will not be implemented by bgpd)
112 level : (This will not be implemented by bgpd)
113 local-preference : Done
114 metric : Done
115 metric-type : Not yet
116 origin : Done
117 tag : Done
118 weight : Done
119 table : Done
120
121 o Local extensions
122
123 set ipv6 next-hop global: Done
124 set ipv6 next-hop prefer-global: Done
125 set ipv6 next-hop local : Done
126 set as-path exclude : Done
127
128 */
129
130 /* generic value manipulation to be shared in multiple rules */
131
132 #define RMAP_VALUE_SET 0
133 #define RMAP_VALUE_ADD 1
134 #define RMAP_VALUE_SUB 2
135
136 struct rmap_value {
137 uint8_t action;
138 uint8_t variable;
139 uint32_t value;
140 };
141
142 static int route_value_match(struct rmap_value *rv, uint32_t value)
143 {
144 if (rv->variable == 0 && value == rv->value)
145 return RMAP_MATCH;
146
147 return RMAP_NOMATCH;
148 }
149
150 static uint32_t route_value_adjust(struct rmap_value *rv, uint32_t current,
151 struct peer *peer)
152 {
153 uint32_t value;
154
155 switch (rv->variable) {
156 case 1:
157 value = peer->rtt;
158 break;
159 default:
160 value = rv->value;
161 break;
162 }
163
164 switch (rv->action) {
165 case RMAP_VALUE_ADD:
166 if (current > UINT32_MAX - value)
167 return UINT32_MAX;
168 return current + value;
169 case RMAP_VALUE_SUB:
170 if (current <= value)
171 return 0;
172 return current - value;
173 default:
174 return value;
175 }
176 }
177
178 static void *route_value_compile(const char *arg)
179 {
180 uint8_t action = RMAP_VALUE_SET, var = 0;
181 unsigned long larg = 0;
182 char *endptr = NULL;
183 struct rmap_value *rv;
184
185 if (arg[0] == '+') {
186 action = RMAP_VALUE_ADD;
187 arg++;
188 } else if (arg[0] == '-') {
189 action = RMAP_VALUE_SUB;
190 arg++;
191 }
192
193 if (all_digit(arg)) {
194 errno = 0;
195 larg = strtoul(arg, &endptr, 10);
196 if (*arg == 0 || *endptr != 0 || errno || larg > UINT32_MAX)
197 return NULL;
198 } else {
199 if (strcmp(arg, "rtt") == 0)
200 var = 1;
201 else
202 return NULL;
203 }
204
205 rv = XMALLOC(MTYPE_ROUTE_MAP_COMPILED, sizeof(struct rmap_value));
206
207 rv->action = action;
208 rv->variable = var;
209 rv->value = larg;
210 return rv;
211 }
212
213 static void route_value_free(void *rule)
214 {
215 XFREE(MTYPE_ROUTE_MAP_COMPILED, rule);
216 }
217
218 /* generic as path object to be shared in multiple rules */
219
220 static void *route_aspath_compile(const char *arg)
221 {
222 struct aspath *aspath;
223
224 aspath = aspath_str2aspath(arg);
225 if (!aspath)
226 return NULL;
227 return aspath;
228 }
229
230 static void route_aspath_free(void *rule)
231 {
232 struct aspath *aspath = rule;
233 aspath_free(aspath);
234 }
235
236 struct bgp_match_peer_compiled {
237 char *interface;
238 union sockunion su;
239 };
240
241 /* 'match peer (A.B.C.D|X:X::X:X|WORD)' */
242
243 /* Compares the peer specified in the 'match peer' clause with the peer
244 received in bgp_path_info->peer. If it is the same, or if the peer structure
245 received is a peer_group containing it, returns RMAP_MATCH. */
246 static enum route_map_cmd_result_t
247 route_match_peer(void *rule, const struct prefix *prefix,
248 route_map_object_t type, void *object)
249 {
250 struct bgp_match_peer_compiled *pc;
251 union sockunion *su;
252 union sockunion su_def = {
253 .sin = {.sin_family = AF_INET, .sin_addr.s_addr = INADDR_ANY}};
254 struct peer_group *group;
255 struct peer *peer;
256 struct listnode *node, *nnode;
257
258 if (type == RMAP_BGP) {
259 pc = rule;
260 su = &pc->su;
261 peer = ((struct bgp_path_info *)object)->peer;
262
263 if (pc->interface) {
264 if (!peer->conf_if)
265 return RMAP_NOMATCH;
266
267 if (strcmp(peer->conf_if, pc->interface) == 0)
268 return RMAP_MATCH;
269
270 return RMAP_NOMATCH;
271 }
272
273 /* If su='0.0.0.0' (command 'match peer local'), and it's a
274 NETWORK,
275 REDISTRIBUTE, AGGREGATE-ADDRESS or DEFAULT_GENERATED route
276 => return RMAP_MATCH
277 */
278 if (sockunion_same(su, &su_def)) {
279 int ret;
280 if (CHECK_FLAG(peer->rmap_type, PEER_RMAP_TYPE_NETWORK)
281 || CHECK_FLAG(peer->rmap_type,
282 PEER_RMAP_TYPE_REDISTRIBUTE)
283 || CHECK_FLAG(peer->rmap_type,
284 PEER_RMAP_TYPE_AGGREGATE)
285 || CHECK_FLAG(peer->rmap_type,
286 PEER_RMAP_TYPE_DEFAULT))
287 ret = RMAP_MATCH;
288 else
289 ret = RMAP_NOMATCH;
290 return ret;
291 }
292
293 if (!CHECK_FLAG(peer->sflags, PEER_STATUS_GROUP)) {
294 if (sockunion_same(su, &peer->su))
295 return RMAP_MATCH;
296
297 return RMAP_NOMATCH;
298 } else {
299 group = peer->group;
300 for (ALL_LIST_ELEMENTS(group->peer, node, nnode,
301 peer)) {
302 if (sockunion_same(su, &peer->su))
303 return RMAP_MATCH;
304 }
305 return RMAP_NOMATCH;
306 }
307 }
308 return RMAP_NOMATCH;
309 }
310
311 static void *route_match_peer_compile(const char *arg)
312 {
313 struct bgp_match_peer_compiled *pc;
314 int ret;
315
316 pc = XCALLOC(MTYPE_ROUTE_MAP_COMPILED,
317 sizeof(struct bgp_match_peer_compiled));
318
319 ret = str2sockunion(strcmp(arg, "local") ? arg : "0.0.0.0", &pc->su);
320 if (ret < 0) {
321 pc->interface = XSTRDUP(MTYPE_ROUTE_MAP_COMPILED, arg);
322 return pc;
323 }
324
325 return pc;
326 }
327
328 /* Free route map's compiled `ip address' value. */
329 static void route_match_peer_free(void *rule)
330 {
331 struct bgp_match_peer_compiled *pc = rule;
332
333 XFREE(MTYPE_ROUTE_MAP_COMPILED, pc->interface);
334
335 XFREE(MTYPE_ROUTE_MAP_COMPILED, rule);
336 }
337
338 /* Route map commands for ip address matching. */
339 static const struct route_map_rule_cmd route_match_peer_cmd = {
340 "peer",
341 route_match_peer,
342 route_match_peer_compile,
343 route_match_peer_free
344 };
345
346 #if defined(HAVE_LUA)
347 static enum route_map_cmd_result_t
348 route_match_command(void *rule, const struct prefix *prefix,
349 route_map_object_t type, void *object)
350 {
351 int status = RMAP_NOMATCH;
352 u_int32_t locpref = 0;
353 u_int32_t newlocpref = 0;
354 enum lua_rm_status lrm_status;
355 struct bgp_path_info *path = (struct bgp_path_info *)object;
356 lua_State *L = lua_initialize("/etc/frr/lua.scr");
357
358 if (L == NULL)
359 return status;
360
361 /*
362 * Setup the prefix information to pass in
363 */
364 lua_setup_prefix_table(L, prefix);
365
366 zlog_debug("Set up prefix table");
367 /*
368 * Setup the bgp_path_info information
369 */
370 lua_newtable(L);
371 lua_pushinteger(L, path->attr->med);
372 lua_setfield(L, -2, "metric");
373 lua_pushinteger(L, path->attr->nh_ifindex);
374 lua_setfield(L, -2, "ifindex");
375 lua_pushstring(L, path->attr->aspath->str);
376 lua_setfield(L, -2, "aspath");
377 lua_pushinteger(L, path->attr->local_pref);
378 lua_setfield(L, -2, "localpref");
379 zlog_debug("%s %d", path->attr->aspath->str, path->attr->nh_ifindex);
380 lua_setglobal(L, "nexthop");
381
382 zlog_debug("Set up nexthop information");
383 /*
384 * Run the rule
385 */
386 lrm_status = lua_run_rm_rule(L, rule);
387 switch (lrm_status) {
388 case LUA_RM_FAILURE:
389 zlog_debug("RM_FAILURE");
390 break;
391 case LUA_RM_NOMATCH:
392 zlog_debug("RM_NOMATCH");
393 break;
394 case LUA_RM_MATCH_AND_CHANGE:
395 zlog_debug("MATCH AND CHANGE");
396 lua_getglobal(L, "nexthop");
397 path->attr->med = get_integer(L, "metric");
398 /*
399 * This needs to be abstraced with the set function
400 */
401 if (path->attr->flag & ATTR_FLAG_BIT(BGP_ATTR_LOCAL_PREF))
402 locpref = path->attr->local_pref;
403 newlocpref = get_integer(L, "localpref");
404 if (newlocpref != locpref) {
405 path->attr->flag |= ATTR_FLAG_BIT(BGP_ATTR_LOCAL_PREF);
406 path->attr->local_pref = newlocpref;
407 }
408 status = RMAP_MATCH;
409 break;
410 case LUA_RM_MATCH:
411 zlog_debug("MATCH ONLY");
412 status = RMAP_MATCH;
413 break;
414 }
415 lua_close(L);
416 return status;
417 }
418
419 static void *route_match_command_compile(const char *arg)
420 {
421 char *command;
422
423 command = XSTRDUP(MTYPE_ROUTE_MAP_COMPILED, arg);
424 return command;
425 }
426
427 static void
428 route_match_command_free(void *rule)
429 {
430 XFREE(MTYPE_ROUTE_MAP_COMPILED, rule);
431 }
432
433 static const struct route_map_rule_cmd route_match_command_cmd = {
434 "command",
435 route_match_command,
436 route_match_command_compile,
437 route_match_command_free
438 };
439 #endif
440
441 /* `match ip address IP_ACCESS_LIST' */
442
443 /* Match function should return 1 if match is success else return
444 zero. */
445 static enum route_map_cmd_result_t
446 route_match_ip_address(void *rule, const struct prefix *prefix,
447 route_map_object_t type, void *object)
448 {
449 struct access_list *alist;
450
451 if (type == RMAP_BGP && prefix->family == AF_INET) {
452 alist = access_list_lookup(AFI_IP, (char *)rule);
453 if (alist == NULL)
454 return RMAP_NOMATCH;
455
456 return (access_list_apply(alist, prefix) == FILTER_DENY
457 ? RMAP_NOMATCH
458 : RMAP_MATCH);
459 }
460 return RMAP_NOMATCH;
461 }
462
463 /* Route map `ip address' match statement. `arg' should be
464 access-list name. */
465 static void *route_match_ip_address_compile(const char *arg)
466 {
467 return XSTRDUP(MTYPE_ROUTE_MAP_COMPILED, arg);
468 }
469
470 /* Free route map's compiled `ip address' value. */
471 static void route_match_ip_address_free(void *rule)
472 {
473 XFREE(MTYPE_ROUTE_MAP_COMPILED, rule);
474 }
475
476 /* Route map commands for ip address matching. */
477 static const struct route_map_rule_cmd route_match_ip_address_cmd = {
478 "ip address",
479 route_match_ip_address,
480 route_match_ip_address_compile,
481 route_match_ip_address_free
482 };
483
484 /* `match ip next-hop IP_ADDRESS' */
485
486 /* Match function return 1 if match is success else return zero. */
487 static enum route_map_cmd_result_t
488 route_match_ip_next_hop(void *rule, const struct prefix *prefix,
489 route_map_object_t type, void *object)
490 {
491 struct access_list *alist;
492 struct bgp_path_info *path;
493 struct prefix_ipv4 p;
494
495 if (type == RMAP_BGP && prefix->family == AF_INET) {
496 path = object;
497 p.family = AF_INET;
498 p.prefix = path->attr->nexthop;
499 p.prefixlen = IPV4_MAX_BITLEN;
500
501 alist = access_list_lookup(AFI_IP, (char *)rule);
502 if (alist == NULL)
503 return RMAP_NOMATCH;
504
505 return (access_list_apply(alist, &p) == FILTER_DENY
506 ? RMAP_NOMATCH
507 : RMAP_MATCH);
508 }
509 return RMAP_NOMATCH;
510 }
511
512 /* Route map `ip next-hop' match statement. `arg' is
513 access-list name. */
514 static void *route_match_ip_next_hop_compile(const char *arg)
515 {
516 return XSTRDUP(MTYPE_ROUTE_MAP_COMPILED, arg);
517 }
518
519 /* Free route map's compiled `ip address' value. */
520 static void route_match_ip_next_hop_free(void *rule)
521 {
522 XFREE(MTYPE_ROUTE_MAP_COMPILED, rule);
523 }
524
525 /* Route map commands for ip next-hop matching. */
526 static const struct route_map_rule_cmd route_match_ip_next_hop_cmd = {
527 "ip next-hop",
528 route_match_ip_next_hop,
529 route_match_ip_next_hop_compile,
530 route_match_ip_next_hop_free
531 };
532
533 /* `match ip route-source ACCESS-LIST' */
534
535 /* Match function return 1 if match is success else return zero. */
536 static enum route_map_cmd_result_t
537 route_match_ip_route_source(void *rule, const struct prefix *pfx,
538 route_map_object_t type, void *object)
539 {
540 struct access_list *alist;
541 struct bgp_path_info *path;
542 struct peer *peer;
543 struct prefix_ipv4 p;
544
545 if (type == RMAP_BGP && pfx->family == AF_INET) {
546 path = object;
547 peer = path->peer;
548
549 if (!peer || sockunion_family(&peer->su) != AF_INET)
550 return RMAP_NOMATCH;
551
552 p.family = AF_INET;
553 p.prefix = peer->su.sin.sin_addr;
554 p.prefixlen = IPV4_MAX_BITLEN;
555
556 alist = access_list_lookup(AFI_IP, (char *)rule);
557 if (alist == NULL)
558 return RMAP_NOMATCH;
559
560 return (access_list_apply(alist, &p) == FILTER_DENY
561 ? RMAP_NOMATCH
562 : RMAP_MATCH);
563 }
564 return RMAP_NOMATCH;
565 }
566
567 /* Route map `ip route-source' match statement. `arg' is
568 access-list name. */
569 static void *route_match_ip_route_source_compile(const char *arg)
570 {
571 return XSTRDUP(MTYPE_ROUTE_MAP_COMPILED, arg);
572 }
573
574 /* Free route map's compiled `ip address' value. */
575 static void route_match_ip_route_source_free(void *rule)
576 {
577 XFREE(MTYPE_ROUTE_MAP_COMPILED, rule);
578 }
579
580 /* Route map commands for ip route-source matching. */
581 static const struct route_map_rule_cmd route_match_ip_route_source_cmd = {
582 "ip route-source",
583 route_match_ip_route_source,
584 route_match_ip_route_source_compile,
585 route_match_ip_route_source_free
586 };
587
588 static enum route_map_cmd_result_t
589 route_match_prefix_list_flowspec(afi_t afi, struct prefix_list *plist,
590 const struct prefix *p)
591 {
592 int ret;
593 struct bgp_pbr_entry_main api;
594
595 memset(&api, 0, sizeof(api));
596
597 if (family2afi(p->u.prefix_flowspec.family) != afi)
598 return RMAP_NOMATCH;
599
600 /* extract match from flowspec entries */
601 ret = bgp_flowspec_match_rules_fill(
602 (uint8_t *)p->u.prefix_flowspec.ptr,
603 p->u.prefix_flowspec.prefixlen, &api,
604 afi);
605 if (ret < 0)
606 return RMAP_NOMATCH;
607 if (api.match_bitmask & PREFIX_DST_PRESENT ||
608 api.match_bitmask_iprule & PREFIX_DST_PRESENT) {
609 if (family2afi((&api.dst_prefix)->family) != afi)
610 return RMAP_NOMATCH;
611 return prefix_list_apply(plist, &api.dst_prefix) == PREFIX_DENY
612 ? RMAP_NOMATCH
613 : RMAP_MATCH;
614 } else if (api.match_bitmask & PREFIX_SRC_PRESENT ||
615 api.match_bitmask_iprule & PREFIX_SRC_PRESENT) {
616 if (family2afi((&api.src_prefix)->family) != afi)
617 return RMAP_NOMATCH;
618 return (prefix_list_apply(plist, &api.src_prefix) == PREFIX_DENY
619 ? RMAP_NOMATCH
620 : RMAP_MATCH);
621 }
622 return RMAP_NOMATCH;
623 }
624
625 static enum route_map_cmd_result_t
626 route_match_address_prefix_list(void *rule, afi_t afi,
627 const struct prefix *prefix,
628 route_map_object_t type, void *object)
629 {
630 struct prefix_list *plist;
631
632 if (type != RMAP_BGP)
633 return RMAP_NOMATCH;
634
635 plist = prefix_list_lookup(afi, (char *)rule);
636 if (plist == NULL)
637 return RMAP_NOMATCH;
638
639 if (prefix->family == AF_FLOWSPEC)
640 return route_match_prefix_list_flowspec(afi, plist,
641 prefix);
642 return (prefix_list_apply(plist, prefix) == PREFIX_DENY ? RMAP_NOMATCH
643 : RMAP_MATCH);
644 }
645
646 static enum route_map_cmd_result_t
647 route_match_ip_address_prefix_list(void *rule, const struct prefix *prefix,
648 route_map_object_t type, void *object)
649 {
650 return route_match_address_prefix_list(rule, AFI_IP, prefix, type,
651 object);
652 }
653
654 static void *route_match_ip_address_prefix_list_compile(const char *arg)
655 {
656 return XSTRDUP(MTYPE_ROUTE_MAP_COMPILED, arg);
657 }
658
659 static void route_match_ip_address_prefix_list_free(void *rule)
660 {
661 XFREE(MTYPE_ROUTE_MAP_COMPILED, rule);
662 }
663
664 static const struct route_map_rule_cmd
665 route_match_ip_address_prefix_list_cmd = {
666 "ip address prefix-list",
667 route_match_ip_address_prefix_list,
668 route_match_ip_address_prefix_list_compile,
669 route_match_ip_address_prefix_list_free
670 };
671
672 /* `match ip next-hop prefix-list PREFIX_LIST' */
673
674 static enum route_map_cmd_result_t
675 route_match_ip_next_hop_prefix_list(void *rule, const struct prefix *prefix,
676 route_map_object_t type, void *object)
677 {
678 struct prefix_list *plist;
679 struct bgp_path_info *path;
680 struct prefix_ipv4 p;
681
682 if (type == RMAP_BGP && prefix->family == AF_INET) {
683 path = object;
684 p.family = AF_INET;
685 p.prefix = path->attr->nexthop;
686 p.prefixlen = IPV4_MAX_BITLEN;
687
688 plist = prefix_list_lookup(AFI_IP, (char *)rule);
689 if (plist == NULL)
690 return RMAP_NOMATCH;
691
692 return (prefix_list_apply(plist, &p) == PREFIX_DENY
693 ? RMAP_NOMATCH
694 : RMAP_MATCH);
695 }
696 return RMAP_NOMATCH;
697 }
698
699 static void *route_match_ip_next_hop_prefix_list_compile(const char *arg)
700 {
701 return XSTRDUP(MTYPE_ROUTE_MAP_COMPILED, arg);
702 }
703
704 static void route_match_ip_next_hop_prefix_list_free(void *rule)
705 {
706 XFREE(MTYPE_ROUTE_MAP_COMPILED, rule);
707 }
708
709 static const struct route_map_rule_cmd
710 route_match_ip_next_hop_prefix_list_cmd = {
711 "ip next-hop prefix-list",
712 route_match_ip_next_hop_prefix_list,
713 route_match_ip_next_hop_prefix_list_compile,
714 route_match_ip_next_hop_prefix_list_free
715 };
716
717 /* `match ip next-hop type <blackhole>' */
718
719 static enum route_map_cmd_result_t
720 route_match_ip_next_hop_type(void *rule, const struct prefix *prefix,
721 route_map_object_t type, void *object)
722 {
723 struct bgp_path_info *path;
724
725 if (type == RMAP_BGP && prefix->family == AF_INET) {
726 path = (struct bgp_path_info *)object;
727 if (!path)
728 return RMAP_NOMATCH;
729
730 /* If nexthop interface's index can't be resolved and nexthop is
731 set to any address then mark it as type `blackhole`.
732 This logic works for matching kernel/static routes like:
733 `ip route add blackhole 10.0.0.1`. */
734 if (path->attr->nexthop.s_addr == INADDR_ANY
735 && !path->attr->nh_ifindex)
736 return RMAP_MATCH;
737 }
738 return RMAP_NOMATCH;
739 }
740
741 static void *route_match_ip_next_hop_type_compile(const char *arg)
742 {
743 return XSTRDUP(MTYPE_ROUTE_MAP_COMPILED, arg);
744 }
745
746 static void route_match_ip_next_hop_type_free(void *rule)
747 {
748 XFREE(MTYPE_ROUTE_MAP_COMPILED, rule);
749 }
750
751 static const struct route_map_rule_cmd
752 route_match_ip_next_hop_type_cmd = {
753 "ip next-hop type",
754 route_match_ip_next_hop_type,
755 route_match_ip_next_hop_type_compile,
756 route_match_ip_next_hop_type_free
757 };
758
759 /* `match ip route-source prefix-list PREFIX_LIST' */
760
761 static enum route_map_cmd_result_t
762 route_match_ip_route_source_prefix_list(void *rule,
763 const struct prefix *prefix,
764 route_map_object_t type, void *object)
765 {
766 struct prefix_list *plist;
767 struct bgp_path_info *path;
768 struct peer *peer;
769 struct prefix_ipv4 p;
770
771 if (type == RMAP_BGP && prefix->family == AF_INET) {
772 path = object;
773 peer = path->peer;
774
775 if (!peer || sockunion_family(&peer->su) != AF_INET)
776 return RMAP_NOMATCH;
777
778 p.family = AF_INET;
779 p.prefix = peer->su.sin.sin_addr;
780 p.prefixlen = IPV4_MAX_BITLEN;
781
782 plist = prefix_list_lookup(AFI_IP, (char *)rule);
783 if (plist == NULL)
784 return RMAP_NOMATCH;
785
786 return (prefix_list_apply(plist, &p) == PREFIX_DENY
787 ? RMAP_NOMATCH
788 : RMAP_MATCH);
789 }
790 return RMAP_NOMATCH;
791 }
792
793 static void *route_match_ip_route_source_prefix_list_compile(const char *arg)
794 {
795 return XSTRDUP(MTYPE_ROUTE_MAP_COMPILED, arg);
796 }
797
798 static void route_match_ip_route_source_prefix_list_free(void *rule)
799 {
800 XFREE(MTYPE_ROUTE_MAP_COMPILED, rule);
801 }
802
803 static const struct route_map_rule_cmd
804 route_match_ip_route_source_prefix_list_cmd = {
805 "ip route-source prefix-list",
806 route_match_ip_route_source_prefix_list,
807 route_match_ip_route_source_prefix_list_compile,
808 route_match_ip_route_source_prefix_list_free
809 };
810
811 /* `match evpn default-route' */
812
813 /* Match function should return 1 if match is success else 0 */
814 static enum route_map_cmd_result_t
815 route_match_evpn_default_route(void *rule, const struct prefix *p,
816 route_map_object_t type, void *object)
817 {
818 if (type == RMAP_BGP && is_evpn_prefix_default(p))
819 return RMAP_MATCH;
820
821 return RMAP_NOMATCH;
822 }
823
824 /* Route map commands for default-route matching. */
825 static const struct route_map_rule_cmd
826 route_match_evpn_default_route_cmd = {
827 "evpn default-route",
828 route_match_evpn_default_route,
829 NULL,
830 NULL
831 };
832
833 /* `match mac address MAC_ACCESS_LIST' */
834
835 /* Match function should return 1 if match is success else return
836 zero. */
837 static enum route_map_cmd_result_t
838 route_match_mac_address(void *rule, const struct prefix *prefix,
839 route_map_object_t type, void *object)
840 {
841 struct access_list *alist;
842 struct prefix p;
843
844 if (type == RMAP_BGP) {
845 alist = access_list_lookup(AFI_L2VPN, (char *)rule);
846 if (alist == NULL)
847 return RMAP_NOMATCH;
848
849 if (prefix->u.prefix_evpn.route_type != BGP_EVPN_MAC_IP_ROUTE)
850 return RMAP_NOMATCH;
851
852 p.family = AF_ETHERNET;
853 p.prefixlen = ETH_ALEN * 8;
854 p.u.prefix_eth = prefix->u.prefix_evpn.macip_addr.mac;
855
856 return (access_list_apply(alist, &p) == FILTER_DENY
857 ? RMAP_NOMATCH
858 : RMAP_MATCH);
859 }
860
861 return RMAP_NOMATCH;
862 }
863
864 /* Route map `mac address' match statement. `arg' should be
865 access-list name. */
866 static void *route_match_mac_address_compile(const char *arg)
867 {
868 return XSTRDUP(MTYPE_ROUTE_MAP_COMPILED, arg);
869 }
870
871 /* Free route map's compiled `ip address' value. */
872 static void route_match_mac_address_free(void *rule)
873 {
874 XFREE(MTYPE_ROUTE_MAP_COMPILED, rule);
875 }
876
877 /* Route map commands for mac address matching. */
878 static const struct route_map_rule_cmd route_match_mac_address_cmd = {
879 "mac address",
880 route_match_mac_address,
881 route_match_mac_address_compile,
882 route_match_mac_address_free
883 };
884
885 /*
886 * Match function returns:
887 * ...RMAP_MATCH if match is found.
888 * ...RMAP_NOMATCH if match is not found.
889 * ...RMAP_NOOP to ignore this match check.
890 */
891 static enum route_map_cmd_result_t
892 route_match_vni(void *rule, const struct prefix *prefix,
893 route_map_object_t type, void *object)
894 {
895 vni_t vni = 0;
896 unsigned int label_cnt = 0;
897 struct bgp_path_info *path = NULL;
898 struct prefix_evpn *evp = (struct prefix_evpn *) prefix;
899
900 if (type == RMAP_BGP) {
901 vni = *((vni_t *)rule);
902 path = (struct bgp_path_info *)object;
903
904 /*
905 * This rmap filter is valid for vxlan tunnel type only.
906 * For any other tunnel type, return noop to ignore
907 * this check.
908 */
909 if (path->attr->encap_tunneltype != BGP_ENCAP_TYPE_VXLAN)
910 return RMAP_NOOP;
911
912 /*
913 * Apply filter to type 1, 2, 5 routes only.
914 * Other route types do not have vni label.
915 */
916 if (evp && (evp->prefix.route_type != BGP_EVPN_AD_ROUTE &&
917 evp->prefix.route_type != BGP_EVPN_MAC_IP_ROUTE &&
918 evp->prefix.route_type != BGP_EVPN_IP_PREFIX_ROUTE))
919 return RMAP_NOOP;
920
921 if (path->extra == NULL)
922 return RMAP_NOMATCH;
923
924 for ( ; label_cnt < BGP_MAX_LABELS &&
925 label_cnt < path->extra->num_labels; label_cnt++) {
926 if (vni == label2vni(&path->extra->label[label_cnt]))
927 return RMAP_MATCH;
928 }
929 }
930
931 return RMAP_NOMATCH;
932 }
933
934 /* Route map `vni' match statement. */
935 static void *route_match_vni_compile(const char *arg)
936 {
937 vni_t *vni = NULL;
938 char *end = NULL;
939
940 vni = XMALLOC(MTYPE_ROUTE_MAP_COMPILED, sizeof(vni_t));
941
942 *vni = strtoul(arg, &end, 10);
943 if (*end != '\0') {
944 XFREE(MTYPE_ROUTE_MAP_COMPILED, vni);
945 return NULL;
946 }
947
948 return vni;
949 }
950
951 /* Free route map's compiled `vni' value. */
952 static void route_match_vni_free(void *rule)
953 {
954 XFREE(MTYPE_ROUTE_MAP_COMPILED, rule);
955 }
956
957 /* Route map commands for vni matching. */
958 static const struct route_map_rule_cmd route_match_evpn_vni_cmd = {
959 "evpn vni",
960 route_match_vni,
961 route_match_vni_compile,
962 route_match_vni_free
963 };
964
965 /* `match evpn route-type' */
966
967 /* Match function should return 1 if match is success else return
968 zero. */
969 static enum route_map_cmd_result_t
970 route_match_evpn_route_type(void *rule, const struct prefix *pfx,
971 route_map_object_t type, void *object)
972 {
973 uint8_t route_type = 0;
974
975 if (type == RMAP_BGP) {
976 route_type = *((uint8_t *)rule);
977
978 if (route_type == pfx->u.prefix_evpn.route_type)
979 return RMAP_MATCH;
980 }
981
982 return RMAP_NOMATCH;
983 }
984
985 /* Route map `route-type' match statement. */
986 static void *route_match_evpn_route_type_compile(const char *arg)
987 {
988 uint8_t *route_type = NULL;
989
990 route_type = XMALLOC(MTYPE_ROUTE_MAP_COMPILED, sizeof(uint8_t));
991
992 if (strncmp(arg, "ma", 2) == 0)
993 *route_type = BGP_EVPN_MAC_IP_ROUTE;
994 else if (strncmp(arg, "mu", 2) == 0)
995 *route_type = BGP_EVPN_IMET_ROUTE;
996 else
997 *route_type = BGP_EVPN_IP_PREFIX_ROUTE;
998
999 return route_type;
1000 }
1001
1002 /* Free route map's compiled `route-type' value. */
1003 static void route_match_evpn_route_type_free(void *rule)
1004 {
1005 XFREE(MTYPE_ROUTE_MAP_COMPILED, rule);
1006 }
1007
1008 /* Route map commands for evpn route-type matching. */
1009 static const struct route_map_rule_cmd route_match_evpn_route_type_cmd = {
1010 "evpn route-type",
1011 route_match_evpn_route_type,
1012 route_match_evpn_route_type_compile,
1013 route_match_evpn_route_type_free
1014 };
1015
1016 /* `match rd' */
1017
1018 /* Match function should return 1 if match is success else return zero. */
1019 static enum route_map_cmd_result_t
1020 route_match_rd(void *rule, const struct prefix *prefix,
1021 route_map_object_t type, void *object)
1022 {
1023 struct prefix_rd *prd_rule = NULL;
1024 const struct prefix_rd *prd_route = NULL;
1025 struct bgp_path_info *path = NULL;
1026
1027 if (type == RMAP_BGP) {
1028 if (prefix->family != AF_EVPN)
1029 return RMAP_NOMATCH;
1030
1031 prd_rule = (struct prefix_rd *)rule;
1032 path = (struct bgp_path_info *)object;
1033
1034 if (path->net == NULL || path->net->pdest == NULL)
1035 return RMAP_NOMATCH;
1036
1037 prd_route = (struct prefix_rd *)bgp_dest_get_prefix(
1038 path->net->pdest);
1039 if (memcmp(prd_route->val, prd_rule->val, ECOMMUNITY_SIZE) == 0)
1040 return RMAP_MATCH;
1041 }
1042
1043 return RMAP_NOMATCH;
1044 }
1045
1046 /* Route map `rd' match statement. */
1047 static void *route_match_rd_compile(const char *arg)
1048 {
1049 struct prefix_rd *prd;
1050 int ret;
1051
1052 prd = XMALLOC(MTYPE_ROUTE_MAP_COMPILED, sizeof(struct prefix_rd));
1053
1054 ret = str2prefix_rd(arg, prd);
1055 if (!ret) {
1056 XFREE(MTYPE_ROUTE_MAP_COMPILED, prd);
1057 return NULL;
1058 }
1059
1060 return prd;
1061 }
1062
1063 /* Free route map's compiled `rd' value. */
1064 static void route_match_rd_free(void *rule)
1065 {
1066 XFREE(MTYPE_ROUTE_MAP_COMPILED, rule);
1067 }
1068
1069 /* Route map commands for rd matching. */
1070 static const struct route_map_rule_cmd route_match_evpn_rd_cmd = {
1071 "evpn rd",
1072 route_match_rd,
1073 route_match_rd_compile,
1074 route_match_rd_free
1075 };
1076
1077 /* Route map commands for VRF route leak with source vrf matching */
1078 static enum route_map_cmd_result_t
1079 route_match_vrl_source_vrf(void *rule, const struct prefix *prefix,
1080 route_map_object_t type, void *object)
1081 {
1082 struct bgp_path_info *path;
1083 char *vrf_name;
1084
1085 if (type == RMAP_BGP) {
1086 vrf_name = rule;
1087 path = (struct bgp_path_info *)object;
1088
1089 if (strncmp(vrf_name, "n/a", VRF_NAMSIZ) == 0)
1090 return RMAP_NOMATCH;
1091
1092 if (path->extra == NULL)
1093 return RMAP_NOMATCH;
1094
1095 if (strncmp(vrf_name, vrf_id_to_name(
1096 path->extra->bgp_orig->vrf_id), VRF_NAMSIZ)
1097 == 0)
1098 return RMAP_MATCH;
1099 }
1100
1101 return RMAP_NOMATCH;
1102 }
1103
1104 static void *route_match_vrl_source_vrf_compile(const char *arg)
1105 {
1106 uint8_t *vrf_name = NULL;
1107
1108 vrf_name = XSTRDUP(MTYPE_ROUTE_MAP_COMPILED, arg);
1109
1110 return vrf_name;
1111 }
1112
1113 /* Free route map's compiled `route-type' value. */
1114 static void route_match_vrl_source_vrf_free(void *rule)
1115 {
1116 XFREE(MTYPE_ROUTE_MAP_COMPILED, rule);
1117 }
1118
1119 static const struct route_map_rule_cmd route_match_vrl_source_vrf_cmd = {
1120 "source-vrf",
1121 route_match_vrl_source_vrf,
1122 route_match_vrl_source_vrf_compile,
1123 route_match_vrl_source_vrf_free
1124 };
1125
1126 /* `match local-preference LOCAL-PREF' */
1127
1128 /* Match function return 1 if match is success else return zero. */
1129 static enum route_map_cmd_result_t
1130 route_match_local_pref(void *rule, const struct prefix *prefix,
1131 route_map_object_t type, void *object)
1132 {
1133 uint32_t *local_pref;
1134 struct bgp_path_info *path;
1135
1136 if (type == RMAP_BGP) {
1137 local_pref = rule;
1138 path = object;
1139
1140 if (path->attr->local_pref == *local_pref)
1141 return RMAP_MATCH;
1142 else
1143 return RMAP_NOMATCH;
1144 }
1145 return RMAP_NOMATCH;
1146 }
1147
1148 /*
1149 * Route map `match local-preference' match statement.
1150 * `arg' is local-pref value
1151 */
1152 static void *route_match_local_pref_compile(const char *arg)
1153 {
1154 uint32_t *local_pref;
1155 char *endptr = NULL;
1156 unsigned long tmpval;
1157
1158 /* Locpref value shoud be integer. */
1159 if (!all_digit(arg))
1160 return NULL;
1161
1162 errno = 0;
1163 tmpval = strtoul(arg, &endptr, 10);
1164 if (*endptr != '\0' || errno || tmpval > UINT32_MAX)
1165 return NULL;
1166
1167 local_pref = XMALLOC(MTYPE_ROUTE_MAP_COMPILED, sizeof(uint32_t));
1168
1169 *local_pref = tmpval;
1170 return local_pref;
1171 }
1172
1173 /* Free route map's compiled `match local-preference' value. */
1174 static void route_match_local_pref_free(void *rule)
1175 {
1176 XFREE(MTYPE_ROUTE_MAP_COMPILED, rule);
1177 }
1178
1179 /* Route map commands for metric matching. */
1180 static const struct route_map_rule_cmd route_match_local_pref_cmd = {
1181 "local-preference",
1182 route_match_local_pref,
1183 route_match_local_pref_compile,
1184 route_match_local_pref_free
1185 };
1186
1187 /* `match metric METRIC' */
1188
1189 /* Match function return 1 if match is success else return zero. */
1190 static enum route_map_cmd_result_t
1191 route_match_metric(void *rule, const struct prefix *prefix,
1192 route_map_object_t type, void *object)
1193 {
1194 struct rmap_value *rv;
1195 struct bgp_path_info *path;
1196
1197 if (type == RMAP_BGP) {
1198 rv = rule;
1199 path = object;
1200 return route_value_match(rv, path->attr->med);
1201 }
1202 return RMAP_NOMATCH;
1203 }
1204
1205 /* Route map commands for metric matching. */
1206 static const struct route_map_rule_cmd route_match_metric_cmd = {
1207 "metric",
1208 route_match_metric,
1209 route_value_compile,
1210 route_value_free,
1211 };
1212
1213 /* `match as-path ASPATH' */
1214
1215 /* Match function for as-path match. I assume given object is */
1216 static enum route_map_cmd_result_t
1217 route_match_aspath(void *rule, const struct prefix *prefix,
1218 route_map_object_t type, void *object)
1219 {
1220
1221 struct as_list *as_list;
1222 struct bgp_path_info *path;
1223
1224 if (type == RMAP_BGP) {
1225 as_list = as_list_lookup((char *)rule);
1226 if (as_list == NULL)
1227 return RMAP_NOMATCH;
1228
1229 path = object;
1230
1231 /* Perform match. */
1232 return ((as_list_apply(as_list, path->attr->aspath)
1233 == AS_FILTER_DENY)
1234 ? RMAP_NOMATCH
1235 : RMAP_MATCH);
1236 }
1237 return RMAP_NOMATCH;
1238 }
1239
1240 /* Compile function for as-path match. */
1241 static void *route_match_aspath_compile(const char *arg)
1242 {
1243 return XSTRDUP(MTYPE_ROUTE_MAP_COMPILED, arg);
1244 }
1245
1246 /* Compile function for as-path match. */
1247 static void route_match_aspath_free(void *rule)
1248 {
1249 XFREE(MTYPE_ROUTE_MAP_COMPILED, rule);
1250 }
1251
1252 /* Route map commands for aspath matching. */
1253 static const struct route_map_rule_cmd route_match_aspath_cmd = {
1254 "as-path",
1255 route_match_aspath,
1256 route_match_aspath_compile,
1257 route_match_aspath_free
1258 };
1259
1260 /* `match community COMMUNIY' */
1261 struct rmap_community {
1262 char *name;
1263 uint32_t name_hash;
1264 int exact;
1265 };
1266
1267 /* Match function for community match. */
1268 static enum route_map_cmd_result_t
1269 route_match_community(void *rule, const struct prefix *prefix,
1270 route_map_object_t type, void *object)
1271 {
1272 struct community_list *list;
1273 struct bgp_path_info *path;
1274 struct rmap_community *rcom = rule;
1275
1276 if (type == RMAP_BGP) {
1277 path = object;
1278 rcom = rule;
1279
1280 list = community_list_lookup(bgp_clist, rcom->name,
1281 rcom->name_hash,
1282 COMMUNITY_LIST_MASTER);
1283 if (!list)
1284 return RMAP_NOMATCH;
1285
1286 if (rcom->exact) {
1287 if (community_list_exact_match(path->attr->community,
1288 list))
1289 return RMAP_MATCH;
1290 } else {
1291 if (community_list_match(path->attr->community, list))
1292 return RMAP_MATCH;
1293 }
1294 }
1295 return RMAP_NOMATCH;
1296 }
1297
1298 /* Compile function for community match. */
1299 static void *route_match_community_compile(const char *arg)
1300 {
1301 struct rmap_community *rcom;
1302 int len;
1303 char *p;
1304
1305 rcom = XCALLOC(MTYPE_ROUTE_MAP_COMPILED, sizeof(struct rmap_community));
1306
1307 p = strchr(arg, ' ');
1308 if (p) {
1309 len = p - arg;
1310 rcom->name = XCALLOC(MTYPE_ROUTE_MAP_COMPILED, len + 1);
1311 memcpy(rcom->name, arg, len);
1312 rcom->exact = 1;
1313 } else {
1314 rcom->name = XSTRDUP(MTYPE_ROUTE_MAP_COMPILED, arg);
1315 rcom->exact = 0;
1316 }
1317
1318 rcom->name_hash = bgp_clist_hash_key(rcom->name);
1319 return rcom;
1320 }
1321
1322 /* Compile function for community match. */
1323 static void route_match_community_free(void *rule)
1324 {
1325 struct rmap_community *rcom = rule;
1326
1327 XFREE(MTYPE_ROUTE_MAP_COMPILED, rcom->name);
1328 XFREE(MTYPE_ROUTE_MAP_COMPILED, rcom);
1329 }
1330
1331 /*
1332 * In routemap processing there is a need to add the
1333 * name as a rule_key in the dependency table. Routemap
1334 * lib is unaware of rule_key when exact-match clause
1335 * is in use. routemap lib uses the compiled output to
1336 * get the rule_key value.
1337 */
1338 static void *route_match_get_community_key(void *rule)
1339 {
1340 struct rmap_community *rcom;
1341
1342 rcom = rule;
1343 return rcom->name;
1344 }
1345
1346
1347 /* Route map commands for community matching. */
1348 static const struct route_map_rule_cmd route_match_community_cmd = {
1349 "community",
1350 route_match_community,
1351 route_match_community_compile,
1352 route_match_community_free,
1353 route_match_get_community_key
1354 };
1355
1356 /* Match function for lcommunity match. */
1357 static enum route_map_cmd_result_t
1358 route_match_lcommunity(void *rule, const struct prefix *prefix,
1359 route_map_object_t type, void *object)
1360 {
1361 struct community_list *list;
1362 struct bgp_path_info *path;
1363 struct rmap_community *rcom = rule;
1364
1365 if (type == RMAP_BGP) {
1366 path = object;
1367
1368 list = community_list_lookup(bgp_clist, rcom->name,
1369 rcom->name_hash,
1370 LARGE_COMMUNITY_LIST_MASTER);
1371 if (!list)
1372 return RMAP_NOMATCH;
1373
1374 if (rcom->exact) {
1375 if (lcommunity_list_exact_match(
1376 path->attr->lcommunity,
1377 list))
1378 return RMAP_MATCH;
1379 } else {
1380 if (lcommunity_list_match(
1381 path->attr->lcommunity,
1382 list))
1383 return RMAP_MATCH;
1384 }
1385 }
1386 return RMAP_NOMATCH;
1387 }
1388
1389 /* Compile function for community match. */
1390 static void *route_match_lcommunity_compile(const char *arg)
1391 {
1392 struct rmap_community *rcom;
1393 int len;
1394 char *p;
1395
1396 rcom = XCALLOC(MTYPE_ROUTE_MAP_COMPILED, sizeof(struct rmap_community));
1397
1398 p = strchr(arg, ' ');
1399 if (p) {
1400 len = p - arg;
1401 rcom->name = XCALLOC(MTYPE_ROUTE_MAP_COMPILED, len + 1);
1402 memcpy(rcom->name, arg, len);
1403 rcom->exact = 1;
1404 } else {
1405 rcom->name = XSTRDUP(MTYPE_ROUTE_MAP_COMPILED, arg);
1406 rcom->exact = 0;
1407 }
1408
1409 rcom->name_hash = bgp_clist_hash_key(rcom->name);
1410 return rcom;
1411 }
1412
1413 /* Compile function for community match. */
1414 static void route_match_lcommunity_free(void *rule)
1415 {
1416 struct rmap_community *rcom = rule;
1417
1418 XFREE(MTYPE_ROUTE_MAP_COMPILED, rcom->name);
1419 XFREE(MTYPE_ROUTE_MAP_COMPILED, rcom);
1420 }
1421
1422 /* Route map commands for community matching. */
1423 static const struct route_map_rule_cmd route_match_lcommunity_cmd = {
1424 "large-community",
1425 route_match_lcommunity,
1426 route_match_lcommunity_compile,
1427 route_match_lcommunity_free,
1428 route_match_get_community_key
1429 };
1430
1431
1432 /* Match function for extcommunity match. */
1433 static enum route_map_cmd_result_t
1434 route_match_ecommunity(void *rule, const struct prefix *prefix,
1435 route_map_object_t type, void *object)
1436 {
1437 struct community_list *list;
1438 struct bgp_path_info *path;
1439 struct rmap_community *rcom = rule;
1440
1441 if (type == RMAP_BGP) {
1442 path = object;
1443
1444 list = community_list_lookup(bgp_clist, rcom->name,
1445 rcom->name_hash,
1446 EXTCOMMUNITY_LIST_MASTER);
1447 if (!list)
1448 return RMAP_NOMATCH;
1449
1450 if (ecommunity_list_match(path->attr->ecommunity, list))
1451 return RMAP_MATCH;
1452 }
1453 return RMAP_NOMATCH;
1454 }
1455
1456 /* Compile function for extcommunity match. */
1457 static void *route_match_ecommunity_compile(const char *arg)
1458 {
1459 struct rmap_community *rcom;
1460
1461 rcom = XCALLOC(MTYPE_ROUTE_MAP_COMPILED, sizeof(struct rmap_community));
1462 rcom->name = XSTRDUP(MTYPE_ROUTE_MAP_COMPILED, arg);
1463 rcom->name_hash = bgp_clist_hash_key(rcom->name);
1464
1465 return rcom;
1466 }
1467
1468 /* Compile function for extcommunity match. */
1469 static void route_match_ecommunity_free(void *rule)
1470 {
1471 struct rmap_community *rcom = rule;
1472
1473 XFREE(MTYPE_ROUTE_MAP_COMPILED, rcom->name);
1474 XFREE(MTYPE_ROUTE_MAP_COMPILED, rcom);
1475 }
1476
1477 /* Route map commands for community matching. */
1478 static const struct route_map_rule_cmd route_match_ecommunity_cmd = {
1479 "extcommunity",
1480 route_match_ecommunity,
1481 route_match_ecommunity_compile,
1482 route_match_ecommunity_free
1483 };
1484
1485 /* `match nlri` and `set nlri` are replaced by `address-family ipv4`
1486 and `address-family vpnv4'. */
1487
1488 /* `match origin' */
1489 static enum route_map_cmd_result_t
1490 route_match_origin(void *rule, const struct prefix *prefix,
1491 route_map_object_t type, void *object)
1492 {
1493 uint8_t *origin;
1494 struct bgp_path_info *path;
1495
1496 if (type == RMAP_BGP) {
1497 origin = rule;
1498 path = object;
1499
1500 if (path->attr->origin == *origin)
1501 return RMAP_MATCH;
1502 }
1503
1504 return RMAP_NOMATCH;
1505 }
1506
1507 static void *route_match_origin_compile(const char *arg)
1508 {
1509 uint8_t *origin;
1510
1511 origin = XMALLOC(MTYPE_ROUTE_MAP_COMPILED, sizeof(uint8_t));
1512
1513 if (strcmp(arg, "igp") == 0)
1514 *origin = 0;
1515 else if (strcmp(arg, "egp") == 0)
1516 *origin = 1;
1517 else
1518 *origin = 2;
1519
1520 return origin;
1521 }
1522
1523 /* Free route map's compiled `ip address' value. */
1524 static void route_match_origin_free(void *rule)
1525 {
1526 XFREE(MTYPE_ROUTE_MAP_COMPILED, rule);
1527 }
1528
1529 /* Route map commands for origin matching. */
1530 static const struct route_map_rule_cmd route_match_origin_cmd = {
1531 "origin",
1532 route_match_origin,
1533 route_match_origin_compile,
1534 route_match_origin_free
1535 };
1536
1537 /* match probability { */
1538
1539 static enum route_map_cmd_result_t
1540 route_match_probability(void *rule, const struct prefix *prefix,
1541 route_map_object_t type, void *object)
1542 {
1543 long r = frr_weak_random();
1544
1545 switch (*(long *)rule) {
1546 case 0:
1547 break;
1548 case RAND_MAX:
1549 return RMAP_MATCH;
1550 default:
1551 if (r < *(long *)rule) {
1552 return RMAP_MATCH;
1553 }
1554 }
1555
1556 return RMAP_NOMATCH;
1557 }
1558
1559 static void *route_match_probability_compile(const char *arg)
1560 {
1561 long *lobule;
1562 unsigned perc;
1563
1564 perc = atoi(arg);
1565 lobule = XMALLOC(MTYPE_ROUTE_MAP_COMPILED, sizeof(long));
1566
1567 switch (perc) {
1568 case 0:
1569 *lobule = 0;
1570 break;
1571 case 100:
1572 *lobule = RAND_MAX;
1573 break;
1574 default:
1575 *lobule = RAND_MAX / 100 * perc;
1576 }
1577
1578 return lobule;
1579 }
1580
1581 static void route_match_probability_free(void *rule)
1582 {
1583 XFREE(MTYPE_ROUTE_MAP_COMPILED, rule);
1584 }
1585
1586 static const struct route_map_rule_cmd route_match_probability_cmd = {
1587 "probability",
1588 route_match_probability,
1589 route_match_probability_compile,
1590 route_match_probability_free
1591 };
1592
1593 /* `match interface IFNAME' */
1594 /* Match function should return 1 if match is success else return
1595 zero. */
1596 static enum route_map_cmd_result_t
1597 route_match_interface(void *rule, const struct prefix *prefix,
1598 route_map_object_t type, void *object)
1599 {
1600 struct interface *ifp;
1601 struct bgp_path_info *path;
1602
1603 if (type == RMAP_BGP) {
1604 path = object;
1605
1606 if (!path)
1607 return RMAP_NOMATCH;
1608
1609 ifp = if_lookup_by_name_all_vrf((char *)rule);
1610
1611 if (ifp == NULL || ifp->ifindex != path->attr->nh_ifindex)
1612 return RMAP_NOMATCH;
1613
1614 return RMAP_MATCH;
1615 }
1616 return RMAP_NOMATCH;
1617 }
1618
1619 /* Route map `interface' match statement. `arg' should be
1620 interface name. */
1621 static void *route_match_interface_compile(const char *arg)
1622 {
1623 return XSTRDUP(MTYPE_ROUTE_MAP_COMPILED, arg);
1624 }
1625
1626 /* Free route map's compiled `interface' value. */
1627 static void route_match_interface_free(void *rule)
1628 {
1629 XFREE(MTYPE_ROUTE_MAP_COMPILED, rule);
1630 }
1631
1632 /* Route map commands for ip address matching. */
1633 static const struct route_map_rule_cmd route_match_interface_cmd = {
1634 "interface",
1635 route_match_interface,
1636 route_match_interface_compile,
1637 route_match_interface_free
1638 };
1639
1640 /* } */
1641
1642 /* `set ip next-hop IP_ADDRESS' */
1643
1644 /* Match function return 1 if match is success else return zero. */
1645 static enum route_map_cmd_result_t
1646 route_match_tag(void *rule, const struct prefix *prefix,
1647 route_map_object_t type, void *object)
1648 {
1649 route_tag_t *tag;
1650 struct bgp_path_info *path;
1651
1652 if (type == RMAP_BGP) {
1653 tag = rule;
1654 path = object;
1655
1656 return ((path->attr->tag == *tag) ? RMAP_MATCH : RMAP_NOMATCH);
1657 }
1658
1659 return RMAP_NOMATCH;
1660 }
1661
1662
1663 /* Route map commands for tag matching. */
1664 static const struct route_map_rule_cmd route_match_tag_cmd = {
1665 "tag",
1666 route_match_tag,
1667 route_map_rule_tag_compile,
1668 route_map_rule_tag_free,
1669 };
1670
1671 static enum route_map_cmd_result_t
1672 route_set_srte_color(void *rule, const struct prefix *prefix,
1673 route_map_object_t type, void *object)
1674 {
1675 uint32_t *srte_color = rule;
1676 struct bgp_path_info *path;
1677
1678 if (type != RMAP_BGP)
1679 return RMAP_OKAY;
1680
1681 path = object;
1682
1683 path->attr->srte_color = *srte_color;
1684 path->attr->flag |= ATTR_FLAG_BIT(BGP_ATTR_SRTE_COLOR);
1685
1686 return RMAP_OKAY;
1687 }
1688
1689 /* Route map `sr-te color' compile function */
1690 static void *route_set_srte_color_compile(const char *arg)
1691 {
1692 uint32_t *color;
1693
1694 color = XMALLOC(MTYPE_ROUTE_MAP_COMPILED, sizeof(uint32_t));
1695 *color = atoi(arg);
1696
1697 return color;
1698 }
1699
1700 /* Free route map's compiled `sr-te color' value. */
1701 static void route_set_srte_color_free(void *rule)
1702 {
1703 XFREE(MTYPE_ROUTE_MAP_COMPILED, rule);
1704 }
1705
1706 /* Route map commands for sr-te color set. */
1707 struct route_map_rule_cmd route_set_srte_color_cmd = {
1708 "sr-te color", route_set_srte_color, route_set_srte_color_compile,
1709 route_set_srte_color_free};
1710
1711 /* Set nexthop to object. ojbect must be pointer to struct attr. */
1712 struct rmap_ip_nexthop_set {
1713 struct in_addr *address;
1714 int peer_address;
1715 int unchanged;
1716 };
1717
1718 static enum route_map_cmd_result_t
1719 route_set_ip_nexthop(void *rule, const struct prefix *prefix,
1720 route_map_object_t type, void *object)
1721 {
1722 struct rmap_ip_nexthop_set *rins = rule;
1723 struct bgp_path_info *path;
1724 struct peer *peer;
1725
1726 if (type != RMAP_BGP)
1727 return RMAP_OKAY;
1728
1729 if (prefix->family == AF_INET6)
1730 return RMAP_OKAY;
1731
1732 path = object;
1733 peer = path->peer;
1734
1735 if (rins->unchanged) {
1736 SET_FLAG(path->attr->rmap_change_flags,
1737 BATTR_RMAP_NEXTHOP_UNCHANGED);
1738 } else if (rins->peer_address) {
1739 if ((CHECK_FLAG(peer->rmap_type, PEER_RMAP_TYPE_IN)
1740 || CHECK_FLAG(peer->rmap_type, PEER_RMAP_TYPE_IMPORT))
1741 && peer->su_remote
1742 && sockunion_family(peer->su_remote) == AF_INET) {
1743 path->attr->nexthop.s_addr =
1744 sockunion2ip(peer->su_remote);
1745 path->attr->flag |= ATTR_FLAG_BIT(BGP_ATTR_NEXT_HOP);
1746 } else if (CHECK_FLAG(peer->rmap_type, PEER_RMAP_TYPE_OUT)) {
1747 /* The next hop value will be set as part of
1748 * packet rewrite. Set the flags here to indicate
1749 * that rewrite needs to be done.
1750 * Also, clear the value.
1751 */
1752 SET_FLAG(path->attr->rmap_change_flags,
1753 BATTR_RMAP_NEXTHOP_PEER_ADDRESS);
1754 path->attr->nexthop.s_addr = INADDR_ANY;
1755 }
1756 } else {
1757 /* Set next hop value. */
1758 path->attr->flag |= ATTR_FLAG_BIT(BGP_ATTR_NEXT_HOP);
1759 path->attr->nexthop = *rins->address;
1760 SET_FLAG(path->attr->rmap_change_flags,
1761 BATTR_RMAP_IPV4_NHOP_CHANGED);
1762 /* case for MP-BGP : MPLS VPN */
1763 path->attr->mp_nexthop_global_in = *rins->address;
1764 path->attr->mp_nexthop_len = sizeof(*rins->address);
1765 }
1766
1767 return RMAP_OKAY;
1768 }
1769
1770 /* Route map `ip nexthop' compile function. Given string is converted
1771 to struct in_addr structure. */
1772 static void *route_set_ip_nexthop_compile(const char *arg)
1773 {
1774 struct rmap_ip_nexthop_set *rins;
1775 struct in_addr *address = NULL;
1776 int peer_address = 0;
1777 int unchanged = 0;
1778 int ret;
1779
1780 if (strcmp(arg, "peer-address") == 0)
1781 peer_address = 1;
1782 else if (strcmp(arg, "unchanged") == 0)
1783 unchanged = 1;
1784 else {
1785 address = XMALLOC(MTYPE_ROUTE_MAP_COMPILED,
1786 sizeof(struct in_addr));
1787 ret = inet_aton(arg, address);
1788
1789 if (ret == 0) {
1790 XFREE(MTYPE_ROUTE_MAP_COMPILED, address);
1791 return NULL;
1792 }
1793 }
1794
1795 rins = XCALLOC(MTYPE_ROUTE_MAP_COMPILED,
1796 sizeof(struct rmap_ip_nexthop_set));
1797
1798 rins->address = address;
1799 rins->peer_address = peer_address;
1800 rins->unchanged = unchanged;
1801
1802 return rins;
1803 }
1804
1805 /* Free route map's compiled `ip nexthop' value. */
1806 static void route_set_ip_nexthop_free(void *rule)
1807 {
1808 struct rmap_ip_nexthop_set *rins = rule;
1809
1810 XFREE(MTYPE_ROUTE_MAP_COMPILED, rins->address);
1811
1812 XFREE(MTYPE_ROUTE_MAP_COMPILED, rins);
1813 }
1814
1815 /* Route map commands for ip nexthop set. */
1816 static const struct route_map_rule_cmd route_set_ip_nexthop_cmd = {
1817 "ip next-hop",
1818 route_set_ip_nexthop,
1819 route_set_ip_nexthop_compile,
1820 route_set_ip_nexthop_free
1821 };
1822
1823 /* `set local-preference LOCAL_PREF' */
1824
1825 /* Set local preference. */
1826 static enum route_map_cmd_result_t
1827 route_set_local_pref(void *rule, const struct prefix *prefix,
1828 route_map_object_t type, void *object)
1829 {
1830 struct rmap_value *rv;
1831 struct bgp_path_info *path;
1832 uint32_t locpref = 0;
1833
1834 if (type == RMAP_BGP) {
1835 /* Fetch routemap's rule information. */
1836 rv = rule;
1837 path = object;
1838
1839 /* Set local preference value. */
1840 if (path->attr->flag & ATTR_FLAG_BIT(BGP_ATTR_LOCAL_PREF))
1841 locpref = path->attr->local_pref;
1842
1843 path->attr->flag |= ATTR_FLAG_BIT(BGP_ATTR_LOCAL_PREF);
1844 path->attr->local_pref =
1845 route_value_adjust(rv, locpref, path->peer);
1846 }
1847
1848 return RMAP_OKAY;
1849 }
1850
1851 /* Set local preference rule structure. */
1852 static const struct route_map_rule_cmd route_set_local_pref_cmd = {
1853 "local-preference",
1854 route_set_local_pref,
1855 route_value_compile,
1856 route_value_free,
1857 };
1858
1859 /* `set weight WEIGHT' */
1860
1861 /* Set weight. */
1862 static enum route_map_cmd_result_t
1863 route_set_weight(void *rule, const struct prefix *prefix,
1864 route_map_object_t type, void *object)
1865 {
1866 struct rmap_value *rv;
1867 struct bgp_path_info *path;
1868
1869 if (type == RMAP_BGP) {
1870 /* Fetch routemap's rule information. */
1871 rv = rule;
1872 path = object;
1873
1874 /* Set weight value. */
1875 path->attr->weight = route_value_adjust(rv, 0, path->peer);
1876 }
1877
1878 return RMAP_OKAY;
1879 }
1880
1881 /* Set local preference rule structure. */
1882 static const struct route_map_rule_cmd route_set_weight_cmd = {
1883 "weight",
1884 route_set_weight,
1885 route_value_compile,
1886 route_value_free,
1887 };
1888
1889 /* `set distance DISTANCE */
1890 static enum route_map_cmd_result_t
1891 route_set_distance(void *rule, const struct prefix *prefix,
1892 route_map_object_t type, void *object)
1893 {
1894 struct bgp_path_info *path = object;
1895 struct rmap_value *rv = rule;
1896
1897 if (type != RMAP_BGP)
1898 return RMAP_OKAY;
1899
1900 path->attr->distance = rv->value;
1901
1902 return RMAP_OKAY;
1903 }
1904
1905 /* set distance rule structure */
1906 static const struct route_map_rule_cmd route_set_distance_cmd = {
1907 "distance",
1908 route_set_distance,
1909 route_value_compile,
1910 route_value_free,
1911 };
1912
1913 /* `set metric METRIC' */
1914
1915 /* Set metric to attribute. */
1916 static enum route_map_cmd_result_t
1917 route_set_metric(void *rule, const struct prefix *prefix,
1918 route_map_object_t type, void *object)
1919 {
1920 struct rmap_value *rv;
1921 struct bgp_path_info *path;
1922 uint32_t med = 0;
1923
1924 if (type == RMAP_BGP) {
1925 /* Fetch routemap's rule information. */
1926 rv = rule;
1927 path = object;
1928
1929 if (path->attr->flag & ATTR_FLAG_BIT(BGP_ATTR_MULTI_EXIT_DISC))
1930 med = path->attr->med;
1931
1932 path->attr->med = route_value_adjust(rv, med, path->peer);
1933 path->attr->flag |= ATTR_FLAG_BIT(BGP_ATTR_MULTI_EXIT_DISC);
1934 }
1935 return RMAP_OKAY;
1936 }
1937
1938 /* Set metric rule structure. */
1939 static const struct route_map_rule_cmd route_set_metric_cmd = {
1940 "metric",
1941 route_set_metric,
1942 route_value_compile,
1943 route_value_free,
1944 };
1945
1946 /* `set table (1-4294967295)' */
1947
1948 static enum route_map_cmd_result_t route_set_table_id(void *rule,
1949 const struct prefix *prefix,
1950 route_map_object_t type,
1951 void *object)
1952 {
1953 struct rmap_value *rv;
1954 struct bgp_path_info *path;
1955
1956 if (type == RMAP_BGP) {
1957 /* Fetch routemap's rule information. */
1958 rv = rule;
1959 path = object;
1960
1961 path->attr->rmap_table_id = rv->value;
1962 }
1963 return RMAP_OKAY;
1964 }
1965
1966 /* Set table_id rule structure. */
1967 static const struct route_map_rule_cmd route_set_table_id_cmd = {
1968 "table",
1969 route_set_table_id,
1970 route_value_compile,
1971 route_value_free
1972 };
1973
1974 /* `set as-path prepend ASPATH' */
1975
1976 /* For AS path prepend mechanism. */
1977 static enum route_map_cmd_result_t
1978 route_set_aspath_prepend(void *rule, const struct prefix *prefix,
1979 route_map_object_t type, void *object)
1980 {
1981 struct aspath *aspath;
1982 struct aspath *new;
1983 struct bgp_path_info *path;
1984
1985 if (type == RMAP_BGP) {
1986 path = object;
1987
1988 if (path->attr->aspath->refcnt)
1989 new = aspath_dup(path->attr->aspath);
1990 else
1991 new = path->attr->aspath;
1992
1993 if ((uintptr_t)rule > 10) {
1994 aspath = rule;
1995 aspath_prepend(aspath, new);
1996 } else {
1997 as_t as = aspath_leftmost(new);
1998 if (!as)
1999 as = path->peer->as;
2000 new = aspath_add_seq_n(new, as, (uintptr_t)rule);
2001 }
2002
2003 path->attr->aspath = new;
2004 }
2005
2006 return RMAP_OKAY;
2007 }
2008
2009 static void *route_set_aspath_prepend_compile(const char *arg)
2010 {
2011 unsigned int num;
2012
2013 if (sscanf(arg, "last-as %u", &num) == 1 && num > 0 && num <= 10)
2014 return (void *)(uintptr_t)num;
2015
2016 return route_aspath_compile(arg);
2017 }
2018
2019 static void route_set_aspath_prepend_free(void *rule)
2020 {
2021 if ((uintptr_t)rule > 10)
2022 route_aspath_free(rule);
2023 }
2024
2025
2026 /* Set as-path prepend rule structure. */
2027 static const struct route_map_rule_cmd route_set_aspath_prepend_cmd = {
2028 "as-path prepend",
2029 route_set_aspath_prepend,
2030 route_set_aspath_prepend_compile,
2031 route_set_aspath_prepend_free,
2032 };
2033
2034 /* `set as-path exclude ASn' */
2035
2036 /* For ASN exclude mechanism.
2037 * Iterate over ASns requested and filter them from the given AS_PATH one by
2038 * one.
2039 * Make a deep copy of existing AS_PATH, but for the first ASn only.
2040 */
2041 static enum route_map_cmd_result_t
2042 route_set_aspath_exclude(void *rule, const struct prefix *dummy,
2043 route_map_object_t type, void *object)
2044 {
2045 struct aspath *new_path, *exclude_path;
2046 struct bgp_path_info *path;
2047
2048 if (type == RMAP_BGP) {
2049 exclude_path = rule;
2050 path = object;
2051 if (path->attr->aspath->refcnt)
2052 new_path = aspath_dup(path->attr->aspath);
2053 else
2054 new_path = path->attr->aspath;
2055 path->attr->aspath =
2056 aspath_filter_exclude(new_path, exclude_path);
2057 }
2058 return RMAP_OKAY;
2059 }
2060
2061 /* Set ASn exlude rule structure. */
2062 static const struct route_map_rule_cmd route_set_aspath_exclude_cmd = {
2063 "as-path exclude",
2064 route_set_aspath_exclude,
2065 route_aspath_compile,
2066 route_aspath_free,
2067 };
2068
2069 /* `set community COMMUNITY' */
2070 struct rmap_com_set {
2071 struct community *com;
2072 int additive;
2073 int none;
2074 };
2075
2076 /* For community set mechanism. */
2077 static enum route_map_cmd_result_t
2078 route_set_community(void *rule, const struct prefix *prefix,
2079 route_map_object_t type, void *object)
2080 {
2081 struct rmap_com_set *rcs;
2082 struct bgp_path_info *path;
2083 struct attr *attr;
2084 struct community *new = NULL;
2085 struct community *old;
2086 struct community *merge;
2087
2088 if (type == RMAP_BGP) {
2089 rcs = rule;
2090 path = object;
2091 attr = path->attr;
2092 old = attr->community;
2093
2094 /* "none" case. */
2095 if (rcs->none) {
2096 attr->flag &= ~(ATTR_FLAG_BIT(BGP_ATTR_COMMUNITIES));
2097 attr->community = NULL;
2098 /* See the longer comment down below. */
2099 if (old && old->refcnt == 0)
2100 community_free(&old);
2101 return RMAP_OKAY;
2102 }
2103
2104 /* "additive" case. */
2105 if (rcs->additive && old) {
2106 merge = community_merge(community_dup(old), rcs->com);
2107
2108 new = community_uniq_sort(merge);
2109 community_free(&merge);
2110 } else
2111 new = community_dup(rcs->com);
2112
2113 /* HACK: if the old community is not intern'd,
2114 * we should free it here, or all reference to it may be
2115 * lost.
2116 * Really need to cleanup attribute caching sometime.
2117 */
2118 if (old && old->refcnt == 0)
2119 community_free(&old);
2120
2121 /* will be interned by caller if required */
2122 attr->community = new;
2123
2124 attr->flag |= ATTR_FLAG_BIT(BGP_ATTR_COMMUNITIES);
2125 }
2126
2127 return RMAP_OKAY;
2128 }
2129
2130 /* Compile function for set community. */
2131 static void *route_set_community_compile(const char *arg)
2132 {
2133 struct rmap_com_set *rcs;
2134 struct community *com = NULL;
2135 char *sp;
2136 int additive = 0;
2137 int none = 0;
2138
2139 if (strcmp(arg, "none") == 0)
2140 none = 1;
2141 else {
2142 sp = strstr(arg, "additive");
2143
2144 if (sp && sp > arg) {
2145 /* "additive" keyword is included. */
2146 additive = 1;
2147 *(sp - 1) = '\0';
2148 }
2149
2150 com = community_str2com(arg);
2151
2152 if (additive)
2153 *(sp - 1) = ' ';
2154
2155 if (!com)
2156 return NULL;
2157 }
2158
2159 rcs = XCALLOC(MTYPE_ROUTE_MAP_COMPILED, sizeof(struct rmap_com_set));
2160 rcs->com = com;
2161 rcs->additive = additive;
2162 rcs->none = none;
2163
2164 return rcs;
2165 }
2166
2167 /* Free function for set community. */
2168 static void route_set_community_free(void *rule)
2169 {
2170 struct rmap_com_set *rcs = rule;
2171
2172 if (rcs->com)
2173 community_free(&rcs->com);
2174 XFREE(MTYPE_ROUTE_MAP_COMPILED, rcs);
2175 }
2176
2177 /* Set community rule structure. */
2178 static const struct route_map_rule_cmd route_set_community_cmd = {
2179 "community",
2180 route_set_community,
2181 route_set_community_compile,
2182 route_set_community_free,
2183 };
2184
2185 /* `set community COMMUNITY' */
2186 struct rmap_lcom_set {
2187 struct lcommunity *lcom;
2188 int additive;
2189 int none;
2190 };
2191
2192
2193 /* For lcommunity set mechanism. */
2194 static enum route_map_cmd_result_t
2195 route_set_lcommunity(void *rule, const struct prefix *prefix,
2196 route_map_object_t type, void *object)
2197 {
2198 struct rmap_lcom_set *rcs;
2199 struct bgp_path_info *path;
2200 struct attr *attr;
2201 struct lcommunity *new = NULL;
2202 struct lcommunity *old;
2203 struct lcommunity *merge;
2204
2205 if (type == RMAP_BGP) {
2206 rcs = rule;
2207 path = object;
2208 attr = path->attr;
2209 old = attr->lcommunity;
2210
2211 /* "none" case. */
2212 if (rcs->none) {
2213 attr->flag &=
2214 ~(ATTR_FLAG_BIT(BGP_ATTR_LARGE_COMMUNITIES));
2215 attr->lcommunity = NULL;
2216
2217 /* See the longer comment down below. */
2218 if (old && old->refcnt == 0)
2219 lcommunity_free(&old);
2220 return RMAP_OKAY;
2221 }
2222
2223 if (rcs->additive && old) {
2224 merge = lcommunity_merge(lcommunity_dup(old),
2225 rcs->lcom);
2226
2227 new = lcommunity_uniq_sort(merge);
2228 lcommunity_free(&merge);
2229 } else
2230 new = lcommunity_dup(rcs->lcom);
2231
2232 /* HACK: if the old large-community is not intern'd,
2233 * we should free it here, or all reference to it may be
2234 * lost.
2235 * Really need to cleanup attribute caching sometime.
2236 */
2237 if (old && old->refcnt == 0)
2238 lcommunity_free(&old);
2239
2240 /* will be intern()'d or attr_flush()'d by bgp_update_main() */
2241 attr->lcommunity = new;
2242
2243 attr->flag |= ATTR_FLAG_BIT(BGP_ATTR_LARGE_COMMUNITIES);
2244 }
2245
2246 return RMAP_OKAY;
2247 }
2248
2249 /* Compile function for set community. */
2250 static void *route_set_lcommunity_compile(const char *arg)
2251 {
2252 struct rmap_lcom_set *rcs;
2253 struct lcommunity *lcom = NULL;
2254 char *sp;
2255 int additive = 0;
2256 int none = 0;
2257
2258 if (strcmp(arg, "none") == 0)
2259 none = 1;
2260 else {
2261 sp = strstr(arg, "additive");
2262
2263 if (sp && sp > arg) {
2264 /* "additive" keyworkd is included. */
2265 additive = 1;
2266 *(sp - 1) = '\0';
2267 }
2268
2269 lcom = lcommunity_str2com(arg);
2270
2271 if (additive)
2272 *(sp - 1) = ' ';
2273
2274 if (!lcom)
2275 return NULL;
2276 }
2277
2278 rcs = XCALLOC(MTYPE_ROUTE_MAP_COMPILED, sizeof(struct rmap_com_set));
2279 rcs->lcom = lcom;
2280 rcs->additive = additive;
2281 rcs->none = none;
2282
2283 return rcs;
2284 }
2285
2286 /* Free function for set lcommunity. */
2287 static void route_set_lcommunity_free(void *rule)
2288 {
2289 struct rmap_lcom_set *rcs = rule;
2290
2291 if (rcs->lcom) {
2292 lcommunity_free(&rcs->lcom);
2293 }
2294 XFREE(MTYPE_ROUTE_MAP_COMPILED, rcs);
2295 }
2296
2297 /* Set community rule structure. */
2298 static const struct route_map_rule_cmd route_set_lcommunity_cmd = {
2299 "large-community",
2300 route_set_lcommunity,
2301 route_set_lcommunity_compile,
2302 route_set_lcommunity_free,
2303 };
2304
2305 /* `set large-comm-list (<1-99>|<100-500>|WORD) delete' */
2306
2307 /* For large community set mechanism. */
2308 static enum route_map_cmd_result_t
2309 route_set_lcommunity_delete(void *rule, const struct prefix *pfx,
2310 route_map_object_t type, void *object)
2311 {
2312 struct community_list *list;
2313 struct lcommunity *merge;
2314 struct lcommunity *new;
2315 struct lcommunity *old;
2316 struct bgp_path_info *path;
2317 struct rmap_community *rcom = rule;
2318
2319 if (type == RMAP_BGP) {
2320 if (!rcom)
2321 return RMAP_OKAY;
2322
2323 path = object;
2324 list = community_list_lookup(bgp_clist, rcom->name,
2325 rcom->name_hash,
2326 LARGE_COMMUNITY_LIST_MASTER);
2327 old = path->attr->lcommunity;
2328
2329 if (list && old) {
2330 merge = lcommunity_list_match_delete(
2331 lcommunity_dup(old), list);
2332 new = lcommunity_uniq_sort(merge);
2333 lcommunity_free(&merge);
2334
2335 /* HACK: if the old community is not intern'd,
2336 * we should free it here, or all reference to it may be
2337 * lost.
2338 * Really need to cleanup attribute caching sometime.
2339 */
2340 if (old->refcnt == 0)
2341 lcommunity_free(&old);
2342
2343 if (new->size == 0) {
2344 path->attr->lcommunity = NULL;
2345 path->attr->flag &= ~ATTR_FLAG_BIT(
2346 BGP_ATTR_LARGE_COMMUNITIES);
2347 lcommunity_free(&new);
2348 } else {
2349 path->attr->lcommunity = new;
2350 path->attr->flag |= ATTR_FLAG_BIT(
2351 BGP_ATTR_LARGE_COMMUNITIES);
2352 }
2353 }
2354 }
2355
2356 return RMAP_OKAY;
2357 }
2358
2359 /* Compile function for set lcommunity. */
2360 static void *route_set_lcommunity_delete_compile(const char *arg)
2361 {
2362 struct rmap_community *rcom;
2363 char **splits;
2364 int num;
2365
2366 frrstr_split(arg, " ", &splits, &num);
2367
2368 rcom = XCALLOC(MTYPE_ROUTE_MAP_COMPILED, sizeof(struct rmap_community));
2369 rcom->name = XSTRDUP(MTYPE_ROUTE_MAP_COMPILED, splits[0]);
2370 rcom->name_hash = bgp_clist_hash_key(rcom->name);
2371
2372 for (int i = 0; i < num; i++)
2373 XFREE(MTYPE_TMP, splits[i]);
2374 XFREE(MTYPE_TMP, splits);
2375
2376 return rcom;
2377 }
2378
2379 /* Free function for set lcommunity. */
2380 static void route_set_lcommunity_delete_free(void *rule)
2381 {
2382 struct rmap_community *rcom = rule;
2383
2384 XFREE(MTYPE_ROUTE_MAP_COMPILED, rcom->name);
2385 XFREE(MTYPE_ROUTE_MAP_COMPILED, rcom);
2386 }
2387
2388 /* Set lcommunity rule structure. */
2389 static const struct route_map_rule_cmd route_set_lcommunity_delete_cmd = {
2390 "large-comm-list",
2391 route_set_lcommunity_delete,
2392 route_set_lcommunity_delete_compile,
2393 route_set_lcommunity_delete_free,
2394 };
2395
2396
2397 /* `set comm-list (<1-99>|<100-500>|WORD) delete' */
2398
2399 /* For community set mechanism. */
2400 static enum route_map_cmd_result_t
2401 route_set_community_delete(void *rule, const struct prefix *prefix,
2402 route_map_object_t type, void *object)
2403 {
2404 struct community_list *list;
2405 struct community *merge;
2406 struct community *new;
2407 struct community *old;
2408 struct bgp_path_info *path;
2409 struct rmap_community *rcom = rule;
2410
2411 if (type == RMAP_BGP) {
2412 if (!rcom)
2413 return RMAP_OKAY;
2414
2415 path = object;
2416 list = community_list_lookup(bgp_clist, rcom->name,
2417 rcom->name_hash,
2418 COMMUNITY_LIST_MASTER);
2419 old = path->attr->community;
2420
2421 if (list && old) {
2422 merge = community_list_match_delete(community_dup(old),
2423 list);
2424 new = community_uniq_sort(merge);
2425 community_free(&merge);
2426
2427 /* HACK: if the old community is not intern'd,
2428 * we should free it here, or all reference to it may be
2429 * lost.
2430 * Really need to cleanup attribute caching sometime.
2431 */
2432 if (old->refcnt == 0)
2433 community_free(&old);
2434
2435 if (new->size == 0) {
2436 path->attr->community = NULL;
2437 path->attr->flag &=
2438 ~ATTR_FLAG_BIT(BGP_ATTR_COMMUNITIES);
2439 community_free(&new);
2440 } else {
2441 path->attr->community = new;
2442 path->attr->flag |=
2443 ATTR_FLAG_BIT(BGP_ATTR_COMMUNITIES);
2444 }
2445 }
2446 }
2447
2448 return RMAP_OKAY;
2449 }
2450
2451 /* Compile function for set community. */
2452 static void *route_set_community_delete_compile(const char *arg)
2453 {
2454 struct rmap_community *rcom;
2455 char **splits;
2456 int num;
2457
2458 frrstr_split(arg, " ", &splits, &num);
2459
2460 rcom = XCALLOC(MTYPE_ROUTE_MAP_COMPILED, sizeof(struct rmap_community));
2461 rcom->name = XSTRDUP(MTYPE_ROUTE_MAP_COMPILED, splits[0]);
2462 rcom->name_hash = bgp_clist_hash_key(rcom->name);
2463
2464 for (int i = 0; i < num; i++)
2465 XFREE(MTYPE_TMP, splits[i]);
2466 XFREE(MTYPE_TMP, splits);
2467
2468 return rcom;
2469 }
2470
2471 /* Free function for set community. */
2472 static void route_set_community_delete_free(void *rule)
2473 {
2474 struct rmap_community *rcom = rule;
2475
2476 XFREE(MTYPE_ROUTE_MAP_COMPILED, rcom->name);
2477 XFREE(MTYPE_ROUTE_MAP_COMPILED, rcom);
2478 }
2479
2480 /* Set community rule structure. */
2481 static const struct route_map_rule_cmd route_set_community_delete_cmd = {
2482 "comm-list",
2483 route_set_community_delete,
2484 route_set_community_delete_compile,
2485 route_set_community_delete_free,
2486 };
2487
2488 /* `set extcommunity rt COMMUNITY' */
2489
2490 /* For community set mechanism. Used by _rt and _soo. */
2491 static enum route_map_cmd_result_t
2492 route_set_ecommunity(void *rule, const struct prefix *prefix,
2493 route_map_object_t type, void *object)
2494 {
2495 struct ecommunity *ecom;
2496 struct ecommunity *new_ecom;
2497 struct ecommunity *old_ecom;
2498 struct bgp_path_info *path;
2499
2500 if (type == RMAP_BGP) {
2501 ecom = rule;
2502 path = object;
2503
2504 if (!ecom)
2505 return RMAP_OKAY;
2506
2507 /* We assume additive for Extended Community. */
2508 old_ecom = path->attr->ecommunity;
2509
2510 if (old_ecom) {
2511 new_ecom = ecommunity_merge(ecommunity_dup(old_ecom),
2512 ecom);
2513
2514 /* old_ecom->refcnt = 1 => owned elsewhere, e.g.
2515 * bgp_update_receive()
2516 * ->refcnt = 0 => set by a previous route-map
2517 * statement */
2518 if (!old_ecom->refcnt)
2519 ecommunity_free(&old_ecom);
2520 } else
2521 new_ecom = ecommunity_dup(ecom);
2522
2523 /* will be intern()'d or attr_flush()'d by bgp_update_main() */
2524 path->attr->ecommunity = new_ecom;
2525
2526 path->attr->flag |= ATTR_FLAG_BIT(BGP_ATTR_EXT_COMMUNITIES);
2527 }
2528 return RMAP_OKAY;
2529 }
2530
2531 /* Compile function for set community. */
2532 static void *route_set_ecommunity_rt_compile(const char *arg)
2533 {
2534 struct ecommunity *ecom;
2535
2536 ecom = ecommunity_str2com(arg, ECOMMUNITY_ROUTE_TARGET, 0);
2537 if (!ecom)
2538 return NULL;
2539 return ecommunity_intern(ecom);
2540 }
2541
2542 /* Free function for set community. Used by _rt and _soo */
2543 static void route_set_ecommunity_free(void *rule)
2544 {
2545 struct ecommunity *ecom = rule;
2546 ecommunity_unintern(&ecom);
2547 }
2548
2549 /* Set community rule structure. */
2550 static const struct route_map_rule_cmd route_set_ecommunity_rt_cmd = {
2551 "extcommunity rt",
2552 route_set_ecommunity,
2553 route_set_ecommunity_rt_compile,
2554 route_set_ecommunity_free,
2555 };
2556
2557 /* `set extcommunity soo COMMUNITY' */
2558
2559 /* Compile function for set community. */
2560 static void *route_set_ecommunity_soo_compile(const char *arg)
2561 {
2562 struct ecommunity *ecom;
2563
2564 ecom = ecommunity_str2com(arg, ECOMMUNITY_SITE_ORIGIN, 0);
2565 if (!ecom)
2566 return NULL;
2567
2568 return ecommunity_intern(ecom);
2569 }
2570
2571 /* Set community rule structure. */
2572 static const struct route_map_rule_cmd route_set_ecommunity_soo_cmd = {
2573 "extcommunity soo",
2574 route_set_ecommunity,
2575 route_set_ecommunity_soo_compile,
2576 route_set_ecommunity_free,
2577 };
2578
2579 /* `set extcommunity bandwidth' */
2580
2581 struct rmap_ecomm_lb_set {
2582 uint8_t lb_type;
2583 #define RMAP_ECOMM_LB_SET_VALUE 1
2584 #define RMAP_ECOMM_LB_SET_CUMUL 2
2585 #define RMAP_ECOMM_LB_SET_NUM_MPATH 3
2586 bool non_trans;
2587 uint32_t bw;
2588 };
2589
2590 static enum route_map_cmd_result_t
2591 route_set_ecommunity_lb(void *rule, const struct prefix *prefix,
2592 route_map_object_t type, void *object)
2593 {
2594 struct rmap_ecomm_lb_set *rels = rule;
2595 struct bgp_path_info *path;
2596 struct peer *peer;
2597 struct ecommunity ecom_lb = {0};
2598 struct ecommunity_val lb_eval;
2599 uint32_t bw_bytes = 0;
2600 uint16_t mpath_count = 0;
2601 struct ecommunity *new_ecom;
2602 struct ecommunity *old_ecom;
2603 as_t as;
2604
2605 if (type != RMAP_BGP)
2606 return RMAP_OKAY;
2607
2608 path = object;
2609 peer = path->peer;
2610 if (!peer || !peer->bgp)
2611 return RMAP_ERROR;
2612
2613 /* Build link bandwidth extended community */
2614 as = (peer->bgp->as > BGP_AS_MAX) ? BGP_AS_TRANS : peer->bgp->as;
2615 if (rels->lb_type == RMAP_ECOMM_LB_SET_VALUE) {
2616 bw_bytes = ((uint64_t)rels->bw * 1000 * 1000) / 8;
2617 } else if (rels->lb_type == RMAP_ECOMM_LB_SET_CUMUL) {
2618 /* process this only for the best path. */
2619 if (!CHECK_FLAG(path->flags, BGP_PATH_SELECTED))
2620 return RMAP_OKAY;
2621
2622 bw_bytes = (uint32_t)bgp_path_info_mpath_cumbw(path);
2623 if (!bw_bytes)
2624 return RMAP_OKAY;
2625
2626 } else if (rels->lb_type == RMAP_ECOMM_LB_SET_NUM_MPATH) {
2627
2628 /* process this only for the best path. */
2629 if (!CHECK_FLAG(path->flags, BGP_PATH_SELECTED))
2630 return RMAP_OKAY;
2631
2632 bw_bytes = ((uint64_t)peer->bgp->lb_ref_bw * 1000 * 1000) / 8;
2633 mpath_count = bgp_path_info_mpath_count(path) + 1;
2634 bw_bytes *= mpath_count;
2635 }
2636
2637 encode_lb_extcomm(as, bw_bytes, rels->non_trans, &lb_eval);
2638
2639 /* add to route or merge with existing */
2640 old_ecom = path->attr->ecommunity;
2641 if (old_ecom) {
2642 new_ecom = ecommunity_dup(old_ecom);
2643 ecommunity_add_val(new_ecom, &lb_eval, true, true);
2644 if (!old_ecom->refcnt)
2645 ecommunity_free(&old_ecom);
2646 } else {
2647 ecom_lb.size = 1;
2648 ecom_lb.unit_size = ECOMMUNITY_SIZE;
2649 ecom_lb.val = (uint8_t *)lb_eval.val;
2650 new_ecom = ecommunity_dup(&ecom_lb);
2651 }
2652
2653 /* new_ecom will be intern()'d or attr_flush()'d in call stack */
2654 path->attr->ecommunity = new_ecom;
2655 path->attr->flag |= ATTR_FLAG_BIT(BGP_ATTR_EXT_COMMUNITIES);
2656
2657 /* Mark that route-map has set link bandwidth; used in attribute
2658 * setting decisions.
2659 */
2660 SET_FLAG(path->attr->rmap_change_flags, BATTR_RMAP_LINK_BW_SET);
2661
2662 return RMAP_OKAY;
2663 }
2664
2665 static void *route_set_ecommunity_lb_compile(const char *arg)
2666 {
2667 struct rmap_ecomm_lb_set *rels;
2668 uint8_t lb_type;
2669 uint32_t bw = 0;
2670 char bw_str[40] = {0};
2671 char *p, *str;
2672 bool non_trans = false;
2673
2674 str = (char *)arg;
2675 p = strchr(arg, ' ');
2676 if (p) {
2677 int len;
2678
2679 len = p - arg;
2680 memcpy(bw_str, arg, len);
2681 non_trans = true;
2682 str = bw_str;
2683 }
2684
2685 if (strcmp(str, "cumulative") == 0)
2686 lb_type = RMAP_ECOMM_LB_SET_CUMUL;
2687 else if (strcmp(str, "num-multipaths") == 0)
2688 lb_type = RMAP_ECOMM_LB_SET_NUM_MPATH;
2689 else {
2690 char *end = NULL;
2691
2692 bw = strtoul(str, &end, 10);
2693 if (*end != '\0')
2694 return NULL;
2695 lb_type = RMAP_ECOMM_LB_SET_VALUE;
2696 }
2697
2698 rels = XCALLOC(MTYPE_ROUTE_MAP_COMPILED,
2699 sizeof(struct rmap_ecomm_lb_set));
2700 rels->lb_type = lb_type;
2701 rels->bw = bw;
2702 rels->non_trans = non_trans;
2703
2704 return rels;
2705 }
2706
2707 static void route_set_ecommunity_lb_free(void *rule)
2708 {
2709 XFREE(MTYPE_ROUTE_MAP_COMPILED, rule);
2710 }
2711
2712 /* Set community rule structure. */
2713 struct route_map_rule_cmd route_set_ecommunity_lb_cmd = {
2714 "extcommunity bandwidth",
2715 route_set_ecommunity_lb,
2716 route_set_ecommunity_lb_compile,
2717 route_set_ecommunity_lb_free,
2718 };
2719
2720 /* `set origin ORIGIN' */
2721
2722 /* For origin set. */
2723 static enum route_map_cmd_result_t
2724 route_set_origin(void *rule, const struct prefix *prefix,
2725 route_map_object_t type, void *object)
2726 {
2727 uint8_t *origin;
2728 struct bgp_path_info *path;
2729
2730 if (type == RMAP_BGP) {
2731 origin = rule;
2732 path = object;
2733
2734 path->attr->origin = *origin;
2735 }
2736
2737 return RMAP_OKAY;
2738 }
2739
2740 /* Compile function for origin set. */
2741 static void *route_set_origin_compile(const char *arg)
2742 {
2743 uint8_t *origin;
2744
2745 origin = XMALLOC(MTYPE_ROUTE_MAP_COMPILED, sizeof(uint8_t));
2746
2747 if (strcmp(arg, "igp") == 0)
2748 *origin = 0;
2749 else if (strcmp(arg, "egp") == 0)
2750 *origin = 1;
2751 else
2752 *origin = 2;
2753
2754 return origin;
2755 }
2756
2757 /* Compile function for origin set. */
2758 static void route_set_origin_free(void *rule)
2759 {
2760 XFREE(MTYPE_ROUTE_MAP_COMPILED, rule);
2761 }
2762
2763 /* Set origin rule structure. */
2764 static const struct route_map_rule_cmd route_set_origin_cmd = {
2765 "origin",
2766 route_set_origin,
2767 route_set_origin_compile,
2768 route_set_origin_free,
2769 };
2770
2771 /* `set atomic-aggregate' */
2772
2773 /* For atomic aggregate set. */
2774 static enum route_map_cmd_result_t
2775 route_set_atomic_aggregate(void *rule, const struct prefix *pfx,
2776 route_map_object_t type, void *object)
2777 {
2778 struct bgp_path_info *path;
2779
2780 if (type == RMAP_BGP) {
2781 path = object;
2782 path->attr->flag |= ATTR_FLAG_BIT(BGP_ATTR_ATOMIC_AGGREGATE);
2783 }
2784
2785 return RMAP_OKAY;
2786 }
2787
2788 /* Compile function for atomic aggregate. */
2789 static void *route_set_atomic_aggregate_compile(const char *arg)
2790 {
2791 return (void *)1;
2792 }
2793
2794 /* Compile function for atomic aggregate. */
2795 static void route_set_atomic_aggregate_free(void *rule)
2796 {
2797 return;
2798 }
2799
2800 /* Set atomic aggregate rule structure. */
2801 static const struct route_map_rule_cmd route_set_atomic_aggregate_cmd = {
2802 "atomic-aggregate",
2803 route_set_atomic_aggregate,
2804 route_set_atomic_aggregate_compile,
2805 route_set_atomic_aggregate_free,
2806 };
2807
2808 /* `set aggregator as AS A.B.C.D' */
2809 struct aggregator {
2810 as_t as;
2811 struct in_addr address;
2812 };
2813
2814 static enum route_map_cmd_result_t
2815 route_set_aggregator_as(void *rule, const struct prefix *prefix,
2816 route_map_object_t type, void *object)
2817 {
2818 struct bgp_path_info *path;
2819 struct aggregator *aggregator;
2820
2821 if (type == RMAP_BGP) {
2822 path = object;
2823 aggregator = rule;
2824
2825 path->attr->aggregator_as = aggregator->as;
2826 path->attr->aggregator_addr = aggregator->address;
2827 path->attr->flag |= ATTR_FLAG_BIT(BGP_ATTR_AGGREGATOR);
2828 }
2829
2830 return RMAP_OKAY;
2831 }
2832
2833 static void *route_set_aggregator_as_compile(const char *arg)
2834 {
2835 struct aggregator *aggregator;
2836 char as[10];
2837 char address[20];
2838 int ret;
2839
2840 aggregator =
2841 XCALLOC(MTYPE_ROUTE_MAP_COMPILED, sizeof(struct aggregator));
2842 if (sscanf(arg, "%s %s", as, address) != 2) {
2843 XFREE(MTYPE_ROUTE_MAP_COMPILED, aggregator);
2844 return NULL;
2845 }
2846
2847 aggregator->as = strtoul(as, NULL, 10);
2848 ret = inet_aton(address, &aggregator->address);
2849 if (ret == 0) {
2850 XFREE(MTYPE_ROUTE_MAP_COMPILED, aggregator);
2851 return NULL;
2852 }
2853 return aggregator;
2854 }
2855
2856 static void route_set_aggregator_as_free(void *rule)
2857 {
2858 XFREE(MTYPE_ROUTE_MAP_COMPILED, rule);
2859 }
2860
2861 static const struct route_map_rule_cmd route_set_aggregator_as_cmd = {
2862 "aggregator as",
2863 route_set_aggregator_as,
2864 route_set_aggregator_as_compile,
2865 route_set_aggregator_as_free,
2866 };
2867
2868 /* Set tag to object. object must be pointer to struct bgp_path_info */
2869 static enum route_map_cmd_result_t
2870 route_set_tag(void *rule, const struct prefix *prefix,
2871 route_map_object_t type, void *object)
2872 {
2873 route_tag_t *tag;
2874 struct bgp_path_info *path;
2875
2876 if (type == RMAP_BGP) {
2877 tag = rule;
2878 path = object;
2879
2880 /* Set tag value */
2881 path->attr->tag = *tag;
2882 }
2883
2884 return RMAP_OKAY;
2885 }
2886
2887 /* Route map commands for tag set. */
2888 static const struct route_map_rule_cmd route_set_tag_cmd = {
2889 "tag",
2890 route_set_tag,
2891 route_map_rule_tag_compile,
2892 route_map_rule_tag_free,
2893 };
2894
2895 /* Set label-index to object. object must be pointer to struct bgp_path_info */
2896 static enum route_map_cmd_result_t
2897 route_set_label_index(void *rule, const struct prefix *prefix,
2898 route_map_object_t type, void *object)
2899 {
2900 struct rmap_value *rv;
2901 struct bgp_path_info *path;
2902 uint32_t label_index;
2903
2904 if (type == RMAP_BGP) {
2905 /* Fetch routemap's rule information. */
2906 rv = rule;
2907 path = object;
2908
2909 /* Set label-index value. */
2910 label_index = rv->value;
2911 if (label_index) {
2912 path->attr->label_index = label_index;
2913 path->attr->flag |= ATTR_FLAG_BIT(BGP_ATTR_PREFIX_SID);
2914 }
2915 }
2916
2917 return RMAP_OKAY;
2918 }
2919
2920 /* Route map commands for label-index set. */
2921 static const struct route_map_rule_cmd route_set_label_index_cmd = {
2922 "label-index",
2923 route_set_label_index,
2924 route_value_compile,
2925 route_value_free,
2926 };
2927
2928 /* `match ipv6 address IP_ACCESS_LIST' */
2929
2930 static enum route_map_cmd_result_t
2931 route_match_ipv6_address(void *rule, const struct prefix *prefix,
2932 route_map_object_t type, void *object)
2933 {
2934 struct access_list *alist;
2935
2936 if (type == RMAP_BGP && prefix->family == AF_INET6) {
2937 alist = access_list_lookup(AFI_IP6, (char *)rule);
2938 if (alist == NULL)
2939 return RMAP_NOMATCH;
2940
2941 return (access_list_apply(alist, prefix) == FILTER_DENY
2942 ? RMAP_NOMATCH
2943 : RMAP_MATCH);
2944 }
2945 return RMAP_NOMATCH;
2946 }
2947
2948 static void *route_match_ipv6_address_compile(const char *arg)
2949 {
2950 return XSTRDUP(MTYPE_ROUTE_MAP_COMPILED, arg);
2951 }
2952
2953 static void route_match_ipv6_address_free(void *rule)
2954 {
2955 XFREE(MTYPE_ROUTE_MAP_COMPILED, rule);
2956 }
2957
2958 /* Route map commands for ip address matching. */
2959 static const struct route_map_rule_cmd route_match_ipv6_address_cmd = {
2960 "ipv6 address",
2961 route_match_ipv6_address,
2962 route_match_ipv6_address_compile,
2963 route_match_ipv6_address_free
2964 };
2965
2966 /* `match ipv6 next-hop IP_ADDRESS' */
2967
2968 static enum route_map_cmd_result_t
2969 route_match_ipv6_next_hop(void *rule, const struct prefix *prefix,
2970 route_map_object_t type, void *object)
2971 {
2972 struct in6_addr *addr = rule;
2973 struct bgp_path_info *path;
2974
2975 if (type == RMAP_BGP) {
2976 path = object;
2977
2978 if (IPV6_ADDR_SAME(&path->attr->mp_nexthop_global, addr))
2979 return RMAP_MATCH;
2980
2981 if (path->attr->mp_nexthop_len
2982 == BGP_ATTR_NHLEN_IPV6_GLOBAL_AND_LL
2983 && IPV6_ADDR_SAME(&path->attr->mp_nexthop_local, rule))
2984 return RMAP_MATCH;
2985
2986 return RMAP_NOMATCH;
2987 }
2988
2989 return RMAP_NOMATCH;
2990 }
2991
2992 static void *route_match_ipv6_next_hop_compile(const char *arg)
2993 {
2994 struct in6_addr *address;
2995 int ret;
2996
2997 address = XMALLOC(MTYPE_ROUTE_MAP_COMPILED, sizeof(struct in6_addr));
2998
2999 ret = inet_pton(AF_INET6, arg, address);
3000 if (!ret) {
3001 XFREE(MTYPE_ROUTE_MAP_COMPILED, address);
3002 return NULL;
3003 }
3004
3005 return address;
3006 }
3007
3008 static void route_match_ipv6_next_hop_free(void *rule)
3009 {
3010 XFREE(MTYPE_ROUTE_MAP_COMPILED, rule);
3011 }
3012
3013 static const struct route_map_rule_cmd route_match_ipv6_next_hop_cmd = {
3014 "ipv6 next-hop",
3015 route_match_ipv6_next_hop,
3016 route_match_ipv6_next_hop_compile,
3017 route_match_ipv6_next_hop_free
3018 };
3019
3020 /* `match ip next-hop IP_ADDRESS' */
3021
3022 static enum route_map_cmd_result_t
3023 route_match_ipv4_next_hop(void *rule, const struct prefix *prefix,
3024 route_map_object_t type, void *object)
3025 {
3026 struct in_addr *addr = rule;
3027 struct bgp_path_info *path;
3028
3029 if (type == RMAP_BGP) {
3030 path = object;
3031
3032 if (path->attr->nexthop.s_addr == addr->s_addr ||
3033 (path->attr->mp_nexthop_len == BGP_ATTR_NHLEN_IPV4 &&
3034 IPV4_ADDR_SAME(&path->attr->mp_nexthop_global_in, addr)))
3035 return RMAP_MATCH;
3036
3037 return RMAP_NOMATCH;
3038 }
3039
3040 return RMAP_NOMATCH;
3041 }
3042
3043 static void *route_match_ipv4_next_hop_compile(const char *arg)
3044 {
3045 struct in_addr *address;
3046 int ret;
3047
3048 address = XMALLOC(MTYPE_ROUTE_MAP_COMPILED, sizeof(struct in_addr));
3049
3050 ret = inet_pton(AF_INET, arg, address);
3051 if (!ret) {
3052 XFREE(MTYPE_ROUTE_MAP_COMPILED, address);
3053 return NULL;
3054 }
3055
3056 return address;
3057 }
3058
3059 static void route_match_ipv4_next_hop_free(void *rule)
3060 {
3061 XFREE(MTYPE_ROUTE_MAP_COMPILED, rule);
3062 }
3063
3064 static const struct route_map_rule_cmd route_match_ipv4_next_hop_cmd = {
3065 "ip next-hop address",
3066 route_match_ipv4_next_hop,
3067 route_match_ipv4_next_hop_compile,
3068 route_match_ipv4_next_hop_free
3069 };
3070
3071 /* `match ipv6 address prefix-list PREFIX_LIST' */
3072
3073 static enum route_map_cmd_result_t
3074 route_match_ipv6_address_prefix_list(void *rule, const struct prefix *prefix,
3075 route_map_object_t type, void *object)
3076 {
3077 return route_match_address_prefix_list(rule, AFI_IP6, prefix, type,
3078 object);
3079 }
3080
3081 static void *route_match_ipv6_address_prefix_list_compile(const char *arg)
3082 {
3083 return XSTRDUP(MTYPE_ROUTE_MAP_COMPILED, arg);
3084 }
3085
3086 static void route_match_ipv6_address_prefix_list_free(void *rule)
3087 {
3088 XFREE(MTYPE_ROUTE_MAP_COMPILED, rule);
3089 }
3090
3091 static const struct route_map_rule_cmd
3092 route_match_ipv6_address_prefix_list_cmd = {
3093 "ipv6 address prefix-list",
3094 route_match_ipv6_address_prefix_list,
3095 route_match_ipv6_address_prefix_list_compile,
3096 route_match_ipv6_address_prefix_list_free
3097 };
3098
3099 /* `match ipv6 next-hop type <TYPE>' */
3100
3101 static enum route_map_cmd_result_t
3102 route_match_ipv6_next_hop_type(void *rule, const struct prefix *prefix,
3103 route_map_object_t type, void *object)
3104 {
3105 struct bgp_path_info *path;
3106 struct in6_addr *addr = rule;
3107
3108 if (type == RMAP_BGP && prefix->family == AF_INET6) {
3109 path = (struct bgp_path_info *)object;
3110 if (!path)
3111 return RMAP_NOMATCH;
3112
3113 if (IPV6_ADDR_SAME(&path->attr->mp_nexthop_global, addr)
3114 && !path->attr->nh_ifindex)
3115 return RMAP_MATCH;
3116 }
3117 return RMAP_NOMATCH;
3118 }
3119
3120 static void *route_match_ipv6_next_hop_type_compile(const char *arg)
3121 {
3122 struct in6_addr *address;
3123 int ret;
3124
3125 address = XMALLOC(MTYPE_ROUTE_MAP_COMPILED, sizeof(struct in6_addr));
3126
3127 ret = inet_pton(AF_INET6, "::0", address);
3128 if (!ret) {
3129 XFREE(MTYPE_ROUTE_MAP_COMPILED, address);
3130 return NULL;
3131 }
3132
3133 return address;
3134 }
3135
3136 static void route_match_ipv6_next_hop_type_free(void *rule)
3137 {
3138 XFREE(MTYPE_ROUTE_MAP_COMPILED, rule);
3139 }
3140
3141 static const struct route_map_rule_cmd
3142 route_match_ipv6_next_hop_type_cmd = {
3143 "ipv6 next-hop type",
3144 route_match_ipv6_next_hop_type,
3145 route_match_ipv6_next_hop_type_compile,
3146 route_match_ipv6_next_hop_type_free
3147 };
3148
3149 /* `set ipv6 nexthop global IP_ADDRESS' */
3150
3151 /* Set nexthop to object. ojbect must be pointer to struct attr. */
3152 static enum route_map_cmd_result_t
3153 route_set_ipv6_nexthop_global(void *rule, const struct prefix *p,
3154 route_map_object_t type, void *object)
3155 {
3156 struct in6_addr *address;
3157 struct bgp_path_info *path;
3158
3159 if (type == RMAP_BGP) {
3160 /* Fetch routemap's rule information. */
3161 address = rule;
3162 path = object;
3163
3164 /* Set next hop value. */
3165 path->attr->mp_nexthop_global = *address;
3166
3167 /* Set nexthop length. */
3168 if (path->attr->mp_nexthop_len == 0)
3169 path->attr->mp_nexthop_len = BGP_ATTR_NHLEN_IPV6_GLOBAL;
3170
3171 SET_FLAG(path->attr->rmap_change_flags,
3172 BATTR_RMAP_IPV6_GLOBAL_NHOP_CHANGED);
3173 }
3174
3175 return RMAP_OKAY;
3176 }
3177
3178 /* Route map `ip next-hop' compile function. Given string is converted
3179 to struct in_addr structure. */
3180 static void *route_set_ipv6_nexthop_global_compile(const char *arg)
3181 {
3182 int ret;
3183 struct in6_addr *address;
3184
3185 address = XMALLOC(MTYPE_ROUTE_MAP_COMPILED, sizeof(struct in6_addr));
3186
3187 ret = inet_pton(AF_INET6, arg, address);
3188
3189 if (ret == 0) {
3190 XFREE(MTYPE_ROUTE_MAP_COMPILED, address);
3191 return NULL;
3192 }
3193
3194 return address;
3195 }
3196
3197 /* Free route map's compiled `ip next-hop' value. */
3198 static void route_set_ipv6_nexthop_global_free(void *rule)
3199 {
3200 XFREE(MTYPE_ROUTE_MAP_COMPILED, rule);
3201 }
3202
3203 /* Route map commands for ip nexthop set. */
3204 static const struct route_map_rule_cmd
3205 route_set_ipv6_nexthop_global_cmd = {
3206 "ipv6 next-hop global",
3207 route_set_ipv6_nexthop_global,
3208 route_set_ipv6_nexthop_global_compile,
3209 route_set_ipv6_nexthop_global_free
3210 };
3211
3212 /* Set next-hop preference value. */
3213 static enum route_map_cmd_result_t
3214 route_set_ipv6_nexthop_prefer_global(void *rule, const struct prefix *prefix,
3215 route_map_object_t type, void *object)
3216 {
3217 struct bgp_path_info *path;
3218 struct peer *peer;
3219
3220 if (type == RMAP_BGP) {
3221 /* Fetch routemap's rule information. */
3222 path = object;
3223 peer = path->peer;
3224
3225 if (CHECK_FLAG(peer->rmap_type, PEER_RMAP_TYPE_IN)
3226 || CHECK_FLAG(peer->rmap_type, PEER_RMAP_TYPE_IMPORT)) {
3227 /* Set next hop preference to global */
3228 path->attr->mp_nexthop_prefer_global = true;
3229 SET_FLAG(path->attr->rmap_change_flags,
3230 BATTR_RMAP_IPV6_PREFER_GLOBAL_CHANGED);
3231 } else {
3232 path->attr->mp_nexthop_prefer_global = false;
3233 SET_FLAG(path->attr->rmap_change_flags,
3234 BATTR_RMAP_IPV6_PREFER_GLOBAL_CHANGED);
3235 }
3236 }
3237 return RMAP_OKAY;
3238 }
3239
3240 static void *route_set_ipv6_nexthop_prefer_global_compile(const char *arg)
3241 {
3242 int *rins = NULL;
3243
3244 rins = XCALLOC(MTYPE_ROUTE_MAP_COMPILED, sizeof(int));
3245 *rins = 1;
3246
3247 return rins;
3248 }
3249
3250 /* Free route map's compiled `ip next-hop' value. */
3251 static void route_set_ipv6_nexthop_prefer_global_free(void *rule)
3252 {
3253 XFREE(MTYPE_ROUTE_MAP_COMPILED, rule);
3254 }
3255
3256 /* Route map commands for ip nexthop set preferred. */
3257 static const struct route_map_rule_cmd
3258 route_set_ipv6_nexthop_prefer_global_cmd = {
3259 "ipv6 next-hop prefer-global",
3260 route_set_ipv6_nexthop_prefer_global,
3261 route_set_ipv6_nexthop_prefer_global_compile,
3262 route_set_ipv6_nexthop_prefer_global_free
3263 };
3264
3265 /* `set ipv6 nexthop local IP_ADDRESS' */
3266
3267 /* Set nexthop to object. ojbect must be pointer to struct attr. */
3268 static enum route_map_cmd_result_t
3269 route_set_ipv6_nexthop_local(void *rule, const struct prefix *p,
3270 route_map_object_t type, void *object)
3271 {
3272 struct in6_addr *address;
3273 struct bgp_path_info *path;
3274
3275 if (type == RMAP_BGP) {
3276 /* Fetch routemap's rule information. */
3277 address = rule;
3278 path = object;
3279
3280 /* Set next hop value. */
3281 path->attr->mp_nexthop_local = *address;
3282
3283 /* Set nexthop length. */
3284 if (path->attr->mp_nexthop_len
3285 != BGP_ATTR_NHLEN_IPV6_GLOBAL_AND_LL)
3286 path->attr->mp_nexthop_len =
3287 BGP_ATTR_NHLEN_IPV6_GLOBAL_AND_LL;
3288
3289 SET_FLAG(path->attr->rmap_change_flags,
3290 BATTR_RMAP_IPV6_LL_NHOP_CHANGED);
3291 }
3292
3293 return RMAP_OKAY;
3294 }
3295
3296 /* Route map `ip nexthop' compile function. Given string is converted
3297 to struct in_addr structure. */
3298 static void *route_set_ipv6_nexthop_local_compile(const char *arg)
3299 {
3300 int ret;
3301 struct in6_addr *address;
3302
3303 address = XMALLOC(MTYPE_ROUTE_MAP_COMPILED, sizeof(struct in6_addr));
3304
3305 ret = inet_pton(AF_INET6, arg, address);
3306
3307 if (ret == 0) {
3308 XFREE(MTYPE_ROUTE_MAP_COMPILED, address);
3309 return NULL;
3310 }
3311
3312 return address;
3313 }
3314
3315 /* Free route map's compiled `ip nexthop' value. */
3316 static void route_set_ipv6_nexthop_local_free(void *rule)
3317 {
3318 XFREE(MTYPE_ROUTE_MAP_COMPILED, rule);
3319 }
3320
3321 /* Route map commands for ip nexthop set. */
3322 static const struct route_map_rule_cmd
3323 route_set_ipv6_nexthop_local_cmd = {
3324 "ipv6 next-hop local",
3325 route_set_ipv6_nexthop_local,
3326 route_set_ipv6_nexthop_local_compile,
3327 route_set_ipv6_nexthop_local_free
3328 };
3329
3330 /* `set ipv6 nexthop peer-address' */
3331
3332 /* Set nexthop to object. ojbect must be pointer to struct attr. */
3333 static enum route_map_cmd_result_t
3334 route_set_ipv6_nexthop_peer(void *rule, const struct prefix *pfx,
3335 route_map_object_t type, void *object)
3336 {
3337 struct in6_addr peer_address;
3338 struct bgp_path_info *path;
3339 struct peer *peer;
3340
3341 if (type == RMAP_BGP) {
3342 /* Fetch routemap's rule information. */
3343 path = object;
3344 peer = path->peer;
3345
3346 if ((CHECK_FLAG(peer->rmap_type, PEER_RMAP_TYPE_IN)
3347 || CHECK_FLAG(peer->rmap_type, PEER_RMAP_TYPE_IMPORT))
3348 && peer->su_remote
3349 && sockunion_family(peer->su_remote) == AF_INET6) {
3350 peer_address = peer->su_remote->sin6.sin6_addr;
3351 /* Set next hop value and length in attribute. */
3352 if (IN6_IS_ADDR_LINKLOCAL(&peer_address)) {
3353 path->attr->mp_nexthop_local = peer_address;
3354 if (path->attr->mp_nexthop_len
3355 != BGP_ATTR_NHLEN_IPV6_GLOBAL_AND_LL)
3356 path->attr->mp_nexthop_len =
3357 BGP_ATTR_NHLEN_IPV6_GLOBAL_AND_LL;
3358 } else {
3359 path->attr->mp_nexthop_global = peer_address;
3360 if (path->attr->mp_nexthop_len == 0)
3361 path->attr->mp_nexthop_len =
3362 BGP_ATTR_NHLEN_IPV6_GLOBAL;
3363 }
3364
3365 } else if (CHECK_FLAG(peer->rmap_type, PEER_RMAP_TYPE_OUT)) {
3366 /* The next hop value will be set as part of packet
3367 * rewrite.
3368 * Set the flags here to indicate that rewrite needs to
3369 * be done.
3370 * Also, clear the value - we clear both global and
3371 * link-local
3372 * nexthops, whether we send one or both is determined
3373 * elsewhere.
3374 */
3375 SET_FLAG(path->attr->rmap_change_flags,
3376 BATTR_RMAP_NEXTHOP_PEER_ADDRESS);
3377 /* clear next hop value. */
3378 memset(&(path->attr->mp_nexthop_global), 0,
3379 sizeof(struct in6_addr));
3380 memset(&(path->attr->mp_nexthop_local), 0,
3381 sizeof(struct in6_addr));
3382 }
3383 }
3384
3385 return RMAP_OKAY;
3386 }
3387
3388 /* Route map `ip next-hop' compile function. Given string is converted
3389 to struct in_addr structure. */
3390 static void *route_set_ipv6_nexthop_peer_compile(const char *arg)
3391 {
3392 int *rins = NULL;
3393
3394 rins = XCALLOC(MTYPE_ROUTE_MAP_COMPILED, sizeof(int));
3395 *rins = 1;
3396
3397 return rins;
3398 }
3399
3400 /* Free route map's compiled `ip next-hop' value. */
3401 static void route_set_ipv6_nexthop_peer_free(void *rule)
3402 {
3403 XFREE(MTYPE_ROUTE_MAP_COMPILED, rule);
3404 }
3405
3406 /* Route map commands for ip nexthop set. */
3407 static const struct route_map_rule_cmd route_set_ipv6_nexthop_peer_cmd = {
3408 "ipv6 next-hop peer-address",
3409 route_set_ipv6_nexthop_peer,
3410 route_set_ipv6_nexthop_peer_compile,
3411 route_set_ipv6_nexthop_peer_free
3412 };
3413
3414 /* `set ipv4 vpn next-hop A.B.C.D' */
3415
3416 static enum route_map_cmd_result_t
3417 route_set_vpnv4_nexthop(void *rule, const struct prefix *prefix,
3418 route_map_object_t type, void *object)
3419 {
3420 struct in_addr *address;
3421 struct bgp_path_info *path;
3422
3423 if (type == RMAP_BGP) {
3424 /* Fetch routemap's rule information. */
3425 address = rule;
3426 path = object;
3427
3428 /* Set next hop value. */
3429 path->attr->mp_nexthop_global_in = *address;
3430 path->attr->mp_nexthop_len = BGP_ATTR_NHLEN_IPV4;
3431 }
3432
3433 return RMAP_OKAY;
3434 }
3435
3436 static void *route_set_vpnv4_nexthop_compile(const char *arg)
3437 {
3438 int ret;
3439 struct in_addr *address;
3440
3441 address = XMALLOC(MTYPE_ROUTE_MAP_COMPILED, sizeof(struct in_addr));
3442
3443 ret = inet_aton(arg, address);
3444
3445 if (ret == 0) {
3446 XFREE(MTYPE_ROUTE_MAP_COMPILED, address);
3447 return NULL;
3448 }
3449
3450 return address;
3451 }
3452
3453 /* `set ipv6 vpn next-hop A.B.C.D' */
3454
3455 static enum route_map_cmd_result_t
3456 route_set_vpnv6_nexthop(void *rule, const struct prefix *prefix,
3457 route_map_object_t type, void *object)
3458 {
3459 struct in6_addr *address;
3460 struct bgp_path_info *path;
3461
3462 if (type == RMAP_BGP) {
3463 /* Fetch routemap's rule information. */
3464 address = rule;
3465 path = object;
3466
3467 /* Set next hop value. */
3468 memcpy(&path->attr->mp_nexthop_global, address,
3469 sizeof(struct in6_addr));
3470 path->attr->mp_nexthop_len = BGP_ATTR_NHLEN_VPNV6_GLOBAL;
3471 }
3472
3473 return RMAP_OKAY;
3474 }
3475
3476 static void *route_set_vpnv6_nexthop_compile(const char *arg)
3477 {
3478 int ret;
3479 struct in6_addr *address;
3480
3481 address = XMALLOC(MTYPE_ROUTE_MAP_COMPILED, sizeof(struct in6_addr));
3482 ret = inet_pton(AF_INET6, arg, address);
3483
3484 if (ret == 0) {
3485 XFREE(MTYPE_ROUTE_MAP_COMPILED, address);
3486 return NULL;
3487 }
3488
3489 return address;
3490 }
3491
3492 static void route_set_vpn_nexthop_free(void *rule)
3493 {
3494 XFREE(MTYPE_ROUTE_MAP_COMPILED, rule);
3495 }
3496
3497 /* Route map commands for ipv4 next-hop set. */
3498 static const struct route_map_rule_cmd route_set_vpnv4_nexthop_cmd = {
3499 "ipv4 vpn next-hop",
3500 route_set_vpnv4_nexthop,
3501 route_set_vpnv4_nexthop_compile,
3502 route_set_vpn_nexthop_free
3503 };
3504
3505 /* Route map commands for ipv6 next-hop set. */
3506 static const struct route_map_rule_cmd route_set_vpnv6_nexthop_cmd = {
3507 "ipv6 vpn next-hop",
3508 route_set_vpnv6_nexthop,
3509 route_set_vpnv6_nexthop_compile,
3510 route_set_vpn_nexthop_free
3511 };
3512
3513 /* `set originator-id' */
3514
3515 /* For origin set. */
3516 static enum route_map_cmd_result_t
3517 route_set_originator_id(void *rule, const struct prefix *prefix,
3518 route_map_object_t type, void *object)
3519 {
3520 struct in_addr *address;
3521 struct bgp_path_info *path;
3522
3523 if (type == RMAP_BGP) {
3524 address = rule;
3525 path = object;
3526
3527 path->attr->flag |= ATTR_FLAG_BIT(BGP_ATTR_ORIGINATOR_ID);
3528 path->attr->originator_id = *address;
3529 }
3530
3531 return RMAP_OKAY;
3532 }
3533
3534 /* Compile function for originator-id set. */
3535 static void *route_set_originator_id_compile(const char *arg)
3536 {
3537 int ret;
3538 struct in_addr *address;
3539
3540 address = XMALLOC(MTYPE_ROUTE_MAP_COMPILED, sizeof(struct in_addr));
3541
3542 ret = inet_aton(arg, address);
3543
3544 if (ret == 0) {
3545 XFREE(MTYPE_ROUTE_MAP_COMPILED, address);
3546 return NULL;
3547 }
3548
3549 return address;
3550 }
3551
3552 /* Compile function for originator_id set. */
3553 static void route_set_originator_id_free(void *rule)
3554 {
3555 XFREE(MTYPE_ROUTE_MAP_COMPILED, rule);
3556 }
3557
3558 /* Set originator-id rule structure. */
3559 static const struct route_map_rule_cmd route_set_originator_id_cmd = {
3560 "originator-id",
3561 route_set_originator_id,
3562 route_set_originator_id_compile,
3563 route_set_originator_id_free,
3564 };
3565
3566 /* Add bgp route map rule. */
3567 static int bgp_route_match_add(struct vty *vty, const char *command,
3568 const char *arg, route_map_event_t type)
3569 {
3570 VTY_DECLVAR_CONTEXT(route_map_index, index);
3571 int retval = CMD_SUCCESS;
3572 enum rmap_compile_rets ret;
3573
3574 ret = route_map_add_match(index, command, arg, type);
3575 switch (ret) {
3576 case RMAP_RULE_MISSING:
3577 vty_out(vty, "%% BGP Can't find rule.\n");
3578 retval = CMD_WARNING_CONFIG_FAILED;
3579 break;
3580 case RMAP_COMPILE_ERROR:
3581 vty_out(vty, "%% BGP Argument is malformed.\n");
3582 retval = CMD_WARNING_CONFIG_FAILED;
3583 break;
3584 case RMAP_COMPILE_SUCCESS:
3585 /*
3586 * Intentionally doing nothing here.
3587 */
3588 break;
3589 }
3590
3591 return retval;
3592 }
3593
3594 /* Delete bgp route map rule. */
3595 static int bgp_route_match_delete(struct vty *vty, const char *command,
3596 const char *arg, route_map_event_t type)
3597 {
3598 VTY_DECLVAR_CONTEXT(route_map_index, index);
3599 enum rmap_compile_rets ret;
3600 int retval = CMD_SUCCESS;
3601 char *dep_name = NULL;
3602 const char *tmpstr;
3603 char *rmap_name = NULL;
3604
3605 if (type != RMAP_EVENT_MATCH_DELETED) {
3606 /* ignore the mundane, the types without any dependency */
3607 if (arg == NULL) {
3608 if ((tmpstr = route_map_get_match_arg(index, command))
3609 != NULL)
3610 dep_name =
3611 XSTRDUP(MTYPE_ROUTE_MAP_RULE, tmpstr);
3612 } else {
3613 dep_name = XSTRDUP(MTYPE_ROUTE_MAP_RULE, arg);
3614 }
3615 rmap_name = XSTRDUP(MTYPE_ROUTE_MAP_NAME, index->map->name);
3616 }
3617
3618 ret = route_map_delete_match(index, command, dep_name, type);
3619 switch (ret) {
3620 case RMAP_RULE_MISSING:
3621 vty_out(vty, "%% BGP Can't find rule.\n");
3622 retval = CMD_WARNING_CONFIG_FAILED;
3623 break;
3624 case RMAP_COMPILE_ERROR:
3625 vty_out(vty, "%% BGP Argument is malformed.\n");
3626 retval = CMD_WARNING_CONFIG_FAILED;
3627 break;
3628 case RMAP_COMPILE_SUCCESS:
3629 /*
3630 * Nothing to do here
3631 */
3632 break;
3633 }
3634
3635 XFREE(MTYPE_ROUTE_MAP_RULE, dep_name);
3636 XFREE(MTYPE_ROUTE_MAP_NAME, rmap_name);
3637
3638 return retval;
3639 }
3640
3641 /*
3642 * This is the workhorse routine for processing in/out routemap
3643 * modifications.
3644 */
3645 static void bgp_route_map_process_peer(const char *rmap_name,
3646 struct route_map *map, struct peer *peer,
3647 int afi, int safi, int route_update)
3648 {
3649 struct bgp_filter *filter;
3650
3651 if (!peer || !rmap_name)
3652 return;
3653
3654 filter = &peer->filter[afi][safi];
3655 /*
3656 * in is for non-route-server clients,
3657 * out is for all peers
3658 */
3659 if (filter->map[RMAP_IN].name
3660 && (strcmp(rmap_name, filter->map[RMAP_IN].name) == 0)) {
3661 filter->map[RMAP_IN].map = map;
3662
3663 if (route_update && peer->status == Established) {
3664 if (CHECK_FLAG(peer->af_flags[afi][safi],
3665 PEER_FLAG_SOFT_RECONFIG)) {
3666 if (bgp_debug_update(peer, NULL, NULL, 1))
3667 zlog_debug(
3668 "Processing route_map %s update on peer %s (inbound, soft-reconfig)",
3669 rmap_name, peer->host);
3670
3671 bgp_soft_reconfig_in(peer, afi, safi);
3672 } else if (CHECK_FLAG(peer->cap,
3673 PEER_CAP_REFRESH_OLD_RCV)
3674 || CHECK_FLAG(peer->cap,
3675 PEER_CAP_REFRESH_NEW_RCV)) {
3676 if (bgp_debug_update(peer, NULL, NULL, 1))
3677 zlog_debug(
3678 "Processing route_map %s update on peer %s (inbound, route-refresh)",
3679 rmap_name, peer->host);
3680 bgp_route_refresh_send(peer, afi, safi, 0, 0,
3681 0);
3682 }
3683 }
3684 }
3685
3686 /*
3687 * For outbound, unsuppress and default-originate map change (content or
3688 * map created), merely update the "config" here, the actual route
3689 * announcement happens at the group level.
3690 */
3691 if (filter->map[RMAP_OUT].name
3692 && (strcmp(rmap_name, filter->map[RMAP_OUT].name) == 0))
3693 filter->map[RMAP_OUT].map = map;
3694
3695 if (filter->usmap.name && (strcmp(rmap_name, filter->usmap.name) == 0))
3696 filter->usmap.map = map;
3697
3698 if (filter->advmap.aname
3699 && (strcmp(rmap_name, filter->advmap.aname) == 0)) {
3700 filter->advmap.amap = map;
3701 }
3702
3703 if (filter->advmap.cname
3704 && (strcmp(rmap_name, filter->advmap.cname) == 0)) {
3705 filter->advmap.cmap = map;
3706 }
3707
3708 if (peer->default_rmap[afi][safi].name
3709 && (strcmp(rmap_name, peer->default_rmap[afi][safi].name) == 0))
3710 peer->default_rmap[afi][safi].map = map;
3711
3712 /* Notify BGP conditional advertisement scanner percess */
3713 peer->advmap_info[afi][safi].config_change = true;
3714 }
3715
3716 static void bgp_route_map_update_peer_group(const char *rmap_name,
3717 struct route_map *map,
3718 struct bgp *bgp)
3719 {
3720 struct peer_group *group;
3721 struct listnode *node, *nnode;
3722 struct bgp_filter *filter;
3723 int afi, safi;
3724 int direct;
3725
3726 if (!bgp)
3727 return;
3728
3729 /* All the peers have been updated correctly already. This is
3730 * just updating the placeholder data. No real update required.
3731 */
3732 for (ALL_LIST_ELEMENTS(bgp->group, node, nnode, group)) {
3733 FOREACH_AFI_SAFI (afi, safi) {
3734 filter = &group->conf->filter[afi][safi];
3735
3736 for (direct = RMAP_IN; direct < RMAP_MAX; direct++) {
3737 if ((filter->map[direct].name)
3738 && (strcmp(rmap_name,
3739 filter->map[direct].name)
3740 == 0))
3741 filter->map[direct].map = map;
3742 }
3743
3744 if (filter->usmap.name
3745 && (strcmp(rmap_name, filter->usmap.name) == 0))
3746 filter->usmap.map = map;
3747 }
3748 }
3749 }
3750
3751 /*
3752 * Note that if an extreme number (tens of thousands) of route-maps are in use
3753 * and if bgp has an extreme number of peers, network statements, etc then this
3754 * function can consume a lot of cycles. This is due to this function being
3755 * called for each route-map and within this function we walk the list of peers,
3756 * network statements, etc looking to see if they use this route-map.
3757 */
3758 static void bgp_route_map_process_update(struct bgp *bgp, const char *rmap_name,
3759 int route_update)
3760 {
3761 int i;
3762 bool matched;
3763 afi_t afi;
3764 safi_t safi;
3765 struct peer *peer;
3766 struct bgp_dest *bn;
3767 struct bgp_static *bgp_static;
3768 struct bgp_aggregate *aggregate;
3769 struct listnode *node, *nnode;
3770 struct route_map *map;
3771 char buf[INET6_ADDRSTRLEN];
3772
3773 map = route_map_lookup_by_name(rmap_name);
3774
3775 for (ALL_LIST_ELEMENTS(bgp->peer, node, nnode, peer)) {
3776
3777 /* Ignore dummy peer-group structure */
3778 if (CHECK_FLAG(peer->sflags, PEER_STATUS_GROUP))
3779 continue;
3780
3781 FOREACH_AFI_SAFI (afi, safi) {
3782 /* process in/out/import/export/default-orig
3783 * route-maps */
3784 bgp_route_map_process_peer(rmap_name, map, peer, afi,
3785 safi, route_update);
3786 }
3787 }
3788
3789 /* for outbound/default-orig route-maps, process for groups */
3790 update_group_policy_update(bgp, BGP_POLICY_ROUTE_MAP, rmap_name,
3791 route_update, 0);
3792
3793 /* update peer-group config (template) */
3794 bgp_route_map_update_peer_group(rmap_name, map, bgp);
3795
3796 FOREACH_AFI_SAFI (afi, safi) {
3797 /* For table route-map updates. */
3798 if (!bgp_fibupd_safi(safi))
3799 continue;
3800
3801 if (bgp->table_map[afi][safi].name
3802 && (strcmp(rmap_name, bgp->table_map[afi][safi].name)
3803 == 0)) {
3804
3805 /* bgp->table_map[afi][safi].map is NULL.
3806 * i.e Route map creation event.
3807 * So update applied_counter.
3808 * If it is not NULL, i.e It may be routemap updation or
3809 * deletion. so no need to update the counter.
3810 */
3811 if (!bgp->table_map[afi][safi].map)
3812 route_map_counter_increment(map);
3813 bgp->table_map[afi][safi].map = map;
3814
3815 if (BGP_DEBUG(zebra, ZEBRA))
3816 zlog_debug(
3817 "Processing route_map %s update on table map",
3818 rmap_name);
3819 if (route_update)
3820 bgp_zebra_announce_table(bgp, afi, safi);
3821 }
3822
3823 /* For network route-map updates. */
3824 for (bn = bgp_table_top(bgp->route[afi][safi]); bn;
3825 bn = bgp_route_next(bn)) {
3826 bgp_static = bgp_dest_get_bgp_static_info(bn);
3827 if (!bgp_static)
3828 continue;
3829
3830 if (!bgp_static->rmap.name
3831 || (strcmp(rmap_name, bgp_static->rmap.name) != 0))
3832 continue;
3833
3834 if (!bgp_static->rmap.map)
3835 route_map_counter_increment(map);
3836
3837 bgp_static->rmap.map = map;
3838
3839 if (route_update && !bgp_static->backdoor) {
3840 const struct prefix *bn_p =
3841 bgp_dest_get_prefix(bn);
3842
3843 if (bgp_debug_zebra(bn_p))
3844 zlog_debug(
3845 "Processing route_map %s update on static route %s",
3846 rmap_name,
3847 inet_ntop(bn_p->family,
3848 &bn_p->u.prefix, buf,
3849 INET6_ADDRSTRLEN));
3850 bgp_static_update(bgp, bn_p, bgp_static, afi,
3851 safi);
3852 }
3853 }
3854
3855 /* For aggregate-address route-map updates. */
3856 for (bn = bgp_table_top(bgp->aggregate[afi][safi]); bn;
3857 bn = bgp_route_next(bn)) {
3858 aggregate = bgp_dest_get_bgp_aggregate_info(bn);
3859 if (!aggregate)
3860 continue;
3861
3862 matched = false;
3863
3864 /* Update suppress map pointer. */
3865 if (aggregate->suppress_map_name
3866 && strmatch(aggregate->suppress_map_name,
3867 rmap_name)) {
3868 if (aggregate->rmap.map == NULL)
3869 route_map_counter_increment(map);
3870
3871 aggregate->suppress_map = map;
3872
3873 bgp_aggregate_toggle_suppressed(
3874 aggregate, bgp, bgp_dest_get_prefix(bn),
3875 afi, safi, false);
3876
3877 matched = true;
3878 }
3879
3880 if (aggregate->rmap.name
3881 && strmatch(rmap_name, aggregate->rmap.name)) {
3882 if (aggregate->rmap.map == NULL)
3883 route_map_counter_increment(map);
3884
3885 aggregate->rmap.map = map;
3886
3887 matched = true;
3888 }
3889
3890 if (matched && route_update) {
3891 const struct prefix *bn_p =
3892 bgp_dest_get_prefix(bn);
3893
3894 if (bgp_debug_zebra(bn_p))
3895 zlog_debug(
3896 "Processing route_map %s update on aggregate-address route %s",
3897 rmap_name,
3898 inet_ntop(bn_p->family,
3899 &bn_p->u.prefix, buf,
3900 INET6_ADDRSTRLEN));
3901 bgp_aggregate_route(bgp, bn_p, afi, safi,
3902 aggregate);
3903 }
3904 }
3905 }
3906
3907 /* For redistribute route-map updates. */
3908 for (afi = AFI_IP; afi < AFI_MAX; afi++)
3909 for (i = 0; i < ZEBRA_ROUTE_MAX; i++) {
3910 struct list *red_list;
3911 struct bgp_redist *red;
3912
3913 red_list = bgp->redist[afi][i];
3914 if (!red_list)
3915 continue;
3916
3917 for (ALL_LIST_ELEMENTS_RO(red_list, node, red)) {
3918 if (!red->rmap.name
3919 || (strcmp(rmap_name, red->rmap.name) != 0))
3920 continue;
3921
3922 if (!red->rmap.map)
3923 route_map_counter_increment(map);
3924
3925 red->rmap.map = map;
3926
3927 if (!route_update)
3928 continue;
3929
3930 if (BGP_DEBUG(zebra, ZEBRA))
3931 zlog_debug(
3932 "Processing route_map %s update on redistributed routes",
3933 rmap_name);
3934
3935 bgp_redistribute_resend(bgp, afi, i,
3936 red->instance);
3937 }
3938 }
3939
3940 /* for type5 command route-maps */
3941 FOREACH_AFI_SAFI (afi, safi) {
3942 if (!bgp->adv_cmd_rmap[afi][safi].name
3943 || strcmp(rmap_name, bgp->adv_cmd_rmap[afi][safi].name)
3944 != 0)
3945 continue;
3946
3947 /* Make sure the route-map is populated here if not already done */
3948 bgp->adv_cmd_rmap[afi][safi].map = map;
3949
3950 if (BGP_DEBUG(zebra, ZEBRA))
3951 zlog_debug(
3952 "Processing route_map %s update on advertise type5 route command",
3953 rmap_name);
3954
3955 if (route_update && advertise_type5_routes(bgp, afi)) {
3956 bgp_evpn_withdraw_type5_routes(bgp, afi, safi);
3957 bgp_evpn_advertise_type5_routes(bgp, afi, safi);
3958 }
3959 }
3960 }
3961
3962 static void bgp_route_map_process_update_cb(char *rmap_name)
3963 {
3964 struct listnode *node, *nnode;
3965 struct bgp *bgp;
3966
3967 for (ALL_LIST_ELEMENTS(bm->bgp, node, nnode, bgp)) {
3968 bgp_route_map_process_update(bgp, rmap_name, 1);
3969
3970 #ifdef ENABLE_BGP_VNC
3971 /* zlog_debug("%s: calling vnc_routemap_update", __func__); */
3972 vnc_routemap_update(bgp, __func__);
3973 #endif
3974 }
3975
3976 vpn_policy_routemap_event(rmap_name);
3977 }
3978
3979 int bgp_route_map_update_timer(struct thread *thread)
3980 {
3981 bm->t_rmap_update = NULL;
3982
3983 route_map_walk_update_list(bgp_route_map_process_update_cb);
3984
3985 return 0;
3986 }
3987
3988 static void bgp_route_map_mark_update(const char *rmap_name)
3989 {
3990 struct listnode *node, *nnode;
3991 struct bgp *bgp;
3992
3993 /* If new update is received before the current timer timed out,
3994 * turn it off and start a new timer.
3995 */
3996 THREAD_OFF(bm->t_rmap_update);
3997
3998 /* rmap_update_timer of 0 means don't do route updates */
3999 if (bm->rmap_update_timer) {
4000 thread_add_timer(bm->master, bgp_route_map_update_timer,
4001 NULL, bm->rmap_update_timer,
4002 &bm->t_rmap_update);
4003
4004 /* Signal the groups that a route-map update event has
4005 * started */
4006 for (ALL_LIST_ELEMENTS(bm->bgp, node, nnode, bgp))
4007 update_group_policy_update(bgp,
4008 BGP_POLICY_ROUTE_MAP,
4009 rmap_name, 1, 1);
4010 } else {
4011 for (ALL_LIST_ELEMENTS(bm->bgp, node, nnode, bgp))
4012 bgp_route_map_process_update(bgp, rmap_name, 0);
4013 #ifdef ENABLE_BGP_VNC
4014 zlog_debug("%s: calling vnc_routemap_update", __func__);
4015 vnc_routemap_update(bgp, __func__);
4016 #endif
4017 }
4018 }
4019
4020 static void bgp_route_map_add(const char *rmap_name)
4021 {
4022 if (route_map_mark_updated(rmap_name) == 0)
4023 bgp_route_map_mark_update(rmap_name);
4024
4025 route_map_notify_dependencies(rmap_name, RMAP_EVENT_MATCH_ADDED);
4026 }
4027
4028 static void bgp_route_map_delete(const char *rmap_name)
4029 {
4030 if (route_map_mark_updated(rmap_name) == 0)
4031 bgp_route_map_mark_update(rmap_name);
4032
4033 route_map_notify_dependencies(rmap_name, RMAP_EVENT_MATCH_DELETED);
4034 }
4035
4036 static void bgp_route_map_event(const char *rmap_name)
4037 {
4038 if (route_map_mark_updated(rmap_name) == 0)
4039 bgp_route_map_mark_update(rmap_name);
4040
4041 route_map_notify_dependencies(rmap_name, RMAP_EVENT_MATCH_ADDED);
4042 }
4043
4044 DEFUN (match_mac_address,
4045 match_mac_address_cmd,
4046 "match mac address WORD",
4047 MATCH_STR
4048 "mac address\n"
4049 "Match address of route\n"
4050 "MAC Access-list name\n")
4051 {
4052 return bgp_route_match_add(vty, "mac address", argv[3]->arg,
4053 RMAP_EVENT_FILTER_ADDED);
4054 }
4055
4056 DEFUN (no_match_mac_address,
4057 no_match_mac_address_cmd,
4058 "no match mac address WORD",
4059 NO_STR
4060 MATCH_STR
4061 "mac\n"
4062 "Match address of route\n"
4063 "MAC acess-list name\n")
4064 {
4065 return bgp_route_match_delete(vty, "mac address", argv[4]->arg,
4066 RMAP_EVENT_FILTER_DELETED);
4067 }
4068
4069 /*
4070 * Helper to handle the case of the user passing in a number or type string
4071 */
4072 static const char *parse_evpn_rt_type(const char *num_rt_type)
4073 {
4074 switch (num_rt_type[0]) {
4075 case '1':
4076 return "ead";
4077 case '2':
4078 return "macip";
4079 case '3':
4080 return "multicast";
4081 case '4':
4082 return "es";
4083 case '5':
4084 return "prefix";
4085 default:
4086 break;
4087 }
4088
4089 /* Was already full type string */
4090 return num_rt_type;
4091 }
4092
4093 DEFUN (match_evpn_route_type,
4094 match_evpn_route_type_cmd,
4095 "match evpn route-type <macip|2|multicast|3|prefix|5>",
4096 MATCH_STR
4097 EVPN_HELP_STR
4098 EVPN_TYPE_HELP_STR
4099 EVPN_TYPE_2_HELP_STR
4100 EVPN_TYPE_2_HELP_STR
4101 EVPN_TYPE_3_HELP_STR
4102 EVPN_TYPE_3_HELP_STR
4103 EVPN_TYPE_5_HELP_STR
4104 EVPN_TYPE_5_HELP_STR)
4105 {
4106 return bgp_route_match_add(vty, "evpn route-type",
4107 parse_evpn_rt_type(argv[3]->arg),
4108 RMAP_EVENT_MATCH_ADDED);
4109 }
4110
4111 DEFUN (no_match_evpn_route_type,
4112 no_match_evpn_route_type_cmd,
4113 "no match evpn route-type <macip|2|multicast|3|prefix|5>",
4114 NO_STR
4115 MATCH_STR
4116 EVPN_HELP_STR
4117 EVPN_TYPE_HELP_STR
4118 EVPN_TYPE_2_HELP_STR
4119 EVPN_TYPE_2_HELP_STR
4120 EVPN_TYPE_3_HELP_STR
4121 EVPN_TYPE_3_HELP_STR
4122 EVPN_TYPE_5_HELP_STR
4123 EVPN_TYPE_5_HELP_STR)
4124 {
4125 return bgp_route_match_delete(vty, "evpn route-type",
4126 parse_evpn_rt_type(argv[4]->arg),
4127 RMAP_EVENT_MATCH_DELETED);
4128 }
4129
4130
4131 DEFUN (match_evpn_vni,
4132 match_evpn_vni_cmd,
4133 "match evpn vni " CMD_VNI_RANGE,
4134 MATCH_STR
4135 EVPN_HELP_STR
4136 "Match VNI\n"
4137 "VNI ID\n")
4138 {
4139 return bgp_route_match_add(vty, "evpn vni", argv[3]->arg,
4140 RMAP_EVENT_MATCH_ADDED);
4141 }
4142
4143 DEFUN (no_match_evpn_vni,
4144 no_match_evpn_vni_cmd,
4145 "no match evpn vni " CMD_VNI_RANGE,
4146 NO_STR
4147 MATCH_STR
4148 EVPN_HELP_STR
4149 "Match VNI\n"
4150 "VNI ID\n")
4151 {
4152 return bgp_route_match_delete(vty, "evpn vni", argv[4]->arg,
4153 RMAP_EVENT_MATCH_DELETED);
4154 }
4155
4156 DEFUN (match_evpn_default_route,
4157 match_evpn_default_route_cmd,
4158 "match evpn default-route",
4159 MATCH_STR
4160 EVPN_HELP_STR
4161 "default EVPN type-5 route\n")
4162 {
4163 return bgp_route_match_add(vty, "evpn default-route", NULL,
4164 RMAP_EVENT_MATCH_ADDED);
4165 }
4166
4167 DEFUN (no_match_evpn_default_route,
4168 no_match_evpn_default_route_cmd,
4169 "no match evpn default-route",
4170 NO_STR
4171 MATCH_STR
4172 EVPN_HELP_STR
4173 "default EVPN type-5 route\n")
4174 {
4175 return bgp_route_match_delete(vty, "evpn default-route", NULL,
4176 RMAP_EVENT_MATCH_DELETED);
4177 }
4178
4179 DEFUN (match_evpn_rd,
4180 match_evpn_rd_cmd,
4181 "match evpn rd ASN:NN_OR_IP-ADDRESS:NN",
4182 MATCH_STR
4183 EVPN_HELP_STR
4184 "Route Distinguisher\n"
4185 "ASN:XX or A.B.C.D:XX\n")
4186 {
4187 return bgp_route_match_add(vty, "evpn rd", argv[3]->arg,
4188 RMAP_EVENT_MATCH_ADDED);
4189 }
4190
4191 DEFUN (no_match_evpn_rd,
4192 no_match_evpn_rd_cmd,
4193 "no match evpn rd ASN:NN_OR_IP-ADDRESS:NN",
4194 NO_STR
4195 MATCH_STR
4196 EVPN_HELP_STR
4197 "Route Distinguisher\n"
4198 "ASN:XX or A.B.C.D:XX\n")
4199 {
4200 return bgp_route_match_delete(vty, "evpn rd", argv[4]->arg,
4201 RMAP_EVENT_MATCH_DELETED);
4202 }
4203
4204 DEFPY(match_vrl_source_vrf,
4205 match_vrl_source_vrf_cmd,
4206 "match source-vrf NAME$vrf_name",
4207 MATCH_STR
4208 "source vrf\n"
4209 "The VRF name\n")
4210 {
4211 return bgp_route_match_add(vty, "source-vrf", vrf_name,
4212 RMAP_EVENT_MATCH_ADDED);
4213 }
4214
4215 DEFPY(no_match_vrl_source_vrf,
4216 no_match_vrl_source_vrf_cmd,
4217 "no match source-vrf NAME$vrf_name",
4218 NO_STR
4219 MATCH_STR
4220 "source vrf\n"
4221 "The VRF name\n")
4222 {
4223 return bgp_route_match_delete(vty, "source-vrf", vrf_name,
4224 RMAP_EVENT_MATCH_DELETED);
4225 }
4226
4227 DEFUN (match_peer,
4228 match_peer_cmd,
4229 "match peer <A.B.C.D|X:X::X:X|WORD>",
4230 MATCH_STR
4231 "Match peer address\n"
4232 "IP address of peer\n"
4233 "IPv6 address of peer\n"
4234 "Interface name of peer\n")
4235 {
4236 int idx_ip = 2;
4237 return bgp_route_match_add(vty, "peer", argv[idx_ip]->arg,
4238 RMAP_EVENT_MATCH_ADDED);
4239 }
4240
4241 DEFUN (match_peer_local,
4242 match_peer_local_cmd,
4243 "match peer local",
4244 MATCH_STR
4245 "Match peer address\n"
4246 "Static or Redistributed routes\n")
4247 {
4248 return bgp_route_match_add(vty, "peer", "local",
4249 RMAP_EVENT_MATCH_DELETED);
4250 }
4251
4252 DEFUN (no_match_peer,
4253 no_match_peer_cmd,
4254 "no match peer [<local|A.B.C.D|X:X::X:X|WORD>]",
4255 NO_STR
4256 MATCH_STR
4257 "Match peer address\n"
4258 "Static or Redistributed routes\n"
4259 "IP address of peer\n"
4260 "IPv6 address of peer\n"
4261 "Interface name of peer\n")
4262 {
4263 int idx_peer = 3;
4264
4265 if (argc <= idx_peer)
4266 return bgp_route_match_delete(vty, "peer", NULL,
4267 RMAP_EVENT_MATCH_DELETED);
4268 return bgp_route_match_delete(vty, "peer", argv[idx_peer]->arg,
4269 RMAP_EVENT_MATCH_DELETED);
4270 }
4271
4272 #if defined(HAVE_LUA)
4273 DEFUN (match_command,
4274 match_command_cmd,
4275 "match command WORD",
4276 MATCH_STR
4277 "Run a command to match\n"
4278 "The command to run\n")
4279 {
4280 return bgp_route_match_add(vty, "command", argv[2]->arg,
4281 RMAP_EVENT_FILTER_ADDED);
4282 }
4283
4284 DEFUN (no_match_command,
4285 no_match_command_cmd,
4286 "no match command WORD",
4287 NO_STR
4288 MATCH_STR
4289 "Run a command to match\n"
4290 "The command to run\n")
4291 {
4292 return bgp_route_match_delete(vty, "command", argv[3]->arg,
4293 RMAP_EVENT_FILTER_DELETED);
4294 }
4295 #endif
4296
4297 /* match probability */
4298 DEFUN (match_probability,
4299 match_probability_cmd,
4300 "match probability (0-100)",
4301 MATCH_STR
4302 "Match portion of routes defined by percentage value\n"
4303 "Percentage of routes\n")
4304 {
4305 int idx_number = 2;
4306 return bgp_route_match_add(vty, "probability", argv[idx_number]->arg,
4307 RMAP_EVENT_MATCH_ADDED);
4308 }
4309
4310
4311 DEFUN (no_match_probability,
4312 no_match_probability_cmd,
4313 "no match probability [(1-99)]",
4314 NO_STR
4315 MATCH_STR
4316 "Match portion of routes defined by percentage value\n"
4317 "Percentage of routes\n")
4318 {
4319 int idx_number = 3;
4320 if (argc <= idx_number)
4321 return bgp_route_match_delete(vty, "probability", NULL,
4322 RMAP_EVENT_MATCH_DELETED);
4323 return bgp_route_match_delete(vty, "probability", argv[idx_number]->arg,
4324 RMAP_EVENT_MATCH_DELETED);
4325 }
4326
4327
4328 DEFUN (match_ip_route_source,
4329 match_ip_route_source_cmd,
4330 "match ip route-source <(1-199)|(1300-2699)|WORD>",
4331 MATCH_STR
4332 IP_STR
4333 "Match advertising source address of route\n"
4334 "IP access-list number\n"
4335 "IP access-list number (expanded range)\n"
4336 "IP standard access-list name\n")
4337 {
4338 int idx_acl = 3;
4339 return bgp_route_match_add(vty, "ip route-source", argv[idx_acl]->arg,
4340 RMAP_EVENT_FILTER_ADDED);
4341 }
4342
4343
4344 DEFUN (no_match_ip_route_source,
4345 no_match_ip_route_source_cmd,
4346 "no match ip route-source [<(1-199)|(1300-2699)|WORD>]",
4347 NO_STR
4348 MATCH_STR
4349 IP_STR
4350 "Match advertising source address of route\n"
4351 "IP access-list number\n"
4352 "IP access-list number (expanded range)\n"
4353 "IP standard access-list name\n")
4354 {
4355 int idx_number = 4;
4356 if (argc <= idx_number)
4357 return bgp_route_match_delete(vty, "ip route-source", NULL,
4358 RMAP_EVENT_FILTER_DELETED);
4359 return bgp_route_match_delete(vty, "ip route-source",
4360 argv[idx_number]->arg,
4361 RMAP_EVENT_FILTER_DELETED);
4362 }
4363
4364
4365 DEFUN (match_ip_route_source_prefix_list,
4366 match_ip_route_source_prefix_list_cmd,
4367 "match ip route-source prefix-list WORD",
4368 MATCH_STR
4369 IP_STR
4370 "Match advertising source address of route\n"
4371 "Match entries of prefix-lists\n"
4372 "IP prefix-list name\n")
4373 {
4374 int idx_word = 4;
4375 return bgp_route_match_add(vty, "ip route-source prefix-list",
4376 argv[idx_word]->arg, RMAP_EVENT_PLIST_ADDED);
4377 }
4378
4379
4380 DEFUN (no_match_ip_route_source_prefix_list,
4381 no_match_ip_route_source_prefix_list_cmd,
4382 "no match ip route-source prefix-list [WORD]",
4383 NO_STR
4384 MATCH_STR
4385 IP_STR
4386 "Match advertising source address of route\n"
4387 "Match entries of prefix-lists\n"
4388 "IP prefix-list name\n")
4389 {
4390 int idx_word = 5;
4391 if (argc <= idx_word)
4392 return bgp_route_match_delete(vty,
4393 "ip route-source prefix-list",
4394 NULL, RMAP_EVENT_PLIST_DELETED);
4395 return bgp_route_match_delete(vty, "ip route-source prefix-list",
4396 argv[idx_word]->arg,
4397 RMAP_EVENT_PLIST_DELETED);
4398 }
4399
4400
4401 DEFUN (match_local_pref,
4402 match_local_pref_cmd,
4403 "match local-preference (0-4294967295)",
4404 MATCH_STR
4405 "Match local-preference of route\n"
4406 "Metric value\n")
4407 {
4408 int idx_number = 2;
4409 return bgp_route_match_add(vty, "local-preference",
4410 argv[idx_number]->arg,
4411 RMAP_EVENT_MATCH_ADDED);
4412 }
4413
4414
4415 DEFUN (no_match_local_pref,
4416 no_match_local_pref_cmd,
4417 "no match local-preference [(0-4294967295)]",
4418 NO_STR
4419 MATCH_STR
4420 "Match local preference of route\n"
4421 "Local preference value\n")
4422 {
4423 int idx_localpref = 3;
4424 if (argc <= idx_localpref)
4425 return bgp_route_match_delete(vty, "local-preference", NULL,
4426 RMAP_EVENT_MATCH_DELETED);
4427 return bgp_route_match_delete(vty, "local-preference",
4428 argv[idx_localpref]->arg,
4429 RMAP_EVENT_MATCH_DELETED);
4430 }
4431
4432
4433 DEFUN (match_community,
4434 match_community_cmd,
4435 "match community <(1-99)|(100-500)|WORD> [exact-match]",
4436 MATCH_STR
4437 "Match BGP community list\n"
4438 "Community-list number (standard)\n"
4439 "Community-list number (expanded)\n"
4440 "Community-list name\n"
4441 "Do exact matching of communities\n")
4442 {
4443 int idx_comm_list = 2;
4444 int ret;
4445 char *argstr;
4446
4447 if (argc == 4) {
4448 argstr = XMALLOC(MTYPE_ROUTE_MAP_COMPILED,
4449 strlen(argv[idx_comm_list]->arg)
4450 + strlen("exact-match") + 2);
4451
4452 sprintf(argstr, "%s exact-match", argv[idx_comm_list]->arg);
4453 } else
4454 argstr = argv[idx_comm_list]->arg;
4455
4456 ret = bgp_route_match_add(vty, "community", argstr,
4457 RMAP_EVENT_CLIST_ADDED);
4458
4459 if (argstr != argv[idx_comm_list]->arg)
4460 XFREE(MTYPE_ROUTE_MAP_COMPILED, argstr);
4461
4462 return ret;
4463 }
4464
4465 DEFUN (no_match_community,
4466 no_match_community_cmd,
4467 "no match community [<(1-99)|(100-500)|WORD> [exact-match]]",
4468 NO_STR
4469 MATCH_STR
4470 "Match BGP community list\n"
4471 "Community-list number (standard)\n"
4472 "Community-list number (expanded)\n"
4473 "Community-list name\n"
4474 "Do exact matching of communities\n")
4475 {
4476 return bgp_route_match_delete(vty, "community", NULL,
4477 RMAP_EVENT_CLIST_DELETED);
4478 }
4479
4480 DEFUN (match_lcommunity,
4481 match_lcommunity_cmd,
4482 "match large-community <(1-99)|(100-500)|WORD> [exact-match]",
4483 MATCH_STR
4484 "Match BGP large community list\n"
4485 "Large Community-list number (standard)\n"
4486 "Large Community-list number (expanded)\n"
4487 "Large Community-list name\n"
4488 "Do exact matching of communities\n")
4489 {
4490 int idx_lcomm_list = 2;
4491 int ret;
4492 char *argstr;
4493
4494 if (argc == 4) {
4495 argstr = XMALLOC(MTYPE_ROUTE_MAP_COMPILED,
4496 strlen(argv[idx_lcomm_list]->arg)
4497 + strlen("exact-match") + 2);
4498
4499 sprintf(argstr, "%s exact-match", argv[idx_lcomm_list]->arg);
4500 } else
4501 argstr = argv[idx_lcomm_list]->arg;
4502
4503 ret = bgp_route_match_add(vty, "large-community", argstr,
4504 RMAP_EVENT_LLIST_ADDED);
4505 if (argstr != argv[idx_lcomm_list]->arg)
4506 XFREE(MTYPE_ROUTE_MAP_COMPILED, argstr);
4507
4508 return ret;
4509 }
4510
4511 DEFUN (no_match_lcommunity,
4512 no_match_lcommunity_cmd,
4513 "no match large-community [<(1-99)|(100-500)|WORD> [exact-match]]",
4514 NO_STR
4515 MATCH_STR
4516 "Match BGP large community list\n"
4517 "Large Community-list number (standard)\n"
4518 "Large Community-list number (expanded)\n"
4519 "Large Community-list name\n"
4520 "Do exact matching of communities\n")
4521 {
4522 return bgp_route_match_delete(vty, "large-community", NULL,
4523 RMAP_EVENT_LLIST_DELETED);
4524 }
4525
4526 DEFUN (match_ecommunity,
4527 match_ecommunity_cmd,
4528 "match extcommunity <(1-99)|(100-500)|WORD>",
4529 MATCH_STR
4530 "Match BGP/VPN extended community list\n"
4531 "Extended community-list number (standard)\n"
4532 "Extended community-list number (expanded)\n"
4533 "Extended community-list name\n")
4534 {
4535 int idx_comm_list = 2;
4536 return bgp_route_match_add(vty, "extcommunity",
4537 argv[idx_comm_list]->arg,
4538 RMAP_EVENT_ECLIST_ADDED);
4539 }
4540
4541
4542 DEFUN (no_match_ecommunity,
4543 no_match_ecommunity_cmd,
4544 "no match extcommunity [<(1-99)|(100-500)|WORD>]",
4545 NO_STR
4546 MATCH_STR
4547 "Match BGP/VPN extended community list\n"
4548 "Extended community-list number (standard)\n"
4549 "Extended community-list number (expanded)\n"
4550 "Extended community-list name\n")
4551 {
4552 return bgp_route_match_delete(vty, "extcommunity", NULL,
4553 RMAP_EVENT_ECLIST_DELETED);
4554 }
4555
4556
4557 DEFUN (match_aspath,
4558 match_aspath_cmd,
4559 "match as-path WORD",
4560 MATCH_STR
4561 "Match BGP AS path list\n"
4562 "AS path access-list name\n")
4563 {
4564 int idx_word = 2;
4565 return bgp_route_match_add(vty, "as-path", argv[idx_word]->arg,
4566 RMAP_EVENT_ASLIST_ADDED);
4567 }
4568
4569
4570 DEFUN (no_match_aspath,
4571 no_match_aspath_cmd,
4572 "no match as-path [WORD]",
4573 NO_STR
4574 MATCH_STR
4575 "Match BGP AS path list\n"
4576 "AS path access-list name\n")
4577 {
4578 return bgp_route_match_delete(vty, "as-path", NULL,
4579 RMAP_EVENT_ASLIST_DELETED);
4580 }
4581
4582
4583 DEFUN (match_origin,
4584 match_origin_cmd,
4585 "match origin <egp|igp|incomplete>",
4586 MATCH_STR
4587 "BGP origin code\n"
4588 "remote EGP\n"
4589 "local IGP\n"
4590 "unknown heritage\n")
4591 {
4592 int idx_origin = 2;
4593 if (strncmp(argv[idx_origin]->arg, "igp", 2) == 0)
4594 return bgp_route_match_add(vty, "origin", "igp",
4595 RMAP_EVENT_MATCH_ADDED);
4596 if (strncmp(argv[idx_origin]->arg, "egp", 1) == 0)
4597 return bgp_route_match_add(vty, "origin", "egp",
4598 RMAP_EVENT_MATCH_ADDED);
4599 if (strncmp(argv[idx_origin]->arg, "incomplete", 2) == 0)
4600 return bgp_route_match_add(vty, "origin", "incomplete",
4601 RMAP_EVENT_MATCH_ADDED);
4602
4603 vty_out(vty, "%% Invalid match origin type\n");
4604 return CMD_WARNING_CONFIG_FAILED;
4605 }
4606
4607
4608 DEFUN (no_match_origin,
4609 no_match_origin_cmd,
4610 "no match origin [<egp|igp|incomplete>]",
4611 NO_STR
4612 MATCH_STR
4613 "BGP origin code\n"
4614 "remote EGP\n"
4615 "local IGP\n"
4616 "unknown heritage\n")
4617 {
4618 return bgp_route_match_delete(vty, "origin", NULL,
4619 RMAP_EVENT_MATCH_DELETED);
4620 }
4621
4622 DEFUN (set_table_id,
4623 set_table_id_cmd,
4624 "set table (1-4294967295)",
4625 SET_STR
4626 "export route to non-main kernel table\n"
4627 "Kernel routing table id\n")
4628 {
4629 int idx_id = 2;
4630
4631 VTY_DECLVAR_CONTEXT(route_map_index, index);
4632
4633 return generic_set_add(vty, index, "table", argv[idx_id]->arg);
4634 }
4635
4636 DEFUN (no_set_table_id,
4637 no_set_table_id_cmd,
4638 "no set table",
4639 NO_STR
4640 SET_STR
4641 "export route to non-main kernel table\n")
4642 {
4643 VTY_DECLVAR_CONTEXT(route_map_index, index);
4644
4645 return generic_set_delete(vty, index, "table", NULL);
4646 }
4647
4648 DEFUN (set_ip_nexthop_peer,
4649 set_ip_nexthop_peer_cmd,
4650 "[no] set ip next-hop peer-address",
4651 NO_STR
4652 SET_STR
4653 IP_STR
4654 "Next hop address\n"
4655 "Use peer address (for BGP only)\n")
4656 {
4657 int (*func)(struct vty *, struct route_map_index *, const char *,
4658 const char *) = strmatch(argv[0]->text, "no")
4659 ? generic_set_delete
4660 : generic_set_add;
4661
4662 return func(vty, VTY_GET_CONTEXT(route_map_index), "ip next-hop",
4663 "peer-address");
4664 }
4665
4666 DEFUN (set_ip_nexthop_unchanged,
4667 set_ip_nexthop_unchanged_cmd,
4668 "[no] set ip next-hop unchanged",
4669 NO_STR
4670 SET_STR
4671 IP_STR
4672 "Next hop address\n"
4673 "Don't modify existing Next hop address\n")
4674 {
4675 int (*func)(struct vty *, struct route_map_index *, const char *,
4676 const char *) = strmatch(argv[0]->text, "no")
4677 ? generic_set_delete
4678 : generic_set_add;
4679
4680 return func(vty, VTY_GET_CONTEXT(route_map_index), "ip next-hop",
4681 "unchanged");
4682 }
4683
4684 DEFUN (set_distance,
4685 set_distance_cmd,
4686 "set distance (0-255)",
4687 SET_STR
4688 "BGP Administrative Distance to use\n"
4689 "Distance value\n")
4690 {
4691 int idx_number = 2;
4692
4693 return generic_set_add(vty, VTY_GET_CONTEXT(route_map_index),
4694 "distance", argv[idx_number]->arg);
4695 }
4696
4697 DEFUN (no_set_distance,
4698 no_set_distance_cmd,
4699 "no set distance [(0-255)]",
4700 NO_STR SET_STR
4701 "BGP Administrative Distance to use\n"
4702 "Distance value\n")
4703 {
4704 return generic_set_delete(vty, VTY_GET_CONTEXT(route_map_index),
4705 "distance", NULL);
4706 }
4707
4708 DEFUN (set_local_pref,
4709 set_local_pref_cmd,
4710 "set local-preference WORD",
4711 SET_STR
4712 "BGP local preference path attribute\n"
4713 "Preference value (0-4294967295)\n")
4714 {
4715 int idx_number = 2;
4716 return generic_set_add(vty, VTY_GET_CONTEXT(route_map_index),
4717 "local-preference", argv[idx_number]->arg);
4718 }
4719
4720
4721 DEFUN (no_set_local_pref,
4722 no_set_local_pref_cmd,
4723 "no set local-preference [WORD]",
4724 NO_STR
4725 SET_STR
4726 "BGP local preference path attribute\n"
4727 "Preference value (0-4294967295)\n")
4728 {
4729 int idx_localpref = 3;
4730 if (argc <= idx_localpref)
4731 return generic_set_delete(vty, VTY_GET_CONTEXT(route_map_index),
4732 "local-preference", NULL);
4733 return generic_set_delete(vty, VTY_GET_CONTEXT(route_map_index),
4734 "local-preference", argv[idx_localpref]->arg);
4735 }
4736
4737
4738 DEFUN (set_weight,
4739 set_weight_cmd,
4740 "set weight (0-4294967295)",
4741 SET_STR
4742 "BGP weight for routing table\n"
4743 "Weight value\n")
4744 {
4745 int idx_number = 2;
4746 return generic_set_add(vty, VTY_GET_CONTEXT(route_map_index), "weight",
4747 argv[idx_number]->arg);
4748 }
4749
4750
4751 DEFUN (no_set_weight,
4752 no_set_weight_cmd,
4753 "no set weight [(0-4294967295)]",
4754 NO_STR
4755 SET_STR
4756 "BGP weight for routing table\n"
4757 "Weight value\n")
4758 {
4759 int idx_weight = 3;
4760 if (argc <= idx_weight)
4761 return generic_set_delete(vty, VTY_GET_CONTEXT(route_map_index),
4762 "weight", NULL);
4763 return generic_set_delete(vty, VTY_GET_CONTEXT(route_map_index),
4764 "weight", argv[idx_weight]->arg);
4765 }
4766
4767 DEFUN (set_label_index,
4768 set_label_index_cmd,
4769 "set label-index (0-1048560)",
4770 SET_STR
4771 "Label index to associate with the prefix\n"
4772 "Label index value\n")
4773 {
4774 int idx_number = 2;
4775 return generic_set_add(vty, VTY_GET_CONTEXT(route_map_index),
4776 "label-index", argv[idx_number]->arg);
4777 }
4778
4779 DEFUN (no_set_label_index,
4780 no_set_label_index_cmd,
4781 "no set label-index [(0-1048560)]",
4782 NO_STR
4783 SET_STR
4784 "Label index to associate with the prefix\n"
4785 "Label index value\n")
4786 {
4787 int idx_label_index = 3;
4788 if (argc <= idx_label_index)
4789 return generic_set_delete(vty, VTY_GET_CONTEXT(route_map_index),
4790 "label-index", NULL);
4791 return generic_set_delete(vty, VTY_GET_CONTEXT(route_map_index),
4792 "label-index", argv[idx_label_index]->arg);
4793 }
4794
4795 DEFUN (set_aspath_prepend_asn,
4796 set_aspath_prepend_asn_cmd,
4797 "set as-path prepend (1-4294967295)...",
4798 SET_STR
4799 "Transform BGP AS_PATH attribute\n"
4800 "Prepend to the as-path\n"
4801 "AS number\n")
4802 {
4803 int idx_asn = 3;
4804 int ret;
4805 char *str;
4806
4807 str = argv_concat(argv, argc, idx_asn);
4808 ret = generic_set_add(vty, VTY_GET_CONTEXT(route_map_index),
4809 "as-path prepend", str);
4810 XFREE(MTYPE_TMP, str);
4811
4812 return ret;
4813 }
4814
4815 DEFUN (set_aspath_prepend_lastas,
4816 set_aspath_prepend_lastas_cmd,
4817 "set as-path prepend last-as (1-10)",
4818 SET_STR
4819 "Transform BGP AS_PATH attribute\n"
4820 "Prepend to the as-path\n"
4821 "Use the peer's AS-number\n"
4822 "Number of times to insert\n")
4823 {
4824 return set_aspath_prepend_asn(self, vty, argc, argv);
4825 }
4826
4827 DEFUN (no_set_aspath_prepend,
4828 no_set_aspath_prepend_cmd,
4829 "no set as-path prepend [(1-4294967295)]",
4830 NO_STR
4831 SET_STR
4832 "Transform BGP AS_PATH attribute\n"
4833 "Prepend to the as-path\n"
4834 "AS number\n")
4835 {
4836 int idx_asn = 4;
4837 int ret;
4838 char *str;
4839
4840 str = argv_concat(argv, argc, idx_asn);
4841 ret = generic_set_delete(vty, VTY_GET_CONTEXT(route_map_index),
4842 "as-path prepend", str);
4843 XFREE(MTYPE_TMP, str);
4844 return ret;
4845 }
4846
4847 DEFUN (no_set_aspath_prepend_lastas,
4848 no_set_aspath_prepend_lastas_cmd,
4849 "no set as-path prepend last-as [(1-10)]",
4850 NO_STR
4851 SET_STR
4852 "Transform BGP AS_PATH attribute\n"
4853 "Prepend to the as-path\n"
4854 "Use the peers AS-number\n"
4855 "Number of times to insert\n")
4856 {
4857 return no_set_aspath_prepend(self, vty, argc, argv);
4858 }
4859
4860 DEFUN (set_aspath_exclude,
4861 set_aspath_exclude_cmd,
4862 "set as-path exclude (1-4294967295)...",
4863 SET_STR
4864 "Transform BGP AS-path attribute\n"
4865 "Exclude from the as-path\n"
4866 "AS number\n")
4867 {
4868 int idx_asn = 3;
4869 int ret;
4870 char *str;
4871
4872 str = argv_concat(argv, argc, idx_asn);
4873 ret = generic_set_add(vty, VTY_GET_CONTEXT(route_map_index),
4874 "as-path exclude", str);
4875 XFREE(MTYPE_TMP, str);
4876 return ret;
4877 }
4878
4879 DEFUN (no_set_aspath_exclude,
4880 no_set_aspath_exclude_cmd,
4881 "no set as-path exclude (1-4294967295)...",
4882 NO_STR
4883 SET_STR
4884 "Transform BGP AS_PATH attribute\n"
4885 "Exclude from the as-path\n"
4886 "AS number\n")
4887 {
4888 int idx_asn = 4;
4889 int ret;
4890 char *str;
4891
4892 str = argv_concat(argv, argc, idx_asn);
4893 ret = generic_set_delete(vty, VTY_GET_CONTEXT(route_map_index),
4894 "as-path exclude", str);
4895 XFREE(MTYPE_TMP, str);
4896 return ret;
4897 }
4898
4899 ALIAS(no_set_aspath_exclude, no_set_aspath_exclude_all_cmd,
4900 "no set as-path exclude",
4901 NO_STR SET_STR
4902 "Transform BGP AS_PATH attribute\n"
4903 "Exclude from the as-path\n")
4904
4905 DEFUN (set_community,
4906 set_community_cmd,
4907 "set community AA:NN...",
4908 SET_STR
4909 "BGP community attribute\n"
4910 COMMUNITY_VAL_STR)
4911 {
4912 int idx_aa_nn = 2;
4913 int i;
4914 int first = 0;
4915 int additive = 0;
4916 struct buffer *b;
4917 struct community *com = NULL;
4918 char *str;
4919 char *argstr;
4920 int ret;
4921
4922 b = buffer_new(1024);
4923
4924 for (i = idx_aa_nn; i < argc; i++) {
4925 if (strncmp(argv[i]->arg, "additive", strlen(argv[i]->arg))
4926 == 0) {
4927 additive = 1;
4928 continue;
4929 }
4930
4931 if (first)
4932 buffer_putc(b, ' ');
4933 else
4934 first = 1;
4935
4936 if (strncmp(argv[i]->arg, "internet", strlen(argv[i]->arg))
4937 == 0) {
4938 buffer_putstr(b, "internet");
4939 continue;
4940 }
4941 if (strncmp(argv[i]->arg, "local-AS", strlen(argv[i]->arg))
4942 == 0) {
4943 buffer_putstr(b, "local-AS");
4944 continue;
4945 }
4946 if (strncmp(argv[i]->arg, "no-a", strlen("no-a")) == 0
4947 && strncmp(argv[i]->arg, "no-advertise",
4948 strlen(argv[i]->arg))
4949 == 0) {
4950 buffer_putstr(b, "no-advertise");
4951 continue;
4952 }
4953 if (strncmp(argv[i]->arg, "no-e", strlen("no-e")) == 0
4954 && strncmp(argv[i]->arg, "no-export", strlen(argv[i]->arg))
4955 == 0) {
4956 buffer_putstr(b, "no-export");
4957 continue;
4958 }
4959 if (strncmp(argv[i]->arg, "graceful-shutdown",
4960 strlen(argv[i]->arg))
4961 == 0) {
4962 buffer_putstr(b, "graceful-shutdown");
4963 continue;
4964 }
4965 buffer_putstr(b, argv[i]->arg);
4966 }
4967 buffer_putc(b, '\0');
4968
4969 /* Fetch result string then compile it to communities attribute. */
4970 str = buffer_getstr(b);
4971 buffer_free(b);
4972
4973 if (str) {
4974 com = community_str2com(str);
4975 XFREE(MTYPE_TMP, str);
4976 }
4977
4978 /* Can't compile user input into communities attribute. */
4979 if (!com) {
4980 vty_out(vty, "%% Malformed communities attribute\n");
4981 return CMD_WARNING_CONFIG_FAILED;
4982 }
4983
4984 /* Set communites attribute string. */
4985 str = community_str(com, false);
4986
4987 if (additive) {
4988 size_t argstr_sz = strlen(str) + strlen(" additive") + 1;
4989 argstr = XCALLOC(MTYPE_TMP, argstr_sz);
4990 strlcpy(argstr, str, argstr_sz);
4991 strlcat(argstr, " additive", argstr_sz);
4992 ret = generic_set_add(vty, VTY_GET_CONTEXT(route_map_index),
4993 "community", argstr);
4994 XFREE(MTYPE_TMP, argstr);
4995 } else
4996 ret = generic_set_add(vty, VTY_GET_CONTEXT(route_map_index),
4997 "community", str);
4998
4999 community_free(&com);
5000
5001 return ret;
5002 }
5003
5004 DEFUN (set_community_none,
5005 set_community_none_cmd,
5006 "set community none",
5007 SET_STR
5008 "BGP community attribute\n"
5009 "No community attribute\n")
5010 {
5011 return generic_set_add(vty, VTY_GET_CONTEXT(route_map_index),
5012 "community", "none");
5013 }
5014
5015 DEFUN (no_set_community,
5016 no_set_community_cmd,
5017 "no set community AA:NN...",
5018 NO_STR
5019 SET_STR
5020 "BGP community attribute\n"
5021 COMMUNITY_VAL_STR)
5022 {
5023 return generic_set_delete(vty, VTY_GET_CONTEXT(route_map_index),
5024 "community", NULL);
5025 }
5026
5027 ALIAS (no_set_community,
5028 no_set_community_short_cmd,
5029 "no set community",
5030 NO_STR
5031 SET_STR
5032 "BGP community attribute\n")
5033
5034
5035 DEFUN (set_community_delete,
5036 set_community_delete_cmd,
5037 "set comm-list <(1-99)|(100-500)|WORD> delete",
5038 SET_STR
5039 "set BGP community list (for deletion)\n"
5040 "Community-list number (standard)\n"
5041 "Community-list number (expanded)\n"
5042 "Community-list name\n"
5043 "Delete matching communities\n")
5044 {
5045 int idx_comm_list = 2;
5046 char *args;
5047
5048 args = argv_concat(argv, argc, idx_comm_list);
5049 generic_set_add(vty, VTY_GET_CONTEXT(route_map_index), "comm-list",
5050 args);
5051 XFREE(MTYPE_TMP, args);
5052
5053 return CMD_SUCCESS;
5054 }
5055
5056 DEFUN (no_set_community_delete,
5057 no_set_community_delete_cmd,
5058 "no set comm-list [<(1-99)|(100-500)|WORD> delete]",
5059 NO_STR
5060 SET_STR
5061 "set BGP community list (for deletion)\n"
5062 "Community-list number (standard)\n"
5063 "Community-list number (expanded)\n"
5064 "Community-list name\n"
5065 "Delete matching communities\n")
5066 {
5067 return generic_set_delete(vty, VTY_GET_CONTEXT(route_map_index),
5068 "comm-list", NULL);
5069 }
5070
5071 DEFUN (set_lcommunity,
5072 set_lcommunity_cmd,
5073 "set large-community AA:BB:CC...",
5074 SET_STR
5075 "BGP large community attribute\n"
5076 "Large Community number in aa:bb:cc format or additive\n")
5077 {
5078 int ret;
5079 char *str;
5080
5081 str = argv_concat(argv, argc, 2);
5082 ret = generic_set_add(vty, VTY_GET_CONTEXT(route_map_index),
5083 "large-community", str);
5084 XFREE(MTYPE_TMP, str);
5085
5086 return ret;
5087 }
5088
5089 DEFUN (set_lcommunity_none,
5090 set_lcommunity_none_cmd,
5091 "set large-community none",
5092 SET_STR
5093 "BGP large community attribute\n"
5094 "No large community attribute\n")
5095 {
5096 return generic_set_add(vty, VTY_GET_CONTEXT(route_map_index),
5097 "large-community", "none");
5098 }
5099
5100 DEFUN (no_set_lcommunity,
5101 no_set_lcommunity_cmd,
5102 "no set large-community none",
5103 NO_STR
5104 SET_STR
5105 "BGP large community attribute\n"
5106 "No community attribute\n")
5107 {
5108 return generic_set_delete(vty, VTY_GET_CONTEXT(route_map_index),
5109 "large-community", NULL);
5110 }
5111
5112 DEFUN (no_set_lcommunity1,
5113 no_set_lcommunity1_cmd,
5114 "no set large-community AA:BB:CC...",
5115 NO_STR
5116 SET_STR
5117 "BGP large community attribute\n"
5118 "Large community in AA:BB:CC... format or additive\n")
5119 {
5120 return generic_set_delete(vty, VTY_GET_CONTEXT(route_map_index),
5121 "large-community", NULL);
5122 }
5123
5124 ALIAS (no_set_lcommunity1,
5125 no_set_lcommunity1_short_cmd,
5126 "no set large-community",
5127 NO_STR
5128 SET_STR
5129 "BGP large community attribute\n")
5130
5131 DEFUN (set_lcommunity_delete,
5132 set_lcommunity_delete_cmd,
5133 "set large-comm-list <(1-99)|(100-500)|WORD> delete",
5134 SET_STR
5135 "set BGP large community list (for deletion)\n"
5136 "Large Community-list number (standard)\n"
5137 "Large Communitly-list number (expanded)\n"
5138 "Large Community-list name\n"
5139 "Delete matching large communities\n")
5140 {
5141 int idx_lcomm_list = 2;
5142 char *args;
5143
5144 args = argv_concat(argv, argc, idx_lcomm_list);
5145 generic_set_add(vty, VTY_GET_CONTEXT(route_map_index),
5146 "large-comm-list", args);
5147 XFREE(MTYPE_TMP, args);
5148
5149 return CMD_SUCCESS;
5150 }
5151
5152 DEFUN (no_set_lcommunity_delete,
5153 no_set_lcommunity_delete_cmd,
5154 "no set large-comm-list <(1-99)|(100-500)|WORD> [delete]",
5155 NO_STR
5156 SET_STR
5157 "set BGP large community list (for deletion)\n"
5158 "Large Community-list number (standard)\n"
5159 "Large Communitly-list number (expanded)\n"
5160 "Large Community-list name\n"
5161 "Delete matching large communities\n")
5162 {
5163 return generic_set_delete(vty, VTY_GET_CONTEXT(route_map_index),
5164 "large-comm-list", NULL);
5165 }
5166
5167 ALIAS (no_set_lcommunity_delete,
5168 no_set_lcommunity_delete_short_cmd,
5169 "no set large-comm-list",
5170 NO_STR
5171 SET_STR
5172 "set BGP large community list (for deletion)\n")
5173
5174 DEFUN (set_ecommunity_rt,
5175 set_ecommunity_rt_cmd,
5176 "set extcommunity rt ASN:NN_OR_IP-ADDRESS:NN...",
5177 SET_STR
5178 "BGP extended community attribute\n"
5179 "Route Target extended community\n"
5180 "VPN extended community\n")
5181 {
5182 int idx_asn_nn = 3;
5183 int ret;
5184 char *str;
5185
5186 str = argv_concat(argv, argc, idx_asn_nn);
5187 ret = generic_set_add(vty, VTY_GET_CONTEXT(route_map_index),
5188 "extcommunity rt", str);
5189 XFREE(MTYPE_TMP, str);
5190
5191 return ret;
5192 }
5193
5194 DEFUN (no_set_ecommunity_rt,
5195 no_set_ecommunity_rt_cmd,
5196 "no set extcommunity rt ASN:NN_OR_IP-ADDRESS:NN...",
5197 NO_STR
5198 SET_STR
5199 "BGP extended community attribute\n"
5200 "Route Target extended community\n"
5201 "VPN extended community\n")
5202 {
5203 return generic_set_delete(vty, VTY_GET_CONTEXT(route_map_index),
5204 "extcommunity rt", NULL);
5205 }
5206
5207 ALIAS (no_set_ecommunity_rt,
5208 no_set_ecommunity_rt_short_cmd,
5209 "no set extcommunity rt",
5210 NO_STR
5211 SET_STR
5212 "BGP extended community attribute\n"
5213 "Route Target extended community\n")
5214
5215 DEFUN (set_ecommunity_soo,
5216 set_ecommunity_soo_cmd,
5217 "set extcommunity soo ASN:NN_OR_IP-ADDRESS:NN...",
5218 SET_STR
5219 "BGP extended community attribute\n"
5220 "Site-of-Origin extended community\n"
5221 "VPN extended community\n")
5222 {
5223 int idx_asn_nn = 3;
5224 int ret;
5225 char *str;
5226
5227 str = argv_concat(argv, argc, idx_asn_nn);
5228 ret = generic_set_add(vty, VTY_GET_CONTEXT(route_map_index),
5229 "extcommunity soo", str);
5230 XFREE(MTYPE_TMP, str);
5231 return ret;
5232 }
5233
5234
5235 DEFUN (no_set_ecommunity_soo,
5236 no_set_ecommunity_soo_cmd,
5237 "no set extcommunity soo ASN:NN_OR_IP-ADDRESS:NN...",
5238 NO_STR
5239 SET_STR
5240 "BGP extended community attribute\n"
5241 "Site-of-Origin extended community\n"
5242 "VPN extended community\n")
5243 {
5244 return generic_set_delete(vty, VTY_GET_CONTEXT(route_map_index),
5245 "extcommunity soo", NULL);
5246 }
5247
5248 ALIAS (no_set_ecommunity_soo,
5249 no_set_ecommunity_soo_short_cmd,
5250 "no set extcommunity soo",
5251 NO_STR
5252 SET_STR
5253 "GP extended community attribute\n"
5254 "Site-of-Origin extended community\n")
5255
5256 DEFUN (set_ecommunity_lb,
5257 set_ecommunity_lb_cmd,
5258 "set extcommunity bandwidth <(1-25600)|cumulative|num-multipaths> [non-transitive]",
5259 SET_STR
5260 "BGP extended community attribute\n"
5261 "Link bandwidth extended community\n"
5262 "Bandwidth value in Mbps\n"
5263 "Cumulative bandwidth of all multipaths (outbound-only)\n"
5264 "Internally computed bandwidth based on number of multipaths (outbound-only)\n"
5265 "Attribute is set as non-transitive\n")
5266 {
5267 int idx_lb = 3;
5268 int ret;
5269 char *str;
5270
5271 str = argv_concat(argv, argc, idx_lb);
5272 ret = generic_set_add(vty, VTY_GET_CONTEXT(route_map_index),
5273 "extcommunity bandwidth", str);
5274 XFREE(MTYPE_TMP, str);
5275 return ret;
5276 }
5277
5278
5279 DEFUN (no_set_ecommunity_lb,
5280 no_set_ecommunity_lb_cmd,
5281 "no set extcommunity bandwidth <(1-25600)|cumulative|num-multipaths> [non-transitive]",
5282 NO_STR
5283 SET_STR
5284 "BGP extended community attribute\n"
5285 "Link bandwidth extended community\n"
5286 "Bandwidth value in Mbps\n"
5287 "Cumulative bandwidth of all multipaths (outbound-only)\n"
5288 "Internally computed bandwidth based on number of multipaths (outbound-only)\n"
5289 "Attribute is set as non-transitive\n")
5290 {
5291 return generic_set_delete(vty, VTY_GET_CONTEXT(route_map_index),
5292 "extcommunity bandwidth", NULL);
5293 }
5294
5295 ALIAS (no_set_ecommunity_lb,
5296 no_set_ecommunity_lb_short_cmd,
5297 "no set extcommunity bandwidth",
5298 NO_STR
5299 SET_STR
5300 "BGP extended community attribute\n"
5301 "Link bandwidth extended community\n")
5302
5303 DEFUN (set_origin,
5304 set_origin_cmd,
5305 "set origin <egp|igp|incomplete>",
5306 SET_STR
5307 "BGP origin code\n"
5308 "remote EGP\n"
5309 "local IGP\n"
5310 "unknown heritage\n")
5311 {
5312 int idx_origin = 2;
5313 if (strncmp(argv[idx_origin]->arg, "igp", 2) == 0)
5314 return generic_set_add(vty, VTY_GET_CONTEXT(route_map_index),
5315 "origin", "igp");
5316 if (strncmp(argv[idx_origin]->arg, "egp", 1) == 0)
5317 return generic_set_add(vty, VTY_GET_CONTEXT(route_map_index),
5318 "origin", "egp");
5319 if (strncmp(argv[idx_origin]->arg, "incomplete", 2) == 0)
5320 return generic_set_add(vty, VTY_GET_CONTEXT(route_map_index),
5321 "origin", "incomplete");
5322
5323 vty_out(vty, "%% Invalid set origin type\n");
5324 return CMD_WARNING_CONFIG_FAILED;
5325 }
5326
5327
5328 DEFUN (no_set_origin,
5329 no_set_origin_cmd,
5330 "no set origin [<egp|igp|incomplete>]",
5331 NO_STR
5332 SET_STR
5333 "BGP origin code\n"
5334 "remote EGP\n"
5335 "local IGP\n"
5336 "unknown heritage\n")
5337 {
5338 return generic_set_delete(vty, VTY_GET_CONTEXT(route_map_index),
5339 "origin", NULL);
5340 }
5341
5342
5343 DEFUN (set_atomic_aggregate,
5344 set_atomic_aggregate_cmd,
5345 "set atomic-aggregate",
5346 SET_STR
5347 "BGP atomic aggregate attribute\n" )
5348 {
5349 return generic_set_add(vty, VTY_GET_CONTEXT(route_map_index),
5350 "atomic-aggregate", NULL);
5351 }
5352
5353 DEFUN (no_set_atomic_aggregate,
5354 no_set_atomic_aggregate_cmd,
5355 "no set atomic-aggregate",
5356 NO_STR
5357 SET_STR
5358 "BGP atomic aggregate attribute\n" )
5359 {
5360 return generic_set_delete(vty, VTY_GET_CONTEXT(route_map_index),
5361 "atomic-aggregate", NULL);
5362 }
5363
5364 DEFUN (set_aggregator_as,
5365 set_aggregator_as_cmd,
5366 "set aggregator as (1-4294967295) A.B.C.D",
5367 SET_STR
5368 "BGP aggregator attribute\n"
5369 "AS number of aggregator\n"
5370 "AS number\n"
5371 "IP address of aggregator\n")
5372 {
5373 int idx_number = 3;
5374 int idx_ipv4 = 4;
5375 int ret;
5376 struct in_addr address;
5377 char *argstr;
5378
5379 ret = inet_aton(argv[idx_ipv4]->arg, &address);
5380 if (ret == 0) {
5381 vty_out(vty, "Aggregator IP address is invalid\n");
5382 return CMD_WARNING_CONFIG_FAILED;
5383 }
5384
5385 argstr = XMALLOC(MTYPE_ROUTE_MAP_COMPILED,
5386 strlen(argv[idx_number]->arg)
5387 + strlen(argv[idx_ipv4]->arg) + 2);
5388
5389 sprintf(argstr, "%s %s", argv[idx_number]->arg, argv[idx_ipv4]->arg);
5390
5391 ret = generic_set_add(vty, VTY_GET_CONTEXT(route_map_index),
5392 "aggregator as", argstr);
5393
5394 XFREE(MTYPE_ROUTE_MAP_COMPILED, argstr);
5395
5396 return ret;
5397 }
5398
5399
5400 DEFUN (no_set_aggregator_as,
5401 no_set_aggregator_as_cmd,
5402 "no set aggregator as [(1-4294967295) A.B.C.D]",
5403 NO_STR
5404 SET_STR
5405 "BGP aggregator attribute\n"
5406 "AS number of aggregator\n"
5407 "AS number\n"
5408 "IP address of aggregator\n")
5409 {
5410 int idx_asn = 4;
5411 int idx_ip = 5;
5412 int ret;
5413 struct in_addr address;
5414 char *argstr;
5415
5416 if (argc <= idx_asn)
5417 return generic_set_delete(vty, VTY_GET_CONTEXT(route_map_index),
5418 "aggregator as", NULL);
5419
5420 ret = inet_aton(argv[idx_ip]->arg, &address);
5421 if (ret == 0) {
5422 vty_out(vty, "Aggregator IP address is invalid\n");
5423 return CMD_WARNING_CONFIG_FAILED;
5424 }
5425
5426 argstr = XMALLOC(MTYPE_ROUTE_MAP_COMPILED,
5427 strlen(argv[idx_asn]->arg) + strlen(argv[idx_ip]->arg)
5428 + 2);
5429
5430 sprintf(argstr, "%s %s", argv[idx_asn]->arg, argv[idx_ip]->arg);
5431
5432 ret = generic_set_delete(vty, VTY_GET_CONTEXT(route_map_index),
5433 "aggregator as", argstr);
5434
5435 XFREE(MTYPE_ROUTE_MAP_COMPILED, argstr);
5436
5437 return ret;
5438 }
5439
5440 DEFUN (match_ipv6_next_hop,
5441 match_ipv6_next_hop_cmd,
5442 "match ipv6 next-hop X:X::X:X",
5443 MATCH_STR
5444 IPV6_STR
5445 "Match IPv6 next-hop address of route\n"
5446 "IPv6 address of next hop\n")
5447 {
5448 int idx_ipv6 = 3;
5449 return bgp_route_match_add(vty, "ipv6 next-hop", argv[idx_ipv6]->arg,
5450 RMAP_EVENT_MATCH_ADDED);
5451 }
5452
5453 DEFUN (no_match_ipv6_next_hop,
5454 no_match_ipv6_next_hop_cmd,
5455 "no match ipv6 next-hop X:X::X:X",
5456 NO_STR
5457 MATCH_STR
5458 IPV6_STR
5459 "Match IPv6 next-hop address of route\n"
5460 "IPv6 address of next hop\n")
5461 {
5462 int idx_ipv6 = 4;
5463 return bgp_route_match_delete(vty, "ipv6 next-hop", argv[idx_ipv6]->arg,
5464 RMAP_EVENT_MATCH_DELETED);
5465 }
5466
5467 DEFPY (match_ipv4_next_hop,
5468 match_ipv4_next_hop_cmd,
5469 "match ip next-hop address A.B.C.D",
5470 MATCH_STR
5471 IP_STR
5472 "Match IP next-hop address of route\n"
5473 "IP address\n"
5474 "IP address of next-hop\n")
5475 {
5476 int idx_ipv4 = 4;
5477
5478 return bgp_route_match_add(vty, "ip next-hop address",
5479 argv[idx_ipv4]->arg, RMAP_EVENT_MATCH_ADDED);
5480 }
5481
5482 DEFPY (no_match_ipv4_next_hop,
5483 no_match_ipv4_next_hop_cmd,
5484 "no match ip next-hop address [A.B.C.D]",
5485 NO_STR
5486 MATCH_STR
5487 IP_STR
5488 "Match IP next-hop address of route\n"
5489 "IP address\n"
5490 "IP address of next-hop\n")
5491 {
5492 return bgp_route_match_delete(vty, "ip next-hop address", NULL,
5493 RMAP_EVENT_MATCH_DELETED);
5494 }
5495
5496 DEFUN (set_ipv6_nexthop_peer,
5497 set_ipv6_nexthop_peer_cmd,
5498 "set ipv6 next-hop peer-address",
5499 SET_STR
5500 IPV6_STR
5501 "Next hop address\n"
5502 "Use peer address (for BGP only)\n")
5503 {
5504 return generic_set_add(vty, VTY_GET_CONTEXT(route_map_index),
5505 "ipv6 next-hop peer-address", NULL);
5506 }
5507
5508 DEFUN (no_set_ipv6_nexthop_peer,
5509 no_set_ipv6_nexthop_peer_cmd,
5510 "no set ipv6 next-hop peer-address",
5511 NO_STR
5512 SET_STR
5513 IPV6_STR
5514 "IPv6 next-hop address\n"
5515 "Use peer address (for BGP only)\n")
5516 {
5517 return generic_set_delete(vty, VTY_GET_CONTEXT(route_map_index),
5518 "ipv6 next-hop peer-address", NULL);
5519 }
5520
5521 DEFUN (set_ipv6_nexthop_prefer_global,
5522 set_ipv6_nexthop_prefer_global_cmd,
5523 "set ipv6 next-hop prefer-global",
5524 SET_STR
5525 IPV6_STR
5526 "IPv6 next-hop address\n"
5527 "Prefer global over link-local if both exist\n")
5528 {
5529 return generic_set_add(vty, VTY_GET_CONTEXT(route_map_index),
5530 "ipv6 next-hop prefer-global", NULL);
5531 ;
5532 }
5533
5534 DEFUN (no_set_ipv6_nexthop_prefer_global,
5535 no_set_ipv6_nexthop_prefer_global_cmd,
5536 "no set ipv6 next-hop prefer-global",
5537 NO_STR
5538 SET_STR
5539 IPV6_STR
5540 "IPv6 next-hop address\n"
5541 "Prefer global over link-local if both exist\n")
5542 {
5543 return generic_set_delete(vty, VTY_GET_CONTEXT(route_map_index),
5544 "ipv6 next-hop prefer-global", NULL);
5545 }
5546
5547 DEFUN (set_ipv6_nexthop_global,
5548 set_ipv6_nexthop_global_cmd,
5549 "set ipv6 next-hop global X:X::X:X",
5550 SET_STR
5551 IPV6_STR
5552 "IPv6 next-hop address\n"
5553 "IPv6 global address\n"
5554 "IPv6 address of next hop\n")
5555 {
5556 int idx_ipv6 = 4;
5557 struct in6_addr addr;
5558 int ret;
5559
5560 ret = inet_pton(AF_INET6, argv[idx_ipv6]->arg, &addr);
5561 if (!ret) {
5562 vty_out(vty, "%% Malformed nexthop address\n");
5563 return CMD_WARNING_CONFIG_FAILED;
5564 }
5565 if (IN6_IS_ADDR_UNSPECIFIED(&addr) || IN6_IS_ADDR_LOOPBACK(&addr)
5566 || IN6_IS_ADDR_MULTICAST(&addr) || IN6_IS_ADDR_LINKLOCAL(&addr)) {
5567 vty_out(vty, "%% Invalid global nexthop address\n");
5568 return CMD_WARNING_CONFIG_FAILED;
5569 }
5570
5571 return generic_set_add(vty, VTY_GET_CONTEXT(route_map_index),
5572 "ipv6 next-hop global", argv[idx_ipv6]->arg);
5573 }
5574
5575
5576 DEFUN (no_set_ipv6_nexthop_global,
5577 no_set_ipv6_nexthop_global_cmd,
5578 "no set ipv6 next-hop global X:X::X:X",
5579 NO_STR
5580 SET_STR
5581 IPV6_STR
5582 "IPv6 next-hop address\n"
5583 "IPv6 global address\n"
5584 "IPv6 address of next hop\n")
5585 {
5586 int idx_ipv6 = 5;
5587 if (argc <= idx_ipv6)
5588 return generic_set_delete(vty, VTY_GET_CONTEXT(route_map_index),
5589 "ipv6 next-hop global", NULL);
5590 return generic_set_delete(vty, VTY_GET_CONTEXT(route_map_index),
5591 "ipv6 next-hop global", argv[idx_ipv6]->arg);
5592 }
5593
5594 #ifdef KEEP_OLD_VPN_COMMANDS
5595 DEFUN (set_vpn_nexthop,
5596 set_vpn_nexthop_cmd,
5597 "set <vpnv4 next-hop A.B.C.D|vpnv6 next-hop X:X::X:X>",
5598 SET_STR
5599 "VPNv4 information\n"
5600 "VPN next-hop address\n"
5601 "IP address of next hop\n"
5602 "VPNv6 information\n"
5603 "VPN next-hop address\n"
5604 "IPv6 address of next hop\n")
5605 {
5606 int idx_ip = 3;
5607 afi_t afi;
5608 int idx = 0;
5609
5610 if (argv_find_and_parse_vpnvx(argv, argc, &idx, &afi)) {
5611 if (afi == AFI_IP)
5612 return generic_set_add(
5613 vty, VTY_GET_CONTEXT(route_map_index),
5614 "ipv4 vpn next-hop", argv[idx_ip]->arg);
5615 else
5616 return generic_set_add(
5617 vty, VTY_GET_CONTEXT(route_map_index),
5618 "ipv6 vpn next-hop", argv[idx_ip]->arg);
5619 }
5620 return CMD_SUCCESS;
5621 }
5622
5623 DEFUN (no_set_vpn_nexthop,
5624 no_set_vpn_nexthop_cmd,
5625 "no set <vpnv4 next-hop A.B.C.D|vpnv6 next-hop X:X::X:X>",
5626 NO_STR
5627 SET_STR
5628 "VPNv4 information\n"
5629 "VPN next-hop address\n"
5630 "IP address of next hop\n"
5631 "VPNv6 information\n"
5632 "VPN next-hop address\n"
5633 "IPv6 address of next hop\n")
5634 {
5635 int idx_ip = 4;
5636 char *arg;
5637 afi_t afi;
5638 int idx = 0;
5639
5640 if (argc <= idx_ip)
5641 arg = NULL;
5642 else
5643 arg = argv[idx_ip]->arg;
5644 if (argv_find_and_parse_vpnvx(argv, argc, &idx, &afi)) {
5645 if (afi == AFI_IP)
5646 return generic_set_delete(
5647 vty, VTY_GET_CONTEXT(route_map_index),
5648 "ipv4 vpn next-hop", arg);
5649 else
5650 return generic_set_delete(
5651 vty, VTY_GET_CONTEXT(route_map_index),
5652 "ipv6 vpn next-hop", argv[idx_ip]->arg);
5653 }
5654 return CMD_SUCCESS;
5655 }
5656 #endif /* KEEP_OLD_VPN_COMMANDS */
5657
5658 DEFUN (set_ipx_vpn_nexthop,
5659 set_ipx_vpn_nexthop_cmd,
5660 "set <ipv4|ipv6> vpn next-hop <A.B.C.D|X:X::X:X>",
5661 SET_STR
5662 "IPv4 information\n"
5663 "IPv6 information\n"
5664 "VPN information\n"
5665 "VPN next-hop address\n"
5666 "IP address of next hop\n"
5667 "IPv6 address of next hop\n")
5668 {
5669 int idx_ip = 4;
5670 afi_t afi;
5671 int idx = 0;
5672
5673 if (argv_find_and_parse_afi(argv, argc, &idx, &afi)) {
5674 if (afi == AFI_IP)
5675 return generic_set_add(
5676 vty, VTY_GET_CONTEXT(route_map_index),
5677 "ipv4 vpn next-hop", argv[idx_ip]->arg);
5678 else
5679 return generic_set_add(
5680 vty, VTY_GET_CONTEXT(route_map_index),
5681 "ipv6 vpn next-hop", argv[idx_ip]->arg);
5682 }
5683 return CMD_SUCCESS;
5684 }
5685
5686 DEFUN (no_set_ipx_vpn_nexthop,
5687 no_set_ipx_vpn_nexthop_cmd,
5688 "no set <ipv4|ipv6> vpn next-hop [<A.B.C.D|X:X::X:X>]",
5689 NO_STR
5690 SET_STR
5691 "IPv4 information\n"
5692 "IPv6 information\n"
5693 "VPN information\n"
5694 "VPN next-hop address\n"
5695 "IP address of next hop\n"
5696 "IPv6 address of next hop\n")
5697 {
5698 int idx_ip = 5;
5699 char *arg;
5700 afi_t afi;
5701 int idx = 0;
5702
5703 if (argc <= idx_ip)
5704 arg = NULL;
5705 else
5706 arg = argv[idx_ip]->arg;
5707 if (argv_find_and_parse_afi(argv, argc, &idx, &afi)) {
5708 if (afi == AFI_IP)
5709 return generic_set_delete(
5710 vty, VTY_GET_CONTEXT(route_map_index),
5711 "ipv4 vpn next-hop", arg);
5712 else
5713 return generic_set_delete(
5714 vty, VTY_GET_CONTEXT(route_map_index),
5715 "ipv6 vpn next-hop", arg);
5716 }
5717 return CMD_SUCCESS;
5718 }
5719
5720 DEFUN (set_originator_id,
5721 set_originator_id_cmd,
5722 "set originator-id A.B.C.D",
5723 SET_STR
5724 "BGP originator ID attribute\n"
5725 "IP address of originator\n")
5726 {
5727 int idx_ipv4 = 2;
5728 return generic_set_add(vty, VTY_GET_CONTEXT(route_map_index),
5729 "originator-id", argv[idx_ipv4]->arg);
5730 }
5731
5732
5733 DEFUN (no_set_originator_id,
5734 no_set_originator_id_cmd,
5735 "no set originator-id [A.B.C.D]",
5736 NO_STR
5737 SET_STR
5738 "BGP originator ID attribute\n"
5739 "IP address of originator\n")
5740 {
5741 int idx = 0;
5742 char *arg =
5743 argv_find(argv, argc, "A.B.C.D", &idx) ? argv[idx]->arg : NULL;
5744
5745 return generic_set_delete(vty, VTY_GET_CONTEXT(route_map_index),
5746 "originator-id", arg);
5747 }
5748
5749
5750 /* Initialization of route map. */
5751 void bgp_route_map_init(void)
5752 {
5753 route_map_init();
5754
5755 route_map_add_hook(bgp_route_map_add);
5756 route_map_delete_hook(bgp_route_map_delete);
5757 route_map_event_hook(bgp_route_map_event);
5758
5759 route_map_match_interface_hook(generic_match_add);
5760 route_map_no_match_interface_hook(generic_match_delete);
5761
5762 route_map_match_ip_address_hook(generic_match_add);
5763 route_map_no_match_ip_address_hook(generic_match_delete);
5764
5765 route_map_match_ip_address_prefix_list_hook(generic_match_add);
5766 route_map_no_match_ip_address_prefix_list_hook(generic_match_delete);
5767
5768 route_map_match_ip_next_hop_hook(generic_match_add);
5769 route_map_no_match_ip_next_hop_hook(generic_match_delete);
5770
5771 route_map_match_ip_next_hop_prefix_list_hook(generic_match_add);
5772 route_map_no_match_ip_next_hop_prefix_list_hook(generic_match_delete);
5773
5774 route_map_match_ip_next_hop_type_hook(generic_match_add);
5775 route_map_no_match_ip_next_hop_type_hook(generic_match_delete);
5776
5777 route_map_match_ipv6_address_hook(generic_match_add);
5778 route_map_no_match_ipv6_address_hook(generic_match_delete);
5779
5780 route_map_match_ipv6_address_prefix_list_hook(generic_match_add);
5781 route_map_no_match_ipv6_address_prefix_list_hook(generic_match_delete);
5782
5783 route_map_match_ipv6_next_hop_type_hook(generic_match_add);
5784 route_map_no_match_ipv6_next_hop_type_hook(generic_match_delete);
5785
5786 route_map_match_metric_hook(generic_match_add);
5787 route_map_no_match_metric_hook(generic_match_delete);
5788
5789 route_map_match_tag_hook(generic_match_add);
5790 route_map_no_match_tag_hook(generic_match_delete);
5791
5792 route_map_set_srte_color_hook(generic_set_add);
5793 route_map_no_set_srte_color_hook(generic_set_delete);
5794
5795 route_map_set_ip_nexthop_hook(generic_set_add);
5796 route_map_no_set_ip_nexthop_hook(generic_set_delete);
5797
5798 route_map_set_ipv6_nexthop_local_hook(generic_set_add);
5799 route_map_no_set_ipv6_nexthop_local_hook(generic_set_delete);
5800
5801 route_map_set_metric_hook(generic_set_add);
5802 route_map_no_set_metric_hook(generic_set_delete);
5803
5804 route_map_set_tag_hook(generic_set_add);
5805 route_map_no_set_tag_hook(generic_set_delete);
5806
5807 route_map_install_match(&route_match_peer_cmd);
5808 route_map_install_match(&route_match_local_pref_cmd);
5809 #if defined(HAVE_LUA)
5810 route_map_install_match(&route_match_command_cmd);
5811 #endif
5812 route_map_install_match(&route_match_ip_address_cmd);
5813 route_map_install_match(&route_match_ip_next_hop_cmd);
5814 route_map_install_match(&route_match_ip_route_source_cmd);
5815 route_map_install_match(&route_match_ip_address_prefix_list_cmd);
5816 route_map_install_match(&route_match_ip_next_hop_prefix_list_cmd);
5817 route_map_install_match(&route_match_ip_next_hop_type_cmd);
5818 route_map_install_match(&route_match_ip_route_source_prefix_list_cmd);
5819 route_map_install_match(&route_match_aspath_cmd);
5820 route_map_install_match(&route_match_community_cmd);
5821 route_map_install_match(&route_match_lcommunity_cmd);
5822 route_map_install_match(&route_match_ecommunity_cmd);
5823 route_map_install_match(&route_match_local_pref_cmd);
5824 route_map_install_match(&route_match_metric_cmd);
5825 route_map_install_match(&route_match_origin_cmd);
5826 route_map_install_match(&route_match_probability_cmd);
5827 route_map_install_match(&route_match_interface_cmd);
5828 route_map_install_match(&route_match_tag_cmd);
5829 route_map_install_match(&route_match_mac_address_cmd);
5830 route_map_install_match(&route_match_evpn_vni_cmd);
5831 route_map_install_match(&route_match_evpn_route_type_cmd);
5832 route_map_install_match(&route_match_evpn_rd_cmd);
5833 route_map_install_match(&route_match_evpn_default_route_cmd);
5834 route_map_install_match(&route_match_vrl_source_vrf_cmd);
5835
5836 route_map_install_set(&route_set_table_id_cmd);
5837 route_map_install_set(&route_set_srte_color_cmd);
5838 route_map_install_set(&route_set_ip_nexthop_cmd);
5839 route_map_install_set(&route_set_local_pref_cmd);
5840 route_map_install_set(&route_set_weight_cmd);
5841 route_map_install_set(&route_set_label_index_cmd);
5842 route_map_install_set(&route_set_metric_cmd);
5843 route_map_install_set(&route_set_distance_cmd);
5844 route_map_install_set(&route_set_aspath_prepend_cmd);
5845 route_map_install_set(&route_set_aspath_exclude_cmd);
5846 route_map_install_set(&route_set_origin_cmd);
5847 route_map_install_set(&route_set_atomic_aggregate_cmd);
5848 route_map_install_set(&route_set_aggregator_as_cmd);
5849 route_map_install_set(&route_set_community_cmd);
5850 route_map_install_set(&route_set_community_delete_cmd);
5851 route_map_install_set(&route_set_lcommunity_cmd);
5852 route_map_install_set(&route_set_lcommunity_delete_cmd);
5853 route_map_install_set(&route_set_vpnv4_nexthop_cmd);
5854 route_map_install_set(&route_set_vpnv6_nexthop_cmd);
5855 route_map_install_set(&route_set_originator_id_cmd);
5856 route_map_install_set(&route_set_ecommunity_rt_cmd);
5857 route_map_install_set(&route_set_ecommunity_soo_cmd);
5858 route_map_install_set(&route_set_ecommunity_lb_cmd);
5859 route_map_install_set(&route_set_tag_cmd);
5860 route_map_install_set(&route_set_label_index_cmd);
5861
5862 install_element(RMAP_NODE, &match_peer_cmd);
5863 install_element(RMAP_NODE, &match_peer_local_cmd);
5864 install_element(RMAP_NODE, &no_match_peer_cmd);
5865 install_element(RMAP_NODE, &match_ip_route_source_cmd);
5866 install_element(RMAP_NODE, &no_match_ip_route_source_cmd);
5867 install_element(RMAP_NODE, &match_ip_route_source_prefix_list_cmd);
5868 install_element(RMAP_NODE, &no_match_ip_route_source_prefix_list_cmd);
5869 install_element(RMAP_NODE, &match_mac_address_cmd);
5870 install_element(RMAP_NODE, &no_match_mac_address_cmd);
5871 install_element(RMAP_NODE, &match_evpn_vni_cmd);
5872 install_element(RMAP_NODE, &no_match_evpn_vni_cmd);
5873 install_element(RMAP_NODE, &match_evpn_route_type_cmd);
5874 install_element(RMAP_NODE, &no_match_evpn_route_type_cmd);
5875 install_element(RMAP_NODE, &match_evpn_rd_cmd);
5876 install_element(RMAP_NODE, &no_match_evpn_rd_cmd);
5877 install_element(RMAP_NODE, &match_evpn_default_route_cmd);
5878 install_element(RMAP_NODE, &no_match_evpn_default_route_cmd);
5879 install_element(RMAP_NODE, &match_vrl_source_vrf_cmd);
5880 install_element(RMAP_NODE, &no_match_vrl_source_vrf_cmd);
5881
5882 install_element(RMAP_NODE, &match_aspath_cmd);
5883 install_element(RMAP_NODE, &no_match_aspath_cmd);
5884 install_element(RMAP_NODE, &match_local_pref_cmd);
5885 install_element(RMAP_NODE, &no_match_local_pref_cmd);
5886 install_element(RMAP_NODE, &match_community_cmd);
5887 install_element(RMAP_NODE, &no_match_community_cmd);
5888 install_element(RMAP_NODE, &match_lcommunity_cmd);
5889 install_element(RMAP_NODE, &no_match_lcommunity_cmd);
5890 install_element(RMAP_NODE, &match_ecommunity_cmd);
5891 install_element(RMAP_NODE, &no_match_ecommunity_cmd);
5892 install_element(RMAP_NODE, &match_origin_cmd);
5893 install_element(RMAP_NODE, &no_match_origin_cmd);
5894 install_element(RMAP_NODE, &match_probability_cmd);
5895 install_element(RMAP_NODE, &no_match_probability_cmd);
5896
5897 install_element(RMAP_NODE, &no_set_table_id_cmd);
5898 install_element(RMAP_NODE, &set_table_id_cmd);
5899 install_element(RMAP_NODE, &set_ip_nexthop_peer_cmd);
5900 install_element(RMAP_NODE, &set_ip_nexthop_unchanged_cmd);
5901 install_element(RMAP_NODE, &set_local_pref_cmd);
5902 install_element(RMAP_NODE, &set_distance_cmd);
5903 install_element(RMAP_NODE, &no_set_distance_cmd);
5904 install_element(RMAP_NODE, &no_set_local_pref_cmd);
5905 install_element(RMAP_NODE, &set_weight_cmd);
5906 install_element(RMAP_NODE, &set_label_index_cmd);
5907 install_element(RMAP_NODE, &no_set_weight_cmd);
5908 install_element(RMAP_NODE, &no_set_label_index_cmd);
5909 install_element(RMAP_NODE, &set_aspath_prepend_asn_cmd);
5910 install_element(RMAP_NODE, &set_aspath_prepend_lastas_cmd);
5911 install_element(RMAP_NODE, &set_aspath_exclude_cmd);
5912 install_element(RMAP_NODE, &no_set_aspath_prepend_cmd);
5913 install_element(RMAP_NODE, &no_set_aspath_prepend_lastas_cmd);
5914 install_element(RMAP_NODE, &no_set_aspath_exclude_cmd);
5915 install_element(RMAP_NODE, &no_set_aspath_exclude_all_cmd);
5916 install_element(RMAP_NODE, &set_origin_cmd);
5917 install_element(RMAP_NODE, &no_set_origin_cmd);
5918 install_element(RMAP_NODE, &set_atomic_aggregate_cmd);
5919 install_element(RMAP_NODE, &no_set_atomic_aggregate_cmd);
5920 install_element(RMAP_NODE, &set_aggregator_as_cmd);
5921 install_element(RMAP_NODE, &no_set_aggregator_as_cmd);
5922 install_element(RMAP_NODE, &set_community_cmd);
5923 install_element(RMAP_NODE, &set_community_none_cmd);
5924 install_element(RMAP_NODE, &no_set_community_cmd);
5925 install_element(RMAP_NODE, &no_set_community_short_cmd);
5926 install_element(RMAP_NODE, &set_community_delete_cmd);
5927 install_element(RMAP_NODE, &no_set_community_delete_cmd);
5928 install_element(RMAP_NODE, &set_lcommunity_cmd);
5929 install_element(RMAP_NODE, &set_lcommunity_none_cmd);
5930 install_element(RMAP_NODE, &no_set_lcommunity_cmd);
5931 install_element(RMAP_NODE, &no_set_lcommunity1_cmd);
5932 install_element(RMAP_NODE, &no_set_lcommunity1_short_cmd);
5933 install_element(RMAP_NODE, &set_lcommunity_delete_cmd);
5934 install_element(RMAP_NODE, &no_set_lcommunity_delete_cmd);
5935 install_element(RMAP_NODE, &no_set_lcommunity_delete_short_cmd);
5936 install_element(RMAP_NODE, &set_ecommunity_rt_cmd);
5937 install_element(RMAP_NODE, &no_set_ecommunity_rt_cmd);
5938 install_element(RMAP_NODE, &no_set_ecommunity_rt_short_cmd);
5939 install_element(RMAP_NODE, &set_ecommunity_soo_cmd);
5940 install_element(RMAP_NODE, &no_set_ecommunity_soo_cmd);
5941 install_element(RMAP_NODE, &no_set_ecommunity_soo_short_cmd);
5942 install_element(RMAP_NODE, &set_ecommunity_lb_cmd);
5943 install_element(RMAP_NODE, &no_set_ecommunity_lb_cmd);
5944 install_element(RMAP_NODE, &no_set_ecommunity_lb_short_cmd);
5945 #ifdef KEEP_OLD_VPN_COMMANDS
5946 install_element(RMAP_NODE, &set_vpn_nexthop_cmd);
5947 install_element(RMAP_NODE, &no_set_vpn_nexthop_cmd);
5948 #endif /* KEEP_OLD_VPN_COMMANDS */
5949 install_element(RMAP_NODE, &set_ipx_vpn_nexthop_cmd);
5950 install_element(RMAP_NODE, &no_set_ipx_vpn_nexthop_cmd);
5951 install_element(RMAP_NODE, &set_originator_id_cmd);
5952 install_element(RMAP_NODE, &no_set_originator_id_cmd);
5953
5954 route_map_install_match(&route_match_ipv6_address_cmd);
5955 route_map_install_match(&route_match_ipv6_next_hop_cmd);
5956 route_map_install_match(&route_match_ipv4_next_hop_cmd);
5957 route_map_install_match(&route_match_ipv6_address_prefix_list_cmd);
5958 route_map_install_match(&route_match_ipv6_next_hop_type_cmd);
5959 route_map_install_set(&route_set_ipv6_nexthop_global_cmd);
5960 route_map_install_set(&route_set_ipv6_nexthop_prefer_global_cmd);
5961 route_map_install_set(&route_set_ipv6_nexthop_local_cmd);
5962 route_map_install_set(&route_set_ipv6_nexthop_peer_cmd);
5963
5964 install_element(RMAP_NODE, &match_ipv6_next_hop_cmd);
5965 install_element(RMAP_NODE, &no_match_ipv6_next_hop_cmd);
5966 install_element(RMAP_NODE, &match_ipv4_next_hop_cmd);
5967 install_element(RMAP_NODE, &no_match_ipv4_next_hop_cmd);
5968 install_element(RMAP_NODE, &set_ipv6_nexthop_global_cmd);
5969 install_element(RMAP_NODE, &no_set_ipv6_nexthop_global_cmd);
5970 install_element(RMAP_NODE, &set_ipv6_nexthop_prefer_global_cmd);
5971 install_element(RMAP_NODE, &no_set_ipv6_nexthop_prefer_global_cmd);
5972 install_element(RMAP_NODE, &set_ipv6_nexthop_peer_cmd);
5973 install_element(RMAP_NODE, &no_set_ipv6_nexthop_peer_cmd);
5974 #if defined(HAVE_LUA)
5975 install_element(RMAP_NODE, &match_command_cmd);
5976 install_element(RMAP_NODE, &no_match_command_cmd);
5977 #endif
5978 }
5979
5980 void bgp_route_map_terminate(void)
5981 {
5982 /* ToDo: Cleanup all the used memory */
5983 route_map_finish();
5984 }
FRRouting mirror