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


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