2 * Copyright (C) 2005 6WIND <alain.ritoux@6wind.com>
3 * Copyright (C) 1999 Kunihiro Ishiguro <kunihiro@zebra.org>
5 * This file is part of GNU Zebra.
7 * GNU Zebra is free software; you can redistribute it and/or modify it
8 * under the terms of the GNU General Public License as published by the
9 * Free Software Foundation; either version 2, or (at your option) any
12 * GNU Zebra is distributed in the hope that it will be useful, but
13 * WITHOUT ANY WARRANTY; without even the implied warranty of
14 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
15 * General Public License for more details.
17 * You should have received a copy of the GNU General Public License along
18 * with this program; see the file COPYING; if not, write to the Free Software
19 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
31 #include "sockunion.h" /* for inet_aton () */
35 #include "ripd/ripd.h"
37 struct rip_metric_modifier
{
38 enum { metric_increment
, metric_decrement
, metric_absolute
} type
;
43 /* Hook function for updating route_map assignment. */
45 static void rip_route_map_update(const char *notused
)
50 for (i
= 0; i
< ZEBRA_ROUTE_MAX
; i
++) {
51 if (rip
->route_map
[i
].name
)
52 rip
->route_map
[i
].map
=
53 route_map_lookup_by_name(
54 rip
->route_map
[i
].name
);
59 /* `match metric METRIC' */
60 /* Match function return 1 if match is success else return zero. */
61 static route_map_result_t
route_match_metric(void *rule
, struct prefix
*prefix
,
62 route_map_object_t type
,
67 struct rip_info
*rinfo
;
69 if (type
== RMAP_RIP
) {
73 /* If external metric is available, the route-map should
74 work on this one (for redistribute purpose) */
75 check
= (rinfo
->external_metric
) ? rinfo
->external_metric
85 /* Route map `match metric' match statement. `arg' is METRIC value */
86 static void *route_match_metric_compile(const char *arg
)
90 metric
= XMALLOC(MTYPE_ROUTE_MAP_COMPILED
, sizeof(u_int32_t
));
96 XFREE(MTYPE_ROUTE_MAP_COMPILED
, metric
);
100 /* Free route map's compiled `match metric' value. */
101 static void route_match_metric_free(void *rule
)
103 XFREE(MTYPE_ROUTE_MAP_COMPILED
, rule
);
106 /* Route map commands for metric matching. */
107 struct route_map_rule_cmd route_match_metric_cmd
= {
108 "metric", route_match_metric
, route_match_metric_compile
,
109 route_match_metric_free
};
111 /* `match interface IFNAME' */
112 /* Match function return 1 if match is success else return zero. */
113 static route_map_result_t
route_match_interface(void *rule
,
114 struct prefix
*prefix
,
115 route_map_object_t type
,
118 struct rip_info
*rinfo
;
119 struct interface
*ifp
;
122 if (type
== RMAP_RIP
) {
124 ifp
= if_lookup_by_name(ifname
, VRF_DEFAULT
);
131 if (rinfo
->ifindex_out
== ifp
->ifindex
132 || rinfo
->nh
.ifindex
== ifp
->ifindex
)
140 /* Route map `match interface' match statement. `arg' is IFNAME value */
141 /* XXX I don`t know if I need to check does interface exist? */
142 static void *route_match_interface_compile(const char *arg
)
144 return XSTRDUP(MTYPE_ROUTE_MAP_COMPILED
, arg
);
147 /* Free route map's compiled `match interface' value. */
148 static void route_match_interface_free(void *rule
)
150 XFREE(MTYPE_ROUTE_MAP_COMPILED
, rule
);
153 /* Route map commands for interface matching. */
154 struct route_map_rule_cmd route_match_interface_cmd
= {
155 "interface", route_match_interface
, route_match_interface_compile
,
156 route_match_interface_free
};
158 /* `match ip next-hop IP_ACCESS_LIST' */
160 /* Match function return 1 if match is success else return zero. */
161 static route_map_result_t
route_match_ip_next_hop(void *rule
,
162 struct prefix
*prefix
,
163 route_map_object_t type
,
166 struct access_list
*alist
;
167 struct rip_info
*rinfo
;
168 struct prefix_ipv4 p
;
170 if (type
== RMAP_RIP
) {
174 (rinfo
->nh
.gate
.ipv4
.s_addr
) ?
175 rinfo
->nh
.gate
.ipv4
: rinfo
->from
;
176 p
.prefixlen
= IPV4_MAX_BITLEN
;
178 alist
= access_list_lookup(AFI_IP
, (char *)rule
);
182 return (access_list_apply(alist
, &p
) == FILTER_DENY
189 /* Route map `ip next-hop' match statement. `arg' should be
191 static void *route_match_ip_next_hop_compile(const char *arg
)
193 return XSTRDUP(MTYPE_ROUTE_MAP_COMPILED
, arg
);
196 /* Free route map's compiled `. */
197 static void route_match_ip_next_hop_free(void *rule
)
199 XFREE(MTYPE_ROUTE_MAP_COMPILED
, rule
);
202 /* Route map commands for ip next-hop matching. */
203 static struct route_map_rule_cmd route_match_ip_next_hop_cmd
= {
204 "ip next-hop", route_match_ip_next_hop
, route_match_ip_next_hop_compile
,
205 route_match_ip_next_hop_free
};
207 /* `match ip next-hop prefix-list PREFIX_LIST' */
209 static route_map_result_t
210 route_match_ip_next_hop_prefix_list(void *rule
, struct prefix
*prefix
,
211 route_map_object_t type
, void *object
)
213 struct prefix_list
*plist
;
214 struct rip_info
*rinfo
;
215 struct prefix_ipv4 p
;
217 if (type
== RMAP_RIP
) {
221 (rinfo
->nh
.gate
.ipv4
.s_addr
) ?
222 rinfo
->nh
.gate
.ipv4
: rinfo
->from
;
223 p
.prefixlen
= IPV4_MAX_BITLEN
;
225 plist
= prefix_list_lookup(AFI_IP
, (char *)rule
);
229 return (prefix_list_apply(plist
, &p
) == PREFIX_DENY
236 static void *route_match_ip_next_hop_prefix_list_compile(const char *arg
)
238 return XSTRDUP(MTYPE_ROUTE_MAP_COMPILED
, arg
);
241 static void route_match_ip_next_hop_prefix_list_free(void *rule
)
243 XFREE(MTYPE_ROUTE_MAP_COMPILED
, rule
);
246 static struct route_map_rule_cmd route_match_ip_next_hop_prefix_list_cmd
= {
247 "ip next-hop prefix-list", route_match_ip_next_hop_prefix_list
,
248 route_match_ip_next_hop_prefix_list_compile
,
249 route_match_ip_next_hop_prefix_list_free
};
251 /* `match ip address IP_ACCESS_LIST' */
253 /* Match function should return 1 if match is success else return
255 static route_map_result_t
route_match_ip_address(void *rule
,
256 struct prefix
*prefix
,
257 route_map_object_t type
,
260 struct access_list
*alist
;
262 if (type
== RMAP_RIP
) {
263 alist
= access_list_lookup(AFI_IP
, (char *)rule
);
267 return (access_list_apply(alist
, prefix
) == FILTER_DENY
274 /* Route map `ip address' match statement. `arg' should be
276 static void *route_match_ip_address_compile(const char *arg
)
278 return XSTRDUP(MTYPE_ROUTE_MAP_COMPILED
, arg
);
281 /* Free route map's compiled `ip address' value. */
282 static void route_match_ip_address_free(void *rule
)
284 XFREE(MTYPE_ROUTE_MAP_COMPILED
, rule
);
287 /* Route map commands for ip address matching. */
288 static struct route_map_rule_cmd route_match_ip_address_cmd
= {
289 "ip address", route_match_ip_address
, route_match_ip_address_compile
,
290 route_match_ip_address_free
};
292 /* `match ip address prefix-list PREFIX_LIST' */
294 static route_map_result_t
295 route_match_ip_address_prefix_list(void *rule
, struct prefix
*prefix
,
296 route_map_object_t type
, void *object
)
298 struct prefix_list
*plist
;
300 if (type
== RMAP_RIP
) {
301 plist
= prefix_list_lookup(AFI_IP
, (char *)rule
);
305 return (prefix_list_apply(plist
, prefix
) == PREFIX_DENY
312 static void *route_match_ip_address_prefix_list_compile(const char *arg
)
314 return XSTRDUP(MTYPE_ROUTE_MAP_COMPILED
, arg
);
317 static void route_match_ip_address_prefix_list_free(void *rule
)
319 XFREE(MTYPE_ROUTE_MAP_COMPILED
, rule
);
322 static struct route_map_rule_cmd route_match_ip_address_prefix_list_cmd
= {
323 "ip address prefix-list", route_match_ip_address_prefix_list
,
324 route_match_ip_address_prefix_list_compile
,
325 route_match_ip_address_prefix_list_free
};
327 /* `match tag TAG' */
328 /* Match function return 1 if match is success else return zero. */
329 static route_map_result_t
route_match_tag(void *rule
, struct prefix
*prefix
,
330 route_map_object_t type
, void *object
)
333 struct rip_info
*rinfo
;
334 route_tag_t rinfo_tag
;
336 if (type
== RMAP_RIP
) {
340 /* The information stored by rinfo is host ordered. */
341 rinfo_tag
= rinfo
->tag
;
342 if (rinfo_tag
== *tag
)
350 /* Route map commands for tag matching. */
351 static struct route_map_rule_cmd route_match_tag_cmd
= {
352 "tag", route_match_tag
, route_map_rule_tag_compile
,
353 route_map_rule_tag_free
,
356 /* `set metric METRIC' */
358 /* Set metric to attribute. */
359 static route_map_result_t
route_set_metric(void *rule
, struct prefix
*prefix
,
360 route_map_object_t type
,
363 if (type
== RMAP_RIP
) {
364 struct rip_metric_modifier
*mod
;
365 struct rip_info
*rinfo
;
373 if (mod
->type
== metric_increment
)
374 rinfo
->metric_out
+= mod
->metric
;
375 else if (mod
->type
== metric_decrement
)
376 rinfo
->metric_out
-= mod
->metric
;
377 else if (mod
->type
== metric_absolute
)
378 rinfo
->metric_out
= mod
->metric
;
380 if ((signed int)rinfo
->metric_out
< 1)
381 rinfo
->metric_out
= 1;
382 if (rinfo
->metric_out
> RIP_METRIC_INFINITY
)
383 rinfo
->metric_out
= RIP_METRIC_INFINITY
;
385 rinfo
->metric_set
= 1;
390 /* set metric compilation. */
391 static void *route_set_metric_compile(const char *arg
)
397 struct rip_metric_modifier
*mod
;
399 mod
= XMALLOC(MTYPE_ROUTE_MAP_COMPILED
,
400 sizeof(struct rip_metric_modifier
));
409 /* Examine first character. */
411 mod
->type
= metric_increment
;
413 } else if (arg
[0] == '-') {
414 mod
->type
= metric_decrement
;
417 mod
->type
= metric_absolute
;
419 /* Check beginning with digit string. */
420 if (*pnt
< '0' || *pnt
> '9')
423 /* Convert string to integer. */
424 metric
= strtol(pnt
, &endptr
, 10);
426 if (*endptr
!= '\0' || metric
< 0) {
429 if (metric
> RIP_METRIC_INFINITY
) {
430 zlog_info("%s: Metric specified: %ld is greater than RIP_METRIC_INFINITY, using INFINITY instead",
431 __PRETTY_FUNCTION__
, metric
);
432 mod
->metric
= RIP_METRIC_INFINITY
;
434 mod
->metric
= metric
;
441 /* Free route map's compiled `set metric' value. */
442 static void route_set_metric_free(void *rule
)
444 XFREE(MTYPE_ROUTE_MAP_COMPILED
, rule
);
447 /* Set metric rule structure. */
448 static struct route_map_rule_cmd route_set_metric_cmd
= {
449 "metric", route_set_metric
, route_set_metric_compile
,
450 route_set_metric_free
,
453 /* `set ip next-hop IP_ADDRESS' */
455 /* Set nexthop to object. ojbect must be pointer to struct attr. */
456 static route_map_result_t
route_set_ip_nexthop(void *rule
,
457 struct prefix
*prefix
,
458 route_map_object_t type
,
461 struct in_addr
*address
;
462 struct rip_info
*rinfo
;
464 if (type
== RMAP_RIP
) {
465 /* Fetch routemap's rule information. */
469 /* Set next hop value. */
470 rinfo
->nexthop_out
= *address
;
476 /* Route map `ip nexthop' compile function. Given string is converted
477 to struct in_addr structure. */
478 static void *route_set_ip_nexthop_compile(const char *arg
)
481 struct in_addr
*address
;
483 address
= XMALLOC(MTYPE_ROUTE_MAP_COMPILED
, sizeof(struct in_addr
));
485 ret
= inet_aton(arg
, address
);
488 XFREE(MTYPE_ROUTE_MAP_COMPILED
, address
);
495 /* Free route map's compiled `ip nexthop' value. */
496 static void route_set_ip_nexthop_free(void *rule
)
498 XFREE(MTYPE_ROUTE_MAP_COMPILED
, rule
);
501 /* Route map commands for ip nexthop set. */
502 static struct route_map_rule_cmd route_set_ip_nexthop_cmd
= {
503 "ip next-hop", route_set_ip_nexthop
, route_set_ip_nexthop_compile
,
504 route_set_ip_nexthop_free
};
508 /* Set tag to object. ojbect must be pointer to struct attr. */
509 static route_map_result_t
route_set_tag(void *rule
, struct prefix
*prefix
,
510 route_map_object_t type
, void *object
)
513 struct rip_info
*rinfo
;
515 if (type
== RMAP_RIP
) {
516 /* Fetch routemap's rule information. */
520 /* Set next hop value. */
521 rinfo
->tag_out
= *tag
;
527 /* Route map commands for tag set. */
528 static struct route_map_rule_cmd route_set_tag_cmd
= {
529 "tag", route_set_tag
, route_map_rule_tag_compile
,
530 route_map_rule_tag_free
};
532 #define MATCH_STR "Match values from routing table\n"
533 #define SET_STR "Set values in destination routing protocol\n"
535 void rip_route_map_reset()
541 void rip_route_map_init()
545 route_map_add_hook(rip_route_map_update
);
546 route_map_delete_hook(rip_route_map_update
);
548 route_map_match_interface_hook(generic_match_add
);
549 route_map_no_match_interface_hook(generic_match_delete
);
551 route_map_match_ip_address_hook(generic_match_add
);
552 route_map_no_match_ip_address_hook(generic_match_delete
);
554 route_map_match_ip_address_prefix_list_hook(generic_match_add
);
555 route_map_no_match_ip_address_prefix_list_hook(generic_match_delete
);
557 route_map_match_ip_next_hop_hook(generic_match_add
);
558 route_map_no_match_ip_next_hop_hook(generic_match_delete
);
560 route_map_match_ip_next_hop_prefix_list_hook(generic_match_add
);
561 route_map_no_match_ip_next_hop_prefix_list_hook(generic_match_delete
);
563 route_map_match_metric_hook(generic_match_add
);
564 route_map_no_match_metric_hook(generic_match_delete
);
566 route_map_match_tag_hook(generic_match_add
);
567 route_map_no_match_tag_hook(generic_match_delete
);
569 route_map_set_ip_nexthop_hook(generic_set_add
);
570 route_map_no_set_ip_nexthop_hook(generic_set_delete
);
572 route_map_set_metric_hook(generic_set_add
);
573 route_map_no_set_metric_hook(generic_set_delete
);
575 route_map_set_tag_hook(generic_set_add
);
576 route_map_no_set_tag_hook(generic_set_delete
);
578 route_map_install_match(&route_match_metric_cmd
);
579 route_map_install_match(&route_match_interface_cmd
);
580 route_map_install_match(&route_match_ip_next_hop_cmd
);
581 route_map_install_match(&route_match_ip_next_hop_prefix_list_cmd
);
582 route_map_install_match(&route_match_ip_address_cmd
);
583 route_map_install_match(&route_match_ip_address_prefix_list_cmd
);
584 route_map_install_match(&route_match_tag_cmd
);
586 route_map_install_set(&route_set_metric_cmd
);
587 route_map_install_set(&route_set_ip_nexthop_cmd
);
588 route_map_install_set(&route_set_tag_cmd
);