eigrpd/eigrp_zebra.c

   1 /*
   2  * Zebra connect library for EIGRP.
   3  * Copyright (C) 2013-2014
   4  * Authors:
   5  *   Donnie Savage
   6  *   Jan Janovic
   7  *   Matej Perina
   8  *   Peter Orsag
   9  *   Peter Paluch
  10  *
  11  * This file is part of GNU Zebra.
  12  *
  13  * GNU Zebra is free software; you can redistribute it and/or modify it
  14  * under the terms of the GNU General Public License as published by the
  15  * Free Software Foundation; either version 2, or (at your option) any
  16  * later version.
  17  *
  18  * GNU Zebra is distributed in the hope that it will be useful, but
  19  * WITHOUT ANY WARRANTY; without even the implied warranty of
  20  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  21  * General Public License for more details.
  22  *
  23  * You should have received a copy of the GNU General Public License along
  24  * with this program; see the file COPYING; if not, write to the Free Software
  25  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
  26  */
  27
  28 #include <zebra.h>
  29
  30 #include "thread.h"
  31 #include "command.h"
  32 #include "network.h"
  33 #include "prefix.h"
  34 #include "routemap.h"
  35 #include "table.h"
  36 #include "stream.h"
  37 #include "memory.h"
  38 #include "zclient.h"
  39 #include "filter.h"
  40 #include "plist.h"
  41 #include "log.h"
  42 #include "nexthop.h"
  43
  44 #include "eigrpd/eigrp_structs.h"
  45 #include "eigrpd/eigrpd.h"
  46 #include "eigrpd/eigrp_interface.h"
  47 #include "eigrpd/eigrp_neighbor.h"
  48 #include "eigrpd/eigrp_packet.h"
  49 #include "eigrpd/eigrp_zebra.h"
  50 #include "eigrpd/eigrp_vty.h"
  51 #include "eigrpd/eigrp_dump.h"
  52 #include "eigrpd/eigrp_network.h"
  53 #include "eigrpd/eigrp_topology.h"
  54 #include "eigrpd/eigrp_fsm.h"
  55
  56 static int eigrp_interface_add(int, struct zclient *, zebra_size_t, vrf_id_t);
  57 static int eigrp_interface_delete(int, struct zclient *, zebra_size_t,
  58                                   vrf_id_t);
  59 static int eigrp_interface_address_add(int, struct zclient *, zebra_size_t,
  60                                        vrf_id_t vrf_id);
  61 static int eigrp_interface_address_delete(int, struct zclient *, zebra_size_t,
  62                                           vrf_id_t vrf_id);
  63 static int eigrp_interface_state_up(int, struct zclient *, zebra_size_t,
  64                                     vrf_id_t vrf_id);
  65 static int eigrp_interface_state_down(int, struct zclient *, zebra_size_t,
  66                                       vrf_id_t vrf_id);
  67 static struct interface *zebra_interface_if_lookup(struct stream *);
  68
  69 static int eigrp_zebra_read_route(int, struct zclient *, zebra_size_t,
  70                                   vrf_id_t vrf_id);
  71
  72 /* Zebra structure to hold current status. */
  73 struct zclient *zclient = NULL;
  74
  75 /* For registering threads. */
  76 extern struct thread_master *master;
  77 struct in_addr router_id_zebra;
  78
  79 /* Router-id update message from zebra. */
  80 static int eigrp_router_id_update_zebra(int command, struct zclient *zclient,
  81                                         zebra_size_t length, vrf_id_t vrf_id)
  82 {
  83         struct eigrp *eigrp;
  84         struct prefix router_id;
  85         zebra_router_id_update_read(zclient->ibuf, &router_id);
  86
  87         router_id_zebra = router_id.u.prefix4;
  88
  89         eigrp = eigrp_lookup();
  90
  91         if (eigrp != NULL)
  92                 eigrp_router_id_update(eigrp);
  93
  94         return 0;
  95 }
  96
  97 static void eigrp_zebra_connected(struct zclient *zclient)
  98 {
  99         zclient_send_reg_requests(zclient, VRF_DEFAULT);
 100 }
 101
 102 void eigrp_zebra_init(void)
 103 {
 104         zclient = zclient_new(master);
 105
 106         zclient_init(zclient, ZEBRA_ROUTE_EIGRP, 0);
 107         zclient->zebra_connected = eigrp_zebra_connected;
 108         zclient->router_id_update = eigrp_router_id_update_zebra;
 109         zclient->interface_add = eigrp_interface_add;
 110         zclient->interface_delete = eigrp_interface_delete;
 111         zclient->interface_up = eigrp_interface_state_up;
 112         zclient->interface_down = eigrp_interface_state_down;
 113         zclient->interface_address_add = eigrp_interface_address_add;
 114         zclient->interface_address_delete = eigrp_interface_address_delete;
 115         zclient->redistribute_route_add = eigrp_zebra_read_route;
 116         zclient->redistribute_route_del = eigrp_zebra_read_route;
 117 }
 118
 119
 120 /* Zebra route add and delete treatment. */
 121 static int eigrp_zebra_read_route(int command, struct zclient *zclient,
 122                                   zebra_size_t length, vrf_id_t vrf_id)
 123 {
 124         struct zapi_route api;
 125         struct eigrp *eigrp;
 126
 127         if (zapi_route_decode(zclient->ibuf, &api) < 0)
 128                 return -1;
 129
 130         if (IPV4_NET127(ntohl(api.prefix.u.prefix4.s_addr)))
 131                 return 0;
 132
 133         eigrp = eigrp_lookup();
 134         if (eigrp == NULL)
 135                 return 0;
 136
 137         if (command == ZEBRA_REDISTRIBUTE_ROUTE_ADD) {
 138
 139         } else /* if (command == ZEBRA_REDISTRIBUTE_ROUTE_DEL) */
 140         {
 141         }
 142
 143         return 0;
 144 }
 145
 146 /* Inteface addition message from zebra. */
 147 static int eigrp_interface_add(int command, struct zclient *zclient,
 148                                zebra_size_t length, vrf_id_t vrf_id)
 149 {
 150         struct interface *ifp;
 151         struct eigrp_interface *ei;
 152
 153         ifp = zebra_interface_add_read(zclient->ibuf, vrf_id);
 154
 155         if (!ifp->info)
 156                 return 0;
 157
 158         ei = ifp->info;
 159
 160         ei->params.type = eigrp_default_iftype(ifp);
 161
 162         eigrp_if_update(ifp);
 163
 164         return 0;
 165 }
 166
 167 static int eigrp_interface_delete(int command, struct zclient *zclient,
 168                                   zebra_size_t length, vrf_id_t vrf_id)
 169 {
 170         struct interface *ifp;
 171         struct stream *s;
 172
 173         s = zclient->ibuf;
 174         /* zebra_interface_state_read () updates interface structure in iflist
 175          */
 176         ifp = zebra_interface_state_read(s, vrf_id);
 177
 178         if (ifp == NULL)
 179                 return 0;
 180
 181         if (if_is_up(ifp))
 182                 zlog_warn("Zebra: got delete of %s, but interface is still up",
 183                           ifp->name);
 184
 185         if (IS_DEBUG_EIGRP(zebra, ZEBRA_INTERFACE))
 186                 zlog_debug(
 187                         "Zebra: interface delete %s index %d flags %llx metric %d mtu %d",
 188                         ifp->name, ifp->ifindex, (unsigned long long)ifp->flags,
 189                         ifp->metric, ifp->mtu);
 190
 191         if (ifp->info)
 192                 eigrp_if_free(ifp->info,
 193                               INTERFACE_DOWN_BY_ZEBRA);
 194
 195         return 0;
 196 }
 197
 198 static int eigrp_interface_address_add(int command, struct zclient *zclient,
 199                                        zebra_size_t length, vrf_id_t vrf_id)
 200 {
 201         struct connected *c;
 202
 203         c = zebra_interface_address_read(command, zclient->ibuf, vrf_id);
 204
 205         if (c == NULL)
 206                 return 0;
 207
 208         if (IS_DEBUG_EIGRP(zebra, ZEBRA_INTERFACE)) {
 209                 char buf[128];
 210                 prefix2str(c->address, buf, sizeof(buf));
 211                 zlog_debug("Zebra: interface %s address add %s", c->ifp->name,
 212                            buf);
 213         }
 214
 215         eigrp_if_update(c->ifp);
 216
 217         return 0;
 218 }
 219
 220 static int eigrp_interface_address_delete(int command, struct zclient *zclient,
 221                                           zebra_size_t length, vrf_id_t vrf_id)
 222 {
 223         struct connected *c;
 224         struct interface *ifp;
 225         struct eigrp_interface *ei;
 226
 227         c = zebra_interface_address_read(command, zclient->ibuf, vrf_id);
 228
 229         if (c == NULL)
 230                 return 0;
 231
 232         if (IS_DEBUG_EIGRP(zebra, ZEBRA_INTERFACE)) {
 233                 char buf[128];
 234                 prefix2str(c->address, buf, sizeof(buf));
 235                 zlog_debug("Zebra: interface %s address delete %s",
 236                            c->ifp->name, buf);
 237         }
 238
 239         ifp = c->ifp;
 240         ei = ifp->info;
 241         if (!ei)
 242                 return 0;
 243
 244         /* Call interface hook functions to clean up */
 245         eigrp_if_free(ei, INTERFACE_DOWN_BY_ZEBRA);
 246
 247         connected_free(c);
 248
 249         return 0;
 250 }
 251
 252 static int eigrp_interface_state_up(int command, struct zclient *zclient,
 253                                     zebra_size_t length, vrf_id_t vrf_id)
 254 {
 255         struct interface *ifp;
 256
 257         ifp = zebra_interface_if_lookup(zclient->ibuf);
 258
 259         if (ifp == NULL)
 260                 return 0;
 261
 262         /* Interface is already up. */
 263         if (if_is_operative(ifp)) {
 264                 /* Temporarily keep ifp values. */
 265                 struct interface if_tmp;
 266                 memcpy(&if_tmp, ifp, sizeof(struct interface));
 267
 268                 zebra_interface_if_set_value(zclient->ibuf, ifp);
 269
 270                 if (IS_DEBUG_EIGRP(zebra, ZEBRA_INTERFACE))
 271                         zlog_debug("Zebra: Interface[%s] state update.",
 272                                    ifp->name);
 273
 274                 if (if_tmp.bandwidth != ifp->bandwidth) {
 275                         if (IS_DEBUG_EIGRP(zebra, ZEBRA_INTERFACE))
 276                                 zlog_debug(
 277                                         "Zebra: Interface[%s] bandwidth change %d -> %d.",
 278                                         ifp->name, if_tmp.bandwidth,
 279                                         ifp->bandwidth);
 280
 281                         //          eigrp_if_recalculate_output_cost (ifp);
 282                 }
 283
 284                 if (if_tmp.mtu != ifp->mtu) {
 285                         if (IS_DEBUG_EIGRP(zebra, ZEBRA_INTERFACE))
 286                                 zlog_debug(
 287                                         "Zebra: Interface[%s] MTU change %u -> %u.",
 288                                         ifp->name, if_tmp.mtu, ifp->mtu);
 289
 290                         /* Must reset the interface (simulate down/up) when MTU
 291                          * changes. */
 292                         eigrp_if_reset(ifp);
 293                 }
 294                 return 0;
 295         }
 296
 297         zebra_interface_if_set_value(zclient->ibuf, ifp);
 298
 299         if (IS_DEBUG_EIGRP(zebra, ZEBRA_INTERFACE))
 300                 zlog_debug("Zebra: Interface[%s] state change to up.",
 301                            ifp->name);
 302
 303         if (ifp->info)
 304                 eigrp_if_up(ifp->info);
 305
 306         return 0;
 307 }
 308
 309 static int eigrp_interface_state_down(int command, struct zclient *zclient,
 310                                       zebra_size_t length, vrf_id_t vrf_id)
 311 {
 312         struct interface *ifp;
 313
 314         ifp = zebra_interface_state_read(zclient->ibuf, vrf_id);
 315
 316         if (ifp == NULL)
 317                 return 0;
 318
 319         if (IS_DEBUG_EIGRP(zebra, ZEBRA_INTERFACE))
 320                 zlog_debug("Zebra: Interface[%s] state change to down.",
 321                            ifp->name);
 322
 323         if (ifp->info)
 324                 eigrp_if_down(ifp->info);
 325
 326         return 0;
 327 }
 328
 329 static struct interface *zebra_interface_if_lookup(struct stream *s)
 330 {
 331         char ifname_tmp[INTERFACE_NAMSIZ];
 332
 333         /* Read interface name. */
 334         stream_get(ifname_tmp, s, INTERFACE_NAMSIZ);
 335
 336         /* And look it up. */
 337         return if_lookup_by_name(ifname_tmp, VRF_DEFAULT);
 338 }
 339
 340 void eigrp_zebra_route_add(struct prefix *p, struct list *successors)
 341 {
 342         struct zapi_route api;
 343         struct zapi_nexthop *api_nh;
 344         struct eigrp_nexthop_entry *te;
 345         struct listnode *node;
 346         int count = 0;
 347
 348         if (!zclient->redist[AFI_IP][ZEBRA_ROUTE_EIGRP])
 349                 return;
 350
 351         memset(&api, 0, sizeof(api));
 352         api.vrf_id = VRF_DEFAULT;
 353         api.type = ZEBRA_ROUTE_EIGRP;
 354         api.safi = SAFI_UNICAST;
 355         memcpy(&api.prefix, p, sizeof(*p));
 356
 357         SET_FLAG(api.message, ZAPI_MESSAGE_NEXTHOP);
 358
 359         /* Nexthop, ifindex, distance and metric information. */
 360         for (ALL_LIST_ELEMENTS_RO(successors, node, te)) {
 361                 if (count >= MULTIPATH_NUM)
 362                         break;
 363                 api_nh = &api.nexthops[count];
 364                 if (te->adv_router->src.s_addr) {
 365                         api_nh->gate.ipv4 = te->adv_router->src;
 366                         api_nh->type = NEXTHOP_TYPE_IPV4_IFINDEX;
 367                 } else
 368                         api_nh->type = NEXTHOP_TYPE_IFINDEX;
 369                 api_nh->ifindex = te->ei->ifp->ifindex;
 370
 371                 count++;
 372         }
 373         api.nexthop_num = count;
 374
 375         if (IS_DEBUG_EIGRP(zebra, ZEBRA_REDISTRIBUTE)) {
 376                 char buf[2][PREFIX_STRLEN];
 377                 zlog_debug("Zebra: Route add %s nexthop %s",
 378                            prefix2str(p, buf[0], PREFIX_STRLEN),
 379                            inet_ntop(AF_INET, 0, buf[1], PREFIX_STRLEN));
 380         }
 381
 382         zclient_route_send(ZEBRA_ROUTE_ADD, zclient, &api);
 383 }
 384
 385 void eigrp_zebra_route_delete(struct prefix *p)
 386 {
 387         struct zapi_route api;
 388
 389         if (!zclient->redist[AFI_IP][ZEBRA_ROUTE_EIGRP])
 390                 return;
 391
 392         memset(&api, 0, sizeof(api));
 393         api.vrf_id = VRF_DEFAULT;
 394         api.type = ZEBRA_ROUTE_EIGRP;
 395         api.safi = SAFI_UNICAST;
 396         memcpy(&api.prefix, p, sizeof(*p));
 397         zclient_route_send(ZEBRA_ROUTE_DELETE, zclient, &api);
 398
 399         if (IS_DEBUG_EIGRP(zebra, ZEBRA_REDISTRIBUTE)) {
 400                 char buf[PREFIX_STRLEN];
 401                 zlog_debug("Zebra: Route del %s",
 402                            prefix2str(p, buf, PREFIX_STRLEN));
 403         }
 404
 405         return;
 406 }
 407
 408 int eigrp_is_type_redistributed(int type)
 409 {
 410         return ((DEFAULT_ROUTE_TYPE(type))
 411                         ? vrf_bitmap_check(zclient->default_information,
 412                                            VRF_DEFAULT)
 413                         : vrf_bitmap_check(zclient->redist[AFI_IP][type],
 414                                            VRF_DEFAULT));
 415 }
 416
 417 int eigrp_redistribute_set(struct eigrp *eigrp, int type,
 418                            struct eigrp_metrics metric)
 419 {
 420
 421         if (eigrp_is_type_redistributed(type)) {
 422                 if (eigrp_metrics_is_same(metric, eigrp->dmetric[type])) {
 423                         eigrp->dmetric[type] = metric;
 424                 }
 425
 426                 eigrp_external_routes_refresh(eigrp, type);
 427
 428                 //      if (IS_DEBUG_EIGRP(zebra, ZEBRA_REDISTRIBUTE))
 429                 //        zlog_debug ("Redistribute[%s]: Refresh  Type[%d],
 430                 //        Metric[%d]",
 431                 //                   eigrp_redist_string(type),
 432                 //                   metric_type (eigrp, type), metric_value
 433                 //                   (eigrp, type));
 434                 return CMD_SUCCESS;
 435         }
 436
 437         eigrp->dmetric[type] = metric;
 438
 439         zclient_redistribute(ZEBRA_REDISTRIBUTE_ADD, zclient, AFI_IP, type, 0,
 440                              VRF_DEFAULT);
 441
 442         ++eigrp->redistribute;
 443
 444         return CMD_SUCCESS;
 445 }
 446
 447 int eigrp_redistribute_unset(struct eigrp *eigrp, int type)
 448 {
 449
 450         if (eigrp_is_type_redistributed(type)) {
 451                 memset(&eigrp->dmetric[type], 0, sizeof(struct eigrp_metrics));
 452                 zclient_redistribute(ZEBRA_REDISTRIBUTE_DELETE, zclient, AFI_IP,
 453                                      type, 0, VRF_DEFAULT);
 454                 --eigrp->redistribute;
 455         }
 456
 457         return CMD_SUCCESS;
 458 }