]> git.proxmox.com Git - mirror_frr.git/blob - zebra/zapi_msg.c
Merge pull request #5789 from donaldsharp/bgp_ebgp_reason
[mirror_frr.git] / zebra / zapi_msg.c
1 /*
2 * Zebra API message creation & consumption.
3 * Portions:
4 * Copyright (C) 1997-1999 Kunihiro Ishiguro
5 * Copyright (C) 2015-2018 Cumulus Networks, Inc.
6 * et al.
7 *
8 * This program is free software; you can redistribute it and/or modify it
9 * under the terms of the GNU General Public License as published by the Free
10 * Software Foundation; either version 2 of the License, or (at your option)
11 * any later version.
12 *
13 * This program is distributed in the hope that it will be useful, but WITHOUT
14 * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
15 * FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for
16 * more details.
17 *
18 * You should have received a copy of the GNU General Public License along
19 * with this program; see the file COPYING; if not, write to the Free Software
20 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
21 */
22
23 #include <zebra.h>
24 #include <libgen.h>
25
26 #include "lib/prefix.h"
27 #include "lib/command.h"
28 #include "lib/if.h"
29 #include "lib/thread.h"
30 #include "lib/stream.h"
31 #include "lib/memory.h"
32 #include "lib/table.h"
33 #include "lib/network.h"
34 #include "lib/sockunion.h"
35 #include "lib/log.h"
36 #include "lib/zclient.h"
37 #include "lib/privs.h"
38 #include "lib/network.h"
39 #include "lib/buffer.h"
40 #include "lib/nexthop.h"
41 #include "lib/vrf.h"
42 #include "lib/libfrr.h"
43 #include "lib/sockopt.h"
44 #include "lib/lib_errors.h"
45
46 #include "zebra/zebra_router.h"
47 #include "zebra/rib.h"
48 #include "zebra/zebra_memory.h"
49 #include "zebra/zebra_ns.h"
50 #include "zebra/zebra_vrf.h"
51 #include "zebra/router-id.h"
52 #include "zebra/redistribute.h"
53 #include "zebra/debug.h"
54 #include "zebra/zebra_rnh.h"
55 #include "zebra/rt_netlink.h"
56 #include "zebra/interface.h"
57 #include "zebra/zebra_ptm.h"
58 #include "zebra/rtadv.h"
59 #include "zebra/zebra_mpls.h"
60 #include "zebra/zebra_mroute.h"
61 #include "zebra/zebra_vxlan.h"
62 #include "zebra/rt.h"
63 #include "zebra/zebra_pbr.h"
64 #include "zebra/table_manager.h"
65 #include "zebra/zapi_msg.h"
66 #include "zebra/zebra_errors.h"
67 #include "zebra/zebra_mlag.h"
68 #include "zebra/connected.h"
69
70 /* Encoding helpers -------------------------------------------------------- */
71
72 static void zserv_encode_interface(struct stream *s, struct interface *ifp)
73 {
74 /* Interface information. */
75 struct zebra_if *zif = ifp->info;
76
77 stream_put(s, ifp->name, INTERFACE_NAMSIZ);
78 stream_putl(s, ifp->ifindex);
79 stream_putc(s, ifp->status);
80 stream_putq(s, ifp->flags);
81 stream_putc(s, ifp->ptm_enable);
82 stream_putc(s, ifp->ptm_status);
83 stream_putl(s, ifp->metric);
84 stream_putl(s, ifp->speed);
85 stream_putl(s, ifp->mtu);
86 stream_putl(s, ifp->mtu6);
87 stream_putl(s, ifp->bandwidth);
88 stream_putl(s, zif->link_ifindex);
89 stream_putl(s, ifp->ll_type);
90 stream_putl(s, ifp->hw_addr_len);
91 if (ifp->hw_addr_len)
92 stream_put(s, ifp->hw_addr, ifp->hw_addr_len);
93
94 /* Then, Traffic Engineering parameters if any */
95 if (HAS_LINK_PARAMS(ifp) && IS_LINK_PARAMS_SET(ifp->link_params)) {
96 stream_putc(s, 1);
97 zebra_interface_link_params_write(s, ifp);
98 } else
99 stream_putc(s, 0);
100
101 /* Write packet size. */
102 stream_putw_at(s, 0, stream_get_endp(s));
103 }
104
105 static void zserv_encode_vrf(struct stream *s, struct zebra_vrf *zvrf)
106 {
107 struct vrf_data data;
108 const char *netns_name = zvrf_ns_name(zvrf);
109
110 data.l.table_id = zvrf->table_id;
111
112 if (netns_name)
113 strlcpy(data.l.netns_name, basename((char *)netns_name),
114 NS_NAMSIZ);
115 else
116 memset(data.l.netns_name, 0, NS_NAMSIZ);
117 /* Pass the tableid and the netns NAME */
118 stream_put(s, &data, sizeof(struct vrf_data));
119 /* Interface information. */
120 stream_put(s, zvrf_name(zvrf), VRF_NAMSIZ);
121 /* Write packet size. */
122 stream_putw_at(s, 0, stream_get_endp(s));
123 }
124
125 static int zserv_encode_nexthop(struct stream *s, struct nexthop *nexthop)
126 {
127 stream_putl(s, nexthop->vrf_id);
128 stream_putc(s, nexthop->type);
129 switch (nexthop->type) {
130 case NEXTHOP_TYPE_IPV4:
131 case NEXTHOP_TYPE_IPV4_IFINDEX:
132 stream_put_in_addr(s, &nexthop->gate.ipv4);
133 stream_putl(s, nexthop->ifindex);
134 break;
135 case NEXTHOP_TYPE_IPV6:
136 stream_put(s, &nexthop->gate.ipv6, 16);
137 break;
138 case NEXTHOP_TYPE_IPV6_IFINDEX:
139 stream_put(s, &nexthop->gate.ipv6, 16);
140 stream_putl(s, nexthop->ifindex);
141 break;
142 case NEXTHOP_TYPE_IFINDEX:
143 stream_putl(s, nexthop->ifindex);
144 break;
145 default:
146 /* do nothing */
147 break;
148 }
149 return 1;
150 }
151
152 /*
153 * Zebra error addition adds error type.
154 *
155 *
156 * 0 1
157 * 0 1 2 3 4 5 6 7 8 9 0 1 2 3 4 5 6
158 * +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+
159 * | enum zebra_error_types |
160 * +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+
161 *
162 */
163 static void zserv_encode_error(struct stream *s, enum zebra_error_types error)
164 {
165 stream_put(s, &error, sizeof(error));
166
167 /* Write packet size. */
168 stream_putw_at(s, 0, stream_get_endp(s));
169 }
170
171 /* Send handlers ----------------------------------------------------------- */
172
173 /* Interface is added. Send ZEBRA_INTERFACE_ADD to client. */
174 /*
175 * This function is called in the following situations:
176 * - in response to a 3-byte ZEBRA_INTERFACE_ADD request
177 * from the client.
178 * - at startup, when zebra figures out the available interfaces
179 * - when an interface is added (where support for
180 * RTM_IFANNOUNCE or AF_NETLINK sockets is available), or when
181 * an interface is marked IFF_UP (i.e., an RTM_IFINFO message is
182 * received)
183 */
184 int zsend_interface_add(struct zserv *client, struct interface *ifp)
185 {
186 struct stream *s = stream_new(ZEBRA_MAX_PACKET_SIZ);
187
188 zclient_create_header(s, ZEBRA_INTERFACE_ADD, ifp->vrf_id);
189 zserv_encode_interface(s, ifp);
190
191 client->ifadd_cnt++;
192 return zserv_send_message(client, s);
193 }
194
195 /* Interface deletion from zebra daemon. */
196 int zsend_interface_delete(struct zserv *client, struct interface *ifp)
197 {
198 struct stream *s = stream_new(ZEBRA_MAX_PACKET_SIZ);
199
200 zclient_create_header(s, ZEBRA_INTERFACE_DELETE, ifp->vrf_id);
201 zserv_encode_interface(s, ifp);
202
203 client->ifdel_cnt++;
204 return zserv_send_message(client, s);
205 }
206
207 int zsend_vrf_add(struct zserv *client, struct zebra_vrf *zvrf)
208 {
209 struct stream *s = stream_new(ZEBRA_MAX_PACKET_SIZ);
210
211 zclient_create_header(s, ZEBRA_VRF_ADD, zvrf_id(zvrf));
212 zserv_encode_vrf(s, zvrf);
213
214 client->vrfadd_cnt++;
215 return zserv_send_message(client, s);
216 }
217
218 /* VRF deletion from zebra daemon. */
219 int zsend_vrf_delete(struct zserv *client, struct zebra_vrf *zvrf)
220
221 {
222 struct stream *s = stream_new(ZEBRA_MAX_PACKET_SIZ);
223
224 zclient_create_header(s, ZEBRA_VRF_DELETE, zvrf_id(zvrf));
225 zserv_encode_vrf(s, zvrf);
226
227 client->vrfdel_cnt++;
228 return zserv_send_message(client, s);
229 }
230
231 int zsend_interface_link_params(struct zserv *client, struct interface *ifp)
232 {
233 struct stream *s = stream_new(ZEBRA_MAX_PACKET_SIZ);
234
235 if (!ifp->link_params) {
236 stream_free(s);
237 return 0;
238 }
239
240 zclient_create_header(s, ZEBRA_INTERFACE_LINK_PARAMS, ifp->vrf_id);
241
242 /* Add Interface Index */
243 stream_putl(s, ifp->ifindex);
244
245 /* Then TE Link Parameters */
246 if (zebra_interface_link_params_write(s, ifp) == 0) {
247 stream_free(s);
248 return 0;
249 }
250
251 /* Write packet size. */
252 stream_putw_at(s, 0, stream_get_endp(s));
253
254 return zserv_send_message(client, s);
255 }
256
257 /* Interface address is added/deleted. Send ZEBRA_INTERFACE_ADDRESS_ADD or
258 * ZEBRA_INTERFACE_ADDRESS_DELETE to the client.
259 *
260 * A ZEBRA_INTERFACE_ADDRESS_ADD is sent in the following situations:
261 * - in response to a 3-byte ZEBRA_INTERFACE_ADD request
262 * from the client, after the ZEBRA_INTERFACE_ADD has been
263 * sent from zebra to the client
264 * - redistribute new address info to all clients in the following situations
265 * - at startup, when zebra figures out the available interfaces
266 * - when an interface is added (where support for
267 * RTM_IFANNOUNCE or AF_NETLINK sockets is available), or when
268 * an interface is marked IFF_UP (i.e., an RTM_IFINFO message is
269 * received)
270 * - for the vty commands "ip address A.B.C.D/M [<label LINE>]"
271 * and "no bandwidth <1-10000000>", "ipv6 address X:X::X:X/M"
272 * - when an RTM_NEWADDR message is received from the kernel,
273 *
274 * The call tree that triggers ZEBRA_INTERFACE_ADDRESS_DELETE:
275 *
276 * zsend_interface_address(DELETE)
277 * ^
278 * |
279 * zebra_interface_address_delete_update
280 * ^ ^ ^
281 * | | if_delete_update
282 * | |
283 * ip_address_uninstall connected_delete_ipv4
284 * [ipv6_addresss_uninstall] [connected_delete_ipv6]
285 * ^ ^
286 * | |
287 * | RTM_NEWADDR on routing/netlink socket
288 * |
289 * vty commands:
290 * "no ip address A.B.C.D/M [label LINE]"
291 * "no ip address A.B.C.D/M"
292 * ["no ipv6 address X:X::X:X/M"]
293 *
294 */
295 int zsend_interface_address(int cmd, struct zserv *client,
296 struct interface *ifp, struct connected *ifc)
297 {
298 int blen;
299 struct prefix *p;
300 struct stream *s = stream_new(ZEBRA_MAX_PACKET_SIZ);
301
302 zclient_create_header(s, cmd, ifp->vrf_id);
303 stream_putl(s, ifp->ifindex);
304
305 /* Interface address flag. */
306 stream_putc(s, ifc->flags);
307
308 /* Prefix information. */
309 p = ifc->address;
310 stream_putc(s, p->family);
311 blen = prefix_blen(p);
312 stream_put(s, &p->u.prefix, blen);
313
314 /*
315 * XXX gnu version does not send prefixlen for
316 * ZEBRA_INTERFACE_ADDRESS_DELETE
317 * but zebra_interface_address_delete_read() in the gnu version
318 * expects to find it
319 */
320 stream_putc(s, p->prefixlen);
321
322 /* Destination. */
323 p = ifc->destination;
324 if (p)
325 stream_put(s, &p->u.prefix, blen);
326 else
327 stream_put(s, NULL, blen);
328
329 /* Write packet size. */
330 stream_putw_at(s, 0, stream_get_endp(s));
331
332 client->connected_rt_add_cnt++;
333 return zserv_send_message(client, s);
334 }
335
336 static int zsend_interface_nbr_address(int cmd, struct zserv *client,
337 struct interface *ifp,
338 struct nbr_connected *ifc)
339 {
340 int blen;
341 struct stream *s = stream_new(ZEBRA_MAX_PACKET_SIZ);
342 struct prefix *p;
343
344 zclient_create_header(s, cmd, ifp->vrf_id);
345 stream_putl(s, ifp->ifindex);
346
347 /* Prefix information. */
348 p = ifc->address;
349 stream_putc(s, p->family);
350 blen = prefix_blen(p);
351 stream_put(s, &p->u.prefix, blen);
352
353 /*
354 * XXX gnu version does not send prefixlen for
355 * ZEBRA_INTERFACE_ADDRESS_DELETE
356 * but zebra_interface_address_delete_read() in the gnu version
357 * expects to find it
358 */
359 stream_putc(s, p->prefixlen);
360
361 /* Write packet size. */
362 stream_putw_at(s, 0, stream_get_endp(s));
363
364 return zserv_send_message(client, s);
365 }
366
367 /* Interface address addition. */
368 static void zebra_interface_nbr_address_add_update(struct interface *ifp,
369 struct nbr_connected *ifc)
370 {
371 struct listnode *node, *nnode;
372 struct zserv *client;
373 struct prefix *p;
374
375 if (IS_ZEBRA_DEBUG_EVENT) {
376 char buf[INET6_ADDRSTRLEN];
377
378 p = ifc->address;
379 zlog_debug(
380 "MESSAGE: ZEBRA_INTERFACE_NBR_ADDRESS_ADD %s/%d on %s",
381 inet_ntop(p->family, &p->u.prefix, buf,
382 INET6_ADDRSTRLEN),
383 p->prefixlen, ifc->ifp->name);
384 }
385
386 for (ALL_LIST_ELEMENTS(zrouter.client_list, node, nnode, client))
387 zsend_interface_nbr_address(ZEBRA_INTERFACE_NBR_ADDRESS_ADD,
388 client, ifp, ifc);
389 }
390
391 /* Interface address deletion. */
392 static void zebra_interface_nbr_address_delete_update(struct interface *ifp,
393 struct nbr_connected *ifc)
394 {
395 struct listnode *node, *nnode;
396 struct zserv *client;
397 struct prefix *p;
398
399 if (IS_ZEBRA_DEBUG_EVENT) {
400 char buf[INET6_ADDRSTRLEN];
401
402 p = ifc->address;
403 zlog_debug(
404 "MESSAGE: ZEBRA_INTERFACE_NBR_ADDRESS_DELETE %s/%d on %s",
405 inet_ntop(p->family, &p->u.prefix, buf,
406 INET6_ADDRSTRLEN),
407 p->prefixlen, ifc->ifp->name);
408 }
409
410 for (ALL_LIST_ELEMENTS(zrouter.client_list, node, nnode, client))
411 zsend_interface_nbr_address(ZEBRA_INTERFACE_NBR_ADDRESS_DELETE,
412 client, ifp, ifc);
413 }
414
415 /* Send addresses on interface to client */
416 int zsend_interface_addresses(struct zserv *client, struct interface *ifp)
417 {
418 struct listnode *cnode, *cnnode;
419 struct connected *c;
420 struct nbr_connected *nc;
421
422 /* Send interface addresses. */
423 for (ALL_LIST_ELEMENTS(ifp->connected, cnode, cnnode, c)) {
424 if (!CHECK_FLAG(c->conf, ZEBRA_IFC_REAL))
425 continue;
426
427 if (zsend_interface_address(ZEBRA_INTERFACE_ADDRESS_ADD, client,
428 ifp, c)
429 < 0)
430 return -1;
431 }
432
433 /* Send interface neighbors. */
434 for (ALL_LIST_ELEMENTS(ifp->nbr_connected, cnode, cnnode, nc)) {
435 if (zsend_interface_nbr_address(ZEBRA_INTERFACE_NBR_ADDRESS_ADD,
436 client, ifp, nc)
437 < 0)
438 return -1;
439 }
440
441 return 0;
442 }
443
444 /* Notify client about interface moving from one VRF to another.
445 * Whether client is interested in old and new VRF is checked by caller.
446 */
447 int zsend_interface_vrf_update(struct zserv *client, struct interface *ifp,
448 vrf_id_t vrf_id)
449 {
450 struct stream *s = stream_new(ZEBRA_MAX_PACKET_SIZ);
451
452 zclient_create_header(s, ZEBRA_INTERFACE_VRF_UPDATE, ifp->vrf_id);
453
454 /* Fill in the name of the interface and its new VRF (id) */
455 stream_put(s, ifp->name, INTERFACE_NAMSIZ);
456 stream_putl(s, vrf_id);
457
458 /* Write packet size. */
459 stream_putw_at(s, 0, stream_get_endp(s));
460
461 client->if_vrfchg_cnt++;
462 return zserv_send_message(client, s);
463 }
464
465 /* Add new nbr connected IPv6 address */
466 void nbr_connected_add_ipv6(struct interface *ifp, struct in6_addr *address)
467 {
468 struct nbr_connected *ifc;
469 struct prefix p;
470
471 p.family = AF_INET6;
472 IPV6_ADDR_COPY(&p.u.prefix6, address);
473 p.prefixlen = IPV6_MAX_PREFIXLEN;
474
475 ifc = listnode_head(ifp->nbr_connected);
476 if (!ifc) {
477 /* new addition */
478 ifc = nbr_connected_new();
479 ifc->address = prefix_new();
480 ifc->ifp = ifp;
481 listnode_add(ifp->nbr_connected, ifc);
482 }
483
484 prefix_copy(ifc->address, &p);
485
486 zebra_interface_nbr_address_add_update(ifp, ifc);
487
488 if_nbr_ipv6ll_to_ipv4ll_neigh_update(ifp, address, 1);
489 }
490
491 void nbr_connected_delete_ipv6(struct interface *ifp, struct in6_addr *address)
492 {
493 struct nbr_connected *ifc;
494 struct prefix p;
495
496 p.family = AF_INET6;
497 IPV6_ADDR_COPY(&p.u.prefix6, address);
498 p.prefixlen = IPV6_MAX_PREFIXLEN;
499
500 ifc = nbr_connected_check(ifp, &p);
501 if (!ifc)
502 return;
503
504 listnode_delete(ifp->nbr_connected, ifc);
505
506 zebra_interface_nbr_address_delete_update(ifp, ifc);
507
508 if_nbr_ipv6ll_to_ipv4ll_neigh_update(ifp, address, 0);
509
510 nbr_connected_free(ifc);
511 }
512
513 /*
514 * The cmd passed to zsend_interface_update may be ZEBRA_INTERFACE_UP or
515 * ZEBRA_INTERFACE_DOWN.
516 *
517 * The ZEBRA_INTERFACE_UP message is sent from the zebra server to
518 * the clients in one of 2 situations:
519 * - an if_up is detected e.g., as a result of an RTM_IFINFO message
520 * - a vty command modifying the bandwidth of an interface is received.
521 * The ZEBRA_INTERFACE_DOWN message is sent when an if_down is detected.
522 */
523 int zsend_interface_update(int cmd, struct zserv *client, struct interface *ifp)
524 {
525 struct stream *s = stream_new(ZEBRA_MAX_PACKET_SIZ);
526
527 zclient_create_header(s, cmd, ifp->vrf_id);
528 zserv_encode_interface(s, ifp);
529
530 if (cmd == ZEBRA_INTERFACE_UP)
531 client->ifup_cnt++;
532 else
533 client->ifdown_cnt++;
534
535 return zserv_send_message(client, s);
536 }
537
538 int zsend_redistribute_route(int cmd, struct zserv *client,
539 const struct prefix *p,
540 const struct prefix *src_p,
541 const struct route_entry *re)
542 {
543 struct zapi_route api;
544 struct zapi_nexthop *api_nh;
545 struct nexthop *nexthop;
546 uint8_t count = 0;
547 afi_t afi;
548 size_t stream_size =
549 MAX(ZEBRA_MAX_PACKET_SIZ, sizeof(struct zapi_route));
550
551 memset(&api, 0, sizeof(api));
552 api.vrf_id = re->vrf_id;
553 api.type = re->type;
554 api.safi = SAFI_UNICAST;
555 api.instance = re->instance;
556 api.flags = re->flags;
557
558 afi = family2afi(p->family);
559 switch (afi) {
560 case AFI_IP:
561 if (cmd == ZEBRA_REDISTRIBUTE_ROUTE_ADD)
562 client->redist_v4_add_cnt++;
563 else
564 client->redist_v4_del_cnt++;
565 break;
566 case AFI_IP6:
567 if (cmd == ZEBRA_REDISTRIBUTE_ROUTE_ADD)
568 client->redist_v6_add_cnt++;
569 else
570 client->redist_v6_del_cnt++;
571 break;
572 default:
573 break;
574 }
575
576 /* Prefix. */
577 api.prefix = *p;
578 if (src_p) {
579 SET_FLAG(api.message, ZAPI_MESSAGE_SRCPFX);
580 memcpy(&api.src_prefix, src_p, sizeof(api.src_prefix));
581 }
582
583 for (nexthop = re->nhe->nhg->nexthop;
584 nexthop; nexthop = nexthop->next) {
585 if (!CHECK_FLAG(nexthop->flags, NEXTHOP_FLAG_ACTIVE))
586 continue;
587
588 api_nh = &api.nexthops[count];
589 api_nh->vrf_id = nexthop->vrf_id;
590 api_nh->type = nexthop->type;
591 api_nh->weight = nexthop->weight;
592 switch (nexthop->type) {
593 case NEXTHOP_TYPE_BLACKHOLE:
594 api_nh->bh_type = nexthop->bh_type;
595 break;
596 case NEXTHOP_TYPE_IPV4:
597 api_nh->gate.ipv4 = nexthop->gate.ipv4;
598 break;
599 case NEXTHOP_TYPE_IPV4_IFINDEX:
600 api_nh->gate.ipv4 = nexthop->gate.ipv4;
601 api_nh->ifindex = nexthop->ifindex;
602 break;
603 case NEXTHOP_TYPE_IFINDEX:
604 api_nh->ifindex = nexthop->ifindex;
605 break;
606 case NEXTHOP_TYPE_IPV6:
607 api_nh->gate.ipv6 = nexthop->gate.ipv6;
608 break;
609 case NEXTHOP_TYPE_IPV6_IFINDEX:
610 api_nh->gate.ipv6 = nexthop->gate.ipv6;
611 api_nh->ifindex = nexthop->ifindex;
612 }
613 count++;
614 }
615
616 /* Nexthops. */
617 if (count) {
618 SET_FLAG(api.message, ZAPI_MESSAGE_NEXTHOP);
619 api.nexthop_num = count;
620 }
621
622 /* Attributes. */
623 SET_FLAG(api.message, ZAPI_MESSAGE_DISTANCE);
624 api.distance = re->distance;
625 SET_FLAG(api.message, ZAPI_MESSAGE_METRIC);
626 api.metric = re->metric;
627 if (re->tag) {
628 SET_FLAG(api.message, ZAPI_MESSAGE_TAG);
629 api.tag = re->tag;
630 }
631 SET_FLAG(api.message, ZAPI_MESSAGE_MTU);
632 api.mtu = re->mtu;
633
634 struct stream *s = stream_new(stream_size);
635
636 /* Encode route and send. */
637 if (zapi_route_encode(cmd, s, &api) < 0) {
638 stream_free(s);
639 return -1;
640 }
641
642 if (IS_ZEBRA_DEBUG_SEND) {
643 char buf_prefix[PREFIX_STRLEN];
644
645 prefix2str(&api.prefix, buf_prefix, sizeof(buf_prefix));
646
647 zlog_debug("%s: %s to client %s: type %s, vrf_id %d, p %s",
648 __func__, zserv_command_string(cmd),
649 zebra_route_string(client->proto),
650 zebra_route_string(api.type), api.vrf_id,
651 buf_prefix);
652 }
653 return zserv_send_message(client, s);
654 }
655
656 /*
657 * Modified version of zsend_ipv4_nexthop_lookup(): Query unicast rib if
658 * nexthop is not found on mrib. Returns both route metric and protocol
659 * distance.
660 */
661 static int zsend_ipv4_nexthop_lookup_mrib(struct zserv *client,
662 struct in_addr addr,
663 struct route_entry *re,
664 struct zebra_vrf *zvrf)
665 {
666 struct stream *s;
667 unsigned long nump;
668 uint8_t num;
669 struct nexthop *nexthop;
670
671 /* Get output stream. */
672 s = stream_new(ZEBRA_MAX_PACKET_SIZ);
673 stream_reset(s);
674
675 /* Fill in result. */
676 zclient_create_header(s, ZEBRA_IPV4_NEXTHOP_LOOKUP_MRIB, zvrf_id(zvrf));
677 stream_put_in_addr(s, &addr);
678
679 if (re) {
680 stream_putc(s, re->distance);
681 stream_putl(s, re->metric);
682 num = 0;
683 /* remember position for nexthop_num */
684 nump = stream_get_endp(s);
685 /* reserve room for nexthop_num */
686 stream_putc(s, 0);
687 /*
688 * Only non-recursive routes are elegible to resolve the
689 * nexthop we are looking up. Therefore, we will just iterate
690 * over the top chain of nexthops.
691 */
692 for (nexthop = re->nhe->nhg->nexthop; nexthop;
693 nexthop = nexthop->next)
694 if (CHECK_FLAG(nexthop->flags, NEXTHOP_FLAG_ACTIVE))
695 num += zserv_encode_nexthop(s, nexthop);
696
697 /* store nexthop_num */
698 stream_putc_at(s, nump, num);
699 } else {
700 stream_putc(s, 0); /* distance */
701 stream_putl(s, 0); /* metric */
702 stream_putc(s, 0); /* nexthop_num */
703 }
704
705 stream_putw_at(s, 0, stream_get_endp(s));
706
707 return zserv_send_message(client, s);
708 }
709
710 /*
711 * Common utility send route notification, called from a path using a
712 * route_entry and from a path using a dataplane context.
713 */
714 static int route_notify_internal(const struct prefix *p, int type,
715 uint16_t instance, vrf_id_t vrf_id,
716 uint32_t table_id,
717 enum zapi_route_notify_owner note)
718 {
719 struct zserv *client;
720 struct stream *s;
721 uint8_t blen;
722
723 client = zserv_find_client(type, instance);
724 if (!client || !client->notify_owner) {
725 if (IS_ZEBRA_DEBUG_PACKET) {
726 char buff[PREFIX_STRLEN];
727
728 zlog_debug(
729 "Not Notifying Owner: %u about prefix %s(%u) %d vrf: %u",
730 type, prefix2str(p, buff, sizeof(buff)),
731 table_id, note, vrf_id);
732 }
733 return 0;
734 }
735
736 if (IS_ZEBRA_DEBUG_PACKET) {
737 char buff[PREFIX_STRLEN];
738
739 zlog_debug("Notifying Owner: %u about prefix %s(%u) %d vrf: %u",
740 type, prefix2str(p, buff, sizeof(buff)),
741 table_id, note, vrf_id);
742 }
743
744 s = stream_new(ZEBRA_MAX_PACKET_SIZ);
745 stream_reset(s);
746
747 zclient_create_header(s, ZEBRA_ROUTE_NOTIFY_OWNER, vrf_id);
748
749 stream_put(s, &note, sizeof(note));
750
751 stream_putc(s, p->family);
752
753 blen = prefix_blen(p);
754 stream_putc(s, p->prefixlen);
755 stream_put(s, &p->u.prefix, blen);
756
757 stream_putl(s, table_id);
758
759 stream_putw_at(s, 0, stream_get_endp(s));
760
761 return zserv_send_message(client, s);
762 }
763
764 int zsend_route_notify_owner(struct route_entry *re, const struct prefix *p,
765 enum zapi_route_notify_owner note)
766 {
767 return (route_notify_internal(p, re->type, re->instance, re->vrf_id,
768 re->table, note));
769 }
770
771 /*
772 * Route-owner notification using info from dataplane update context.
773 */
774 int zsend_route_notify_owner_ctx(const struct zebra_dplane_ctx *ctx,
775 enum zapi_route_notify_owner note)
776 {
777 return (route_notify_internal(dplane_ctx_get_dest(ctx),
778 dplane_ctx_get_type(ctx),
779 dplane_ctx_get_instance(ctx),
780 dplane_ctx_get_vrf(ctx),
781 dplane_ctx_get_table(ctx),
782 note));
783 }
784
785 void zsend_rule_notify_owner(struct zebra_pbr_rule *rule,
786 enum zapi_rule_notify_owner note)
787 {
788 struct listnode *node;
789 struct zserv *client;
790 struct stream *s;
791
792 if (IS_ZEBRA_DEBUG_PACKET)
793 zlog_debug("%s: Notifying %u", __PRETTY_FUNCTION__,
794 rule->rule.unique);
795
796 for (ALL_LIST_ELEMENTS_RO(zrouter.client_list, node, client)) {
797 if (rule->sock == client->sock)
798 break;
799 }
800
801 if (!client)
802 return;
803
804 s = stream_new(ZEBRA_MAX_PACKET_SIZ);
805
806 zclient_create_header(s, ZEBRA_RULE_NOTIFY_OWNER, VRF_DEFAULT);
807 stream_put(s, &note, sizeof(note));
808 stream_putl(s, rule->rule.seq);
809 stream_putl(s, rule->rule.priority);
810 stream_putl(s, rule->rule.unique);
811 stream_putl(s, rule->rule.ifindex);
812
813 stream_putw_at(s, 0, stream_get_endp(s));
814
815 zserv_send_message(client, s);
816 }
817
818 void zsend_ipset_notify_owner(struct zebra_pbr_ipset *ipset,
819 enum zapi_ipset_notify_owner note)
820 {
821 struct listnode *node;
822 struct zserv *client;
823 struct stream *s;
824
825 if (IS_ZEBRA_DEBUG_PACKET)
826 zlog_debug("%s: Notifying %u", __PRETTY_FUNCTION__,
827 ipset->unique);
828
829 for (ALL_LIST_ELEMENTS_RO(zrouter.client_list, node, client)) {
830 if (ipset->sock == client->sock)
831 break;
832 }
833
834 if (!client)
835 return;
836
837 s = stream_new(ZEBRA_MAX_PACKET_SIZ);
838
839 zclient_create_header(s, ZEBRA_IPSET_NOTIFY_OWNER, VRF_DEFAULT);
840 stream_put(s, &note, sizeof(note));
841 stream_putl(s, ipset->unique);
842 stream_put(s, ipset->ipset_name, ZEBRA_IPSET_NAME_SIZE);
843 stream_putw_at(s, 0, stream_get_endp(s));
844
845 zserv_send_message(client, s);
846 }
847
848 void zsend_ipset_entry_notify_owner(struct zebra_pbr_ipset_entry *ipset,
849 enum zapi_ipset_entry_notify_owner note)
850 {
851 struct listnode *node;
852 struct zserv *client;
853 struct stream *s;
854
855 if (IS_ZEBRA_DEBUG_PACKET)
856 zlog_debug("%s: Notifying %u", __PRETTY_FUNCTION__,
857 ipset->unique);
858
859 for (ALL_LIST_ELEMENTS_RO(zrouter.client_list, node, client)) {
860 if (ipset->sock == client->sock)
861 break;
862 }
863
864 if (!client)
865 return;
866
867 s = stream_new(ZEBRA_MAX_PACKET_SIZ);
868
869 zclient_create_header(s, ZEBRA_IPSET_ENTRY_NOTIFY_OWNER, VRF_DEFAULT);
870 stream_put(s, &note, sizeof(note));
871 stream_putl(s, ipset->unique);
872 stream_put(s, ipset->backpointer->ipset_name, ZEBRA_IPSET_NAME_SIZE);
873 stream_putw_at(s, 0, stream_get_endp(s));
874
875 zserv_send_message(client, s);
876 }
877
878 void zsend_iptable_notify_owner(struct zebra_pbr_iptable *iptable,
879 enum zapi_iptable_notify_owner note)
880 {
881 struct listnode *node;
882 struct zserv *client;
883 struct stream *s;
884
885 if (IS_ZEBRA_DEBUG_PACKET)
886 zlog_debug("%s: Notifying %u", __PRETTY_FUNCTION__,
887 iptable->unique);
888
889 for (ALL_LIST_ELEMENTS_RO(zrouter.client_list, node, client)) {
890 if (iptable->sock == client->sock)
891 break;
892 }
893
894 if (!client)
895 return;
896
897 s = stream_new(ZEBRA_MAX_PACKET_SIZ);
898
899 zclient_create_header(s, ZEBRA_IPTABLE_NOTIFY_OWNER, VRF_DEFAULT);
900 stream_put(s, &note, sizeof(note));
901 stream_putl(s, iptable->unique);
902 stream_putw_at(s, 0, stream_get_endp(s));
903
904 zserv_send_message(client, s);
905 }
906
907 /* Router-id is updated. Send ZEBRA_ROUTER_ID_ADD to client. */
908 int zsend_router_id_update(struct zserv *client, struct prefix *p,
909 vrf_id_t vrf_id)
910 {
911 int blen;
912
913 /* Check this client need interface information. */
914 if (!vrf_bitmap_check(client->ridinfo, vrf_id))
915 return 0;
916
917 struct stream *s = stream_new(ZEBRA_MAX_PACKET_SIZ);
918
919 /* Message type. */
920 zclient_create_header(s, ZEBRA_ROUTER_ID_UPDATE, vrf_id);
921
922 /* Prefix information. */
923 stream_putc(s, p->family);
924 blen = prefix_blen(p);
925 stream_put(s, &p->u.prefix, blen);
926 stream_putc(s, p->prefixlen);
927
928 /* Write packet size. */
929 stream_putw_at(s, 0, stream_get_endp(s));
930
931 return zserv_send_message(client, s);
932 }
933
934 /*
935 * Function used by Zebra to send a PW status update to LDP daemon
936 */
937 int zsend_pw_update(struct zserv *client, struct zebra_pw *pw)
938 {
939 struct stream *s = stream_new(ZEBRA_MAX_PACKET_SIZ);
940
941 zclient_create_header(s, ZEBRA_PW_STATUS_UPDATE, pw->vrf_id);
942 stream_write(s, pw->ifname, IF_NAMESIZE);
943 stream_putl(s, pw->ifindex);
944 stream_putl(s, pw->status);
945
946 /* Put length at the first point of the stream. */
947 stream_putw_at(s, 0, stream_get_endp(s));
948
949 return zserv_send_message(client, s);
950 }
951
952 /* Send response to a get label chunk request to client */
953 int zsend_assign_label_chunk_response(struct zserv *client, vrf_id_t vrf_id,
954 uint8_t proto, uint16_t instance,
955 struct label_manager_chunk *lmc)
956 {
957 int ret;
958 struct stream *s = stream_new(ZEBRA_MAX_PACKET_SIZ);
959
960 zclient_create_header(s, ZEBRA_GET_LABEL_CHUNK, vrf_id);
961 /* proto */
962 stream_putc(s, proto);
963 /* instance */
964 stream_putw(s, instance);
965
966 if (lmc) {
967 /* keep */
968 stream_putc(s, lmc->keep);
969 /* start and end labels */
970 stream_putl(s, lmc->start);
971 stream_putl(s, lmc->end);
972 }
973
974 /* Write packet size. */
975 stream_putw_at(s, 0, stream_get_endp(s));
976
977 ret = writen(client->sock, s->data, stream_get_endp(s));
978 stream_free(s);
979 return ret;
980 }
981
982 /* Send response to a label manager connect request to client */
983 int zsend_label_manager_connect_response(struct zserv *client, vrf_id_t vrf_id,
984 unsigned short result)
985 {
986 int ret;
987 struct stream *s = stream_new(ZEBRA_MAX_PACKET_SIZ);
988
989 zclient_create_header(s, ZEBRA_LABEL_MANAGER_CONNECT, vrf_id);
990
991 /* proto */
992 stream_putc(s, client->proto);
993
994 /* instance */
995 stream_putw(s, client->instance);
996
997 /* result */
998 stream_putc(s, result);
999
1000 /* Write packet size. */
1001 stream_putw_at(s, 0, stream_get_endp(s));
1002
1003 ret = writen(client->sock, s->data, stream_get_endp(s));
1004 stream_free(s);
1005
1006 return ret;
1007 }
1008
1009 /* Send response to a get table chunk request to client */
1010 static int zsend_assign_table_chunk_response(struct zserv *client,
1011 vrf_id_t vrf_id,
1012 struct table_manager_chunk *tmc)
1013 {
1014 struct stream *s = stream_new(ZEBRA_MAX_PACKET_SIZ);
1015
1016 zclient_create_header(s, ZEBRA_GET_TABLE_CHUNK, vrf_id);
1017
1018 if (tmc) {
1019 /* start and end labels */
1020 stream_putl(s, tmc->start);
1021 stream_putl(s, tmc->end);
1022 }
1023
1024 /* Write packet size. */
1025 stream_putw_at(s, 0, stream_get_endp(s));
1026
1027 return zserv_send_message(client, s);
1028 }
1029
1030 static int zsend_table_manager_connect_response(struct zserv *client,
1031 vrf_id_t vrf_id,
1032 uint16_t result)
1033 {
1034 struct stream *s = stream_new(ZEBRA_MAX_PACKET_SIZ);
1035
1036 zclient_create_header(s, ZEBRA_TABLE_MANAGER_CONNECT, vrf_id);
1037
1038 /* result */
1039 stream_putc(s, result);
1040
1041 stream_putw_at(s, 0, stream_get_endp(s));
1042
1043 return zserv_send_message(client, s);
1044 }
1045
1046 /* Inbound message handling ------------------------------------------------ */
1047
1048 const int cmd2type[] = {
1049 [ZEBRA_NEXTHOP_REGISTER] = RNH_NEXTHOP_TYPE,
1050 [ZEBRA_NEXTHOP_UNREGISTER] = RNH_NEXTHOP_TYPE,
1051 [ZEBRA_IMPORT_ROUTE_REGISTER] = RNH_IMPORT_CHECK_TYPE,
1052 [ZEBRA_IMPORT_ROUTE_UNREGISTER] = RNH_IMPORT_CHECK_TYPE,
1053 };
1054
1055 /* Nexthop register */
1056 static void zread_rnh_register(ZAPI_HANDLER_ARGS)
1057 {
1058 struct rnh *rnh;
1059 struct stream *s;
1060 struct prefix p;
1061 unsigned short l = 0;
1062 uint8_t flags = 0;
1063 uint16_t type = cmd2type[hdr->command];
1064 bool exist;
1065 bool flag_changed = false;
1066 uint8_t orig_flags;
1067
1068 if (IS_ZEBRA_DEBUG_NHT)
1069 zlog_debug(
1070 "rnh_register msg from client %s: hdr->length=%d, type=%s vrf=%u\n",
1071 zebra_route_string(client->proto), hdr->length,
1072 (type == RNH_NEXTHOP_TYPE) ? "nexthop" : "route",
1073 zvrf->vrf->vrf_id);
1074
1075 s = msg;
1076
1077 client->nh_reg_time = monotime(NULL);
1078
1079 while (l < hdr->length) {
1080 STREAM_GETC(s, flags);
1081 STREAM_GETW(s, p.family);
1082 STREAM_GETC(s, p.prefixlen);
1083 l += 4;
1084 if (p.family == AF_INET) {
1085 client->v4_nh_watch_add_cnt++;
1086 if (p.prefixlen > IPV4_MAX_BITLEN) {
1087 zlog_debug(
1088 "%s: Specified prefix hdr->length %d is too large for a v4 address",
1089 __PRETTY_FUNCTION__, p.prefixlen);
1090 return;
1091 }
1092 STREAM_GET(&p.u.prefix4.s_addr, s, IPV4_MAX_BYTELEN);
1093 l += IPV4_MAX_BYTELEN;
1094 } else if (p.family == AF_INET6) {
1095 client->v6_nh_watch_add_cnt++;
1096 if (p.prefixlen > IPV6_MAX_BITLEN) {
1097 zlog_debug(
1098 "%s: Specified prefix hdr->length %d is to large for a v6 address",
1099 __PRETTY_FUNCTION__, p.prefixlen);
1100 return;
1101 }
1102 STREAM_GET(&p.u.prefix6, s, IPV6_MAX_BYTELEN);
1103 l += IPV6_MAX_BYTELEN;
1104 } else {
1105 flog_err(
1106 EC_ZEBRA_UNKNOWN_FAMILY,
1107 "rnh_register: Received unknown family type %d\n",
1108 p.family);
1109 return;
1110 }
1111 rnh = zebra_add_rnh(&p, zvrf_id(zvrf), type, &exist);
1112 if (!rnh)
1113 return;
1114
1115 orig_flags = rnh->flags;
1116 if (type == RNH_NEXTHOP_TYPE) {
1117 if (flags
1118 && !CHECK_FLAG(rnh->flags, ZEBRA_NHT_CONNECTED))
1119 SET_FLAG(rnh->flags, ZEBRA_NHT_CONNECTED);
1120 else if (!flags
1121 && CHECK_FLAG(rnh->flags, ZEBRA_NHT_CONNECTED))
1122 UNSET_FLAG(rnh->flags, ZEBRA_NHT_CONNECTED);
1123 } else if (type == RNH_IMPORT_CHECK_TYPE) {
1124 if (flags
1125 && !CHECK_FLAG(rnh->flags, ZEBRA_NHT_EXACT_MATCH))
1126 SET_FLAG(rnh->flags, ZEBRA_NHT_EXACT_MATCH);
1127 else if (!flags
1128 && CHECK_FLAG(rnh->flags,
1129 ZEBRA_NHT_EXACT_MATCH))
1130 UNSET_FLAG(rnh->flags, ZEBRA_NHT_EXACT_MATCH);
1131 }
1132
1133 if (orig_flags != rnh->flags)
1134 flag_changed = true;
1135
1136 /* Anything not AF_INET/INET6 has been filtered out above */
1137 if (!exist || flag_changed)
1138 zebra_evaluate_rnh(zvrf, family2afi(p.family), 1, type,
1139 &p);
1140
1141 zebra_add_rnh_client(rnh, client, type, zvrf_id(zvrf));
1142 }
1143
1144 stream_failure:
1145 return;
1146 }
1147
1148 /* Nexthop register */
1149 static void zread_rnh_unregister(ZAPI_HANDLER_ARGS)
1150 {
1151 struct rnh *rnh;
1152 struct stream *s;
1153 struct prefix p;
1154 unsigned short l = 0;
1155 uint16_t type = cmd2type[hdr->command];
1156
1157 if (IS_ZEBRA_DEBUG_NHT)
1158 zlog_debug(
1159 "rnh_unregister msg from client %s: hdr->length=%d vrf: %u\n",
1160 zebra_route_string(client->proto), hdr->length,
1161 zvrf->vrf->vrf_id);
1162
1163 s = msg;
1164
1165 while (l < hdr->length) {
1166 uint8_t flags;
1167
1168 STREAM_GETC(s, flags);
1169 if (flags != 0)
1170 goto stream_failure;
1171
1172 STREAM_GETW(s, p.family);
1173 STREAM_GETC(s, p.prefixlen);
1174 l += 4;
1175 if (p.family == AF_INET) {
1176 client->v4_nh_watch_rem_cnt++;
1177 if (p.prefixlen > IPV4_MAX_BITLEN) {
1178 zlog_debug(
1179 "%s: Specified prefix hdr->length %d is to large for a v4 address",
1180 __PRETTY_FUNCTION__, p.prefixlen);
1181 return;
1182 }
1183 STREAM_GET(&p.u.prefix4.s_addr, s, IPV4_MAX_BYTELEN);
1184 l += IPV4_MAX_BYTELEN;
1185 } else if (p.family == AF_INET6) {
1186 client->v6_nh_watch_rem_cnt++;
1187 if (p.prefixlen > IPV6_MAX_BITLEN) {
1188 zlog_debug(
1189 "%s: Specified prefix hdr->length %d is to large for a v6 address",
1190 __PRETTY_FUNCTION__, p.prefixlen);
1191 return;
1192 }
1193 STREAM_GET(&p.u.prefix6, s, IPV6_MAX_BYTELEN);
1194 l += IPV6_MAX_BYTELEN;
1195 } else {
1196 flog_err(
1197 EC_ZEBRA_UNKNOWN_FAMILY,
1198 "rnh_register: Received unknown family type %d\n",
1199 p.family);
1200 return;
1201 }
1202 rnh = zebra_lookup_rnh(&p, zvrf_id(zvrf), type);
1203 if (rnh) {
1204 client->nh_dereg_time = monotime(NULL);
1205 zebra_remove_rnh_client(rnh, client, type);
1206 }
1207 }
1208 stream_failure:
1209 return;
1210 }
1211
1212 #define ZEBRA_MIN_FEC_LENGTH 5
1213
1214 /* FEC register */
1215 static void zread_fec_register(ZAPI_HANDLER_ARGS)
1216 {
1217 struct stream *s;
1218 unsigned short l = 0;
1219 struct prefix p;
1220 uint16_t flags;
1221 uint32_t label = MPLS_INVALID_LABEL;
1222 uint32_t label_index = MPLS_INVALID_LABEL_INDEX;
1223
1224 s = msg;
1225 zvrf = vrf_info_lookup(VRF_DEFAULT);
1226 if (!zvrf)
1227 return;
1228
1229 /*
1230 * The minimum amount of data that can be sent for one fec
1231 * registration
1232 */
1233 if (hdr->length < ZEBRA_MIN_FEC_LENGTH) {
1234 flog_err(
1235 EC_ZEBRA_IRDP_LEN_MISMATCH,
1236 "fec_register: Received a fec register of hdr->length %d, it is of insufficient size to properly decode",
1237 hdr->length);
1238 return;
1239 }
1240
1241 while (l < hdr->length) {
1242 STREAM_GETW(s, flags);
1243 memset(&p, 0, sizeof(p));
1244 STREAM_GETW(s, p.family);
1245 if (p.family != AF_INET && p.family != AF_INET6) {
1246 flog_err(
1247 EC_ZEBRA_UNKNOWN_FAMILY,
1248 "fec_register: Received unknown family type %d\n",
1249 p.family);
1250 return;
1251 }
1252 STREAM_GETC(s, p.prefixlen);
1253 if ((p.family == AF_INET && p.prefixlen > IPV4_MAX_BITLEN)
1254 || (p.family == AF_INET6
1255 && p.prefixlen > IPV6_MAX_BITLEN)) {
1256 zlog_debug(
1257 "%s: Specified prefix hdr->length: %d is to long for %d",
1258 __PRETTY_FUNCTION__, p.prefixlen, p.family);
1259 return;
1260 }
1261 l += 5;
1262 STREAM_GET(&p.u.prefix, s, PSIZE(p.prefixlen));
1263 l += PSIZE(p.prefixlen);
1264 if (flags & ZEBRA_FEC_REGISTER_LABEL) {
1265 STREAM_GETL(s, label);
1266 l += 4;
1267 } else if (flags & ZEBRA_FEC_REGISTER_LABEL_INDEX) {
1268 STREAM_GETL(s, label_index);
1269 l += 4;
1270 }
1271
1272 zebra_mpls_fec_register(zvrf, &p, label, label_index, client);
1273 }
1274
1275 stream_failure:
1276 return;
1277 }
1278
1279 /* FEC unregister */
1280 static void zread_fec_unregister(ZAPI_HANDLER_ARGS)
1281 {
1282 struct stream *s;
1283 unsigned short l = 0;
1284 struct prefix p;
1285 uint16_t flags;
1286
1287 s = msg;
1288 zvrf = vrf_info_lookup(VRF_DEFAULT);
1289 if (!zvrf)
1290 return;
1291
1292 /*
1293 * The minimum amount of data that can be sent for one
1294 * fec unregistration
1295 */
1296 if (hdr->length < ZEBRA_MIN_FEC_LENGTH) {
1297 flog_err(
1298 EC_ZEBRA_IRDP_LEN_MISMATCH,
1299 "fec_unregister: Received a fec unregister of hdr->length %d, it is of insufficient size to properly decode",
1300 hdr->length);
1301 return;
1302 }
1303
1304 while (l < hdr->length) {
1305 STREAM_GETW(s, flags);
1306 if (flags != 0)
1307 goto stream_failure;
1308
1309 memset(&p, 0, sizeof(p));
1310 STREAM_GETW(s, p.family);
1311 if (p.family != AF_INET && p.family != AF_INET6) {
1312 flog_err(
1313 EC_ZEBRA_UNKNOWN_FAMILY,
1314 "fec_unregister: Received unknown family type %d\n",
1315 p.family);
1316 return;
1317 }
1318 STREAM_GETC(s, p.prefixlen);
1319 if ((p.family == AF_INET && p.prefixlen > IPV4_MAX_BITLEN)
1320 || (p.family == AF_INET6
1321 && p.prefixlen > IPV6_MAX_BITLEN)) {
1322 zlog_debug(
1323 "%s: Received prefix hdr->length %d which is greater than %d can support",
1324 __PRETTY_FUNCTION__, p.prefixlen, p.family);
1325 return;
1326 }
1327 l += 5;
1328 STREAM_GET(&p.u.prefix, s, PSIZE(p.prefixlen));
1329 l += PSIZE(p.prefixlen);
1330 zebra_mpls_fec_unregister(zvrf, &p, client);
1331 }
1332
1333 stream_failure:
1334 return;
1335 }
1336
1337
1338 /*
1339 * Register zebra server interface information.
1340 * Send current all interface and address information.
1341 */
1342 static void zread_interface_add(ZAPI_HANDLER_ARGS)
1343 {
1344 struct vrf *vrf;
1345 struct interface *ifp;
1346
1347 RB_FOREACH (vrf, vrf_id_head, &vrfs_by_id) {
1348 FOR_ALL_INTERFACES (vrf, ifp) {
1349 /* Skip pseudo interface. */
1350 if (!CHECK_FLAG(ifp->status, ZEBRA_INTERFACE_ACTIVE))
1351 continue;
1352
1353 zsend_interface_add(client, ifp);
1354 zsend_interface_link_params(client, ifp);
1355 zsend_interface_addresses(client, ifp);
1356 }
1357 }
1358 }
1359
1360 /* Unregister zebra server interface information. */
1361 static void zread_interface_delete(ZAPI_HANDLER_ARGS)
1362 {
1363 }
1364
1365 /*
1366 * Handle message requesting interface be set up or down.
1367 */
1368 static void zread_interface_set_protodown(ZAPI_HANDLER_ARGS)
1369 {
1370 ifindex_t ifindex;
1371 struct interface *ifp;
1372 char down;
1373
1374 STREAM_GETL(msg, ifindex);
1375 STREAM_GETC(msg, down);
1376
1377 /* set ifdown */
1378 ifp = if_lookup_by_index_per_ns(zebra_ns_lookup(NS_DEFAULT), ifindex);
1379
1380 if (ifp) {
1381 zlog_info("Setting interface %s (%u): protodown %s", ifp->name,
1382 ifindex, down ? "on" : "off");
1383 zebra_if_set_protodown(ifp, down);
1384 } else {
1385 zlog_warn(
1386 "Cannot set protodown %s for interface %u; does not exist",
1387 down ? "on" : "off", ifindex);
1388 }
1389
1390
1391 stream_failure:
1392 return;
1393 }
1394
1395
1396 void zserv_nexthop_num_warn(const char *caller, const struct prefix *p,
1397 const unsigned int nexthop_num)
1398 {
1399 if (nexthop_num > zrouter.multipath_num) {
1400 char buff[PREFIX2STR_BUFFER];
1401
1402 prefix2str(p, buff, sizeof(buff));
1403 flog_warn(
1404 EC_ZEBRA_MORE_NH_THAN_MULTIPATH,
1405 "%s: Prefix %s has %d nexthops, but we can only use the first %d",
1406 caller, buff, nexthop_num, zrouter.multipath_num);
1407 }
1408 }
1409
1410 static void zread_route_add(ZAPI_HANDLER_ARGS)
1411 {
1412 struct stream *s;
1413 struct zapi_route api;
1414 struct zapi_nexthop *api_nh;
1415 afi_t afi;
1416 struct prefix_ipv6 *src_p = NULL;
1417 struct route_entry *re;
1418 struct nexthop *nexthop = NULL;
1419 struct nexthop_group *ng = NULL;
1420 int i, ret;
1421 vrf_id_t vrf_id;
1422 struct ipaddr vtep_ip;
1423 struct interface *ifp;
1424
1425 s = msg;
1426 if (zapi_route_decode(s, &api) < 0) {
1427 if (IS_ZEBRA_DEBUG_RECV)
1428 zlog_debug("%s: Unable to decode zapi_route sent",
1429 __PRETTY_FUNCTION__);
1430 return;
1431 }
1432
1433 if (IS_ZEBRA_DEBUG_RECV) {
1434 char buf_prefix[PREFIX_STRLEN];
1435
1436 prefix2str(&api.prefix, buf_prefix, sizeof(buf_prefix));
1437 zlog_debug("%s: p=%s, flags=0x%x",
1438 __func__, buf_prefix, api.flags);
1439 }
1440
1441 /* Allocate new route. */
1442 vrf_id = zvrf_id(zvrf);
1443 re = XCALLOC(MTYPE_RE, sizeof(struct route_entry));
1444 re->type = api.type;
1445 re->instance = api.instance;
1446 re->flags = api.flags;
1447 re->uptime = monotime(NULL);
1448 re->vrf_id = vrf_id;
1449
1450 if (api.tableid)
1451 re->table = api.tableid;
1452 else
1453 re->table = zvrf->table_id;
1454
1455 if (!CHECK_FLAG(api.message, ZAPI_MESSAGE_NEXTHOP)
1456 || api.nexthop_num == 0) {
1457 flog_warn(EC_ZEBRA_RX_ROUTE_NO_NEXTHOPS,
1458 "%s: received a route without nexthops for prefix %pFX from client %s",
1459 __func__, &api.prefix,
1460 zebra_route_string(client->proto));
1461
1462 XFREE(MTYPE_RE, re);
1463 return;
1464 }
1465
1466 /* Use temporary list of nexthops */
1467 ng = nexthop_group_new();
1468
1469 /*
1470 * TBD should _all_ of the nexthop add operations use
1471 * api_nh->vrf_id instead of re->vrf_id ? I only changed
1472 * for cases NEXTHOP_TYPE_IPV4 and NEXTHOP_TYPE_IPV6.
1473 */
1474 for (i = 0; i < api.nexthop_num; i++) {
1475 api_nh = &api.nexthops[i];
1476 ifindex_t ifindex = 0;
1477
1478 nexthop = NULL;
1479
1480 if (IS_ZEBRA_DEBUG_RECV)
1481 zlog_debug("nh type %d", api_nh->type);
1482
1483 switch (api_nh->type) {
1484 case NEXTHOP_TYPE_IFINDEX:
1485 nexthop = nexthop_from_ifindex(api_nh->ifindex,
1486 api_nh->vrf_id);
1487 break;
1488 case NEXTHOP_TYPE_IPV4:
1489 if (IS_ZEBRA_DEBUG_RECV) {
1490 char nhbuf[INET6_ADDRSTRLEN] = {0};
1491
1492 inet_ntop(AF_INET, &api_nh->gate.ipv4, nhbuf,
1493 INET6_ADDRSTRLEN);
1494 zlog_debug("%s: nh=%s, vrf_id=%d", __func__,
1495 nhbuf, api_nh->vrf_id);
1496 }
1497 nexthop = nexthop_from_ipv4(&api_nh->gate.ipv4,
1498 NULL, api_nh->vrf_id);
1499 break;
1500 case NEXTHOP_TYPE_IPV4_IFINDEX:
1501
1502 memset(&vtep_ip, 0, sizeof(struct ipaddr));
1503 ifindex = api_nh->ifindex;
1504 if (IS_ZEBRA_DEBUG_RECV) {
1505 char nhbuf[INET6_ADDRSTRLEN] = {0};
1506
1507 inet_ntop(AF_INET, &api_nh->gate.ipv4, nhbuf,
1508 INET6_ADDRSTRLEN);
1509 zlog_debug(
1510 "%s: nh=%s, vrf_id=%d (re->vrf_id=%d), ifindex=%d",
1511 __func__, nhbuf, api_nh->vrf_id,
1512 re->vrf_id, ifindex);
1513 }
1514 nexthop = nexthop_from_ipv4_ifindex(
1515 &api_nh->gate.ipv4, NULL, ifindex,
1516 api_nh->vrf_id);
1517
1518 ifp = if_lookup_by_index(ifindex, api_nh->vrf_id);
1519 if (ifp && connected_is_unnumbered(ifp))
1520 SET_FLAG(nexthop->flags, NEXTHOP_FLAG_ONLINK);
1521 /* Special handling for IPv4 routes sourced from EVPN:
1522 * the nexthop and associated MAC need to be installed.
1523 */
1524 if (CHECK_FLAG(api.flags, ZEBRA_FLAG_EVPN_ROUTE)) {
1525 vtep_ip.ipa_type = IPADDR_V4;
1526 memcpy(&(vtep_ip.ipaddr_v4),
1527 &(api_nh->gate.ipv4),
1528 sizeof(struct in_addr));
1529 zebra_vxlan_evpn_vrf_route_add(
1530 api_nh->vrf_id, &api_nh->rmac,
1531 &vtep_ip, &api.prefix);
1532 }
1533 break;
1534 case NEXTHOP_TYPE_IPV6:
1535 nexthop = nexthop_from_ipv6(&api_nh->gate.ipv6,
1536 api_nh->vrf_id);
1537 break;
1538 case NEXTHOP_TYPE_IPV6_IFINDEX:
1539 memset(&vtep_ip, 0, sizeof(struct ipaddr));
1540 ifindex = api_nh->ifindex;
1541 nexthop = nexthop_from_ipv6_ifindex(&api_nh->gate.ipv6,
1542 ifindex,
1543 api_nh->vrf_id);
1544
1545 /* Special handling for IPv6 routes sourced from EVPN:
1546 * the nexthop and associated MAC need to be installed.
1547 */
1548 if (CHECK_FLAG(api.flags, ZEBRA_FLAG_EVPN_ROUTE)) {
1549 vtep_ip.ipa_type = IPADDR_V6;
1550 memcpy(&vtep_ip.ipaddr_v6, &(api_nh->gate.ipv6),
1551 sizeof(struct in6_addr));
1552 zebra_vxlan_evpn_vrf_route_add(
1553 api_nh->vrf_id, &api_nh->rmac,
1554 &vtep_ip, &api.prefix);
1555 }
1556 break;
1557 case NEXTHOP_TYPE_BLACKHOLE:
1558 nexthop = nexthop_from_blackhole(api_nh->bh_type);
1559 break;
1560 }
1561
1562 if (!nexthop) {
1563 flog_warn(
1564 EC_ZEBRA_NEXTHOP_CREATION_FAILED,
1565 "%s: Nexthops Specified: %d but we failed to properly create one",
1566 __PRETTY_FUNCTION__, api.nexthop_num);
1567 nexthop_group_delete(&ng);
1568 XFREE(MTYPE_RE, re);
1569 return;
1570 }
1571
1572 if (CHECK_FLAG(api_nh->flags, ZAPI_NEXTHOP_FLAG_ONLINK))
1573 SET_FLAG(nexthop->flags, NEXTHOP_FLAG_ONLINK);
1574
1575 if (CHECK_FLAG(api_nh->flags, ZAPI_NEXTHOP_FLAG_WEIGHT))
1576 nexthop->weight = api_nh->weight;
1577
1578 /* MPLS labels for BGP-LU or Segment Routing */
1579 if (CHECK_FLAG(api_nh->flags, ZAPI_NEXTHOP_FLAG_LABEL)
1580 && api_nh->type != NEXTHOP_TYPE_IFINDEX
1581 && api_nh->type != NEXTHOP_TYPE_BLACKHOLE) {
1582 enum lsp_types_t label_type;
1583
1584 label_type = lsp_type_from_re_type(client->proto);
1585
1586 if (IS_ZEBRA_DEBUG_RECV) {
1587 zlog_debug(
1588 "%s: adding %d labels of type %d (1st=%u)",
1589 __func__, api_nh->label_num, label_type,
1590 api_nh->labels[0]);
1591 }
1592
1593 nexthop_add_labels(nexthop, label_type,
1594 api_nh->label_num,
1595 &api_nh->labels[0]);
1596 }
1597
1598 /* Add new nexthop to temporary list */
1599 nexthop_group_add_sorted(ng, nexthop);
1600 }
1601
1602 if (CHECK_FLAG(api.message, ZAPI_MESSAGE_DISTANCE))
1603 re->distance = api.distance;
1604 if (CHECK_FLAG(api.message, ZAPI_MESSAGE_METRIC))
1605 re->metric = api.metric;
1606 if (CHECK_FLAG(api.message, ZAPI_MESSAGE_TAG))
1607 re->tag = api.tag;
1608 if (CHECK_FLAG(api.message, ZAPI_MESSAGE_MTU))
1609 re->mtu = api.mtu;
1610
1611 afi = family2afi(api.prefix.family);
1612 if (afi != AFI_IP6 && CHECK_FLAG(api.message, ZAPI_MESSAGE_SRCPFX)) {
1613 flog_warn(EC_ZEBRA_RX_SRCDEST_WRONG_AFI,
1614 "%s: Received SRC Prefix but afi is not v6",
1615 __PRETTY_FUNCTION__);
1616 nexthop_group_delete(&ng);
1617 XFREE(MTYPE_RE, re);
1618 return;
1619 }
1620 if (CHECK_FLAG(api.message, ZAPI_MESSAGE_SRCPFX))
1621 src_p = &api.src_prefix;
1622
1623 if (api.safi != SAFI_UNICAST && api.safi != SAFI_MULTICAST) {
1624 flog_warn(EC_LIB_ZAPI_MISSMATCH,
1625 "%s: Received safi: %d but we can only accept UNICAST or MULTICAST",
1626 __func__, api.safi);
1627 nexthop_group_delete(&ng);
1628 XFREE(MTYPE_RE, re);
1629 return;
1630 }
1631 ret = rib_add_multipath(afi, api.safi, &api.prefix, src_p, re, ng);
1632
1633 /* Stats */
1634 switch (api.prefix.family) {
1635 case AF_INET:
1636 if (ret > 0)
1637 client->v4_route_add_cnt++;
1638 else if (ret < 0)
1639 client->v4_route_upd8_cnt++;
1640 break;
1641 case AF_INET6:
1642 if (ret > 0)
1643 client->v6_route_add_cnt++;
1644 else if (ret < 0)
1645 client->v6_route_upd8_cnt++;
1646 break;
1647 }
1648 }
1649
1650 static void zread_route_del(ZAPI_HANDLER_ARGS)
1651 {
1652 struct stream *s;
1653 struct zapi_route api;
1654 afi_t afi;
1655 struct prefix_ipv6 *src_p = NULL;
1656 uint32_t table_id;
1657
1658 s = msg;
1659 if (zapi_route_decode(s, &api) < 0)
1660 return;
1661
1662 afi = family2afi(api.prefix.family);
1663 if (afi != AFI_IP6 && CHECK_FLAG(api.message, ZAPI_MESSAGE_SRCPFX)) {
1664 flog_warn(EC_ZEBRA_RX_SRCDEST_WRONG_AFI,
1665 "%s: Received a src prefix while afi is not v6",
1666 __PRETTY_FUNCTION__);
1667 return;
1668 }
1669 if (CHECK_FLAG(api.message, ZAPI_MESSAGE_SRCPFX))
1670 src_p = &api.src_prefix;
1671
1672 if (api.tableid)
1673 table_id = api.tableid;
1674 else
1675 table_id = zvrf->table_id;
1676
1677 rib_delete(afi, api.safi, zvrf_id(zvrf), api.type, api.instance,
1678 api.flags, &api.prefix, src_p, NULL, 0, table_id, api.metric,
1679 api.distance, false);
1680
1681 /* Stats */
1682 switch (api.prefix.family) {
1683 case AF_INET:
1684 client->v4_route_del_cnt++;
1685 break;
1686 case AF_INET6:
1687 client->v6_route_del_cnt++;
1688 break;
1689 }
1690 }
1691
1692 /* MRIB Nexthop lookup for IPv4. */
1693 static void zread_ipv4_nexthop_lookup_mrib(ZAPI_HANDLER_ARGS)
1694 {
1695 struct in_addr addr;
1696 struct route_entry *re;
1697
1698 STREAM_GET(&addr.s_addr, msg, IPV4_MAX_BYTELEN);
1699 re = rib_match_ipv4_multicast(zvrf_id(zvrf), addr, NULL);
1700 zsend_ipv4_nexthop_lookup_mrib(client, addr, re, zvrf);
1701
1702 stream_failure:
1703 return;
1704 }
1705
1706 /* Register zebra server router-id information. Send current router-id */
1707 static void zread_router_id_add(ZAPI_HANDLER_ARGS)
1708 {
1709 struct prefix p;
1710
1711 /* Router-id information is needed. */
1712 vrf_bitmap_set(client->ridinfo, zvrf_id(zvrf));
1713
1714 router_id_get(&p, zvrf_id(zvrf));
1715
1716 zsend_router_id_update(client, &p, zvrf_id(zvrf));
1717 }
1718
1719 /* Unregister zebra server router-id information. */
1720 static void zread_router_id_delete(ZAPI_HANDLER_ARGS)
1721 {
1722 vrf_bitmap_unset(client->ridinfo, zvrf_id(zvrf));
1723 }
1724
1725 static void zsend_capabilities(struct zserv *client, struct zebra_vrf *zvrf)
1726 {
1727 struct stream *s = stream_new(ZEBRA_MAX_PACKET_SIZ);
1728
1729 zclient_create_header(s, ZEBRA_CAPABILITIES, zvrf->vrf->vrf_id);
1730 stream_putl(s, vrf_get_backend());
1731 stream_putc(s, mpls_enabled);
1732 stream_putl(s, zrouter.multipath_num);
1733 stream_putc(s, zebra_mlag_get_role());
1734
1735 stream_putw_at(s, 0, stream_get_endp(s));
1736 zserv_send_message(client, s);
1737 }
1738
1739 void zsend_capabilities_all_clients(void)
1740 {
1741 struct listnode *node, *nnode;
1742 struct zebra_vrf *zvrf;
1743 struct zserv *client;
1744
1745 zvrf = vrf_info_lookup(VRF_DEFAULT);
1746 for (ALL_LIST_ELEMENTS(zrouter.client_list, node, nnode, client)) {
1747 zsend_capabilities(client, zvrf);
1748 }
1749 }
1750
1751 /* Tie up route-type and client->sock */
1752 static void zread_hello(ZAPI_HANDLER_ARGS)
1753 {
1754 /* type of protocol (lib/zebra.h) */
1755 uint8_t proto;
1756 unsigned short instance;
1757 uint8_t notify;
1758
1759 STREAM_GETC(msg, proto);
1760 STREAM_GETW(msg, instance);
1761 STREAM_GETC(msg, notify);
1762 if (notify)
1763 client->notify_owner = true;
1764
1765 /* accept only dynamic routing protocols */
1766 if ((proto < ZEBRA_ROUTE_MAX) && (proto > ZEBRA_ROUTE_CONNECT)) {
1767 zlog_notice(
1768 "client %d says hello and bids fair to announce only %s routes vrf=%u",
1769 client->sock, zebra_route_string(proto),
1770 zvrf->vrf->vrf_id);
1771 if (instance)
1772 zlog_notice("client protocol instance %d", instance);
1773
1774 client->proto = proto;
1775 client->instance = instance;
1776 }
1777
1778 /* Graceful restart processing for client connect */
1779 zebra_gr_client_reconnect(client);
1780 zsend_capabilities(client, zvrf);
1781 zebra_vrf_update_all(client);
1782 stream_failure:
1783 return;
1784 }
1785
1786 /* Unregister all information in a VRF. */
1787 static void zread_vrf_unregister(ZAPI_HANDLER_ARGS)
1788 {
1789 int i;
1790 afi_t afi;
1791
1792 for (afi = AFI_IP; afi < AFI_MAX; afi++) {
1793 for (i = 0; i < ZEBRA_ROUTE_MAX; i++)
1794 vrf_bitmap_unset(client->redist[afi][i], zvrf_id(zvrf));
1795 vrf_bitmap_unset(client->redist_default[afi], zvrf_id(zvrf));
1796 }
1797 vrf_bitmap_unset(client->ridinfo, zvrf_id(zvrf));
1798 }
1799
1800 /*
1801 * Handle request to create an MPLS LSP.
1802 *
1803 * A single message can fully specify an LSP with multiple nexthops.
1804 *
1805 * When the optional ZAPI_LABELS_FTN flag is set, the specified FEC (route) is
1806 * updated to use the received label(s).
1807 */
1808 static void zread_mpls_labels_add(ZAPI_HANDLER_ARGS)
1809 {
1810 struct stream *s;
1811 struct zapi_labels zl;
1812
1813 /* Get input stream. */
1814 s = msg;
1815 if (zapi_labels_decode(s, &zl) < 0) {
1816 if (IS_ZEBRA_DEBUG_RECV)
1817 zlog_debug("%s: Unable to decode zapi_labels sent",
1818 __PRETTY_FUNCTION__);
1819 return;
1820 }
1821
1822 if (!mpls_enabled)
1823 return;
1824
1825 for (int i = 0; i < zl.nexthop_num; i++) {
1826 struct zapi_nexthop_label *znh;
1827
1828 znh = &zl.nexthops[i];
1829 mpls_lsp_install(zvrf, zl.type, zl.local_label, 1, &znh->label,
1830 znh->type, &znh->address, znh->ifindex);
1831
1832 if (CHECK_FLAG(zl.message, ZAPI_LABELS_FTN))
1833 mpls_ftn_update(1, zvrf, zl.type, &zl.route.prefix,
1834 znh->type, &znh->address, znh->ifindex,
1835 zl.route.type, zl.route.instance,
1836 znh->label);
1837 }
1838 }
1839
1840 /*
1841 * Handle request to delete an MPLS LSP.
1842 *
1843 * An LSP is identified by its type and local label. When the received message
1844 * doesn't contain any nexthop, the whole LSP is deleted. Otherwise, only the
1845 * listed LSP nexthops (aka NHLFEs) are deleted.
1846 *
1847 * When the optional ZAPI_LABELS_FTN flag is set, the labels of the specified
1848 * FEC (route) nexthops are deleted.
1849 */
1850 static void zread_mpls_labels_delete(ZAPI_HANDLER_ARGS)
1851 {
1852 struct stream *s;
1853 struct zapi_labels zl;
1854
1855 /* Get input stream. */
1856 s = msg;
1857 if (zapi_labels_decode(s, &zl) < 0) {
1858 if (IS_ZEBRA_DEBUG_RECV)
1859 zlog_debug("%s: Unable to decode zapi_labels sent",
1860 __PRETTY_FUNCTION__);
1861 return;
1862 }
1863
1864 if (!mpls_enabled)
1865 return;
1866
1867 if (zl.nexthop_num > 0) {
1868 for (int i = 0; i < zl.nexthop_num; i++) {
1869 struct zapi_nexthop_label *znh;
1870
1871 znh = &zl.nexthops[i];
1872 mpls_lsp_uninstall(zvrf, zl.type, zl.local_label,
1873 znh->type, &znh->address,
1874 znh->ifindex);
1875
1876 if (CHECK_FLAG(zl.message, ZAPI_LABELS_FTN))
1877 mpls_ftn_update(0, zvrf, zl.type,
1878 &zl.route.prefix, znh->type,
1879 &znh->address, znh->ifindex,
1880 zl.route.type,
1881 zl.route.instance, znh->label);
1882 }
1883 } else {
1884 mpls_lsp_uninstall_all_vrf(zvrf, zl.type, zl.local_label);
1885
1886 if (CHECK_FLAG(zl.message, ZAPI_LABELS_FTN))
1887 mpls_ftn_uninstall(zvrf, zl.type, &zl.route.prefix,
1888 zl.route.type, zl.route.instance);
1889 }
1890 }
1891
1892 /*
1893 * Handle request to add an MPLS LSP or change an existing one.
1894 *
1895 * A single message can fully specify an LSP with multiple nexthops.
1896 *
1897 * When the optional ZAPI_LABELS_FTN flag is set, the specified FEC (route) is
1898 * updated to use the received label(s).
1899 *
1900 * NOTE: zebra will use route replace semantics (make-before-break) to update
1901 * the LSP in the forwarding plane if that's supported by the underlying
1902 * platform.
1903 */
1904 static void zread_mpls_labels_replace(ZAPI_HANDLER_ARGS)
1905 {
1906 struct stream *s;
1907 struct zapi_labels zl;
1908
1909 /* Get input stream. */
1910 s = msg;
1911 if (zapi_labels_decode(s, &zl) < 0) {
1912 if (IS_ZEBRA_DEBUG_RECV)
1913 zlog_debug("%s: Unable to decode zapi_labels sent",
1914 __PRETTY_FUNCTION__);
1915 return;
1916 }
1917
1918 if (!mpls_enabled)
1919 return;
1920
1921 mpls_lsp_uninstall_all_vrf(zvrf, zl.type, zl.local_label);
1922 if (CHECK_FLAG(zl.message, ZAPI_LABELS_FTN))
1923 mpls_ftn_uninstall(zvrf, zl.type, &zl.route.prefix,
1924 zl.route.type, zl.route.instance);
1925
1926 for (int i = 0; i < zl.nexthop_num; i++) {
1927 struct zapi_nexthop_label *znh;
1928
1929 znh = &zl.nexthops[i];
1930 mpls_lsp_install(zvrf, zl.type, zl.local_label, 1, &znh->label,
1931 znh->type, &znh->address, znh->ifindex);
1932
1933 if (CHECK_FLAG(zl.message, ZAPI_LABELS_FTN)) {
1934 mpls_ftn_update(1, zvrf, zl.type, &zl.route.prefix,
1935 znh->type, &znh->address, znh->ifindex,
1936 zl.route.type, zl.route.instance,
1937 znh->label);
1938 }
1939 }
1940 }
1941
1942 /* Send response to a table manager connect request to client */
1943 static void zread_table_manager_connect(struct zserv *client,
1944 struct stream *msg, vrf_id_t vrf_id)
1945 {
1946 struct stream *s;
1947 uint8_t proto;
1948 uint16_t instance;
1949
1950 s = msg;
1951
1952 /* Get data. */
1953 STREAM_GETC(s, proto);
1954 STREAM_GETW(s, instance);
1955
1956 /* accept only dynamic routing protocols */
1957 if ((proto >= ZEBRA_ROUTE_MAX) || (proto <= ZEBRA_ROUTE_STATIC)) {
1958 flog_err(EC_ZEBRA_TM_WRONG_PROTO,
1959 "client %d has wrong protocol %s", client->sock,
1960 zebra_route_string(proto));
1961 zsend_table_manager_connect_response(client, vrf_id, 1);
1962 return;
1963 }
1964 zlog_notice("client %d with vrf %u instance %u connected as %s",
1965 client->sock, vrf_id, instance, zebra_route_string(proto));
1966 client->proto = proto;
1967 client->instance = instance;
1968
1969 /*
1970 * Release previous labels of same protocol and instance.
1971 * This is done in case it restarted from an unexpected shutdown.
1972 */
1973 release_daemon_table_chunks(client);
1974
1975 zsend_table_manager_connect_response(client, vrf_id, 0);
1976
1977 stream_failure:
1978 return;
1979 }
1980
1981 static void zread_label_manager_connect(struct zserv *client,
1982 struct stream *msg, vrf_id_t vrf_id)
1983 {
1984 struct stream *s;
1985 /* type of protocol (lib/zebra.h) */
1986 uint8_t proto;
1987 unsigned short instance;
1988
1989 /* Get input stream. */
1990 s = msg;
1991
1992 /* Get data. */
1993 STREAM_GETC(s, proto);
1994 STREAM_GETW(s, instance);
1995
1996 /* accept only dynamic routing protocols */
1997 if ((proto >= ZEBRA_ROUTE_MAX) || (proto <= ZEBRA_ROUTE_STATIC)) {
1998 flog_err(EC_ZEBRA_TM_WRONG_PROTO,
1999 "client %d has wrong protocol %s", client->sock,
2000 zebra_route_string(proto));
2001 zsend_label_manager_connect_response(client, vrf_id, 1);
2002 return;
2003 }
2004
2005 /* recall proto and instance in this socket */
2006 client->proto = proto;
2007 client->instance = instance;
2008
2009 /* call hook for connection using wrapper */
2010 lm_client_connect_call(proto, instance, vrf_id);
2011
2012 stream_failure:
2013 return;
2014 }
2015
2016 static void zread_get_label_chunk(struct zserv *client, struct stream *msg,
2017 vrf_id_t vrf_id)
2018 {
2019 struct stream *s;
2020 uint8_t keep;
2021 uint32_t size, base;
2022 struct label_manager_chunk *lmc = NULL;
2023 uint8_t proto;
2024 unsigned short instance;
2025
2026 /* Get input stream. */
2027 s = msg;
2028
2029 /* Get data. */
2030 STREAM_GETC(s, proto);
2031 STREAM_GETW(s, instance);
2032 STREAM_GETC(s, keep);
2033 STREAM_GETL(s, size);
2034 STREAM_GETL(s, base);
2035
2036 /* call hook to get a chunk using wrapper */
2037 lm_get_chunk_call(&lmc, proto, instance, keep, size, base, vrf_id);
2038
2039 if (!lmc)
2040 flog_err(
2041 EC_ZEBRA_LM_CANNOT_ASSIGN_CHUNK,
2042 "Unable to assign Label Chunk of size %u to %s instance %u",
2043 size, zebra_route_string(proto), instance);
2044 else
2045 if (IS_ZEBRA_DEBUG_PACKET)
2046 zlog_debug("Assigned Label Chunk %u - %u to %s instance %u",
2047 lmc->start, lmc->end,
2048 zebra_route_string(proto), instance);
2049
2050 stream_failure:
2051 return;
2052 }
2053
2054 static void zread_release_label_chunk(struct zserv *client, struct stream *msg)
2055 {
2056 struct stream *s;
2057 uint32_t start, end;
2058 uint8_t proto;
2059 unsigned short instance;
2060
2061 /* Get input stream. */
2062 s = msg;
2063
2064 /* Get data. */
2065 STREAM_GETC(s, proto);
2066 STREAM_GETW(s, instance);
2067 STREAM_GETL(s, start);
2068 STREAM_GETL(s, end);
2069
2070 /* call hook to release a chunk using wrapper */
2071 lm_release_chunk_call(proto, instance, start, end);
2072
2073 stream_failure:
2074 return;
2075 }
2076
2077 static void zread_label_manager_request(ZAPI_HANDLER_ARGS)
2078 {
2079 if (hdr->command == ZEBRA_LABEL_MANAGER_CONNECT
2080 || hdr->command == ZEBRA_LABEL_MANAGER_CONNECT_ASYNC)
2081 zread_label_manager_connect(client, msg, zvrf_id(zvrf));
2082 else {
2083 if (hdr->command == ZEBRA_GET_LABEL_CHUNK)
2084 zread_get_label_chunk(client, msg, zvrf_id(zvrf));
2085 else if (hdr->command == ZEBRA_RELEASE_LABEL_CHUNK)
2086 zread_release_label_chunk(client, msg);
2087 }
2088 }
2089
2090 static void zread_get_table_chunk(struct zserv *client, struct stream *msg,
2091 vrf_id_t vrf_id)
2092 {
2093 struct stream *s;
2094 uint32_t size;
2095 struct table_manager_chunk *tmc;
2096
2097 /* Get input stream. */
2098 s = msg;
2099
2100 /* Get data. */
2101 STREAM_GETL(s, size);
2102
2103 tmc = assign_table_chunk(client->proto, client->instance, size);
2104 if (!tmc)
2105 flog_err(EC_ZEBRA_TM_CANNOT_ASSIGN_CHUNK,
2106 "%s: Unable to assign Table Chunk of size %u",
2107 __func__, size);
2108 else
2109 zlog_debug("Assigned Table Chunk %u - %u", tmc->start,
2110 tmc->end);
2111 /* send response back */
2112 zsend_assign_table_chunk_response(client, vrf_id, tmc);
2113
2114 stream_failure:
2115 return;
2116 }
2117
2118 static void zread_release_table_chunk(struct zserv *client, struct stream *msg)
2119 {
2120 struct stream *s;
2121 uint32_t start, end;
2122
2123 /* Get input stream. */
2124 s = msg;
2125
2126 /* Get data. */
2127 STREAM_GETL(s, start);
2128 STREAM_GETL(s, end);
2129
2130 release_table_chunk(client->proto, client->instance, start, end);
2131
2132 stream_failure:
2133 return;
2134 }
2135
2136 static void zread_table_manager_request(ZAPI_HANDLER_ARGS)
2137 {
2138 /* to avoid sending other messages like ZERBA_INTERFACE_UP */
2139 if (hdr->command == ZEBRA_TABLE_MANAGER_CONNECT)
2140 zread_table_manager_connect(client, msg, zvrf_id(zvrf));
2141 else {
2142 /* Sanity: don't allow 'unidentified' requests */
2143 if (!client->proto) {
2144 flog_err(
2145 EC_ZEBRA_TM_ALIENS,
2146 "Got table request from an unidentified client");
2147 return;
2148 }
2149 if (hdr->command == ZEBRA_GET_TABLE_CHUNK)
2150 zread_get_table_chunk(client, msg, zvrf_id(zvrf));
2151 else if (hdr->command == ZEBRA_RELEASE_TABLE_CHUNK)
2152 zread_release_table_chunk(client, msg);
2153 }
2154 }
2155
2156 static void zread_pseudowire(ZAPI_HANDLER_ARGS)
2157 {
2158 struct stream *s;
2159 char ifname[IF_NAMESIZE];
2160 ifindex_t ifindex;
2161 int type;
2162 int af;
2163 union g_addr nexthop;
2164 uint32_t local_label;
2165 uint32_t remote_label;
2166 uint8_t flags;
2167 union pw_protocol_fields data;
2168 uint8_t protocol;
2169 struct zebra_pw *pw;
2170
2171 /* Get input stream. */
2172 s = msg;
2173
2174 /* Get data. */
2175 STREAM_GET(ifname, s, IF_NAMESIZE);
2176 ifname[IF_NAMESIZE - 1] = '\0';
2177 STREAM_GETL(s, ifindex);
2178 STREAM_GETL(s, type);
2179 STREAM_GETL(s, af);
2180 switch (af) {
2181 case AF_INET:
2182 STREAM_GET(&nexthop.ipv4.s_addr, s, IPV4_MAX_BYTELEN);
2183 break;
2184 case AF_INET6:
2185 STREAM_GET(&nexthop.ipv6, s, 16);
2186 break;
2187 default:
2188 return;
2189 }
2190 STREAM_GETL(s, local_label);
2191 STREAM_GETL(s, remote_label);
2192 STREAM_GETC(s, flags);
2193 STREAM_GET(&data, s, sizeof(data));
2194 protocol = client->proto;
2195
2196 pw = zebra_pw_find(zvrf, ifname);
2197 switch (hdr->command) {
2198 case ZEBRA_PW_ADD:
2199 if (pw) {
2200 flog_warn(EC_ZEBRA_PSEUDOWIRE_EXISTS,
2201 "%s: pseudowire %s already exists [%s]",
2202 __func__, ifname,
2203 zserv_command_string(hdr->command));
2204 return;
2205 }
2206
2207 zebra_pw_add(zvrf, ifname, protocol, client);
2208 break;
2209 case ZEBRA_PW_DELETE:
2210 if (!pw) {
2211 flog_warn(EC_ZEBRA_PSEUDOWIRE_NONEXISTENT,
2212 "%s: pseudowire %s not found [%s]", __func__,
2213 ifname, zserv_command_string(hdr->command));
2214 return;
2215 }
2216
2217 zebra_pw_del(zvrf, pw);
2218 break;
2219 case ZEBRA_PW_SET:
2220 case ZEBRA_PW_UNSET:
2221 if (!pw) {
2222 flog_warn(EC_ZEBRA_PSEUDOWIRE_NONEXISTENT,
2223 "%s: pseudowire %s not found [%s]", __func__,
2224 ifname, zserv_command_string(hdr->command));
2225 return;
2226 }
2227
2228 switch (hdr->command) {
2229 case ZEBRA_PW_SET:
2230 pw->enabled = 1;
2231 break;
2232 case ZEBRA_PW_UNSET:
2233 pw->enabled = 0;
2234 break;
2235 }
2236
2237 zebra_pw_change(pw, ifindex, type, af, &nexthop, local_label,
2238 remote_label, flags, &data);
2239 break;
2240 }
2241
2242 stream_failure:
2243 return;
2244 }
2245
2246 static void zread_interface_set_master(ZAPI_HANDLER_ARGS)
2247 {
2248 struct interface *master;
2249 struct interface *slave;
2250 struct stream *s = msg;
2251 int ifindex;
2252 vrf_id_t vrf_id;
2253
2254 STREAM_GETL(s, vrf_id);
2255 STREAM_GETL(s, ifindex);
2256 master = if_lookup_by_index(ifindex, vrf_id);
2257
2258 STREAM_GETL(s, vrf_id);
2259 STREAM_GETL(s, ifindex);
2260 slave = if_lookup_by_index(ifindex, vrf_id);
2261
2262 if (!master || !slave)
2263 return;
2264
2265 kernel_interface_set_master(master, slave);
2266
2267 stream_failure:
2268 return;
2269 }
2270
2271
2272 static void zread_vrf_label(ZAPI_HANDLER_ARGS)
2273 {
2274 struct interface *ifp;
2275 mpls_label_t nlabel;
2276 afi_t afi;
2277 struct stream *s;
2278 struct zebra_vrf *def_zvrf;
2279 enum lsp_types_t ltype;
2280
2281 s = msg;
2282 STREAM_GETL(s, nlabel);
2283 STREAM_GETC(s, afi);
2284
2285 if (!(IS_VALID_AFI(afi))) {
2286 zlog_warn("Invalid AFI for VRF label: %u", afi);
2287 return;
2288 }
2289
2290 if (nlabel == zvrf->label[afi]) {
2291 /*
2292 * Nothing to do here move along
2293 */
2294 return;
2295 }
2296
2297 STREAM_GETC(s, ltype);
2298
2299 if (zvrf->vrf->vrf_id != VRF_DEFAULT)
2300 ifp = if_lookup_by_name(zvrf->vrf->name, zvrf->vrf->vrf_id);
2301 else
2302 ifp = if_lookup_by_name("lo", VRF_DEFAULT);
2303
2304 if (!ifp) {
2305 zlog_debug("Unable to find specified Interface for %s",
2306 zvrf->vrf->name);
2307 return;
2308 }
2309
2310 def_zvrf = zebra_vrf_lookup_by_id(VRF_DEFAULT);
2311
2312 if (zvrf->label[afi] != MPLS_LABEL_NONE) {
2313 afi_t scrubber;
2314 bool really_remove;
2315
2316 really_remove = true;
2317 for (scrubber = AFI_IP; scrubber < AFI_MAX; scrubber++) {
2318 if (scrubber == afi)
2319 continue;
2320
2321 if (zvrf->label[scrubber] == MPLS_LABEL_NONE)
2322 continue;
2323
2324 if (zvrf->label[afi] == zvrf->label[scrubber]) {
2325 really_remove = false;
2326 break;
2327 }
2328 }
2329
2330 if (really_remove)
2331 mpls_lsp_uninstall(def_zvrf, ltype, zvrf->label[afi],
2332 NEXTHOP_TYPE_IFINDEX, NULL,
2333 ifp->ifindex);
2334 }
2335
2336 if (nlabel != MPLS_LABEL_NONE) {
2337 mpls_label_t out_label = MPLS_LABEL_IMPLICIT_NULL;
2338 mpls_lsp_install(def_zvrf, ltype, nlabel, 1, &out_label,
2339 NEXTHOP_TYPE_IFINDEX, NULL, ifp->ifindex);
2340 }
2341
2342 zvrf->label[afi] = nlabel;
2343 stream_failure:
2344 return;
2345 }
2346
2347 static inline void zread_rule(ZAPI_HANDLER_ARGS)
2348 {
2349 struct zebra_pbr_rule zpr;
2350 struct stream *s;
2351 uint32_t total, i;
2352
2353 s = msg;
2354 STREAM_GETL(s, total);
2355
2356 for (i = 0; i < total; i++) {
2357 memset(&zpr, 0, sizeof(zpr));
2358
2359 zpr.sock = client->sock;
2360 zpr.rule.vrf_id = hdr->vrf_id;
2361 STREAM_GETL(s, zpr.rule.seq);
2362 STREAM_GETL(s, zpr.rule.priority);
2363 STREAM_GETL(s, zpr.rule.unique);
2364 STREAM_GETC(s, zpr.rule.filter.src_ip.family);
2365 STREAM_GETC(s, zpr.rule.filter.src_ip.prefixlen);
2366 STREAM_GET(&zpr.rule.filter.src_ip.u.prefix, s,
2367 prefix_blen(&zpr.rule.filter.src_ip));
2368 STREAM_GETW(s, zpr.rule.filter.src_port);
2369 STREAM_GETC(s, zpr.rule.filter.dst_ip.family);
2370 STREAM_GETC(s, zpr.rule.filter.dst_ip.prefixlen);
2371 STREAM_GET(&zpr.rule.filter.dst_ip.u.prefix, s,
2372 prefix_blen(&zpr.rule.filter.dst_ip));
2373 STREAM_GETW(s, zpr.rule.filter.dst_port);
2374 STREAM_GETL(s, zpr.rule.filter.fwmark);
2375 STREAM_GETL(s, zpr.rule.action.table);
2376 STREAM_GETL(s, zpr.rule.ifindex);
2377
2378 if (zpr.rule.ifindex) {
2379 struct interface *ifp;
2380
2381 ifp = if_lookup_by_index_per_ns(zvrf->zns,
2382 zpr.rule.ifindex);
2383 if (!ifp) {
2384 zlog_debug("Failed to lookup ifindex: %u",
2385 zpr.rule.ifindex);
2386 return;
2387 }
2388
2389 strlcpy(zpr.ifname, ifp->name, sizeof(zpr.ifname));
2390 }
2391
2392 if (!is_default_prefix(&zpr.rule.filter.src_ip))
2393 zpr.rule.filter.filter_bm |= PBR_FILTER_SRC_IP;
2394
2395 if (!is_default_prefix(&zpr.rule.filter.dst_ip))
2396 zpr.rule.filter.filter_bm |= PBR_FILTER_DST_IP;
2397
2398 if (zpr.rule.filter.src_port)
2399 zpr.rule.filter.filter_bm |= PBR_FILTER_SRC_PORT;
2400
2401 if (zpr.rule.filter.dst_port)
2402 zpr.rule.filter.filter_bm |= PBR_FILTER_DST_PORT;
2403
2404 if (zpr.rule.filter.fwmark)
2405 zpr.rule.filter.filter_bm |= PBR_FILTER_FWMARK;
2406
2407 if (!(zpr.rule.filter.src_ip.family == AF_INET
2408 || zpr.rule.filter.src_ip.family == AF_INET6)) {
2409 zlog_warn(
2410 "Unsupported PBR source IP family: %s (%" PRIu8
2411 ")\n",
2412 family2str(zpr.rule.filter.src_ip.family),
2413 zpr.rule.filter.src_ip.family);
2414 return;
2415 }
2416 if (!(zpr.rule.filter.dst_ip.family == AF_INET
2417 || zpr.rule.filter.dst_ip.family == AF_INET6)) {
2418 zlog_warn("Unsupported PBR IP family: %s (%" PRIu8
2419 ")\n",
2420 family2str(zpr.rule.filter.dst_ip.family),
2421 zpr.rule.filter.dst_ip.family);
2422 return;
2423 }
2424
2425
2426 zpr.vrf_id = zvrf->vrf->vrf_id;
2427 if (hdr->command == ZEBRA_RULE_ADD)
2428 zebra_pbr_add_rule(&zpr);
2429 else
2430 zebra_pbr_del_rule(&zpr);
2431 }
2432
2433 stream_failure:
2434 return;
2435 }
2436
2437 static inline void zread_ipset(ZAPI_HANDLER_ARGS)
2438 {
2439 struct zebra_pbr_ipset zpi;
2440 struct stream *s;
2441 uint32_t total, i;
2442
2443 s = msg;
2444 STREAM_GETL(s, total);
2445
2446 for (i = 0; i < total; i++) {
2447 memset(&zpi, 0, sizeof(zpi));
2448
2449 zpi.sock = client->sock;
2450 zpi.vrf_id = zvrf->vrf->vrf_id;
2451 STREAM_GETL(s, zpi.unique);
2452 STREAM_GETL(s, zpi.type);
2453 STREAM_GET(&zpi.ipset_name, s, ZEBRA_IPSET_NAME_SIZE);
2454
2455 if (hdr->command == ZEBRA_IPSET_CREATE)
2456 zebra_pbr_create_ipset(&zpi);
2457 else
2458 zebra_pbr_destroy_ipset(&zpi);
2459 }
2460
2461 stream_failure:
2462 return;
2463 }
2464
2465 static inline void zread_ipset_entry(ZAPI_HANDLER_ARGS)
2466 {
2467 struct zebra_pbr_ipset_entry zpi;
2468 struct zebra_pbr_ipset ipset;
2469 struct stream *s;
2470 uint32_t total, i;
2471
2472 s = msg;
2473 STREAM_GETL(s, total);
2474
2475 for (i = 0; i < total; i++) {
2476 memset(&zpi, 0, sizeof(zpi));
2477 memset(&ipset, 0, sizeof(ipset));
2478
2479 zpi.sock = client->sock;
2480 STREAM_GETL(s, zpi.unique);
2481 STREAM_GET(&ipset.ipset_name, s, ZEBRA_IPSET_NAME_SIZE);
2482 ipset.ipset_name[ZEBRA_IPSET_NAME_SIZE - 1] = '\0';
2483 STREAM_GETC(s, zpi.src.family);
2484 STREAM_GETC(s, zpi.src.prefixlen);
2485 STREAM_GET(&zpi.src.u.prefix, s, prefix_blen(&zpi.src));
2486 STREAM_GETC(s, zpi.dst.family);
2487 STREAM_GETC(s, zpi.dst.prefixlen);
2488 STREAM_GET(&zpi.dst.u.prefix, s, prefix_blen(&zpi.dst));
2489
2490 STREAM_GETW(s, zpi.src_port_min);
2491 STREAM_GETW(s, zpi.src_port_max);
2492 STREAM_GETW(s, zpi.dst_port_min);
2493 STREAM_GETW(s, zpi.dst_port_max);
2494 STREAM_GETC(s, zpi.proto);
2495 if (!is_default_prefix(&zpi.src))
2496 zpi.filter_bm |= PBR_FILTER_SRC_IP;
2497
2498 if (!is_default_prefix(&zpi.dst))
2499 zpi.filter_bm |= PBR_FILTER_DST_IP;
2500 if (zpi.dst_port_min != 0 || zpi.proto == IPPROTO_ICMP)
2501 zpi.filter_bm |= PBR_FILTER_DST_PORT;
2502 if (zpi.src_port_min != 0 || zpi.proto == IPPROTO_ICMP)
2503 zpi.filter_bm |= PBR_FILTER_SRC_PORT;
2504 if (zpi.dst_port_max != 0)
2505 zpi.filter_bm |= PBR_FILTER_DST_PORT_RANGE;
2506 if (zpi.src_port_max != 0)
2507 zpi.filter_bm |= PBR_FILTER_SRC_PORT_RANGE;
2508 if (zpi.proto != 0)
2509 zpi.filter_bm |= PBR_FILTER_PROTO;
2510
2511 /* calculate backpointer */
2512 zpi.backpointer =
2513 zebra_pbr_lookup_ipset_pername(ipset.ipset_name);
2514
2515 if (!zpi.backpointer) {
2516 zlog_warn("ipset name specified: %s does not exist",
2517 ipset.ipset_name);
2518 goto stream_failure;
2519 }
2520
2521 if (hdr->command == ZEBRA_IPSET_ENTRY_ADD)
2522 zebra_pbr_add_ipset_entry(&zpi);
2523 else
2524 zebra_pbr_del_ipset_entry(&zpi);
2525 }
2526
2527 stream_failure:
2528 return;
2529 }
2530
2531 static inline void zread_iptable(ZAPI_HANDLER_ARGS)
2532 {
2533 struct zebra_pbr_iptable *zpi =
2534 XCALLOC(MTYPE_TMP, sizeof(struct zebra_pbr_iptable));
2535 struct stream *s;
2536
2537 s = msg;
2538
2539 zpi->interface_name_list = list_new();
2540 zpi->sock = client->sock;
2541 zpi->vrf_id = zvrf->vrf->vrf_id;
2542 STREAM_GETL(s, zpi->unique);
2543 STREAM_GETL(s, zpi->type);
2544 STREAM_GETL(s, zpi->filter_bm);
2545 STREAM_GETL(s, zpi->action);
2546 STREAM_GETL(s, zpi->fwmark);
2547 STREAM_GET(&zpi->ipset_name, s, ZEBRA_IPSET_NAME_SIZE);
2548 STREAM_GETW(s, zpi->pkt_len_min);
2549 STREAM_GETW(s, zpi->pkt_len_max);
2550 STREAM_GETW(s, zpi->tcp_flags);
2551 STREAM_GETW(s, zpi->tcp_mask_flags);
2552 STREAM_GETC(s, zpi->dscp_value);
2553 STREAM_GETC(s, zpi->fragment);
2554 STREAM_GETC(s, zpi->protocol);
2555 STREAM_GETL(s, zpi->nb_interface);
2556 zebra_pbr_iptable_update_interfacelist(s, zpi);
2557
2558 if (hdr->command == ZEBRA_IPTABLE_ADD)
2559 zebra_pbr_add_iptable(zpi);
2560 else
2561 zebra_pbr_del_iptable(zpi);
2562
2563 stream_failure:
2564 zebra_pbr_iptable_free(zpi);
2565 zpi = NULL;
2566 return;
2567 }
2568
2569 static void zsend_error_msg(struct zserv *client, enum zebra_error_types error,
2570 struct zmsghdr *bad_hdr)
2571 {
2572
2573 struct stream *s = stream_new(ZEBRA_MAX_PACKET_SIZ);
2574
2575 zclient_create_header(s, ZEBRA_ERROR, bad_hdr->vrf_id);
2576
2577 zserv_encode_error(s, error);
2578
2579 client->error_cnt++;
2580 zserv_send_message(client, s);
2581 }
2582
2583 static void zserv_error_no_vrf(ZAPI_HANDLER_ARGS)
2584 {
2585 if (IS_ZEBRA_DEBUG_PACKET && IS_ZEBRA_DEBUG_RECV)
2586 zlog_debug("ZAPI message specifies unknown VRF: %d",
2587 hdr->vrf_id);
2588
2589 zsend_error_msg(client, ZEBRA_NO_VRF, hdr);
2590 }
2591
2592 static void zserv_error_invalid_msg_type(ZAPI_HANDLER_ARGS)
2593 {
2594 zlog_info("Zebra received unknown command %d", hdr->command);
2595
2596 zsend_error_msg(client, ZEBRA_INVALID_MSG_TYPE, hdr);
2597 }
2598
2599 void (*const zserv_handlers[])(ZAPI_HANDLER_ARGS) = {
2600 [ZEBRA_ROUTER_ID_ADD] = zread_router_id_add,
2601 [ZEBRA_ROUTER_ID_DELETE] = zread_router_id_delete,
2602 [ZEBRA_INTERFACE_ADD] = zread_interface_add,
2603 [ZEBRA_INTERFACE_DELETE] = zread_interface_delete,
2604 [ZEBRA_INTERFACE_SET_PROTODOWN] = zread_interface_set_protodown,
2605 [ZEBRA_ROUTE_ADD] = zread_route_add,
2606 [ZEBRA_ROUTE_DELETE] = zread_route_del,
2607 [ZEBRA_REDISTRIBUTE_ADD] = zebra_redistribute_add,
2608 [ZEBRA_REDISTRIBUTE_DELETE] = zebra_redistribute_delete,
2609 [ZEBRA_REDISTRIBUTE_DEFAULT_ADD] = zebra_redistribute_default_add,
2610 [ZEBRA_REDISTRIBUTE_DEFAULT_DELETE] = zebra_redistribute_default_delete,
2611 [ZEBRA_IPV4_NEXTHOP_LOOKUP_MRIB] = zread_ipv4_nexthop_lookup_mrib,
2612 [ZEBRA_HELLO] = zread_hello,
2613 [ZEBRA_NEXTHOP_REGISTER] = zread_rnh_register,
2614 [ZEBRA_NEXTHOP_UNREGISTER] = zread_rnh_unregister,
2615 [ZEBRA_IMPORT_ROUTE_REGISTER] = zread_rnh_register,
2616 [ZEBRA_IMPORT_ROUTE_UNREGISTER] = zread_rnh_unregister,
2617 [ZEBRA_BFD_DEST_UPDATE] = zebra_ptm_bfd_dst_register,
2618 [ZEBRA_BFD_DEST_REGISTER] = zebra_ptm_bfd_dst_register,
2619 [ZEBRA_BFD_DEST_DEREGISTER] = zebra_ptm_bfd_dst_deregister,
2620 #if HAVE_BFDD > 0
2621 [ZEBRA_BFD_DEST_REPLAY] = zebra_ptm_bfd_dst_replay,
2622 #endif /* HAVE_BFDD */
2623 [ZEBRA_VRF_UNREGISTER] = zread_vrf_unregister,
2624 [ZEBRA_VRF_LABEL] = zread_vrf_label,
2625 [ZEBRA_BFD_CLIENT_REGISTER] = zebra_ptm_bfd_client_register,
2626 #if defined(HAVE_RTADV)
2627 [ZEBRA_INTERFACE_ENABLE_RADV] = zebra_interface_radv_enable,
2628 [ZEBRA_INTERFACE_DISABLE_RADV] = zebra_interface_radv_disable,
2629 #else
2630 [ZEBRA_INTERFACE_ENABLE_RADV] = NULL,
2631 [ZEBRA_INTERFACE_DISABLE_RADV] = NULL,
2632 #endif
2633 [ZEBRA_MPLS_LABELS_ADD] = zread_mpls_labels_add,
2634 [ZEBRA_MPLS_LABELS_DELETE] = zread_mpls_labels_delete,
2635 [ZEBRA_MPLS_LABELS_REPLACE] = zread_mpls_labels_replace,
2636 [ZEBRA_IPMR_ROUTE_STATS] = zebra_ipmr_route_stats,
2637 [ZEBRA_LABEL_MANAGER_CONNECT] = zread_label_manager_request,
2638 [ZEBRA_LABEL_MANAGER_CONNECT_ASYNC] = zread_label_manager_request,
2639 [ZEBRA_GET_LABEL_CHUNK] = zread_label_manager_request,
2640 [ZEBRA_RELEASE_LABEL_CHUNK] = zread_label_manager_request,
2641 [ZEBRA_FEC_REGISTER] = zread_fec_register,
2642 [ZEBRA_FEC_UNREGISTER] = zread_fec_unregister,
2643 [ZEBRA_ADVERTISE_DEFAULT_GW] = zebra_vxlan_advertise_gw_macip,
2644 [ZEBRA_ADVERTISE_SVI_MACIP] = zebra_vxlan_advertise_svi_macip,
2645 [ZEBRA_ADVERTISE_SUBNET] = zebra_vxlan_advertise_subnet,
2646 [ZEBRA_ADVERTISE_ALL_VNI] = zebra_vxlan_advertise_all_vni,
2647 [ZEBRA_REMOTE_VTEP_ADD] = zebra_vxlan_remote_vtep_add,
2648 [ZEBRA_REMOTE_VTEP_DEL] = zebra_vxlan_remote_vtep_del,
2649 [ZEBRA_REMOTE_MACIP_ADD] = zebra_vxlan_remote_macip_add,
2650 [ZEBRA_REMOTE_MACIP_DEL] = zebra_vxlan_remote_macip_del,
2651 [ZEBRA_DUPLICATE_ADDR_DETECTION] = zebra_vxlan_dup_addr_detection,
2652 [ZEBRA_INTERFACE_SET_MASTER] = zread_interface_set_master,
2653 [ZEBRA_PW_ADD] = zread_pseudowire,
2654 [ZEBRA_PW_DELETE] = zread_pseudowire,
2655 [ZEBRA_PW_SET] = zread_pseudowire,
2656 [ZEBRA_PW_UNSET] = zread_pseudowire,
2657 [ZEBRA_RULE_ADD] = zread_rule,
2658 [ZEBRA_RULE_DELETE] = zread_rule,
2659 [ZEBRA_TABLE_MANAGER_CONNECT] = zread_table_manager_request,
2660 [ZEBRA_GET_TABLE_CHUNK] = zread_table_manager_request,
2661 [ZEBRA_RELEASE_TABLE_CHUNK] = zread_table_manager_request,
2662 [ZEBRA_IPSET_CREATE] = zread_ipset,
2663 [ZEBRA_IPSET_DESTROY] = zread_ipset,
2664 [ZEBRA_IPSET_ENTRY_ADD] = zread_ipset_entry,
2665 [ZEBRA_IPSET_ENTRY_DELETE] = zread_ipset_entry,
2666 [ZEBRA_IPTABLE_ADD] = zread_iptable,
2667 [ZEBRA_IPTABLE_DELETE] = zread_iptable,
2668 [ZEBRA_VXLAN_FLOOD_CONTROL] = zebra_vxlan_flood_control,
2669 [ZEBRA_VXLAN_SG_REPLAY] = zebra_vxlan_sg_replay,
2670 [ZEBRA_MLAG_CLIENT_REGISTER] = zebra_mlag_client_register,
2671 [ZEBRA_MLAG_CLIENT_UNREGISTER] = zebra_mlag_client_unregister,
2672 [ZEBRA_MLAG_FORWARD_MSG] = zebra_mlag_forward_client_msg,
2673 [ZEBRA_CLIENT_CAPABILITIES] = zread_client_capabilities
2674 };
2675
2676 #if defined(HANDLE_ZAPI_FUZZING)
2677 extern struct zebra_privs_t zserv_privs;
2678
2679 static void zserv_write_incoming(struct stream *orig, uint16_t command)
2680 {
2681 char fname[MAXPATHLEN];
2682 struct stream *copy;
2683 int fd = -1;
2684
2685 copy = stream_dup(orig);
2686 stream_set_getp(copy, 0);
2687
2688 snprintf(fname, MAXPATHLEN, "%s/%u", frr_vtydir, command);
2689
2690 frr_with_privs(&zserv_privs) {
2691 fd = open(fname, O_CREAT | O_WRONLY | O_EXCL, 0644);
2692 }
2693 stream_flush(copy, fd);
2694 close(fd);
2695 stream_free(copy);
2696 }
2697 #endif
2698
2699 void zserv_handle_commands(struct zserv *client, struct stream *msg)
2700 {
2701 struct zmsghdr hdr;
2702 struct zebra_vrf *zvrf;
2703
2704 if (STREAM_READABLE(msg) > ZEBRA_MAX_PACKET_SIZ) {
2705 if (IS_ZEBRA_DEBUG_PACKET && IS_ZEBRA_DEBUG_RECV)
2706 zlog_debug(
2707 "ZAPI message is %zu bytes long but the maximum packet size is %u; dropping",
2708 STREAM_READABLE(msg), ZEBRA_MAX_PACKET_SIZ);
2709 return;
2710 }
2711
2712 zapi_parse_header(msg, &hdr);
2713
2714 if (IS_ZEBRA_DEBUG_PACKET && IS_ZEBRA_DEBUG_RECV)
2715 zserv_log_message(NULL, msg, &hdr);
2716
2717 #if defined(HANDLE_ZAPI_FUZZING)
2718 zserv_write_incoming(msg, hdr.command);
2719 #endif
2720
2721 hdr.length -= ZEBRA_HEADER_SIZE;
2722
2723 /* lookup vrf */
2724 zvrf = zebra_vrf_lookup_by_id(hdr.vrf_id);
2725 if (!zvrf)
2726 return zserv_error_no_vrf(client, &hdr, msg, zvrf);
2727
2728 if (hdr.command >= array_size(zserv_handlers)
2729 || zserv_handlers[hdr.command] == NULL)
2730 return zserv_error_invalid_msg_type(client, &hdr, msg, zvrf);
2731
2732 zserv_handlers[hdr.command](client, &hdr, msg, zvrf);
2733 }