]> git.proxmox.com Git - mirror_frr.git/blob - zebra/zserv.c
projects / mirror_frr.git / blob
? search:
summary | shortlog | log | commit | commitdiff | tree
blame | history | raw | HEAD
*: use clang's 'ForEachMacros' format style option
[mirror_frr.git] / zebra / zserv.c
1 /* Zebra daemon server routine.
2 * Copyright (C) 1997, 98, 99 Kunihiro Ishiguro
3 *
4 * This file is part of GNU Zebra.
5 *
6 * GNU Zebra is free software; you can redistribute it and/or modify it
7 * under the terms of the GNU General Public License as published by the
8 * Free Software Foundation; either version 2, or (at your option) any
9 * later version.
10 *
11 * GNU Zebra is distributed in the hope that it will be useful, but
12 * WITHOUT ANY WARRANTY; without even the implied warranty of
13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
14 * General Public License for more details.
15 *
16 * You should have received a copy of the GNU General Public License along
17 * with this program; see the file COPYING; if not, write to the Free Software
18 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
19 */
20
21 #include <zebra.h>
22 #include <sys/un.h>
23
24 #include "prefix.h"
25 #include "command.h"
26 #include "if.h"
27 #include "thread.h"
28 #include "stream.h"
29 #include "memory.h"
30 #include "zebra_memory.h"
31 #include "table.h"
32 #include "rib.h"
33 #include "network.h"
34 #include "sockunion.h"
35 #include "log.h"
36 #include "zclient.h"
37 #include "privs.h"
38 #include "network.h"
39 #include "buffer.h"
40 #include "nexthop.h"
41 #include "vrf.h"
42 #include "libfrr.h"
43
44 #include "zebra/zserv.h"
45 #include "zebra/zebra_ns.h"
46 #include "zebra/zebra_vrf.h"
47 #include "zebra/router-id.h"
48 #include "zebra/redistribute.h"
49 #include "zebra/debug.h"
50 #include "zebra/ipforward.h"
51 #include "zebra/zebra_rnh.h"
52 #include "zebra/rt_netlink.h"
53 #include "zebra/interface.h"
54 #include "zebra/zebra_ptm.h"
55 #include "zebra/rtadv.h"
56 #include "zebra/zebra_mpls.h"
57 #include "zebra/zebra_mroute.h"
58 #include "zebra/label_manager.h"
59 #include "zebra/zebra_vxlan.h"
60 #include "zebra/rt.h"
61
62 /* Event list of zebra. */
63 enum event { ZEBRA_SERV, ZEBRA_READ, ZEBRA_WRITE };
64
65 static void zebra_event(enum event event, int sock, struct zserv *client);
66
67 extern struct zebra_privs_t zserv_privs;
68
69 static void zebra_client_close(struct zserv *client);
70
71 static int zserv_delayed_close(struct thread *thread)
72 {
73 struct zserv *client = THREAD_ARG(thread);
74
75 client->t_suicide = NULL;
76 zebra_client_close(client);
77 return 0;
78 }
79
80 static int zserv_flush_data(struct thread *thread)
81 {
82 struct zserv *client = THREAD_ARG(thread);
83
84 client->t_write = NULL;
85 if (client->t_suicide) {
86 zebra_client_close(client);
87 return -1;
88 }
89 switch (buffer_flush_available(client->wb, client->sock)) {
90 case BUFFER_ERROR:
91 zlog_warn(
92 "%s: buffer_flush_available failed on zserv client fd %d, "
93 "closing",
94 __func__, client->sock);
95 zebra_client_close(client);
96 client = NULL;
97 break;
98 case BUFFER_PENDING:
99 client->t_write = NULL;
100 thread_add_write(zebrad.master, zserv_flush_data, client,
101 client->sock, &client->t_write);
102 break;
103 case BUFFER_EMPTY:
104 break;
105 }
106
107 if (client)
108 client->last_write_time = monotime(NULL);
109 return 0;
110 }
111
112 int zebra_server_send_message(struct zserv *client)
113 {
114 if (client->t_suicide)
115 return -1;
116
117 if (client->is_synchronous)
118 return 0;
119
120 stream_set_getp(client->obuf, 0);
121 client->last_write_cmd = stream_getw_from(client->obuf, 6);
122 switch (buffer_write(client->wb, client->sock,
123 STREAM_DATA(client->obuf),
124 stream_get_endp(client->obuf))) {
125 case BUFFER_ERROR:
126 zlog_warn(
127 "%s: buffer_write failed to zserv client fd %d, closing",
128 __func__, client->sock);
129 /* Schedule a delayed close since many of the functions that
130 call this
131 one do not check the return code. They do not allow for the
132 possibility that an I/O error may have caused the client to
133 be
134 deleted. */
135 client->t_suicide = NULL;
136 thread_add_event(zebrad.master, zserv_delayed_close, client, 0,
137 &client->t_suicide);
138 return -1;
139 case BUFFER_EMPTY:
140 THREAD_OFF(client->t_write);
141 break;
142 case BUFFER_PENDING:
143 thread_add_write(zebrad.master, zserv_flush_data, client,
144 client->sock, &client->t_write);
145 break;
146 }
147
148 client->last_write_time = monotime(NULL);
149 return 0;
150 }
151
152 void zserv_create_header(struct stream *s, uint16_t cmd, vrf_id_t vrf_id)
153 {
154 /* length placeholder, caller can update */
155 stream_putw(s, ZEBRA_HEADER_SIZE);
156 stream_putc(s, ZEBRA_HEADER_MARKER);
157 stream_putc(s, ZSERV_VERSION);
158 stream_putw(s, vrf_id);
159 stream_putw(s, cmd);
160 }
161
162 static void zserv_encode_interface(struct stream *s, struct interface *ifp)
163 {
164 /* Interface information. */
165 stream_put(s, ifp->name, INTERFACE_NAMSIZ);
166 stream_putl(s, ifp->ifindex);
167 stream_putc(s, ifp->status);
168 stream_putq(s, ifp->flags);
169 stream_putc(s, ifp->ptm_enable);
170 stream_putc(s, ifp->ptm_status);
171 stream_putl(s, ifp->metric);
172 stream_putl(s, ifp->speed);
173 stream_putl(s, ifp->mtu);
174 stream_putl(s, ifp->mtu6);
175 stream_putl(s, ifp->bandwidth);
176 stream_putl(s, ifp->ll_type);
177 stream_putl(s, ifp->hw_addr_len);
178 if (ifp->hw_addr_len)
179 stream_put(s, ifp->hw_addr, ifp->hw_addr_len);
180
181 /* Then, Traffic Engineering parameters if any */
182 if (HAS_LINK_PARAMS(ifp) && IS_LINK_PARAMS_SET(ifp->link_params)) {
183 stream_putc(s, 1);
184 zebra_interface_link_params_write(s, ifp);
185 } else
186 stream_putc(s, 0);
187
188 /* Write packet size. */
189 stream_putw_at(s, 0, stream_get_endp(s));
190 }
191
192 static void zserv_encode_vrf(struct stream *s, struct zebra_vrf *zvrf)
193 {
194 struct vrf_data data;
195
196 data.l.table_id = zvrf->table_id;
197 /* Pass the tableid */
198 stream_put(s, &data, sizeof(struct vrf_data));
199 /* Interface information. */
200 stream_put(s, zvrf_name(zvrf), VRF_NAMSIZ);
201
202 /* Write packet size. */
203 stream_putw_at(s, 0, stream_get_endp(s));
204 }
205
206 /* Interface is added. Send ZEBRA_INTERFACE_ADD to client. */
207 /*
208 * This function is called in the following situations:
209 * - in response to a 3-byte ZEBRA_INTERFACE_ADD request
210 * from the client.
211 * - at startup, when zebra figures out the available interfaces
212 * - when an interface is added (where support for
213 * RTM_IFANNOUNCE or AF_NETLINK sockets is available), or when
214 * an interface is marked IFF_UP (i.e., an RTM_IFINFO message is
215 * received)
216 */
217 int zsend_interface_add(struct zserv *client, struct interface *ifp)
218 {
219 struct stream *s;
220
221 s = client->obuf;
222 stream_reset(s);
223
224 zserv_create_header(s, ZEBRA_INTERFACE_ADD, ifp->vrf_id);
225 zserv_encode_interface(s, ifp);
226
227 client->ifadd_cnt++;
228 return zebra_server_send_message(client);
229 }
230
231 /* Interface deletion from zebra daemon. */
232 int zsend_interface_delete(struct zserv *client, struct interface *ifp)
233 {
234 struct stream *s;
235
236 s = client->obuf;
237 stream_reset(s);
238
239 zserv_create_header(s, ZEBRA_INTERFACE_DELETE, ifp->vrf_id);
240 zserv_encode_interface(s, ifp);
241
242 client->ifdel_cnt++;
243 return zebra_server_send_message(client);
244 }
245
246 int zsend_vrf_add(struct zserv *client, struct zebra_vrf *zvrf)
247 {
248 struct stream *s;
249
250 s = client->obuf;
251 stream_reset(s);
252
253 zserv_create_header(s, ZEBRA_VRF_ADD, zvrf_id(zvrf));
254 zserv_encode_vrf(s, zvrf);
255
256 client->vrfadd_cnt++;
257 return zebra_server_send_message(client);
258 }
259
260 /* VRF deletion from zebra daemon. */
261 int zsend_vrf_delete(struct zserv *client, struct zebra_vrf *zvrf)
262 {
263 struct stream *s;
264
265 s = client->obuf;
266 stream_reset(s);
267
268 zserv_create_header(s, ZEBRA_VRF_DELETE, zvrf_id(zvrf));
269 zserv_encode_vrf(s, zvrf);
270
271 client->vrfdel_cnt++;
272 return zebra_server_send_message(client);
273 }
274
275 int zsend_interface_link_params(struct zserv *client, struct interface *ifp)
276 {
277 struct stream *s;
278
279 /* Check this client need interface information. */
280 if (!client->ifinfo)
281 return 0;
282
283 if (!ifp->link_params)
284 return 0;
285 s = client->obuf;
286 stream_reset(s);
287
288 zserv_create_header(s, ZEBRA_INTERFACE_LINK_PARAMS, ifp->vrf_id);
289
290 /* Add Interface Index */
291 stream_putl(s, ifp->ifindex);
292
293 /* Then TE Link Parameters */
294 if (zebra_interface_link_params_write(s, ifp) == 0)
295 return 0;
296
297 /* Write packet size. */
298 stream_putw_at(s, 0, stream_get_endp(s));
299
300 return zebra_server_send_message(client);
301 }
302
303 /* Interface address is added/deleted. Send ZEBRA_INTERFACE_ADDRESS_ADD or
304 * ZEBRA_INTERFACE_ADDRESS_DELETE to the client.
305 *
306 * A ZEBRA_INTERFACE_ADDRESS_ADD is sent in the following situations:
307 * - in response to a 3-byte ZEBRA_INTERFACE_ADD request
308 * from the client, after the ZEBRA_INTERFACE_ADD has been
309 * sent from zebra to the client
310 * - redistribute new address info to all clients in the following situations
311 * - at startup, when zebra figures out the available interfaces
312 * - when an interface is added (where support for
313 * RTM_IFANNOUNCE or AF_NETLINK sockets is available), or when
314 * an interface is marked IFF_UP (i.e., an RTM_IFINFO message is
315 * received)
316 * - for the vty commands "ip address A.B.C.D/M [<secondary>|<label LINE>]"
317 * and "no bandwidth <1-10000000>", "ipv6 address X:X::X:X/M"
318 * - when an RTM_NEWADDR message is received from the kernel,
319 *
320 * The call tree that triggers ZEBRA_INTERFACE_ADDRESS_DELETE:
321 *
322 * zsend_interface_address(DELETE)
323 * ^
324 * |
325 * zebra_interface_address_delete_update
326 * ^ ^ ^
327 * | | if_delete_update
328 * | |
329 * ip_address_uninstall connected_delete_ipv4
330 * [ipv6_addresss_uninstall] [connected_delete_ipv6]
331 * ^ ^
332 * | |
333 * | RTM_NEWADDR on routing/netlink socket
334 * |
335 * vty commands:
336 * "no ip address A.B.C.D/M [label LINE]"
337 * "no ip address A.B.C.D/M secondary"
338 * ["no ipv6 address X:X::X:X/M"]
339 *
340 */
341 int zsend_interface_address(int cmd, struct zserv *client,
342 struct interface *ifp, struct connected *ifc)
343 {
344 int blen;
345 struct stream *s;
346 struct prefix *p;
347
348 s = client->obuf;
349 stream_reset(s);
350
351 zserv_create_header(s, cmd, ifp->vrf_id);
352 stream_putl(s, ifp->ifindex);
353
354 /* Interface address flag. */
355 stream_putc(s, ifc->flags);
356
357 /* Prefix information. */
358 p = ifc->address;
359 stream_putc(s, p->family);
360 blen = prefix_blen(p);
361 stream_put(s, &p->u.prefix, blen);
362
363 /*
364 * XXX gnu version does not send prefixlen for
365 * ZEBRA_INTERFACE_ADDRESS_DELETE
366 * but zebra_interface_address_delete_read() in the gnu version
367 * expects to find it
368 */
369 stream_putc(s, p->prefixlen);
370
371 /* Destination. */
372 p = ifc->destination;
373 if (p)
374 stream_put(s, &p->u.prefix, blen);
375 else
376 stream_put(s, NULL, blen);
377
378 /* Write packet size. */
379 stream_putw_at(s, 0, stream_get_endp(s));
380
381 client->connected_rt_add_cnt++;
382 return zebra_server_send_message(client);
383 }
384
385 static int zsend_interface_nbr_address(int cmd, struct zserv *client,
386 struct interface *ifp,
387 struct nbr_connected *ifc)
388 {
389 int blen;
390 struct stream *s;
391 struct prefix *p;
392
393 s = client->obuf;
394 stream_reset(s);
395
396 zserv_create_header(s, cmd, ifp->vrf_id);
397 stream_putl(s, ifp->ifindex);
398
399 /* Prefix information. */
400 p = ifc->address;
401 stream_putc(s, p->family);
402 blen = prefix_blen(p);
403 stream_put(s, &p->u.prefix, blen);
404
405 /*
406 * XXX gnu version does not send prefixlen for
407 * ZEBRA_INTERFACE_ADDRESS_DELETE
408 * but zebra_interface_address_delete_read() in the gnu version
409 * expects to find it
410 */
411 stream_putc(s, p->prefixlen);
412
413 /* Write packet size. */
414 stream_putw_at(s, 0, stream_get_endp(s));
415
416 return zebra_server_send_message(client);
417 }
418
419 /* Interface address addition. */
420 static void zebra_interface_nbr_address_add_update(struct interface *ifp,
421 struct nbr_connected *ifc)
422 {
423 struct listnode *node, *nnode;
424 struct zserv *client;
425 struct prefix *p;
426
427 if (IS_ZEBRA_DEBUG_EVENT) {
428 char buf[INET6_ADDRSTRLEN];
429
430 p = ifc->address;
431 zlog_debug(
432 "MESSAGE: ZEBRA_INTERFACE_NBR_ADDRESS_ADD %s/%d on %s",
433 inet_ntop(p->family, &p->u.prefix, buf,
434 INET6_ADDRSTRLEN),
435 p->prefixlen, ifc->ifp->name);
436 }
437
438 for (ALL_LIST_ELEMENTS(zebrad.client_list, node, nnode, client))
439 zsend_interface_nbr_address(ZEBRA_INTERFACE_NBR_ADDRESS_ADD,
440 client, ifp, ifc);
441 }
442
443 /* Interface address deletion. */
444 static void zebra_interface_nbr_address_delete_update(struct interface *ifp,
445 struct nbr_connected *ifc)
446 {
447 struct listnode *node, *nnode;
448 struct zserv *client;
449 struct prefix *p;
450
451 if (IS_ZEBRA_DEBUG_EVENT) {
452 char buf[INET6_ADDRSTRLEN];
453
454 p = ifc->address;
455 zlog_debug(
456 "MESSAGE: ZEBRA_INTERFACE_NBR_ADDRESS_DELETE %s/%d on %s",
457 inet_ntop(p->family, &p->u.prefix, buf,
458 INET6_ADDRSTRLEN),
459 p->prefixlen, ifc->ifp->name);
460 }
461
462 for (ALL_LIST_ELEMENTS(zebrad.client_list, node, nnode, client))
463 zsend_interface_nbr_address(ZEBRA_INTERFACE_NBR_ADDRESS_DELETE,
464 client, ifp, ifc);
465 }
466
467 /* Send addresses on interface to client */
468 int zsend_interface_addresses(struct zserv *client, struct interface *ifp)
469 {
470 struct listnode *cnode, *cnnode;
471 struct connected *c;
472 struct nbr_connected *nc;
473
474 /* Send interface addresses. */
475 for (ALL_LIST_ELEMENTS(ifp->connected, cnode, cnnode, c)) {
476 if (!CHECK_FLAG(c->conf, ZEBRA_IFC_REAL))
477 continue;
478
479 if (zsend_interface_address(ZEBRA_INTERFACE_ADDRESS_ADD, client,
480 ifp, c)
481 < 0)
482 return -1;
483 }
484
485 /* Send interface neighbors. */
486 for (ALL_LIST_ELEMENTS(ifp->nbr_connected, cnode, cnnode, nc)) {
487 if (zsend_interface_nbr_address(ZEBRA_INTERFACE_NBR_ADDRESS_ADD,
488 client, ifp, nc)
489 < 0)
490 return -1;
491 }
492
493 return 0;
494 }
495
496 /* Notify client about interface moving from one VRF to another.
497 * Whether client is interested in old and new VRF is checked by caller.
498 */
499 int zsend_interface_vrf_update(struct zserv *client, struct interface *ifp,
500 vrf_id_t vrf_id)
501 {
502 struct stream *s;
503
504 s = client->obuf;
505 stream_reset(s);
506
507 zserv_create_header(s, ZEBRA_INTERFACE_VRF_UPDATE, ifp->vrf_id);
508
509 /* Fill in the ifIndex of the interface and its new VRF (id) */
510 stream_putl(s, ifp->ifindex);
511 stream_putw(s, vrf_id);
512
513 /* Write packet size. */
514 stream_putw_at(s, 0, stream_get_endp(s));
515
516 client->if_vrfchg_cnt++;
517 return zebra_server_send_message(client);
518 }
519
520 /* Add new nbr connected IPv6 address */
521 void nbr_connected_add_ipv6(struct interface *ifp, struct in6_addr *address)
522 {
523 struct nbr_connected *ifc;
524 struct prefix p;
525
526 p.family = AF_INET6;
527 IPV6_ADDR_COPY(&p.u.prefix, address);
528 p.prefixlen = IPV6_MAX_PREFIXLEN;
529
530 if (!(ifc = listnode_head(ifp->nbr_connected))) {
531 /* new addition */
532 ifc = nbr_connected_new();
533 ifc->address = prefix_new();
534 ifc->ifp = ifp;
535 listnode_add(ifp->nbr_connected, ifc);
536 }
537
538 prefix_copy(ifc->address, &p);
539
540 zebra_interface_nbr_address_add_update(ifp, ifc);
541
542 if_nbr_ipv6ll_to_ipv4ll_neigh_update(ifp, address, 1);
543 }
544
545 void nbr_connected_delete_ipv6(struct interface *ifp, struct in6_addr *address)
546 {
547 struct nbr_connected *ifc;
548 struct prefix p;
549
550 p.family = AF_INET6;
551 IPV6_ADDR_COPY(&p.u.prefix, address);
552 p.prefixlen = IPV6_MAX_PREFIXLEN;
553
554 ifc = nbr_connected_check(ifp, &p);
555 if (!ifc)
556 return;
557
558 listnode_delete(ifp->nbr_connected, ifc);
559
560 zebra_interface_nbr_address_delete_update(ifp, ifc);
561
562 if_nbr_ipv6ll_to_ipv4ll_neigh_update(ifp, address, 0);
563
564 nbr_connected_free(ifc);
565 }
566
567 /*
568 * The cmd passed to zsend_interface_update may be ZEBRA_INTERFACE_UP or
569 * ZEBRA_INTERFACE_DOWN.
570 *
571 * The ZEBRA_INTERFACE_UP message is sent from the zebra server to
572 * the clients in one of 2 situations:
573 * - an if_up is detected e.g., as a result of an RTM_IFINFO message
574 * - a vty command modifying the bandwidth of an interface is received.
575 * The ZEBRA_INTERFACE_DOWN message is sent when an if_down is detected.
576 */
577 int zsend_interface_update(int cmd, struct zserv *client, struct interface *ifp)
578 {
579 struct stream *s;
580
581 s = client->obuf;
582 stream_reset(s);
583
584 zserv_create_header(s, cmd, ifp->vrf_id);
585 zserv_encode_interface(s, ifp);
586
587 if (cmd == ZEBRA_INTERFACE_UP)
588 client->ifup_cnt++;
589 else
590 client->ifdown_cnt++;
591
592 return zebra_server_send_message(client);
593 }
594
595 int zsend_redistribute_route(int cmd, struct zserv *client, struct prefix *p,
596 struct prefix *src_p, struct route_entry *re)
597 {
598 struct zapi_route api;
599 struct zapi_nexthop *api_nh;
600 struct nexthop *nexthop;
601 int count = 0;
602
603 memset(&api, 0, sizeof(api));
604 api.vrf_id = re->vrf_id;
605 api.type = re->type;
606 api.instance = re->instance;
607 api.flags = re->flags;
608
609 /* Prefix. */
610 api.prefix = *p;
611 if (src_p) {
612 SET_FLAG(api.message, ZAPI_MESSAGE_SRCPFX);
613 memcpy(&api.src_prefix, src_p, sizeof(api.src_prefix));
614 }
615
616 /* Nexthops. */
617 if (re->nexthop_active_num) {
618 SET_FLAG(api.message, ZAPI_MESSAGE_NEXTHOP);
619 api.nexthop_num = re->nexthop_active_num;
620 }
621 for (nexthop = re->nexthop; nexthop; nexthop = nexthop->next) {
622 if (!CHECK_FLAG(nexthop->flags, NEXTHOP_FLAG_ACTIVE))
623 continue;
624
625 api_nh = &api.nexthops[count];
626 api_nh->type = nexthop->type;
627 switch (nexthop->type) {
628 case NEXTHOP_TYPE_BLACKHOLE:
629 api_nh->bh_type = nexthop->bh_type;
630 break;
631 case NEXTHOP_TYPE_IPV4:
632 api_nh->gate.ipv4 = nexthop->gate.ipv4;
633 break;
634 case NEXTHOP_TYPE_IPV4_IFINDEX:
635 api_nh->gate.ipv4 = nexthop->gate.ipv4;
636 api_nh->ifindex = nexthop->ifindex;
637 break;
638 case NEXTHOP_TYPE_IFINDEX:
639 api_nh->ifindex = nexthop->ifindex;
640 break;
641 case NEXTHOP_TYPE_IPV6:
642 api_nh->gate.ipv6 = nexthop->gate.ipv6;
643 break;
644 case NEXTHOP_TYPE_IPV6_IFINDEX:
645 api_nh->gate.ipv6 = nexthop->gate.ipv6;
646 api_nh->ifindex = nexthop->ifindex;
647 }
648 count++;
649 }
650
651 /* Attributes. */
652 SET_FLAG(api.message, ZAPI_MESSAGE_DISTANCE);
653 api.distance = re->distance;
654 SET_FLAG(api.message, ZAPI_MESSAGE_METRIC);
655 api.metric = re->metric;
656 if (re->tag) {
657 SET_FLAG(api.message, ZAPI_MESSAGE_TAG);
658 api.tag = re->tag;
659 }
660 SET_FLAG(api.message, ZAPI_MESSAGE_MTU);
661 api.mtu = re->mtu;
662
663 /* Encode route and send. */
664 if (zapi_route_encode(cmd, client->obuf, &api) < 0)
665 return -1;
666 return zebra_server_send_message(client);
667 }
668
669 static int zsend_write_nexthop(struct stream *s, struct nexthop *nexthop)
670 {
671 stream_putc(s, nexthop->type);
672 switch (nexthop->type) {
673 case NEXTHOP_TYPE_IPV4:
674 case NEXTHOP_TYPE_IPV4_IFINDEX:
675 stream_put_in_addr(s, &nexthop->gate.ipv4);
676 stream_putl(s, nexthop->ifindex);
677 break;
678 case NEXTHOP_TYPE_IPV6:
679 stream_put(s, &nexthop->gate.ipv6, 16);
680 break;
681 case NEXTHOP_TYPE_IPV6_IFINDEX:
682 stream_put(s, &nexthop->gate.ipv6, 16);
683 stream_putl(s, nexthop->ifindex);
684 break;
685 case NEXTHOP_TYPE_IFINDEX:
686 stream_putl(s, nexthop->ifindex);
687 break;
688 default:
689 /* do nothing */
690 break;
691 }
692 return 1;
693 }
694
695 /* Nexthop register */
696 static int zserv_rnh_register(struct zserv *client, int sock, u_short length,
697 rnh_type_t type, struct zebra_vrf *zvrf)
698 {
699 struct rnh *rnh;
700 struct stream *s;
701 struct prefix p;
702 u_short l = 0;
703 u_char flags = 0;
704
705 if (IS_ZEBRA_DEBUG_NHT)
706 zlog_debug(
707 "rnh_register msg from client %s: length=%d, type=%s\n",
708 zebra_route_string(client->proto), length,
709 (type == RNH_NEXTHOP_TYPE) ? "nexthop" : "route");
710
711 s = client->ibuf;
712
713 client->nh_reg_time = monotime(NULL);
714
715 while (l < length) {
716 flags = stream_getc(s);
717 p.family = stream_getw(s);
718 p.prefixlen = stream_getc(s);
719 l += 4;
720 if (p.family == AF_INET) {
721 p.u.prefix4.s_addr = stream_get_ipv4(s);
722 l += IPV4_MAX_BYTELEN;
723 } else if (p.family == AF_INET6) {
724 stream_get(&p.u.prefix6, s, IPV6_MAX_BYTELEN);
725 l += IPV6_MAX_BYTELEN;
726 } else {
727 zlog_err(
728 "rnh_register: Received unknown family type %d\n",
729 p.family);
730 return -1;
731 }
732 rnh = zebra_add_rnh(&p, zvrf_id(zvrf), type);
733 if (type == RNH_NEXTHOP_TYPE) {
734 if (flags
735 && !CHECK_FLAG(rnh->flags, ZEBRA_NHT_CONNECTED))
736 SET_FLAG(rnh->flags, ZEBRA_NHT_CONNECTED);
737 else if (!flags
738 && CHECK_FLAG(rnh->flags, ZEBRA_NHT_CONNECTED))
739 UNSET_FLAG(rnh->flags, ZEBRA_NHT_CONNECTED);
740 } else if (type == RNH_IMPORT_CHECK_TYPE) {
741 if (flags
742 && !CHECK_FLAG(rnh->flags, ZEBRA_NHT_EXACT_MATCH))
743 SET_FLAG(rnh->flags, ZEBRA_NHT_EXACT_MATCH);
744 else if (!flags && CHECK_FLAG(rnh->flags,
745 ZEBRA_NHT_EXACT_MATCH))
746 UNSET_FLAG(rnh->flags, ZEBRA_NHT_EXACT_MATCH);
747 }
748
749 zebra_add_rnh_client(rnh, client, type, zvrf_id(zvrf));
750 /* Anything not AF_INET/INET6 has been filtered out above */
751 zebra_evaluate_rnh(zvrf_id(zvrf), p.family, 1, type, &p);
752 }
753 return 0;
754 }
755
756 /* Nexthop register */
757 static int zserv_rnh_unregister(struct zserv *client, int sock, u_short length,
758 rnh_type_t type, struct zebra_vrf *zvrf)
759 {
760 struct rnh *rnh;
761 struct stream *s;
762 struct prefix p;
763 u_short l = 0;
764
765 if (IS_ZEBRA_DEBUG_NHT)
766 zlog_debug("rnh_unregister msg from client %s: length=%d\n",
767 zebra_route_string(client->proto), length);
768
769 s = client->ibuf;
770
771 while (l < length) {
772 (void)stream_getc(
773 s); // Connected or not. Not used in this function
774 p.family = stream_getw(s);
775 p.prefixlen = stream_getc(s);
776 l += 4;
777 if (p.family == AF_INET) {
778 p.u.prefix4.s_addr = stream_get_ipv4(s);
779 l += IPV4_MAX_BYTELEN;
780 } else if (p.family == AF_INET6) {
781 stream_get(&p.u.prefix6, s, IPV6_MAX_BYTELEN);
782 l += IPV6_MAX_BYTELEN;
783 } else {
784 zlog_err(
785 "rnh_register: Received unknown family type %d\n",
786 p.family);
787 return -1;
788 }
789 rnh = zebra_lookup_rnh(&p, zvrf_id(zvrf), type);
790 if (rnh) {
791 client->nh_dereg_time = monotime(NULL);
792 zebra_remove_rnh_client(rnh, client, type);
793 }
794 }
795 return 0;
796 }
797
798 #define ZEBRA_MIN_FEC_LENGTH 5
799
800 /* FEC register */
801 static int zserv_fec_register(struct zserv *client, int sock, u_short length)
802 {
803 struct stream *s;
804 struct zebra_vrf *zvrf;
805 u_short l = 0;
806 struct prefix p;
807 u_int16_t flags;
808 u_int32_t label_index = MPLS_INVALID_LABEL_INDEX;
809
810 s = client->ibuf;
811 zvrf = vrf_info_lookup(VRF_DEFAULT);
812 if (!zvrf)
813 return 0; // unexpected
814
815 /*
816 * The minimum amount of data that can be sent for one fec
817 * registration
818 */
819 if (length < ZEBRA_MIN_FEC_LENGTH) {
820 zlog_err(
821 "fec_register: Received a fec register of length %d, it is of insufficient size to properly decode",
822 length);
823 return -1;
824 }
825
826 while (l < length) {
827 flags = stream_getw(s);
828 p.family = stream_getw(s);
829 if (p.family != AF_INET && p.family != AF_INET6) {
830 zlog_err(
831 "fec_register: Received unknown family type %d\n",
832 p.family);
833 return -1;
834 }
835 p.prefixlen = stream_getc(s);
836 l += 5;
837 stream_get(&p.u.prefix, s, PSIZE(p.prefixlen));
838 l += PSIZE(p.prefixlen);
839 if (flags & ZEBRA_FEC_REGISTER_LABEL_INDEX) {
840 label_index = stream_getl(s);
841 l += 4;
842 } else
843 label_index = MPLS_INVALID_LABEL_INDEX;
844 zebra_mpls_fec_register(zvrf, &p, label_index, client);
845 }
846
847 return 0;
848 }
849
850 /* FEC unregister */
851 static int zserv_fec_unregister(struct zserv *client, int sock, u_short length)
852 {
853 struct stream *s;
854 struct zebra_vrf *zvrf;
855 u_short l = 0;
856 struct prefix p;
857 // u_int16_t flags;
858
859 s = client->ibuf;
860 zvrf = vrf_info_lookup(VRF_DEFAULT);
861 if (!zvrf)
862 return 0; // unexpected
863
864 /*
865 * The minimum amount of data that can be sent for one
866 * fec unregistration
867 */
868 if (length < ZEBRA_MIN_FEC_LENGTH) {
869 zlog_err(
870 "fec_unregister: Received a fec unregister of length %d, it is of insufficient size to properly decode",
871 length);
872 return -1;
873 }
874
875 while (l < length) {
876 // flags = stream_getw(s);
877 (void)stream_getw(s);
878 p.family = stream_getw(s);
879 if (p.family != AF_INET && p.family != AF_INET6) {
880 zlog_err(
881 "fec_unregister: Received unknown family type %d\n",
882 p.family);
883 return -1;
884 }
885 p.prefixlen = stream_getc(s);
886 l += 5;
887 stream_get(&p.u.prefix, s, PSIZE(p.prefixlen));
888 l += PSIZE(p.prefixlen);
889 zebra_mpls_fec_unregister(zvrf, &p, client);
890 }
891
892 return 0;
893 }
894
895 /*
896 Modified version of zsend_ipv4_nexthop_lookup():
897 Query unicast rib if nexthop is not found on mrib.
898 Returns both route metric and protocol distance.
899 */
900 static int zsend_ipv4_nexthop_lookup_mrib(struct zserv *client,
901 struct in_addr addr,
902 struct route_entry *re,
903 struct zebra_vrf *zvrf)
904 {
905 struct stream *s;
906 unsigned long nump;
907 u_char num;
908 struct nexthop *nexthop;
909
910 /* Get output stream. */
911 s = client->obuf;
912 stream_reset(s);
913
914 /* Fill in result. */
915 zserv_create_header(s, ZEBRA_IPV4_NEXTHOP_LOOKUP_MRIB, zvrf_id(zvrf));
916 stream_put_in_addr(s, &addr);
917
918 if (re) {
919 stream_putc(s, re->distance);
920 stream_putl(s, re->metric);
921 num = 0;
922 nump = stream_get_endp(
923 s); /* remember position for nexthop_num */
924 stream_putc(s, 0); /* reserve room for nexthop_num */
925 /* Only non-recursive routes are elegible to resolve the nexthop
926 * we
927 * are looking up. Therefore, we will just iterate over the top
928 * chain of nexthops. */
929 for (nexthop = re->nexthop; nexthop; nexthop = nexthop->next)
930 if (CHECK_FLAG(nexthop->flags, NEXTHOP_FLAG_ACTIVE))
931 num += zsend_write_nexthop(s, nexthop);
932
933 stream_putc_at(s, nump, num); /* store nexthop_num */
934 } else {
935 stream_putc(s, 0); /* distance */
936 stream_putl(s, 0); /* metric */
937 stream_putc(s, 0); /* nexthop_num */
938 }
939
940 stream_putw_at(s, 0, stream_get_endp(s));
941
942 return zebra_server_send_message(client);
943 }
944
945 /* Router-id is updated. Send ZEBRA_ROUTER_ID_ADD to client. */
946 int zsend_router_id_update(struct zserv *client, struct prefix *p,
947 vrf_id_t vrf_id)
948 {
949 struct stream *s;
950 int blen;
951
952 /* Check this client need interface information. */
953 if (!vrf_bitmap_check(client->ridinfo, vrf_id))
954 return 0;
955
956 s = client->obuf;
957 stream_reset(s);
958
959 /* Message type. */
960 zserv_create_header(s, ZEBRA_ROUTER_ID_UPDATE, vrf_id);
961
962 /* Prefix information. */
963 stream_putc(s, p->family);
964 blen = prefix_blen(p);
965 stream_put(s, &p->u.prefix, blen);
966 stream_putc(s, p->prefixlen);
967
968 /* Write packet size. */
969 stream_putw_at(s, 0, stream_get_endp(s));
970
971 return zebra_server_send_message(client);
972 }
973
974 /*
975 * Function used by Zebra to send a PW status update to LDP daemon
976 */
977 int zsend_pw_update(struct zserv *client, struct zebra_pw *pw)
978 {
979 struct stream *s;
980
981 s = client->obuf;
982 stream_reset(s);
983
984 zserv_create_header(s, ZEBRA_PW_STATUS_UPDATE, pw->vrf_id);
985 stream_write(s, pw->ifname, IF_NAMESIZE);
986 stream_putl(s, pw->ifindex);
987 stream_putl(s, pw->status);
988
989 /* Put length at the first point of the stream. */
990 stream_putw_at(s, 0, stream_get_endp(s));
991
992 return zebra_server_send_message(client);
993 }
994
995 /* Register zebra server interface information. Send current all
996 interface and address information. */
997 static int zread_interface_add(struct zserv *client, u_short length,
998 struct zebra_vrf *zvrf)
999 {
1000 struct vrf *vrf;
1001 struct listnode *ifnode, *ifnnode;
1002 struct interface *ifp;
1003
1004 /* Interface information is needed. */
1005 vrf_bitmap_set(client->ifinfo, zvrf_id(zvrf));
1006
1007 RB_FOREACH (vrf, vrf_id_head, &vrfs_by_id) {
1008 for (ALL_LIST_ELEMENTS(vrf->iflist, ifnode, ifnnode, ifp)) {
1009 /* Skip pseudo interface. */
1010 if (!CHECK_FLAG(ifp->status, ZEBRA_INTERFACE_ACTIVE))
1011 continue;
1012
1013 if (zsend_interface_add(client, ifp) < 0)
1014 return -1;
1015
1016 if (zsend_interface_addresses(client, ifp) < 0)
1017 return -1;
1018 }
1019 }
1020 return 0;
1021 }
1022
1023 /* Unregister zebra server interface information. */
1024 static int zread_interface_delete(struct zserv *client, u_short length,
1025 struct zebra_vrf *zvrf)
1026 {
1027 vrf_bitmap_unset(client->ifinfo, zvrf_id(zvrf));
1028 return 0;
1029 }
1030
1031 void zserv_nexthop_num_warn(const char *caller, const struct prefix *p,
1032 const unsigned int nexthop_num)
1033 {
1034 if (nexthop_num > multipath_num) {
1035 char buff[PREFIX2STR_BUFFER];
1036 prefix2str(p, buff, sizeof(buff));
1037 zlog_warn(
1038 "%s: Prefix %s has %d nexthops, but we can only use the first %d",
1039 caller, buff, nexthop_num, multipath_num);
1040 }
1041 }
1042
1043 static int zread_route_add(struct zserv *client, u_short length,
1044 struct zebra_vrf *zvrf)
1045 {
1046 struct stream *s;
1047 struct zapi_route api;
1048 struct zapi_nexthop *api_nh;
1049 afi_t afi;
1050 struct prefix_ipv6 *src_p = NULL;
1051 struct route_entry *re;
1052 struct nexthop *nexthop = NULL;
1053 int i, ret;
1054
1055 s = client->ibuf;
1056 if (zapi_route_decode(s, &api) < 0)
1057 return -1;
1058
1059 /* Allocate new route. */
1060 re = XCALLOC(MTYPE_RE, sizeof(struct route_entry));
1061 re->type = api.type;
1062 re->instance = api.instance;
1063 re->flags = api.flags;
1064 re->uptime = time(NULL);
1065 re->vrf_id = zvrf_id(zvrf);
1066 re->table = zvrf->table_id;
1067
1068 if (CHECK_FLAG(api.message, ZAPI_MESSAGE_NEXTHOP)) {
1069 for (i = 0; i < api.nexthop_num; i++) {
1070 api_nh = &api.nexthops[i];
1071
1072 switch (api_nh->type) {
1073 case NEXTHOP_TYPE_IFINDEX:
1074 route_entry_nexthop_ifindex_add(
1075 re, api_nh->ifindex);
1076 break;
1077 case NEXTHOP_TYPE_IPV4:
1078 nexthop = route_entry_nexthop_ipv4_add(
1079 re, &api_nh->gate.ipv4, NULL);
1080 break;
1081 case NEXTHOP_TYPE_IPV4_IFINDEX:
1082 nexthop = route_entry_nexthop_ipv4_ifindex_add(
1083 re, &api_nh->gate.ipv4, NULL,
1084 api_nh->ifindex);
1085 break;
1086 case NEXTHOP_TYPE_IPV6:
1087 nexthop = route_entry_nexthop_ipv6_add(
1088 re, &api_nh->gate.ipv6);
1089 break;
1090 case NEXTHOP_TYPE_IPV6_IFINDEX:
1091 nexthop = route_entry_nexthop_ipv6_ifindex_add(
1092 re, &api_nh->gate.ipv6,
1093 api_nh->ifindex);
1094 break;
1095 case NEXTHOP_TYPE_BLACKHOLE:
1096 route_entry_nexthop_blackhole_add(
1097 re, api_nh->bh_type);
1098 break;
1099 }
1100
1101 /* MPLS labels for BGP-LU or Segment Routing */
1102 if (CHECK_FLAG(api.message, ZAPI_MESSAGE_LABEL)
1103 && api_nh->type != NEXTHOP_TYPE_IFINDEX
1104 && api_nh->type != NEXTHOP_TYPE_BLACKHOLE) {
1105 enum lsp_types_t label_type;
1106
1107 label_type =
1108 lsp_type_from_re_type(client->proto);
1109 nexthop_add_labels(nexthop, label_type,
1110 api_nh->label_num,
1111 &api_nh->labels[0]);
1112 }
1113 }
1114 }
1115
1116 if (CHECK_FLAG(api.message, ZAPI_MESSAGE_DISTANCE))
1117 re->distance = api.distance;
1118 if (CHECK_FLAG(api.message, ZAPI_MESSAGE_METRIC))
1119 re->metric = api.metric;
1120 if (CHECK_FLAG(api.message, ZAPI_MESSAGE_TAG))
1121 re->tag = api.tag;
1122 if (CHECK_FLAG(api.message, ZAPI_MESSAGE_MTU))
1123 re->mtu = api.mtu;
1124
1125 afi = family2afi(api.prefix.family);
1126 if (CHECK_FLAG(api.message, ZAPI_MESSAGE_SRCPFX))
1127 src_p = &api.src_prefix;
1128
1129 ret = rib_add_multipath(afi, api.safi, &api.prefix, src_p, re);
1130
1131 /* Stats */
1132 switch (api.prefix.family) {
1133 case AF_INET:
1134 if (ret > 0)
1135 client->v4_route_add_cnt++;
1136 else if (ret < 0)
1137 client->v4_route_upd8_cnt++;
1138 break;
1139 case AF_INET6:
1140 if (ret > 0)
1141 client->v6_route_add_cnt++;
1142 else if (ret < 0)
1143 client->v6_route_upd8_cnt++;
1144 break;
1145 }
1146
1147 return 0;
1148 }
1149
1150 static int zread_route_del(struct zserv *client, u_short length,
1151 struct zebra_vrf *zvrf)
1152 {
1153 struct stream *s;
1154 struct zapi_route api;
1155 afi_t afi;
1156 struct prefix_ipv6 *src_p = NULL;
1157
1158 s = client->ibuf;
1159 if (zapi_route_decode(s, &api) < 0)
1160 return -1;
1161
1162 afi = family2afi(api.prefix.family);
1163 if (CHECK_FLAG(api.message, ZAPI_MESSAGE_SRCPFX))
1164 src_p = &api.src_prefix;
1165
1166 rib_delete(afi, api.safi, zvrf_id(zvrf), api.type, api.instance,
1167 api.flags, &api.prefix, src_p, NULL, zvrf->table_id,
1168 api.metric);
1169
1170 /* Stats */
1171 switch (api.prefix.family) {
1172 case AF_INET:
1173 client->v4_route_del_cnt++;
1174 break;
1175 case AF_INET6:
1176 client->v6_route_del_cnt++;
1177 break;
1178 }
1179
1180 return 0;
1181 }
1182
1183 /* This function support multiple nexthop. */
1184 /*
1185 * Parse the ZEBRA_IPV4_ROUTE_ADD sent from client. Update re and
1186 * add kernel route.
1187 */
1188 static int zread_ipv4_add(struct zserv *client, u_short length,
1189 struct zebra_vrf *zvrf)
1190 {
1191 int i;
1192 struct route_entry *re;
1193 struct prefix p;
1194 u_char message;
1195 struct in_addr nhop_addr;
1196 u_char nexthop_num;
1197 u_char nexthop_type;
1198 struct stream *s;
1199 ifindex_t ifindex;
1200 safi_t safi;
1201 int ret;
1202 enum lsp_types_t label_type = ZEBRA_LSP_NONE;
1203 mpls_label_t label;
1204 struct nexthop *nexthop;
1205 enum blackhole_type bh_type = BLACKHOLE_NULL;
1206
1207 /* Get input stream. */
1208 s = client->ibuf;
1209
1210 /* Allocate new re. */
1211 re = XCALLOC(MTYPE_RE, sizeof(struct route_entry));
1212
1213 /* Type, flags, message. */
1214 re->type = stream_getc(s);
1215 re->instance = stream_getw(s);
1216 re->flags = stream_getl(s);
1217 message = stream_getc(s);
1218 safi = stream_getw(s);
1219 re->uptime = time(NULL);
1220
1221 /* IPv4 prefix. */
1222 memset(&p, 0, sizeof(struct prefix_ipv4));
1223 p.family = AF_INET;
1224 p.prefixlen = stream_getc(s);
1225 stream_get(&p.u.prefix4, s, PSIZE(p.prefixlen));
1226
1227 /* VRF ID */
1228 re->vrf_id = zvrf_id(zvrf);
1229
1230 /* Nexthop parse. */
1231 if (CHECK_FLAG(message, ZAPI_MESSAGE_NEXTHOP)) {
1232 nexthop_num = stream_getc(s);
1233 zserv_nexthop_num_warn(__func__, (const struct prefix *)&p,
1234 nexthop_num);
1235
1236 if (CHECK_FLAG(message, ZAPI_MESSAGE_LABEL))
1237 label_type = lsp_type_from_re_type(client->proto);
1238
1239 for (i = 0; i < nexthop_num; i++) {
1240 nexthop_type = stream_getc(s);
1241
1242 switch (nexthop_type) {
1243 case NEXTHOP_TYPE_IFINDEX:
1244 ifindex = stream_getl(s);
1245 route_entry_nexthop_ifindex_add(re, ifindex);
1246 break;
1247 case NEXTHOP_TYPE_IPV4:
1248 nhop_addr.s_addr = stream_get_ipv4(s);
1249 nexthop = route_entry_nexthop_ipv4_add(
1250 re, &nhop_addr, NULL);
1251 /* For labeled-unicast, each nexthop is followed
1252 * by label. */
1253 if (CHECK_FLAG(message, ZAPI_MESSAGE_LABEL)) {
1254 label = (mpls_label_t)stream_getl(s);
1255 nexthop_add_labels(nexthop, label_type,
1256 1, &label);
1257 }
1258 break;
1259 case NEXTHOP_TYPE_IPV4_IFINDEX:
1260 nhop_addr.s_addr = stream_get_ipv4(s);
1261 ifindex = stream_getl(s);
1262 route_entry_nexthop_ipv4_ifindex_add(
1263 re, &nhop_addr, NULL, ifindex);
1264 break;
1265 case NEXTHOP_TYPE_IPV6:
1266 stream_forward_getp(s, IPV6_MAX_BYTELEN);
1267 break;
1268 case NEXTHOP_TYPE_BLACKHOLE:
1269 route_entry_nexthop_blackhole_add(re, bh_type);
1270 break;
1271 }
1272 }
1273 }
1274
1275 /* Distance. */
1276 if (CHECK_FLAG(message, ZAPI_MESSAGE_DISTANCE))
1277 re->distance = stream_getc(s);
1278
1279 /* Metric. */
1280 if (CHECK_FLAG(message, ZAPI_MESSAGE_METRIC))
1281 re->metric = stream_getl(s);
1282
1283 /* Tag */
1284 if (CHECK_FLAG(message, ZAPI_MESSAGE_TAG))
1285 re->tag = stream_getl(s);
1286 else
1287 re->tag = 0;
1288
1289 if (CHECK_FLAG(message, ZAPI_MESSAGE_MTU))
1290 re->mtu = stream_getl(s);
1291 else
1292 re->mtu = 0;
1293
1294 /* Table */
1295 re->table = zvrf->table_id;
1296
1297 ret = rib_add_multipath(AFI_IP, safi, &p, NULL, re);
1298
1299 /* Stats */
1300 if (ret > 0)
1301 client->v4_route_add_cnt++;
1302 else if (ret < 0)
1303 client->v4_route_upd8_cnt++;
1304 return 0;
1305 }
1306
1307 /* Zebra server IPv4 prefix delete function. */
1308 static int zread_ipv4_delete(struct zserv *client, u_short length,
1309 struct zebra_vrf *zvrf)
1310 {
1311 struct stream *s;
1312 struct zapi_ipv4 api;
1313 struct prefix p;
1314 u_int32_t table_id;
1315
1316 s = client->ibuf;
1317
1318 /* Type, flags, message. */
1319 api.type = stream_getc(s);
1320 api.instance = stream_getw(s);
1321 api.flags = stream_getl(s);
1322 api.message = stream_getc(s);
1323 api.safi = stream_getw(s);
1324
1325 /* IPv4 prefix. */
1326 memset(&p, 0, sizeof(struct prefix));
1327 p.family = AF_INET;
1328 p.prefixlen = stream_getc(s);
1329 stream_get(&p.u.prefix4, s, PSIZE(p.prefixlen));
1330
1331 table_id = zvrf->table_id;
1332
1333 rib_delete(AFI_IP, api.safi, zvrf_id(zvrf), api.type, api.instance,
1334 api.flags, &p, NULL, NULL, table_id, 0);
1335 client->v4_route_del_cnt++;
1336 return 0;
1337 }
1338
1339 /* MRIB Nexthop lookup for IPv4. */
1340 static int zread_ipv4_nexthop_lookup_mrib(struct zserv *client, u_short length,
1341 struct zebra_vrf *zvrf)
1342 {
1343 struct in_addr addr;
1344 struct route_entry *re;
1345
1346 addr.s_addr = stream_get_ipv4(client->ibuf);
1347 re = rib_match_ipv4_multicast(zvrf_id(zvrf), addr, NULL);
1348 return zsend_ipv4_nexthop_lookup_mrib(client, addr, re, zvrf);
1349 }
1350
1351 /* Zebra server IPv6 prefix add function. */
1352 static int zread_ipv4_route_ipv6_nexthop_add(struct zserv *client,
1353 u_short length,
1354 struct zebra_vrf *zvrf)
1355 {
1356 unsigned int i;
1357 struct stream *s;
1358 struct in6_addr nhop_addr;
1359 struct route_entry *re;
1360 u_char message;
1361 u_char nexthop_num;
1362 u_char nexthop_type;
1363 struct prefix p;
1364 safi_t safi;
1365 static struct in6_addr nexthops[MULTIPATH_NUM];
1366 static unsigned int ifindices[MULTIPATH_NUM];
1367 int ret;
1368 static mpls_label_t labels[MULTIPATH_NUM];
1369 enum lsp_types_t label_type = ZEBRA_LSP_NONE;
1370 mpls_label_t label;
1371 struct nexthop *nexthop;
1372 enum blackhole_type bh_type = BLACKHOLE_NULL;
1373
1374 /* Get input stream. */
1375 s = client->ibuf;
1376
1377 memset(&nhop_addr, 0, sizeof(struct in6_addr));
1378
1379 /* Allocate new re. */
1380 re = XCALLOC(MTYPE_RE, sizeof(struct route_entry));
1381
1382 /* Type, flags, message. */
1383 re->type = stream_getc(s);
1384 re->instance = stream_getw(s);
1385 re->flags = stream_getl(s);
1386 message = stream_getc(s);
1387 safi = stream_getw(s);
1388 re->uptime = time(NULL);
1389
1390 /* IPv4 prefix. */
1391 memset(&p, 0, sizeof(struct prefix_ipv4));
1392 p.family = AF_INET;
1393 p.prefixlen = stream_getc(s);
1394 stream_get(&p.u.prefix4, s, PSIZE(p.prefixlen));
1395
1396 /* VRF ID */
1397 re->vrf_id = zvrf_id(zvrf);
1398
1399 /* We need to give nh-addr, nh-ifindex with the same next-hop object
1400 * to the re to ensure that IPv6 multipathing works; need to coalesce
1401 * these. Clients should send the same number of paired set of
1402 * next-hop-addr/next-hop-ifindices. */
1403 if (CHECK_FLAG(message, ZAPI_MESSAGE_NEXTHOP)) {
1404 unsigned int nh_count = 0;
1405 unsigned int if_count = 0;
1406 unsigned int max_nh_if = 0;
1407
1408 nexthop_num = stream_getc(s);
1409 zserv_nexthop_num_warn(__func__, (const struct prefix *)&p,
1410 nexthop_num);
1411
1412 if (CHECK_FLAG(message, ZAPI_MESSAGE_LABEL))
1413 label_type = lsp_type_from_re_type(client->proto);
1414
1415 for (i = 0; i < nexthop_num; i++) {
1416 nexthop_type = stream_getc(s);
1417
1418 switch (nexthop_type) {
1419 case NEXTHOP_TYPE_IPV6:
1420 stream_get(&nhop_addr, s, 16);
1421 if (nh_count < MULTIPATH_NUM) {
1422 /* For labeled-unicast, each nexthop is
1423 * followed by label. */
1424 if (CHECK_FLAG(message,
1425 ZAPI_MESSAGE_LABEL)) {
1426 label = (mpls_label_t)
1427 stream_getl(s);
1428 labels[nh_count] = label;
1429 }
1430 nexthops[nh_count] = nhop_addr;
1431 nh_count++;
1432 }
1433 break;
1434 case NEXTHOP_TYPE_IFINDEX:
1435 if (if_count < multipath_num) {
1436 ifindices[if_count++] = stream_getl(s);
1437 }
1438 break;
1439 case NEXTHOP_TYPE_BLACKHOLE:
1440 route_entry_nexthop_blackhole_add(re, bh_type);
1441 break;
1442 }
1443 }
1444
1445 max_nh_if = (nh_count > if_count) ? nh_count : if_count;
1446 for (i = 0; i < max_nh_if; i++) {
1447 if ((i < nh_count)
1448 && !IN6_IS_ADDR_UNSPECIFIED(&nexthops[i])) {
1449 if ((i < if_count) && ifindices[i])
1450 nexthop =
1451 route_entry_nexthop_ipv6_ifindex_add(
1452 re, &nexthops[i],
1453 ifindices[i]);
1454 else
1455 nexthop = route_entry_nexthop_ipv6_add(
1456 re, &nexthops[i]);
1457
1458 if (CHECK_FLAG(message, ZAPI_MESSAGE_LABEL))
1459 nexthop_add_labels(nexthop, label_type,
1460 1, &labels[i]);
1461 } else {
1462 if ((i < if_count) && ifindices[i])
1463 route_entry_nexthop_ifindex_add(
1464 re, ifindices[i]);
1465 }
1466 }
1467 }
1468
1469 /* Distance. */
1470 if (CHECK_FLAG(message, ZAPI_MESSAGE_DISTANCE))
1471 re->distance = stream_getc(s);
1472
1473 /* Metric. */
1474 if (CHECK_FLAG(message, ZAPI_MESSAGE_METRIC))
1475 re->metric = stream_getl(s);
1476
1477 /* Tag */
1478 if (CHECK_FLAG(message, ZAPI_MESSAGE_TAG))
1479 re->tag = stream_getl(s);
1480 else
1481 re->tag = 0;
1482
1483 if (CHECK_FLAG(message, ZAPI_MESSAGE_MTU))
1484 re->mtu = stream_getl(s);
1485 else
1486 re->mtu = 0;
1487
1488 /* Table */
1489 re->table = zvrf->table_id;
1490
1491 ret = rib_add_multipath(AFI_IP6, safi, &p, NULL, re);
1492 /* Stats */
1493 if (ret > 0)
1494 client->v4_route_add_cnt++;
1495 else if (ret < 0)
1496 client->v4_route_upd8_cnt++;
1497
1498 return 0;
1499 }
1500
1501 static int zread_ipv6_add(struct zserv *client, u_short length,
1502 struct zebra_vrf *zvrf)
1503 {
1504 unsigned int i;
1505 struct stream *s;
1506 struct in6_addr nhop_addr;
1507 ifindex_t ifindex;
1508 struct route_entry *re;
1509 u_char message;
1510 u_char nexthop_num;
1511 u_char nexthop_type;
1512 struct prefix p;
1513 struct prefix_ipv6 src_p, *src_pp;
1514 safi_t safi;
1515 static struct in6_addr nexthops[MULTIPATH_NUM];
1516 static unsigned int ifindices[MULTIPATH_NUM];
1517 int ret;
1518 static mpls_label_t labels[MULTIPATH_NUM];
1519 enum lsp_types_t label_type = ZEBRA_LSP_NONE;
1520 mpls_label_t label;
1521 struct nexthop *nexthop;
1522 enum blackhole_type bh_type = BLACKHOLE_NULL;
1523
1524 /* Get input stream. */
1525 s = client->ibuf;
1526
1527 memset(&nhop_addr, 0, sizeof(struct in6_addr));
1528
1529 /* Allocate new re. */
1530 re = XCALLOC(MTYPE_RE, sizeof(struct route_entry));
1531
1532 /* Type, flags, message. */
1533 re->type = stream_getc(s);
1534 re->instance = stream_getw(s);
1535 re->flags = stream_getl(s);
1536 message = stream_getc(s);
1537 safi = stream_getw(s);
1538 re->uptime = time(NULL);
1539
1540 /* IPv6 prefix. */
1541 memset(&p, 0, sizeof(struct prefix_ipv6));
1542 p.family = AF_INET6;
1543 p.prefixlen = stream_getc(s);
1544 stream_get(&p.u.prefix6, s, PSIZE(p.prefixlen));
1545
1546 if (CHECK_FLAG(message, ZAPI_MESSAGE_SRCPFX)) {
1547 memset(&src_p, 0, sizeof(struct prefix_ipv6));
1548 src_p.family = AF_INET6;
1549 src_p.prefixlen = stream_getc(s);
1550 stream_get(&src_p.prefix, s, PSIZE(src_p.prefixlen));
1551 src_pp = &src_p;
1552 } else
1553 src_pp = NULL;
1554
1555 /* We need to give nh-addr, nh-ifindex with the same next-hop object
1556 * to the re to ensure that IPv6 multipathing works; need to coalesce
1557 * these. Clients should send the same number of paired set of
1558 * next-hop-addr/next-hop-ifindices. */
1559 if (CHECK_FLAG(message, ZAPI_MESSAGE_NEXTHOP)) {
1560 unsigned int nh_count = 0;
1561 unsigned int if_count = 0;
1562 unsigned int max_nh_if = 0;
1563
1564 nexthop_num = stream_getc(s);
1565 zserv_nexthop_num_warn(__func__, (const struct prefix *)&p,
1566 nexthop_num);
1567
1568 if (CHECK_FLAG(message, ZAPI_MESSAGE_LABEL))
1569 label_type = lsp_type_from_re_type(client->proto);
1570
1571 for (i = 0; i < nexthop_num; i++) {
1572 nexthop_type = stream_getc(s);
1573
1574 switch (nexthop_type) {
1575 case NEXTHOP_TYPE_IPV6:
1576 stream_get(&nhop_addr, s, 16);
1577 if (nh_count < MULTIPATH_NUM) {
1578 /* For labeled-unicast, each nexthop is
1579 * followed by label. */
1580 if (CHECK_FLAG(message,
1581 ZAPI_MESSAGE_LABEL)) {
1582 label = (mpls_label_t)
1583 stream_getl(s);
1584 labels[nh_count] = label;
1585 }
1586 nexthops[nh_count++] = nhop_addr;
1587 }
1588 break;
1589 case NEXTHOP_TYPE_IPV6_IFINDEX:
1590 stream_get(&nhop_addr, s, 16);
1591 ifindex = stream_getl(s);
1592 route_entry_nexthop_ipv6_ifindex_add(
1593 re, &nhop_addr, ifindex);
1594 break;
1595 case NEXTHOP_TYPE_IFINDEX:
1596 if (if_count < multipath_num) {
1597 ifindices[if_count++] = stream_getl(s);
1598 }
1599 break;
1600 case NEXTHOP_TYPE_BLACKHOLE:
1601 route_entry_nexthop_blackhole_add(re, bh_type);
1602 break;
1603 }
1604 }
1605
1606 max_nh_if = (nh_count > if_count) ? nh_count : if_count;
1607 for (i = 0; i < max_nh_if; i++) {
1608 if ((i < nh_count)
1609 && !IN6_IS_ADDR_UNSPECIFIED(&nexthops[i])) {
1610 if ((i < if_count) && ifindices[i])
1611 nexthop =
1612 route_entry_nexthop_ipv6_ifindex_add(
1613 re, &nexthops[i],
1614 ifindices[i]);
1615 else
1616 nexthop = route_entry_nexthop_ipv6_add(
1617 re, &nexthops[i]);
1618 if (CHECK_FLAG(message, ZAPI_MESSAGE_LABEL))
1619 nexthop_add_labels(nexthop, label_type,
1620 1, &labels[i]);
1621 } else {
1622 if ((i < if_count) && ifindices[i])
1623 route_entry_nexthop_ifindex_add(
1624 re, ifindices[i]);
1625 }
1626 }
1627 }
1628
1629 /* Distance. */
1630 if (CHECK_FLAG(message, ZAPI_MESSAGE_DISTANCE))
1631 re->distance = stream_getc(s);
1632
1633 /* Metric. */
1634 if (CHECK_FLAG(message, ZAPI_MESSAGE_METRIC))
1635 re->metric = stream_getl(s);
1636
1637 /* Tag */
1638 if (CHECK_FLAG(message, ZAPI_MESSAGE_TAG))
1639 re->tag = stream_getl(s);
1640 else
1641 re->tag = 0;
1642
1643 if (CHECK_FLAG(message, ZAPI_MESSAGE_MTU))
1644 re->mtu = stream_getl(s);
1645 else
1646 re->mtu = 0;
1647
1648 /* VRF ID */
1649 re->vrf_id = zvrf_id(zvrf);
1650 re->table = zvrf->table_id;
1651
1652 ret = rib_add_multipath(AFI_IP6, safi, &p, src_pp, re);
1653 /* Stats */
1654 if (ret > 0)
1655 client->v6_route_add_cnt++;
1656 else if (ret < 0)
1657 client->v6_route_upd8_cnt++;
1658
1659 return 0;
1660 }
1661
1662 /* Zebra server IPv6 prefix delete function. */
1663 static int zread_ipv6_delete(struct zserv *client, u_short length,
1664 struct zebra_vrf *zvrf)
1665 {
1666 struct stream *s;
1667 struct zapi_ipv6 api;
1668 struct prefix p;
1669 struct prefix_ipv6 src_p, *src_pp;
1670
1671 s = client->ibuf;
1672
1673 /* Type, flags, message. */
1674 api.type = stream_getc(s);
1675 api.instance = stream_getw(s);
1676 api.flags = stream_getl(s);
1677 api.message = stream_getc(s);
1678 api.safi = stream_getw(s);
1679
1680 /* IPv4 prefix. */
1681 memset(&p, 0, sizeof(struct prefix));
1682 p.family = AF_INET6;
1683 p.prefixlen = stream_getc(s);
1684 stream_get(&p.u.prefix6, s, PSIZE(p.prefixlen));
1685
1686 if (CHECK_FLAG(api.message, ZAPI_MESSAGE_SRCPFX)) {
1687 memset(&src_p, 0, sizeof(struct prefix_ipv6));
1688 src_p.family = AF_INET6;
1689 src_p.prefixlen = stream_getc(s);
1690 stream_get(&src_p.prefix, s, PSIZE(src_p.prefixlen));
1691 src_pp = &src_p;
1692 } else
1693 src_pp = NULL;
1694
1695 rib_delete(AFI_IP6, api.safi, zvrf_id(zvrf), api.type, api.instance,
1696 api.flags, &p, src_pp, NULL, client->rtm_table, 0);
1697
1698 client->v6_route_del_cnt++;
1699 return 0;
1700 }
1701
1702 /* Register zebra server router-id information. Send current router-id */
1703 static int zread_router_id_add(struct zserv *client, u_short length,
1704 struct zebra_vrf *zvrf)
1705 {
1706 struct prefix p;
1707
1708 /* Router-id information is needed. */
1709 vrf_bitmap_set(client->ridinfo, zvrf_id(zvrf));
1710
1711 router_id_get(&p, zvrf_id(zvrf));
1712
1713 return zsend_router_id_update(client, &p, zvrf_id(zvrf));
1714 }
1715
1716 /* Unregister zebra server router-id information. */
1717 static int zread_router_id_delete(struct zserv *client, u_short length,
1718 struct zebra_vrf *zvrf)
1719 {
1720 vrf_bitmap_unset(client->ridinfo, zvrf_id(zvrf));
1721 return 0;
1722 }
1723
1724 /* Tie up route-type and client->sock */
1725 static void zread_hello(struct zserv *client)
1726 {
1727 /* type of protocol (lib/zebra.h) */
1728 u_char proto;
1729 u_short instance;
1730
1731 proto = stream_getc(client->ibuf);
1732 instance = stream_getw(client->ibuf);
1733
1734 /* accept only dynamic routing protocols */
1735 if ((proto < ZEBRA_ROUTE_MAX) && (proto > ZEBRA_ROUTE_STATIC)) {
1736 zlog_notice(
1737 "client %d says hello and bids fair to announce only %s routes",
1738 client->sock, zebra_route_string(proto));
1739 if (instance)
1740 zlog_notice("client protocol instance %d", instance);
1741
1742 client->proto = proto;
1743 client->instance = instance;
1744 }
1745 }
1746
1747 /* Unregister all information in a VRF. */
1748 static int zread_vrf_unregister(struct zserv *client, u_short length,
1749 struct zebra_vrf *zvrf)
1750 {
1751 int i;
1752 afi_t afi;
1753
1754 for (afi = AFI_IP; afi < AFI_MAX; afi++)
1755 for (i = 0; i < ZEBRA_ROUTE_MAX; i++)
1756 vrf_bitmap_unset(client->redist[afi][i], zvrf_id(zvrf));
1757 vrf_bitmap_unset(client->redist_default, zvrf_id(zvrf));
1758 vrf_bitmap_unset(client->ifinfo, zvrf_id(zvrf));
1759 vrf_bitmap_unset(client->ridinfo, zvrf_id(zvrf));
1760
1761 return 0;
1762 }
1763
1764 static void zread_mpls_labels(int command, struct zserv *client, u_short length,
1765 vrf_id_t vrf_id)
1766 {
1767 struct stream *s;
1768 enum lsp_types_t type;
1769 struct prefix prefix;
1770 enum nexthop_types_t gtype;
1771 union g_addr gate;
1772 ifindex_t ifindex;
1773 mpls_label_t in_label, out_label;
1774 u_int8_t distance;
1775 struct zebra_vrf *zvrf;
1776
1777 zvrf = vrf_info_lookup(vrf_id);
1778 if (!zvrf)
1779 return;
1780
1781 /* Get input stream. */
1782 s = client->ibuf;
1783
1784 /* Get data. */
1785 type = stream_getc(s);
1786 prefix.family = stream_getl(s);
1787 switch (prefix.family) {
1788 case AF_INET:
1789 prefix.u.prefix4.s_addr = stream_get_ipv4(s);
1790 prefix.prefixlen = stream_getc(s);
1791 gate.ipv4.s_addr = stream_get_ipv4(s);
1792 break;
1793 case AF_INET6:
1794 stream_get(&prefix.u.prefix6, s, 16);
1795 prefix.prefixlen = stream_getc(s);
1796 stream_get(&gate.ipv6, s, 16);
1797 break;
1798 default:
1799 return;
1800 }
1801 ifindex = stream_getl(s);
1802 distance = stream_getc(s);
1803 in_label = stream_getl(s);
1804 out_label = stream_getl(s);
1805
1806 switch (prefix.family) {
1807 case AF_INET:
1808 if (ifindex)
1809 gtype = NEXTHOP_TYPE_IPV4_IFINDEX;
1810 else
1811 gtype = NEXTHOP_TYPE_IPV4;
1812 break;
1813 case AF_INET6:
1814 if (ifindex)
1815 gtype = NEXTHOP_TYPE_IPV6_IFINDEX;
1816 else
1817 gtype = NEXTHOP_TYPE_IPV6;
1818 break;
1819 default:
1820 return;
1821 }
1822
1823 if (!mpls_enabled)
1824 return;
1825
1826 if (command == ZEBRA_MPLS_LABELS_ADD) {
1827 mpls_lsp_install(zvrf, type, in_label, out_label, gtype, &gate,
1828 ifindex);
1829 mpls_ftn_update(1, zvrf, type, &prefix, gtype, &gate, ifindex,
1830 distance, out_label);
1831 } else if (command == ZEBRA_MPLS_LABELS_DELETE) {
1832 mpls_lsp_uninstall(zvrf, type, in_label, gtype, &gate, ifindex);
1833 mpls_ftn_update(0, zvrf, type, &prefix, gtype, &gate, ifindex,
1834 distance, out_label);
1835 }
1836 }
1837 /* Send response to a label manager connect request to client */
1838 static int zsend_label_manager_connect_response(struct zserv *client,
1839 vrf_id_t vrf_id, u_short result)
1840 {
1841 struct stream *s;
1842
1843 s = client->obuf;
1844 stream_reset(s);
1845
1846 zserv_create_header(s, ZEBRA_LABEL_MANAGER_CONNECT, vrf_id);
1847
1848 /* result */
1849 stream_putc(s, result);
1850
1851 /* Write packet size. */
1852 stream_putw_at(s, 0, stream_get_endp(s));
1853
1854 return writen(client->sock, s->data, stream_get_endp(s));
1855 }
1856
1857 static void zread_label_manager_connect(struct zserv *client, vrf_id_t vrf_id)
1858 {
1859 struct stream *s;
1860 /* type of protocol (lib/zebra.h) */
1861 u_char proto;
1862 u_short instance;
1863
1864 /* Get input stream. */
1865 s = client->ibuf;
1866
1867 /* Get data. */
1868 proto = stream_getc(s);
1869 instance = stream_getw(s);
1870
1871 /* accept only dynamic routing protocols */
1872 if ((proto >= ZEBRA_ROUTE_MAX) || (proto <= ZEBRA_ROUTE_STATIC)) {
1873 zlog_err("client %d has wrong protocol %s", client->sock,
1874 zebra_route_string(proto));
1875 zsend_label_manager_connect_response(client, vrf_id, 1);
1876 return;
1877 }
1878 zlog_notice("client %d with instance %u connected as %s", client->sock,
1879 instance, zebra_route_string(proto));
1880 client->proto = proto;
1881 client->instance = instance;
1882
1883 /*
1884 Release previous labels of same protocol and instance.
1885 This is done in case it restarted from an unexpected shutdown.
1886 */
1887 release_daemon_chunks(proto, instance);
1888
1889 zlog_debug(
1890 " Label Manager client connected: sock %d, proto %s, instance %u",
1891 client->sock, zebra_route_string(proto), instance);
1892 /* send response back */
1893 zsend_label_manager_connect_response(client, vrf_id, 0);
1894 }
1895 /* Send response to a get label chunk request to client */
1896 static int zsend_assign_label_chunk_response(struct zserv *client,
1897 vrf_id_t vrf_id,
1898 struct label_manager_chunk *lmc)
1899 {
1900 struct stream *s;
1901
1902 s = client->obuf;
1903 stream_reset(s);
1904
1905 zserv_create_header(s, ZEBRA_GET_LABEL_CHUNK, vrf_id);
1906
1907 if (lmc) {
1908 /* keep */
1909 stream_putc(s, lmc->keep);
1910 /* start and end labels */
1911 stream_putl(s, lmc->start);
1912 stream_putl(s, lmc->end);
1913 }
1914
1915 /* Write packet size. */
1916 stream_putw_at(s, 0, stream_get_endp(s));
1917
1918 return writen(client->sock, s->data, stream_get_endp(s));
1919 }
1920
1921 static void zread_get_label_chunk(struct zserv *client, vrf_id_t vrf_id)
1922 {
1923 struct stream *s;
1924 u_char keep;
1925 uint32_t size;
1926 struct label_manager_chunk *lmc;
1927
1928 /* Get input stream. */
1929 s = client->ibuf;
1930
1931 /* Get data. */
1932 keep = stream_getc(s);
1933 size = stream_getl(s);
1934
1935 lmc = assign_label_chunk(client->proto, client->instance, keep, size);
1936 if (!lmc)
1937 zlog_err("%s: Unable to assign Label Chunk of size %u",
1938 __func__, size);
1939 else
1940 zlog_debug("Assigned Label Chunk %u - %u to %u", lmc->start,
1941 lmc->end, keep);
1942 /* send response back */
1943 zsend_assign_label_chunk_response(client, vrf_id, lmc);
1944 }
1945
1946 static void zread_release_label_chunk(struct zserv *client)
1947 {
1948 struct stream *s;
1949 uint32_t start, end;
1950
1951 /* Get input stream. */
1952 s = client->ibuf;
1953
1954 /* Get data. */
1955 start = stream_getl(s);
1956 end = stream_getl(s);
1957
1958 release_label_chunk(client->proto, client->instance, start, end);
1959 }
1960 static void zread_label_manager_request(int cmd, struct zserv *client,
1961 vrf_id_t vrf_id)
1962 {
1963 /* to avoid sending other messages like ZERBA_INTERFACE_UP */
1964 if (cmd == ZEBRA_LABEL_MANAGER_CONNECT)
1965 client->is_synchronous = 1;
1966
1967 /* external label manager */
1968 if (lm_is_external)
1969 zread_relay_label_manager_request(cmd, client, vrf_id);
1970 /* this is a label manager */
1971 else {
1972 if (cmd == ZEBRA_LABEL_MANAGER_CONNECT)
1973 zread_label_manager_connect(client, vrf_id);
1974 else {
1975 /* Sanity: don't allow 'unidentified' requests */
1976 if (!client->proto) {
1977 zlog_err(
1978 "Got label request from an unidentified client");
1979 return;
1980 }
1981 if (cmd == ZEBRA_GET_LABEL_CHUNK)
1982 zread_get_label_chunk(client, vrf_id);
1983 else if (cmd == ZEBRA_RELEASE_LABEL_CHUNK)
1984 zread_release_label_chunk(client);
1985 }
1986 }
1987 }
1988
1989 static int zread_pseudowire(int command, struct zserv *client, u_short length,
1990 vrf_id_t vrf_id)
1991 {
1992 struct stream *s;
1993 struct zebra_vrf *zvrf;
1994 char ifname[IF_NAMESIZE];
1995 ifindex_t ifindex;
1996 int type;
1997 int af;
1998 union g_addr nexthop;
1999 uint32_t local_label;
2000 uint32_t remote_label;
2001 uint8_t flags;
2002 union pw_protocol_fields data;
2003 uint8_t protocol;
2004 struct zebra_pw *pw;
2005
2006 zvrf = vrf_info_lookup(vrf_id);
2007 if (!zvrf)
2008 return -1;
2009
2010 /* Get input stream. */
2011 s = client->ibuf;
2012
2013 /* Get data. */
2014 stream_get(ifname, s, IF_NAMESIZE);
2015 ifindex = stream_getl(s);
2016 type = stream_getl(s);
2017 af = stream_getl(s);
2018 switch (af) {
2019 case AF_INET:
2020 nexthop.ipv4.s_addr = stream_get_ipv4(s);
2021 break;
2022 case AF_INET6:
2023 stream_get(&nexthop.ipv6, s, 16);
2024 break;
2025 default:
2026 return -1;
2027 }
2028 local_label = stream_getl(s);
2029 remote_label = stream_getl(s);
2030 flags = stream_getc(s);
2031 stream_get(&data, s, sizeof(data));
2032 protocol = client->proto;
2033
2034 pw = zebra_pw_find(zvrf, ifname);
2035 switch (command) {
2036 case ZEBRA_PW_ADD:
2037 if (pw) {
2038 zlog_warn("%s: pseudowire %s already exists [%s]",
2039 __func__, ifname,
2040 zserv_command_string(command));
2041 return -1;
2042 }
2043
2044 zebra_pw_add(zvrf, ifname, protocol, client);
2045 break;
2046 case ZEBRA_PW_DELETE:
2047 if (!pw) {
2048 zlog_warn("%s: pseudowire %s not found [%s]", __func__,
2049 ifname, zserv_command_string(command));
2050 return -1;
2051 }
2052
2053 zebra_pw_del(zvrf, pw);
2054 break;
2055 case ZEBRA_PW_SET:
2056 case ZEBRA_PW_UNSET:
2057 if (!pw) {
2058 zlog_warn("%s: pseudowire %s not found [%s]", __func__,
2059 ifname, zserv_command_string(command));
2060 return -1;
2061 }
2062
2063 switch (command) {
2064 case ZEBRA_PW_SET:
2065 pw->enabled = 1;
2066 break;
2067 case ZEBRA_PW_UNSET:
2068 pw->enabled = 0;
2069 break;
2070 }
2071
2072 zebra_pw_change(pw, ifindex, type, af, &nexthop, local_label,
2073 remote_label, flags, &data);
2074 break;
2075 }
2076
2077 return 0;
2078 }
2079
2080 /* Cleanup registered nexthops (across VRFs) upon client disconnect. */
2081 static void zebra_client_close_cleanup_rnh(struct zserv *client)
2082 {
2083 struct vrf *vrf;
2084 struct zebra_vrf *zvrf;
2085
2086 RB_FOREACH (vrf, vrf_id_head, &vrfs_by_id) {
2087 if ((zvrf = vrf->info) != NULL) {
2088 zebra_cleanup_rnh_client(zvrf_id(zvrf), AF_INET, client,
2089 RNH_NEXTHOP_TYPE);
2090 zebra_cleanup_rnh_client(zvrf_id(zvrf), AF_INET6,
2091 client, RNH_NEXTHOP_TYPE);
2092 zebra_cleanup_rnh_client(zvrf_id(zvrf), AF_INET, client,
2093 RNH_IMPORT_CHECK_TYPE);
2094 zebra_cleanup_rnh_client(zvrf_id(zvrf), AF_INET6,
2095 client, RNH_IMPORT_CHECK_TYPE);
2096 if (client->proto == ZEBRA_ROUTE_LDP) {
2097 hash_iterate(zvrf->lsp_table,
2098 mpls_ldp_lsp_uninstall_all,
2099 zvrf->lsp_table);
2100 mpls_ldp_ftn_uninstall_all(zvrf, AFI_IP);
2101 mpls_ldp_ftn_uninstall_all(zvrf, AFI_IP6);
2102 }
2103 }
2104 }
2105 }
2106
2107 /* Close zebra client. */
2108 static void zebra_client_close(struct zserv *client)
2109 {
2110 /* Send client de-registration to BFD */
2111 zebra_ptm_bfd_client_deregister(client->proto);
2112
2113 /* Cleanup any registered nexthops - across all VRFs. */
2114 zebra_client_close_cleanup_rnh(client);
2115
2116 /* Release Label Manager chunks */
2117 release_daemon_chunks(client->proto, client->instance);
2118
2119 /* Cleanup any FECs registered by this client. */
2120 zebra_mpls_cleanup_fecs_for_client(vrf_info_lookup(VRF_DEFAULT),
2121 client);
2122
2123 /* Remove pseudowires associated with this client */
2124 zebra_pw_client_close(client);
2125
2126 /* Close file descriptor. */
2127 if (client->sock) {
2128 unsigned long nroutes;
2129
2130 close(client->sock);
2131 nroutes = rib_score_proto(client->proto, client->instance);
2132 zlog_notice(
2133 "client %d disconnected. %lu %s routes removed from the rib",
2134 client->sock, nroutes,
2135 zebra_route_string(client->proto));
2136 client->sock = -1;
2137 }
2138
2139 /* Free stream buffers. */
2140 if (client->ibuf)
2141 stream_free(client->ibuf);
2142 if (client->obuf)
2143 stream_free(client->obuf);
2144 if (client->wb)
2145 buffer_free(client->wb);
2146
2147 /* Release threads. */
2148 if (client->t_read)
2149 thread_cancel(client->t_read);
2150 if (client->t_write)
2151 thread_cancel(client->t_write);
2152 if (client->t_suicide)
2153 thread_cancel(client->t_suicide);
2154
2155 /* Free bitmaps. */
2156 for (afi_t afi = AFI_IP; afi < AFI_MAX; afi++)
2157 for (int i = 0; i < ZEBRA_ROUTE_MAX; i++)
2158 vrf_bitmap_free(client->redist[afi][i]);
2159
2160 vrf_bitmap_free(client->redist_default);
2161 vrf_bitmap_free(client->ifinfo);
2162 vrf_bitmap_free(client->ridinfo);
2163
2164 /* Free client structure. */
2165 listnode_delete(zebrad.client_list, client);
2166 XFREE(MTYPE_TMP, client);
2167 }
2168
2169 /* Make new client. */
2170 static void zebra_client_create(int sock)
2171 {
2172 struct zserv *client;
2173 int i;
2174 afi_t afi;
2175
2176 client = XCALLOC(MTYPE_TMP, sizeof(struct zserv));
2177
2178 /* Make client input/output buffer. */
2179 client->sock = sock;
2180 client->ibuf = stream_new(ZEBRA_MAX_PACKET_SIZ);
2181 client->obuf = stream_new(ZEBRA_MAX_PACKET_SIZ);
2182 client->wb = buffer_new(0);
2183
2184 /* Set table number. */
2185 client->rtm_table = zebrad.rtm_table_default;
2186
2187 client->connect_time = monotime(NULL);
2188 /* Initialize flags */
2189 for (afi = AFI_IP; afi < AFI_MAX; afi++)
2190 for (i = 0; i < ZEBRA_ROUTE_MAX; i++)
2191 client->redist[afi][i] = vrf_bitmap_init();
2192 client->redist_default = vrf_bitmap_init();
2193 client->ifinfo = vrf_bitmap_init();
2194 client->ridinfo = vrf_bitmap_init();
2195
2196 /* by default, it's not a synchronous client */
2197 client->is_synchronous = 0;
2198
2199 /* Add this client to linked list. */
2200 listnode_add(zebrad.client_list, client);
2201
2202 /* Make new read thread. */
2203 zebra_event(ZEBRA_READ, sock, client);
2204
2205 zebra_vrf_update_all(client);
2206 }
2207
2208 static int zread_interface_set_master(struct zserv *client, int sock,
2209 u_short length)
2210 {
2211 struct interface *master;
2212 struct interface *slave;
2213 struct stream *s = client->ibuf;
2214 int ifindex;
2215 vrf_id_t vrf_id;
2216
2217 vrf_id = stream_getw(s);
2218 ifindex = stream_getl(s);
2219 master = if_lookup_by_index(ifindex, vrf_id);
2220
2221 vrf_id = stream_getw(s);
2222 ifindex = stream_getl(s);
2223 slave = if_lookup_by_index(ifindex, vrf_id);
2224
2225 if (!master || !slave)
2226 return 0;
2227
2228 kernel_interface_set_master(master, slave);
2229
2230 return 1;
2231 }
2232
2233 /* Handler of zebra service request. */
2234 static int zebra_client_read(struct thread *thread)
2235 {
2236 int sock;
2237 struct zserv *client;
2238 size_t already;
2239 uint16_t length, command;
2240 uint8_t marker, version;
2241 vrf_id_t vrf_id;
2242 struct zebra_vrf *zvrf;
2243
2244 /* Get thread data. Reset reading thread because I'm running. */
2245 sock = THREAD_FD(thread);
2246 client = THREAD_ARG(thread);
2247 client->t_read = NULL;
2248
2249 if (client->t_suicide) {
2250 zebra_client_close(client);
2251 return -1;
2252 }
2253
2254 /* Read length and command (if we don't have it already). */
2255 if ((already = stream_get_endp(client->ibuf)) < ZEBRA_HEADER_SIZE) {
2256 ssize_t nbyte;
2257 if (((nbyte = stream_read_try(client->ibuf, sock,
2258 ZEBRA_HEADER_SIZE - already))
2259 == 0)
2260 || (nbyte == -1)) {
2261 if (IS_ZEBRA_DEBUG_EVENT)
2262 zlog_debug("connection closed socket [%d]",
2263 sock);
2264 zebra_client_close(client);
2265 return -1;
2266 }
2267 if (nbyte != (ssize_t)(ZEBRA_HEADER_SIZE - already)) {
2268 /* Try again later. */
2269 zebra_event(ZEBRA_READ, sock, client);
2270 return 0;
2271 }
2272 already = ZEBRA_HEADER_SIZE;
2273 }
2274
2275 /* Reset to read from the beginning of the incoming packet. */
2276 stream_set_getp(client->ibuf, 0);
2277
2278 /* Fetch header values */
2279 length = stream_getw(client->ibuf);
2280 marker = stream_getc(client->ibuf);
2281 version = stream_getc(client->ibuf);
2282 vrf_id = stream_getw(client->ibuf);
2283 command = stream_getw(client->ibuf);
2284
2285 if (marker != ZEBRA_HEADER_MARKER || version != ZSERV_VERSION) {
2286 zlog_err(
2287 "%s: socket %d version mismatch, marker %d, version %d",
2288 __func__, sock, marker, version);
2289 zebra_client_close(client);
2290 return -1;
2291 }
2292 if (length < ZEBRA_HEADER_SIZE) {
2293 zlog_warn(
2294 "%s: socket %d message length %u is less than header size %d",
2295 __func__, sock, length, ZEBRA_HEADER_SIZE);
2296 zebra_client_close(client);
2297 return -1;
2298 }
2299 if (length > STREAM_SIZE(client->ibuf)) {
2300 zlog_warn(
2301 "%s: socket %d message length %u exceeds buffer size %lu",
2302 __func__, sock, length,
2303 (u_long)STREAM_SIZE(client->ibuf));
2304 zebra_client_close(client);
2305 return -1;
2306 }
2307
2308 /* Read rest of data. */
2309 if (already < length) {
2310 ssize_t nbyte;
2311 if (((nbyte = stream_read_try(client->ibuf, sock,
2312 length - already))
2313 == 0)
2314 || (nbyte == -1)) {
2315 if (IS_ZEBRA_DEBUG_EVENT)
2316 zlog_debug(
2317 "connection closed [%d] when reading zebra data",
2318 sock);
2319 zebra_client_close(client);
2320 return -1;
2321 }
2322 if (nbyte != (ssize_t)(length - already)) {
2323 /* Try again later. */
2324 zebra_event(ZEBRA_READ, sock, client);
2325 return 0;
2326 }
2327 }
2328
2329 length -= ZEBRA_HEADER_SIZE;
2330
2331 /* Debug packet information. */
2332 if (IS_ZEBRA_DEBUG_EVENT)
2333 zlog_debug("zebra message comes from socket [%d]", sock);
2334
2335 if (IS_ZEBRA_DEBUG_PACKET && IS_ZEBRA_DEBUG_RECV)
2336 zlog_debug("zebra message received [%s] %d in VRF %u",
2337 zserv_command_string(command), length, vrf_id);
2338
2339 client->last_read_time = monotime(NULL);
2340 client->last_read_cmd = command;
2341
2342 zvrf = zebra_vrf_lookup_by_id(vrf_id);
2343 if (!zvrf) {
2344 if (IS_ZEBRA_DEBUG_PACKET && IS_ZEBRA_DEBUG_RECV)
2345 zlog_debug("zebra received unknown VRF[%u]", vrf_id);
2346 goto zclient_read_out;
2347 }
2348
2349 switch (command) {
2350 case ZEBRA_ROUTER_ID_ADD:
2351 zread_router_id_add(client, length, zvrf);
2352 break;
2353 case ZEBRA_ROUTER_ID_DELETE:
2354 zread_router_id_delete(client, length, zvrf);
2355 break;
2356 case ZEBRA_INTERFACE_ADD:
2357 zread_interface_add(client, length, zvrf);
2358 break;
2359 case ZEBRA_INTERFACE_DELETE:
2360 zread_interface_delete(client, length, zvrf);
2361 break;
2362 case ZEBRA_ROUTE_ADD:
2363 zread_route_add(client, length, zvrf);
2364 break;
2365 case ZEBRA_ROUTE_DELETE:
2366 zread_route_del(client, length, zvrf);
2367 break;
2368 case ZEBRA_IPV4_ROUTE_ADD:
2369 zread_ipv4_add(client, length, zvrf);
2370 break;
2371 case ZEBRA_IPV4_ROUTE_DELETE:
2372 zread_ipv4_delete(client, length, zvrf);
2373 break;
2374 case ZEBRA_IPV4_ROUTE_IPV6_NEXTHOP_ADD:
2375 zread_ipv4_route_ipv6_nexthop_add(client, length, zvrf);
2376 break;
2377 case ZEBRA_IPV6_ROUTE_ADD:
2378 zread_ipv6_add(client, length, zvrf);
2379 break;
2380 case ZEBRA_IPV6_ROUTE_DELETE:
2381 zread_ipv6_delete(client, length, zvrf);
2382 break;
2383 case ZEBRA_REDISTRIBUTE_ADD:
2384 zebra_redistribute_add(command, client, length, zvrf);
2385 break;
2386 case ZEBRA_REDISTRIBUTE_DELETE:
2387 zebra_redistribute_delete(command, client, length, zvrf);
2388 break;
2389 case ZEBRA_REDISTRIBUTE_DEFAULT_ADD:
2390 zebra_redistribute_default_add(command, client, length, zvrf);
2391 break;
2392 case ZEBRA_REDISTRIBUTE_DEFAULT_DELETE:
2393 zebra_redistribute_default_delete(command, client, length,
2394 zvrf);
2395 break;
2396 case ZEBRA_IPV4_NEXTHOP_LOOKUP_MRIB:
2397 zread_ipv4_nexthop_lookup_mrib(client, length, zvrf);
2398 break;
2399 case ZEBRA_HELLO:
2400 zread_hello(client);
2401 break;
2402 case ZEBRA_NEXTHOP_REGISTER:
2403 zserv_rnh_register(client, sock, length, RNH_NEXTHOP_TYPE,
2404 zvrf);
2405 break;
2406 case ZEBRA_NEXTHOP_UNREGISTER:
2407 zserv_rnh_unregister(client, sock, length, RNH_NEXTHOP_TYPE,
2408 zvrf);
2409 break;
2410 case ZEBRA_IMPORT_ROUTE_REGISTER:
2411 zserv_rnh_register(client, sock, length, RNH_IMPORT_CHECK_TYPE,
2412 zvrf);
2413 break;
2414 case ZEBRA_IMPORT_ROUTE_UNREGISTER:
2415 zserv_rnh_unregister(client, sock, length,
2416 RNH_IMPORT_CHECK_TYPE, zvrf);
2417 break;
2418 case ZEBRA_BFD_DEST_UPDATE:
2419 case ZEBRA_BFD_DEST_REGISTER:
2420 zebra_ptm_bfd_dst_register(client, sock, length, command, zvrf);
2421 break;
2422 case ZEBRA_BFD_DEST_DEREGISTER:
2423 zebra_ptm_bfd_dst_deregister(client, sock, length, zvrf);
2424 break;
2425 case ZEBRA_VRF_UNREGISTER:
2426 zread_vrf_unregister(client, length, zvrf);
2427 break;
2428 case ZEBRA_BFD_CLIENT_REGISTER:
2429 zebra_ptm_bfd_client_register(client, sock, length);
2430 break;
2431 case ZEBRA_INTERFACE_ENABLE_RADV:
2432 #if defined(HAVE_RTADV)
2433 zebra_interface_radv_set(client, sock, length, zvrf, 1);
2434 #endif
2435 break;
2436 case ZEBRA_INTERFACE_DISABLE_RADV:
2437 #if defined(HAVE_RTADV)
2438 zebra_interface_radv_set(client, sock, length, zvrf, 0);
2439 #endif
2440 break;
2441 case ZEBRA_MPLS_LABELS_ADD:
2442 case ZEBRA_MPLS_LABELS_DELETE:
2443 zread_mpls_labels(command, client, length, vrf_id);
2444 break;
2445 case ZEBRA_IPMR_ROUTE_STATS:
2446 zebra_ipmr_route_stats(client, sock, length, zvrf);
2447 break;
2448 case ZEBRA_LABEL_MANAGER_CONNECT:
2449 case ZEBRA_GET_LABEL_CHUNK:
2450 case ZEBRA_RELEASE_LABEL_CHUNK:
2451 zread_label_manager_request(command, client, vrf_id);
2452 break;
2453 case ZEBRA_FEC_REGISTER:
2454 zserv_fec_register(client, sock, length);
2455 break;
2456 case ZEBRA_FEC_UNREGISTER:
2457 zserv_fec_unregister(client, sock, length);
2458 break;
2459 case ZEBRA_ADVERTISE_DEFAULT_GW:
2460 zebra_vxlan_advertise_gw_macip(client, sock, length, zvrf);
2461 break;
2462 case ZEBRA_ADVERTISE_ALL_VNI:
2463 zebra_vxlan_advertise_all_vni(client, sock, length, zvrf);
2464 break;
2465 case ZEBRA_REMOTE_VTEP_ADD:
2466 zebra_vxlan_remote_vtep_add(client, sock, length, zvrf);
2467 break;
2468 case ZEBRA_REMOTE_VTEP_DEL:
2469 zebra_vxlan_remote_vtep_del(client, sock, length, zvrf);
2470 break;
2471 case ZEBRA_REMOTE_MACIP_ADD:
2472 zebra_vxlan_remote_macip_add(client, sock, length, zvrf);
2473 break;
2474 case ZEBRA_REMOTE_MACIP_DEL:
2475 zebra_vxlan_remote_macip_del(client, sock, length, zvrf);
2476 break;
2477 case ZEBRA_INTERFACE_SET_MASTER:
2478 zread_interface_set_master(client, sock, length);
2479 break;
2480 case ZEBRA_PW_ADD:
2481 case ZEBRA_PW_DELETE:
2482 case ZEBRA_PW_SET:
2483 case ZEBRA_PW_UNSET:
2484 zread_pseudowire(command, client, length, vrf_id);
2485 break;
2486 default:
2487 zlog_info("Zebra received unknown command %d", command);
2488 break;
2489 }
2490
2491 if (client->t_suicide) {
2492 /* No need to wait for thread callback, just kill immediately.
2493 */
2494 zebra_client_close(client);
2495 return -1;
2496 }
2497
2498 zclient_read_out:
2499 stream_reset(client->ibuf);
2500 zebra_event(ZEBRA_READ, sock, client);
2501 return 0;
2502 }
2503
2504
2505 /* Accept code of zebra server socket. */
2506 static int zebra_accept(struct thread *thread)
2507 {
2508 int accept_sock;
2509 int client_sock;
2510 struct sockaddr_in client;
2511 socklen_t len;
2512
2513 accept_sock = THREAD_FD(thread);
2514
2515 /* Reregister myself. */
2516 zebra_event(ZEBRA_SERV, accept_sock, NULL);
2517
2518 len = sizeof(struct sockaddr_in);
2519 client_sock = accept(accept_sock, (struct sockaddr *)&client, &len);
2520
2521 if (client_sock < 0) {
2522 zlog_warn("Can't accept zebra socket: %s",
2523 safe_strerror(errno));
2524 return -1;
2525 }
2526
2527 /* Make client socket non-blocking. */
2528 set_nonblocking(client_sock);
2529
2530 /* Create new zebra client. */
2531 zebra_client_create(client_sock);
2532
2533 return 0;
2534 }
2535
2536 /* Make zebra server socket, wiping any existing one (see bug #403). */
2537 void zebra_zserv_socket_init(char *path)
2538 {
2539 int ret;
2540 int sock;
2541 mode_t old_mask;
2542 struct sockaddr_storage sa;
2543 socklen_t sa_len;
2544
2545 if (!frr_zclient_addr(&sa, &sa_len, path))
2546 /* should be caught in zebra main() */
2547 return;
2548
2549 /* Set umask */
2550 old_mask = umask(0077);
2551
2552 /* Make UNIX domain socket. */
2553 sock = socket(sa.ss_family, SOCK_STREAM, 0);
2554 if (sock < 0) {
2555 zlog_warn("Can't create zserv socket: %s",
2556 safe_strerror(errno));
2557 zlog_warn(
2558 "zebra can't provide full functionality due to above error");
2559 return;
2560 }
2561
2562 if (sa.ss_family != AF_UNIX) {
2563 sockopt_reuseaddr(sock);
2564 sockopt_reuseport(sock);
2565 } else {
2566 struct sockaddr_un *suna = (struct sockaddr_un *)&sa;
2567 if (suna->sun_path[0])
2568 unlink(suna->sun_path);
2569 }
2570
2571 if (sa.ss_family != AF_UNIX && zserv_privs.change(ZPRIVS_RAISE))
2572 zlog_err("Can't raise privileges");
2573
2574 ret = bind(sock, (struct sockaddr *)&sa, sa_len);
2575 if (ret < 0) {
2576 zlog_warn("Can't bind zserv socket on %s: %s", path,
2577 safe_strerror(errno));
2578 zlog_warn(
2579 "zebra can't provide full functionality due to above error");
2580 close(sock);
2581 return;
2582 }
2583 if (sa.ss_family != AF_UNIX && zserv_privs.change(ZPRIVS_LOWER))
2584 zlog_err("Can't lower privileges");
2585
2586 ret = listen(sock, 5);
2587 if (ret < 0) {
2588 zlog_warn("Can't listen to zserv socket %s: %s", path,
2589 safe_strerror(errno));
2590 zlog_warn(
2591 "zebra can't provide full functionality due to above error");
2592 close(sock);
2593 return;
2594 }
2595
2596 umask(old_mask);
2597
2598 zebra_event(ZEBRA_SERV, sock, NULL);
2599 }
2600
2601
2602 static void zebra_event(enum event event, int sock, struct zserv *client)
2603 {
2604 switch (event) {
2605 case ZEBRA_SERV:
2606 thread_add_read(zebrad.master, zebra_accept, client, sock,
2607 NULL);
2608 break;
2609 case ZEBRA_READ:
2610 client->t_read = NULL;
2611 thread_add_read(zebrad.master, zebra_client_read, client, sock,
2612 &client->t_read);
2613 break;
2614 case ZEBRA_WRITE:
2615 /**/
2616 break;
2617 }
2618 }
2619
2620 #define ZEBRA_TIME_BUF 32
2621 static char *zserv_time_buf(time_t *time1, char *buf, int buflen)
2622 {
2623 struct tm *tm;
2624 time_t now;
2625
2626 assert(buf != NULL);
2627 assert(buflen >= ZEBRA_TIME_BUF);
2628 assert(time1 != NULL);
2629
2630 if (!*time1) {
2631 snprintf(buf, buflen, "never ");
2632 return (buf);
2633 }
2634
2635 now = monotime(NULL);
2636 now -= *time1;
2637 tm = gmtime(&now);
2638
2639 if (now < ONE_DAY_SECOND)
2640 snprintf(buf, buflen, "%02d:%02d:%02d", tm->tm_hour, tm->tm_min,
2641 tm->tm_sec);
2642 else if (now < ONE_WEEK_SECOND)
2643 snprintf(buf, buflen, "%dd%02dh%02dm", tm->tm_yday, tm->tm_hour,
2644 tm->tm_min);
2645 else
2646 snprintf(buf, buflen, "%02dw%dd%02dh", tm->tm_yday / 7,
2647 tm->tm_yday - ((tm->tm_yday / 7) * 7), tm->tm_hour);
2648 return buf;
2649 }
2650
2651 static void zebra_show_client_detail(struct vty *vty, struct zserv *client)
2652 {
2653 char cbuf[ZEBRA_TIME_BUF], rbuf[ZEBRA_TIME_BUF];
2654 char wbuf[ZEBRA_TIME_BUF], nhbuf[ZEBRA_TIME_BUF], mbuf[ZEBRA_TIME_BUF];
2655
2656 vty_out(vty, "Client: %s", zebra_route_string(client->proto));
2657 if (client->instance)
2658 vty_out(vty, " Instance: %d", client->instance);
2659 vty_out(vty, "\n");
2660
2661 vty_out(vty, "------------------------ \n");
2662 vty_out(vty, "FD: %d \n", client->sock);
2663 vty_out(vty, "Route Table ID: %d \n", client->rtm_table);
2664
2665 vty_out(vty, "Connect Time: %s \n",
2666 zserv_time_buf(&client->connect_time, cbuf, ZEBRA_TIME_BUF));
2667 if (client->nh_reg_time) {
2668 vty_out(vty, "Nexthop Registry Time: %s \n",
2669 zserv_time_buf(&client->nh_reg_time, nhbuf,
2670 ZEBRA_TIME_BUF));
2671 if (client->nh_last_upd_time)
2672 vty_out(vty, "Nexthop Last Update Time: %s \n",
2673 zserv_time_buf(&client->nh_last_upd_time, mbuf,
2674 ZEBRA_TIME_BUF));
2675 else
2676 vty_out(vty, "No Nexthop Update sent\n");
2677 } else
2678 vty_out(vty, "Not registered for Nexthop Updates\n");
2679
2680 vty_out(vty, "Last Msg Rx Time: %s \n",
2681 zserv_time_buf(&client->last_read_time, rbuf, ZEBRA_TIME_BUF));
2682 vty_out(vty, "Last Msg Tx Time: %s \n",
2683 zserv_time_buf(&client->last_write_time, wbuf, ZEBRA_TIME_BUF));
2684 if (client->last_read_time)
2685 vty_out(vty, "Last Rcvd Cmd: %s \n",
2686 zserv_command_string(client->last_read_cmd));
2687 if (client->last_write_time)
2688 vty_out(vty, "Last Sent Cmd: %s \n",
2689 zserv_command_string(client->last_write_cmd));
2690 vty_out(vty, "\n");
2691
2692 vty_out(vty, "Type Add Update Del \n");
2693 vty_out(vty, "================================================== \n");
2694 vty_out(vty, "IPv4 %-12d%-12d%-12d\n", client->v4_route_add_cnt,
2695 client->v4_route_upd8_cnt, client->v4_route_del_cnt);
2696 vty_out(vty, "IPv6 %-12d%-12d%-12d\n", client->v6_route_add_cnt,
2697 client->v6_route_upd8_cnt, client->v6_route_del_cnt);
2698 vty_out(vty, "Redist:v4 %-12d%-12d%-12d\n", client->redist_v4_add_cnt,
2699 0, client->redist_v4_del_cnt);
2700 vty_out(vty, "Redist:v6 %-12d%-12d%-12d\n", client->redist_v6_add_cnt,
2701 0, client->redist_v6_del_cnt);
2702 vty_out(vty, "Connected %-12d%-12d%-12d\n", client->ifadd_cnt, 0,
2703 client->ifdel_cnt);
2704 vty_out(vty, "BFD peer %-12d%-12d%-12d\n", client->bfd_peer_add_cnt,
2705 client->bfd_peer_upd8_cnt, client->bfd_peer_del_cnt);
2706 vty_out(vty, "Interface Up Notifications: %d\n", client->ifup_cnt);
2707 vty_out(vty, "Interface Down Notifications: %d\n", client->ifdown_cnt);
2708 vty_out(vty, "VNI add notifications: %d\n", client->vniadd_cnt);
2709 vty_out(vty, "VNI delete notifications: %d\n", client->vnidel_cnt);
2710 vty_out(vty, "MAC-IP add notifications: %d\n", client->macipadd_cnt);
2711 vty_out(vty, "MAC-IP delete notifications: %d\n", client->macipdel_cnt);
2712
2713 vty_out(vty, "\n");
2714 return;
2715 }
2716
2717 static void zebra_show_client_brief(struct vty *vty, struct zserv *client)
2718 {
2719 char cbuf[ZEBRA_TIME_BUF], rbuf[ZEBRA_TIME_BUF];
2720 char wbuf[ZEBRA_TIME_BUF];
2721
2722 vty_out(vty, "%-8s%12s %12s%12s%8d/%-8d%8d/%-8d\n",
2723 zebra_route_string(client->proto),
2724 zserv_time_buf(&client->connect_time, cbuf, ZEBRA_TIME_BUF),
2725 zserv_time_buf(&client->last_read_time, rbuf, ZEBRA_TIME_BUF),
2726 zserv_time_buf(&client->last_write_time, wbuf, ZEBRA_TIME_BUF),
2727 client->v4_route_add_cnt + client->v4_route_upd8_cnt,
2728 client->v4_route_del_cnt,
2729 client->v6_route_add_cnt + client->v6_route_upd8_cnt,
2730 client->v6_route_del_cnt);
2731 }
2732
2733 struct zserv *zebra_find_client(u_char proto)
2734 {
2735 struct listnode *node, *nnode;
2736 struct zserv *client;
2737
2738 for (ALL_LIST_ELEMENTS(zebrad.client_list, node, nnode, client)) {
2739 if (client->proto == proto)
2740 return client;
2741 }
2742
2743 return NULL;
2744 }
2745
2746 #ifdef HAVE_NETLINK
2747 /* Display default rtm_table for all clients. */
2748 DEFUN (show_table,
2749 show_table_cmd,
2750 "show table",
2751 SHOW_STR
2752 "default routing table to use for all clients\n")
2753 {
2754 vty_out(vty, "table %d\n", zebrad.rtm_table_default);
2755 return CMD_SUCCESS;
2756 }
2757
2758 DEFUN (config_table,
2759 config_table_cmd,
2760 "table TABLENO",
2761 "Configure target kernel routing table\n"
2762 "TABLE integer\n")
2763 {
2764 zebrad.rtm_table_default = strtol(argv[1]->arg, (char **)0, 10);
2765 return CMD_SUCCESS;
2766 }
2767
2768 DEFUN (no_config_table,
2769 no_config_table_cmd,
2770 "no table [TABLENO]",
2771 NO_STR
2772 "Configure target kernel routing table\n"
2773 "TABLE integer\n")
2774 {
2775 zebrad.rtm_table_default = 0;
2776 return CMD_SUCCESS;
2777 }
2778 #endif
2779
2780 DEFUN (ip_forwarding,
2781 ip_forwarding_cmd,
2782 "ip forwarding",
2783 IP_STR
2784 "Turn on IP forwarding")
2785 {
2786 int ret;
2787
2788 ret = ipforward();
2789 if (ret == 0)
2790 ret = ipforward_on();
2791
2792 if (ret == 0) {
2793 vty_out(vty, "Can't turn on IP forwarding\n");
2794 return CMD_WARNING_CONFIG_FAILED;
2795 }
2796
2797 return CMD_SUCCESS;
2798 }
2799
2800 DEFUN (no_ip_forwarding,
2801 no_ip_forwarding_cmd,
2802 "no ip forwarding",
2803 NO_STR
2804 IP_STR
2805 "Turn off IP forwarding")
2806 {
2807 int ret;
2808
2809 ret = ipforward();
2810 if (ret != 0)
2811 ret = ipforward_off();
2812
2813 if (ret != 0) {
2814 vty_out(vty, "Can't turn off IP forwarding\n");
2815 return CMD_WARNING_CONFIG_FAILED;
2816 }
2817
2818 return CMD_SUCCESS;
2819 }
2820
2821 DEFUN (show_zebra,
2822 show_zebra_cmd,
2823 "show zebra",
2824 SHOW_STR
2825 "Zebra information\n")
2826 {
2827 struct vrf *vrf;
2828
2829 vty_out(vty,
2830 " Route Route Neighbor LSP LSP\n");
2831 vty_out(vty,
2832 "VRF Installs Removals Updates Installs Removals\n");
2833 RB_FOREACH (vrf, vrf_name_head, &vrfs_by_name) {
2834 struct zebra_vrf *zvrf = vrf->info;
2835 vty_out(vty, "%-25s %10" PRIu64 " %10" PRIu64 " %10" PRIu64
2836 " %10" PRIu64 " %10" PRIu64 "\n",
2837 vrf->name, zvrf->installs, zvrf->removals,
2838 zvrf->neigh_updates, zvrf->lsp_installs,
2839 zvrf->lsp_removals);
2840 }
2841
2842 return CMD_SUCCESS;
2843 }
2844
2845 /* This command is for debugging purpose. */
2846 DEFUN (show_zebra_client,
2847 show_zebra_client_cmd,
2848 "show zebra client",
2849 SHOW_STR
2850 "Zebra information\n"
2851 "Client information\n")
2852 {
2853 struct listnode *node;
2854 struct zserv *client;
2855
2856 for (ALL_LIST_ELEMENTS_RO(zebrad.client_list, node, client))
2857 zebra_show_client_detail(vty, client);
2858
2859 return CMD_SUCCESS;
2860 }
2861
2862 /* This command is for debugging purpose. */
2863 DEFUN (show_zebra_client_summary,
2864 show_zebra_client_summary_cmd,
2865 "show zebra client summary",
2866 SHOW_STR
2867 "Zebra information brief\n"
2868 "Client information brief\n"
2869 "Brief Summary\n")
2870 {
2871 struct listnode *node;
2872 struct zserv *client;
2873
2874 vty_out(vty,
2875 "Name Connect Time Last Read Last Write IPv4 Routes IPv6 Routes \n");
2876 vty_out(vty,
2877 "--------------------------------------------------------------------------------\n");
2878
2879 for (ALL_LIST_ELEMENTS_RO(zebrad.client_list, node, client))
2880 zebra_show_client_brief(vty, client);
2881
2882 vty_out(vty, "Routes column shows (added+updated)/deleted\n");
2883 return CMD_SUCCESS;
2884 }
2885
2886 /* Table configuration write function. */
2887 static int config_write_table(struct vty *vty)
2888 {
2889 if (zebrad.rtm_table_default)
2890 vty_out(vty, "table %d\n", zebrad.rtm_table_default);
2891 return 0;
2892 }
2893
2894 /* table node for routing tables. */
2895 static struct cmd_node table_node = {TABLE_NODE,
2896 "", /* This node has no interface. */
2897 1};
2898
2899 /* Only display ip forwarding is enabled or not. */
2900 DEFUN (show_ip_forwarding,
2901 show_ip_forwarding_cmd,
2902 "show ip forwarding",
2903 SHOW_STR
2904 IP_STR
2905 "IP forwarding status\n")
2906 {
2907 int ret;
2908
2909 ret = ipforward();
2910
2911 if (ret == 0)
2912 vty_out(vty, "IP forwarding is off\n");
2913 else
2914 vty_out(vty, "IP forwarding is on\n");
2915 return CMD_SUCCESS;
2916 }
2917
2918 /* Only display ipv6 forwarding is enabled or not. */
2919 DEFUN (show_ipv6_forwarding,
2920 show_ipv6_forwarding_cmd,
2921 "show ipv6 forwarding",
2922 SHOW_STR
2923 "IPv6 information\n"
2924 "Forwarding status\n")
2925 {
2926 int ret;
2927
2928 ret = ipforward_ipv6();
2929
2930 switch (ret) {
2931 case -1:
2932 vty_out(vty, "ipv6 forwarding is unknown\n");
2933 break;
2934 case 0:
2935 vty_out(vty, "ipv6 forwarding is %s\n", "off");
2936 break;
2937 case 1:
2938 vty_out(vty, "ipv6 forwarding is %s\n", "on");
2939 break;
2940 default:
2941 vty_out(vty, "ipv6 forwarding is %s\n", "off");
2942 break;
2943 }
2944 return CMD_SUCCESS;
2945 }
2946
2947 DEFUN (ipv6_forwarding,
2948 ipv6_forwarding_cmd,
2949 "ipv6 forwarding",
2950 IPV6_STR
2951 "Turn on IPv6 forwarding")
2952 {
2953 int ret;
2954
2955 ret = ipforward_ipv6();
2956 if (ret == 0)
2957 ret = ipforward_ipv6_on();
2958
2959 if (ret == 0) {
2960 vty_out(vty, "Can't turn on IPv6 forwarding\n");
2961 return CMD_WARNING_CONFIG_FAILED;
2962 }
2963
2964 return CMD_SUCCESS;
2965 }
2966
2967 DEFUN (no_ipv6_forwarding,
2968 no_ipv6_forwarding_cmd,
2969 "no ipv6 forwarding",
2970 NO_STR
2971 IPV6_STR
2972 "Turn off IPv6 forwarding")
2973 {
2974 int ret;
2975
2976 ret = ipforward_ipv6();
2977 if (ret != 0)
2978 ret = ipforward_ipv6_off();
2979
2980 if (ret != 0) {
2981 vty_out(vty, "Can't turn off IPv6 forwarding\n");
2982 return CMD_WARNING_CONFIG_FAILED;
2983 }
2984
2985 return CMD_SUCCESS;
2986 }
2987
2988 /* IPForwarding configuration write function. */
2989 static int config_write_forwarding(struct vty *vty)
2990 {
2991 /* FIXME: Find better place for that. */
2992 router_id_write(vty);
2993
2994 if (!ipforward())
2995 vty_out(vty, "no ip forwarding\n");
2996 if (!ipforward_ipv6())
2997 vty_out(vty, "no ipv6 forwarding\n");
2998 vty_out(vty, "!\n");
2999 return 0;
3000 }
3001
3002 /* table node for routing tables. */
3003 static struct cmd_node forwarding_node = {FORWARDING_NODE,
3004 "", /* This node has no interface. */
3005 1};
3006
3007 /* Initialisation of zebra and installation of commands. */
3008 void zebra_init(void)
3009 {
3010 /* Client list init. */
3011 zebrad.client_list = list_new();
3012
3013 /* Install configuration write function. */
3014 install_node(&table_node, config_write_table);
3015 install_node(&forwarding_node, config_write_forwarding);
3016
3017 install_element(VIEW_NODE, &show_ip_forwarding_cmd);
3018 install_element(CONFIG_NODE, &ip_forwarding_cmd);
3019 install_element(CONFIG_NODE, &no_ip_forwarding_cmd);
3020 install_element(ENABLE_NODE, &show_zebra_cmd);
3021 install_element(ENABLE_NODE, &show_zebra_client_cmd);
3022 install_element(ENABLE_NODE, &show_zebra_client_summary_cmd);
3023
3024 #ifdef HAVE_NETLINK
3025 install_element(VIEW_NODE, &show_table_cmd);
3026 install_element(CONFIG_NODE, &config_table_cmd);
3027 install_element(CONFIG_NODE, &no_config_table_cmd);
3028 #endif /* HAVE_NETLINK */
3029
3030 install_element(VIEW_NODE, &show_ipv6_forwarding_cmd);
3031 install_element(CONFIG_NODE, &ipv6_forwarding_cmd);
3032 install_element(CONFIG_NODE, &no_ipv6_forwarding_cmd);
3033
3034 /* Route-map */
3035 zebra_route_map_init();
3036 }
FRRouting mirror