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/ip6_neighbor.h>
  28 #include <vnet/fib/fib_table.h>
  29 #include <vnet/fib/fib_api.h>
  30 #include <vnet/dpo/drop_dpo.h>
  31 #include <vnet/dpo/receive_dpo.h>
  32 #include <vnet/dpo/lookup_dpo.h>
  33 #include <vnet/dpo/classify_dpo.h>
  34 #include <vnet/dpo/ip_null_dpo.h>
  35 #include <vnet/ethernet/arp_packet.h>
  36 #include <vnet/mfib/ip6_mfib.h>
  37 #include <vnet/mfib/ip4_mfib.h>
  38 #include <vnet/mfib/mfib_signal.h>
  39 #include <vnet/mfib/mfib_entry.h>
  40
  41 #include <vnet/vnet_msg_enum.h>
  42
  43 #define vl_typedefs             /* define message structures */
  44 #include <vnet/vnet_all_api_h.h>
  45 #undef vl_typedefs
  46
  47 #define vl_endianfun            /* define message structures */
  48 #include <vnet/vnet_all_api_h.h>
  49 #undef vl_endianfun
  50
  51 /* instantiate all the print functions we know about */
  52 #define vl_print(handle, ...) vlib_cli_output (handle, __VA_ARGS__)
  53 #define vl_printfun
  54 #include <vnet/vnet_all_api_h.h>
  55 #undef vl_printfun
  56
  57 #include <vlibapi/api_helper_macros.h>
  58
  59
  60 #define foreach_ip_api_msg                                              \
  61 _(IP_FIB_DUMP, ip_fib_dump)                                             \
  62 _(IP6_FIB_DUMP, ip6_fib_dump)                                           \
  63 _(IP_MFIB_DUMP, ip_mfib_dump)                                           \
  64 _(IP6_MFIB_DUMP, ip6_mfib_dump)                                         \
  65 _(IP_NEIGHBOR_DUMP, ip_neighbor_dump)                                   \
  66 _(IP_MROUTE_ADD_DEL, ip_mroute_add_del)                                 \
  67 _(MFIB_SIGNAL_DUMP, mfib_signal_dump)                                   \
  68 _(IP_ADDRESS_DUMP, ip_address_dump)                                     \
  69 _(IP_DUMP, ip_dump)                                                     \
  70 _(IP_NEIGHBOR_ADD_DEL, ip_neighbor_add_del)                             \
  71 _(IP_ADD_DEL_ROUTE, ip_add_del_route)                                   \
  72 _(SET_IP_FLOW_HASH,set_ip_flow_hash)                                    \
  73 _(SW_INTERFACE_IP6ND_RA_CONFIG, sw_interface_ip6nd_ra_config)           \
  74 _(SW_INTERFACE_IP6ND_RA_PREFIX, sw_interface_ip6nd_ra_prefix)           \
  75 _(IP6ND_PROXY_ADD_DEL, ip6nd_proxy_add_del)                             \
  76 _(IP6ND_PROXY_DUMP, ip6nd_proxy_dump)                                   \
  77 _(SW_INTERFACE_IP6_ENABLE_DISABLE, sw_interface_ip6_enable_disable )    \
  78 _(SW_INTERFACE_IP6_SET_LINK_LOCAL_ADDRESS,                              \
  79   sw_interface_ip6_set_link_local_address)
  80
  81 extern void stats_dslock_with_hint (int hint, int tag);
  82 extern void stats_dsunlock (void);
  83
  84 static void
  85 send_ip_neighbor_details (u8 is_ipv6,
  86                           u8 is_static,
  87                           u8 * mac_address,
  88                           u8 * ip_address,
  89                           unix_shared_memory_queue_t * q, u32 context)
  90 {
  91   vl_api_ip_neighbor_details_t *mp;
  92
  93   mp = vl_msg_api_alloc (sizeof (*mp));
  94   memset (mp, 0, sizeof (*mp));
  95   mp->_vl_msg_id = ntohs (VL_API_IP_NEIGHBOR_DETAILS);
  96   mp->context = context;
  97   mp->is_ipv6 = is_ipv6;
  98   mp->is_static = is_static;
  99   memcpy (mp->mac_address, mac_address, 6);
 100   memcpy (mp->ip_address, ip_address, (is_ipv6) ? 16 : 4);
 101
 102   vl_msg_api_send_shmem (q, (u8 *) & mp);
 103 }
 104
 105 static void
 106 vl_api_ip_neighbor_dump_t_handler (vl_api_ip_neighbor_dump_t * mp)
 107 {
 108   unix_shared_memory_queue_t *q;
 109
 110   q = vl_api_client_index_to_input_queue (mp->client_index);
 111   if (q == 0)
 112     return;
 113
 114   u32 sw_if_index = ntohl (mp->sw_if_index);
 115
 116   if (mp->is_ipv6)
 117     {
 118       ip6_neighbor_t *n, *ns;
 119
 120       ns = ip6_neighbors_entries (sw_if_index);
 121       /* *INDENT-OFF* */
 122       vec_foreach (n, ns)
 123       {
 124         send_ip_neighbor_details
 125           (mp->is_ipv6, ((n->flags & IP6_NEIGHBOR_FLAG_STATIC) ? 1 : 0),
 126            (u8 *) n->link_layer_address,
 127            (u8 *) & (n->key.ip6_address.as_u8),
 128            q, mp->context);
 129       }
 130       /* *INDENT-ON* */
 131       vec_free (ns);
 132     }
 133   else
 134     {
 135       ethernet_arp_ip4_entry_t *n, *ns;
 136
 137       ns = ip4_neighbor_entries (sw_if_index);
 138       /* *INDENT-OFF* */
 139       vec_foreach (n, ns)
 140       {
 141         send_ip_neighbor_details (mp->is_ipv6,
 142           ((n->flags & ETHERNET_ARP_IP4_ENTRY_FLAG_STATIC) ? 1 : 0),
 143           (u8*) n->ethernet_address,
 144           (u8*) & (n->ip4_address.as_u8),
 145           q, mp->context);
 146       }
 147       /* *INDENT-ON* */
 148       vec_free (ns);
 149     }
 150 }
 151
 152
 153 void
 154 copy_fib_next_hop (fib_route_path_encode_t * api_rpath, void *fp_arg)
 155 {
 156   int is_ip4;
 157   vl_api_fib_path_t *fp = (vl_api_fib_path_t *) fp_arg;
 158
 159   if (api_rpath->rpath.frp_proto == FIB_PROTOCOL_IP4)
 160     fp->afi = IP46_TYPE_IP4;
 161   else if (api_rpath->rpath.frp_proto == FIB_PROTOCOL_IP6)
 162     fp->afi = IP46_TYPE_IP6;
 163   else
 164     {
 165       is_ip4 = ip46_address_is_ip4 (&api_rpath->rpath.frp_addr);
 166       if (is_ip4)
 167         fp->afi = IP46_TYPE_IP4;
 168       else
 169         fp->afi = IP46_TYPE_IP6;
 170     }
 171   if (fp->afi == IP46_TYPE_IP4)
 172     memcpy (fp->next_hop, &api_rpath->rpath.frp_addr.ip4,
 173             sizeof (api_rpath->rpath.frp_addr.ip4));
 174   else
 175     memcpy (fp->next_hop, &api_rpath->rpath.frp_addr.ip6,
 176             sizeof (api_rpath->rpath.frp_addr.ip6));
 177 }
 178
 179 static void
 180 send_ip_fib_details (vpe_api_main_t * am,
 181                      unix_shared_memory_queue_t * q,
 182                      u32 table_id, fib_prefix_t * pfx,
 183                      fib_route_path_encode_t * api_rpaths, u32 context)
 184 {
 185   vl_api_ip_fib_details_t *mp;
 186   fib_route_path_encode_t *api_rpath;
 187   vl_api_fib_path_t *fp;
 188   int path_count;
 189
 190   path_count = vec_len (api_rpaths);
 191   mp = vl_msg_api_alloc (sizeof (*mp) + path_count * sizeof (*fp));
 192   if (!mp)
 193     return;
 194   memset (mp, 0, sizeof (*mp));
 195   mp->_vl_msg_id = ntohs (VL_API_IP_FIB_DETAILS);
 196   mp->context = context;
 197
 198   mp->table_id = htonl (table_id);
 199   mp->address_length = pfx->fp_len;
 200   memcpy (mp->address, &pfx->fp_addr.ip4, sizeof (pfx->fp_addr.ip4));
 201
 202   mp->count = htonl (path_count);
 203   fp = mp->path;
 204   vec_foreach (api_rpath, api_rpaths)
 205   {
 206     memset (fp, 0, sizeof (*fp));
 207     switch (api_rpath->dpo.dpoi_type)
 208       {
 209       case DPO_RECEIVE:
 210         fp->is_local = true;
 211         break;
 212       case DPO_DROP:
 213         fp->is_drop = true;
 214         break;
 215       case DPO_IP_NULL:
 216         switch (api_rpath->dpo.dpoi_index)
 217           {
 218           case IP_NULL_ACTION_NONE:
 219             fp->is_drop = true;
 220             break;
 221           case IP_NULL_ACTION_SEND_ICMP_UNREACH:
 222             fp->is_unreach = true;
 223             break;
 224           case IP_NULL_ACTION_SEND_ICMP_PROHIBIT:
 225             fp->is_prohibit = true;
 226             break;
 227           default:
 228             break;
 229           }
 230         break;
 231       default:
 232         break;
 233       }
 234     fp->weight = htonl (api_rpath->rpath.frp_weight);
 235     fp->sw_if_index = htonl (api_rpath->rpath.frp_sw_if_index);
 236     copy_fib_next_hop (api_rpath, fp);
 237     fp++;
 238   }
 239
 240   vl_msg_api_send_shmem (q, (u8 *) & mp);
 241 }
 242
 243 static void
 244 vl_api_ip_fib_dump_t_handler (vl_api_ip_fib_dump_t * mp)
 245 {
 246   vpe_api_main_t *am = &vpe_api_main;
 247   unix_shared_memory_queue_t *q;
 248   ip4_main_t *im = &ip4_main;
 249   fib_table_t *fib_table;
 250   fib_node_index_t lfei, *lfeip, *lfeis = NULL;
 251   mpls_label_t key;
 252   fib_prefix_t pfx;
 253   u32 fib_index;
 254   fib_route_path_encode_t *api_rpaths;
 255   int i;
 256
 257   q = vl_api_client_index_to_input_queue (mp->client_index);
 258   if (q == 0)
 259     return;
 260
 261   /* *INDENT-OFF* */
 262   pool_foreach (fib_table, im->fibs,
 263   ({
 264     for (i = 0; i < ARRAY_LEN (fib_table->v4.fib_entry_by_dst_address); i++)
 265       {
 266         hash_foreach(key, lfei, fib_table->v4.fib_entry_by_dst_address[i],
 267         ({
 268           vec_add1(lfeis, lfei);
 269         }));
 270       }
 271   }));
 272   /* *INDENT-ON* */
 273
 274   vec_sort_with_function (lfeis, fib_entry_cmp_for_sort);
 275
 276   vec_foreach (lfeip, lfeis)
 277   {
 278     fib_entry_get_prefix (*lfeip, &pfx);
 279     fib_index = fib_entry_get_fib_index (*lfeip);
 280     fib_table = fib_table_get (fib_index, pfx.fp_proto);
 281     api_rpaths = NULL;
 282     fib_entry_encode (*lfeip, &api_rpaths);
 283     send_ip_fib_details (am, q,
 284                          fib_table->ft_table_id, &pfx, api_rpaths,
 285                          mp->context);
 286     vec_free (api_rpaths);
 287   }
 288
 289   vec_free (lfeis);
 290 }
 291
 292 static void
 293 send_ip6_fib_details (vpe_api_main_t * am,
 294                       unix_shared_memory_queue_t * q,
 295                       u32 table_id, fib_prefix_t * pfx,
 296                       fib_route_path_encode_t * api_rpaths, u32 context)
 297 {
 298   vl_api_ip6_fib_details_t *mp;
 299   fib_route_path_encode_t *api_rpath;
 300   vl_api_fib_path_t *fp;
 301   int path_count;
 302
 303   path_count = vec_len (api_rpaths);
 304   mp = vl_msg_api_alloc (sizeof (*mp) + path_count * sizeof (*fp));
 305   if (!mp)
 306     return;
 307   memset (mp, 0, sizeof (*mp));
 308   mp->_vl_msg_id = ntohs (VL_API_IP6_FIB_DETAILS);
 309   mp->context = context;
 310
 311   mp->table_id = htonl (table_id);
 312   mp->address_length = pfx->fp_len;
 313   memcpy (mp->address, &pfx->fp_addr.ip6, sizeof (pfx->fp_addr.ip6));
 314
 315   mp->count = htonl (path_count);
 316   fp = mp->path;
 317   vec_foreach (api_rpath, api_rpaths)
 318   {
 319     memset (fp, 0, sizeof (*fp));
 320     switch (api_rpath->dpo.dpoi_type)
 321       {
 322       case DPO_RECEIVE:
 323         fp->is_local = true;
 324         break;
 325       case DPO_DROP:
 326         fp->is_drop = true;
 327         break;
 328       case DPO_IP_NULL:
 329         switch (api_rpath->dpo.dpoi_index)
 330           {
 331           case IP_NULL_DPO_ACTION_NUM + IP_NULL_ACTION_NONE:
 332             fp->is_drop = true;
 333             break;
 334           case IP_NULL_DPO_ACTION_NUM + IP_NULL_ACTION_SEND_ICMP_UNREACH:
 335             fp->is_unreach = true;
 336             break;
 337           case IP_NULL_DPO_ACTION_NUM + IP_NULL_ACTION_SEND_ICMP_PROHIBIT:
 338             fp->is_prohibit = true;
 339             break;
 340           default:
 341             break;
 342           }
 343         break;
 344       default:
 345         break;
 346       }
 347     fp->weight = htonl (api_rpath->rpath.frp_weight);
 348     fp->sw_if_index = htonl (api_rpath->rpath.frp_sw_if_index);
 349     copy_fib_next_hop (api_rpath, fp);
 350     fp++;
 351   }
 352
 353   vl_msg_api_send_shmem (q, (u8 *) & mp);
 354 }
 355
 356 typedef struct apt_ip6_fib_show_ctx_t_
 357 {
 358   u32 fib_index;
 359   fib_node_index_t *entries;
 360 } api_ip6_fib_show_ctx_t;
 361
 362 static void
 363 api_ip6_fib_table_put_entries (clib_bihash_kv_24_8_t * kvp, void *arg)
 364 {
 365   api_ip6_fib_show_ctx_t *ctx = arg;
 366
 367   if ((kvp->key[2] >> 32) == ctx->fib_index)
 368     {
 369       vec_add1 (ctx->entries, kvp->value);
 370     }
 371 }
 372
 373 static void
 374 api_ip6_fib_table_get_all (unix_shared_memory_queue_t * q,
 375                            vl_api_ip6_fib_dump_t * mp,
 376                            fib_table_t * fib_table)
 377 {
 378   vpe_api_main_t *am = &vpe_api_main;
 379   ip6_main_t *im6 = &ip6_main;
 380   ip6_fib_t *fib = &fib_table->v6;
 381   fib_node_index_t *fib_entry_index;
 382   api_ip6_fib_show_ctx_t ctx = {
 383     .fib_index = fib->index,.entries = NULL,
 384   };
 385   fib_route_path_encode_t *api_rpaths;
 386   fib_prefix_t pfx;
 387
 388   BV (clib_bihash_foreach_key_value_pair)
 389     ((BVT (clib_bihash) *) & im6->ip6_table[IP6_FIB_TABLE_NON_FWDING].
 390      ip6_hash, api_ip6_fib_table_put_entries, &ctx);
 391
 392   vec_sort_with_function (ctx.entries, fib_entry_cmp_for_sort);
 393
 394   vec_foreach (fib_entry_index, ctx.entries)
 395   {
 396     fib_entry_get_prefix (*fib_entry_index, &pfx);
 397     api_rpaths = NULL;
 398     fib_entry_encode (*fib_entry_index, &api_rpaths);
 399     send_ip6_fib_details (am, q,
 400                           fib_table->ft_table_id,
 401                           &pfx, api_rpaths, mp->context);
 402     vec_free (api_rpaths);
 403   }
 404
 405   vec_free (ctx.entries);
 406 }
 407
 408 static void
 409 vl_api_ip6_fib_dump_t_handler (vl_api_ip6_fib_dump_t * mp)
 410 {
 411   unix_shared_memory_queue_t *q;
 412   ip6_main_t *im6 = &ip6_main;
 413   fib_table_t *fib_table;
 414
 415   q = vl_api_client_index_to_input_queue (mp->client_index);
 416   if (q == 0)
 417     return;
 418
 419   /* *INDENT-OFF* */
 420   pool_foreach (fib_table, im6->fibs,
 421   ({
 422     api_ip6_fib_table_get_all(q, mp, fib_table);
 423   }));
 424   /* *INDENT-ON* */
 425 }
 426
 427 static void
 428 send_ip_mfib_details (vpe_api_main_t * am,
 429                       unix_shared_memory_queue_t * q,
 430                       u32 table_id,
 431                       mfib_prefix_t * pfx,
 432                       fib_route_path_encode_t * api_rpaths, u32 context)
 433 {
 434   vl_api_ip_mfib_details_t *mp;
 435   fib_route_path_encode_t *api_rpath;
 436   vl_api_fib_path_t *fp;
 437   int path_count;
 438
 439   path_count = vec_len (api_rpaths);
 440   mp = vl_msg_api_alloc (sizeof (*mp) + path_count * sizeof (*fp));
 441   if (!mp)
 442     return;
 443   memset (mp, 0, sizeof (*mp));
 444   mp->_vl_msg_id = ntohs (VL_API_IP_FIB_DETAILS);
 445   mp->context = context;
 446
 447   mp->table_id = htonl (table_id);
 448   mp->address_length = pfx->fp_len;
 449   memcpy (mp->grp_address, &pfx->fp_grp_addr.ip4,
 450           sizeof (pfx->fp_grp_addr.ip4));
 451   memcpy (mp->src_address, &pfx->fp_src_addr.ip4,
 452           sizeof (pfx->fp_src_addr.ip4));
 453
 454   mp->count = htonl (path_count);
 455   fp = mp->path;
 456   vec_foreach (api_rpath, api_rpaths)
 457   {
 458     memset (fp, 0, sizeof (*fp));
 459
 460     fp->weight = 0;
 461     fp->sw_if_index = htonl (api_rpath->rpath.frp_sw_if_index);
 462     copy_fib_next_hop (api_rpath, fp);
 463     fp++;
 464   }
 465
 466   vl_msg_api_send_shmem (q, (u8 *) & mp);
 467 }
 468
 469 typedef struct vl_api_ip_mfib_dump_ctc_t_
 470 {
 471   fib_node_index_t *entries;
 472 } vl_api_ip_mfib_dump_ctc_t;
 473
 474 static int
 475 vl_api_ip_mfib_table_dump_walk (fib_node_index_t fei, void *arg)
 476 {
 477   vl_api_ip_mfib_dump_ctc_t *ctx = arg;
 478
 479   vec_add1 (ctx->entries, fei);
 480
 481   return (0);
 482 }
 483
 484 static void
 485 vl_api_ip_mfib_dump_t_handler (vl_api_ip_mfib_dump_t * mp)
 486 {
 487   vpe_api_main_t *am = &vpe_api_main;
 488   unix_shared_memory_queue_t *q;
 489   ip4_main_t *im = &ip4_main;
 490   mfib_table_t *mfib_table;
 491   fib_node_index_t *mfeip;
 492   mfib_prefix_t pfx;
 493   fib_route_path_encode_t *api_rpaths = NULL;
 494   vl_api_ip_mfib_dump_ctc_t ctx = {
 495     .entries = NULL,
 496   };
 497
 498   q = vl_api_client_index_to_input_queue (mp->client_index);
 499   if (q == 0)
 500     return;
 501
 502
 503   /* *INDENT-OFF* */
 504   pool_foreach (mfib_table, im->mfibs,
 505   ({
 506     ip4_mfib_table_walk(&mfib_table->v4,
 507                         vl_api_ip_mfib_table_dump_walk,
 508                         &ctx);
 509
 510     vec_sort_with_function (ctx.entries, mfib_entry_cmp_for_sort);
 511
 512     vec_foreach (mfeip, ctx.entries)
 513     {
 514       mfib_entry_get_prefix (*mfeip, &pfx);
 515       mfib_entry_encode (*mfeip, &api_rpaths);
 516       send_ip_mfib_details (am, q,
 517                             mfib_table->mft_table_id,
 518                             &pfx, api_rpaths,
 519                             mp->context);
 520     }
 521     vec_reset_length (api_rpaths);
 522     vec_reset_length (ctx.entries);
 523
 524   }));
 525   /* *INDENT-ON* */
 526
 527   vec_free (ctx.entries);
 528   vec_free (api_rpaths);
 529 }
 530
 531 static void
 532 send_ip6_mfib_details (vpe_api_main_t * am,
 533                        unix_shared_memory_queue_t * q,
 534                        u32 table_id,
 535                        mfib_prefix_t * pfx,
 536                        fib_route_path_encode_t * api_rpaths, u32 context)
 537 {
 538   vl_api_ip6_mfib_details_t *mp;
 539   fib_route_path_encode_t *api_rpath;
 540   vl_api_fib_path_t *fp;
 541   int path_count;
 542
 543   path_count = vec_len (api_rpaths);
 544   mp = vl_msg_api_alloc (sizeof (*mp) + path_count * sizeof (*fp));
 545   if (!mp)
 546     return;
 547   memset (mp, 0, sizeof (*mp));
 548   mp->_vl_msg_id = ntohs (VL_API_IP6_FIB_DETAILS);
 549   mp->context = context;
 550
 551   mp->table_id = htonl (table_id);
 552   mp->address_length = pfx->fp_len;
 553   memcpy (mp->grp_address, &pfx->fp_grp_addr.ip6,
 554           sizeof (pfx->fp_grp_addr.ip6));
 555   memcpy (mp->src_address, &pfx->fp_src_addr.ip6,
 556           sizeof (pfx->fp_src_addr.ip6));
 557
 558   mp->count = htonl (path_count);
 559   fp = mp->path;
 560   vec_foreach (api_rpath, api_rpaths)
 561   {
 562     memset (fp, 0, sizeof (*fp));
 563
 564     fp->weight = 0;
 565     fp->sw_if_index = htonl (api_rpath->rpath.frp_sw_if_index);
 566     copy_fib_next_hop (api_rpath, fp);
 567     fp++;
 568   }
 569
 570   vl_msg_api_send_shmem (q, (u8 *) & mp);
 571 }
 572
 573 typedef struct vl_api_ip6_mfib_dump_ctc_t_
 574 {
 575   fib_node_index_t *entries;
 576 } vl_api_ip6_mfib_dump_ctc_t;
 577
 578 static int
 579 vl_api_ip6_mfib_table_dump_walk (fib_node_index_t fei, void *arg)
 580 {
 581   vl_api_ip6_mfib_dump_ctc_t *ctx = arg;
 582
 583   vec_add1 (ctx->entries, fei);
 584
 585   return (0);
 586 }
 587
 588 static void
 589 vl_api_ip6_mfib_dump_t_handler (vl_api_ip6_mfib_dump_t * mp)
 590 {
 591   vpe_api_main_t *am = &vpe_api_main;
 592   unix_shared_memory_queue_t *q;
 593   ip6_main_t *im = &ip6_main;
 594   mfib_table_t *mfib_table;
 595   fib_node_index_t *mfeip;
 596   mfib_prefix_t pfx;
 597   fib_route_path_encode_t *api_rpaths = NULL;
 598   vl_api_ip6_mfib_dump_ctc_t ctx = {
 599     .entries = NULL,
 600   };
 601
 602   q = vl_api_client_index_to_input_queue (mp->client_index);
 603   if (q == 0)
 604     return;
 605
 606
 607   /* *INDENT-OFF* */
 608   pool_foreach (mfib_table, im->mfibs,
 609   ({
 610     ip6_mfib_table_walk(&mfib_table->v6,
 611                         vl_api_ip6_mfib_table_dump_walk,
 612                         &ctx);
 613
 614     vec_sort_with_function (ctx.entries, mfib_entry_cmp_for_sort);
 615
 616     vec_foreach(mfeip, ctx.entries)
 617     {
 618       mfib_entry_get_prefix (*mfeip, &pfx);
 619       mfib_entry_encode (*mfeip, &api_rpaths);
 620       send_ip6_mfib_details (am, q,
 621                              mfib_table->mft_table_id,
 622                              &pfx, api_rpaths,
 623                              mp->context);
 624     }
 625     vec_reset_length (api_rpaths);
 626     vec_reset_length (ctx.entries);
 627
 628   }));
 629   /* *INDENT-ON* */
 630
 631   vec_free (ctx.entries);
 632   vec_free (api_rpaths);
 633 }
 634
 635 static void
 636 vl_api_ip_neighbor_add_del_t_handler (vl_api_ip_neighbor_add_del_t * mp,
 637                                       vlib_main_t * vm)
 638 {
 639   vl_api_ip_neighbor_add_del_reply_t *rmp;
 640   vnet_main_t *vnm = vnet_get_main ();
 641   int rv = 0;
 642
 643   VALIDATE_SW_IF_INDEX (mp);
 644
 645   stats_dslock_with_hint (1 /* release hint */ , 7 /* tag */ );
 646
 647   /*
 648    * there's no validation here of the ND/ARP entry being added.
 649    * The expectation is that the FIB will ensure that nothing bad
 650    * will come of adding bogus entries.
 651    */
 652   if (mp->is_ipv6)
 653     {
 654       if (mp->is_add)
 655         rv = vnet_set_ip6_ethernet_neighbor
 656           (vm, ntohl (mp->sw_if_index),
 657            (ip6_address_t *) (mp->dst_address),
 658            mp->mac_address, sizeof (mp->mac_address), mp->is_static);
 659       else
 660         rv = vnet_unset_ip6_ethernet_neighbor
 661           (vm, ntohl (mp->sw_if_index),
 662            (ip6_address_t *) (mp->dst_address),
 663            mp->mac_address, sizeof (mp->mac_address));
 664     }
 665   else
 666     {
 667       ethernet_arp_ip4_over_ethernet_address_t a;
 668
 669       clib_memcpy (&a.ethernet, mp->mac_address, 6);
 670       clib_memcpy (&a.ip4, mp->dst_address, 4);
 671
 672       if (mp->is_add)
 673         rv = vnet_arp_set_ip4_over_ethernet (vnm, ntohl (mp->sw_if_index),
 674                                              &a, mp->is_static);
 675       else
 676         rv =
 677           vnet_arp_unset_ip4_over_ethernet (vnm, ntohl (mp->sw_if_index), &a);
 678     }
 679
 680   BAD_SW_IF_INDEX_LABEL;
 681
 682   stats_dsunlock ();
 683   REPLY_MACRO (VL_API_IP_NEIGHBOR_ADD_DEL_REPLY);
 684 }
 685
 686 int
 687 add_del_route_t_handler (u8 is_multipath,
 688                          u8 is_add,
 689                          u8 is_drop,
 690                          u8 is_unreach,
 691                          u8 is_prohibit,
 692                          u8 is_local,
 693                          u8 is_classify,
 694                          u32 classify_table_index,
 695                          u8 is_resolve_host,
 696                          u8 is_resolve_attached,
 697                          u32 fib_index,
 698                          const fib_prefix_t * prefix,
 699                          u8 next_hop_proto_is_ip4,
 700                          const ip46_address_t * next_hop,
 701                          u32 next_hop_sw_if_index,
 702                          u8 next_hop_fib_index,
 703                          u32 next_hop_weight,
 704                          mpls_label_t next_hop_via_label,
 705                          mpls_label_t * next_hop_out_label_stack)
 706 {
 707   vnet_classify_main_t *cm = &vnet_classify_main;
 708   fib_route_path_flags_t path_flags = FIB_ROUTE_PATH_FLAG_NONE;
 709   fib_route_path_t path = {
 710     .frp_proto = (next_hop_proto_is_ip4 ?
 711                   FIB_PROTOCOL_IP4 : FIB_PROTOCOL_IP6),
 712     .frp_addr = (NULL == next_hop ? zero_addr : *next_hop),
 713     .frp_sw_if_index = next_hop_sw_if_index,
 714     .frp_fib_index = next_hop_fib_index,
 715     .frp_weight = next_hop_weight,
 716     .frp_label_stack = next_hop_out_label_stack,
 717   };
 718   fib_route_path_t *paths = NULL;
 719
 720   if (MPLS_LABEL_INVALID != next_hop_via_label)
 721     {
 722       path.frp_proto = FIB_PROTOCOL_MPLS;
 723       path.frp_local_label = next_hop_via_label;
 724     }
 725   if (is_resolve_host)
 726     path_flags |= FIB_ROUTE_PATH_RESOLVE_VIA_HOST;
 727   if (is_resolve_attached)
 728     path_flags |= FIB_ROUTE_PATH_RESOLVE_VIA_ATTACHED;
 729
 730   path.frp_flags = path_flags;
 731
 732   if (is_multipath)
 733     {
 734       stats_dslock_with_hint (1 /* release hint */ , 10 /* tag */ );
 735
 736
 737       vec_add1 (paths, path);
 738
 739       if (is_add)
 740         fib_table_entry_path_add2 (fib_index,
 741                                    prefix,
 742                                    FIB_SOURCE_API,
 743                                    FIB_ENTRY_FLAG_NONE, paths);
 744       else
 745         fib_table_entry_path_remove2 (fib_index,
 746                                       prefix, FIB_SOURCE_API, paths);
 747
 748       vec_free (paths);
 749       stats_dsunlock ();
 750       return 0;
 751     }
 752
 753   stats_dslock_with_hint (1 /* release hint */ , 2 /* tag */ );
 754
 755   if (is_drop || is_local || is_classify || is_unreach || is_prohibit)
 756     {
 757       /*
 758        * special route types that link directly to the adj
 759        */
 760       if (is_add)
 761         {
 762           dpo_id_t dpo = DPO_INVALID;
 763           dpo_proto_t dproto;
 764
 765           dproto = fib_proto_to_dpo (prefix->fp_proto);
 766
 767           if (is_drop)
 768             ip_null_dpo_add_and_lock (dproto, IP_NULL_ACTION_NONE, &dpo);
 769           else if (is_local)
 770             receive_dpo_add_or_lock (dproto, ~0, NULL, &dpo);
 771           else if (is_unreach)
 772             ip_null_dpo_add_and_lock (dproto,
 773                                       IP_NULL_ACTION_SEND_ICMP_UNREACH, &dpo);
 774           else if (is_prohibit)
 775             ip_null_dpo_add_and_lock (dproto,
 776                                       IP_NULL_ACTION_SEND_ICMP_PROHIBIT,
 777                                       &dpo);
 778           else if (is_classify)
 779             {
 780               if (pool_is_free_index (cm->tables,
 781                                       ntohl (classify_table_index)))
 782                 {
 783                   stats_dsunlock ();
 784                   return VNET_API_ERROR_NO_SUCH_TABLE;
 785                 }
 786
 787               dpo_set (&dpo, DPO_CLASSIFY, dproto,
 788                        classify_dpo_create (dproto,
 789                                             ntohl (classify_table_index)));
 790             }
 791           else
 792             {
 793               stats_dsunlock ();
 794               return VNET_API_ERROR_NO_SUCH_TABLE;
 795             }
 796
 797           fib_table_entry_special_dpo_update (fib_index,
 798                                               prefix,
 799                                               FIB_SOURCE_API,
 800                                               FIB_ENTRY_FLAG_EXCLUSIVE, &dpo);
 801           dpo_reset (&dpo);
 802         }
 803       else
 804         {
 805           fib_table_entry_special_remove (fib_index, prefix, FIB_SOURCE_API);
 806         }
 807     }
 808   else
 809     {
 810       if (is_add)
 811         {
 812           vec_add1 (paths, path);
 813           fib_table_entry_update (fib_index,
 814                                   prefix,
 815                                   FIB_SOURCE_API, FIB_ENTRY_FLAG_NONE, paths);
 816           vec_free (paths);
 817         }
 818       else
 819         {
 820           fib_table_entry_delete (fib_index, prefix, FIB_SOURCE_API);
 821         }
 822     }
 823
 824   stats_dsunlock ();
 825   return (0);
 826 }
 827
 828 int
 829 add_del_route_check (fib_protocol_t table_proto,
 830                      u32 table_id,
 831                      u32 next_hop_sw_if_index,
 832                      fib_protocol_t next_hop_table_proto,
 833                      u32 next_hop_table_id,
 834                      u8 create_missing_tables,
 835                      u32 * fib_index, u32 * next_hop_fib_index)
 836 {
 837   vnet_main_t *vnm = vnet_get_main ();
 838
 839   *fib_index = fib_table_find (table_proto, ntohl (table_id));
 840   if (~0 == *fib_index)
 841     {
 842       if (create_missing_tables)
 843         {
 844           *fib_index = fib_table_find_or_create_and_lock (table_proto,
 845                                                           ntohl (table_id));
 846         }
 847       else
 848         {
 849           /* No such VRF, and we weren't asked to create one */
 850           return VNET_API_ERROR_NO_SUCH_FIB;
 851         }
 852     }
 853
 854   if (~0 != ntohl (next_hop_sw_if_index))
 855     {
 856       if (pool_is_free_index (vnm->interface_main.sw_interfaces,
 857                               ntohl (next_hop_sw_if_index)))
 858         {
 859           return VNET_API_ERROR_NO_MATCHING_INTERFACE;
 860         }
 861     }
 862   else
 863     {
 864       *next_hop_fib_index = fib_table_find (next_hop_table_proto,
 865                                             ntohl (next_hop_table_id));
 866
 867       if (~0 == *next_hop_fib_index)
 868         {
 869           if (create_missing_tables)
 870             {
 871               *next_hop_fib_index =
 872                 fib_table_find_or_create_and_lock (next_hop_table_proto,
 873                                                    ntohl (next_hop_table_id));
 874             }
 875           else
 876             {
 877               /* No such VRF, and we weren't asked to create one */
 878               return VNET_API_ERROR_NO_SUCH_FIB;
 879             }
 880         }
 881     }
 882
 883   return (0);
 884 }
 885
 886 static int
 887 ip4_add_del_route_t_handler (vl_api_ip_add_del_route_t * mp)
 888 {
 889   u32 fib_index, next_hop_fib_index;
 890   mpls_label_t *label_stack = NULL;
 891   int rv, ii, n_labels;;
 892
 893   rv = add_del_route_check (FIB_PROTOCOL_IP4,
 894                             mp->table_id,
 895                             mp->next_hop_sw_if_index,
 896                             FIB_PROTOCOL_IP4,
 897                             mp->next_hop_table_id,
 898                             mp->create_vrf_if_needed,
 899                             &fib_index, &next_hop_fib_index);
 900
 901   if (0 != rv)
 902     return (rv);
 903
 904   fib_prefix_t pfx = {
 905     .fp_len = mp->dst_address_length,
 906     .fp_proto = FIB_PROTOCOL_IP4,
 907   };
 908   clib_memcpy (&pfx.fp_addr.ip4, mp->dst_address, sizeof (pfx.fp_addr.ip4));
 909
 910   ip46_address_t nh;
 911   memset (&nh, 0, sizeof (nh));
 912   memcpy (&nh.ip4, mp->next_hop_address, sizeof (nh.ip4));
 913
 914   n_labels = mp->next_hop_n_out_labels;
 915   if (n_labels == 0)
 916     ;
 917   else if (1 == n_labels)
 918     vec_add1 (label_stack, ntohl (mp->next_hop_out_label_stack[0]));
 919   else
 920     {
 921       vec_validate (label_stack, n_labels - 1);
 922       for (ii = 0; ii < n_labels; ii++)
 923         label_stack[ii] = ntohl (mp->next_hop_out_label_stack[ii]);
 924     }
 925
 926   return (add_del_route_t_handler (mp->is_multipath,
 927                                    mp->is_add,
 928                                    mp->is_drop,
 929                                    mp->is_unreach,
 930                                    mp->is_prohibit,
 931                                    mp->is_local,
 932                                    mp->is_classify,
 933                                    mp->classify_table_index,
 934                                    mp->is_resolve_host,
 935                                    mp->is_resolve_attached,
 936                                    fib_index, &pfx, 1,
 937                                    &nh,
 938                                    ntohl (mp->next_hop_sw_if_index),
 939                                    next_hop_fib_index,
 940                                    mp->next_hop_weight,
 941                                    ntohl (mp->next_hop_via_label),
 942                                    label_stack));
 943 }
 944
 945 static int
 946 ip6_add_del_route_t_handler (vl_api_ip_add_del_route_t * mp)
 947 {
 948   u32 fib_index, next_hop_fib_index;
 949   mpls_label_t *label_stack = NULL;
 950   int rv, ii, n_labels;;
 951
 952   rv = add_del_route_check (FIB_PROTOCOL_IP6,
 953                             mp->table_id,
 954                             mp->next_hop_sw_if_index,
 955                             FIB_PROTOCOL_IP6,
 956                             mp->next_hop_table_id,
 957                             mp->create_vrf_if_needed,
 958                             &fib_index, &next_hop_fib_index);
 959
 960   if (0 != rv)
 961     return (rv);
 962
 963   fib_prefix_t pfx = {
 964     .fp_len = mp->dst_address_length,
 965     .fp_proto = FIB_PROTOCOL_IP6,
 966   };
 967   clib_memcpy (&pfx.fp_addr.ip6, mp->dst_address, sizeof (pfx.fp_addr.ip6));
 968
 969   ip46_address_t nh;
 970   memset (&nh, 0, sizeof (nh));
 971   memcpy (&nh.ip6, mp->next_hop_address, sizeof (nh.ip6));
 972
 973   n_labels = mp->next_hop_n_out_labels;
 974   if (n_labels == 0)
 975     ;
 976   else if (1 == n_labels)
 977     vec_add1 (label_stack, ntohl (mp->next_hop_out_label_stack[0]));
 978   else
 979     {
 980       vec_validate (label_stack, n_labels - 1);
 981       for (ii = 0; ii < n_labels; ii++)
 982         label_stack[ii] = ntohl (mp->next_hop_out_label_stack[ii]);
 983     }
 984
 985   return (add_del_route_t_handler (mp->is_multipath,
 986                                    mp->is_add,
 987                                    mp->is_drop,
 988                                    mp->is_unreach,
 989                                    mp->is_prohibit,
 990                                    mp->is_local,
 991                                    mp->is_classify,
 992                                    mp->classify_table_index,
 993                                    mp->is_resolve_host,
 994                                    mp->is_resolve_attached,
 995                                    fib_index, &pfx, 0,
 996                                    &nh, ntohl (mp->next_hop_sw_if_index),
 997                                    next_hop_fib_index,
 998                                    mp->next_hop_weight,
 999                                    ntohl (mp->next_hop_via_label),
1000                                    label_stack));
1001 }
1002
1003 void
1004 vl_api_ip_add_del_route_t_handler (vl_api_ip_add_del_route_t * mp)
1005 {
1006   vl_api_ip_add_del_route_reply_t *rmp;
1007   int rv;
1008   vnet_main_t *vnm = vnet_get_main ();
1009
1010   vnm->api_errno = 0;
1011
1012   if (mp->is_ipv6)
1013     rv = ip6_add_del_route_t_handler (mp);
1014   else
1015     rv = ip4_add_del_route_t_handler (mp);
1016
1017   rv = (rv == 0) ? vnm->api_errno : rv;
1018
1019   REPLY_MACRO (VL_API_IP_ADD_DEL_ROUTE_REPLY);
1020 }
1021
1022 static int
1023 add_del_mroute_check (fib_protocol_t table_proto,
1024                       u32 table_id,
1025                       u32 next_hop_sw_if_index,
1026                       u8 is_local, u8 create_missing_tables, u32 * fib_index)
1027 {
1028   vnet_main_t *vnm = vnet_get_main ();
1029
1030   *fib_index = mfib_table_find (table_proto, ntohl (table_id));
1031   if (~0 == *fib_index)
1032     {
1033       if (create_missing_tables)
1034         {
1035           *fib_index = mfib_table_find_or_create_and_lock (table_proto,
1036                                                            ntohl (table_id));
1037         }
1038       else
1039         {
1040           /* No such VRF, and we weren't asked to create one */
1041           return VNET_API_ERROR_NO_SUCH_FIB;
1042         }
1043     }
1044
1045   if (~0 != ntohl (next_hop_sw_if_index))
1046     {
1047       if (pool_is_free_index (vnm->interface_main.sw_interfaces,
1048                               ntohl (next_hop_sw_if_index)))
1049         {
1050           return VNET_API_ERROR_NO_MATCHING_INTERFACE;
1051         }
1052     }
1053
1054   return (0);
1055 }
1056
1057 static int
1058 mroute_add_del_handler (u8 is_add,
1059                         u8 is_local,
1060                         u32 fib_index,
1061                         const mfib_prefix_t * prefix,
1062                         u32 entry_flags,
1063                         u32 next_hop_sw_if_index, u32 itf_flags)
1064 {
1065   stats_dslock_with_hint (1 /* release hint */ , 2 /* tag */ );
1066
1067   fib_route_path_t path = {
1068     .frp_sw_if_index = next_hop_sw_if_index,
1069     .frp_proto = prefix->fp_proto,
1070   };
1071
1072   if (is_local)
1073     path.frp_flags |= FIB_ROUTE_PATH_LOCAL;
1074
1075
1076   if (!is_local && ~0 == next_hop_sw_if_index)
1077     {
1078       mfib_table_entry_update (fib_index, prefix,
1079                                MFIB_SOURCE_API, entry_flags);
1080     }
1081   else
1082     {
1083       if (is_add)
1084         {
1085           mfib_table_entry_path_update (fib_index, prefix,
1086                                         MFIB_SOURCE_API, &path, itf_flags);
1087         }
1088       else
1089         {
1090           mfib_table_entry_path_remove (fib_index, prefix,
1091                                         MFIB_SOURCE_API, &path);
1092         }
1093     }
1094
1095   stats_dsunlock ();
1096   return (0);
1097 }
1098
1099 static int
1100 api_mroute_add_del_t_handler (vl_api_ip_mroute_add_del_t * mp)
1101 {
1102   fib_protocol_t fproto;
1103   u32 fib_index;
1104   int rv;
1105
1106   fproto = (mp->is_ipv6 ? FIB_PROTOCOL_IP6 : FIB_PROTOCOL_IP4);
1107   rv = add_del_mroute_check (fproto,
1108                              mp->table_id,
1109                              mp->next_hop_sw_if_index,
1110                              mp->is_local,
1111                              mp->create_vrf_if_needed, &fib_index);
1112
1113   if (0 != rv)
1114     return (rv);
1115
1116   mfib_prefix_t pfx = {
1117     .fp_len = ntohs (mp->grp_address_length),
1118     .fp_proto = fproto,
1119   };
1120
1121   if (FIB_PROTOCOL_IP4 == fproto)
1122     {
1123       clib_memcpy (&pfx.fp_grp_addr.ip4, mp->grp_address,
1124                    sizeof (pfx.fp_grp_addr.ip4));
1125       clib_memcpy (&pfx.fp_src_addr.ip4, mp->src_address,
1126                    sizeof (pfx.fp_src_addr.ip4));
1127     }
1128   else
1129     {
1130       clib_memcpy (&pfx.fp_grp_addr.ip6, mp->grp_address,
1131                    sizeof (pfx.fp_grp_addr.ip6));
1132       clib_memcpy (&pfx.fp_src_addr.ip6, mp->src_address,
1133                    sizeof (pfx.fp_src_addr.ip6));
1134     }
1135
1136   return (mroute_add_del_handler (mp->is_add,
1137                                   mp->is_local,
1138                                   fib_index, &pfx,
1139                                   ntohl (mp->entry_flags),
1140                                   ntohl (mp->next_hop_sw_if_index),
1141                                   ntohl (mp->itf_flags)));
1142 }
1143
1144 void
1145 vl_api_ip_mroute_add_del_t_handler (vl_api_ip_mroute_add_del_t * mp)
1146 {
1147   vl_api_ip_mroute_add_del_reply_t *rmp;
1148   int rv;
1149   vnet_main_t *vnm = vnet_get_main ();
1150
1151   vnm->api_errno = 0;
1152
1153   rv = api_mroute_add_del_t_handler (mp);
1154
1155   rv = (rv == 0) ? vnm->api_errno : rv;
1156
1157   REPLY_MACRO (VL_API_IP_MROUTE_ADD_DEL_REPLY);
1158 }
1159
1160 static void
1161 send_ip_details (vpe_api_main_t * am,
1162                  unix_shared_memory_queue_t * q, u32 sw_if_index,
1163                  u8 is_ipv6, u32 context)
1164 {
1165   vl_api_ip_details_t *mp;
1166
1167   mp = vl_msg_api_alloc (sizeof (*mp));
1168   memset (mp, 0, sizeof (*mp));
1169   mp->_vl_msg_id = ntohs (VL_API_IP_DETAILS);
1170
1171   mp->sw_if_index = ntohl (sw_if_index);
1172   mp->is_ipv6 = is_ipv6;
1173   mp->context = context;
1174
1175   vl_msg_api_send_shmem (q, (u8 *) & mp);
1176 }
1177
1178 static void
1179 send_ip_address_details (vpe_api_main_t * am,
1180                          unix_shared_memory_queue_t * q,
1181                          u8 * ip, u16 prefix_length,
1182                          u32 sw_if_index, u8 is_ipv6, u32 context)
1183 {
1184   vl_api_ip_address_details_t *mp;
1185
1186   mp = vl_msg_api_alloc (sizeof (*mp));
1187   memset (mp, 0, sizeof (*mp));
1188   mp->_vl_msg_id = ntohs (VL_API_IP_ADDRESS_DETAILS);
1189
1190   if (is_ipv6)
1191     {
1192       clib_memcpy (&mp->ip, ip, sizeof (mp->ip));
1193     }
1194   else
1195     {
1196       u32 *tp = (u32 *) mp->ip;
1197       *tp = *(u32 *) ip;
1198     }
1199   mp->prefix_length = prefix_length;
1200   mp->context = context;
1201   mp->sw_if_index = htonl (sw_if_index);
1202   mp->is_ipv6 = is_ipv6;
1203
1204   vl_msg_api_send_shmem (q, (u8 *) & mp);
1205 }
1206
1207 static void
1208 vl_api_ip_address_dump_t_handler (vl_api_ip_address_dump_t * mp)
1209 {
1210   vpe_api_main_t *am = &vpe_api_main;
1211   unix_shared_memory_queue_t *q;
1212   ip6_address_t *r6;
1213   ip4_address_t *r4;
1214   ip6_main_t *im6 = &ip6_main;
1215   ip4_main_t *im4 = &ip4_main;
1216   ip_lookup_main_t *lm6 = &im6->lookup_main;
1217   ip_lookup_main_t *lm4 = &im4->lookup_main;
1218   ip_interface_address_t *ia = 0;
1219   u32 sw_if_index = ~0;
1220   int rv __attribute__ ((unused)) = 0;
1221
1222   VALIDATE_SW_IF_INDEX (mp);
1223
1224   sw_if_index = ntohl (mp->sw_if_index);
1225
1226   q = vl_api_client_index_to_input_queue (mp->client_index);
1227   if (q == 0)
1228     return;
1229
1230   if (mp->is_ipv6)
1231     {
1232       /* *INDENT-OFF* */
1233       foreach_ip_interface_address (lm6, ia, sw_if_index,
1234                                     1 /* honor unnumbered */,
1235       ({
1236         r6 = ip_interface_address_get_address (lm6, ia);
1237         u16 prefix_length = ia->address_length;
1238         send_ip_address_details(am, q, (u8*)r6, prefix_length,
1239                                 sw_if_index, 1, mp->context);
1240       }));
1241       /* *INDENT-ON* */
1242     }
1243   else
1244     {
1245       /* *INDENT-OFF* */
1246       foreach_ip_interface_address (lm4, ia, sw_if_index,
1247                                     1 /* honor unnumbered */,
1248       ({
1249         r4 = ip_interface_address_get_address (lm4, ia);
1250         u16 prefix_length = ia->address_length;
1251         send_ip_address_details(am, q, (u8*)r4, prefix_length,
1252                                 sw_if_index, 0, mp->context);
1253       }));
1254       /* *INDENT-ON* */
1255     }
1256   BAD_SW_IF_INDEX_LABEL;
1257 }
1258
1259 static void
1260 vl_api_ip_dump_t_handler (vl_api_ip_dump_t * mp)
1261 {
1262   vpe_api_main_t *am = &vpe_api_main;
1263   vnet_main_t *vnm = vnet_get_main ();
1264   vlib_main_t *vm = vlib_get_main ();
1265   vnet_interface_main_t *im = &vnm->interface_main;
1266   unix_shared_memory_queue_t *q;
1267   vnet_sw_interface_t *si, *sorted_sis;
1268   u32 sw_if_index = ~0;
1269
1270   q = vl_api_client_index_to_input_queue (mp->client_index);
1271   if (q == 0)
1272     {
1273       return;
1274     }
1275
1276   /* Gather interfaces. */
1277   sorted_sis = vec_new (vnet_sw_interface_t, pool_elts (im->sw_interfaces));
1278   _vec_len (sorted_sis) = 0;
1279   /* *INDENT-OFF* */
1280   pool_foreach (si, im->sw_interfaces,
1281   ({
1282     vec_add1 (sorted_sis, si[0]);
1283   }));
1284   /* *INDENT-ON* */
1285
1286   vec_foreach (si, sorted_sis)
1287   {
1288     if (!(si->flags & VNET_SW_INTERFACE_FLAG_UNNUMBERED))
1289       {
1290         if (mp->is_ipv6 && !ip6_interface_enabled (vm, si->sw_if_index))
1291           {
1292             continue;
1293           }
1294         sw_if_index = si->sw_if_index;
1295         send_ip_details (am, q, sw_if_index, mp->is_ipv6, mp->context);
1296       }
1297   }
1298 }
1299
1300 static void
1301 set_ip6_flow_hash (vl_api_set_ip_flow_hash_t * mp)
1302 {
1303   vl_api_set_ip_flow_hash_reply_t *rmp;
1304   int rv = VNET_API_ERROR_UNIMPLEMENTED;
1305
1306   clib_warning ("unimplemented...");
1307
1308   REPLY_MACRO (VL_API_SET_IP_FLOW_HASH_REPLY);
1309 }
1310
1311 static void
1312 set_ip4_flow_hash (vl_api_set_ip_flow_hash_t * mp)
1313 {
1314   vl_api_set_ip_flow_hash_reply_t *rmp;
1315   int rv;
1316   u32 table_id;
1317   flow_hash_config_t flow_hash_config = 0;
1318
1319   table_id = ntohl (mp->vrf_id);
1320
1321 #define _(a,b) if (mp->a) flow_hash_config |= b;
1322   foreach_flow_hash_bit;
1323 #undef _
1324
1325   rv = vnet_set_ip4_flow_hash (table_id, flow_hash_config);
1326
1327   REPLY_MACRO (VL_API_SET_IP_FLOW_HASH_REPLY);
1328 }
1329
1330
1331 static void
1332 vl_api_set_ip_flow_hash_t_handler (vl_api_set_ip_flow_hash_t * mp)
1333 {
1334   if (mp->is_ipv6 == 0)
1335     set_ip4_flow_hash (mp);
1336   else
1337     set_ip6_flow_hash (mp);
1338 }
1339
1340 static void
1341   vl_api_sw_interface_ip6nd_ra_config_t_handler
1342   (vl_api_sw_interface_ip6nd_ra_config_t * mp)
1343 {
1344   vl_api_sw_interface_ip6nd_ra_config_reply_t *rmp;
1345   vlib_main_t *vm = vlib_get_main ();
1346   int rv = 0;
1347   u8 is_no, suppress, managed, other, ll_option, send_unicast, cease,
1348     default_router;
1349
1350   is_no = mp->is_no == 1;
1351   suppress = mp->suppress == 1;
1352   managed = mp->managed == 1;
1353   other = mp->other == 1;
1354   ll_option = mp->ll_option == 1;
1355   send_unicast = mp->send_unicast == 1;
1356   cease = mp->cease == 1;
1357   default_router = mp->default_router == 1;
1358
1359   VALIDATE_SW_IF_INDEX (mp);
1360
1361   rv = ip6_neighbor_ra_config (vm, ntohl (mp->sw_if_index),
1362                                suppress, managed, other,
1363                                ll_option, send_unicast, cease,
1364                                default_router, ntohl (mp->lifetime),
1365                                ntohl (mp->initial_count),
1366                                ntohl (mp->initial_interval),
1367                                ntohl (mp->max_interval),
1368                                ntohl (mp->min_interval), is_no);
1369
1370   BAD_SW_IF_INDEX_LABEL;
1371
1372   REPLY_MACRO (VL_API_SW_INTERFACE_IP6ND_RA_CONFIG_REPLY);
1373 }
1374
1375 static void
1376   vl_api_sw_interface_ip6nd_ra_prefix_t_handler
1377   (vl_api_sw_interface_ip6nd_ra_prefix_t * mp)
1378 {
1379   vlib_main_t *vm = vlib_get_main ();
1380   vl_api_sw_interface_ip6nd_ra_prefix_reply_t *rmp;
1381   int rv = 0;
1382   u8 is_no, use_default, no_advertise, off_link, no_autoconfig, no_onlink;
1383
1384   VALIDATE_SW_IF_INDEX (mp);
1385
1386   is_no = mp->is_no == 1;
1387   use_default = mp->use_default == 1;
1388   no_advertise = mp->no_advertise == 1;
1389   off_link = mp->off_link == 1;
1390   no_autoconfig = mp->no_autoconfig == 1;
1391   no_onlink = mp->no_onlink == 1;
1392
1393   rv = ip6_neighbor_ra_prefix (vm, ntohl (mp->sw_if_index),
1394                                (ip6_address_t *) mp->address,
1395                                mp->address_length, use_default,
1396                                ntohl (mp->val_lifetime),
1397                                ntohl (mp->pref_lifetime), no_advertise,
1398                                off_link, no_autoconfig, no_onlink, is_no);
1399
1400   BAD_SW_IF_INDEX_LABEL;
1401   REPLY_MACRO (VL_API_SW_INTERFACE_IP6ND_RA_PREFIX_REPLY);
1402 }
1403
1404 static void
1405 send_ip6nd_proxy_details (unix_shared_memory_queue_t * q,
1406                           u32 context,
1407                           const ip46_address_t * addr, u32 sw_if_index)
1408 {
1409   vl_api_ip6nd_proxy_details_t *mp;
1410
1411   mp = vl_msg_api_alloc (sizeof (*mp));
1412   memset (mp, 0, sizeof (*mp));
1413   mp->_vl_msg_id = ntohs (VL_API_IP6ND_PROXY_DETAILS);
1414   mp->context = context;
1415   mp->sw_if_index = htonl (sw_if_index);
1416   memcpy (mp->address, addr, 16);
1417
1418   vl_msg_api_send_shmem (q, (u8 *) & mp);
1419 }
1420
1421 typedef struct api_ip6nd_proxy_fib_table_walk_ctx_t_
1422 {
1423   u32 *indices;
1424 } api_ip6nd_proxy_fib_table_walk_ctx_t;
1425
1426 static int
1427 api_ip6nd_proxy_fib_table_walk (fib_node_index_t fei, void *arg)
1428 {
1429   api_ip6nd_proxy_fib_table_walk_ctx_t *ctx = arg;
1430
1431   if (fib_entry_is_sourced (fei, FIB_SOURCE_IP6_ND_PROXY))
1432     {
1433       vec_add1 (ctx->indices, fei);
1434     }
1435
1436   return (1);
1437 }
1438
1439 static void
1440 vl_api_ip6nd_proxy_dump_t_handler (vl_api_ip6nd_proxy_dump_t * mp)
1441 {
1442   ip6_main_t *im6 = &ip6_main;
1443   fib_table_t *fib_table;
1444   api_ip6nd_proxy_fib_table_walk_ctx_t ctx = {
1445     .indices = NULL,
1446   };
1447   fib_node_index_t *feip;
1448   fib_prefix_t pfx;
1449   unix_shared_memory_queue_t *q;
1450
1451   q = vl_api_client_index_to_input_queue (mp->client_index);
1452   if (q == 0)
1453     {
1454       return;
1455     }
1456
1457   /* *INDENT-OFF* */
1458   pool_foreach (fib_table, im6->fibs,
1459   ({
1460     fib_table_walk(fib_table->ft_index,
1461                    FIB_PROTOCOL_IP6,
1462                    api_ip6nd_proxy_fib_table_walk,
1463                    &ctx);
1464   }));
1465   /* *INDENT-ON* */
1466
1467   vec_sort_with_function (ctx.indices, fib_entry_cmp_for_sort);
1468
1469   vec_foreach (feip, ctx.indices)
1470   {
1471     fib_entry_get_prefix (*feip, &pfx);
1472
1473     send_ip6nd_proxy_details (q,
1474                               mp->context,
1475                               &pfx.fp_addr,
1476                               fib_entry_get_resolving_interface (*feip));
1477   }
1478
1479   vec_free (ctx.indices);
1480 }
1481
1482 static void
1483 vl_api_ip6nd_proxy_add_del_t_handler (vl_api_ip6nd_proxy_add_del_t * mp)
1484 {
1485   vl_api_ip6nd_proxy_add_del_reply_t *rmp;
1486   int rv = 0;
1487
1488   VALIDATE_SW_IF_INDEX (mp);
1489
1490   rv = ip6_neighbor_proxy_add_del (ntohl (mp->sw_if_index),
1491                                    (ip6_address_t *) mp->address, mp->is_del);
1492
1493   BAD_SW_IF_INDEX_LABEL;
1494   REPLY_MACRO (VL_API_IP6ND_PROXY_ADD_DEL_REPLY);
1495 }
1496
1497 static void
1498   vl_api_sw_interface_ip6_enable_disable_t_handler
1499   (vl_api_sw_interface_ip6_enable_disable_t * mp)
1500 {
1501   vlib_main_t *vm = vlib_get_main ();
1502   vl_api_sw_interface_ip6_enable_disable_reply_t *rmp;
1503   vnet_main_t *vnm = vnet_get_main ();
1504   int rv = 0;
1505   clib_error_t *error;
1506
1507   vnm->api_errno = 0;
1508
1509   VALIDATE_SW_IF_INDEX (mp);
1510
1511   error =
1512     (mp->enable == 1) ? enable_ip6_interface (vm,
1513                                               ntohl (mp->sw_if_index)) :
1514     disable_ip6_interface (vm, ntohl (mp->sw_if_index));
1515
1516   if (error)
1517     {
1518       clib_error_report (error);
1519       rv = VNET_API_ERROR_UNSPECIFIED;
1520     }
1521   else
1522     {
1523       rv = vnm->api_errno;
1524     }
1525
1526   BAD_SW_IF_INDEX_LABEL;
1527
1528   REPLY_MACRO (VL_API_SW_INTERFACE_IP6_ENABLE_DISABLE_REPLY);
1529 }
1530
1531 static void
1532   vl_api_sw_interface_ip6_set_link_local_address_t_handler
1533   (vl_api_sw_interface_ip6_set_link_local_address_t * mp)
1534 {
1535   vlib_main_t *vm = vlib_get_main ();
1536   vl_api_sw_interface_ip6_set_link_local_address_reply_t *rmp;
1537   int rv = 0;
1538   clib_error_t *error;
1539   vnet_main_t *vnm = vnet_get_main ();
1540
1541   vnm->api_errno = 0;
1542
1543   VALIDATE_SW_IF_INDEX (mp);
1544
1545   error = set_ip6_link_local_address (vm,
1546                                       ntohl (mp->sw_if_index),
1547                                       (ip6_address_t *) mp->address);
1548   if (error)
1549     {
1550       clib_error_report (error);
1551       rv = VNET_API_ERROR_UNSPECIFIED;
1552     }
1553   else
1554     {
1555       rv = vnm->api_errno;
1556     }
1557
1558   BAD_SW_IF_INDEX_LABEL;
1559
1560   REPLY_MACRO (VL_API_SW_INTERFACE_IP6_SET_LINK_LOCAL_ADDRESS_REPLY);
1561 }
1562
1563 void
1564 vl_mfib_signal_send_one (unix_shared_memory_queue_t * q,
1565                          u32 context, const mfib_signal_t * mfs)
1566 {
1567   vl_api_mfib_signal_details_t *mp;
1568   mfib_prefix_t prefix;
1569   mfib_table_t *mfib;
1570   mfib_itf_t *mfi;
1571
1572   mp = vl_msg_api_alloc (sizeof (*mp));
1573
1574   memset (mp, 0, sizeof (*mp));
1575   mp->_vl_msg_id = ntohs (VL_API_MFIB_SIGNAL_DETAILS);
1576   mp->context = context;
1577
1578   mfi = mfib_itf_get (mfs->mfs_itf);
1579   mfib_entry_get_prefix (mfs->mfs_entry, &prefix);
1580   mfib = mfib_table_get (mfib_entry_get_fib_index (mfs->mfs_entry),
1581                          prefix.fp_proto);
1582   mp->table_id = ntohl (mfib->mft_table_id);
1583   mp->sw_if_index = ntohl (mfi->mfi_sw_if_index);
1584
1585   if (FIB_PROTOCOL_IP4 == prefix.fp_proto)
1586     {
1587       mp->grp_address_len = ntohs (prefix.fp_len);
1588
1589       memcpy (mp->grp_address, &prefix.fp_grp_addr.ip4, 4);
1590       if (prefix.fp_len > 32)
1591         {
1592           memcpy (mp->src_address, &prefix.fp_src_addr.ip4, 4);
1593         }
1594     }
1595   else
1596     {
1597       mp->grp_address_len = ntohs (prefix.fp_len);
1598
1599       ASSERT (0);
1600     }
1601
1602   if (0 != mfs->mfs_buffer_len)
1603     {
1604       mp->ip_packet_len = ntohs (mfs->mfs_buffer_len);
1605
1606       memcpy (mp->ip_packet_data, mfs->mfs_buffer, mfs->mfs_buffer_len);
1607     }
1608   else
1609     {
1610       mp->ip_packet_len = 0;
1611     }
1612
1613   vl_msg_api_send_shmem (q, (u8 *) & mp);
1614 }
1615
1616 static void
1617 vl_api_mfib_signal_dump_t_handler (vl_api_mfib_signal_dump_t * mp)
1618 {
1619   unix_shared_memory_queue_t *q;
1620
1621   q = vl_api_client_index_to_input_queue (mp->client_index);
1622   if (q == 0)
1623     {
1624       return;
1625     }
1626
1627   while (q->cursize < q->maxsize && mfib_signal_send_one (q, mp->context))
1628     ;
1629 }
1630
1631 #define vl_msg_name_crc_list
1632 #include <vnet/ip/ip.api.h>
1633 #undef vl_msg_name_crc_list
1634
1635 static void
1636 setup_message_id_table (api_main_t * am)
1637 {
1638 #define _(id,n,crc) vl_msg_api_add_msg_name_crc (am, #n "_" #crc, id);
1639   foreach_vl_msg_name_crc_ip;
1640 #undef _
1641 }
1642
1643 static clib_error_t *
1644 ip_api_hookup (vlib_main_t * vm)
1645 {
1646   api_main_t *am = &api_main;
1647
1648 #define _(N,n)                                                  \
1649     vl_msg_api_set_handlers(VL_API_##N, #n,                     \
1650                            vl_api_##n##_t_handler,              \
1651                            vl_noop_handler,                     \
1652                            vl_api_##n##_t_endian,               \
1653                            vl_api_##n##_t_print,                \
1654                            sizeof(vl_api_##n##_t), 1);
1655   foreach_ip_api_msg;
1656 #undef _
1657
1658   /*
1659    * Set up the (msg_name, crc, message-id) table
1660    */
1661   setup_message_id_table (am);
1662
1663   return 0;
1664 }
1665
1666 VLIB_API_INIT_FUNCTION (ip_api_hookup);
1667
1668 /*
1669  * fd.io coding-style-patch-verification: ON
1670  *
1671  * Local Variables:
1672  * eval: (c-set-style "gnu")
1673  * End:
1674  */