3 * Copyright (C) 2018 Cumulus Networks, Inc.
6 * FRR 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
11 * FRR 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.
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
35 #include "nexthop_group.h"
39 #include "pbr_memory.h"
40 #include "pbr_zebra.h"
41 #include "pbr_debug.h"
43 DEFINE_MTYPE_STATIC(PBRD
, PBR_INTERFACE
, "PBR Interface")
45 /* Zebra structure to hold current status. */
46 struct zclient
*zclient
;
48 static struct interface
*zebra_interface_if_lookup(struct stream
*s
)
50 char ifname_tmp
[INTERFACE_NAMSIZ
];
52 /* Read interface name. */
53 stream_get(ifname_tmp
, s
, INTERFACE_NAMSIZ
);
56 return if_lookup_by_name(ifname_tmp
, VRF_DEFAULT
);
59 struct pbr_interface
*pbr_if_new(struct interface
*ifp
)
61 struct pbr_interface
*pbr_ifp
;
66 pbr_ifp
= XCALLOC(MTYPE_PBR_INTERFACE
, sizeof(*pbr_ifp
));
69 zlog_err("%s: PBR XCALLOC(%zu) failure", __PRETTY_FUNCTION__
,
77 /* Inteface addition message from zebra. */
78 static int interface_add(int command
, struct zclient
*zclient
,
79 zebra_size_t length
, vrf_id_t vrf_id
)
81 struct interface
*ifp
;
83 ifp
= zebra_interface_add_read(zclient
->ibuf
, vrf_id
);
89 struct pbr_interface
*pbr_ifp
;
91 pbr_ifp
= pbr_if_new(ifp
);
98 static int interface_delete(int command
, struct zclient
*zclient
,
99 zebra_size_t length
, vrf_id_t vrf_id
)
101 struct interface
*ifp
;
105 /* zebra_interface_state_read () updates interface structure in iflist
107 ifp
= zebra_interface_state_read(s
, vrf_id
);
112 if_set_index(ifp
, IFINDEX_INTERNAL
);
117 static int interface_address_add(int command
, struct zclient
*zclient
,
118 zebra_size_t length
, vrf_id_t vrf_id
)
120 zebra_interface_address_read(command
, zclient
->ibuf
, vrf_id
);
125 static int interface_address_delete(int command
, struct zclient
*zclient
,
126 zebra_size_t length
, vrf_id_t vrf_id
)
130 c
= zebra_interface_address_read(command
, zclient
->ibuf
, vrf_id
);
139 static int interface_state_up(int command
, struct zclient
*zclient
,
140 zebra_size_t length
, vrf_id_t vrf_id
)
143 zebra_interface_if_lookup(zclient
->ibuf
);
148 static int interface_state_down(int command
, struct zclient
*zclient
,
149 zebra_size_t length
, vrf_id_t vrf_id
)
152 zebra_interface_state_read(zclient
->ibuf
, vrf_id
);
157 static int route_notify_owner(int command
, struct zclient
*zclient
,
158 zebra_size_t length
, vrf_id_t vrf_id
)
161 enum zapi_route_notify_owner note
;
163 char buf
[PREFIX_STRLEN
];
165 prefix2str(&p
, buf
, sizeof(buf
));
167 if (!zapi_route_notify_decode(zclient
->ibuf
, &p
, &table_id
, ¬e
))
171 case ZAPI_ROUTE_FAIL_INSTALL
:
172 DEBUGD(&pbr_dbg_zebra
,
173 "%s: [%s] Route install failure for table: %u",
174 __PRETTY_FUNCTION__
, buf
, table_id
);
176 case ZAPI_ROUTE_BETTER_ADMIN_WON
:
177 DEBUGD(&pbr_dbg_zebra
,
178 "%s: [%s] Route better admin distance won for table: %u",
179 __PRETTY_FUNCTION__
, buf
, table_id
);
181 case ZAPI_ROUTE_INSTALLED
:
182 DEBUGD(&pbr_dbg_zebra
,
183 "%s: [%s] Route installed succeeded for table: %u",
184 __PRETTY_FUNCTION__
, buf
, table_id
);
185 pbr_nht_route_installed_for_table(table_id
);
187 case ZAPI_ROUTE_REMOVED
:
188 DEBUGD(&pbr_dbg_zebra
,
189 "%s: [%s] Route Removed succeeded for table: %u",
190 __PRETTY_FUNCTION__
, buf
, table_id
);
191 pbr_nht_route_removed_for_table(table_id
);
193 case ZAPI_ROUTE_REMOVE_FAIL
:
194 DEBUGD(&pbr_dbg_zebra
,
195 "%s: [%s] Route remove fail for table: %u",
196 __PRETTY_FUNCTION__
, buf
, table_id
);
203 static int rule_notify_owner(int command
, struct zclient
*zclient
,
204 zebra_size_t length
, vrf_id_t vrf_id
)
206 uint32_t seqno
, priority
, unique
;
207 enum zapi_rule_notify_owner note
;
208 struct pbr_map_sequence
*pbrms
;
209 struct pbr_map_interface
*pmi
;
213 if (!zapi_rule_notify_decode(zclient
->ibuf
, &seqno
, &priority
, &unique
,
218 pbrms
= pbrms_lookup_unique(unique
, ifi
, &pmi
);
220 DEBUGD(&pbr_dbg_zebra
,
221 "%s: Failure to lookup pbrms based upon %u",
222 __PRETTY_FUNCTION__
, unique
);
226 installed
= 1 << pmi
->install_bit
;
229 case ZAPI_RULE_FAIL_INSTALL
:
230 DEBUGD(&pbr_dbg_zebra
, "%s: Recieved RULE_FAIL_INSTALL",
231 __PRETTY_FUNCTION__
);
232 pbrms
->installed
&= ~installed
;
234 case ZAPI_RULE_INSTALLED
:
235 pbrms
->installed
|= installed
;
236 DEBUGD(&pbr_dbg_zebra
, "%s: Recived RULE_INSTALLED",
237 __PRETTY_FUNCTION__
);
239 case ZAPI_RULE_REMOVED
:
240 pbrms
->installed
&= ~installed
;
241 DEBUGD(&pbr_dbg_zebra
, "%s: Received RULE REMOVED",
242 __PRETTY_FUNCTION__
);
249 static void zebra_connected(struct zclient
*zclient
)
251 zclient_send_reg_requests(zclient
, VRF_DEFAULT
);
254 static void route_add_helper(struct zapi_route
*api
, struct nexthop_group nhg
,
257 struct zapi_nexthop
*api_nh
;
258 struct nexthop
*nhop
;
261 api
->prefix
.family
= install_afi
;
264 for (ALL_NEXTHOPS(nhg
, nhop
)) {
265 api_nh
= &api
->nexthops
[i
];
266 api_nh
->vrf_id
= nhop
->vrf_id
;
267 api_nh
->type
= nhop
->type
;
268 switch (nhop
->type
) {
269 case NEXTHOP_TYPE_IPV4
:
270 api_nh
->gate
.ipv4
= nhop
->gate
.ipv4
;
272 case NEXTHOP_TYPE_IPV4_IFINDEX
:
273 api_nh
->gate
.ipv4
= nhop
->gate
.ipv4
;
274 api_nh
->ifindex
= nhop
->ifindex
;
276 case NEXTHOP_TYPE_IFINDEX
:
277 api_nh
->ifindex
= nhop
->ifindex
;
279 case NEXTHOP_TYPE_IPV6
:
280 memcpy(&api_nh
->gate
.ipv6
, &nhop
->gate
.ipv6
, 16);
282 case NEXTHOP_TYPE_IPV6_IFINDEX
:
283 api_nh
->ifindex
= nhop
->ifindex
;
284 memcpy(&api_nh
->gate
.ipv6
, &nhop
->gate
.ipv6
, 16);
286 case NEXTHOP_TYPE_BLACKHOLE
:
287 api_nh
->bh_type
= nhop
->bh_type
;
292 api
->nexthop_num
= i
;
294 zclient_route_send(ZEBRA_ROUTE_ADD
, zclient
, api
);
298 * This function assumes a default route is being
299 * installed into the appropriate tableid
301 void route_add(struct pbr_nexthop_group_cache
*pnhgc
, struct nexthop_group nhg
,
304 struct zapi_route api
;
306 memset(&api
, 0, sizeof(api
));
308 api
.vrf_id
= VRF_DEFAULT
;
309 api
.type
= ZEBRA_ROUTE_PBR
;
310 api
.safi
= SAFI_UNICAST
;
312 * Sending a default route
314 api
.tableid
= pnhgc
->table_id
;
315 SET_FLAG(api
.flags
, ZEBRA_FLAG_ALLOW_RECURSION
);
316 SET_FLAG(api
.message
, ZAPI_MESSAGE_TABLEID
);
317 SET_FLAG(api
.message
, ZAPI_MESSAGE_NEXTHOP
);
318 switch (install_afi
) {
320 route_add_helper(&api
, nhg
, AF_INET
);
321 route_add_helper(&api
, nhg
, AF_INET6
);
324 route_add_helper(&api
, nhg
, AF_INET
);
327 route_add_helper(&api
, nhg
, AF_INET6
);
330 DEBUGD(&pbr_dbg_zebra
,
331 "%s: Asked to install unsupported route type: L2VPN",
332 __PRETTY_FUNCTION__
);
338 * This function assumes a default route is being
339 * removed from the appropriate tableid
341 void route_delete(struct pbr_nexthop_group_cache
*pnhgc
, afi_t afi
)
343 struct zapi_route api
;
345 memset(&api
, 0, sizeof(api
));
346 api
.vrf_id
= VRF_DEFAULT
;
347 api
.type
= ZEBRA_ROUTE_PBR
;
348 api
.safi
= SAFI_UNICAST
;
350 api
.tableid
= pnhgc
->table_id
;
351 SET_FLAG(api
.message
, ZAPI_MESSAGE_TABLEID
);
355 api
.prefix
.family
= AF_INET
;
356 zclient_route_send(ZEBRA_ROUTE_DELETE
, zclient
, &api
);
359 api
.prefix
.family
= AF_INET6
;
360 zclient_route_send(ZEBRA_ROUTE_DELETE
, zclient
, &api
);
363 api
.prefix
.family
= AF_INET
;
364 zclient_route_send(ZEBRA_ROUTE_DELETE
, zclient
, &api
);
365 api
.prefix
.family
= AF_INET6
;
366 zclient_route_send(ZEBRA_ROUTE_DELETE
, zclient
, &api
);
369 DEBUGD(&pbr_dbg_zebra
,
370 "%s: Asked to delete unsupported route type: L2VPN",
371 __PRETTY_FUNCTION__
);
376 static int pbr_zebra_nexthop_update(int command
, struct zclient
*zclient
,
377 zebra_size_t length
, vrf_id_t vrf_id
)
379 struct zapi_route nhr
;
380 char buf
[PREFIX2STR_BUFFER
];
383 zapi_nexthop_update_decode(zclient
->ibuf
, &nhr
);
385 if (DEBUG_MODE_CHECK(&pbr_dbg_zebra
, DEBUG_MODE_ALL
)) {
387 DEBUGD(&pbr_dbg_zebra
, "%s: Received Nexthop update: %s",
389 prefix2str(&nhr
.prefix
, buf
, sizeof(buf
)));
391 DEBUGD(&pbr_dbg_zebra
, "%s: (\tNexthops(%u)",
392 __PRETTY_FUNCTION__
, nhr
.nexthop_num
);
394 for (i
= 0; i
< nhr
.nexthop_num
; i
++) {
395 DEBUGD(&pbr_dbg_zebra
,
396 "%s: \tType: %d: vrf: %d, ifindex: %d gate: %s",
397 __PRETTY_FUNCTION__
, nhr
.nexthops
[i
].type
,
398 nhr
.nexthops
[i
].vrf_id
, nhr
.nexthops
[i
].ifindex
,
399 inet_ntoa(nhr
.nexthops
[i
].gate
.ipv4
));
403 pbr_nht_nexthop_update(&nhr
);
407 extern struct zebra_privs_t pbr_privs
;
409 void pbr_zebra_init(void)
411 struct zclient_options opt
= { .receive_notify
= true };
413 zclient
= zclient_new_notify(master
, &opt
);
415 zclient_init(zclient
, ZEBRA_ROUTE_PBR
, 0, &pbr_privs
);
416 zclient
->zebra_connected
= zebra_connected
;
417 zclient
->interface_add
= interface_add
;
418 zclient
->interface_delete
= interface_delete
;
419 zclient
->interface_up
= interface_state_up
;
420 zclient
->interface_down
= interface_state_down
;
421 zclient
->interface_address_add
= interface_address_add
;
422 zclient
->interface_address_delete
= interface_address_delete
;
423 zclient
->route_notify_owner
= route_notify_owner
;
424 zclient
->rule_notify_owner
= rule_notify_owner
;
425 zclient
->nexthop_update
= pbr_zebra_nexthop_update
;
428 void pbr_send_rnh(struct nexthop
*nhop
, bool reg
)
434 ZEBRA_NEXTHOP_REGISTER
: ZEBRA_NEXTHOP_UNREGISTER
;
436 memset(&p
, 0, sizeof(p
));
437 switch (nhop
->type
) {
438 case NEXTHOP_TYPE_IFINDEX
:
439 case NEXTHOP_TYPE_BLACKHOLE
:
441 case NEXTHOP_TYPE_IPV4
:
442 case NEXTHOP_TYPE_IPV4_IFINDEX
:
444 p
.u
.prefix4
.s_addr
= nhop
->gate
.ipv4
.s_addr
;
447 case NEXTHOP_TYPE_IPV6
:
448 case NEXTHOP_TYPE_IPV6_IFINDEX
:
450 memcpy(&p
.u
.prefix6
, &nhop
->gate
.ipv6
, 16);
455 if (zclient_send_rnh(zclient
, command
, &p
,
456 false, nhop
->vrf_id
) < 0) {
457 zlog_warn("%s: Failure to send nexthop to zebra",
458 __PRETTY_FUNCTION__
);
462 static void pbr_encode_pbr_map_sequence_prefix(struct stream
*s
,
464 unsigned char family
)
469 memset(&any
, 0, sizeof(any
));
474 stream_putc(s
, p
->family
);
475 stream_putc(s
, p
->prefixlen
);
476 stream_put(s
, &p
->u
.prefix
, prefix_blen(p
));
479 static void pbr_encode_pbr_map_sequence(struct stream
*s
,
480 struct pbr_map_sequence
*pbrms
,
481 struct interface
*ifp
)
483 unsigned char family
;
487 family
= pbrms
->family
;
489 stream_putl(s
, pbrms
->seqno
);
490 stream_putl(s
, pbrms
->ruleno
);
491 stream_putl(s
, pbrms
->unique
);
492 pbr_encode_pbr_map_sequence_prefix(s
, pbrms
->src
, family
);
493 stream_putw(s
, 0); /* src port */
494 pbr_encode_pbr_map_sequence_prefix(s
, pbrms
->dst
, family
);
495 stream_putw(s
, 0); /* dst port */
496 if (pbrms
->nhgrp_name
)
497 stream_putl(s
, pbr_nht_get_table(pbrms
->nhgrp_name
));
499 stream_putl(s
, pbr_nht_get_table(pbrms
->internal_nhg_name
));
500 stream_putl(s
, ifp
->ifindex
);
503 void pbr_send_pbr_map(struct pbr_map_sequence
*pbrms
,
504 struct pbr_map_interface
*pmi
, bool install
)
506 struct pbr_map
*pbrm
= pbrms
->parent
;
508 uint64_t is_installed
= 1 << pmi
->install_bit
;
510 is_installed
&= pbrms
->installed
;
512 DEBUGD(&pbr_dbg_zebra
, "%s: for %s %d(%" PRIu64
")",
513 __PRETTY_FUNCTION__
, pbrm
->name
, install
, is_installed
);
516 * If we are installed and asked to do so again
517 * just return. If we are not installed and asked
518 * and asked to delete just return;
520 if (install
&& is_installed
)
523 if (!install
&& !is_installed
)
529 zclient_create_header(s
,
530 install
? ZEBRA_RULE_ADD
: ZEBRA_RULE_DELETE
,
534 * We are sending one item at a time at the moment
538 DEBUGD(&pbr_dbg_zebra
, "%s: \t%s %s %d %s %u",
539 __PRETTY_FUNCTION__
, install
? "Installing" : "Deleting",
540 pbrm
->name
, install
, pmi
->ifp
->name
, pmi
->delete);
542 pbr_encode_pbr_map_sequence(s
, pbrms
, pmi
->ifp
);
544 stream_putw_at(s
, 0, stream_get_endp(s
));
546 zclient_send_message(zclient
);