]> git.proxmox.com Git - mirror_frr.git/blob - zebra/zserv.c
projects / mirror_frr.git / blob
? search:


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