]> 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 rb-trees to store interfaces instead of sorted linked-lists
[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 interface *ifp;
1002
1003 /* Interface information is needed. */
1004 vrf_bitmap_set(client->ifinfo, zvrf_id(zvrf));
1005
1006 RB_FOREACH (vrf, vrf_id_head, &vrfs_by_id) {
1007 RB_FOREACH (ifp, if_name_head, &vrf->ifaces_by_name) {
1008 /* Skip pseudo interface. */
1009 if (!CHECK_FLAG(ifp->status, ZEBRA_INTERFACE_ACTIVE))
1010 continue;
1011
1012 if (zsend_interface_add(client, ifp) < 0)
1013 return -1;
1014
1015 if (zsend_interface_addresses(client, ifp) < 0)
1016 return -1;
1017 }
1018 }
1019 return 0;
1020 }
1021
1022 /* Unregister zebra server interface information. */
1023 static int zread_interface_delete(struct zserv *client, u_short length,
1024 struct zebra_vrf *zvrf)
1025 {
1026 vrf_bitmap_unset(client->ifinfo, zvrf_id(zvrf));
1027 return 0;
1028 }
1029
1030 void zserv_nexthop_num_warn(const char *caller, const struct prefix *p,
1031 const unsigned int nexthop_num)
1032 {
1033 if (nexthop_num > multipath_num) {
1034 char buff[PREFIX2STR_BUFFER];
1035 prefix2str(p, buff, sizeof(buff));
1036 zlog_warn(
1037 "%s: Prefix %s has %d nexthops, but we can only use the first %d",
1038 caller, buff, nexthop_num, multipath_num);
1039 }
1040 }
1041
1042 static int zread_route_add(struct zserv *client, u_short length,
1043 struct zebra_vrf *zvrf)
1044 {
1045 struct stream *s;
1046 struct zapi_route api;
1047 struct zapi_nexthop *api_nh;
1048 afi_t afi;
1049 struct prefix_ipv6 *src_p = NULL;
1050 struct route_entry *re;
1051 struct nexthop *nexthop = NULL;
1052 int i, ret;
1053
1054 s = client->ibuf;
1055 if (zapi_route_decode(s, &api) < 0)
1056 return -1;
1057
1058 /* Allocate new route. */
1059 re = XCALLOC(MTYPE_RE, sizeof(struct route_entry));
1060 re->type = api.type;
1061 re->instance = api.instance;
1062 re->flags = api.flags;
1063 re->uptime = time(NULL);
1064 re->vrf_id = zvrf_id(zvrf);
1065 re->table = zvrf->table_id;
1066
1067 if (CHECK_FLAG(api.message, ZAPI_MESSAGE_NEXTHOP)) {
1068 for (i = 0; i < api.nexthop_num; i++) {
1069 api_nh = &api.nexthops[i];
1070
1071 switch (api_nh->type) {
1072 case NEXTHOP_TYPE_IFINDEX:
1073 route_entry_nexthop_ifindex_add(
1074 re, api_nh->ifindex);
1075 break;
1076 case NEXTHOP_TYPE_IPV4:
1077 nexthop = route_entry_nexthop_ipv4_add(
1078 re, &api_nh->gate.ipv4, NULL);
1079 break;
1080 case NEXTHOP_TYPE_IPV4_IFINDEX:
1081 nexthop = route_entry_nexthop_ipv4_ifindex_add(
1082 re, &api_nh->gate.ipv4, NULL,
1083 api_nh->ifindex);
1084 break;
1085 case NEXTHOP_TYPE_IPV6:
1086 nexthop = route_entry_nexthop_ipv6_add(
1087 re, &api_nh->gate.ipv6);
1088 break;
1089 case NEXTHOP_TYPE_IPV6_IFINDEX:
1090 nexthop = route_entry_nexthop_ipv6_ifindex_add(
1091 re, &api_nh->gate.ipv6,
1092 api_nh->ifindex);
1093 break;
1094 case NEXTHOP_TYPE_BLACKHOLE:
1095 route_entry_nexthop_blackhole_add(
1096 re, api_nh->bh_type);
1097 break;
1098 }
1099
1100 /* MPLS labels for BGP-LU or Segment Routing */
1101 if (CHECK_FLAG(api.message, ZAPI_MESSAGE_LABEL)
1102 && api_nh->type != NEXTHOP_TYPE_IFINDEX
1103 && api_nh->type != NEXTHOP_TYPE_BLACKHOLE) {
1104 enum lsp_types_t label_type;
1105
1106 label_type =
1107 lsp_type_from_re_type(client->proto);
1108 nexthop_add_labels(nexthop, label_type,
1109 api_nh->label_num,
1110 &api_nh->labels[0]);
1111 }
1112 }
1113 }
1114
1115 if (CHECK_FLAG(api.message, ZAPI_MESSAGE_DISTANCE))
1116 re->distance = api.distance;
1117 if (CHECK_FLAG(api.message, ZAPI_MESSAGE_METRIC))
1118 re->metric = api.metric;
1119 if (CHECK_FLAG(api.message, ZAPI_MESSAGE_TAG))
1120 re->tag = api.tag;
1121 if (CHECK_FLAG(api.message, ZAPI_MESSAGE_MTU))
1122 re->mtu = api.mtu;
1123
1124 afi = family2afi(api.prefix.family);
1125 if (CHECK_FLAG(api.message, ZAPI_MESSAGE_SRCPFX))
1126 src_p = &api.src_prefix;
1127
1128 ret = rib_add_multipath(afi, api.safi, &api.prefix, src_p, re);
1129
1130 /* Stats */
1131 switch (api.prefix.family) {
1132 case AF_INET:
1133 if (ret > 0)
1134 client->v4_route_add_cnt++;
1135 else if (ret < 0)
1136 client->v4_route_upd8_cnt++;
1137 break;
1138 case AF_INET6:
1139 if (ret > 0)
1140 client->v6_route_add_cnt++;
1141 else if (ret < 0)
1142 client->v6_route_upd8_cnt++;
1143 break;
1144 }
1145
1146 return 0;
1147 }
1148
1149 static int zread_route_del(struct zserv *client, u_short length,
1150 struct zebra_vrf *zvrf)
1151 {
1152 struct stream *s;
1153 struct zapi_route api;
1154 afi_t afi;
1155 struct prefix_ipv6 *src_p = NULL;
1156
1157 s = client->ibuf;
1158 if (zapi_route_decode(s, &api) < 0)
1159 return -1;
1160
1161 afi = family2afi(api.prefix.family);
1162 if (CHECK_FLAG(api.message, ZAPI_MESSAGE_SRCPFX))
1163 src_p = &api.src_prefix;
1164
1165 rib_delete(afi, api.safi, zvrf_id(zvrf), api.type, api.instance,
1166 api.flags, &api.prefix, src_p, NULL, zvrf->table_id,
1167 api.metric, false);
1168
1169 /* Stats */
1170 switch (api.prefix.family) {
1171 case AF_INET:
1172 client->v4_route_del_cnt++;
1173 break;
1174 case AF_INET6:
1175 client->v6_route_del_cnt++;
1176 break;
1177 }
1178
1179 return 0;
1180 }
1181
1182 /* This function support multiple nexthop. */
1183 /*
1184 * Parse the ZEBRA_IPV4_ROUTE_ADD sent from client. Update re and
1185 * add kernel route.
1186 */
1187 static int zread_ipv4_add(struct zserv *client, u_short length,
1188 struct zebra_vrf *zvrf)
1189 {
1190 int i;
1191 struct route_entry *re;
1192 struct prefix p;
1193 u_char message;
1194 struct in_addr nhop_addr;
1195 u_char nexthop_num;
1196 u_char nexthop_type;
1197 struct stream *s;
1198 ifindex_t ifindex;
1199 safi_t safi;
1200 int ret;
1201 enum lsp_types_t label_type = ZEBRA_LSP_NONE;
1202 mpls_label_t label;
1203 struct nexthop *nexthop;
1204 enum blackhole_type bh_type = BLACKHOLE_NULL;
1205
1206 /* Get input stream. */
1207 s = client->ibuf;
1208
1209 /* Allocate new re. */
1210 re = XCALLOC(MTYPE_RE, sizeof(struct route_entry));
1211
1212 /* Type, flags, message. */
1213 re->type = stream_getc(s);
1214 re->instance = stream_getw(s);
1215 re->flags = stream_getl(s);
1216 message = stream_getc(s);
1217 safi = stream_getw(s);
1218 re->uptime = time(NULL);
1219
1220 /* IPv4 prefix. */
1221 memset(&p, 0, sizeof(struct prefix_ipv4));
1222 p.family = AF_INET;
1223 p.prefixlen = stream_getc(s);
1224 stream_get(&p.u.prefix4, s, PSIZE(p.prefixlen));
1225
1226 /* VRF ID */
1227 re->vrf_id = zvrf_id(zvrf);
1228
1229 /* Nexthop parse. */
1230 if (CHECK_FLAG(message, ZAPI_MESSAGE_NEXTHOP)) {
1231 nexthop_num = stream_getc(s);
1232 zserv_nexthop_num_warn(__func__, (const struct prefix *)&p,
1233 nexthop_num);
1234
1235 if (CHECK_FLAG(message, ZAPI_MESSAGE_LABEL))
1236 label_type = lsp_type_from_re_type(client->proto);
1237
1238 for (i = 0; i < nexthop_num; i++) {
1239 nexthop_type = stream_getc(s);
1240
1241 switch (nexthop_type) {
1242 case NEXTHOP_TYPE_IFINDEX:
1243 ifindex = stream_getl(s);
1244 route_entry_nexthop_ifindex_add(re, ifindex);
1245 break;
1246 case NEXTHOP_TYPE_IPV4:
1247 nhop_addr.s_addr = stream_get_ipv4(s);
1248 nexthop = route_entry_nexthop_ipv4_add(
1249 re, &nhop_addr, NULL);
1250 /* For labeled-unicast, each nexthop is followed
1251 * by label. */
1252 if (CHECK_FLAG(message, ZAPI_MESSAGE_LABEL)) {
1253 label = (mpls_label_t)stream_getl(s);
1254 nexthop_add_labels(nexthop, label_type,
1255 1, &label);
1256 }
1257 break;
1258 case NEXTHOP_TYPE_IPV4_IFINDEX:
1259 nhop_addr.s_addr = stream_get_ipv4(s);
1260 ifindex = stream_getl(s);
1261 route_entry_nexthop_ipv4_ifindex_add(
1262 re, &nhop_addr, NULL, ifindex);
1263 break;
1264 case NEXTHOP_TYPE_IPV6:
1265 stream_forward_getp(s, IPV6_MAX_BYTELEN);
1266 break;
1267 case NEXTHOP_TYPE_BLACKHOLE:
1268 route_entry_nexthop_blackhole_add(re, bh_type);
1269 break;
1270 }
1271 }
1272 }
1273
1274 /* Distance. */
1275 if (CHECK_FLAG(message, ZAPI_MESSAGE_DISTANCE))
1276 re->distance = stream_getc(s);
1277
1278 /* Metric. */
1279 if (CHECK_FLAG(message, ZAPI_MESSAGE_METRIC))
1280 re->metric = stream_getl(s);
1281
1282 /* Tag */
1283 if (CHECK_FLAG(message, ZAPI_MESSAGE_TAG))
1284 re->tag = stream_getl(s);
1285 else
1286 re->tag = 0;
1287
1288 if (CHECK_FLAG(message, ZAPI_MESSAGE_MTU))
1289 re->mtu = stream_getl(s);
1290 else
1291 re->mtu = 0;
1292
1293 /* Table */
1294 re->table = zvrf->table_id;
1295
1296 ret = rib_add_multipath(AFI_IP, safi, &p, NULL, re);
1297
1298 /* Stats */
1299 if (ret > 0)
1300 client->v4_route_add_cnt++;
1301 else if (ret < 0)
1302 client->v4_route_upd8_cnt++;
1303 return 0;
1304 }
1305
1306 /* Zebra server IPv4 prefix delete function. */
1307 static int zread_ipv4_delete(struct zserv *client, u_short length,
1308 struct zebra_vrf *zvrf)
1309 {
1310 struct stream *s;
1311 struct zapi_ipv4 api;
1312 struct prefix p;
1313 u_int32_t table_id;
1314
1315 s = client->ibuf;
1316
1317 /* Type, flags, message. */
1318 api.type = stream_getc(s);
1319 api.instance = stream_getw(s);
1320 api.flags = stream_getl(s);
1321 api.message = stream_getc(s);
1322 api.safi = stream_getw(s);
1323
1324 /* IPv4 prefix. */
1325 memset(&p, 0, sizeof(struct prefix));
1326 p.family = AF_INET;
1327 p.prefixlen = stream_getc(s);
1328 stream_get(&p.u.prefix4, s, PSIZE(p.prefixlen));
1329
1330 table_id = zvrf->table_id;
1331
1332 rib_delete(AFI_IP, api.safi, zvrf_id(zvrf), api.type, api.instance,
1333 api.flags, &p, NULL, NULL, table_id, 0, false);
1334 client->v4_route_del_cnt++;
1335 return 0;
1336 }
1337
1338 /* MRIB Nexthop lookup for IPv4. */
1339 static int zread_ipv4_nexthop_lookup_mrib(struct zserv *client, u_short length,
1340 struct zebra_vrf *zvrf)
1341 {
1342 struct in_addr addr;
1343 struct route_entry *re;
1344
1345 addr.s_addr = stream_get_ipv4(client->ibuf);
1346 re = rib_match_ipv4_multicast(zvrf_id(zvrf), addr, NULL);
1347 return zsend_ipv4_nexthop_lookup_mrib(client, addr, re, zvrf);
1348 }
1349
1350 /* Zebra server IPv6 prefix add function. */
1351 static int zread_ipv4_route_ipv6_nexthop_add(struct zserv *client,
1352 u_short length,
1353 struct zebra_vrf *zvrf)
1354 {
1355 unsigned int i;
1356 struct stream *s;
1357 struct in6_addr nhop_addr;
1358 struct route_entry *re;
1359 u_char message;
1360 u_char nexthop_num;
1361 u_char nexthop_type;
1362 struct prefix p;
1363 safi_t safi;
1364 static struct in6_addr nexthops[MULTIPATH_NUM];
1365 static unsigned int ifindices[MULTIPATH_NUM];
1366 int ret;
1367 static mpls_label_t labels[MULTIPATH_NUM];
1368 enum lsp_types_t label_type = ZEBRA_LSP_NONE;
1369 mpls_label_t label;
1370 struct nexthop *nexthop;
1371 enum blackhole_type bh_type = BLACKHOLE_NULL;
1372
1373 /* Get input stream. */
1374 s = client->ibuf;
1375
1376 memset(&nhop_addr, 0, sizeof(struct in6_addr));
1377
1378 /* Allocate new re. */
1379 re = XCALLOC(MTYPE_RE, sizeof(struct route_entry));
1380
1381 /* Type, flags, message. */
1382 re->type = stream_getc(s);
1383 re->instance = stream_getw(s);
1384 re->flags = stream_getl(s);
1385 message = stream_getc(s);
1386 safi = stream_getw(s);
1387 re->uptime = time(NULL);
1388
1389 /* IPv4 prefix. */
1390 memset(&p, 0, sizeof(struct prefix_ipv4));
1391 p.family = AF_INET;
1392 p.prefixlen = stream_getc(s);
1393 stream_get(&p.u.prefix4, s, PSIZE(p.prefixlen));
1394
1395 /* VRF ID */
1396 re->vrf_id = zvrf_id(zvrf);
1397
1398 /* We need to give nh-addr, nh-ifindex with the same next-hop object
1399 * to the re to ensure that IPv6 multipathing works; need to coalesce
1400 * these. Clients should send the same number of paired set of
1401 * next-hop-addr/next-hop-ifindices. */
1402 if (CHECK_FLAG(message, ZAPI_MESSAGE_NEXTHOP)) {
1403 unsigned int nh_count = 0;
1404 unsigned int if_count = 0;
1405 unsigned int max_nh_if = 0;
1406
1407 nexthop_num = stream_getc(s);
1408 zserv_nexthop_num_warn(__func__, (const struct prefix *)&p,
1409 nexthop_num);
1410
1411 if (CHECK_FLAG(message, ZAPI_MESSAGE_LABEL))
1412 label_type = lsp_type_from_re_type(client->proto);
1413
1414 for (i = 0; i < nexthop_num; i++) {
1415 nexthop_type = stream_getc(s);
1416
1417 switch (nexthop_type) {
1418 case NEXTHOP_TYPE_IPV6:
1419 stream_get(&nhop_addr, s, 16);
1420 if (nh_count < MULTIPATH_NUM) {
1421 /* For labeled-unicast, each nexthop is
1422 * followed by label. */
1423 if (CHECK_FLAG(message,
1424 ZAPI_MESSAGE_LABEL)) {
1425 label = (mpls_label_t)
1426 stream_getl(s);
1427 labels[nh_count] = label;
1428 }
1429 nexthops[nh_count] = nhop_addr;
1430 nh_count++;
1431 }
1432 break;
1433 case NEXTHOP_TYPE_IFINDEX:
1434 if (if_count < multipath_num) {
1435 ifindices[if_count++] = stream_getl(s);
1436 }
1437 break;
1438 case NEXTHOP_TYPE_BLACKHOLE:
1439 route_entry_nexthop_blackhole_add(re, bh_type);
1440 break;
1441 }
1442 }
1443
1444 max_nh_if = (nh_count > if_count) ? nh_count : if_count;
1445 for (i = 0; i < max_nh_if; i++) {
1446 if ((i < nh_count)
1447 && !IN6_IS_ADDR_UNSPECIFIED(&nexthops[i])) {
1448 if ((i < if_count) && ifindices[i])
1449 nexthop =
1450 route_entry_nexthop_ipv6_ifindex_add(
1451 re, &nexthops[i],
1452 ifindices[i]);
1453 else
1454 nexthop = route_entry_nexthop_ipv6_add(
1455 re, &nexthops[i]);
1456
1457 if (CHECK_FLAG(message, ZAPI_MESSAGE_LABEL))
1458 nexthop_add_labels(nexthop, label_type,
1459 1, &labels[i]);
1460 } else {
1461 if ((i < if_count) && ifindices[i])
1462 route_entry_nexthop_ifindex_add(
1463 re, ifindices[i]);
1464 }
1465 }
1466 }
1467
1468 /* Distance. */
1469 if (CHECK_FLAG(message, ZAPI_MESSAGE_DISTANCE))
1470 re->distance = stream_getc(s);
1471
1472 /* Metric. */
1473 if (CHECK_FLAG(message, ZAPI_MESSAGE_METRIC))
1474 re->metric = stream_getl(s);
1475
1476 /* Tag */
1477 if (CHECK_FLAG(message, ZAPI_MESSAGE_TAG))
1478 re->tag = stream_getl(s);
1479 else
1480 re->tag = 0;
1481
1482 if (CHECK_FLAG(message, ZAPI_MESSAGE_MTU))
1483 re->mtu = stream_getl(s);
1484 else
1485 re->mtu = 0;
1486
1487 /* Table */
1488 re->table = zvrf->table_id;
1489
1490 ret = rib_add_multipath(AFI_IP6, safi, &p, NULL, re);
1491 /* Stats */
1492 if (ret > 0)
1493 client->v4_route_add_cnt++;
1494 else if (ret < 0)
1495 client->v4_route_upd8_cnt++;
1496
1497 return 0;
1498 }
1499
1500 static int zread_ipv6_add(struct zserv *client, u_short length,
1501 struct zebra_vrf *zvrf)
1502 {
1503 unsigned int i;
1504 struct stream *s;
1505 struct in6_addr nhop_addr;
1506 ifindex_t ifindex;
1507 struct route_entry *re;
1508 u_char message;
1509 u_char nexthop_num;
1510 u_char nexthop_type;
1511 struct prefix p;
1512 struct prefix_ipv6 src_p, *src_pp;
1513 safi_t safi;
1514 static struct in6_addr nexthops[MULTIPATH_NUM];
1515 static unsigned int ifindices[MULTIPATH_NUM];
1516 int ret;
1517 static mpls_label_t labels[MULTIPATH_NUM];
1518 enum lsp_types_t label_type = ZEBRA_LSP_NONE;
1519 mpls_label_t label;
1520 struct nexthop *nexthop;
1521 enum blackhole_type bh_type = BLACKHOLE_NULL;
1522
1523 /* Get input stream. */
1524 s = client->ibuf;
1525
1526 memset(&nhop_addr, 0, sizeof(struct in6_addr));
1527
1528 /* Allocate new re. */
1529 re = XCALLOC(MTYPE_RE, sizeof(struct route_entry));
1530
1531 /* Type, flags, message. */
1532 re->type = stream_getc(s);
1533 re->instance = stream_getw(s);
1534 re->flags = stream_getl(s);
1535 message = stream_getc(s);
1536 safi = stream_getw(s);
1537 re->uptime = time(NULL);
1538
1539 /* IPv6 prefix. */
1540 memset(&p, 0, sizeof(struct prefix_ipv6));
1541 p.family = AF_INET6;
1542 p.prefixlen = stream_getc(s);
1543 stream_get(&p.u.prefix6, s, PSIZE(p.prefixlen));
1544
1545 if (CHECK_FLAG(message, ZAPI_MESSAGE_SRCPFX)) {
1546 memset(&src_p, 0, sizeof(struct prefix_ipv6));
1547 src_p.family = AF_INET6;
1548 src_p.prefixlen = stream_getc(s);
1549 stream_get(&src_p.prefix, s, PSIZE(src_p.prefixlen));
1550 src_pp = &src_p;
1551 } else
1552 src_pp = NULL;
1553
1554 /* We need to give nh-addr, nh-ifindex with the same next-hop object
1555 * to the re to ensure that IPv6 multipathing works; need to coalesce
1556 * these. Clients should send the same number of paired set of
1557 * next-hop-addr/next-hop-ifindices. */
1558 if (CHECK_FLAG(message, ZAPI_MESSAGE_NEXTHOP)) {
1559 unsigned int nh_count = 0;
1560 unsigned int if_count = 0;
1561 unsigned int max_nh_if = 0;
1562
1563 nexthop_num = stream_getc(s);
1564 zserv_nexthop_num_warn(__func__, (const struct prefix *)&p,
1565 nexthop_num);
1566
1567 if (CHECK_FLAG(message, ZAPI_MESSAGE_LABEL))
1568 label_type = lsp_type_from_re_type(client->proto);
1569
1570 for (i = 0; i < nexthop_num; i++) {
1571 nexthop_type = stream_getc(s);
1572
1573 switch (nexthop_type) {
1574 case NEXTHOP_TYPE_IPV6:
1575 stream_get(&nhop_addr, s, 16);
1576 if (nh_count < MULTIPATH_NUM) {
1577 /* For labeled-unicast, each nexthop is
1578 * followed by label. */
1579 if (CHECK_FLAG(message,
1580 ZAPI_MESSAGE_LABEL)) {
1581 label = (mpls_label_t)
1582 stream_getl(s);
1583 labels[nh_count] = label;
1584 }
1585 nexthops[nh_count++] = nhop_addr;
1586 }
1587 break;
1588 case NEXTHOP_TYPE_IPV6_IFINDEX:
1589 stream_get(&nhop_addr, s, 16);
1590 ifindex = stream_getl(s);
1591 route_entry_nexthop_ipv6_ifindex_add(
1592 re, &nhop_addr, ifindex);
1593 break;
1594 case NEXTHOP_TYPE_IFINDEX:
1595 if (if_count < multipath_num) {
1596 ifindices[if_count++] = stream_getl(s);
1597 }
1598 break;
1599 case NEXTHOP_TYPE_BLACKHOLE:
1600 route_entry_nexthop_blackhole_add(re, bh_type);
1601 break;
1602 }
1603 }
1604
1605 max_nh_if = (nh_count > if_count) ? nh_count : if_count;
1606 for (i = 0; i < max_nh_if; i++) {
1607 if ((i < nh_count)
1608 && !IN6_IS_ADDR_UNSPECIFIED(&nexthops[i])) {
1609 if ((i < if_count) && ifindices[i])
1610 nexthop =
1611 route_entry_nexthop_ipv6_ifindex_add(
1612 re, &nexthops[i],
1613 ifindices[i]);
1614 else
1615 nexthop = route_entry_nexthop_ipv6_add(
1616 re, &nexthops[i]);
1617 if (CHECK_FLAG(message, ZAPI_MESSAGE_LABEL))
1618 nexthop_add_labels(nexthop, label_type,
1619 1, &labels[i]);
1620 } else {
1621 if ((i < if_count) && ifindices[i])
1622 route_entry_nexthop_ifindex_add(
1623 re, ifindices[i]);
1624 }
1625 }
1626 }
1627
1628 /* Distance. */
1629 if (CHECK_FLAG(message, ZAPI_MESSAGE_DISTANCE))
1630 re->distance = stream_getc(s);
1631
1632 /* Metric. */
1633 if (CHECK_FLAG(message, ZAPI_MESSAGE_METRIC))
1634 re->metric = stream_getl(s);
1635
1636 /* Tag */
1637 if (CHECK_FLAG(message, ZAPI_MESSAGE_TAG))
1638 re->tag = stream_getl(s);
1639 else
1640 re->tag = 0;
1641
1642 if (CHECK_FLAG(message, ZAPI_MESSAGE_MTU))
1643 re->mtu = stream_getl(s);
1644 else
1645 re->mtu = 0;
1646
1647 /* VRF ID */
1648 re->vrf_id = zvrf_id(zvrf);
1649 re->table = zvrf->table_id;
1650
1651 ret = rib_add_multipath(AFI_IP6, safi, &p, src_pp, re);
1652 /* Stats */
1653 if (ret > 0)
1654 client->v6_route_add_cnt++;
1655 else if (ret < 0)
1656 client->v6_route_upd8_cnt++;
1657
1658 return 0;
1659 }
1660
1661 /* Zebra server IPv6 prefix delete function. */
1662 static int zread_ipv6_delete(struct zserv *client, u_short length,
1663 struct zebra_vrf *zvrf)
1664 {
1665 struct stream *s;
1666 struct zapi_ipv6 api;
1667 struct prefix p;
1668 struct prefix_ipv6 src_p, *src_pp;
1669
1670 s = client->ibuf;
1671
1672 /* Type, flags, message. */
1673 api.type = stream_getc(s);
1674 api.instance = stream_getw(s);
1675 api.flags = stream_getl(s);
1676 api.message = stream_getc(s);
1677 api.safi = stream_getw(s);
1678
1679 /* IPv4 prefix. */
1680 memset(&p, 0, sizeof(struct prefix));
1681 p.family = AF_INET6;
1682 p.prefixlen = stream_getc(s);
1683 stream_get(&p.u.prefix6, s, PSIZE(p.prefixlen));
1684
1685 if (CHECK_FLAG(api.message, ZAPI_MESSAGE_SRCPFX)) {
1686 memset(&src_p, 0, sizeof(struct prefix_ipv6));
1687 src_p.family = AF_INET6;
1688 src_p.prefixlen = stream_getc(s);
1689 stream_get(&src_p.prefix, s, PSIZE(src_p.prefixlen));
1690 src_pp = &src_p;
1691 } else
1692 src_pp = NULL;
1693
1694 rib_delete(AFI_IP6, api.safi, zvrf_id(zvrf), api.type, api.instance,
1695 api.flags, &p, src_pp, NULL, client->rtm_table, 0, false);
1696
1697 client->v6_route_del_cnt++;
1698 return 0;
1699 }
1700
1701 /* Register zebra server router-id information. Send current router-id */
1702 static int zread_router_id_add(struct zserv *client, u_short length,
1703 struct zebra_vrf *zvrf)
1704 {
1705 struct prefix p;
1706
1707 /* Router-id information is needed. */
1708 vrf_bitmap_set(client->ridinfo, zvrf_id(zvrf));
1709
1710 router_id_get(&p, zvrf_id(zvrf));
1711
1712 return zsend_router_id_update(client, &p, zvrf_id(zvrf));
1713 }
1714
1715 /* Unregister zebra server router-id information. */
1716 static int zread_router_id_delete(struct zserv *client, u_short length,
1717 struct zebra_vrf *zvrf)
1718 {
1719 vrf_bitmap_unset(client->ridinfo, zvrf_id(zvrf));
1720 return 0;
1721 }
1722
1723 /* Tie up route-type and client->sock */
1724 static void zread_hello(struct zserv *client)
1725 {
1726 /* type of protocol (lib/zebra.h) */
1727 u_char proto;
1728 u_short instance;
1729
1730 proto = stream_getc(client->ibuf);
1731 instance = stream_getw(client->ibuf);
1732
1733 /* accept only dynamic routing protocols */
1734 if ((proto < ZEBRA_ROUTE_MAX) && (proto > ZEBRA_ROUTE_STATIC)) {
1735 zlog_notice(
1736 "client %d says hello and bids fair to announce only %s routes",
1737 client->sock, zebra_route_string(proto));
1738 if (instance)
1739 zlog_notice("client protocol instance %d", instance);
1740
1741 client->proto = proto;
1742 client->instance = instance;
1743 }
1744 }
1745
1746 /* Unregister all information in a VRF. */
1747 static int zread_vrf_unregister(struct zserv *client, u_short length,
1748 struct zebra_vrf *zvrf)
1749 {
1750 int i;
1751 afi_t afi;
1752
1753 for (afi = AFI_IP; afi < AFI_MAX; afi++)
1754 for (i = 0; i < ZEBRA_ROUTE_MAX; i++)
1755 vrf_bitmap_unset(client->redist[afi][i], zvrf_id(zvrf));
1756 vrf_bitmap_unset(client->redist_default, zvrf_id(zvrf));
1757 vrf_bitmap_unset(client->ifinfo, zvrf_id(zvrf));
1758 vrf_bitmap_unset(client->ridinfo, zvrf_id(zvrf));
1759
1760 return 0;
1761 }
1762
1763 static void zread_mpls_labels(int command, struct zserv *client, u_short length,
1764 vrf_id_t vrf_id)
1765 {
1766 struct stream *s;
1767 enum lsp_types_t type;
1768 struct prefix prefix;
1769 enum nexthop_types_t gtype;
1770 union g_addr gate;
1771 ifindex_t ifindex;
1772 mpls_label_t in_label, out_label;
1773 u_int8_t distance;
1774 struct zebra_vrf *zvrf;
1775
1776 zvrf = vrf_info_lookup(vrf_id);
1777 if (!zvrf)
1778 return;
1779
1780 /* Get input stream. */
1781 s = client->ibuf;
1782
1783 /* Get data. */
1784 type = stream_getc(s);
1785 prefix.family = stream_getl(s);
1786 switch (prefix.family) {
1787 case AF_INET:
1788 prefix.u.prefix4.s_addr = stream_get_ipv4(s);
1789 prefix.prefixlen = stream_getc(s);
1790 gate.ipv4.s_addr = stream_get_ipv4(s);
1791 break;
1792 case AF_INET6:
1793 stream_get(&prefix.u.prefix6, s, 16);
1794 prefix.prefixlen = stream_getc(s);
1795 stream_get(&gate.ipv6, s, 16);
1796 break;
1797 default:
1798 return;
1799 }
1800 ifindex = stream_getl(s);
1801 distance = stream_getc(s);
1802 in_label = stream_getl(s);
1803 out_label = stream_getl(s);
1804
1805 switch (prefix.family) {
1806 case AF_INET:
1807 if (ifindex)
1808 gtype = NEXTHOP_TYPE_IPV4_IFINDEX;
1809 else
1810 gtype = NEXTHOP_TYPE_IPV4;
1811 break;
1812 case AF_INET6:
1813 if (ifindex)
1814 gtype = NEXTHOP_TYPE_IPV6_IFINDEX;
1815 else
1816 gtype = NEXTHOP_TYPE_IPV6;
1817 break;
1818 default:
1819 return;
1820 }
1821
1822 if (!mpls_enabled)
1823 return;
1824
1825 if (command == ZEBRA_MPLS_LABELS_ADD) {
1826 mpls_lsp_install(zvrf, type, in_label, out_label, gtype, &gate,
1827 ifindex);
1828 mpls_ftn_update(1, zvrf, type, &prefix, gtype, &gate, ifindex,
1829 distance, out_label);
1830 } else if (command == ZEBRA_MPLS_LABELS_DELETE) {
1831 mpls_lsp_uninstall(zvrf, type, in_label, gtype, &gate, ifindex);
1832 mpls_ftn_update(0, zvrf, type, &prefix, gtype, &gate, ifindex,
1833 distance, out_label);
1834 }
1835 }
1836 /* Send response to a label manager connect request to client */
1837 static int zsend_label_manager_connect_response(struct zserv *client,
1838 vrf_id_t vrf_id, u_short result)
1839 {
1840 struct stream *s;
1841
1842 s = client->obuf;
1843 stream_reset(s);
1844
1845 zserv_create_header(s, ZEBRA_LABEL_MANAGER_CONNECT, vrf_id);
1846
1847 /* result */
1848 stream_putc(s, result);
1849
1850 /* Write packet size. */
1851 stream_putw_at(s, 0, stream_get_endp(s));
1852
1853 return writen(client->sock, s->data, stream_get_endp(s));
1854 }
1855
1856 static void zread_label_manager_connect(struct zserv *client, vrf_id_t vrf_id)
1857 {
1858 struct stream *s;
1859 /* type of protocol (lib/zebra.h) */
1860 u_char proto;
1861 u_short instance;
1862
1863 /* Get input stream. */
1864 s = client->ibuf;
1865
1866 /* Get data. */
1867 proto = stream_getc(s);
1868 instance = stream_getw(s);
1869
1870 /* accept only dynamic routing protocols */
1871 if ((proto >= ZEBRA_ROUTE_MAX) || (proto <= ZEBRA_ROUTE_STATIC)) {
1872 zlog_err("client %d has wrong protocol %s", client->sock,
1873 zebra_route_string(proto));
1874 zsend_label_manager_connect_response(client, vrf_id, 1);
1875 return;
1876 }
1877 zlog_notice("client %d with instance %u connected as %s", client->sock,
1878 instance, zebra_route_string(proto));
1879 client->proto = proto;
1880 client->instance = instance;
1881
1882 /*
1883 Release previous labels of same protocol and instance.
1884 This is done in case it restarted from an unexpected shutdown.
1885 */
1886 release_daemon_chunks(proto, instance);
1887
1888 zlog_debug(
1889 " Label Manager client connected: sock %d, proto %s, instance %u",
1890 client->sock, zebra_route_string(proto), instance);
1891 /* send response back */
1892 zsend_label_manager_connect_response(client, vrf_id, 0);
1893 }
1894 /* Send response to a get label chunk request to client */
1895 static int zsend_assign_label_chunk_response(struct zserv *client,
1896 vrf_id_t vrf_id,
1897 struct label_manager_chunk *lmc)
1898 {
1899 struct stream *s;
1900
1901 s = client->obuf;
1902 stream_reset(s);
1903
1904 zserv_create_header(s, ZEBRA_GET_LABEL_CHUNK, vrf_id);
1905
1906 if (lmc) {
1907 /* keep */
1908 stream_putc(s, lmc->keep);
1909 /* start and end labels */
1910 stream_putl(s, lmc->start);
1911 stream_putl(s, lmc->end);
1912 }
1913
1914 /* Write packet size. */
1915 stream_putw_at(s, 0, stream_get_endp(s));
1916
1917 return writen(client->sock, s->data, stream_get_endp(s));
1918 }
1919
1920 static void zread_get_label_chunk(struct zserv *client, vrf_id_t vrf_id)
1921 {
1922 struct stream *s;
1923 u_char keep;
1924 uint32_t size;
1925 struct label_manager_chunk *lmc;
1926
1927 /* Get input stream. */
1928 s = client->ibuf;
1929
1930 /* Get data. */
1931 keep = stream_getc(s);
1932 size = stream_getl(s);
1933
1934 lmc = assign_label_chunk(client->proto, client->instance, keep, size);
1935 if (!lmc)
1936 zlog_err("%s: Unable to assign Label Chunk of size %u",
1937 __func__, size);
1938 else
1939 zlog_debug("Assigned Label Chunk %u - %u to %u", lmc->start,
1940 lmc->end, keep);
1941 /* send response back */
1942 zsend_assign_label_chunk_response(client, vrf_id, lmc);
1943 }
1944
1945 static void zread_release_label_chunk(struct zserv *client)
1946 {
1947 struct stream *s;
1948 uint32_t start, end;
1949
1950 /* Get input stream. */
1951 s = client->ibuf;
1952
1953 /* Get data. */
1954 start = stream_getl(s);
1955 end = stream_getl(s);
1956
1957 release_label_chunk(client->proto, client->instance, start, end);
1958 }
1959 static void zread_label_manager_request(int cmd, struct zserv *client,
1960 vrf_id_t vrf_id)
1961 {
1962 /* to avoid sending other messages like ZERBA_INTERFACE_UP */
1963 if (cmd == ZEBRA_LABEL_MANAGER_CONNECT)
1964 client->is_synchronous = 1;
1965
1966 /* external label manager */
1967 if (lm_is_external)
1968 zread_relay_label_manager_request(cmd, client, vrf_id);
1969 /* this is a label manager */
1970 else {
1971 if (cmd == ZEBRA_LABEL_MANAGER_CONNECT)
1972 zread_label_manager_connect(client, vrf_id);
1973 else {
1974 /* Sanity: don't allow 'unidentified' requests */
1975 if (!client->proto) {
1976 zlog_err(
1977 "Got label request from an unidentified client");
1978 return;
1979 }
1980 if (cmd == ZEBRA_GET_LABEL_CHUNK)
1981 zread_get_label_chunk(client, vrf_id);
1982 else if (cmd == ZEBRA_RELEASE_LABEL_CHUNK)
1983 zread_release_label_chunk(client);
1984 }
1985 }
1986 }
1987
1988 static int zread_pseudowire(int command, struct zserv *client, u_short length,
1989 vrf_id_t vrf_id)
1990 {
1991 struct stream *s;
1992 struct zebra_vrf *zvrf;
1993 char ifname[IF_NAMESIZE];
1994 ifindex_t ifindex;
1995 int type;
1996 int af;
1997 union g_addr nexthop;
1998 uint32_t local_label;
1999 uint32_t remote_label;
2000 uint8_t flags;
2001 union pw_protocol_fields data;
2002 uint8_t protocol;
2003 struct zebra_pw *pw;
2004
2005 zvrf = vrf_info_lookup(vrf_id);
2006 if (!zvrf)
2007 return -1;
2008
2009 /* Get input stream. */
2010 s = client->ibuf;
2011
2012 /* Get data. */
2013 stream_get(ifname, s, IF_NAMESIZE);
2014 ifindex = stream_getl(s);
2015 type = stream_getl(s);
2016 af = stream_getl(s);
2017 switch (af) {
2018 case AF_INET:
2019 nexthop.ipv4.s_addr = stream_get_ipv4(s);
2020 break;
2021 case AF_INET6:
2022 stream_get(&nexthop.ipv6, s, 16);
2023 break;
2024 default:
2025 return -1;
2026 }
2027 local_label = stream_getl(s);
2028 remote_label = stream_getl(s);
2029 flags = stream_getc(s);
2030 stream_get(&data, s, sizeof(data));
2031 protocol = client->proto;
2032
2033 pw = zebra_pw_find(zvrf, ifname);
2034 switch (command) {
2035 case ZEBRA_PW_ADD:
2036 if (pw) {
2037 zlog_warn("%s: pseudowire %s already exists [%s]",
2038 __func__, ifname,
2039 zserv_command_string(command));
2040 return -1;
2041 }
2042
2043 zebra_pw_add(zvrf, ifname, protocol, client);
2044 break;
2045 case ZEBRA_PW_DELETE:
2046 if (!pw) {
2047 zlog_warn("%s: pseudowire %s not found [%s]", __func__,
2048 ifname, zserv_command_string(command));
2049 return -1;
2050 }
2051
2052 zebra_pw_del(zvrf, pw);
2053 break;
2054 case ZEBRA_PW_SET:
2055 case ZEBRA_PW_UNSET:
2056 if (!pw) {
2057 zlog_warn("%s: pseudowire %s not found [%s]", __func__,
2058 ifname, zserv_command_string(command));
2059 return -1;
2060 }
2061
2062 switch (command) {
2063 case ZEBRA_PW_SET:
2064 pw->enabled = 1;
2065 break;
2066 case ZEBRA_PW_UNSET:
2067 pw->enabled = 0;
2068 break;
2069 }
2070
2071 zebra_pw_change(pw, ifindex, type, af, &nexthop, local_label,
2072 remote_label, flags, &data);
2073 break;
2074 }
2075
2076 return 0;
2077 }
2078
2079 /* Cleanup registered nexthops (across VRFs) upon client disconnect. */
2080 static void zebra_client_close_cleanup_rnh(struct zserv *client)
2081 {
2082 struct vrf *vrf;
2083 struct zebra_vrf *zvrf;
2084
2085 RB_FOREACH (vrf, vrf_id_head, &vrfs_by_id) {
2086 if ((zvrf = vrf->info) != NULL) {
2087 zebra_cleanup_rnh_client(zvrf_id(zvrf), AF_INET, client,
2088 RNH_NEXTHOP_TYPE);
2089 zebra_cleanup_rnh_client(zvrf_id(zvrf), AF_INET6,
2090 client, RNH_NEXTHOP_TYPE);
2091 zebra_cleanup_rnh_client(zvrf_id(zvrf), AF_INET, client,
2092 RNH_IMPORT_CHECK_TYPE);
2093 zebra_cleanup_rnh_client(zvrf_id(zvrf), AF_INET6,
2094 client, RNH_IMPORT_CHECK_TYPE);
2095 if (client->proto == ZEBRA_ROUTE_LDP) {
2096 hash_iterate(zvrf->lsp_table,
2097 mpls_ldp_lsp_uninstall_all,
2098 zvrf->lsp_table);
2099 mpls_ldp_ftn_uninstall_all(zvrf, AFI_IP);
2100 mpls_ldp_ftn_uninstall_all(zvrf, AFI_IP6);
2101 }
2102 }
2103 }
2104 }
2105
2106 /* free zebra client information. */
2107 static void zebra_client_free(struct zserv *client)
2108 {
2109 /* Send client de-registration to BFD */
2110 zebra_ptm_bfd_client_deregister(client->proto);
2111
2112 /* Cleanup any registered nexthops - across all VRFs. */
2113 zebra_client_close_cleanup_rnh(client);
2114
2115 /* Release Label Manager chunks */
2116 release_daemon_chunks(client->proto, client->instance);
2117
2118 /* Cleanup any FECs registered by this client. */
2119 zebra_mpls_cleanup_fecs_for_client(vrf_info_lookup(VRF_DEFAULT),
2120 client);
2121
2122 /* Remove pseudowires associated with this client */
2123 zebra_pw_client_close(client);
2124
2125 /* Close file descriptor. */
2126 if (client->sock) {
2127 unsigned long nroutes;
2128
2129 close(client->sock);
2130 nroutes = rib_score_proto(client->proto, client->instance);
2131 zlog_notice(
2132 "client %d disconnected. %lu %s routes removed from the rib",
2133 client->sock, nroutes,
2134 zebra_route_string(client->proto));
2135 client->sock = -1;
2136 }
2137
2138 /* Free stream buffers. */
2139 if (client->ibuf)
2140 stream_free(client->ibuf);
2141 if (client->obuf)
2142 stream_free(client->obuf);
2143 if (client->wb)
2144 buffer_free(client->wb);
2145
2146 /* Release threads. */
2147 if (client->t_read)
2148 thread_cancel(client->t_read);
2149 if (client->t_write)
2150 thread_cancel(client->t_write);
2151 if (client->t_suicide)
2152 thread_cancel(client->t_suicide);
2153
2154 /* Free bitmaps. */
2155 for (afi_t afi = AFI_IP; afi < AFI_MAX; afi++)
2156 for (int i = 0; i < ZEBRA_ROUTE_MAX; i++)
2157 vrf_bitmap_free(client->redist[afi][i]);
2158
2159 vrf_bitmap_free(client->redist_default);
2160 vrf_bitmap_free(client->ifinfo);
2161 vrf_bitmap_free(client->ridinfo);
2162
2163 XFREE(MTYPE_TMP, client);
2164 }
2165
2166 static void zebra_client_close(struct zserv *client)
2167 {
2168 listnode_delete(zebrad.client_list, client);
2169 zebra_client_free(client);
2170 }
2171
2172 /* Make new client. */
2173 static void zebra_client_create(int sock)
2174 {
2175 struct zserv *client;
2176 int i;
2177 afi_t afi;
2178
2179 client = XCALLOC(MTYPE_TMP, sizeof(struct zserv));
2180
2181 /* Make client input/output buffer. */
2182 client->sock = sock;
2183 client->ibuf = stream_new(ZEBRA_MAX_PACKET_SIZ);
2184 client->obuf = stream_new(ZEBRA_MAX_PACKET_SIZ);
2185 client->wb = buffer_new(0);
2186
2187 /* Set table number. */
2188 client->rtm_table = zebrad.rtm_table_default;
2189
2190 client->connect_time = monotime(NULL);
2191 /* Initialize flags */
2192 for (afi = AFI_IP; afi < AFI_MAX; afi++)
2193 for (i = 0; i < ZEBRA_ROUTE_MAX; i++)
2194 client->redist[afi][i] = vrf_bitmap_init();
2195 client->redist_default = vrf_bitmap_init();
2196 client->ifinfo = vrf_bitmap_init();
2197 client->ridinfo = vrf_bitmap_init();
2198
2199 /* by default, it's not a synchronous client */
2200 client->is_synchronous = 0;
2201
2202 /* Add this client to linked list. */
2203 listnode_add(zebrad.client_list, client);
2204
2205 /* Make new read thread. */
2206 zebra_event(ZEBRA_READ, sock, client);
2207
2208 zebra_vrf_update_all(client);
2209 }
2210
2211 static int zread_interface_set_master(struct zserv *client, int sock,
2212 u_short length)
2213 {
2214 struct interface *master;
2215 struct interface *slave;
2216 struct stream *s = client->ibuf;
2217 int ifindex;
2218 vrf_id_t vrf_id;
2219
2220 vrf_id = stream_getw(s);
2221 ifindex = stream_getl(s);
2222 master = if_lookup_by_index(ifindex, vrf_id);
2223
2224 vrf_id = stream_getw(s);
2225 ifindex = stream_getl(s);
2226 slave = if_lookup_by_index(ifindex, vrf_id);
2227
2228 if (!master || !slave)
2229 return 0;
2230
2231 kernel_interface_set_master(master, slave);
2232
2233 return 1;
2234 }
2235
2236 /* Handler of zebra service request. */
2237 static int zebra_client_read(struct thread *thread)
2238 {
2239 int sock;
2240 struct zserv *client;
2241 size_t already;
2242 uint16_t length, command;
2243 uint8_t marker, version;
2244 vrf_id_t vrf_id;
2245 struct zebra_vrf *zvrf;
2246
2247 /* Get thread data. Reset reading thread because I'm running. */
2248 sock = THREAD_FD(thread);
2249 client = THREAD_ARG(thread);
2250 client->t_read = NULL;
2251
2252 if (client->t_suicide) {
2253 zebra_client_close(client);
2254 return -1;
2255 }
2256
2257 /* Read length and command (if we don't have it already). */
2258 if ((already = stream_get_endp(client->ibuf)) < ZEBRA_HEADER_SIZE) {
2259 ssize_t nbyte;
2260 if (((nbyte = stream_read_try(client->ibuf, sock,
2261 ZEBRA_HEADER_SIZE - already))
2262 == 0)
2263 || (nbyte == -1)) {
2264 if (IS_ZEBRA_DEBUG_EVENT)
2265 zlog_debug("connection closed socket [%d]",
2266 sock);
2267 zebra_client_close(client);
2268 return -1;
2269 }
2270 if (nbyte != (ssize_t)(ZEBRA_HEADER_SIZE - already)) {
2271 /* Try again later. */
2272 zebra_event(ZEBRA_READ, sock, client);
2273 return 0;
2274 }
2275 already = ZEBRA_HEADER_SIZE;
2276 }
2277
2278 /* Reset to read from the beginning of the incoming packet. */
2279 stream_set_getp(client->ibuf, 0);
2280
2281 /* Fetch header values */
2282 length = stream_getw(client->ibuf);
2283 marker = stream_getc(client->ibuf);
2284 version = stream_getc(client->ibuf);
2285 vrf_id = stream_getw(client->ibuf);
2286 command = stream_getw(client->ibuf);
2287
2288 if (marker != ZEBRA_HEADER_MARKER || version != ZSERV_VERSION) {
2289 zlog_err(
2290 "%s: socket %d version mismatch, marker %d, version %d",
2291 __func__, sock, marker, version);
2292 zebra_client_close(client);
2293 return -1;
2294 }
2295 if (length < ZEBRA_HEADER_SIZE) {
2296 zlog_warn(
2297 "%s: socket %d message length %u is less than header size %d",
2298 __func__, sock, length, ZEBRA_HEADER_SIZE);
2299 zebra_client_close(client);
2300 return -1;
2301 }
2302 if (length > STREAM_SIZE(client->ibuf)) {
2303 zlog_warn(
2304 "%s: socket %d message length %u exceeds buffer size %lu",
2305 __func__, sock, length,
2306 (u_long)STREAM_SIZE(client->ibuf));
2307 zebra_client_close(client);
2308 return -1;
2309 }
2310
2311 /* Read rest of data. */
2312 if (already < length) {
2313 ssize_t nbyte;
2314 if (((nbyte = stream_read_try(client->ibuf, sock,
2315 length - already))
2316 == 0)
2317 || (nbyte == -1)) {
2318 if (IS_ZEBRA_DEBUG_EVENT)
2319 zlog_debug(
2320 "connection closed [%d] when reading zebra data",
2321 sock);
2322 zebra_client_close(client);
2323 return -1;
2324 }
2325 if (nbyte != (ssize_t)(length - already)) {
2326 /* Try again later. */
2327 zebra_event(ZEBRA_READ, sock, client);
2328 return 0;
2329 }
2330 }
2331
2332 length -= ZEBRA_HEADER_SIZE;
2333
2334 /* Debug packet information. */
2335 if (IS_ZEBRA_DEBUG_EVENT)
2336 zlog_debug("zebra message comes from socket [%d]", sock);
2337
2338 if (IS_ZEBRA_DEBUG_PACKET && IS_ZEBRA_DEBUG_RECV)
2339 zlog_debug("zebra message received [%s] %d in VRF %u",
2340 zserv_command_string(command), length, vrf_id);
2341
2342 client->last_read_time = monotime(NULL);
2343 client->last_read_cmd = command;
2344
2345 zvrf = zebra_vrf_lookup_by_id(vrf_id);
2346 if (!zvrf) {
2347 if (IS_ZEBRA_DEBUG_PACKET && IS_ZEBRA_DEBUG_RECV)
2348 zlog_debug("zebra received unknown VRF[%u]", vrf_id);
2349 goto zclient_read_out;
2350 }
2351
2352 switch (command) {
2353 case ZEBRA_ROUTER_ID_ADD:
2354 zread_router_id_add(client, length, zvrf);
2355 break;
2356 case ZEBRA_ROUTER_ID_DELETE:
2357 zread_router_id_delete(client, length, zvrf);
2358 break;
2359 case ZEBRA_INTERFACE_ADD:
2360 zread_interface_add(client, length, zvrf);
2361 break;
2362 case ZEBRA_INTERFACE_DELETE:
2363 zread_interface_delete(client, length, zvrf);
2364 break;
2365 case ZEBRA_ROUTE_ADD:
2366 zread_route_add(client, length, zvrf);
2367 break;
2368 case ZEBRA_ROUTE_DELETE:
2369 zread_route_del(client, length, zvrf);
2370 break;
2371 case ZEBRA_IPV4_ROUTE_ADD:
2372 zread_ipv4_add(client, length, zvrf);
2373 break;
2374 case ZEBRA_IPV4_ROUTE_DELETE:
2375 zread_ipv4_delete(client, length, zvrf);
2376 break;
2377 case ZEBRA_IPV4_ROUTE_IPV6_NEXTHOP_ADD:
2378 zread_ipv4_route_ipv6_nexthop_add(client, length, zvrf);
2379 break;
2380 case ZEBRA_IPV6_ROUTE_ADD:
2381 zread_ipv6_add(client, length, zvrf);
2382 break;
2383 case ZEBRA_IPV6_ROUTE_DELETE:
2384 zread_ipv6_delete(client, length, zvrf);
2385 break;
2386 case ZEBRA_REDISTRIBUTE_ADD:
2387 zebra_redistribute_add(command, client, length, zvrf);
2388 break;
2389 case ZEBRA_REDISTRIBUTE_DELETE:
2390 zebra_redistribute_delete(command, client, length, zvrf);
2391 break;
2392 case ZEBRA_REDISTRIBUTE_DEFAULT_ADD:
2393 zebra_redistribute_default_add(command, client, length, zvrf);
2394 break;
2395 case ZEBRA_REDISTRIBUTE_DEFAULT_DELETE:
2396 zebra_redistribute_default_delete(command, client, length,
2397 zvrf);
2398 break;
2399 case ZEBRA_IPV4_NEXTHOP_LOOKUP_MRIB:
2400 zread_ipv4_nexthop_lookup_mrib(client, length, zvrf);
2401 break;
2402 case ZEBRA_HELLO:
2403 zread_hello(client);
2404 break;
2405 case ZEBRA_NEXTHOP_REGISTER:
2406 zserv_rnh_register(client, sock, length, RNH_NEXTHOP_TYPE,
2407 zvrf);
2408 break;
2409 case ZEBRA_NEXTHOP_UNREGISTER:
2410 zserv_rnh_unregister(client, sock, length, RNH_NEXTHOP_TYPE,
2411 zvrf);
2412 break;
2413 case ZEBRA_IMPORT_ROUTE_REGISTER:
2414 zserv_rnh_register(client, sock, length, RNH_IMPORT_CHECK_TYPE,
2415 zvrf);
2416 break;
2417 case ZEBRA_IMPORT_ROUTE_UNREGISTER:
2418 zserv_rnh_unregister(client, sock, length,
2419 RNH_IMPORT_CHECK_TYPE, zvrf);
2420 break;
2421 case ZEBRA_BFD_DEST_UPDATE:
2422 case ZEBRA_BFD_DEST_REGISTER:
2423 zebra_ptm_bfd_dst_register(client, sock, length, command, zvrf);
2424 break;
2425 case ZEBRA_BFD_DEST_DEREGISTER:
2426 zebra_ptm_bfd_dst_deregister(client, sock, length, zvrf);
2427 break;
2428 case ZEBRA_VRF_UNREGISTER:
2429 zread_vrf_unregister(client, length, zvrf);
2430 break;
2431 case ZEBRA_BFD_CLIENT_REGISTER:
2432 zebra_ptm_bfd_client_register(client, sock, length);
2433 break;
2434 case ZEBRA_INTERFACE_ENABLE_RADV:
2435 #if defined(HAVE_RTADV)
2436 zebra_interface_radv_set(client, sock, length, zvrf, 1);
2437 #endif
2438 break;
2439 case ZEBRA_INTERFACE_DISABLE_RADV:
2440 #if defined(HAVE_RTADV)
2441 zebra_interface_radv_set(client, sock, length, zvrf, 0);
2442 #endif
2443 break;
2444 case ZEBRA_MPLS_LABELS_ADD:
2445 case ZEBRA_MPLS_LABELS_DELETE:
2446 zread_mpls_labels(command, client, length, vrf_id);
2447 break;
2448 case ZEBRA_IPMR_ROUTE_STATS:
2449 zebra_ipmr_route_stats(client, sock, length, zvrf);
2450 break;
2451 case ZEBRA_LABEL_MANAGER_CONNECT:
2452 case ZEBRA_GET_LABEL_CHUNK:
2453 case ZEBRA_RELEASE_LABEL_CHUNK:
2454 zread_label_manager_request(command, client, vrf_id);
2455 break;
2456 case ZEBRA_FEC_REGISTER:
2457 zserv_fec_register(client, sock, length);
2458 break;
2459 case ZEBRA_FEC_UNREGISTER:
2460 zserv_fec_unregister(client, sock, length);
2461 break;
2462 case ZEBRA_ADVERTISE_DEFAULT_GW:
2463 zebra_vxlan_advertise_gw_macip(client, sock, length, zvrf);
2464 break;
2465 case ZEBRA_ADVERTISE_ALL_VNI:
2466 zebra_vxlan_advertise_all_vni(client, sock, length, zvrf);
2467 break;
2468 case ZEBRA_REMOTE_VTEP_ADD:
2469 zebra_vxlan_remote_vtep_add(client, sock, length, zvrf);
2470 break;
2471 case ZEBRA_REMOTE_VTEP_DEL:
2472 zebra_vxlan_remote_vtep_del(client, sock, length, zvrf);
2473 break;
2474 case ZEBRA_REMOTE_MACIP_ADD:
2475 zebra_vxlan_remote_macip_add(client, sock, length, zvrf);
2476 break;
2477 case ZEBRA_REMOTE_MACIP_DEL:
2478 zebra_vxlan_remote_macip_del(client, sock, length, zvrf);
2479 break;
2480 case ZEBRA_INTERFACE_SET_MASTER:
2481 zread_interface_set_master(client, sock, length);
2482 break;
2483 case ZEBRA_PW_ADD:
2484 case ZEBRA_PW_DELETE:
2485 case ZEBRA_PW_SET:
2486 case ZEBRA_PW_UNSET:
2487 zread_pseudowire(command, client, length, vrf_id);
2488 break;
2489 default:
2490 zlog_info("Zebra received unknown command %d", command);
2491 break;
2492 }
2493
2494 if (client->t_suicide) {
2495 /* No need to wait for thread callback, just kill immediately.
2496 */
2497 zebra_client_close(client);
2498 return -1;
2499 }
2500
2501 zclient_read_out:
2502 stream_reset(client->ibuf);
2503 zebra_event(ZEBRA_READ, sock, client);
2504 return 0;
2505 }
2506
2507
2508 /* Accept code of zebra server socket. */
2509 static int zebra_accept(struct thread *thread)
2510 {
2511 int accept_sock;
2512 int client_sock;
2513 struct sockaddr_in client;
2514 socklen_t len;
2515
2516 accept_sock = THREAD_FD(thread);
2517
2518 /* Reregister myself. */
2519 zebra_event(ZEBRA_SERV, accept_sock, NULL);
2520
2521 len = sizeof(struct sockaddr_in);
2522 client_sock = accept(accept_sock, (struct sockaddr *)&client, &len);
2523
2524 if (client_sock < 0) {
2525 zlog_warn("Can't accept zebra socket: %s",
2526 safe_strerror(errno));
2527 return -1;
2528 }
2529
2530 /* Make client socket non-blocking. */
2531 set_nonblocking(client_sock);
2532
2533 /* Create new zebra client. */
2534 zebra_client_create(client_sock);
2535
2536 return 0;
2537 }
2538
2539 /* Make zebra server socket, wiping any existing one (see bug #403). */
2540 void zebra_zserv_socket_init(char *path)
2541 {
2542 int ret;
2543 int sock;
2544 mode_t old_mask;
2545 struct sockaddr_storage sa;
2546 socklen_t sa_len;
2547
2548 if (!frr_zclient_addr(&sa, &sa_len, path))
2549 /* should be caught in zebra main() */
2550 return;
2551
2552 /* Set umask */
2553 old_mask = umask(0077);
2554
2555 /* Make UNIX domain socket. */
2556 sock = socket(sa.ss_family, SOCK_STREAM, 0);
2557 if (sock < 0) {
2558 zlog_warn("Can't create zserv socket: %s",
2559 safe_strerror(errno));
2560 zlog_warn(
2561 "zebra can't provide full functionality due to above error");
2562 return;
2563 }
2564
2565 if (sa.ss_family != AF_UNIX) {
2566 sockopt_reuseaddr(sock);
2567 sockopt_reuseport(sock);
2568 } else {
2569 struct sockaddr_un *suna = (struct sockaddr_un *)&sa;
2570 if (suna->sun_path[0])
2571 unlink(suna->sun_path);
2572 }
2573
2574 if (sa.ss_family != AF_UNIX && zserv_privs.change(ZPRIVS_RAISE))
2575 zlog_err("Can't raise privileges");
2576
2577 ret = bind(sock, (struct sockaddr *)&sa, sa_len);
2578 if (ret < 0) {
2579 zlog_warn("Can't bind zserv socket on %s: %s", path,
2580 safe_strerror(errno));
2581 zlog_warn(
2582 "zebra can't provide full functionality due to above error");
2583 close(sock);
2584 return;
2585 }
2586 if (sa.ss_family != AF_UNIX && zserv_privs.change(ZPRIVS_LOWER))
2587 zlog_err("Can't lower privileges");
2588
2589 ret = listen(sock, 5);
2590 if (ret < 0) {
2591 zlog_warn("Can't listen to zserv socket %s: %s", path,
2592 safe_strerror(errno));
2593 zlog_warn(
2594 "zebra can't provide full functionality due to above error");
2595 close(sock);
2596 return;
2597 }
2598
2599 umask(old_mask);
2600
2601 zebra_event(ZEBRA_SERV, sock, NULL);
2602 }
2603
2604
2605 static void zebra_event(enum event event, int sock, struct zserv *client)
2606 {
2607 switch (event) {
2608 case ZEBRA_SERV:
2609 thread_add_read(zebrad.master, zebra_accept, client, sock,
2610 NULL);
2611 break;
2612 case ZEBRA_READ:
2613 client->t_read = NULL;
2614 thread_add_read(zebrad.master, zebra_client_read, client, sock,
2615 &client->t_read);
2616 break;
2617 case ZEBRA_WRITE:
2618 /**/
2619 break;
2620 }
2621 }
2622
2623 #define ZEBRA_TIME_BUF 32
2624 static char *zserv_time_buf(time_t *time1, char *buf, int buflen)
2625 {
2626 struct tm *tm;
2627 time_t now;
2628
2629 assert(buf != NULL);
2630 assert(buflen >= ZEBRA_TIME_BUF);
2631 assert(time1 != NULL);
2632
2633 if (!*time1) {
2634 snprintf(buf, buflen, "never ");
2635 return (buf);
2636 }
2637
2638 now = monotime(NULL);
2639 now -= *time1;
2640 tm = gmtime(&now);
2641
2642 if (now < ONE_DAY_SECOND)
2643 snprintf(buf, buflen, "%02d:%02d:%02d", tm->tm_hour, tm->tm_min,
2644 tm->tm_sec);
2645 else if (now < ONE_WEEK_SECOND)
2646 snprintf(buf, buflen, "%dd%02dh%02dm", tm->tm_yday, tm->tm_hour,
2647 tm->tm_min);
2648 else
2649 snprintf(buf, buflen, "%02dw%dd%02dh", tm->tm_yday / 7,
2650 tm->tm_yday - ((tm->tm_yday / 7) * 7), tm->tm_hour);
2651 return buf;
2652 }
2653
2654 static void zebra_show_client_detail(struct vty *vty, struct zserv *client)
2655 {
2656 char cbuf[ZEBRA_TIME_BUF], rbuf[ZEBRA_TIME_BUF];
2657 char wbuf[ZEBRA_TIME_BUF], nhbuf[ZEBRA_TIME_BUF], mbuf[ZEBRA_TIME_BUF];
2658
2659 vty_out(vty, "Client: %s", zebra_route_string(client->proto));
2660 if (client->instance)
2661 vty_out(vty, " Instance: %d", client->instance);
2662 vty_out(vty, "\n");
2663
2664 vty_out(vty, "------------------------ \n");
2665 vty_out(vty, "FD: %d \n", client->sock);
2666 vty_out(vty, "Route Table ID: %d \n", client->rtm_table);
2667
2668 vty_out(vty, "Connect Time: %s \n",
2669 zserv_time_buf(&client->connect_time, cbuf, ZEBRA_TIME_BUF));
2670 if (client->nh_reg_time) {
2671 vty_out(vty, "Nexthop Registry Time: %s \n",
2672 zserv_time_buf(&client->nh_reg_time, nhbuf,
2673 ZEBRA_TIME_BUF));
2674 if (client->nh_last_upd_time)
2675 vty_out(vty, "Nexthop Last Update Time: %s \n",
2676 zserv_time_buf(&client->nh_last_upd_time, mbuf,
2677 ZEBRA_TIME_BUF));
2678 else
2679 vty_out(vty, "No Nexthop Update sent\n");
2680 } else
2681 vty_out(vty, "Not registered for Nexthop Updates\n");
2682
2683 vty_out(vty, "Last Msg Rx Time: %s \n",
2684 zserv_time_buf(&client->last_read_time, rbuf, ZEBRA_TIME_BUF));
2685 vty_out(vty, "Last Msg Tx Time: %s \n",
2686 zserv_time_buf(&client->last_write_time, wbuf, ZEBRA_TIME_BUF));
2687 if (client->last_read_time)
2688 vty_out(vty, "Last Rcvd Cmd: %s \n",
2689 zserv_command_string(client->last_read_cmd));
2690 if (client->last_write_time)
2691 vty_out(vty, "Last Sent Cmd: %s \n",
2692 zserv_command_string(client->last_write_cmd));
2693 vty_out(vty, "\n");
2694
2695 vty_out(vty, "Type Add Update Del \n");
2696 vty_out(vty, "================================================== \n");
2697 vty_out(vty, "IPv4 %-12d%-12d%-12d\n", client->v4_route_add_cnt,
2698 client->v4_route_upd8_cnt, client->v4_route_del_cnt);
2699 vty_out(vty, "IPv6 %-12d%-12d%-12d\n", client->v6_route_add_cnt,
2700 client->v6_route_upd8_cnt, client->v6_route_del_cnt);
2701 vty_out(vty, "Redist:v4 %-12d%-12d%-12d\n", client->redist_v4_add_cnt,
2702 0, client->redist_v4_del_cnt);
2703 vty_out(vty, "Redist:v6 %-12d%-12d%-12d\n", client->redist_v6_add_cnt,
2704 0, client->redist_v6_del_cnt);
2705 vty_out(vty, "Connected %-12d%-12d%-12d\n", client->ifadd_cnt, 0,
2706 client->ifdel_cnt);
2707 vty_out(vty, "BFD peer %-12d%-12d%-12d\n", client->bfd_peer_add_cnt,
2708 client->bfd_peer_upd8_cnt, client->bfd_peer_del_cnt);
2709 vty_out(vty, "Interface Up Notifications: %d\n", client->ifup_cnt);
2710 vty_out(vty, "Interface Down Notifications: %d\n", client->ifdown_cnt);
2711 vty_out(vty, "VNI add notifications: %d\n", client->vniadd_cnt);
2712 vty_out(vty, "VNI delete notifications: %d\n", client->vnidel_cnt);
2713 vty_out(vty, "MAC-IP add notifications: %d\n", client->macipadd_cnt);
2714 vty_out(vty, "MAC-IP delete notifications: %d\n", client->macipdel_cnt);
2715
2716 vty_out(vty, "\n");
2717 return;
2718 }
2719
2720 static void zebra_show_client_brief(struct vty *vty, struct zserv *client)
2721 {
2722 char cbuf[ZEBRA_TIME_BUF], rbuf[ZEBRA_TIME_BUF];
2723 char wbuf[ZEBRA_TIME_BUF];
2724
2725 vty_out(vty, "%-8s%12s %12s%12s%8d/%-8d%8d/%-8d\n",
2726 zebra_route_string(client->proto),
2727 zserv_time_buf(&client->connect_time, cbuf, ZEBRA_TIME_BUF),
2728 zserv_time_buf(&client->last_read_time, rbuf, ZEBRA_TIME_BUF),
2729 zserv_time_buf(&client->last_write_time, wbuf, ZEBRA_TIME_BUF),
2730 client->v4_route_add_cnt + client->v4_route_upd8_cnt,
2731 client->v4_route_del_cnt,
2732 client->v6_route_add_cnt + client->v6_route_upd8_cnt,
2733 client->v6_route_del_cnt);
2734 }
2735
2736 struct zserv *zebra_find_client(u_char proto)
2737 {
2738 struct listnode *node, *nnode;
2739 struct zserv *client;
2740
2741 for (ALL_LIST_ELEMENTS(zebrad.client_list, node, nnode, client)) {
2742 if (client->proto == proto)
2743 return client;
2744 }
2745
2746 return NULL;
2747 }
2748
2749 #ifdef HAVE_NETLINK
2750 /* Display default rtm_table for all clients. */
2751 DEFUN (show_table,
2752 show_table_cmd,
2753 "show table",
2754 SHOW_STR
2755 "default routing table to use for all clients\n")
2756 {
2757 vty_out(vty, "table %d\n", zebrad.rtm_table_default);
2758 return CMD_SUCCESS;
2759 }
2760
2761 DEFUN (config_table,
2762 config_table_cmd,
2763 "table TABLENO",
2764 "Configure target kernel routing table\n"
2765 "TABLE integer\n")
2766 {
2767 zebrad.rtm_table_default = strtol(argv[1]->arg, (char **)0, 10);
2768 return CMD_SUCCESS;
2769 }
2770
2771 DEFUN (no_config_table,
2772 no_config_table_cmd,
2773 "no table [TABLENO]",
2774 NO_STR
2775 "Configure target kernel routing table\n"
2776 "TABLE integer\n")
2777 {
2778 zebrad.rtm_table_default = 0;
2779 return CMD_SUCCESS;
2780 }
2781 #endif
2782
2783 DEFUN (ip_forwarding,
2784 ip_forwarding_cmd,
2785 "ip forwarding",
2786 IP_STR
2787 "Turn on IP forwarding")
2788 {
2789 int ret;
2790
2791 ret = ipforward();
2792 if (ret == 0)
2793 ret = ipforward_on();
2794
2795 if (ret == 0) {
2796 vty_out(vty, "Can't turn on IP forwarding\n");
2797 return CMD_WARNING_CONFIG_FAILED;
2798 }
2799
2800 return CMD_SUCCESS;
2801 }
2802
2803 DEFUN (no_ip_forwarding,
2804 no_ip_forwarding_cmd,
2805 "no ip forwarding",
2806 NO_STR
2807 IP_STR
2808 "Turn off IP forwarding")
2809 {
2810 int ret;
2811
2812 ret = ipforward();
2813 if (ret != 0)
2814 ret = ipforward_off();
2815
2816 if (ret != 0) {
2817 vty_out(vty, "Can't turn off IP forwarding\n");
2818 return CMD_WARNING_CONFIG_FAILED;
2819 }
2820
2821 return CMD_SUCCESS;
2822 }
2823
2824 DEFUN (show_zebra,
2825 show_zebra_cmd,
2826 "show zebra",
2827 SHOW_STR
2828 "Zebra information\n")
2829 {
2830 struct vrf *vrf;
2831
2832 vty_out(vty,
2833 " Route Route Neighbor LSP LSP\n");
2834 vty_out(vty,
2835 "VRF Installs Removals Updates Installs Removals\n");
2836 RB_FOREACH (vrf, vrf_name_head, &vrfs_by_name) {
2837 struct zebra_vrf *zvrf = vrf->info;
2838 vty_out(vty, "%-25s %10" PRIu64 " %10" PRIu64 " %10" PRIu64
2839 " %10" PRIu64 " %10" PRIu64 "\n",
2840 vrf->name, zvrf->installs, zvrf->removals,
2841 zvrf->neigh_updates, zvrf->lsp_installs,
2842 zvrf->lsp_removals);
2843 }
2844
2845 return CMD_SUCCESS;
2846 }
2847
2848 /* This command is for debugging purpose. */
2849 DEFUN (show_zebra_client,
2850 show_zebra_client_cmd,
2851 "show zebra client",
2852 SHOW_STR
2853 "Zebra information\n"
2854 "Client information\n")
2855 {
2856 struct listnode *node;
2857 struct zserv *client;
2858
2859 for (ALL_LIST_ELEMENTS_RO(zebrad.client_list, node, client))
2860 zebra_show_client_detail(vty, client);
2861
2862 return CMD_SUCCESS;
2863 }
2864
2865 /* This command is for debugging purpose. */
2866 DEFUN (show_zebra_client_summary,
2867 show_zebra_client_summary_cmd,
2868 "show zebra client summary",
2869 SHOW_STR
2870 "Zebra information brief\n"
2871 "Client information brief\n"
2872 "Brief Summary\n")
2873 {
2874 struct listnode *node;
2875 struct zserv *client;
2876
2877 vty_out(vty,
2878 "Name Connect Time Last Read Last Write IPv4 Routes IPv6 Routes \n");
2879 vty_out(vty,
2880 "--------------------------------------------------------------------------------\n");
2881
2882 for (ALL_LIST_ELEMENTS_RO(zebrad.client_list, node, client))
2883 zebra_show_client_brief(vty, client);
2884
2885 vty_out(vty, "Routes column shows (added+updated)/deleted\n");
2886 return CMD_SUCCESS;
2887 }
2888
2889 /* Table configuration write function. */
2890 static int config_write_table(struct vty *vty)
2891 {
2892 if (zebrad.rtm_table_default)
2893 vty_out(vty, "table %d\n", zebrad.rtm_table_default);
2894 return 0;
2895 }
2896
2897 /* table node for routing tables. */
2898 static struct cmd_node table_node = {TABLE_NODE,
2899 "", /* This node has no interface. */
2900 1};
2901
2902 /* Only display ip forwarding is enabled or not. */
2903 DEFUN (show_ip_forwarding,
2904 show_ip_forwarding_cmd,
2905 "show ip forwarding",
2906 SHOW_STR
2907 IP_STR
2908 "IP forwarding status\n")
2909 {
2910 int ret;
2911
2912 ret = ipforward();
2913
2914 if (ret == 0)
2915 vty_out(vty, "IP forwarding is off\n");
2916 else
2917 vty_out(vty, "IP forwarding is on\n");
2918 return CMD_SUCCESS;
2919 }
2920
2921 /* Only display ipv6 forwarding is enabled or not. */
2922 DEFUN (show_ipv6_forwarding,
2923 show_ipv6_forwarding_cmd,
2924 "show ipv6 forwarding",
2925 SHOW_STR
2926 "IPv6 information\n"
2927 "Forwarding status\n")
2928 {
2929 int ret;
2930
2931 ret = ipforward_ipv6();
2932
2933 switch (ret) {
2934 case -1:
2935 vty_out(vty, "ipv6 forwarding is unknown\n");
2936 break;
2937 case 0:
2938 vty_out(vty, "ipv6 forwarding is %s\n", "off");
2939 break;
2940 case 1:
2941 vty_out(vty, "ipv6 forwarding is %s\n", "on");
2942 break;
2943 default:
2944 vty_out(vty, "ipv6 forwarding is %s\n", "off");
2945 break;
2946 }
2947 return CMD_SUCCESS;
2948 }
2949
2950 DEFUN (ipv6_forwarding,
2951 ipv6_forwarding_cmd,
2952 "ipv6 forwarding",
2953 IPV6_STR
2954 "Turn on IPv6 forwarding")
2955 {
2956 int ret;
2957
2958 ret = ipforward_ipv6();
2959 if (ret == 0)
2960 ret = ipforward_ipv6_on();
2961
2962 if (ret == 0) {
2963 vty_out(vty, "Can't turn on IPv6 forwarding\n");
2964 return CMD_WARNING_CONFIG_FAILED;
2965 }
2966
2967 return CMD_SUCCESS;
2968 }
2969
2970 DEFUN (no_ipv6_forwarding,
2971 no_ipv6_forwarding_cmd,
2972 "no ipv6 forwarding",
2973 NO_STR
2974 IPV6_STR
2975 "Turn off IPv6 forwarding")
2976 {
2977 int ret;
2978
2979 ret = ipforward_ipv6();
2980 if (ret != 0)
2981 ret = ipforward_ipv6_off();
2982
2983 if (ret != 0) {
2984 vty_out(vty, "Can't turn off IPv6 forwarding\n");
2985 return CMD_WARNING_CONFIG_FAILED;
2986 }
2987
2988 return CMD_SUCCESS;
2989 }
2990
2991 /* IPForwarding configuration write function. */
2992 static int config_write_forwarding(struct vty *vty)
2993 {
2994 /* FIXME: Find better place for that. */
2995 router_id_write(vty);
2996
2997 if (!ipforward())
2998 vty_out(vty, "no ip forwarding\n");
2999 if (!ipforward_ipv6())
3000 vty_out(vty, "no ipv6 forwarding\n");
3001 vty_out(vty, "!\n");
3002 return 0;
3003 }
3004
3005 /* table node for routing tables. */
3006 static struct cmd_node forwarding_node = {FORWARDING_NODE,
3007 "", /* This node has no interface. */
3008 1};
3009
3010 /* Initialisation of zebra and installation of commands. */
3011 void zebra_init(void)
3012 {
3013 /* Client list init. */
3014 zebrad.client_list = list_new();
3015 zebrad.client_list->del = (void (*)(void *))zebra_client_free;
3016
3017 /* Install configuration write function. */
3018 install_node(&table_node, config_write_table);
3019 install_node(&forwarding_node, config_write_forwarding);
3020
3021 install_element(VIEW_NODE, &show_ip_forwarding_cmd);
3022 install_element(CONFIG_NODE, &ip_forwarding_cmd);
3023 install_element(CONFIG_NODE, &no_ip_forwarding_cmd);
3024 install_element(ENABLE_NODE, &show_zebra_cmd);
3025 install_element(ENABLE_NODE, &show_zebra_client_cmd);
3026 install_element(ENABLE_NODE, &show_zebra_client_summary_cmd);
3027
3028 #ifdef HAVE_NETLINK
3029 install_element(VIEW_NODE, &show_table_cmd);
3030 install_element(CONFIG_NODE, &config_table_cmd);
3031 install_element(CONFIG_NODE, &no_config_table_cmd);
3032 #endif /* HAVE_NETLINK */
3033
3034 install_element(VIEW_NODE, &show_ipv6_forwarding_cmd);
3035 install_element(CONFIG_NODE, &ipv6_forwarding_cmd);
3036 install_element(CONFIG_NODE, &no_ipv6_forwarding_cmd);
3037
3038 /* Route-map */
3039 zebra_route_map_init();
3040 }
FRRouting mirror