src/vnet/ip/ip_api.c

   1 /*
   2  *------------------------------------------------------------------
   3  * ip_api.c - vnet ip api
   4  *
   5  * Copyright (c) 2016 Cisco and/or its affiliates.
   6  * Licensed under the Apache License, Version 2.0 (the "License");
   7  * you may not use this file except in compliance with the License.
   8  * You may obtain a copy of the License at:
   9  *
  10  *     http://www.apache.org/licenses/LICENSE-2.0
  11  *
  12  * Unless required by applicable law or agreed to in writing, software
  13  * distributed under the License is distributed on an "AS IS" BASIS,
  14  * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
  15  * See the License for the specific language governing permissions and
  16  * limitations under the License.
  17  *------------------------------------------------------------------
  18  */
  19
  20 #include <vnet/vnet.h>
  21 #include <vlibmemory/api.h>
  22
  23 #include <vnet/interface.h>
  24 #include <vnet/api_errno.h>
  25 #include <vnet/ethernet/ethernet.h>
  26 #include <vnet/ip/ip.h>
  27 #include <vnet/ip/ip_neighbor.h>
  28 #include <vnet/ip/ip6_neighbor.h>
  29 #include <vnet/ip/ip_punt_drop.h>
  30 #include <vnet/fib/fib_table.h>
  31 #include <vnet/fib/fib_api.h>
  32 #include <vnet/dpo/drop_dpo.h>
  33 #include <vnet/dpo/receive_dpo.h>
  34 #include <vnet/dpo/lookup_dpo.h>
  35 #include <vnet/dpo/classify_dpo.h>
  36 #include <vnet/dpo/ip_null_dpo.h>
  37 #include <vnet/ethernet/arp_packet.h>
  38 #include <vnet/mfib/ip6_mfib.h>
  39 #include <vnet/mfib/ip4_mfib.h>
  40 #include <vnet/mfib/mfib_signal.h>
  41 #include <vnet/mfib/mfib_entry.h>
  42 #include <vnet/ip/ip_source_and_port_range_check.h>
  43 #include <vnet/fib/ip4_fib.h>
  44 #include <vnet/fib/ip6_fib.h>
  45 #include <vnet/ip/ip6_hop_by_hop.h>
  46 #include <vnet/ip/ip4_reassembly.h>
  47 #include <vnet/ip/ip6_reassembly.h>
  48 #include <vnet/ethernet/arp.h>
  49 #include <vnet/ip/ip_types_api.h>
  50
  51 #include <vnet/vnet_msg_enum.h>
  52
  53 #define vl_typedefs             /* define message structures */
  54 #include <vnet/vnet_all_api_h.h>
  55 #undef vl_typedefs
  56
  57 #define vl_endianfun            /* define message structures */
  58 #include <vnet/vnet_all_api_h.h>
  59 #undef vl_endianfun
  60
  61 /* instantiate all the print functions we know about */
  62 #define vl_print(handle, ...) vlib_cli_output (handle, __VA_ARGS__)
  63 #define vl_printfun
  64 #include <vnet/vnet_all_api_h.h>
  65 #undef vl_printfun
  66
  67 #include <vlibapi/api_helper_macros.h>
  68
  69
  70 #define foreach_ip_api_msg                                              \
  71 _(IP_FIB_DUMP, ip_fib_dump)                                             \
  72 _(IP6_FIB_DUMP, ip6_fib_dump)                                           \
  73 _(IP_MFIB_DUMP, ip_mfib_dump)                                           \
  74 _(IP6_MFIB_DUMP, ip6_mfib_dump)                                         \
  75 _(IP_NEIGHBOR_DUMP, ip_neighbor_dump)                                   \
  76 _(IP_MROUTE_ADD_DEL, ip_mroute_add_del)                                 \
  77 _(MFIB_SIGNAL_DUMP, mfib_signal_dump)                                   \
  78 _(IP_ADDRESS_DUMP, ip_address_dump)                                     \
  79 _(IP_UNNUMBERED_DUMP, ip_unnumbered_dump)                               \
  80 _(IP_DUMP, ip_dump)                                                     \
  81 _(IP_NEIGHBOR_ADD_DEL, ip_neighbor_add_del)                             \
  82 _(SET_ARP_NEIGHBOR_LIMIT, set_arp_neighbor_limit)                       \
  83 _(IP_PROBE_NEIGHBOR, ip_probe_neighbor)                                 \
  84 _(IP_SCAN_NEIGHBOR_ENABLE_DISABLE, ip_scan_neighbor_enable_disable)     \
  85 _(WANT_IP4_ARP_EVENTS, want_ip4_arp_events)                             \
  86 _(WANT_IP6_ND_EVENTS, want_ip6_nd_events)                               \
  87 _(WANT_IP6_RA_EVENTS, want_ip6_ra_events)                               \
  88 _(PROXY_ARP_ADD_DEL, proxy_arp_add_del)                                 \
  89 _(PROXY_ARP_DUMP, proxy_arp_dump)                                       \
  90 _(PROXY_ARP_INTFC_ENABLE_DISABLE, proxy_arp_intfc_enable_disable)       \
  91  _(PROXY_ARP_INTFC_DUMP, proxy_arp_intfc_dump)                          \
  92 _(RESET_FIB, reset_fib)                                                 \
  93 _(IP_ADD_DEL_ROUTE, ip_add_del_route)                                   \
  94 _(IP_TABLE_ADD_DEL, ip_table_add_del)                                   \
  95 _(IP_PUNT_POLICE, ip_punt_police)                                       \
  96 _(IP_PUNT_REDIRECT, ip_punt_redirect)                                   \
  97 _(SET_IP_FLOW_HASH,set_ip_flow_hash)                                    \
  98 _(SW_INTERFACE_IP6ND_RA_CONFIG, sw_interface_ip6nd_ra_config)           \
  99 _(SW_INTERFACE_IP6ND_RA_PREFIX, sw_interface_ip6nd_ra_prefix)           \
 100 _(IP6ND_PROXY_ADD_DEL, ip6nd_proxy_add_del)                             \
 101 _(IP6ND_PROXY_DUMP, ip6nd_proxy_dump)                                   \
 102 _(IP6ND_SEND_ROUTER_SOLICITATION, ip6nd_send_router_solicitation)       \
 103 _(SW_INTERFACE_IP6_ENABLE_DISABLE, sw_interface_ip6_enable_disable )    \
 104 _(IP_CONTAINER_PROXY_ADD_DEL, ip_container_proxy_add_del)               \
 105 _(IP_CONTAINER_PROXY_DUMP, ip_container_proxy_dump)                     \
 106 _(IOAM_ENABLE, ioam_enable)                                             \
 107 _(IOAM_DISABLE, ioam_disable)                                           \
 108 _(IP_SOURCE_AND_PORT_RANGE_CHECK_ADD_DEL,                               \
 109   ip_source_and_port_range_check_add_del)                               \
 110 _(IP_SOURCE_AND_PORT_RANGE_CHECK_INTERFACE_ADD_DEL,                     \
 111   ip_source_and_port_range_check_interface_add_del)                     \
 112 _(IP_SOURCE_CHECK_INTERFACE_ADD_DEL,                                    \
 113   ip_source_check_interface_add_del)                                    \
 114 _(IP_REASSEMBLY_SET, ip_reassembly_set)                                 \
 115 _(IP_REASSEMBLY_GET, ip_reassembly_get)                                 \
 116 _(IP_REASSEMBLY_ENABLE_DISABLE, ip_reassembly_enable_disable)           \
 117 _(IP_PUNT_REDIRECT_DUMP, ip_punt_redirect_dump)
 118
 119
 120 extern void stats_dslock_with_hint (int hint, int tag);
 121 extern void stats_dsunlock (void);
 122
 123 static void
 124 send_ip_neighbor_details (u32 sw_if_index,
 125                           u8 is_ipv6,
 126                           u8 is_static,
 127                           u8 * mac_address,
 128                           u8 * ip_address, vl_api_registration_t * reg,
 129                           u32 context)
 130 {
 131   vl_api_ip_neighbor_details_t *mp;
 132
 133   mp = vl_msg_api_alloc (sizeof (*mp));
 134   clib_memset (mp, 0, sizeof (*mp));
 135   mp->_vl_msg_id = ntohs (VL_API_IP_NEIGHBOR_DETAILS);
 136   mp->context = context;
 137   mp->sw_if_index = htonl (sw_if_index);
 138   mp->is_ipv6 = is_ipv6;
 139   mp->is_static = is_static;
 140   memcpy (mp->mac_address, mac_address, 6);
 141   memcpy (mp->ip_address, ip_address, (is_ipv6) ? 16 : 4);
 142
 143   vl_api_send_msg (reg, (u8 *) mp);
 144 }
 145
 146 static void
 147 vl_api_ip_neighbor_dump_t_handler (vl_api_ip_neighbor_dump_t * mp)
 148 {
 149   vl_api_registration_t *reg;
 150
 151   reg = vl_api_client_index_to_registration (mp->client_index);
 152   if (!reg)
 153     return;
 154
 155   u32 sw_if_index = ntohl (mp->sw_if_index);
 156
 157   if (mp->is_ipv6)
 158     {
 159       ip6_neighbor_t *n, *ns;
 160
 161       ns = ip6_neighbors_entries (sw_if_index);
 162       /* *INDENT-OFF* */
 163       vec_foreach (n, ns)
 164       {
 165         send_ip_neighbor_details
 166           (n->key.sw_if_index, mp->is_ipv6,
 167            ((n->flags & IP6_NEIGHBOR_FLAG_STATIC) ? 1 : 0),
 168            (u8 *) n->link_layer_address,
 169            (u8 *) & (n->key.ip6_address.as_u8),
 170            reg, mp->context);
 171       }
 172       /* *INDENT-ON* */
 173       vec_free (ns);
 174     }
 175   else
 176     {
 177       ethernet_arp_ip4_entry_t *n, *ns;
 178
 179       ns = ip4_neighbor_entries (sw_if_index);
 180       /* *INDENT-OFF* */
 181       vec_foreach (n, ns)
 182       {
 183         send_ip_neighbor_details (n->sw_if_index, mp->is_ipv6,
 184           ((n->flags & ETHERNET_ARP_IP4_ENTRY_FLAG_STATIC) ? 1 : 0),
 185           (u8*) n->ethernet_address,
 186           (u8*) & (n->ip4_address.as_u8),
 187           reg, mp->context);
 188       }
 189       /* *INDENT-ON* */
 190       vec_free (ns);
 191     }
 192 }
 193
 194 static void
 195 send_ip_fib_details (vpe_api_main_t * am,
 196                      vl_api_registration_t * reg,
 197                      const fib_table_t * table,
 198                      const fib_prefix_t * pfx,
 199                      fib_route_path_encode_t * api_rpaths, u32 context)
 200 {
 201   vl_api_ip_fib_details_t *mp;
 202   fib_route_path_encode_t *api_rpath;
 203   vl_api_fib_path_t *fp;
 204   int path_count;
 205
 206   path_count = vec_len (api_rpaths);
 207   mp = vl_msg_api_alloc (sizeof (*mp) + path_count * sizeof (*fp));
 208   if (!mp)
 209     return;
 210   clib_memset (mp, 0, sizeof (*mp));
 211   mp->_vl_msg_id = ntohs (VL_API_IP_FIB_DETAILS);
 212   mp->context = context;
 213
 214   mp->table_id = htonl (table->ft_table_id);
 215   memcpy (mp->table_name, table->ft_desc,
 216           clib_min (vec_len (table->ft_desc), sizeof (mp->table_name)));
 217   mp->address_length = pfx->fp_len;
 218   memcpy (mp->address, &pfx->fp_addr.ip4, sizeof (pfx->fp_addr.ip4));
 219   mp->stats_index =
 220     htonl (fib_table_entry_get_stats_index (table->ft_index, pfx));
 221
 222   mp->count = htonl (path_count);
 223   fp = mp->path;
 224   vec_foreach (api_rpath, api_rpaths)
 225   {
 226     fib_api_path_encode (api_rpath, fp);
 227     fp++;
 228   }
 229
 230   vl_api_send_msg (reg, (u8 *) mp);
 231 }
 232
 233 typedef struct vl_api_ip_fib_dump_walk_ctx_t_
 234 {
 235   fib_node_index_t *feis;
 236 } vl_api_ip_fib_dump_walk_ctx_t;
 237
 238 static fib_table_walk_rc_t
 239 vl_api_ip_fib_dump_walk (fib_node_index_t fei, void *arg)
 240 {
 241   vl_api_ip_fib_dump_walk_ctx_t *ctx = arg;
 242
 243   vec_add1 (ctx->feis, fei);
 244
 245   return (FIB_TABLE_WALK_CONTINUE);
 246 }
 247
 248 static void
 249 vl_api_ip_fib_dump_t_handler (vl_api_ip_fib_dump_t * mp)
 250 {
 251   vpe_api_main_t *am = &vpe_api_main;
 252   vl_api_registration_t *reg;
 253   ip4_main_t *im = &ip4_main;
 254   fib_table_t *fib_table;
 255   fib_node_index_t *lfeip;
 256   const fib_prefix_t *pfx;
 257   u32 fib_index;
 258   fib_route_path_encode_t *api_rpaths;
 259   vl_api_ip_fib_dump_walk_ctx_t ctx = {
 260     .feis = NULL,
 261   };
 262
 263   reg = vl_api_client_index_to_registration (mp->client_index);
 264   if (!reg)
 265     return;
 266
 267   /* *INDENT-OFF* */
 268   pool_foreach (fib_table, im->fibs,
 269   ({
 270     fib_table_walk(fib_table->ft_index,
 271                    FIB_PROTOCOL_IP4,
 272                    vl_api_ip_fib_dump_walk,
 273                    &ctx);
 274   }));
 275   /* *INDENT-ON* */
 276
 277   vec_sort_with_function (ctx.feis, fib_entry_cmp_for_sort);
 278
 279   vec_foreach (lfeip, ctx.feis)
 280   {
 281     pfx = fib_entry_get_prefix (*lfeip);
 282     fib_index = fib_entry_get_fib_index (*lfeip);
 283     fib_table = fib_table_get (fib_index, pfx->fp_proto);
 284     api_rpaths = NULL;
 285     fib_entry_encode (*lfeip, &api_rpaths);
 286     send_ip_fib_details (am, reg, fib_table, pfx, api_rpaths, mp->context);
 287     vec_free (api_rpaths);
 288   }
 289
 290   vec_free (ctx.feis);
 291 }
 292
 293 static void
 294 send_ip6_fib_details (vpe_api_main_t * am,
 295                       vl_api_registration_t * reg,
 296                       const fib_table_t * table,
 297                       const fib_prefix_t * pfx,
 298                       fib_route_path_encode_t * api_rpaths, u32 context)
 299 {
 300   vl_api_ip6_fib_details_t *mp;
 301   fib_route_path_encode_t *api_rpath;
 302   vl_api_fib_path_t *fp;
 303   int path_count;
 304
 305   path_count = vec_len (api_rpaths);
 306   mp = vl_msg_api_alloc (sizeof (*mp) + path_count * sizeof (*fp));
 307   if (!mp)
 308     return;
 309   clib_memset (mp, 0, sizeof (*mp));
 310   mp->_vl_msg_id = ntohs (VL_API_IP6_FIB_DETAILS);
 311   mp->context = context;
 312
 313   mp->table_id = htonl (table->ft_table_id);
 314   mp->address_length = pfx->fp_len;
 315   memcpy (mp->address, &pfx->fp_addr.ip6, sizeof (pfx->fp_addr.ip6));
 316   memcpy (mp->table_name, table->ft_desc,
 317           clib_min (vec_len (table->ft_desc), sizeof (mp->table_name)));
 318   mp->stats_index =
 319     htonl (fib_table_entry_get_stats_index (table->ft_index, pfx));
 320
 321   mp->count = htonl (path_count);
 322   fp = mp->path;
 323   vec_foreach (api_rpath, api_rpaths)
 324   {
 325     fib_api_path_encode (api_rpath, fp);
 326     fp++;
 327   }
 328
 329   vl_api_send_msg (reg, (u8 *) mp);
 330 }
 331
 332 typedef struct apt_ip6_fib_show_ctx_t_
 333 {
 334   u32 fib_index;
 335   fib_node_index_t *entries;
 336 } api_ip6_fib_show_ctx_t;
 337
 338 static void
 339 api_ip6_fib_table_put_entries (clib_bihash_kv_24_8_t * kvp, void *arg)
 340 {
 341   api_ip6_fib_show_ctx_t *ctx = arg;
 342
 343   if ((kvp->key[2] >> 32) == ctx->fib_index)
 344     {
 345       vec_add1 (ctx->entries, kvp->value);
 346     }
 347 }
 348
 349 static void
 350 api_ip6_fib_table_get_all (vl_api_registration_t * reg,
 351                            vl_api_ip6_fib_dump_t * mp,
 352                            fib_table_t * fib_table)
 353 {
 354   vpe_api_main_t *am = &vpe_api_main;
 355   ip6_main_t *im6 = &ip6_main;
 356   fib_node_index_t *fib_entry_index;
 357   api_ip6_fib_show_ctx_t ctx = {
 358     .fib_index = fib_table->ft_index,
 359     .entries = NULL,
 360   };
 361   fib_route_path_encode_t *api_rpaths;
 362   const fib_prefix_t *pfx;
 363
 364   BV (clib_bihash_foreach_key_value_pair)
 365     ((BVT (clib_bihash) *) & im6->ip6_table[IP6_FIB_TABLE_NON_FWDING].
 366      ip6_hash, api_ip6_fib_table_put_entries, &ctx);
 367
 368   vec_sort_with_function (ctx.entries, fib_entry_cmp_for_sort);
 369
 370   vec_foreach (fib_entry_index, ctx.entries)
 371   {
 372     pfx = fib_entry_get_prefix (*fib_entry_index);
 373     api_rpaths = NULL;
 374     fib_entry_encode (*fib_entry_index, &api_rpaths);
 375     send_ip6_fib_details (am, reg, fib_table, pfx, api_rpaths, mp->context);
 376     vec_free (api_rpaths);
 377   }
 378
 379   vec_free (ctx.entries);
 380 }
 381
 382 static void
 383 vl_api_ip6_fib_dump_t_handler (vl_api_ip6_fib_dump_t * mp)
 384 {
 385   vl_api_registration_t *reg;
 386   ip6_main_t *im6 = &ip6_main;
 387   fib_table_t *fib_table;
 388
 389   reg = vl_api_client_index_to_registration (mp->client_index);
 390   if (!reg)
 391     return;
 392
 393   /* *INDENT-OFF* */
 394   pool_foreach (fib_table, im6->fibs,
 395   ({
 396     /* don't send link locals */
 397     if (fib_table->ft_flags & FIB_TABLE_FLAG_IP6_LL)
 398       continue;
 399
 400     api_ip6_fib_table_get_all(reg, mp, fib_table);
 401   }));
 402   /* *INDENT-ON* */
 403 }
 404
 405 static void
 406 send_ip_mfib_details (vl_api_registration_t * reg,
 407                       u32 context, u32 table_id, fib_node_index_t mfei)
 408 {
 409   fib_route_path_encode_t *api_rpath, *api_rpaths = NULL;
 410   vl_api_ip_mfib_details_t *mp;
 411   const mfib_prefix_t *pfx;
 412   mfib_entry_t *mfib_entry;
 413   vl_api_fib_path_t *fp;
 414   int path_count;
 415
 416   mfib_entry = mfib_entry_get (mfei);
 417   pfx = mfib_entry_get_prefix (mfei);
 418   mfib_entry_encode (mfei, &api_rpaths);
 419
 420   path_count = vec_len (api_rpaths);
 421   mp = vl_msg_api_alloc (sizeof (*mp) + path_count * sizeof (*fp));
 422   if (!mp)
 423     return;
 424   clib_memset (mp, 0, sizeof (*mp));
 425   mp->_vl_msg_id = ntohs (VL_API_IP_MFIB_DETAILS);
 426   mp->context = context;
 427
 428   mp->rpf_id = mfib_entry->mfe_rpf_id;
 429   mp->entry_flags = mfib_entry->mfe_flags;
 430   mp->table_id = htonl (table_id);
 431   mp->address_length = pfx->fp_len;
 432   memcpy (mp->grp_address, &pfx->fp_grp_addr.ip4,
 433           sizeof (pfx->fp_grp_addr.ip4));
 434   memcpy (mp->src_address, &pfx->fp_src_addr.ip4,
 435           sizeof (pfx->fp_src_addr.ip4));
 436
 437   mp->count = htonl (path_count);
 438   fp = mp->path;
 439   vec_foreach (api_rpath, api_rpaths)
 440   {
 441     fib_api_path_encode (api_rpath, fp);
 442     fp++;
 443   }
 444   vec_free (api_rpaths);
 445
 446   vl_api_send_msg (reg, (u8 *) mp);
 447 }
 448
 449 typedef struct vl_api_ip_mfib_dump_ctc_t_
 450 {
 451   fib_node_index_t *entries;
 452 } vl_api_ip_mfib_dump_ctc_t;
 453
 454 static int
 455 vl_api_ip_mfib_table_dump_walk (fib_node_index_t fei, void *arg)
 456 {
 457   vl_api_ip_mfib_dump_ctc_t *ctx = arg;
 458
 459   vec_add1 (ctx->entries, fei);
 460
 461   return (0);
 462 }
 463
 464 static void
 465 vl_api_ip_mfib_dump_t_handler (vl_api_ip_mfib_dump_t * mp)
 466 {
 467   vl_api_registration_t *reg;
 468   ip4_main_t *im = &ip4_main;
 469   mfib_table_t *mfib_table;
 470   fib_node_index_t *mfeip;
 471   vl_api_ip_mfib_dump_ctc_t ctx = {
 472     .entries = NULL,
 473   };
 474
 475   reg = vl_api_client_index_to_registration (mp->client_index);
 476   if (!reg)
 477     return;
 478
 479   /* *INDENT-OFF* */
 480   pool_foreach (mfib_table, im->mfibs,
 481   ({
 482     ip4_mfib_table_walk(&mfib_table->v4,
 483                         vl_api_ip_mfib_table_dump_walk,
 484                         &ctx);
 485
 486     vec_sort_with_function (ctx.entries, mfib_entry_cmp_for_sort);
 487
 488     vec_foreach (mfeip, ctx.entries)
 489     {
 490       send_ip_mfib_details (reg, mp->context,
 491                             mfib_table->mft_table_id,
 492                             *mfeip);
 493     }
 494     vec_reset_length (ctx.entries);
 495
 496   }));
 497   /* *INDENT-ON* */
 498
 499   vec_free (ctx.entries);
 500 }
 501
 502 static void
 503 send_ip6_mfib_details (vpe_api_main_t * am,
 504                        vl_api_registration_t * reg,
 505                        u32 table_id,
 506                        const mfib_prefix_t * pfx,
 507                        fib_route_path_encode_t * api_rpaths, u32 context)
 508 {
 509   vl_api_ip6_mfib_details_t *mp;
 510   fib_route_path_encode_t *api_rpath;
 511   vl_api_fib_path_t *fp;
 512   int path_count;
 513
 514   path_count = vec_len (api_rpaths);
 515   mp = vl_msg_api_alloc (sizeof (*mp) + path_count * sizeof (*fp));
 516   if (!mp)
 517     return;
 518   clib_memset (mp, 0, sizeof (*mp));
 519   mp->_vl_msg_id = ntohs (VL_API_IP6_MFIB_DETAILS);
 520   mp->context = context;
 521
 522   mp->table_id = htonl (table_id);
 523   mp->address_length = pfx->fp_len;
 524   memcpy (mp->grp_address, &pfx->fp_grp_addr.ip6,
 525           sizeof (pfx->fp_grp_addr.ip6));
 526   memcpy (mp->src_address, &pfx->fp_src_addr.ip6,
 527           sizeof (pfx->fp_src_addr.ip6));
 528
 529   mp->count = htonl (path_count);
 530   fp = mp->path;
 531   vec_foreach (api_rpath, api_rpaths)
 532   {
 533     fib_api_path_encode (api_rpath, fp);
 534     fp++;
 535   }
 536
 537   vl_api_send_msg (reg, (u8 *) mp);
 538 }
 539
 540 typedef struct vl_api_ip6_mfib_dump_ctc_t_
 541 {
 542   fib_node_index_t *entries;
 543 } vl_api_ip6_mfib_dump_ctc_t;
 544
 545 static int
 546 vl_api_ip6_mfib_table_dump_walk (fib_node_index_t fei, void *arg)
 547 {
 548   vl_api_ip6_mfib_dump_ctc_t *ctx = arg;
 549
 550   vec_add1 (ctx->entries, fei);
 551
 552   return (0);
 553 }
 554
 555 static void
 556 vl_api_ip6_mfib_dump_t_handler (vl_api_ip6_mfib_dump_t * mp)
 557 {
 558   vpe_api_main_t *am = &vpe_api_main;
 559   vl_api_registration_t *reg;
 560   ip6_main_t *im = &ip6_main;
 561   mfib_table_t *mfib_table;
 562   const mfib_prefix_t *pfx;
 563   fib_node_index_t *mfeip;
 564   fib_route_path_encode_t *api_rpaths = NULL;
 565   vl_api_ip6_mfib_dump_ctc_t ctx = {
 566     .entries = NULL,
 567   };
 568
 569   reg = vl_api_client_index_to_registration (mp->client_index);
 570   if (!reg)
 571     return;
 572
 573
 574   /* *INDENT-OFF* */
 575   pool_foreach (mfib_table, im->mfibs,
 576   ({
 577     ip6_mfib_table_walk(&mfib_table->v6,
 578                         vl_api_ip6_mfib_table_dump_walk,
 579                         &ctx);
 580
 581     vec_sort_with_function (ctx.entries, mfib_entry_cmp_for_sort);
 582
 583     vec_foreach(mfeip, ctx.entries)
 584     {
 585       pfx = mfib_entry_get_prefix (*mfeip);
 586       mfib_entry_encode (*mfeip, &api_rpaths);
 587       send_ip6_mfib_details (am, reg,
 588                              mfib_table->mft_table_id,
 589                              pfx, api_rpaths,
 590                              mp->context);
 591     }
 592     vec_reset_length (api_rpaths);
 593     vec_reset_length (ctx.entries);
 594
 595   }));
 596   /* *INDENT-ON* */
 597
 598   vec_free (ctx.entries);
 599   vec_free (api_rpaths);
 600 }
 601
 602 static void
 603 vl_api_ip_punt_police_t_handler (vl_api_ip_punt_police_t * mp,
 604                                  vlib_main_t * vm)
 605 {
 606   vl_api_ip_punt_police_reply_t *rmp;
 607   int rv = 0;
 608
 609   if (mp->is_ip6)
 610     ip6_punt_policer_add_del (mp->is_add, ntohl (mp->policer_index));
 611   else
 612     ip4_punt_policer_add_del (mp->is_add, ntohl (mp->policer_index));
 613
 614   REPLY_MACRO (VL_API_IP_PUNT_POLICE_REPLY);
 615 }
 616
 617 static void
 618 vl_api_ip_punt_redirect_t_handler (vl_api_ip_punt_redirect_t * mp,
 619                                    vlib_main_t * vm)
 620 {
 621   vl_api_ip_punt_redirect_reply_t *rmp;
 622   int rv = 0;
 623   ip46_type_t ipv;
 624   ip46_address_t nh;
 625
 626   if (!vnet_sw_if_index_is_api_valid (ntohl (mp->punt.tx_sw_if_index)))
 627     goto bad_sw_if_index;
 628
 629   ipv = ip_address_decode (&mp->punt.nh, &nh);
 630   if (mp->is_add)
 631     {
 632       if (ipv == IP46_TYPE_IP6)
 633         {
 634           ip6_punt_redirect_add (ntohl (mp->punt.rx_sw_if_index),
 635                                  ntohl (mp->punt.tx_sw_if_index), &nh);
 636         }
 637       else if (ipv == IP46_TYPE_IP4)
 638         {
 639           ip4_punt_redirect_add (ntohl (mp->punt.rx_sw_if_index),
 640                                  ntohl (mp->punt.tx_sw_if_index), &nh);
 641         }
 642     }
 643   else
 644     {
 645       if (ipv == IP46_TYPE_IP6)
 646         {
 647           ip6_punt_redirect_del (ntohl (mp->punt.rx_sw_if_index));
 648         }
 649       else if (ipv == IP46_TYPE_IP4)
 650         {
 651           ip4_punt_redirect_del (ntohl (mp->punt.rx_sw_if_index));
 652         }
 653     }
 654
 655   BAD_SW_IF_INDEX_LABEL;
 656
 657   REPLY_MACRO (VL_API_IP_PUNT_REDIRECT_REPLY);
 658 }
 659
 660 static void
 661 vl_api_ip_neighbor_add_del_t_handler (vl_api_ip_neighbor_add_del_t * mp,
 662                                       vlib_main_t * vm)
 663 {
 664   ip46_address_t ip = ip46_address_initializer;
 665   vl_api_ip_neighbor_add_del_reply_t *rmp;
 666   ip_neighbor_flags_t flags;
 667   u32 stats_index = ~0;
 668   int rv = 0;
 669
 670   VALIDATE_SW_IF_INDEX (mp);
 671
 672   stats_dslock_with_hint (1 /* release hint */ , 7 /* tag */ );
 673
 674   flags = IP_NEIGHBOR_FLAG_NODE;
 675   if (mp->is_static)
 676     flags |= IP_NEIGHBOR_FLAG_STATIC;
 677   if (mp->is_no_adj_fib)
 678     flags |= IP_NEIGHBOR_FLAG_NO_ADJ_FIB;
 679
 680   if (mp->is_ipv6)
 681     clib_memcpy (&ip.ip6, mp->dst_address, 16);
 682   else
 683     clib_memcpy (&ip.ip4, mp->dst_address, 4);
 684
 685   if (mp->is_add)
 686     rv = ip_neighbor_add (&ip, mp->is_ipv6, mp->mac_address,
 687                           ntohl (mp->sw_if_index), flags, &stats_index);
 688   else
 689     rv = ip_neighbor_del (&ip, mp->is_ipv6, ntohl (mp->sw_if_index));
 690
 691   stats_dsunlock ();
 692
 693   BAD_SW_IF_INDEX_LABEL;
 694
 695   /* *INDENT-OFF* */
 696   REPLY_MACRO2 (VL_API_IP_NEIGHBOR_ADD_DEL_REPLY,
 697   ({
 698     rmp->stats_index = htonl (stats_index);
 699   }));
 700   /* *INDENT-ON* */
 701 }
 702
 703 void
 704 ip_table_delete (fib_protocol_t fproto, u32 table_id, u8 is_api)
 705 {
 706   u32 fib_index, mfib_index;
 707
 708   /*
 709    * ignore action on the default table - this is always present
 710    * and cannot be added nor deleted from the API
 711    */
 712   if (0 != table_id)
 713     {
 714       /*
 715        * The API holds only one lock on the table.
 716        * i.e. it can be added many times via the API but needs to be
 717        * deleted only once.
 718        * The FIB index for unicast and multicast is not necessarily the
 719        * same, since internal VPP systesm (like LISP and SR) create
 720        * their own unicast tables.
 721        */
 722       fib_index = fib_table_find (fproto, table_id);
 723       mfib_index = mfib_table_find (fproto, table_id);
 724
 725       if (~0 != fib_index)
 726         {
 727           fib_table_unlock (fib_index, fproto,
 728                             (is_api ? FIB_SOURCE_API : FIB_SOURCE_CLI));
 729         }
 730       if (~0 != mfib_index)
 731         {
 732           mfib_table_unlock (mfib_index, fproto,
 733                              (is_api ? MFIB_SOURCE_API : MFIB_SOURCE_CLI));
 734         }
 735     }
 736 }
 737
 738 void
 739 vl_api_ip_table_add_del_t_handler (vl_api_ip_table_add_del_t * mp)
 740 {
 741   vl_api_ip_table_add_del_reply_t *rmp;
 742   fib_protocol_t fproto = (mp->is_ipv6 ? FIB_PROTOCOL_IP6 : FIB_PROTOCOL_IP4);
 743   u32 table_id = ntohl (mp->table_id);
 744   int rv = 0;
 745
 746   if (mp->is_add)
 747     {
 748       ip_table_create (fproto, table_id, 1, mp->name);
 749     }
 750   else
 751     {
 752       ip_table_delete (fproto, table_id, 1);
 753     }
 754
 755   REPLY_MACRO (VL_API_IP_TABLE_ADD_DEL_REPLY);
 756 }
 757
 758 int
 759 add_del_route_t_handler (u8 is_multipath,
 760                          u8 is_add,
 761                          u8 is_drop,
 762                          u8 is_unreach,
 763                          u8 is_prohibit,
 764                          u8 is_local,
 765                          u8 is_multicast,
 766                          u8 is_classify,
 767                          u32 classify_table_index,
 768                          u8 is_resolve_host,
 769                          u8 is_resolve_attached,
 770                          u8 is_interface_rx,
 771                          u8 is_rpf_id,
 772                          u8 is_dvr,
 773                          u8 is_source_lookup,
 774                          u8 is_udp_encap,
 775                          u32 fib_index,
 776                          const fib_prefix_t * prefix,
 777                          dpo_proto_t next_hop_proto,
 778                          const ip46_address_t * next_hop,
 779                          u32 next_hop_id,
 780                          u32 next_hop_sw_if_index,
 781                          u8 next_hop_fib_index,
 782                          u16 next_hop_weight,
 783                          u16 next_hop_preference,
 784                          mpls_label_t next_hop_via_label,
 785                          fib_mpls_label_t * next_hop_out_label_stack)
 786 {
 787   vnet_classify_main_t *cm = &vnet_classify_main;
 788   fib_route_path_flags_t path_flags = FIB_ROUTE_PATH_FLAG_NONE;
 789   fib_route_path_t path = {
 790     .frp_proto = next_hop_proto,
 791     .frp_addr = (NULL == next_hop ? zero_addr : *next_hop),
 792     .frp_sw_if_index = next_hop_sw_if_index,
 793     .frp_fib_index = next_hop_fib_index,
 794     .frp_weight = next_hop_weight,
 795     .frp_preference = next_hop_preference,
 796     .frp_label_stack = next_hop_out_label_stack,
 797   };
 798   fib_route_path_t *paths = NULL;
 799   fib_entry_flag_t entry_flags = FIB_ENTRY_FLAG_NONE;
 800
 801   /*
 802    * the special INVALID label meams we are not recursing via a
 803    * label. Exp-null value is never a valid via-label so that
 804    * also means it's not a via-label and means clients that set
 805    * it to 0 by default get the expected behaviour
 806    */
 807   if ((MPLS_LABEL_INVALID != next_hop_via_label) && (0 != next_hop_via_label))
 808     {
 809       path.frp_proto = DPO_PROTO_MPLS;
 810       path.frp_local_label = next_hop_via_label;
 811       path.frp_eos = MPLS_NON_EOS;
 812     }
 813   if (is_local)
 814     path_flags |= FIB_ROUTE_PATH_LOCAL;
 815   if (is_dvr)
 816     path_flags |= FIB_ROUTE_PATH_DVR;
 817   if (is_resolve_host)
 818     path_flags |= FIB_ROUTE_PATH_RESOLVE_VIA_HOST;
 819   if (is_resolve_attached)
 820     path_flags |= FIB_ROUTE_PATH_RESOLVE_VIA_ATTACHED;
 821   if (is_interface_rx)
 822     path_flags |= FIB_ROUTE_PATH_INTF_RX;
 823   if (is_rpf_id)
 824     path_flags |= FIB_ROUTE_PATH_RPF_ID;
 825   if (is_source_lookup)
 826     path_flags |= FIB_ROUTE_PATH_SOURCE_LOOKUP;
 827   if (is_multicast)
 828     entry_flags |= FIB_ENTRY_FLAG_MULTICAST;
 829   if (is_udp_encap)
 830     {
 831       path_flags |= FIB_ROUTE_PATH_UDP_ENCAP;
 832       path.frp_udp_encap_id = next_hop_id;
 833     }
 834   if (path.frp_sw_if_index == ~0 && ip46_address_is_zero (&path.frp_addr)
 835       && path.frp_fib_index != ~0)
 836     {
 837       path_flags |= FIB_ROUTE_PATH_DEAG;
 838     }
 839
 840   path.frp_flags = path_flags;
 841
 842   stats_dslock_with_hint (1 /* release hint */ , 2 /* tag */ );
 843
 844   if (is_drop || is_local || is_classify || is_unreach || is_prohibit)
 845     {
 846       /*
 847        * special route types that link directly to the adj
 848        */
 849       if (is_add)
 850         {
 851           dpo_id_t dpo = DPO_INVALID;
 852           dpo_proto_t dproto;
 853
 854           dproto = fib_proto_to_dpo (prefix->fp_proto);
 855
 856           if (is_drop)
 857             ip_null_dpo_add_and_lock (dproto, IP_NULL_ACTION_NONE, &dpo);
 858           else if (is_local)
 859             receive_dpo_add_or_lock (dproto, ~0, NULL, &dpo);
 860           else if (is_unreach)
 861             ip_null_dpo_add_and_lock (dproto,
 862                                       IP_NULL_ACTION_SEND_ICMP_UNREACH, &dpo);
 863           else if (is_prohibit)
 864             ip_null_dpo_add_and_lock (dproto,
 865                                       IP_NULL_ACTION_SEND_ICMP_PROHIBIT,
 866                                       &dpo);
 867           else if (is_classify)
 868             {
 869               if (pool_is_free_index (cm->tables,
 870                                       ntohl (classify_table_index)))
 871                 {
 872                   stats_dsunlock ();
 873                   return VNET_API_ERROR_NO_SUCH_TABLE;
 874                 }
 875
 876               dpo_set (&dpo, DPO_CLASSIFY, dproto,
 877                        classify_dpo_create (dproto,
 878                                             ntohl (classify_table_index)));
 879             }
 880           else
 881             {
 882               stats_dsunlock ();
 883               return VNET_API_ERROR_NO_SUCH_TABLE;
 884             }
 885
 886           fib_table_entry_special_dpo_update (fib_index,
 887                                               prefix,
 888                                               FIB_SOURCE_API,
 889                                               FIB_ENTRY_FLAG_EXCLUSIVE, &dpo);
 890           dpo_reset (&dpo);
 891         }
 892       else
 893         {
 894           fib_table_entry_special_remove (fib_index, prefix, FIB_SOURCE_API);
 895         }
 896     }
 897   else if (is_multipath)
 898     {
 899       vec_add1 (paths, path);
 900
 901       if (is_add)
 902         fib_table_entry_path_add2 (fib_index,
 903                                    prefix,
 904                                    FIB_SOURCE_API, entry_flags, paths);
 905       else
 906         fib_table_entry_path_remove2 (fib_index,
 907                                       prefix, FIB_SOURCE_API, paths);
 908
 909       vec_free (paths);
 910     }
 911   else
 912     {
 913       if (is_add)
 914         {
 915           vec_add1 (paths, path);
 916           fib_table_entry_update (fib_index,
 917                                   prefix, FIB_SOURCE_API, entry_flags, paths);
 918           vec_free (paths);
 919         }
 920       else
 921         {
 922           fib_table_entry_delete (fib_index, prefix, FIB_SOURCE_API);
 923         }
 924     }
 925
 926   stats_dsunlock ();
 927   return (0);
 928 }
 929
 930 int
 931 add_del_route_check (fib_protocol_t table_proto,
 932                      u32 table_id,
 933                      u32 next_hop_sw_if_index,
 934                      dpo_proto_t next_hop_table_proto,
 935                      u32 next_hop_table_id,
 936                      u8 is_rpf_id, u32 * fib_index, u32 * next_hop_fib_index)
 937 {
 938   vnet_main_t *vnm = vnet_get_main ();
 939
 940   *fib_index = fib_table_find (table_proto, ntohl (table_id));
 941   if (~0 == *fib_index)
 942     {
 943       /* No such VRF, and we weren't asked to create one */
 944       return VNET_API_ERROR_NO_SUCH_FIB;
 945     }
 946
 947   if (!is_rpf_id && ~0 != ntohl (next_hop_sw_if_index))
 948     {
 949       if (pool_is_free_index (vnm->interface_main.sw_interfaces,
 950                               ntohl (next_hop_sw_if_index)))
 951         {
 952           return VNET_API_ERROR_NO_MATCHING_INTERFACE;
 953         }
 954     }
 955   else
 956     {
 957       fib_protocol_t fib_nh_proto;
 958
 959       if (next_hop_table_proto > DPO_PROTO_MPLS)
 960         return (0);
 961
 962       fib_nh_proto = dpo_proto_to_fib (next_hop_table_proto);
 963
 964       if (is_rpf_id)
 965         *next_hop_fib_index = mfib_table_find (fib_nh_proto,
 966                                                ntohl (next_hop_table_id));
 967       else
 968         *next_hop_fib_index = fib_table_find (fib_nh_proto,
 969                                               ntohl (next_hop_table_id));
 970
 971       if (~0 == *next_hop_fib_index)
 972         {
 973           /* No such VRF, and we weren't asked to create one */
 974           return VNET_API_ERROR_NO_SUCH_FIB;
 975         }
 976     }
 977
 978   return (0);
 979 }
 980
 981 static int
 982 ip4_add_del_route_t_handler (vl_api_ip_add_del_route_t * mp,
 983                              u32 * stats_index)
 984 {
 985   u32 fib_index, next_hop_fib_index;
 986   fib_mpls_label_t *label_stack = NULL;
 987   int rv, ii, n_labels;;
 988
 989   rv = add_del_route_check (FIB_PROTOCOL_IP4,
 990                             mp->table_id,
 991                             mp->next_hop_sw_if_index,
 992                             DPO_PROTO_IP4,
 993                             mp->next_hop_table_id,
 994                             0, &fib_index, &next_hop_fib_index);
 995
 996   if (0 != rv)
 997     return (rv);
 998
 999   fib_prefix_t pfx = {
1000     .fp_len = mp->dst_address_length,
1001     .fp_proto = FIB_PROTOCOL_IP4,
1002   };
1003   clib_memcpy (&pfx.fp_addr.ip4, mp->dst_address, sizeof (pfx.fp_addr.ip4));
1004
1005   ip46_address_t nh;
1006   clib_memset (&nh, 0, sizeof (nh));
1007   memcpy (&nh.ip4, mp->next_hop_address, sizeof (nh.ip4));
1008
1009   n_labels = mp->next_hop_n_out_labels;
1010   if (n_labels == 0)
1011     ;
1012   else
1013     {
1014       vec_validate (label_stack, n_labels - 1);
1015       for (ii = 0; ii < n_labels; ii++)
1016         {
1017           label_stack[ii].fml_value =
1018             ntohl (mp->next_hop_out_label_stack[ii].label);
1019           label_stack[ii].fml_ttl = mp->next_hop_out_label_stack[ii].ttl;
1020           label_stack[ii].fml_exp = mp->next_hop_out_label_stack[ii].exp;
1021           label_stack[ii].fml_mode =
1022             (mp->next_hop_out_label_stack[ii].is_uniform ?
1023              FIB_MPLS_LSP_MODE_UNIFORM : FIB_MPLS_LSP_MODE_PIPE);
1024         }
1025     }
1026
1027   rv = add_del_route_t_handler (mp->is_multipath,
1028                                 mp->is_add,
1029                                 mp->is_drop,
1030                                 mp->is_unreach,
1031                                 mp->is_prohibit,
1032                                 mp->is_local, 0,
1033                                 mp->is_classify,
1034                                 mp->classify_table_index,
1035                                 mp->is_resolve_host,
1036                                 mp->is_resolve_attached, 0, 0,
1037                                 mp->is_dvr,
1038                                 mp->is_source_lookup,
1039                                 mp->is_udp_encap,
1040                                 fib_index, &pfx, DPO_PROTO_IP4,
1041                                 &nh,
1042                                 ntohl (mp->next_hop_id),
1043                                 ntohl (mp->next_hop_sw_if_index),
1044                                 next_hop_fib_index,
1045                                 mp->next_hop_weight,
1046                                 mp->next_hop_preference,
1047                                 ntohl (mp->next_hop_via_label), label_stack);
1048
1049   if (mp->is_add && 0 == rv)
1050     *stats_index = fib_table_entry_get_stats_index (fib_index, &pfx);
1051
1052   return (rv);
1053 }
1054
1055 static int
1056 ip6_add_del_route_t_handler (vl_api_ip_add_del_route_t * mp,
1057                              u32 * stats_index)
1058 {
1059   fib_mpls_label_t *label_stack = NULL;
1060   u32 fib_index, next_hop_fib_index;
1061   int rv, ii, n_labels;;
1062
1063   rv = add_del_route_check (FIB_PROTOCOL_IP6,
1064                             mp->table_id,
1065                             mp->next_hop_sw_if_index,
1066                             DPO_PROTO_IP6,
1067                             mp->next_hop_table_id,
1068                             0, &fib_index, &next_hop_fib_index);
1069
1070   if (0 != rv)
1071     return (rv);
1072
1073   fib_prefix_t pfx = {
1074     .fp_len = mp->dst_address_length,
1075     .fp_proto = FIB_PROTOCOL_IP6,
1076   };
1077   clib_memcpy (&pfx.fp_addr.ip6, mp->dst_address, sizeof (pfx.fp_addr.ip6));
1078
1079   ip46_address_t nh;
1080   clib_memset (&nh, 0, sizeof (nh));
1081   memcpy (&nh.ip6, mp->next_hop_address, sizeof (nh.ip6));
1082
1083   n_labels = mp->next_hop_n_out_labels;
1084   if (n_labels == 0)
1085     ;
1086   else
1087     {
1088       vec_validate (label_stack, n_labels - 1);
1089       for (ii = 0; ii < n_labels; ii++)
1090         {
1091           label_stack[ii].fml_value =
1092             ntohl (mp->next_hop_out_label_stack[ii].label);
1093           label_stack[ii].fml_ttl = mp->next_hop_out_label_stack[ii].ttl;
1094           label_stack[ii].fml_exp = mp->next_hop_out_label_stack[ii].exp;
1095           label_stack[ii].fml_mode =
1096             (mp->next_hop_out_label_stack[ii].is_uniform ?
1097              FIB_MPLS_LSP_MODE_UNIFORM : FIB_MPLS_LSP_MODE_PIPE);
1098         }
1099     }
1100
1101   rv = add_del_route_t_handler (mp->is_multipath,
1102                                 mp->is_add,
1103                                 mp->is_drop,
1104                                 mp->is_unreach,
1105                                 mp->is_prohibit,
1106                                 mp->is_local, 0,
1107                                 mp->is_classify,
1108                                 mp->classify_table_index,
1109                                 mp->is_resolve_host,
1110                                 mp->is_resolve_attached, 0, 0,
1111                                 mp->is_dvr,
1112                                 mp->is_source_lookup,
1113                                 mp->is_udp_encap,
1114                                 fib_index, &pfx, DPO_PROTO_IP6,
1115                                 &nh, ntohl (mp->next_hop_id),
1116                                 ntohl (mp->next_hop_sw_if_index),
1117                                 next_hop_fib_index,
1118                                 mp->next_hop_weight,
1119                                 mp->next_hop_preference,
1120                                 ntohl (mp->next_hop_via_label), label_stack);
1121
1122   if (mp->is_add && 0 == rv)
1123     *stats_index = fib_table_entry_get_stats_index (fib_index, &pfx);
1124
1125   return (rv);
1126 }
1127
1128 void
1129 vl_api_ip_add_del_route_t_handler (vl_api_ip_add_del_route_t * mp)
1130 {
1131   vl_api_ip_add_del_route_reply_t *rmp;
1132   u32 stats_index;
1133   int rv;
1134   vnet_main_t *vnm = vnet_get_main ();
1135
1136   vnm->api_errno = 0;
1137   stats_index = ~0;
1138
1139   if (mp->is_ipv6)
1140     rv = ip6_add_del_route_t_handler (mp, &stats_index);
1141   else
1142     rv = ip4_add_del_route_t_handler (mp, &stats_index);
1143
1144   rv = (rv == 0) ? vnm->api_errno : rv;
1145
1146   /* *INDENT-OFF* */
1147   REPLY_MACRO2 (VL_API_IP_ADD_DEL_ROUTE_REPLY,
1148   ({
1149     rmp->stats_index = htonl (stats_index);
1150   }))
1151   /* *INDENT-ON* */
1152 }
1153
1154 void
1155 ip_table_create (fib_protocol_t fproto,
1156                  u32 table_id, u8 is_api, const u8 * name)
1157 {
1158   u32 fib_index, mfib_index;
1159
1160   /*
1161    * ignore action on the default table - this is always present
1162    * and cannot be added nor deleted from the API
1163    */
1164   if (0 != table_id)
1165     {
1166       /*
1167        * The API holds only one lock on the table.
1168        * i.e. it can be added many times via the API but needs to be
1169        * deleted only once.
1170        * The FIB index for unicast and multicast is not necessarily the
1171        * same, since internal VPP systesm (like LISP and SR) create
1172        * their own unicast tables.
1173        */
1174       fib_index = fib_table_find (fproto, table_id);
1175       mfib_index = mfib_table_find (fproto, table_id);
1176
1177       if (~0 == fib_index)
1178         {
1179           fib_table_find_or_create_and_lock_w_name (fproto, table_id,
1180                                                     (is_api ?
1181                                                      FIB_SOURCE_API :
1182                                                      FIB_SOURCE_CLI), name);
1183         }
1184       if (~0 == mfib_index)
1185         {
1186           mfib_table_find_or_create_and_lock_w_name (fproto, table_id,
1187                                                      (is_api ?
1188                                                       MFIB_SOURCE_API :
1189                                                       MFIB_SOURCE_CLI), name);
1190         }
1191     }
1192 }
1193
1194 static int
1195 add_del_mroute_check (fib_protocol_t table_proto,
1196                       u32 table_id,
1197                       u32 next_hop_sw_if_index, u8 is_local, u32 * fib_index)
1198 {
1199   vnet_main_t *vnm = vnet_get_main ();
1200
1201   *fib_index = mfib_table_find (table_proto, ntohl (table_id));
1202   if (~0 == *fib_index)
1203     {
1204       /* No such table */
1205       return VNET_API_ERROR_NO_SUCH_FIB;
1206     }
1207
1208   if (~0 != ntohl (next_hop_sw_if_index))
1209     {
1210       if (pool_is_free_index (vnm->interface_main.sw_interfaces,
1211                               ntohl (next_hop_sw_if_index)))
1212         {
1213           return VNET_API_ERROR_NO_MATCHING_INTERFACE;
1214         }
1215     }
1216
1217   return (0);
1218 }
1219
1220 static fib_node_index_t
1221 mroute_add_del_handler (u8 is_add,
1222                         u8 is_local,
1223                         u32 fib_index,
1224                         const mfib_prefix_t * prefix,
1225                         dpo_proto_t nh_proto,
1226                         u32 entry_flags,
1227                         fib_rpf_id_t rpf_id,
1228                         u32 next_hop_sw_if_index,
1229                         ip46_address_t * nh, u32 itf_flags, u32 bier_imp)
1230 {
1231   fib_node_index_t mfib_entry_index = ~0;
1232
1233   stats_dslock_with_hint (1 /* release hint */ , 2 /* tag */ );
1234
1235   fib_route_path_t path = {
1236     .frp_sw_if_index = next_hop_sw_if_index,
1237     .frp_proto = nh_proto,
1238     .frp_addr = *nh,
1239   };
1240
1241   if (is_local)
1242     path.frp_flags |= FIB_ROUTE_PATH_LOCAL;
1243
1244   if (DPO_PROTO_BIER == nh_proto)
1245     {
1246       path.frp_bier_imp = bier_imp;
1247       path.frp_flags = FIB_ROUTE_PATH_BIER_IMP;
1248     }
1249   else if (!is_local && ~0 == next_hop_sw_if_index)
1250     {
1251       mfib_entry_index = mfib_table_entry_update (fib_index, prefix,
1252                                                   MFIB_SOURCE_API,
1253                                                   rpf_id, entry_flags);
1254       goto done;
1255     }
1256
1257   if (is_add)
1258     {
1259       mfib_entry_index = mfib_table_entry_path_update (fib_index, prefix,
1260                                                        MFIB_SOURCE_API,
1261                                                        &path, itf_flags);
1262     }
1263   else
1264     {
1265       mfib_table_entry_path_remove (fib_index, prefix,
1266                                     MFIB_SOURCE_API, &path);
1267     }
1268
1269 done:
1270   stats_dsunlock ();
1271   return (mfib_entry_index);
1272 }
1273
1274 static int
1275 api_mroute_add_del_t_handler (vl_api_ip_mroute_add_del_t * mp,
1276                               u32 * stats_index)
1277 {
1278   fib_node_index_t mfib_entry_index;
1279   fib_protocol_t fproto;
1280   dpo_proto_t nh_proto;
1281   ip46_address_t nh;
1282   u32 fib_index;
1283   int rv;
1284
1285   nh_proto = mp->next_hop_afi;
1286   fproto = (mp->is_ipv6 ? FIB_PROTOCOL_IP6 : FIB_PROTOCOL_IP4);
1287   rv = add_del_mroute_check (fproto,
1288                              mp->table_id,
1289                              mp->next_hop_sw_if_index,
1290                              mp->is_local, &fib_index);
1291
1292   if (0 != rv)
1293     return (rv);
1294
1295   mfib_prefix_t pfx = {
1296     .fp_len = ntohs (mp->grp_address_length),
1297     .fp_proto = fproto,
1298   };
1299
1300   if (FIB_PROTOCOL_IP4 == fproto)
1301     {
1302       clib_memcpy (&pfx.fp_grp_addr.ip4, mp->grp_address,
1303                    sizeof (pfx.fp_grp_addr.ip4));
1304       clib_memcpy (&pfx.fp_src_addr.ip4, mp->src_address,
1305                    sizeof (pfx.fp_src_addr.ip4));
1306       clib_memset (&nh.ip6, 0, sizeof (nh.ip6));
1307       clib_memcpy (&nh.ip4, mp->nh_address, sizeof (nh.ip4));
1308       if (!ip46_address_is_zero (&pfx.fp_src_addr))
1309         pfx.fp_len = 64;
1310     }
1311   else
1312     {
1313       clib_memcpy (&pfx.fp_grp_addr.ip6, mp->grp_address,
1314                    sizeof (pfx.fp_grp_addr.ip6));
1315       clib_memcpy (&pfx.fp_src_addr.ip6, mp->src_address,
1316                    sizeof (pfx.fp_src_addr.ip6));
1317       clib_memcpy (&nh.ip6, mp->nh_address, sizeof (nh.ip6));
1318       if (!ip46_address_is_zero (&pfx.fp_src_addr))
1319         pfx.fp_len = 256;
1320     }
1321
1322   mfib_entry_index = mroute_add_del_handler (mp->is_add,
1323                                              mp->is_local,
1324                                              fib_index, &pfx,
1325                                              nh_proto,
1326                                              ntohl (mp->entry_flags),
1327                                              ntohl (mp->rpf_id),
1328                                              ntohl (mp->next_hop_sw_if_index),
1329                                              &nh,
1330                                              ntohl (mp->itf_flags),
1331                                              ntohl (mp->bier_imp));
1332
1333   if (~0 != mfib_entry_index)
1334     *stats_index = mfib_entry_get_stats_index (mfib_entry_index);
1335
1336   return (rv);
1337 }
1338
1339 void
1340 vl_api_ip_mroute_add_del_t_handler (vl_api_ip_mroute_add_del_t * mp)
1341 {
1342   vl_api_ip_mroute_add_del_reply_t *rmp;
1343   vnet_main_t *vnm;
1344   u32 stats_index;
1345   int rv;
1346
1347   vnm = vnet_get_main ();
1348   vnm->api_errno = 0;
1349   stats_index = ~0;
1350
1351   rv = api_mroute_add_del_t_handler (mp, &stats_index);
1352
1353   /* *INDENT-OFF* */
1354   REPLY_MACRO2 (VL_API_IP_MROUTE_ADD_DEL_REPLY,
1355   ({
1356     rmp->stats_index = htonl (stats_index);
1357   }));
1358   /* *INDENT-ON* */
1359 }
1360
1361 static void
1362 send_ip_details (vpe_api_main_t * am,
1363                  vl_api_registration_t * reg, u32 sw_if_index, u8 is_ipv6,
1364                  u32 context)
1365 {
1366   vl_api_ip_details_t *mp;
1367
1368   mp = vl_msg_api_alloc (sizeof (*mp));
1369   clib_memset (mp, 0, sizeof (*mp));
1370   mp->_vl_msg_id = ntohs (VL_API_IP_DETAILS);
1371
1372   mp->sw_if_index = ntohl (sw_if_index);
1373   mp->is_ipv6 = is_ipv6;
1374   mp->context = context;
1375
1376   vl_api_send_msg (reg, (u8 *) mp);
1377 }
1378
1379 static void
1380 send_ip_address_details (vpe_api_main_t * am,
1381                          vl_api_registration_t * reg,
1382                          u8 * ip, u16 prefix_length,
1383                          u32 sw_if_index, u8 is_ipv6, u32 context)
1384 {
1385   vl_api_ip_address_details_t *mp;
1386
1387   mp = vl_msg_api_alloc (sizeof (*mp));
1388   clib_memset (mp, 0, sizeof (*mp));
1389   mp->_vl_msg_id = ntohs (VL_API_IP_ADDRESS_DETAILS);
1390
1391   if (is_ipv6)
1392     {
1393       clib_memcpy (&mp->ip, ip, sizeof (mp->ip));
1394     }
1395   else
1396     {
1397       u32 *tp = (u32 *) mp->ip;
1398       *tp = *(u32 *) ip;
1399     }
1400   mp->prefix_length = prefix_length;
1401   mp->context = context;
1402   mp->sw_if_index = htonl (sw_if_index);
1403   mp->is_ipv6 = is_ipv6;
1404
1405   vl_api_send_msg (reg, (u8 *) mp);
1406 }
1407
1408 static void
1409 vl_api_ip_address_dump_t_handler (vl_api_ip_address_dump_t * mp)
1410 {
1411   vpe_api_main_t *am = &vpe_api_main;
1412   vl_api_registration_t *reg;
1413   ip6_address_t *r6;
1414   ip4_address_t *r4;
1415   ip6_main_t *im6 = &ip6_main;
1416   ip4_main_t *im4 = &ip4_main;
1417   ip_lookup_main_t *lm6 = &im6->lookup_main;
1418   ip_lookup_main_t *lm4 = &im4->lookup_main;
1419   ip_interface_address_t *ia = 0;
1420   u32 sw_if_index = ~0;
1421   int rv __attribute__ ((unused)) = 0;
1422
1423   VALIDATE_SW_IF_INDEX (mp);
1424
1425   sw_if_index = ntohl (mp->sw_if_index);
1426
1427   reg = vl_api_client_index_to_registration (mp->client_index);
1428   if (!reg)
1429     return;
1430
1431   if (mp->is_ipv6)
1432     {
1433       /* *INDENT-OFF* */
1434       /* Do not send subnet details of the IP-interface for
1435        * unnumbered interfaces. otherwise listening clients
1436        * will be confused that the subnet is applied on more
1437        * than one interface */
1438       foreach_ip_interface_address (lm6, ia, sw_if_index, 0,
1439       ({
1440         r6 = ip_interface_address_get_address (lm6, ia);
1441         u16 prefix_length = ia->address_length;
1442         send_ip_address_details(am, reg, (u8*)r6, prefix_length,
1443                                 sw_if_index, 1, mp->context);
1444       }));
1445       /* *INDENT-ON* */
1446     }
1447   else
1448     {
1449       /* *INDENT-OFF* */
1450       foreach_ip_interface_address (lm4, ia, sw_if_index, 0,
1451       ({
1452         r4 = ip_interface_address_get_address (lm4, ia);
1453         u16 prefix_length = ia->address_length;
1454         send_ip_address_details(am, reg, (u8*)r4, prefix_length,
1455                                 sw_if_index, 0, mp->context);
1456       }));
1457       /* *INDENT-ON* */
1458     }
1459
1460   BAD_SW_IF_INDEX_LABEL;
1461 }
1462
1463 static void
1464 send_ip_unnumbered_details (vpe_api_main_t * am,
1465                             vl_api_registration_t * reg,
1466                             u32 sw_if_index, u32 ip_sw_if_index, u32 context)
1467 {
1468   vl_api_ip_unnumbered_details_t *mp;
1469
1470   mp = vl_msg_api_alloc (sizeof (*mp));
1471   clib_memset (mp, 0, sizeof (*mp));
1472   mp->_vl_msg_id = ntohs (VL_API_IP_UNNUMBERED_DETAILS);
1473
1474   mp->context = context;
1475   mp->sw_if_index = htonl (sw_if_index);
1476   mp->ip_sw_if_index = htonl (ip_sw_if_index);
1477
1478   vl_api_send_msg (reg, (u8 *) mp);
1479 }
1480
1481 static void
1482 vl_api_ip_unnumbered_dump_t_handler (vl_api_ip_unnumbered_dump_t * mp)
1483 {
1484   vnet_main_t *vnm = vnet_get_main ();
1485   vnet_interface_main_t *im = &vnm->interface_main;
1486   int rv __attribute__ ((unused)) = 0;
1487   vpe_api_main_t *am = &vpe_api_main;
1488   vl_api_registration_t *reg;
1489   vnet_sw_interface_t *si;
1490   u32 sw_if_index;
1491
1492   sw_if_index = ntohl (mp->sw_if_index);
1493
1494   reg = vl_api_client_index_to_registration (mp->client_index);
1495   if (!reg)
1496     return;
1497
1498   if (~0 != sw_if_index)
1499     {
1500       VALIDATE_SW_IF_INDEX (mp);
1501
1502       si = vnet_get_sw_interface (vnm, ntohl (mp->sw_if_index));
1503
1504       if (!(si->flags & VNET_SW_INTERFACE_FLAG_UNNUMBERED))
1505         {
1506           send_ip_unnumbered_details (am, reg,
1507                                       sw_if_index,
1508                                       si->unnumbered_sw_if_index,
1509                                       mp->context);
1510         }
1511     }
1512   else
1513     {
1514       /* *INDENT-OFF* */
1515       pool_foreach (si, im->sw_interfaces,
1516       ({
1517         if ((si->flags & VNET_SW_INTERFACE_FLAG_UNNUMBERED))
1518           {
1519             send_ip_unnumbered_details(am, reg,
1520                                        si->sw_if_index,
1521                                        si->unnumbered_sw_if_index,
1522                                        mp->context);
1523           }
1524       }));
1525       /* *INDENT-ON* */
1526     }
1527
1528   BAD_SW_IF_INDEX_LABEL;
1529 }
1530
1531 static void
1532 vl_api_ip_dump_t_handler (vl_api_ip_dump_t * mp)
1533 {
1534   vpe_api_main_t *am = &vpe_api_main;
1535   vnet_main_t *vnm = vnet_get_main ();
1536   vlib_main_t *vm = vlib_get_main ();
1537   vnet_interface_main_t *im = &vnm->interface_main;
1538   vl_api_registration_t *reg;
1539   vnet_sw_interface_t *si, *sorted_sis;
1540   u32 sw_if_index = ~0;
1541
1542   reg = vl_api_client_index_to_registration (mp->client_index);
1543   if (!reg)
1544     return;
1545
1546   /* Gather interfaces. */
1547   sorted_sis = vec_new (vnet_sw_interface_t, pool_elts (im->sw_interfaces));
1548   _vec_len (sorted_sis) = 0;
1549   /* *INDENT-OFF* */
1550   pool_foreach (si, im->sw_interfaces,
1551   ({
1552     vec_add1 (sorted_sis, si[0]);
1553   }));
1554   /* *INDENT-ON* */
1555
1556   vec_foreach (si, sorted_sis)
1557   {
1558     if (!(si->flags & VNET_SW_INTERFACE_FLAG_UNNUMBERED))
1559       {
1560         if (mp->is_ipv6 && !ip6_interface_enabled (vm, si->sw_if_index))
1561           {
1562             continue;
1563           }
1564         sw_if_index = si->sw_if_index;
1565         send_ip_details (am, reg, sw_if_index, mp->is_ipv6, mp->context);
1566       }
1567   }
1568 }
1569
1570 static void
1571 set_ip6_flow_hash (vl_api_set_ip_flow_hash_t * mp)
1572 {
1573   vl_api_set_ip_flow_hash_reply_t *rmp;
1574   int rv;
1575   u32 table_id;
1576   flow_hash_config_t flow_hash_config = 0;
1577
1578   table_id = ntohl (mp->vrf_id);
1579
1580 #define _(a,b) if (mp->a) flow_hash_config |= b;
1581   foreach_flow_hash_bit;
1582 #undef _
1583
1584   rv = vnet_set_ip6_flow_hash (table_id, flow_hash_config);
1585
1586   REPLY_MACRO (VL_API_SET_IP_FLOW_HASH_REPLY);
1587 }
1588
1589 static void
1590 set_ip4_flow_hash (vl_api_set_ip_flow_hash_t * mp)
1591 {
1592   vl_api_set_ip_flow_hash_reply_t *rmp;
1593   int rv;
1594   u32 table_id;
1595   flow_hash_config_t flow_hash_config = 0;
1596
1597   table_id = ntohl (mp->vrf_id);
1598
1599 #define _(a,b) if (mp->a) flow_hash_config |= b;
1600   foreach_flow_hash_bit;
1601 #undef _
1602
1603   rv = vnet_set_ip4_flow_hash (table_id, flow_hash_config);
1604
1605   REPLY_MACRO (VL_API_SET_IP_FLOW_HASH_REPLY);
1606 }
1607
1608
1609 static void
1610 vl_api_set_ip_flow_hash_t_handler (vl_api_set_ip_flow_hash_t * mp)
1611 {
1612   if (mp->is_ipv6 == 0)
1613     set_ip4_flow_hash (mp);
1614   else
1615     set_ip6_flow_hash (mp);
1616 }
1617
1618 static void
1619   vl_api_sw_interface_ip6nd_ra_config_t_handler
1620   (vl_api_sw_interface_ip6nd_ra_config_t * mp)
1621 {
1622   vl_api_sw_interface_ip6nd_ra_config_reply_t *rmp;
1623   vlib_main_t *vm = vlib_get_main ();
1624   int rv = 0;
1625   u8 is_no, suppress, managed, other, ll_option, send_unicast, cease,
1626     default_router;
1627
1628   is_no = mp->is_no == 1;
1629   suppress = mp->suppress == 1;
1630   managed = mp->managed == 1;
1631   other = mp->other == 1;
1632   ll_option = mp->ll_option == 1;
1633   send_unicast = mp->send_unicast == 1;
1634   cease = mp->cease == 1;
1635   default_router = mp->default_router == 1;
1636
1637   VALIDATE_SW_IF_INDEX (mp);
1638
1639   rv = ip6_neighbor_ra_config (vm, ntohl (mp->sw_if_index),
1640                                suppress, managed, other,
1641                                ll_option, send_unicast, cease,
1642                                default_router, ntohl (mp->lifetime),
1643                                ntohl (mp->initial_count),
1644                                ntohl (mp->initial_interval),
1645                                ntohl (mp->max_interval),
1646                                ntohl (mp->min_interval), is_no);
1647
1648   BAD_SW_IF_INDEX_LABEL;
1649
1650   REPLY_MACRO (VL_API_SW_INTERFACE_IP6ND_RA_CONFIG_REPLY);
1651 }
1652
1653 static void
1654   vl_api_sw_interface_ip6nd_ra_prefix_t_handler
1655   (vl_api_sw_interface_ip6nd_ra_prefix_t * mp)
1656 {
1657   vlib_main_t *vm = vlib_get_main ();
1658   vl_api_sw_interface_ip6nd_ra_prefix_reply_t *rmp;
1659   int rv = 0;
1660   u8 is_no, use_default, no_advertise, off_link, no_autoconfig, no_onlink;
1661
1662   VALIDATE_SW_IF_INDEX (mp);
1663
1664   is_no = mp->is_no == 1;
1665   use_default = mp->use_default == 1;
1666   no_advertise = mp->no_advertise == 1;
1667   off_link = mp->off_link == 1;
1668   no_autoconfig = mp->no_autoconfig == 1;
1669   no_onlink = mp->no_onlink == 1;
1670
1671   rv = ip6_neighbor_ra_prefix (vm, ntohl (mp->sw_if_index),
1672                                (ip6_address_t *) mp->address,
1673                                mp->address_length, use_default,
1674                                ntohl (mp->val_lifetime),
1675                                ntohl (mp->pref_lifetime), no_advertise,
1676                                off_link, no_autoconfig, no_onlink, is_no);
1677
1678   BAD_SW_IF_INDEX_LABEL;
1679   REPLY_MACRO (VL_API_SW_INTERFACE_IP6ND_RA_PREFIX_REPLY);
1680 }
1681
1682 static void
1683 send_ip6nd_proxy_details (vl_api_registration_t * reg,
1684                           u32 context,
1685                           const ip46_address_t * addr, u32 sw_if_index)
1686 {
1687   vl_api_ip6nd_proxy_details_t *mp;
1688
1689   mp = vl_msg_api_alloc (sizeof (*mp));
1690   clib_memset (mp, 0, sizeof (*mp));
1691   mp->_vl_msg_id = ntohs (VL_API_IP6ND_PROXY_DETAILS);
1692   mp->context = context;
1693   mp->sw_if_index = htonl (sw_if_index);
1694   memcpy (mp->address, addr, 16);
1695
1696   vl_api_send_msg (reg, (u8 *) mp);
1697 }
1698
1699 typedef struct api_ip6nd_proxy_fib_table_walk_ctx_t_
1700 {
1701   u32 *indices;
1702 } api_ip6nd_proxy_fib_table_walk_ctx_t;
1703
1704 static fib_table_walk_rc_t
1705 api_ip6nd_proxy_fib_table_walk (fib_node_index_t fei, void *arg)
1706 {
1707   api_ip6nd_proxy_fib_table_walk_ctx_t *ctx = arg;
1708
1709   if (fib_entry_is_sourced (fei, FIB_SOURCE_IP6_ND_PROXY))
1710     {
1711       vec_add1 (ctx->indices, fei);
1712     }
1713
1714   return (FIB_TABLE_WALK_CONTINUE);
1715 }
1716
1717 static void
1718 vl_api_ip6nd_proxy_dump_t_handler (vl_api_ip6nd_proxy_dump_t * mp)
1719 {
1720   ip6_main_t *im6 = &ip6_main;
1721   fib_table_t *fib_table;
1722   api_ip6nd_proxy_fib_table_walk_ctx_t ctx = {
1723     .indices = NULL,
1724   };
1725   fib_node_index_t *feip;
1726   const fib_prefix_t *pfx;
1727   vl_api_registration_t *reg;
1728
1729   reg = vl_api_client_index_to_registration (mp->client_index);
1730   if (!reg)
1731     return;
1732
1733   /* *INDENT-OFF* */
1734   pool_foreach (fib_table, im6->fibs,
1735   ({
1736     fib_table_walk(fib_table->ft_index,
1737                    FIB_PROTOCOL_IP6,
1738                    api_ip6nd_proxy_fib_table_walk,
1739                    &ctx);
1740   }));
1741   /* *INDENT-ON* */
1742
1743   vec_sort_with_function (ctx.indices, fib_entry_cmp_for_sort);
1744
1745   vec_foreach (feip, ctx.indices)
1746   {
1747     pfx = fib_entry_get_prefix (*feip);
1748
1749     send_ip6nd_proxy_details (reg,
1750                               mp->context,
1751                               &pfx->fp_addr,
1752                               fib_entry_get_resolving_interface (*feip));
1753   }
1754
1755   vec_free (ctx.indices);
1756 }
1757
1758 static void
1759 vl_api_ip6nd_proxy_add_del_t_handler (vl_api_ip6nd_proxy_add_del_t * mp)
1760 {
1761   vl_api_ip6nd_proxy_add_del_reply_t *rmp;
1762   int rv = 0;
1763
1764   VALIDATE_SW_IF_INDEX (mp);
1765
1766   rv = ip6_neighbor_proxy_add_del (ntohl (mp->sw_if_index),
1767                                    (ip6_address_t *) mp->address, mp->is_del);
1768
1769   BAD_SW_IF_INDEX_LABEL;
1770   REPLY_MACRO (VL_API_IP6ND_PROXY_ADD_DEL_REPLY);
1771 }
1772
1773 static void
1774   vl_api_ip6nd_send_router_solicitation_t_handler
1775   (vl_api_ip6nd_send_router_solicitation_t * mp)
1776 {
1777   vl_api_ip6nd_send_router_solicitation_reply_t *rmp;
1778   icmp6_send_router_solicitation_params_t params;
1779   vlib_main_t *vm = vlib_get_main ();
1780   int rv = 0;
1781
1782   VALIDATE_SW_IF_INDEX (mp);
1783
1784   BAD_SW_IF_INDEX_LABEL;
1785   REPLY_MACRO (VL_API_IP6ND_SEND_ROUTER_SOLICITATION_REPLY);
1786
1787   if (rv != 0)
1788     return;
1789
1790   params.irt = ntohl (mp->irt);
1791   params.mrt = ntohl (mp->mrt);
1792   params.mrc = ntohl (mp->mrc);
1793   params.mrd = ntohl (mp->mrd);
1794
1795   icmp6_send_router_solicitation (vm, ntohl (mp->sw_if_index), mp->stop,
1796                                   &params);
1797 }
1798
1799 static void
1800   vl_api_sw_interface_ip6_enable_disable_t_handler
1801   (vl_api_sw_interface_ip6_enable_disable_t * mp)
1802 {
1803   vlib_main_t *vm = vlib_get_main ();
1804   vl_api_sw_interface_ip6_enable_disable_reply_t *rmp;
1805   vnet_main_t *vnm = vnet_get_main ();
1806   int rv = 0;
1807   clib_error_t *error;
1808
1809   vnm->api_errno = 0;
1810
1811   VALIDATE_SW_IF_INDEX (mp);
1812
1813   error =
1814     (mp->enable == 1) ? enable_ip6_interface (vm,
1815                                               ntohl (mp->sw_if_index)) :
1816     disable_ip6_interface (vm, ntohl (mp->sw_if_index));
1817
1818   if (error)
1819     {
1820       clib_error_report (error);
1821       rv = VNET_API_ERROR_UNSPECIFIED;
1822     }
1823   else
1824     {
1825       rv = vnm->api_errno;
1826     }
1827
1828   BAD_SW_IF_INDEX_LABEL;
1829
1830   REPLY_MACRO (VL_API_SW_INTERFACE_IP6_ENABLE_DISABLE_REPLY);
1831 }
1832
1833 void
1834 vl_mfib_signal_send_one (vl_api_registration_t * reg,
1835                          u32 context, const mfib_signal_t * mfs)
1836 {
1837   vl_api_mfib_signal_details_t *mp;
1838   const mfib_prefix_t *prefix;
1839   mfib_table_t *mfib;
1840   mfib_itf_t *mfi;
1841
1842   mp = vl_msg_api_alloc (sizeof (*mp));
1843
1844   clib_memset (mp, 0, sizeof (*mp));
1845   mp->_vl_msg_id = ntohs (VL_API_MFIB_SIGNAL_DETAILS);
1846   mp->context = context;
1847
1848   mfi = mfib_itf_get (mfs->mfs_itf);
1849   prefix = mfib_entry_get_prefix (mfs->mfs_entry);
1850   mfib = mfib_table_get (mfib_entry_get_fib_index (mfs->mfs_entry),
1851                          prefix->fp_proto);
1852   mp->table_id = ntohl (mfib->mft_table_id);
1853   mp->sw_if_index = ntohl (mfi->mfi_sw_if_index);
1854
1855   if (FIB_PROTOCOL_IP4 == prefix->fp_proto)
1856     {
1857       mp->grp_address_len = ntohs (prefix->fp_len);
1858
1859       memcpy (mp->grp_address, &prefix->fp_grp_addr.ip4, 4);
1860       if (prefix->fp_len > 32)
1861         {
1862           memcpy (mp->src_address, &prefix->fp_src_addr.ip4, 4);
1863         }
1864     }
1865   else
1866     {
1867       mp->grp_address_len = ntohs (prefix->fp_len);
1868
1869       ASSERT (0);
1870     }
1871
1872   if (0 != mfs->mfs_buffer_len)
1873     {
1874       mp->ip_packet_len = ntohs (mfs->mfs_buffer_len);
1875
1876       memcpy (mp->ip_packet_data, mfs->mfs_buffer, mfs->mfs_buffer_len);
1877     }
1878   else
1879     {
1880       mp->ip_packet_len = 0;
1881     }
1882
1883   vl_api_send_msg (reg, (u8 *) mp);
1884 }
1885
1886 static void
1887 vl_api_mfib_signal_dump_t_handler (vl_api_mfib_signal_dump_t * mp)
1888 {
1889   vl_api_registration_t *reg;
1890
1891   reg = vl_api_client_index_to_registration (mp->client_index);
1892   if (!reg)
1893     return;
1894
1895   while (vl_api_can_send_msg (reg) && mfib_signal_send_one (reg, mp->context))
1896     ;
1897 }
1898
1899 static void
1900   vl_api_ip_container_proxy_add_del_t_handler
1901   (vl_api_ip_container_proxy_add_del_t * mp)
1902 {
1903   vl_api_ip_container_proxy_add_del_reply_t *rmp;
1904   vnet_ip_container_proxy_args_t args;
1905   int rv = 0;
1906   clib_error_t *error;
1907
1908   clib_memset (&args, 0, sizeof (args));
1909   ip_set (&args.prefix.fp_addr, mp->ip, mp->is_ip4);
1910   args.prefix.fp_len = mp->plen ? mp->plen : (mp->is_ip4 ? 32 : 128);
1911   args.sw_if_index = clib_net_to_host_u32 (mp->sw_if_index);
1912   args.is_add = mp->is_add;
1913   if ((error = vnet_ip_container_proxy_add_del (&args)))
1914     {
1915       rv = clib_error_get_code (error);
1916       clib_error_report (error);
1917     }
1918
1919   REPLY_MACRO (VL_API_IP_CONTAINER_PROXY_ADD_DEL_REPLY);
1920 }
1921
1922 typedef struct ip_container_proxy_walk_ctx_t_
1923 {
1924   vl_api_registration_t *reg;
1925   u32 context;
1926 } ip_container_proxy_walk_ctx_t;
1927
1928 static int
1929 ip_container_proxy_send_details (const fib_prefix_t * pfx, u32 sw_if_index,
1930                                  void *args)
1931 {
1932   vl_api_ip_container_proxy_details_t *mp;
1933   ip_container_proxy_walk_ctx_t *ctx = args;
1934
1935   mp = vl_msg_api_alloc (sizeof (*mp));
1936   if (!mp)
1937     return 1;
1938
1939   clib_memset (mp, 0, sizeof (*mp));
1940   mp->_vl_msg_id = ntohs (VL_API_IP_CONTAINER_PROXY_DETAILS);
1941   mp->context = ctx->context;
1942
1943   mp->sw_if_index = ntohl (sw_if_index);
1944   ip_prefix_encode (pfx, &mp->prefix);
1945
1946   vl_api_send_msg (ctx->reg, (u8 *) mp);
1947
1948   return 1;
1949 }
1950
1951 static void
1952 vl_api_ip_container_proxy_dump_t_handler (vl_api_ip_container_proxy_dump_t *
1953                                           mp)
1954 {
1955   vl_api_registration_t *reg;
1956
1957   reg = vl_api_client_index_to_registration (mp->client_index);
1958   if (!reg)
1959     return;
1960
1961   ip_container_proxy_walk_ctx_t ctx = {
1962     .context = mp->context,
1963     .reg = reg,
1964   };
1965
1966   ip_container_proxy_walk (ip_container_proxy_send_details, &ctx);
1967 }
1968
1969 static void
1970 vl_api_ioam_enable_t_handler (vl_api_ioam_enable_t * mp)
1971 {
1972   int rv = 0;
1973   vl_api_ioam_enable_reply_t *rmp;
1974   clib_error_t *error;
1975
1976   /* Ignoring the profile id as currently a single profile
1977    * is supported */
1978   error = ip6_ioam_enable (mp->trace_enable, mp->pot_enable,
1979                            mp->seqno, mp->analyse);
1980   if (error)
1981     {
1982       clib_error_report (error);
1983       rv = clib_error_get_code (error);
1984     }
1985
1986   REPLY_MACRO (VL_API_IOAM_ENABLE_REPLY);
1987 }
1988
1989 static void
1990 vl_api_ioam_disable_t_handler (vl_api_ioam_disable_t * mp)
1991 {
1992   int rv = 0;
1993   vl_api_ioam_disable_reply_t *rmp;
1994   clib_error_t *error;
1995
1996   error = clear_ioam_rewrite_fn ();
1997   if (error)
1998     {
1999       clib_error_report (error);
2000       rv = clib_error_get_code (error);
2001     }
2002
2003   REPLY_MACRO (VL_API_IOAM_DISABLE_REPLY);
2004 }
2005
2006 static void
2007   vl_api_ip_source_and_port_range_check_add_del_t_handler
2008   (vl_api_ip_source_and_port_range_check_add_del_t * mp)
2009 {
2010   vl_api_ip_source_and_port_range_check_add_del_reply_t *rmp;
2011   int rv = 0;
2012
2013   u8 is_ipv6 = mp->is_ipv6;
2014   u8 is_add = mp->is_add;
2015   u8 mask_length = mp->mask_length;
2016   ip4_address_t ip4_addr;
2017   ip6_address_t ip6_addr;
2018   u16 *low_ports = 0;
2019   u16 *high_ports = 0;
2020   u32 vrf_id;
2021   u16 tmp_low, tmp_high;
2022   u8 num_ranges;
2023   int i;
2024
2025   // Validate port range
2026   num_ranges = mp->number_of_ranges;
2027   if (num_ranges > 32)
2028     {                           // This is size of array in VPE.API
2029       rv = VNET_API_ERROR_EXCEEDED_NUMBER_OF_RANGES_CAPACITY;
2030       goto reply;
2031     }
2032
2033   vec_reset_length (low_ports);
2034   vec_reset_length (high_ports);
2035
2036   for (i = 0; i < num_ranges; i++)
2037     {
2038       tmp_low = mp->low_ports[i];
2039       tmp_high = mp->high_ports[i];
2040       // If tmp_low <= tmp_high then only need to check tmp_low = 0
2041       // If tmp_low <= tmp_high then only need to check tmp_high > 65535
2042       if (tmp_low > tmp_high || tmp_low == 0 || tmp_high > 65535)
2043         {
2044           rv = VNET_API_ERROR_INVALID_VALUE;
2045           goto reply;
2046         }
2047       vec_add1 (low_ports, tmp_low);
2048       vec_add1 (high_ports, tmp_high + 1);
2049     }
2050
2051   // Validate mask_length
2052   if ((is_ipv6 && mask_length > 128) || (!is_ipv6 && mask_length > 32))
2053     {
2054       rv = VNET_API_ERROR_ADDRESS_LENGTH_MISMATCH;
2055       goto reply;
2056     }
2057
2058   vrf_id = ntohl (mp->vrf_id);
2059
2060   if (vrf_id < 1)
2061     {
2062       rv = VNET_API_ERROR_INVALID_VALUE;
2063       goto reply;
2064     }
2065
2066
2067   if (is_ipv6)
2068     {
2069       clib_memcpy (ip6_addr.as_u8, mp->address, sizeof (ip6_addr.as_u8));
2070       rv = ip6_source_and_port_range_check_add_del (&ip6_addr,
2071                                                     mask_length,
2072                                                     vrf_id,
2073                                                     low_ports,
2074                                                     high_ports, is_add);
2075     }
2076   else
2077     {
2078       clib_memcpy (ip4_addr.data, mp->address, sizeof (ip4_addr));
2079       rv = ip4_source_and_port_range_check_add_del (&ip4_addr,
2080                                                     mask_length,
2081                                                     vrf_id,
2082                                                     low_ports,
2083                                                     high_ports, is_add);
2084     }
2085
2086 reply:
2087   vec_free (low_ports);
2088   vec_free (high_ports);
2089   REPLY_MACRO (VL_API_IP_SOURCE_AND_PORT_RANGE_CHECK_ADD_DEL_REPLY);
2090 }
2091
2092 static void
2093   vl_api_ip_source_and_port_range_check_interface_add_del_t_handler
2094   (vl_api_ip_source_and_port_range_check_interface_add_del_t * mp)
2095 {
2096   vlib_main_t *vm = vlib_get_main ();
2097   vl_api_ip_source_and_port_range_check_interface_add_del_reply_t *rmp;
2098   ip4_main_t *im = &ip4_main;
2099   int rv;
2100   u32 sw_if_index;
2101   u32 fib_index[IP_SOURCE_AND_PORT_RANGE_CHECK_N_PROTOCOLS];
2102   u32 vrf_id[IP_SOURCE_AND_PORT_RANGE_CHECK_N_PROTOCOLS];
2103   uword *p = 0;
2104   int i;
2105
2106   vrf_id[IP_SOURCE_AND_PORT_RANGE_CHECK_PROTOCOL_TCP_OUT] =
2107     ntohl (mp->tcp_out_vrf_id);
2108   vrf_id[IP_SOURCE_AND_PORT_RANGE_CHECK_PROTOCOL_UDP_OUT] =
2109     ntohl (mp->udp_out_vrf_id);
2110   vrf_id[IP_SOURCE_AND_PORT_RANGE_CHECK_PROTOCOL_TCP_IN] =
2111     ntohl (mp->tcp_in_vrf_id);
2112   vrf_id[IP_SOURCE_AND_PORT_RANGE_CHECK_PROTOCOL_UDP_IN] =
2113     ntohl (mp->udp_in_vrf_id);
2114
2115
2116   for (i = 0; i < IP_SOURCE_AND_PORT_RANGE_CHECK_N_PROTOCOLS; i++)
2117     {
2118       if (vrf_id[i] != 0 && vrf_id[i] != ~0)
2119         {
2120           p = hash_get (im->fib_index_by_table_id, vrf_id[i]);
2121
2122           if (p == 0)
2123             {
2124               rv = VNET_API_ERROR_INVALID_VALUE;
2125               goto reply;
2126             }
2127
2128           fib_index[i] = p[0];
2129         }
2130       else
2131         fib_index[i] = ~0;
2132     }
2133   sw_if_index = ntohl (mp->sw_if_index);
2134
2135   VALIDATE_SW_IF_INDEX (mp);
2136
2137   rv =
2138     set_ip_source_and_port_range_check (vm, fib_index, sw_if_index,
2139                                         mp->is_add);
2140
2141   BAD_SW_IF_INDEX_LABEL;
2142 reply:
2143
2144   REPLY_MACRO (VL_API_IP_SOURCE_AND_PORT_RANGE_CHECK_INTERFACE_ADD_DEL_REPLY);
2145 }
2146
2147 typedef union
2148 {
2149   u32 fib_index;
2150 } ip4_source_check_config_t;
2151
2152 static void
2153   vl_api_ip_source_check_interface_add_del_t_handler
2154   (vl_api_ip_source_check_interface_add_del_t * mp)
2155 {
2156   vl_api_ip_source_check_interface_add_del_reply_t *rmp;
2157   int rv;
2158   u32 sw_if_index = ntohl (mp->sw_if_index);
2159   u8 is_add = mp->is_add;
2160   char *feature_name =
2161     mp->loose ? "ip4-source-check-via-any" : "ip4-source-check-via-rx";
2162
2163   ip4_source_check_config_t config;
2164
2165   VALIDATE_SW_IF_INDEX (mp);
2166
2167   config.fib_index =
2168     fib_table_get_index_for_sw_if_index (FIB_PROTOCOL_IP4, sw_if_index);
2169   rv =
2170     vnet_feature_enable_disable ("ip4-unicast", feature_name, sw_if_index,
2171                                  is_add, &config, sizeof (config));
2172   BAD_SW_IF_INDEX_LABEL;
2173
2174   REPLY_MACRO (VL_API_IP_SOURCE_CHECK_INTERFACE_ADD_DEL_REPLY);
2175 }
2176
2177 #define IP4_ARP_EVENT 3
2178 #define IP6_ND_EVENT 4
2179
2180 static int arp_change_delete_callback (u32 pool_index, u8 * notused);
2181 static int nd_change_delete_callback (u32 pool_index, u8 * notused);
2182 static vlib_node_registration_t ip_resolver_process_node;
2183
2184 static void
2185 handle_ip4_arp_event (u32 pool_index)
2186 {
2187   vpe_api_main_t *vam = &vpe_api_main;
2188   vnet_main_t *vnm = vam->vnet_main;
2189   vlib_main_t *vm = vam->vlib_main;
2190   vl_api_ip4_arp_event_t *event;
2191   vl_api_ip4_arp_event_t *mp;
2192   vl_api_registration_t *reg;
2193
2194   /* Client can cancel, die, etc. */
2195   if (pool_is_free_index (vam->arp_events, pool_index))
2196     return;
2197
2198   event = pool_elt_at_index (vam->arp_events, pool_index);
2199
2200   reg = vl_api_client_index_to_registration (event->client_index);
2201   if (!reg)
2202     {
2203       (void) vnet_add_del_ip4_arp_change_event
2204         (vnm, arp_change_delete_callback,
2205          event->pid, &event->address,
2206          ip_resolver_process_node.index, IP4_ARP_EVENT,
2207          ~0 /* pool index, notused */ , 0 /* is_add */ );
2208       return;
2209     }
2210
2211   if (vl_api_can_send_msg (reg))
2212     {
2213       mp = vl_msg_api_alloc (sizeof (*mp));
2214       clib_memcpy (mp, event, sizeof (*mp));
2215       vl_api_send_msg (reg, (u8 *) mp);
2216     }
2217   else
2218     {
2219       static f64 last_time;
2220       /*
2221        * Throttle syslog msgs.
2222        * It's pretty tempting to just revoke the registration...
2223        */
2224       if (vlib_time_now (vm) > last_time + 10.0)
2225         {
2226           clib_warning ("arp event for %U to pid %d: queue stuffed!",
2227                         format_ip4_address, &event->address, event->pid);
2228           last_time = vlib_time_now (vm);
2229         }
2230     }
2231 }
2232
2233 static void
2234 handle_ip6_nd_event (u32 pool_index)
2235 {
2236   vpe_api_main_t *vam = &vpe_api_main;
2237   vnet_main_t *vnm = vam->vnet_main;
2238   vlib_main_t *vm = vam->vlib_main;
2239   vl_api_ip6_nd_event_t *event;
2240   vl_api_ip6_nd_event_t *mp;
2241   vl_api_registration_t *reg;
2242
2243   /* Client can cancel, die, etc. */
2244   if (pool_is_free_index (vam->nd_events, pool_index))
2245     return;
2246
2247   event = pool_elt_at_index (vam->nd_events, pool_index);
2248
2249   reg = vl_api_client_index_to_registration (event->client_index);
2250   if (!reg)
2251     {
2252       (void) vnet_add_del_ip6_nd_change_event
2253         (vnm, nd_change_delete_callback,
2254          event->pid, &event->address,
2255          ip_resolver_process_node.index, IP6_ND_EVENT,
2256          ~0 /* pool index, notused */ , 0 /* is_add */ );
2257       return;
2258     }
2259
2260   if (vl_api_can_send_msg (reg))
2261     {
2262       mp = vl_msg_api_alloc (sizeof (*mp));
2263       clib_memcpy (mp, event, sizeof (*mp));
2264       vl_api_send_msg (reg, (u8 *) mp);
2265     }
2266   else
2267     {
2268       static f64 last_time;
2269       /*
2270        * Throttle syslog msgs.
2271        * It's pretty tempting to just revoke the registration...
2272        */
2273       if (vlib_time_now (vm) > last_time + 10.0)
2274         {
2275           clib_warning ("ip6 nd event for %U to pid %d: queue stuffed!",
2276                         format_ip6_address, &event->address, event->pid);
2277           last_time = vlib_time_now (vm);
2278         }
2279     }
2280 }
2281
2282 static uword
2283 resolver_process (vlib_main_t * vm,
2284                   vlib_node_runtime_t * rt, vlib_frame_t * f)
2285 {
2286   volatile f64 timeout = 100.0;
2287   volatile uword *event_data = 0;
2288
2289   while (1)
2290     {
2291       vlib_process_wait_for_event_or_clock (vm, timeout);
2292
2293       uword event_type =
2294         vlib_process_get_events (vm, (uword **) & event_data);
2295
2296       int i;
2297       switch (event_type)
2298         {
2299         case IP4_ARP_EVENT:
2300           for (i = 0; i < vec_len (event_data); i++)
2301             handle_ip4_arp_event (event_data[i]);
2302           break;
2303
2304         case IP6_ND_EVENT:
2305           for (i = 0; i < vec_len (event_data); i++)
2306             handle_ip6_nd_event (event_data[i]);
2307           break;
2308
2309         case ~0:                /* timeout */
2310           break;
2311         }
2312
2313       vec_reset_length (event_data);
2314     }
2315   return 0;                     /* or not */
2316 }
2317
2318 /* *INDENT-OFF* */
2319 VLIB_REGISTER_NODE (ip_resolver_process_node,static) = {
2320   .function = resolver_process,
2321   .type = VLIB_NODE_TYPE_PROCESS,
2322   .name = "ip-route-resolver-process",
2323 };
2324 /* *INDENT-ON* */
2325
2326 static int
2327 nd_change_data_callback (u32 pool_index, u8 * new_mac,
2328                          u32 sw_if_index, ip6_address_t * address)
2329 {
2330   vpe_api_main_t *am = &vpe_api_main;
2331   vl_api_ip6_nd_event_t *event;
2332
2333   if (pool_is_free_index (am->nd_events, pool_index))
2334     return 1;
2335
2336   event = pool_elt_at_index (am->nd_events, pool_index);
2337   if (eth_mac_equal (event->new_mac, new_mac) &&
2338       sw_if_index == ntohl (event->sw_if_index))
2339     {
2340       return 1;
2341     }
2342
2343   clib_memcpy (event->new_mac, new_mac, sizeof (event->new_mac));
2344   event->sw_if_index = htonl (sw_if_index);
2345   return 0;
2346 }
2347
2348 static int
2349 arp_change_delete_callback (u32 pool_index, u8 * notused)
2350 {
2351   vpe_api_main_t *am = &vpe_api_main;
2352
2353   if (pool_is_free_index (am->arp_events, pool_index))
2354     return 1;
2355
2356   pool_put_index (am->arp_events, pool_index);
2357   return 0;
2358 }
2359
2360 static int
2361 nd_change_delete_callback (u32 pool_index, u8 * notused)
2362 {
2363   vpe_api_main_t *am = &vpe_api_main;
2364
2365   if (pool_is_free_index (am->nd_events, pool_index))
2366     return 1;
2367
2368   pool_put_index (am->nd_events, pool_index);
2369   return 0;
2370 }
2371
2372 static vlib_node_registration_t wc_arp_process_node;
2373
2374 enum
2375 { WC_ARP_REPORT, WC_ND_REPORT, RA_REPORT, REPORT_MAX };
2376
2377 static uword
2378 wc_arp_process (vlib_main_t * vm, vlib_node_runtime_t * rt, vlib_frame_t * f)
2379 {
2380   /* These cross the longjmp  boundry (vlib_process_wait_for_event)
2381    * and need to be volatile - to prevent them from being optimized into
2382    * a register - which could change during suspension */
2383
2384   volatile wc_arp_report_t arp_prev = { 0 };
2385   volatile wc_nd_report_t nd_prev = { 0 };
2386   volatile f64 last_arp = vlib_time_now (vm);
2387   volatile f64 last_nd = vlib_time_now (vm);
2388
2389   while (1)
2390     {
2391       vlib_process_wait_for_event (vm);
2392       uword event_type = WC_ARP_REPORT;
2393       void *event_data = vlib_process_get_event_data (vm, &event_type);
2394
2395       f64 now = vlib_time_now (vm);
2396       int i;
2397       if (event_type == WC_ARP_REPORT)
2398         {
2399           wc_arp_report_t *arp_events = event_data;
2400           for (i = 0; i < vec_len (arp_events); i++)
2401             {
2402               /* discard dup event */
2403               if (arp_prev.ip4 == arp_events[i].ip4 &&
2404                   eth_mac_equal ((u8 *) arp_prev.mac, arp_events[i].mac) &&
2405                   arp_prev.sw_if_index == arp_events[i].sw_if_index &&
2406                   (now - last_arp) < 10.0)
2407                 {
2408                   continue;
2409                 }
2410               arp_prev = arp_events[i];
2411               last_arp = now;
2412               vpe_client_registration_t *reg;
2413             /* *INDENT-OFF* */
2414             pool_foreach(reg, vpe_api_main.wc_ip4_arp_events_registrations,
2415             ({
2416               vl_api_registration_t *vl_reg;
2417               vl_reg = vl_api_client_index_to_registration (reg->client_index);
2418               ASSERT (vl_reg != NULL);
2419               if (reg && vl_api_can_send_msg (vl_reg))
2420                 {
2421                   vl_api_ip4_arp_event_t * event = vl_msg_api_alloc (sizeof *event);
2422                   clib_memset (event, 0, sizeof *event);
2423                   event->_vl_msg_id = htons (VL_API_IP4_ARP_EVENT);
2424                   event->client_index = reg->client_index;
2425                   event->pid = reg->client_pid;
2426                   event->mac_ip = 1;
2427                   event->address = arp_events[i].ip4;
2428                   event->sw_if_index = htonl(arp_events[i].sw_if_index);
2429                   memcpy(event->new_mac, arp_events[i].mac, sizeof event->new_mac);
2430                   vl_api_send_msg (vl_reg, (u8 *) event);
2431                 }
2432             }));
2433             /* *INDENT-ON* */
2434             }
2435         }
2436       else if (event_type == WC_ND_REPORT)
2437         {
2438           wc_nd_report_t *nd_events = event_data;
2439           for (i = 0; i < vec_len (nd_events); i++)
2440             {
2441               /* discard dup event */
2442               if (ip6_address_is_equal
2443                   ((ip6_address_t *) & nd_prev.ip6, &nd_events[i].ip6)
2444                   && eth_mac_equal ((u8 *) nd_prev.mac, nd_events[i].mac)
2445                   && nd_prev.sw_if_index == nd_events[i].sw_if_index
2446                   && (now - last_nd) < 10.0)
2447                 {
2448                   continue;
2449                 }
2450               nd_prev = nd_events[i];
2451               last_nd = now;
2452               vpe_client_registration_t *reg;
2453               /* *INDENT-OFF* */
2454               pool_foreach(reg, vpe_api_main.wc_ip6_nd_events_registrations,
2455               ({
2456                 vl_api_registration_t *vl_reg;
2457                 vl_reg = vl_api_client_index_to_registration (reg->client_index);
2458                 if (vl_reg && vl_api_can_send_msg (vl_reg))
2459                   {
2460                     vl_api_ip6_nd_event_t * event = vl_msg_api_alloc (sizeof *event);
2461                     clib_memset (event, 0, sizeof *event);
2462                     event->_vl_msg_id = htons (VL_API_IP6_ND_EVENT);
2463                     event->client_index = reg->client_index;
2464                     event->pid = reg->client_pid;
2465                     event->mac_ip = 1;
2466                     memcpy(event->address, nd_events[i].ip6.as_u8, sizeof event->address);
2467                     event->sw_if_index = htonl(nd_events[i].sw_if_index);
2468                     memcpy(event->new_mac, nd_events[i].mac, sizeof event->new_mac);
2469                     vl_api_send_msg (vl_reg, (u8 *) event);
2470                   }
2471               }));
2472             /* *INDENT-ON* */
2473             }
2474         }
2475       else if (event_type == RA_REPORT)
2476         {
2477           ra_report_t *ra_events = event_data;
2478           for (i = 0; i < vec_len (ra_events); i++)
2479             {
2480               ip6_neighbor_public_main_t *npm = &ip6_neighbor_public_main;
2481               call_ip6_neighbor_callbacks (&ra_events[i],
2482                                            npm->ra_report_functions);
2483
2484               vpe_client_registration_t *reg;
2485               /* *INDENT-OFF* */
2486               pool_foreach(reg, vpe_api_main.ip6_ra_events_registrations,
2487               ({
2488                 vl_api_registration_t *vl_reg;
2489                 vl_reg =
2490                   vl_api_client_index_to_registration (reg->client_index);
2491                 if (vl_reg && vl_api_can_send_msg (vl_reg))
2492                   {
2493                     u32 event_size =
2494                       sizeof (vl_api_ip6_ra_event_t) +
2495                       vec_len (ra_events[i].prefixes) *
2496                       sizeof (vl_api_ip6_ra_prefix_info_t);
2497                     vl_api_ip6_ra_event_t *event =
2498                       vl_msg_api_alloc (event_size);
2499                     clib_memset (event, 0, event_size);
2500                     event->_vl_msg_id = htons (VL_API_IP6_RA_EVENT);
2501                     event->client_index = reg->client_index;
2502                     event->pid = reg->client_pid;
2503
2504                     event->sw_if_index = clib_host_to_net_u32 (ra_events[i].sw_if_index);
2505
2506                     memcpy (event->router_address, ra_events[i].router_address, 16);
2507
2508                     event->current_hop_limit = ra_events[i].current_hop_limit;
2509                     event->flags = ra_events[i].flags;
2510                     event->router_lifetime_in_sec =
2511                       clib_host_to_net_u16 (ra_events
2512                                             [i].router_lifetime_in_sec);
2513                     event->neighbor_reachable_time_in_msec =
2514                       clib_host_to_net_u32 (ra_events
2515                                             [i].neighbor_reachable_time_in_msec);
2516                     event->time_in_msec_between_retransmitted_neighbor_solicitations
2517                       =
2518                       clib_host_to_net_u32 (ra_events
2519                                             [i].time_in_msec_between_retransmitted_neighbor_solicitations);
2520
2521                     event->n_prefixes =
2522                       clib_host_to_net_u32 (vec_len (ra_events[i].prefixes));
2523                     vl_api_ip6_ra_prefix_info_t *prefix =
2524                       (typeof (prefix)) event->prefixes;
2525                     u32 j;
2526                     for (j = 0; j < vec_len (ra_events[i].prefixes); j++)
2527                       {
2528                         ra_report_prefix_info_t *info =
2529                           &ra_events[i].prefixes[j];
2530                         memcpy (prefix->dst_address, info->dst_address.as_u8,
2531                                 16);
2532                         prefix->dst_address_length = info->dst_address_length;
2533                         prefix->flags = info->flags;
2534                         prefix->valid_time =
2535                           clib_host_to_net_u32 (info->valid_time);
2536                         prefix->preferred_time =
2537                           clib_host_to_net_u32 (info->preferred_time);
2538                         prefix++;
2539                       }
2540
2541                     vl_api_send_msg (vl_reg, (u8 *) event);
2542                   }
2543               }));
2544               /* *INDENT-ON* */
2545               vec_free (ra_events[i].prefixes);
2546             }
2547         }
2548       vlib_process_put_event_data (vm, event_data);
2549     }
2550
2551   return 0;
2552 }
2553
2554 /* *INDENT-OFF* */
2555 VLIB_REGISTER_NODE (wc_arp_process_node,static) = {
2556   .function = wc_arp_process,
2557   .type = VLIB_NODE_TYPE_PROCESS,
2558   .name = "wildcard-ip4-arp-publisher-process",
2559 };
2560 /* *INDENT-ON* */
2561
2562 static int
2563 arp_change_data_callback (u32 pool_index, u8 * new_mac,
2564                           u32 sw_if_index, u32 address)
2565 {
2566   vpe_api_main_t *am = &vpe_api_main;
2567   vl_api_ip4_arp_event_t *event;
2568
2569   if (pool_is_free_index (am->arp_events, pool_index))
2570     return 1;
2571
2572   event = pool_elt_at_index (am->arp_events, pool_index);
2573   if (eth_mac_equal (event->new_mac, new_mac) &&
2574       sw_if_index == ntohl (event->sw_if_index))
2575     {
2576       return 1;
2577     }
2578
2579   clib_memcpy (event->new_mac, new_mac, sizeof (event->new_mac));
2580   event->sw_if_index = htonl (sw_if_index);
2581   return 0;
2582 }
2583
2584 static void
2585 vl_api_want_ip4_arp_events_t_handler (vl_api_want_ip4_arp_events_t * mp)
2586 {
2587   vpe_api_main_t *am = &vpe_api_main;
2588   vnet_main_t *vnm = vnet_get_main ();
2589   vl_api_want_ip4_arp_events_reply_t *rmp;
2590   int rv = 0;
2591
2592   if (mp->address == 0)
2593     {
2594       uword *p =
2595         hash_get (am->wc_ip4_arp_events_registration_hash, mp->client_index);
2596       vpe_client_registration_t *rp;
2597       if (p)
2598         {
2599           if (mp->enable_disable)
2600             {
2601               clib_warning ("pid %d: already enabled...", mp->pid);
2602               rv = VNET_API_ERROR_INVALID_REGISTRATION;
2603               goto reply;
2604             }
2605           else
2606             {
2607               rp =
2608                 pool_elt_at_index (am->wc_ip4_arp_events_registrations, p[0]);
2609               pool_put (am->wc_ip4_arp_events_registrations, rp);
2610               hash_unset (am->wc_ip4_arp_events_registration_hash,
2611                           mp->client_index);
2612               if (pool_elts (am->wc_ip4_arp_events_registrations) == 0)
2613                 wc_arp_set_publisher_node (~0, REPORT_MAX);
2614               goto reply;
2615             }
2616         }
2617       if (mp->enable_disable == 0)
2618         {
2619           clib_warning ("pid %d: already disabled...", mp->pid);
2620           rv = VNET_API_ERROR_INVALID_REGISTRATION;
2621           goto reply;
2622         }
2623       pool_get (am->wc_ip4_arp_events_registrations, rp);
2624       rp->client_index = mp->client_index;
2625       rp->client_pid = mp->pid;
2626       hash_set (am->wc_ip4_arp_events_registration_hash, rp->client_index,
2627                 rp - am->wc_ip4_arp_events_registrations);
2628       wc_arp_set_publisher_node (wc_arp_process_node.index, WC_ARP_REPORT);
2629       goto reply;
2630     }
2631
2632   if (mp->enable_disable)
2633     {
2634       vl_api_ip4_arp_event_t *event;
2635       pool_get (am->arp_events, event);
2636       rv = vnet_add_del_ip4_arp_change_event
2637         (vnm, arp_change_data_callback,
2638          mp->pid, &mp->address /* addr, in net byte order */ ,
2639          ip_resolver_process_node.index,
2640          IP4_ARP_EVENT, event - am->arp_events, 1 /* is_add */ );
2641
2642       if (rv)
2643         {
2644           pool_put (am->arp_events, event);
2645           goto reply;
2646         }
2647       clib_memset (event, 0, sizeof (*event));
2648
2649       /* Python API expects events to have no context */
2650       event->_vl_msg_id = htons (VL_API_IP4_ARP_EVENT);
2651       event->client_index = mp->client_index;
2652       event->address = mp->address;
2653       event->pid = mp->pid;
2654       if (mp->address == 0)
2655         event->mac_ip = 1;
2656     }
2657   else
2658     {
2659       rv = vnet_add_del_ip4_arp_change_event
2660         (vnm, arp_change_delete_callback,
2661          mp->pid, &mp->address /* addr, in net byte order */ ,
2662          ip_resolver_process_node.index,
2663          IP4_ARP_EVENT, ~0 /* pool index */ , 0 /* is_add */ );
2664     }
2665 reply:
2666   REPLY_MACRO (VL_API_WANT_IP4_ARP_EVENTS_REPLY);
2667 }
2668
2669 static clib_error_t *
2670 want_ip4_arp_events_reaper (u32 client_index)
2671 {
2672   vpe_client_registration_t *rp;
2673   vl_api_ip4_arp_event_t *event;
2674   u32 *to_delete, *event_id;
2675   vpe_api_main_t *am;
2676   vnet_main_t *vnm;
2677   uword *p;
2678
2679   am = &vpe_api_main;
2680   vnm = vnet_get_main ();
2681   to_delete = NULL;
2682
2683   /* clear out all of its pending resolutions */
2684   /* *INDENT-OFF* */
2685   pool_foreach(event, am->arp_events,
2686   ({
2687     if (event->client_index == client_index)
2688       {
2689         vec_add1(to_delete, event - am->arp_events);
2690       }
2691   }));
2692   /* *INDENT-ON* */
2693
2694   vec_foreach (event_id, to_delete)
2695   {
2696     event = pool_elt_at_index (am->arp_events, *event_id);
2697     vnet_add_del_ip4_arp_change_event
2698       (vnm, arp_change_delete_callback,
2699        event->pid, &event->address,
2700        ip_resolver_process_node.index, IP4_ARP_EVENT,
2701        ~0 /* pool index, notused */ , 0 /* is_add */ );
2702   }
2703   vec_free (to_delete);
2704
2705   /* remove from the registration hash */
2706   p = hash_get (am->wc_ip4_arp_events_registration_hash, client_index);
2707
2708   if (p)
2709     {
2710       rp = pool_elt_at_index (am->wc_ip4_arp_events_registrations, p[0]);
2711       pool_put (am->wc_ip4_arp_events_registrations, rp);
2712       hash_unset (am->wc_ip4_arp_events_registration_hash, client_index);
2713       if (pool_elts (am->wc_ip4_arp_events_registrations) == 0)
2714         wc_arp_set_publisher_node (~0, REPORT_MAX);
2715     }
2716   return (NULL);
2717 }
2718
2719 VL_MSG_API_REAPER_FUNCTION (want_ip4_arp_events_reaper);
2720
2721 static void
2722 vl_api_want_ip6_nd_events_t_handler (vl_api_want_ip6_nd_events_t * mp)
2723 {
2724   vpe_api_main_t *am = &vpe_api_main;
2725   vnet_main_t *vnm = vnet_get_main ();
2726   vl_api_want_ip6_nd_events_reply_t *rmp;
2727   int rv = 0;
2728
2729   if (ip6_address_is_zero ((ip6_address_t *) mp->address))
2730     {
2731       uword *p =
2732         hash_get (am->wc_ip6_nd_events_registration_hash, mp->client_index);
2733       vpe_client_registration_t *rp;
2734       if (p)
2735         {
2736           if (mp->enable_disable)
2737             {
2738               clib_warning ("pid %d: already enabled...", mp->pid);
2739               rv = VNET_API_ERROR_INVALID_REGISTRATION;
2740               goto reply;
2741             }
2742           else
2743             {
2744               rp =
2745                 pool_elt_at_index (am->wc_ip6_nd_events_registrations, p[0]);
2746               pool_put (am->wc_ip6_nd_events_registrations, rp);
2747               hash_unset (am->wc_ip6_nd_events_registration_hash,
2748                           mp->client_index);
2749               if (pool_elts (am->wc_ip6_nd_events_registrations) == 0)
2750                 wc_nd_set_publisher_node (~0, REPORT_MAX);
2751               goto reply;
2752             }
2753         }
2754       if (mp->enable_disable == 0)
2755         {
2756           clib_warning ("pid %d: already disabled...", mp->pid);
2757           rv = VNET_API_ERROR_INVALID_REGISTRATION;
2758           goto reply;
2759         }
2760       pool_get (am->wc_ip6_nd_events_registrations, rp);
2761       rp->client_index = mp->client_index;
2762       rp->client_pid = mp->pid;
2763       hash_set (am->wc_ip6_nd_events_registration_hash, rp->client_index,
2764                 rp - am->wc_ip6_nd_events_registrations);
2765       wc_nd_set_publisher_node (wc_arp_process_node.index, WC_ND_REPORT);
2766       goto reply;
2767     }
2768
2769   if (mp->enable_disable)
2770     {
2771       vl_api_ip6_nd_event_t *event;
2772       pool_get (am->nd_events, event);
2773
2774       rv = vnet_add_del_ip6_nd_change_event
2775         (vnm, nd_change_data_callback,
2776          mp->pid, mp->address /* addr, in net byte order */ ,
2777          ip_resolver_process_node.index,
2778          IP6_ND_EVENT, event - am->nd_events, 1 /* is_add */ );
2779
2780       if (rv)
2781         {
2782           pool_put (am->nd_events, event);
2783           goto reply;
2784         }
2785       clib_memset (event, 0, sizeof (*event));
2786
2787       event->_vl_msg_id = ntohs (VL_API_IP6_ND_EVENT);
2788       event->client_index = mp->client_index;
2789       clib_memcpy (event->address, mp->address, sizeof event->address);
2790       event->pid = mp->pid;
2791     }
2792   else
2793     {
2794       rv = vnet_add_del_ip6_nd_change_event
2795         (vnm, nd_change_delete_callback,
2796          mp->pid, mp->address /* addr, in net byte order */ ,
2797          ip_resolver_process_node.index,
2798          IP6_ND_EVENT, ~0 /* pool index */ , 0 /* is_add */ );
2799     }
2800 reply:
2801   REPLY_MACRO (VL_API_WANT_IP6_ND_EVENTS_REPLY);
2802 }
2803
2804 static clib_error_t *
2805 want_ip6_nd_events_reaper (u32 client_index)
2806 {
2807
2808   vpe_client_registration_t *rp;
2809   vl_api_ip6_nd_event_t *event;
2810   u32 *to_delete, *event_id;
2811   vpe_api_main_t *am;
2812   vnet_main_t *vnm;
2813   uword *p;
2814
2815   am = &vpe_api_main;
2816   vnm = vnet_get_main ();
2817   to_delete = NULL;
2818
2819   /* clear out all of its pending resolutions */
2820   /* *INDENT-OFF* */
2821   pool_foreach(event, am->nd_events,
2822   ({
2823     if (event->client_index == client_index)
2824       {
2825         vec_add1(to_delete, event - am->nd_events);
2826       }
2827   }));
2828   /* *INDENT-ON* */
2829
2830   vec_foreach (event_id, to_delete)
2831   {
2832     event = pool_elt_at_index (am->nd_events, *event_id);
2833     vnet_add_del_ip6_nd_change_event
2834       (vnm, nd_change_delete_callback,
2835        event->pid, &event->address,
2836        ip_resolver_process_node.index, IP6_ND_EVENT,
2837        ~0 /* pool index, notused */ , 0 /* is_add */ );
2838   }
2839   vec_free (to_delete);
2840
2841   /* remove from the registration hash */
2842   p = hash_get (am->wc_ip6_nd_events_registration_hash, client_index);
2843
2844   if (p)
2845     {
2846       rp = pool_elt_at_index (am->wc_ip6_nd_events_registrations, p[0]);
2847       pool_put (am->wc_ip6_nd_events_registrations, rp);
2848       hash_unset (am->wc_ip6_nd_events_registration_hash, client_index);
2849       if (pool_elts (am->wc_ip6_nd_events_registrations) == 0)
2850         wc_nd_set_publisher_node (~0, REPORT_MAX);
2851     }
2852   return (NULL);
2853 }
2854
2855 VL_MSG_API_REAPER_FUNCTION (want_ip6_nd_events_reaper);
2856
2857 static void
2858 vl_api_want_ip6_ra_events_t_handler (vl_api_want_ip6_ra_events_t * mp)
2859 {
2860   vpe_api_main_t *am = &vpe_api_main;
2861   vl_api_want_ip6_ra_events_reply_t *rmp;
2862   int rv = 0;
2863
2864   uword *p = hash_get (am->ip6_ra_events_registration_hash, mp->client_index);
2865   vpe_client_registration_t *rp;
2866   if (p)
2867     {
2868       if (mp->enable_disable)
2869         {
2870           clib_warning ("pid %d: already enabled...", ntohl (mp->pid));
2871           rv = VNET_API_ERROR_INVALID_REGISTRATION;
2872           goto reply;
2873         }
2874       else
2875         {
2876           rp = pool_elt_at_index (am->ip6_ra_events_registrations, p[0]);
2877           pool_put (am->ip6_ra_events_registrations, rp);
2878           hash_unset (am->ip6_ra_events_registration_hash, mp->client_index);
2879           goto reply;
2880         }
2881     }
2882   if (mp->enable_disable == 0)
2883     {
2884       clib_warning ("pid %d: already disabled...", ntohl (mp->pid));
2885       rv = VNET_API_ERROR_INVALID_REGISTRATION;
2886       goto reply;
2887     }
2888   pool_get (am->ip6_ra_events_registrations, rp);
2889   rp->client_index = mp->client_index;
2890   rp->client_pid = ntohl (mp->pid);
2891   hash_set (am->ip6_ra_events_registration_hash, rp->client_index,
2892             rp - am->ip6_ra_events_registrations);
2893
2894 reply:
2895   REPLY_MACRO (VL_API_WANT_IP6_RA_EVENTS_REPLY);
2896 }
2897
2898 static clib_error_t *
2899 want_ip6_ra_events_reaper (u32 client_index)
2900 {
2901   vpe_api_main_t *am = &vpe_api_main;
2902   vpe_client_registration_t *rp;
2903   uword *p;
2904
2905   p = hash_get (am->ip6_ra_events_registration_hash, client_index);
2906
2907   if (p)
2908     {
2909       rp = pool_elt_at_index (am->ip6_ra_events_registrations, p[0]);
2910       pool_put (am->ip6_ra_events_registrations, rp);
2911       hash_unset (am->ip6_ra_events_registration_hash, client_index);
2912     }
2913   return (NULL);
2914 }
2915
2916 VL_MSG_API_REAPER_FUNCTION (want_ip6_ra_events_reaper);
2917
2918 static void
2919 vl_api_proxy_arp_add_del_t_handler (vl_api_proxy_arp_add_del_t * mp)
2920 {
2921   vl_api_proxy_arp_add_del_reply_t *rmp;
2922   u32 fib_index;
2923   int rv;
2924   ip4_main_t *im = &ip4_main;
2925   uword *p;
2926
2927   stats_dslock_with_hint (1 /* release hint */ , 6 /* tag */ );
2928
2929   p = hash_get (im->fib_index_by_table_id, ntohl (mp->proxy.vrf_id));
2930
2931   if (!p)
2932     {
2933       rv = VNET_API_ERROR_NO_SUCH_FIB;
2934       goto out;
2935     }
2936
2937   fib_index = p[0];
2938
2939   rv = vnet_proxy_arp_add_del ((ip4_address_t *) mp->proxy.low_address,
2940                                (ip4_address_t *) mp->proxy.hi_address,
2941                                fib_index, mp->is_add == 0);
2942
2943 out:
2944   stats_dsunlock ();
2945   REPLY_MACRO (VL_API_PROXY_ARP_ADD_DEL_REPLY);
2946 }
2947
2948 typedef struct proxy_arp_walk_ctx_t_
2949 {
2950   vl_api_registration_t *reg;
2951   u32 context;
2952 } proxy_arp_walk_ctx_t;
2953
2954 static walk_rc_t
2955 send_proxy_arp_details (const ip4_address_t * lo_addr,
2956                         const ip4_address_t * hi_addr,
2957                         u32 fib_index, void *data)
2958 {
2959   vl_api_proxy_arp_details_t *mp;
2960   proxy_arp_walk_ctx_t *ctx;
2961
2962   ctx = data;
2963
2964   mp = vl_msg_api_alloc (sizeof (*mp));
2965   clib_memset (mp, 0, sizeof (*mp));
2966   mp->_vl_msg_id = ntohs (VL_API_PROXY_ARP_DETAILS);
2967   mp->context = ctx->context;
2968   mp->proxy.vrf_id = htonl (fib_index);
2969   clib_memcpy (mp->proxy.low_address, lo_addr,
2970                sizeof (mp->proxy.low_address));
2971   clib_memcpy (mp->proxy.hi_address, hi_addr, sizeof (mp->proxy.hi_address));
2972
2973   vl_api_send_msg (ctx->reg, (u8 *) mp);
2974
2975   return (WALK_CONTINUE);
2976 }
2977
2978 static void
2979 vl_api_proxy_arp_dump_t_handler (vl_api_proxy_arp_dump_t * mp)
2980 {
2981   vl_api_registration_t *reg;
2982
2983   reg = vl_api_client_index_to_registration (mp->client_index);
2984   if (!reg)
2985     return;
2986
2987   proxy_arp_walk_ctx_t wctx = {
2988     .reg = reg,
2989     .context = mp->context,
2990   };
2991
2992   proxy_arp_walk (send_proxy_arp_details, &wctx);
2993 }
2994
2995 static walk_rc_t
2996 send_proxy_arp_intfc_details (vnet_main_t * vnm,
2997                               vnet_sw_interface_t * si, void *data)
2998 {
2999   vl_api_proxy_arp_intfc_details_t *mp;
3000   proxy_arp_walk_ctx_t *ctx;
3001
3002   if (!(si->flags & VNET_SW_INTERFACE_FLAG_PROXY_ARP))
3003     return (WALK_CONTINUE);
3004
3005   ctx = data;
3006
3007   mp = vl_msg_api_alloc (sizeof (*mp));
3008   clib_memset (mp, 0, sizeof (*mp));
3009   mp->_vl_msg_id = ntohs (VL_API_PROXY_ARP_INTFC_DETAILS);
3010   mp->context = ctx->context;
3011   mp->sw_if_index = htonl (si->sw_if_index);
3012
3013   vl_api_send_msg (ctx->reg, (u8 *) mp);
3014
3015   return (WALK_CONTINUE);
3016 }
3017
3018 static void
3019 vl_api_proxy_arp_intfc_dump_t_handler (vl_api_proxy_arp_intfc_dump_t * mp)
3020 {
3021   vl_api_registration_t *reg;
3022
3023   reg = vl_api_client_index_to_registration (mp->client_index);
3024   if (!reg)
3025     return;
3026
3027   proxy_arp_walk_ctx_t wctx = {
3028     .reg = reg,
3029     .context = mp->context,
3030   };
3031
3032   vnet_sw_interface_walk (vnet_get_main (),
3033                           send_proxy_arp_intfc_details, &wctx);
3034 }
3035
3036 static void
3037   vl_api_proxy_arp_intfc_enable_disable_t_handler
3038   (vl_api_proxy_arp_intfc_enable_disable_t * mp)
3039 {
3040   int rv = 0;
3041   vnet_main_t *vnm = vnet_get_main ();
3042   vl_api_proxy_arp_intfc_enable_disable_reply_t *rmp;
3043
3044   VALIDATE_SW_IF_INDEX (mp);
3045
3046   vnet_sw_interface_t *si =
3047     vnet_get_sw_interface (vnm, ntohl (mp->sw_if_index));
3048
3049   ASSERT (si);
3050
3051   if (mp->enable_disable)
3052     si->flags |= VNET_SW_INTERFACE_FLAG_PROXY_ARP;
3053   else
3054     si->flags &= ~VNET_SW_INTERFACE_FLAG_PROXY_ARP;
3055
3056   BAD_SW_IF_INDEX_LABEL;
3057
3058   REPLY_MACRO (VL_API_PROXY_ARP_INTFC_ENABLE_DISABLE_REPLY);
3059 }
3060
3061 static void
3062 vl_api_ip_probe_neighbor_t_handler (vl_api_ip_probe_neighbor_t * mp)
3063 {
3064   int rv = 0;
3065   vlib_main_t *vm = vlib_get_main ();
3066   vl_api_ip_probe_neighbor_reply_t *rmp;
3067   clib_error_t *error;
3068
3069   VALIDATE_SW_IF_INDEX (mp);
3070
3071   u32 sw_if_index = ntohl (mp->sw_if_index);
3072
3073   if (mp->is_ipv6)
3074     error = ip6_probe_neighbor (vm, (ip6_address_t *) mp->dst_address,
3075                                 sw_if_index, 0);
3076   else
3077     error = ip4_probe_neighbor (vm, (ip4_address_t *) mp->dst_address,
3078                                 sw_if_index, 0);
3079
3080   if (error)
3081     {
3082       clib_error_report (error);
3083       rv = clib_error_get_code (error);
3084     }
3085
3086   BAD_SW_IF_INDEX_LABEL;
3087
3088   REPLY_MACRO (VL_API_PROXY_ARP_INTFC_ENABLE_DISABLE_REPLY);
3089 }
3090
3091 static void
3092   vl_api_ip_scan_neighbor_enable_disable_t_handler
3093   (vl_api_ip_scan_neighbor_enable_disable_t * mp)
3094 {
3095   int rv = 0;
3096   vl_api_ip_scan_neighbor_enable_disable_reply_t *rmp;
3097   ip_neighbor_scan_arg_t arg;
3098
3099   arg.mode = mp->mode;
3100   arg.scan_interval = mp->scan_interval;
3101   arg.max_proc_time = mp->max_proc_time;
3102   arg.max_update = mp->max_update;
3103   arg.scan_int_delay = mp->scan_int_delay;
3104   arg.stale_threshold = mp->stale_threshold;
3105   ip_neighbor_scan_enable_disable (&arg);
3106
3107   REPLY_MACRO (VL_API_IP_SCAN_NEIGHBOR_ENABLE_DISABLE_REPLY);
3108 }
3109
3110 static int
3111 ip4_reset_fib_t_handler (vl_api_reset_fib_t * mp)
3112 {
3113   vnet_main_t *vnm = vnet_get_main ();
3114   vnet_interface_main_t *im = &vnm->interface_main;
3115   ip4_main_t *im4 = &ip4_main;
3116   static u32 *sw_if_indices_to_shut;
3117   fib_table_t *fib_table;
3118   ip4_fib_t *fib;
3119   u32 sw_if_index;
3120   int i;
3121   int rv = VNET_API_ERROR_NO_SUCH_FIB;
3122   u32 target_fib_id = ntohl (mp->vrf_id);
3123
3124   stats_dslock_with_hint (1 /* release hint */ , 8 /* tag */ );
3125
3126   /* *INDENT-OFF* */
3127   pool_foreach (fib_table, im4->fibs,
3128   ({
3129     vnet_sw_interface_t * si;
3130
3131     fib = pool_elt_at_index (im4->v4_fibs, fib_table->ft_index);
3132
3133     if (fib->table_id != target_fib_id)
3134       continue;
3135
3136     /* remove any mpls encap/decap labels */
3137     mpls_fib_reset_labels (fib->table_id);
3138
3139     /* remove any proxy arps in this fib */
3140     vnet_proxy_arp_fib_reset (fib->table_id);
3141
3142     /* Set the flow hash for this fib to the default */
3143     vnet_set_ip4_flow_hash (fib->table_id, IP_FLOW_HASH_DEFAULT);
3144
3145     vec_reset_length (sw_if_indices_to_shut);
3146
3147     /* Shut down interfaces in this FIB / clean out intfc routes */
3148     pool_foreach (si, im->sw_interfaces,
3149     ({
3150       u32 sw_if_index = si->sw_if_index;
3151
3152       if (sw_if_index < vec_len (im4->fib_index_by_sw_if_index)
3153           && (im4->fib_index_by_sw_if_index[si->sw_if_index] ==
3154               fib->index))
3155         vec_add1 (sw_if_indices_to_shut, si->sw_if_index);
3156     }));
3157
3158     for (i = 0; i < vec_len (sw_if_indices_to_shut); i++) {
3159       sw_if_index = sw_if_indices_to_shut[i];
3160
3161       u32 flags = vnet_sw_interface_get_flags (vnm, sw_if_index);
3162       flags &= ~(VNET_SW_INTERFACE_FLAG_ADMIN_UP);
3163       vnet_sw_interface_set_flags (vnm, sw_if_index, flags);
3164     }
3165
3166     fib_table_flush(fib->index, FIB_PROTOCOL_IP4, FIB_SOURCE_API);
3167
3168     rv = 0;
3169     break;
3170     })); /* pool_foreach (fib) */
3171     /* *INDENT-ON* */
3172
3173   stats_dsunlock ();
3174   return rv;
3175 }
3176
3177 static int
3178 ip6_reset_fib_t_handler (vl_api_reset_fib_t * mp)
3179 {
3180   vnet_main_t *vnm = vnet_get_main ();
3181   vnet_interface_main_t *im = &vnm->interface_main;
3182   ip6_main_t *im6 = &ip6_main;
3183   static u32 *sw_if_indices_to_shut;
3184   fib_table_t *fib_table;
3185   ip6_fib_t *fib;
3186   u32 sw_if_index;
3187   int i;
3188   int rv = VNET_API_ERROR_NO_SUCH_FIB;
3189   u32 target_fib_id = ntohl (mp->vrf_id);
3190
3191   stats_dslock_with_hint (1 /* release hint */ , 9 /* tag */ );
3192
3193   /* *INDENT-OFF* */
3194   pool_foreach (fib_table, im6->fibs,
3195   ({
3196     vnet_sw_interface_t * si;
3197
3198     fib = pool_elt_at_index (im6->v6_fibs, fib_table->ft_index);
3199
3200     if (fib->table_id != target_fib_id)
3201       continue;
3202
3203     vec_reset_length (sw_if_indices_to_shut);
3204
3205     /* Set the flow hash for this fib to the default */
3206     vnet_set_ip6_flow_hash (fib->table_id, IP_FLOW_HASH_DEFAULT);
3207
3208     /* Shut down interfaces in this FIB / clean out intfc routes */
3209     pool_foreach (si, im->sw_interfaces,
3210     ({
3211       if (im6->fib_index_by_sw_if_index[si->sw_if_index] ==
3212           fib->index)
3213         vec_add1 (sw_if_indices_to_shut, si->sw_if_index);
3214     }));
3215
3216     for (i = 0; i < vec_len (sw_if_indices_to_shut); i++) {
3217       sw_if_index = sw_if_indices_to_shut[i];
3218
3219       u32 flags = vnet_sw_interface_get_flags (vnm, sw_if_index);
3220       flags &= ~(VNET_SW_INTERFACE_FLAG_ADMIN_UP);
3221       vnet_sw_interface_set_flags (vnm, sw_if_index, flags);
3222     }
3223
3224     fib_table_flush(fib->index, FIB_PROTOCOL_IP6, FIB_SOURCE_API);
3225
3226     rv = 0;
3227     break;
3228   })); /* pool_foreach (fib) */
3229   /* *INDENT-ON* */
3230
3231   stats_dsunlock ();
3232   return rv;
3233 }
3234
3235 static void
3236 vl_api_reset_fib_t_handler (vl_api_reset_fib_t * mp)
3237 {
3238   int rv;
3239   vl_api_reset_fib_reply_t *rmp;
3240
3241   if (mp->is_ipv6)
3242     rv = ip6_reset_fib_t_handler (mp);
3243   else
3244     rv = ip4_reset_fib_t_handler (mp);
3245
3246   REPLY_MACRO (VL_API_RESET_FIB_REPLY);
3247 }
3248
3249 static void
3250 vl_api_set_arp_neighbor_limit_t_handler (vl_api_set_arp_neighbor_limit_t * mp)
3251 {
3252   int rv;
3253   vl_api_set_arp_neighbor_limit_reply_t *rmp;
3254   vnet_main_t *vnm = vnet_get_main ();
3255   clib_error_t *error;
3256
3257   vnm->api_errno = 0;
3258
3259   if (mp->is_ipv6)
3260     error = ip6_set_neighbor_limit (ntohl (mp->arp_neighbor_limit));
3261   else
3262     error = ip4_set_arp_limit (ntohl (mp->arp_neighbor_limit));
3263
3264   if (error)
3265     {
3266       clib_error_report (error);
3267       rv = VNET_API_ERROR_UNSPECIFIED;
3268     }
3269   else
3270     {
3271       rv = vnm->api_errno;
3272     }
3273
3274   REPLY_MACRO (VL_API_SET_ARP_NEIGHBOR_LIMIT_REPLY);
3275 }
3276
3277 void
3278 vl_api_ip_reassembly_set_t_handler (vl_api_ip_reassembly_set_t * mp)
3279 {
3280   vl_api_ip_reassembly_set_reply_t *rmp;
3281   int rv = 0;
3282   if (mp->is_ip6)
3283     {
3284       rv = ip6_reass_set (clib_net_to_host_u32 (mp->timeout_ms),
3285                           clib_net_to_host_u32 (mp->max_reassemblies),
3286                           clib_net_to_host_u32 (mp->expire_walk_interval_ms));
3287     }
3288   else
3289     {
3290       rv = ip4_reass_set (clib_net_to_host_u32 (mp->timeout_ms),
3291                           clib_net_to_host_u32 (mp->max_reassemblies),
3292                           clib_net_to_host_u32 (mp->expire_walk_interval_ms));
3293     }
3294
3295   REPLY_MACRO (VL_API_IP_REASSEMBLY_SET_REPLY);
3296 }
3297
3298 void
3299 vl_api_ip_reassembly_get_t_handler (vl_api_ip_reassembly_get_t * mp)
3300 {
3301   unix_shared_memory_queue_t *q;
3302
3303   q = vl_api_client_index_to_input_queue (mp->client_index);
3304
3305   if (q == 0)
3306     return;
3307
3308   vl_api_ip_reassembly_get_reply_t *rmp = vl_msg_api_alloc (sizeof (*rmp));
3309   clib_memset (rmp, 0, sizeof (*rmp));
3310   rmp->_vl_msg_id = ntohs (VL_API_IP_REASSEMBLY_GET_REPLY);
3311   rmp->context = mp->context;
3312   rmp->retval = 0;
3313   if (mp->is_ip6)
3314     {
3315       rmp->is_ip6 = 1;
3316       ip6_reass_get (&rmp->timeout_ms, &rmp->max_reassemblies,
3317                      &rmp->expire_walk_interval_ms);
3318     }
3319   else
3320     {
3321       rmp->is_ip6 = 0;
3322       ip4_reass_get (&rmp->timeout_ms, &rmp->max_reassemblies,
3323                      &rmp->expire_walk_interval_ms);
3324     }
3325   rmp->timeout_ms = clib_host_to_net_u32 (rmp->timeout_ms);
3326   rmp->max_reassemblies = clib_host_to_net_u32 (rmp->max_reassemblies);
3327   rmp->expire_walk_interval_ms =
3328     clib_host_to_net_u32 (rmp->expire_walk_interval_ms);
3329   vl_msg_api_send_shmem (q, (u8 *) & rmp);
3330 }
3331
3332 void
3333   vl_api_ip_reassembly_enable_disable_t_handler
3334   (vl_api_ip_reassembly_enable_disable_t * mp)
3335 {
3336   vl_api_ip_reassembly_enable_disable_reply_t *rmp;
3337   int rv = 0;
3338   rv = ip4_reass_enable_disable (clib_net_to_host_u32 (mp->sw_if_index),
3339                                  mp->enable_ip4);
3340   if (0 == rv)
3341     {
3342       rv = ip6_reass_enable_disable (clib_net_to_host_u32 (mp->sw_if_index),
3343                                      mp->enable_ip6);
3344     }
3345
3346   REPLY_MACRO (VL_API_IP_REASSEMBLY_ENABLE_DISABLE_REPLY);
3347 }
3348
3349 void
3350 send_ip_punt_redirect_details (vl_api_registration_t * reg,
3351                                u32 context, u32 sw_if_index,
3352                                ip_punt_redirect_rx_t * pr, u8 is_ipv6)
3353 {
3354   vl_api_ip_punt_redirect_details_t *mp;
3355
3356   mp = vl_msg_api_alloc (sizeof (*mp));
3357   if (!mp)
3358     return;
3359
3360   clib_memset (mp, 0, sizeof (*mp));
3361   mp->_vl_msg_id = ntohs (VL_API_IP_PUNT_REDIRECT_DETAILS);
3362   mp->context = context;
3363   mp->punt.rx_sw_if_index = htonl (sw_if_index);
3364   mp->punt.tx_sw_if_index = htonl (pr->tx_sw_if_index);
3365   if (is_ipv6)
3366     {
3367       ip_address_encode (&pr->nh, IP46_TYPE_IP6, &mp->punt.nh);
3368     }
3369   else
3370     {
3371       ip_address_encode (&pr->nh, IP46_TYPE_IP4, &mp->punt.nh);
3372     }
3373
3374   vl_api_send_msg (reg, (u8 *) mp);
3375 }
3376
3377 static void
3378 vl_api_ip_punt_redirect_dump_t_handler (vl_api_ip_punt_redirect_dump_t * mp)
3379 {
3380   vl_api_registration_t *reg;
3381   u32 sw_if_index;
3382   int rv __attribute__ ((unused)) = 0;
3383
3384   sw_if_index = ntohl (mp->sw_if_index);
3385   reg = vl_api_client_index_to_registration (mp->client_index);
3386   if (!reg)
3387     return;
3388
3389   if (~0 != sw_if_index)
3390     VALIDATE_SW_IF_INDEX (mp);
3391
3392   ip_punt_redirect_detail_t *pr, *prs;
3393   if (mp->is_ipv6)
3394     {
3395       prs = ip6_punt_redirect_entries (sw_if_index);
3396       /* *INDENT-OFF* */
3397       vec_foreach (pr, prs)
3398       {
3399         send_ip_punt_redirect_details (reg, mp->context, pr->rx_sw_if_index, &pr->punt_redirect, 1);
3400       }
3401       /* *INDENT-ON* */
3402       vec_free (prs);
3403     }
3404   else
3405     {
3406       prs = ip4_punt_redirect_entries (sw_if_index);
3407       /* *INDENT-OFF* */
3408       vec_foreach (pr, prs)
3409       {
3410         send_ip_punt_redirect_details (reg, mp->context, pr->rx_sw_if_index, &pr->punt_redirect, 0);
3411       }
3412       /* *INDENT-ON* */
3413       vec_free (prs);
3414     }
3415
3416   BAD_SW_IF_INDEX_LABEL;
3417 }
3418
3419 #define vl_msg_name_crc_list
3420 #include <vnet/ip/ip.api.h>
3421 #undef vl_msg_name_crc_list
3422
3423 static void
3424 setup_message_id_table (api_main_t * am)
3425 {
3426 #define _(id,n,crc) vl_msg_api_add_msg_name_crc (am, #n "_" #crc, id);
3427   foreach_vl_msg_name_crc_ip;
3428 #undef _
3429 }
3430
3431 static clib_error_t *
3432 ip_api_hookup (vlib_main_t * vm)
3433 {
3434   api_main_t *am = &api_main;
3435
3436 #define _(N,n)                                                  \
3437     vl_msg_api_set_handlers(VL_API_##N, #n,                     \
3438                            vl_api_##n##_t_handler,              \
3439                            vl_noop_handler,                     \
3440                            vl_api_##n##_t_endian,               \
3441                            vl_api_##n##_t_print,                \
3442                            sizeof(vl_api_##n##_t), 1);
3443   foreach_ip_api_msg;
3444 #undef _
3445
3446   /*
3447    * Mark the route add/del API as MP safe
3448    */
3449   am->is_mp_safe[VL_API_IP_ADD_DEL_ROUTE] = 1;
3450   am->is_mp_safe[VL_API_IP_ADD_DEL_ROUTE_REPLY] = 1;
3451
3452   /*
3453    * Set up the (msg_name, crc, message-id) table
3454    */
3455   setup_message_id_table (am);
3456
3457   ra_set_publisher_node (wc_arp_process_node.index, RA_REPORT);
3458
3459   return 0;
3460 }
3461
3462 VLIB_API_INIT_FUNCTION (ip_api_hookup);
3463
3464 /*
3465  * fd.io coding-style-patch-verification: ON
3466  *
3467  * Local Variables:
3468  * eval: (c-set-style "gnu")
3469  * End:
3470  */