src/plugins/lisp/lisp-gpe/lisp_gpe_api.c

   1 /*
   2  *------------------------------------------------------------------
   3  * lisp_gpe_api.c - lisp_gpe 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 <lisp/lisp-gpe/lisp_gpe.h>
  26 #include <lisp/lisp-gpe/lisp_gpe_adjacency.h>
  27 #include <lisp/lisp-gpe/lisp_gpe_tunnel.h>
  28 #include <lisp/lisp-gpe/lisp_gpe_fwd_entry.h>
  29 #include <lisp/lisp-gpe/lisp_gpe_tenant.h>
  30 #include <vnet/fib/fib_table.h>
  31 #include <vnet/ip/ip_types_api.h>
  32 #include <vnet/ethernet/ethernet_types_api.h>
  33 #include <lisp/lisp-gpe/lisp_types_api.h>
  34
  35 /* define message IDs */
  36 #include <vnet/format_fns.h>
  37 #include <lisp/lisp-gpe/lisp_gpe.api_enum.h>
  38 #include <lisp/lisp-gpe/lisp_gpe.api_types.h>
  39
  40 /**
  41  * Base message ID fot the plugin
  42  */
  43 static u32 gpe_base_msg_id;
  44 #define REPLY_MSG_ID_BASE gpe_base_msg_id
  45
  46 #include <vlibapi/api_helper_macros.h>
  47
  48 static locator_pair_t *
  49 unformat_gpe_loc_pairs (void *locs, u32 rloc_num)
  50 {
  51   u32 i;
  52   locator_pair_t *pairs = 0, pair, *p;
  53   vl_api_gpe_locator_t *r;
  54
  55   for (i = 0; i < rloc_num; i++)
  56     {
  57       /* local locator */
  58       r = &((vl_api_gpe_locator_t *) locs)[i];
  59       clib_memset (&pair, 0, sizeof (pair));
  60       ip_address_decode2 (&r->addr, &pair.lcl_loc);
  61
  62       pair.weight = r->weight;
  63       vec_add1 (pairs, pair);
  64     }
  65
  66   for (i = rloc_num; i < rloc_num * 2; i++)
  67     {
  68       /* remote locators */
  69       r = &((vl_api_gpe_locator_t *) locs)[i];
  70       p = &pairs[i - rloc_num];
  71       ip_address_decode2 (&r->addr, &p->rmt_loc);
  72     }
  73   return pairs;
  74 }
  75
  76 static void
  77   gpe_fwd_entry_path_dump_t_net_to_host
  78   (vl_api_gpe_fwd_entry_path_dump_t * mp)
  79 {
  80   mp->fwd_entry_index = clib_net_to_host_u32 (mp->fwd_entry_index);
  81 }
  82
  83 static void
  84 lisp_api_set_locator (vl_api_gpe_locator_t * loc,
  85                       const ip_address_t * addr, u8 weight)
  86 {
  87   loc->weight = weight;
  88   ip_address_encode2 (addr, &loc->addr);
  89 }
  90
  91 static void
  92   vl_api_gpe_fwd_entry_path_dump_t_handler
  93   (vl_api_gpe_fwd_entry_path_dump_t * mp)
  94 {
  95   lisp_fwd_path_t *path;
  96   vl_api_gpe_fwd_entry_path_details_t *rmp = NULL;
  97   lisp_gpe_main_t *lgm = &lisp_gpe_main;
  98   vl_api_registration_t *reg;
  99   lisp_gpe_fwd_entry_t *lfe;
 100
 101   gpe_fwd_entry_path_dump_t_net_to_host (mp);
 102
 103   reg = vl_api_client_index_to_registration (mp->client_index);
 104   if (!reg)
 105     return;
 106
 107   if (pool_is_free_index (lgm->lisp_fwd_entry_pool, mp->fwd_entry_index))
 108     return;
 109
 110   lfe = pool_elt_at_index (lgm->lisp_fwd_entry_pool, mp->fwd_entry_index);
 111
 112   if (LISP_GPE_FWD_ENTRY_TYPE_NEGATIVE == lfe->type)
 113     return;
 114
 115   vec_foreach (path, lfe->paths)
 116   {
 117     rmp = vl_msg_api_alloc (sizeof (*rmp));
 118     clib_memset (rmp, 0, sizeof (*rmp));
 119     const lisp_gpe_tunnel_t *lgt;
 120
 121     rmp->_vl_msg_id =
 122       clib_host_to_net_u16 (VL_API_GPE_FWD_ENTRY_PATH_DETAILS);
 123
 124     const lisp_gpe_adjacency_t *ladj =
 125       lisp_gpe_adjacency_get (path->lisp_adj);
 126     lisp_api_set_locator (&rmp->rmt_loc, &ladj->remote_rloc, path->weight);
 127     lgt = lisp_gpe_tunnel_get (ladj->tunnel_index);
 128     lisp_api_set_locator (&rmp->lcl_loc, &lgt->key->lcl, path->weight);
 129
 130     rmp->context = mp->context;
 131     vl_api_send_msg (reg, (u8 *) rmp);
 132   }
 133 }
 134
 135 static void
 136 gpe_fwd_entries_copy (vl_api_gpe_fwd_entry_t * dst,
 137                       lisp_api_gpe_fwd_entry_t * src)
 138 {
 139   lisp_api_gpe_fwd_entry_t *e;
 140   u32 i = 0;
 141
 142   vec_foreach (e, src)
 143   {
 144     clib_memset (&dst[i], 0, sizeof (*dst));
 145     dst[i].dp_table = e->dp_table;
 146     dst[i].fwd_entry_index = e->fwd_entry_index;
 147     dst[i].vni = e->vni;
 148     dst[i].action = e->action;
 149     switch (fid_addr_type (&e->leid))
 150       {
 151       case FID_ADDR_IP_PREF:
 152         dst[i].leid.type = EID_TYPE_API_PREFIX;
 153         dst[i].reid.type = EID_TYPE_API_PREFIX;
 154         ip_prefix_encode2 (&fid_addr_ippref (&e->leid),
 155                            &dst[i].leid.address.prefix);
 156         ip_prefix_encode2 (&fid_addr_ippref (&e->reid),
 157                            &dst[i].reid.address.prefix);
 158         break;
 159       case FID_ADDR_MAC:
 160         mac_address_encode ((mac_address_t *) fid_addr_mac (&e->leid),
 161                             dst[i].leid.address.mac);
 162         mac_address_encode ((mac_address_t *) fid_addr_mac (&e->reid),
 163                             dst[i].reid.address.mac);
 164         dst[i].leid.type = EID_TYPE_API_MAC;
 165         dst[i].reid.type = EID_TYPE_API_MAC;
 166         break;
 167       default:
 168         clib_warning ("unknown fid type %d!", fid_addr_type (&e->leid));
 169         break;
 170       }
 171     i++;
 172   }
 173 }
 174
 175 static void
 176 gpe_fwd_entries_get_t_net_to_host (vl_api_gpe_fwd_entries_get_t * mp)
 177 {
 178   mp->vni = clib_net_to_host_u32 (mp->vni);
 179 }
 180
 181 static void
 182 gpe_entry_t_host_to_net (vl_api_gpe_fwd_entry_t * e)
 183 {
 184   e->fwd_entry_index = clib_host_to_net_u32 (e->fwd_entry_index);
 185   e->dp_table = clib_host_to_net_u32 (e->dp_table);
 186   e->vni = clib_host_to_net_u32 (e->vni);
 187 }
 188
 189 static void
 190   gpe_fwd_entries_get_reply_t_host_to_net
 191   (vl_api_gpe_fwd_entries_get_reply_t * mp)
 192 {
 193   u32 i;
 194   vl_api_gpe_fwd_entry_t *e;
 195
 196   for (i = 0; i < mp->count; i++)
 197     {
 198       e = &mp->entries[i];
 199       gpe_entry_t_host_to_net (e);
 200     }
 201   mp->count = clib_host_to_net_u32 (mp->count);
 202 }
 203
 204 static void
 205 vl_api_gpe_fwd_entry_vnis_get_t_handler (vl_api_gpe_fwd_entry_vnis_get_t * mp)
 206 {
 207   vl_api_gpe_fwd_entry_vnis_get_reply_t *rmp = 0;
 208   hash_pair_t *p;
 209   u32 i = 0;
 210   int rv = 0;
 211
 212   u32 *vnis = vnet_lisp_gpe_get_fwd_entry_vnis ();
 213   u32 size = hash_elts (vnis) * sizeof (u32);
 214
 215   /* *INDENT-OFF* */
 216   REPLY_MACRO4 (VL_API_GPE_FWD_ENTRY_VNIS_GET_REPLY, size,
 217   {
 218     rmp->count = clib_host_to_net_u32 (hash_elts (vnis));
 219     hash_foreach_pair (p, vnis,
 220     ({
 221       rmp->vnis[i++] = clib_host_to_net_u32 (p->key);
 222     }));
 223   });
 224   /* *INDENT-ON* */
 225
 226   hash_free (vnis);
 227 }
 228
 229 static void
 230 vl_api_gpe_fwd_entries_get_t_handler (vl_api_gpe_fwd_entries_get_t * mp)
 231 {
 232   lisp_api_gpe_fwd_entry_t *e;
 233   vl_api_gpe_fwd_entries_get_reply_t *rmp = 0;
 234   u32 size = 0;
 235   int rv = 0;
 236
 237   gpe_fwd_entries_get_t_net_to_host (mp);
 238
 239   e = vnet_lisp_gpe_fwd_entries_get_by_vni (mp->vni);
 240   size = vec_len (e) * sizeof (vl_api_gpe_fwd_entry_t);
 241
 242   /* *INDENT-OFF* */
 243   REPLY_MACRO4 (VL_API_GPE_FWD_ENTRIES_GET_REPLY, size,
 244   {
 245     rmp->count = vec_len (e);
 246     gpe_fwd_entries_copy (rmp->entries, e);
 247     gpe_fwd_entries_get_reply_t_host_to_net (rmp);
 248   });
 249   /* *INDENT-ON* */
 250
 251   vec_free (e);
 252 }
 253
 254 static void
 255 gpe_add_del_fwd_entry_t_net_to_host (vl_api_gpe_add_del_fwd_entry_t * mp)
 256 {
 257   mp->vni = clib_net_to_host_u32 (mp->vni);
 258   mp->dp_table = clib_net_to_host_u32 (mp->dp_table);
 259   mp->loc_num = clib_net_to_host_u32 (mp->loc_num);
 260 }
 261
 262 static void
 263 vl_api_gpe_add_del_fwd_entry_t_handler (vl_api_gpe_add_del_fwd_entry_t * mp)
 264 {
 265   vl_api_gpe_add_del_fwd_entry_reply_t *rmp;
 266   vnet_lisp_gpe_add_del_fwd_entry_args_t _a, *a = &_a;
 267   locator_pair_t *pairs = 0;
 268   int rv = 0;
 269
 270   gpe_add_del_fwd_entry_t_net_to_host (mp);
 271   clib_memset (a, 0, sizeof (a[0]));
 272
 273   rv = unformat_lisp_eid_api (&a->rmt_eid, mp->vni, &mp->rmt_eid);
 274   rv |= unformat_lisp_eid_api (&a->lcl_eid, mp->vni, &mp->lcl_eid);
 275
 276   if (mp->loc_num % 2 != 0)
 277     {
 278       rv = -1;
 279       goto send_reply;
 280     }
 281   pairs = unformat_gpe_loc_pairs (mp->locs, mp->loc_num / 2);
 282
 283   if (rv)
 284     goto send_reply;
 285
 286   a->is_add = mp->is_add;
 287   a->locator_pairs = pairs;
 288   a->dp_table = mp->dp_table;
 289   a->vni = mp->vni;
 290   a->action = mp->action;
 291   if (mp->loc_num == 0)
 292     a->is_negative = 1;
 293
 294   rv = vnet_lisp_gpe_add_del_fwd_entry (a, 0);
 295   vec_free (pairs);
 296 send_reply:
 297   /* *INDENT-OFF* */
 298   REPLY_MACRO2 (VL_API_GPE_ADD_DEL_FWD_ENTRY_REPLY,
 299   {
 300     rmp->fwd_entry_index = clib_host_to_net_u32 (a->fwd_entry_index);
 301   });
 302   /* *INDENT-ON* */
 303 }
 304
 305 static void
 306 vl_api_gpe_enable_disable_t_handler (vl_api_gpe_enable_disable_t * mp)
 307 {
 308   vl_api_gpe_enable_disable_reply_t *rmp;
 309   int rv = 0;
 310   vnet_lisp_gpe_enable_disable_args_t _a, *a = &_a;
 311
 312   a->is_en = mp->is_enable;
 313   vnet_lisp_gpe_enable_disable (a);
 314
 315   REPLY_MACRO (VL_API_GPE_ENABLE_DISABLE_REPLY);
 316 }
 317
 318 static void
 319 vl_api_gpe_add_del_iface_t_handler (vl_api_gpe_add_del_iface_t * mp)
 320 {
 321   vl_api_gpe_add_del_iface_reply_t *rmp;
 322   int rv = 0;
 323   u32 vni, dp_table;
 324
 325   vni = clib_net_to_host_u32 (mp->vni);
 326   dp_table = clib_net_to_host_u32 (mp->dp_table);
 327
 328   if (mp->is_l2)
 329     {
 330       if (mp->is_add)
 331         {
 332           if (~0 == lisp_gpe_tenant_l2_iface_add_or_lock (vni, dp_table))
 333             rv = 1;
 334         }
 335       else
 336         lisp_gpe_tenant_l2_iface_unlock (vni);
 337     }
 338   else
 339     {
 340       if (mp->is_add)
 341         {
 342           if (~0 == lisp_gpe_tenant_l3_iface_add_or_lock (vni, dp_table, 1))
 343             rv = 1;
 344         }
 345       else
 346         lisp_gpe_tenant_l3_iface_unlock (vni);
 347     }
 348
 349   REPLY_MACRO (VL_API_GPE_ADD_DEL_IFACE_REPLY);
 350 }
 351
 352 static void
 353 vl_api_gpe_set_encap_mode_t_handler (vl_api_gpe_set_encap_mode_t * mp)
 354 {
 355   vl_api_gpe_set_encap_mode_reply_t *rmp;
 356   int rv = 0;
 357
 358   rv = vnet_gpe_set_encap_mode (mp->is_vxlan);
 359   REPLY_MACRO (VL_API_GPE_SET_ENCAP_MODE_REPLY);
 360 }
 361
 362 static void
 363 vl_api_gpe_get_encap_mode_t_handler (vl_api_gpe_get_encap_mode_t * mp)
 364 {
 365   vl_api_gpe_get_encap_mode_reply_t *rmp;
 366   int rv = 0;
 367
 368   /* *INDENT-OFF* */
 369   REPLY_MACRO2 (VL_API_GPE_GET_ENCAP_MODE_REPLY,
 370   ({
 371     rmp->encap_mode = vnet_gpe_get_encap_mode ();
 372   }));
 373   /* *INDENT-ON* */
 374 }
 375
 376 static void
 377   vl_api_gpe_add_del_native_fwd_rpath_t_handler
 378   (vl_api_gpe_add_del_native_fwd_rpath_t * mp)
 379 {
 380   vl_api_gpe_add_del_native_fwd_rpath_reply_t *rmp;
 381   vnet_gpe_native_fwd_rpath_args_t _a, *a = &_a;
 382   int rv = 0;
 383
 384   clib_memset (a, 0, sizeof (a[0]));
 385
 386   if (mp->nh_addr.af)
 387     clib_memcpy (&a->rpath.frp_addr.ip6, mp->nh_addr.un.ip6,
 388                  sizeof (ip6_address_t));
 389   else
 390     clib_memcpy (&a->rpath.frp_addr.ip4, mp->nh_addr.un.ip4,
 391                  sizeof (ip4_address_t));
 392
 393   a->is_add = mp->is_add;
 394   a->rpath.frp_proto = mp->nh_addr.af ? DPO_PROTO_IP6 : DPO_PROTO_IP4;
 395   a->rpath.frp_fib_index =
 396     fib_table_find (dpo_proto_to_fib (a->rpath.frp_proto),
 397                     clib_net_to_host_u32 (mp->table_id));
 398   if (~0 == a->rpath.frp_fib_index)
 399     {
 400       rv = VNET_API_ERROR_INVALID_VALUE;
 401       goto done;
 402     }
 403
 404   a->rpath.frp_sw_if_index = clib_net_to_host_u32 (mp->nh_sw_if_index);
 405   a->rpath.frp_weight = 1;
 406
 407   rv = vnet_gpe_add_del_native_fwd_rpath (a);
 408 done:
 409   REPLY_MACRO (VL_API_GPE_ADD_DEL_NATIVE_FWD_RPATH_REPLY);
 410 }
 411
 412 static void
 413 gpe_native_fwd_rpaths_copy (vl_api_gpe_native_fwd_rpath_t * dst,
 414                             fib_route_path_t * src)
 415 {
 416   fib_route_path_t *e;
 417   fib_table_t *table;
 418   u32 i = 0;
 419
 420   vec_foreach (e, src)
 421   {
 422     clib_memset (&dst[i], 0, sizeof (*dst));
 423     table = fib_table_get (e->frp_fib_index, dpo_proto_to_fib (e->frp_proto));
 424     dst[i].fib_index = table->ft_table_id;
 425     dst[i].nh_sw_if_index = e->frp_sw_if_index;
 426     ip_address_encode (&e->frp_addr, IP46_TYPE_ANY, &dst[i].nh_addr);
 427     i++;
 428   }
 429 }
 430
 431 static void
 432 gpe_native_fwd_rpath_t_host_to_net (vl_api_gpe_native_fwd_rpath_t * e)
 433 {
 434   e->fib_index = clib_host_to_net_u32 (e->fib_index);
 435   e->nh_sw_if_index = clib_host_to_net_u32 (e->nh_sw_if_index);
 436 }
 437
 438 static void
 439   gpe_native_fwd_rpaths_get_reply_t_host_to_net
 440   (vl_api_gpe_native_fwd_rpaths_get_reply_t * mp)
 441 {
 442   u32 i;
 443   vl_api_gpe_native_fwd_rpath_t *e;
 444
 445   for (i = 0; i < mp->count; i++)
 446     {
 447       e = &mp->entries[i];
 448       gpe_native_fwd_rpath_t_host_to_net (e);
 449     }
 450   mp->count = clib_host_to_net_u32 (mp->count);
 451 }
 452
 453 static void
 454 vl_api_gpe_native_fwd_rpaths_get_t_handler (vl_api_gpe_native_fwd_rpaths_get_t
 455                                             * mp)
 456 {
 457   lisp_gpe_main_t *lgm = vnet_lisp_gpe_get_main ();
 458   vl_api_gpe_native_fwd_rpaths_get_reply_t *rmp;
 459   u32 size = 0;
 460   int rv = 0;
 461
 462   u8 rpath_index = mp->is_ip4 ? 1 : 0;
 463
 464   size = vec_len (lgm->native_fwd_rpath[rpath_index])
 465     * sizeof (vl_api_gpe_native_fwd_rpath_t);
 466
 467   /* *INDENT-OFF* */
 468   REPLY_MACRO4 (VL_API_GPE_NATIVE_FWD_RPATHS_GET_REPLY, size,
 469   {
 470     rmp->count = vec_len (lgm->native_fwd_rpath[rpath_index]);
 471     gpe_native_fwd_rpaths_copy (rmp->entries,
 472                                 lgm->native_fwd_rpath[rpath_index]);
 473     gpe_native_fwd_rpaths_get_reply_t_host_to_net (rmp);
 474   });
 475   /* *INDENT-ON* */
 476 }
 477
 478 /*
 479  * lisp_api_hookup
 480  * Add vpe's API message handlers to the table.
 481  * vlib has already mapped shared memory and
 482  * added the client registration handlers.
 483  * See .../vlib-api/vlibmemory/memclnt_vlib.c:memclnt_process()
 484  */
 485 #include <lisp/lisp-gpe/lisp_gpe.api.c>
 486
 487 static clib_error_t *
 488 gpe_api_hookup (vlib_main_t * vm)
 489 {
 490   /*
 491    * Set up the (msg_name, crc, message-id) table
 492    */
 493   gpe_base_msg_id = setup_message_id_table ();
 494
 495   return NULL;
 496 }
 497
 498 VLIB_API_INIT_FUNCTION (gpe_api_hookup);
 499
 500 /*
 501  * fd.io coding-style-patch-verification: ON
 502  *
 503  * Local Variables:
 504  * eval: (c-set-style "gnu")
 505  * End:
 506  */