src/plugins/gbp/gbp_api.c

   1 /*
   2  *------------------------------------------------------------------
   3  * Copyright (c) 2018 Cisco and/or its affiliates.
   4  * Licensed under the Apache License, Version 2.0 (the "License");
   5  * you may not use this file except in compliance with the License.
   6  * You may obtain a copy of the License at:
   7  *
   8  *     http://www.apache.org/licenses/LICENSE-2.0
   9  *
  10  * Unless required by applicable law or agreed to in writing, software
  11  * distributed under the License is distributed on an "AS IS" BASIS,
  12  * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
  13  * See the License for the specific language governing permissions and
  14  * limitations under the License.
  15  *------------------------------------------------------------------
  16  */
  17
  18 #include <vnet/vnet.h>
  19 #include <vnet/plugin/plugin.h>
  20
  21 #include <vnet/interface.h>
  22 #include <vnet/api_errno.h>
  23 #include <vnet/ip/ip_types_api.h>
  24 #include <vnet/ethernet/ethernet_types_api.h>
  25 #include <vpp/app/version.h>
  26
  27 #include <gbp/gbp.h>
  28 #include <gbp/gbp_learn.h>
  29 #include <gbp/gbp_itf.h>
  30 #include <gbp/gbp_vxlan.h>
  31 #include <gbp/gbp_bridge_domain.h>
  32 #include <gbp/gbp_route_domain.h>
  33 #include <gbp/gbp_ext_itf.h>
  34
  35 #include <vlibapi/api.h>
  36 #include <vlibmemory/api.h>
  37
  38 /* define message IDs */
  39 #include <gbp/gbp_msg_enum.h>
  40
  41 #define vl_typedefs             /* define message structures */
  42 #include <gbp/gbp_all_api_h.h>
  43 #undef vl_typedefs
  44
  45 #define vl_endianfun            /* define message structures */
  46 #include <gbp/gbp_all_api_h.h>
  47 #undef vl_endianfun
  48
  49 /* instantiate all the print functions we know about */
  50 #define vl_print(handle, ...) vlib_cli_output (handle, __VA_ARGS__)
  51 #define vl_printfun
  52 #include <gbp/gbp_all_api_h.h>
  53 #undef vl_printfun
  54
  55 /* Get the API version number */
  56 #define vl_api_version(n,v) static u32 api_version=(v);
  57 #include <gbp/gbp_all_api_h.h>
  58 #undef vl_api_version
  59
  60 #include <vlibapi/api_helper_macros.h>
  61
  62 #define foreach_gbp_api_msg                                 \
  63   _(GBP_ENDPOINT_ADD, gbp_endpoint_add)                     \
  64   _(GBP_ENDPOINT_DEL, gbp_endpoint_del)                     \
  65   _(GBP_ENDPOINT_DUMP, gbp_endpoint_dump)                   \
  66   _(GBP_SUBNET_ADD_DEL, gbp_subnet_add_del)                 \
  67   _(GBP_SUBNET_DUMP, gbp_subnet_dump)                       \
  68   _(GBP_ENDPOINT_GROUP_ADD, gbp_endpoint_group_add)         \
  69   _(GBP_ENDPOINT_GROUP_DEL, gbp_endpoint_group_del)         \
  70   _(GBP_ENDPOINT_GROUP_DUMP, gbp_endpoint_group_dump)       \
  71   _(GBP_BRIDGE_DOMAIN_ADD, gbp_bridge_domain_add)           \
  72   _(GBP_BRIDGE_DOMAIN_DEL, gbp_bridge_domain_del)           \
  73   _(GBP_BRIDGE_DOMAIN_DUMP, gbp_bridge_domain_dump)         \
  74   _(GBP_ROUTE_DOMAIN_ADD, gbp_route_domain_add)             \
  75   _(GBP_ROUTE_DOMAIN_DEL, gbp_route_domain_del)             \
  76   _(GBP_ROUTE_DOMAIN_DUMP, gbp_route_domain_dump)           \
  77   _(GBP_RECIRC_ADD_DEL, gbp_recirc_add_del)                 \
  78   _(GBP_RECIRC_DUMP, gbp_recirc_dump)                       \
  79   _(GBP_EXT_ITF_ADD_DEL, gbp_ext_itf_add_del)               \
  80   _(GBP_EXT_ITF_DUMP, gbp_ext_itf_dump)                     \
  81   _(GBP_CONTRACT_ADD_DEL, gbp_contract_add_del)             \
  82   _(GBP_CONTRACT_DUMP, gbp_contract_dump)                   \
  83   _(GBP_ENDPOINT_LEARN_SET_INACTIVE_THRESHOLD, gbp_endpoint_learn_set_inactive_threshold) \
  84   _(GBP_VXLAN_TUNNEL_ADD, gbp_vxlan_tunnel_add)                         \
  85   _(GBP_VXLAN_TUNNEL_DEL, gbp_vxlan_tunnel_del)                         \
  86   _(GBP_VXLAN_TUNNEL_DUMP, gbp_vxlan_tunnel_dump)
  87
  88 gbp_main_t gbp_main;
  89
  90 static u16 msg_id_base;
  91
  92 #define GBP_MSG_BASE msg_id_base
  93
  94 static gbp_endpoint_flags_t
  95 gbp_endpoint_flags_decode (vl_api_gbp_endpoint_flags_t v)
  96 {
  97   gbp_endpoint_flags_t f = GBP_ENDPOINT_FLAG_NONE;
  98
  99   v = ntohl (v);
 100
 101   if (v & GBP_API_ENDPOINT_FLAG_BOUNCE)
 102     f |= GBP_ENDPOINT_FLAG_BOUNCE;
 103   if (v & GBP_API_ENDPOINT_FLAG_REMOTE)
 104     f |= GBP_ENDPOINT_FLAG_REMOTE;
 105   if (v & GBP_API_ENDPOINT_FLAG_LEARNT)
 106     f |= GBP_ENDPOINT_FLAG_LEARNT;
 107   if (v & GBP_API_ENDPOINT_FLAG_EXTERNAL)
 108     f |= GBP_ENDPOINT_FLAG_EXTERNAL;
 109
 110   return (f);
 111 }
 112
 113 static vl_api_gbp_endpoint_flags_t
 114 gbp_endpoint_flags_encode (gbp_endpoint_flags_t f)
 115 {
 116   vl_api_gbp_endpoint_flags_t v = 0;
 117
 118
 119   if (f & GBP_ENDPOINT_FLAG_BOUNCE)
 120     v |= GBP_API_ENDPOINT_FLAG_BOUNCE;
 121   if (f & GBP_ENDPOINT_FLAG_REMOTE)
 122     v |= GBP_API_ENDPOINT_FLAG_REMOTE;
 123   if (f & GBP_ENDPOINT_FLAG_LEARNT)
 124     v |= GBP_API_ENDPOINT_FLAG_LEARNT;
 125   if (f & GBP_ENDPOINT_FLAG_EXTERNAL)
 126     v |= GBP_API_ENDPOINT_FLAG_EXTERNAL;
 127
 128   v = htonl (v);
 129
 130   return (v);
 131 }
 132
 133 static void
 134 vl_api_gbp_endpoint_add_t_handler (vl_api_gbp_endpoint_add_t * mp)
 135 {
 136   vl_api_gbp_endpoint_add_reply_t *rmp;
 137   gbp_endpoint_flags_t gef;
 138   u32 sw_if_index, handle;
 139   ip46_address_t *ips;
 140   mac_address_t mac;
 141   int rv = 0, ii;
 142
 143   VALIDATE_SW_IF_INDEX (&(mp->endpoint));
 144
 145   gef = gbp_endpoint_flags_decode (mp->endpoint.flags), ips = NULL;
 146   sw_if_index = ntohl (mp->endpoint.sw_if_index);
 147
 148   if (mp->endpoint.n_ips)
 149     {
 150       vec_validate (ips, mp->endpoint.n_ips - 1);
 151
 152       vec_foreach_index (ii, ips)
 153       {
 154         ip_address_decode (&mp->endpoint.ips[ii], &ips[ii]);
 155       }
 156     }
 157   mac_address_decode (mp->endpoint.mac, &mac);
 158
 159   if (GBP_ENDPOINT_FLAG_REMOTE & gef)
 160     {
 161       ip46_address_t tun_src, tun_dst;
 162
 163       ip_address_decode (&mp->endpoint.tun.src, &tun_src);
 164       ip_address_decode (&mp->endpoint.tun.dst, &tun_dst);
 165
 166       rv = gbp_endpoint_update_and_lock (GBP_ENDPOINT_SRC_CP,
 167                                          sw_if_index, ips, &mac,
 168                                          INDEX_INVALID, INDEX_INVALID,
 169                                          ntohs (mp->endpoint.epg_id),
 170                                          gef, &tun_src, &tun_dst, &handle);
 171     }
 172   else
 173     {
 174       rv = gbp_endpoint_update_and_lock (GBP_ENDPOINT_SRC_CP,
 175                                          sw_if_index, ips, &mac,
 176                                          INDEX_INVALID, INDEX_INVALID,
 177                                          ntohs (mp->endpoint.epg_id),
 178                                          gef, NULL, NULL, &handle);
 179     }
 180   vec_free (ips);
 181   BAD_SW_IF_INDEX_LABEL;
 182
 183   /* *INDENT-OFF* */
 184   REPLY_MACRO2 (VL_API_GBP_ENDPOINT_ADD_REPLY + GBP_MSG_BASE,
 185   ({
 186     rmp->handle = htonl (handle);
 187   }));
 188   /* *INDENT-ON* */
 189 }
 190
 191 static void
 192 vl_api_gbp_endpoint_del_t_handler (vl_api_gbp_endpoint_del_t * mp)
 193 {
 194   vl_api_gbp_endpoint_del_reply_t *rmp;
 195   int rv = 0;
 196
 197   gbp_endpoint_unlock (GBP_ENDPOINT_SRC_CP, ntohl (mp->handle));
 198
 199   REPLY_MACRO (VL_API_GBP_ENDPOINT_DEL_REPLY + GBP_MSG_BASE);
 200 }
 201
 202 static void
 203   vl_api_gbp_endpoint_learn_set_inactive_threshold_t_handler
 204   (vl_api_gbp_endpoint_learn_set_inactive_threshold_t * mp)
 205 {
 206   vl_api_gbp_endpoint_learn_set_inactive_threshold_reply_t *rmp;
 207   int rv = 0;
 208
 209   gbp_learn_set_inactive_threshold (ntohl (mp->threshold));
 210
 211   REPLY_MACRO (VL_API_GBP_ENDPOINT_LEARN_SET_INACTIVE_THRESHOLD_REPLY +
 212                GBP_MSG_BASE);
 213 }
 214
 215 typedef struct gbp_walk_ctx_t_
 216 {
 217   vl_api_registration_t *reg;
 218   u32 context;
 219 } gbp_walk_ctx_t;
 220
 221 static walk_rc_t
 222 gbp_endpoint_send_details (index_t gei, void *args)
 223 {
 224   vl_api_gbp_endpoint_details_t *mp;
 225   gbp_endpoint_loc_t *gel;
 226   gbp_endpoint_fwd_t *gef;
 227   gbp_endpoint_t *ge;
 228   gbp_walk_ctx_t *ctx;
 229   u8 n_ips, ii;
 230
 231   ctx = args;
 232   ge = gbp_endpoint_get (gei);
 233
 234   n_ips = vec_len (ge->ge_key.gek_ips);
 235   mp = vl_msg_api_alloc (sizeof (*mp) + (sizeof (*mp->endpoint.ips) * n_ips));
 236   if (!mp)
 237     return 1;
 238
 239   clib_memset (mp, 0, sizeof (*mp));
 240   mp->_vl_msg_id = ntohs (VL_API_GBP_ENDPOINT_DETAILS + GBP_MSG_BASE);
 241   mp->context = ctx->context;
 242
 243   gel = &ge->ge_locs[0];
 244   gef = &ge->ge_fwd;
 245
 246   if (gbp_endpoint_is_remote (ge))
 247     {
 248       mp->endpoint.sw_if_index = ntohl (gel->tun.gel_parent_sw_if_index);
 249       ip_address_encode (&gel->tun.gel_src, IP46_TYPE_ANY,
 250                          &mp->endpoint.tun.src);
 251       ip_address_encode (&gel->tun.gel_dst, IP46_TYPE_ANY,
 252                          &mp->endpoint.tun.dst);
 253     }
 254   else
 255     {
 256       mp->endpoint.sw_if_index = ntohl (gef->gef_itf);
 257     }
 258   mp->endpoint.epg_id = ntohs (ge->ge_fwd.gef_epg_id);
 259   mp->endpoint.n_ips = n_ips;
 260   mp->endpoint.flags = gbp_endpoint_flags_encode (gef->gef_flags);
 261   mp->handle = htonl (gei);
 262   mp->age = vlib_time_now (vlib_get_main ()) - ge->ge_last_time;
 263   mac_address_encode (&ge->ge_key.gek_mac, mp->endpoint.mac);
 264
 265   vec_foreach_index (ii, ge->ge_key.gek_ips)
 266   {
 267     ip_address_encode (&ge->ge_key.gek_ips[ii].fp_addr,
 268                        IP46_TYPE_ANY, &mp->endpoint.ips[ii]);
 269   }
 270
 271   vl_api_send_msg (ctx->reg, (u8 *) mp);
 272
 273   return (WALK_CONTINUE);
 274 }
 275
 276 static void
 277 vl_api_gbp_endpoint_dump_t_handler (vl_api_gbp_endpoint_dump_t * mp)
 278 {
 279   vl_api_registration_t *reg;
 280
 281   reg = vl_api_client_index_to_registration (mp->client_index);
 282   if (!reg)
 283     return;
 284
 285   gbp_walk_ctx_t ctx = {
 286     .reg = reg,
 287     .context = mp->context,
 288   };
 289
 290   gbp_endpoint_walk (gbp_endpoint_send_details, &ctx);
 291 }
 292
 293 static void
 294   vl_api_gbp_endpoint_group_add_t_handler
 295   (vl_api_gbp_endpoint_group_add_t * mp)
 296 {
 297   vl_api_gbp_endpoint_group_add_reply_t *rmp;
 298   int rv = 0;
 299
 300   rv = gbp_endpoint_group_add_and_lock (ntohs (mp->epg.epg_id),
 301                                         ntohl (mp->epg.bd_id),
 302                                         ntohl (mp->epg.rd_id),
 303                                         ntohl (mp->epg.uplink_sw_if_index));
 304
 305   REPLY_MACRO (VL_API_GBP_ENDPOINT_GROUP_ADD_REPLY + GBP_MSG_BASE);
 306 }
 307
 308 static void
 309   vl_api_gbp_endpoint_group_del_t_handler
 310   (vl_api_gbp_endpoint_group_del_t * mp)
 311 {
 312   vl_api_gbp_endpoint_group_del_reply_t *rmp;
 313   int rv = 0;
 314
 315   rv = gbp_endpoint_group_delete (ntohs (mp->epg_id));
 316
 317   REPLY_MACRO (VL_API_GBP_ENDPOINT_GROUP_DEL_REPLY + GBP_MSG_BASE);
 318 }
 319
 320 static gbp_bridge_domain_flags_t
 321 gbp_bridge_domain_flags_from_api (vl_api_gbp_bridge_domain_flags_t a)
 322 {
 323   gbp_bridge_domain_flags_t g;
 324
 325   g = GBP_BD_FLAG_NONE;
 326   a = clib_net_to_host_u32 (a);
 327
 328   if (a & GBP_BD_API_FLAG_DO_NOT_LEARN)
 329     g |= GBP_BD_FLAG_DO_NOT_LEARN;
 330
 331   return (g);
 332 }
 333
 334 static void
 335 vl_api_gbp_bridge_domain_add_t_handler (vl_api_gbp_bridge_domain_add_t * mp)
 336 {
 337   vl_api_gbp_bridge_domain_add_reply_t *rmp;
 338   int rv = 0;
 339
 340   rv = gbp_bridge_domain_add_and_lock (ntohl (mp->bd.bd_id),
 341                                        gbp_bridge_domain_flags_from_api
 342                                        (mp->bd.flags),
 343                                        ntohl (mp->bd.bvi_sw_if_index),
 344                                        ntohl (mp->bd.uu_fwd_sw_if_index));
 345
 346   REPLY_MACRO (VL_API_GBP_BRIDGE_DOMAIN_ADD_REPLY + GBP_MSG_BASE);
 347 }
 348
 349 static void
 350 vl_api_gbp_bridge_domain_del_t_handler (vl_api_gbp_bridge_domain_del_t * mp)
 351 {
 352   vl_api_gbp_bridge_domain_del_reply_t *rmp;
 353   int rv = 0;
 354
 355   rv = gbp_bridge_domain_delete (ntohl (mp->bd_id));
 356
 357   REPLY_MACRO (VL_API_GBP_BRIDGE_DOMAIN_DEL_REPLY + GBP_MSG_BASE);
 358 }
 359
 360 static void
 361 vl_api_gbp_route_domain_add_t_handler (vl_api_gbp_route_domain_add_t * mp)
 362 {
 363   vl_api_gbp_route_domain_add_reply_t *rmp;
 364   int rv = 0;
 365
 366   rv = gbp_route_domain_add_and_lock (ntohl (mp->rd.rd_id),
 367                                       ntohl (mp->rd.ip4_table_id),
 368                                       ntohl (mp->rd.ip6_table_id),
 369                                       ntohl (mp->rd.ip4_uu_sw_if_index),
 370                                       ntohl (mp->rd.ip6_uu_sw_if_index));
 371
 372   REPLY_MACRO (VL_API_GBP_ROUTE_DOMAIN_ADD_REPLY + GBP_MSG_BASE);
 373 }
 374
 375 static void
 376 vl_api_gbp_route_domain_del_t_handler (vl_api_gbp_route_domain_del_t * mp)
 377 {
 378   vl_api_gbp_route_domain_del_reply_t *rmp;
 379   int rv = 0;
 380
 381   rv = gbp_route_domain_delete (ntohl (mp->rd_id));
 382
 383   REPLY_MACRO (VL_API_GBP_ROUTE_DOMAIN_DEL_REPLY + GBP_MSG_BASE);
 384 }
 385
 386 static int
 387 gub_subnet_type_from_api (vl_api_gbp_subnet_type_t a, gbp_subnet_type_t * t)
 388 {
 389   a = clib_net_to_host_u32 (a);
 390
 391   switch (a)
 392     {
 393     case GBP_API_SUBNET_TRANSPORT:
 394       *t = GBP_SUBNET_TRANSPORT;
 395       return (0);
 396     case GBP_API_SUBNET_L3_OUT:
 397       *t = GBP_SUBNET_L3_OUT;
 398       return (0);
 399     case GBP_API_SUBNET_STITCHED_INTERNAL:
 400       *t = GBP_SUBNET_STITCHED_INTERNAL;
 401       return (0);
 402     case GBP_API_SUBNET_STITCHED_EXTERNAL:
 403       *t = GBP_SUBNET_STITCHED_EXTERNAL;
 404       return (0);
 405     }
 406
 407   return (-1);
 408 }
 409
 410 static void
 411 vl_api_gbp_subnet_add_del_t_handler (vl_api_gbp_subnet_add_del_t * mp)
 412 {
 413   vl_api_gbp_subnet_add_del_reply_t *rmp;
 414   gbp_subnet_type_t type;
 415   fib_prefix_t pfx;
 416   int rv = 0;
 417
 418   ip_prefix_decode (&mp->subnet.prefix, &pfx);
 419
 420   rv = gub_subnet_type_from_api (mp->subnet.type, &type);
 421
 422   if (0 != rv)
 423     goto out;
 424
 425   if (mp->is_add)
 426     rv = gbp_subnet_add (ntohl (mp->subnet.rd_id),
 427                          &pfx, type,
 428                          ntohl (mp->subnet.sw_if_index),
 429                          ntohs (mp->subnet.epg_id));
 430   else
 431     rv = gbp_subnet_del (ntohl (mp->subnet.rd_id), &pfx);
 432
 433 out:
 434   REPLY_MACRO (VL_API_GBP_SUBNET_ADD_DEL_REPLY + GBP_MSG_BASE);
 435 }
 436
 437 static vl_api_gbp_subnet_type_t
 438 gub_subnet_type_to_api (gbp_subnet_type_t t)
 439 {
 440   vl_api_gbp_subnet_type_t a = 0;
 441
 442   switch (t)
 443     {
 444     case GBP_SUBNET_TRANSPORT:
 445       a = GBP_API_SUBNET_TRANSPORT;
 446       break;
 447     case GBP_SUBNET_STITCHED_INTERNAL:
 448       a = GBP_API_SUBNET_STITCHED_INTERNAL;
 449       break;
 450     case GBP_SUBNET_STITCHED_EXTERNAL:
 451       a = GBP_API_SUBNET_STITCHED_EXTERNAL;
 452       break;
 453     case GBP_SUBNET_L3_OUT:
 454       a = GBP_API_SUBNET_L3_OUT;
 455       break;
 456     }
 457
 458   a = clib_host_to_net_u32 (a);
 459
 460   return (a);
 461 }
 462
 463 static walk_rc_t
 464 gbp_subnet_send_details (u32 rd_id,
 465                          const fib_prefix_t * pfx,
 466                          gbp_subnet_type_t type,
 467                          u32 sw_if_index, epg_id_t epg, void *args)
 468 {
 469   vl_api_gbp_subnet_details_t *mp;
 470   gbp_walk_ctx_t *ctx;
 471
 472   ctx = args;
 473   mp = vl_msg_api_alloc (sizeof (*mp));
 474   if (!mp)
 475     return 1;
 476
 477   clib_memset (mp, 0, sizeof (*mp));
 478   mp->_vl_msg_id = ntohs (VL_API_GBP_SUBNET_DETAILS + GBP_MSG_BASE);
 479   mp->context = ctx->context;
 480
 481   mp->subnet.type = gub_subnet_type_to_api (type);
 482   mp->subnet.sw_if_index = ntohl (sw_if_index);
 483   mp->subnet.epg_id = ntohs (epg);
 484   mp->subnet.rd_id = ntohl (rd_id);
 485   ip_prefix_encode (pfx, &mp->subnet.prefix);
 486
 487   vl_api_send_msg (ctx->reg, (u8 *) mp);
 488
 489   return (WALK_CONTINUE);
 490 }
 491
 492 static void
 493 vl_api_gbp_subnet_dump_t_handler (vl_api_gbp_subnet_dump_t * mp)
 494 {
 495   vl_api_registration_t *reg;
 496
 497   reg = vl_api_client_index_to_registration (mp->client_index);
 498   if (!reg)
 499     return;
 500
 501   gbp_walk_ctx_t ctx = {
 502     .reg = reg,
 503     .context = mp->context,
 504   };
 505
 506   gbp_subnet_walk (gbp_subnet_send_details, &ctx);
 507 }
 508
 509 static int
 510 gbp_endpoint_group_send_details (gbp_endpoint_group_t * gg, void *args)
 511 {
 512   vl_api_gbp_endpoint_group_details_t *mp;
 513   gbp_walk_ctx_t *ctx;
 514
 515   ctx = args;
 516   mp = vl_msg_api_alloc (sizeof (*mp));
 517   if (!mp)
 518     return 1;
 519
 520   clib_memset (mp, 0, sizeof (*mp));
 521   mp->_vl_msg_id = ntohs (VL_API_GBP_ENDPOINT_GROUP_DETAILS + GBP_MSG_BASE);
 522   mp->context = ctx->context;
 523
 524   mp->epg.uplink_sw_if_index = ntohl (gg->gg_uplink_sw_if_index);
 525   mp->epg.epg_id = ntohs (gg->gg_id);
 526   mp->epg.bd_id = ntohl (gbp_endpoint_group_get_bd_id (gg));
 527   mp->epg.rd_id = ntohl (gg->gg_rd);
 528
 529   vl_api_send_msg (ctx->reg, (u8 *) mp);
 530
 531   return (1);
 532 }
 533
 534 static void
 535 vl_api_gbp_endpoint_group_dump_t_handler (vl_api_gbp_endpoint_group_dump_t *
 536                                           mp)
 537 {
 538   vl_api_registration_t *reg;
 539
 540   reg = vl_api_client_index_to_registration (mp->client_index);
 541   if (!reg)
 542     return;
 543
 544   gbp_walk_ctx_t ctx = {
 545     .reg = reg,
 546     .context = mp->context,
 547   };
 548
 549   gbp_endpoint_group_walk (gbp_endpoint_group_send_details, &ctx);
 550 }
 551
 552 static int
 553 gbp_bridge_domain_send_details (gbp_bridge_domain_t * gb, void *args)
 554 {
 555   vl_api_gbp_bridge_domain_details_t *mp;
 556   gbp_walk_ctx_t *ctx;
 557
 558   ctx = args;
 559   mp = vl_msg_api_alloc (sizeof (*mp));
 560   if (!mp)
 561     return 1;
 562
 563   memset (mp, 0, sizeof (*mp));
 564   mp->_vl_msg_id = ntohs (VL_API_GBP_BRIDGE_DOMAIN_DETAILS + GBP_MSG_BASE);
 565   mp->context = ctx->context;
 566
 567   mp->bd.bd_id = ntohl (gb->gb_bd_id);
 568   mp->bd.bvi_sw_if_index = ntohl (gb->gb_bvi_sw_if_index);
 569   mp->bd.uu_fwd_sw_if_index = ntohl (gb->gb_uu_fwd_sw_if_index);
 570
 571   vl_api_send_msg (ctx->reg, (u8 *) mp);
 572
 573   return (1);
 574 }
 575
 576 static void
 577 vl_api_gbp_bridge_domain_dump_t_handler (vl_api_gbp_bridge_domain_dump_t * mp)
 578 {
 579   vl_api_registration_t *reg;
 580
 581   reg = vl_api_client_index_to_registration (mp->client_index);
 582   if (!reg)
 583     return;
 584
 585   gbp_walk_ctx_t ctx = {
 586     .reg = reg,
 587     .context = mp->context,
 588   };
 589
 590   gbp_bridge_domain_walk (gbp_bridge_domain_send_details, &ctx);
 591 }
 592
 593 static int
 594 gbp_route_domain_send_details (gbp_route_domain_t * grd, void *args)
 595 {
 596   vl_api_gbp_route_domain_details_t *mp;
 597   gbp_walk_ctx_t *ctx;
 598
 599   ctx = args;
 600   mp = vl_msg_api_alloc (sizeof (*mp));
 601   if (!mp)
 602     return 1;
 603
 604   memset (mp, 0, sizeof (*mp));
 605   mp->_vl_msg_id = ntohs (VL_API_GBP_ROUTE_DOMAIN_DETAILS + GBP_MSG_BASE);
 606   mp->context = ctx->context;
 607
 608   mp->rd.rd_id = ntohl (grd->grd_id);
 609   mp->rd.ip4_uu_sw_if_index =
 610     ntohl (grd->grd_uu_sw_if_index[FIB_PROTOCOL_IP4]);
 611   mp->rd.ip6_uu_sw_if_index =
 612     ntohl (grd->grd_uu_sw_if_index[FIB_PROTOCOL_IP6]);
 613
 614   vl_api_send_msg (ctx->reg, (u8 *) mp);
 615
 616   return (1);
 617 }
 618
 619 static void
 620 vl_api_gbp_route_domain_dump_t_handler (vl_api_gbp_route_domain_dump_t * mp)
 621 {
 622   vl_api_registration_t *reg;
 623
 624   reg = vl_api_client_index_to_registration (mp->client_index);
 625   if (!reg)
 626     return;
 627
 628   gbp_walk_ctx_t ctx = {
 629     .reg = reg,
 630     .context = mp->context,
 631   };
 632
 633   gbp_route_domain_walk (gbp_route_domain_send_details, &ctx);
 634 }
 635
 636 static void
 637 vl_api_gbp_recirc_add_del_t_handler (vl_api_gbp_recirc_add_del_t * mp)
 638 {
 639   vl_api_gbp_recirc_add_del_reply_t *rmp;
 640   u32 sw_if_index;
 641   int rv = 0;
 642
 643   sw_if_index = ntohl (mp->recirc.sw_if_index);
 644   if (!vnet_sw_if_index_is_api_valid (sw_if_index))
 645     goto bad_sw_if_index;
 646
 647   if (mp->is_add)
 648     gbp_recirc_add (sw_if_index,
 649                     ntohs (mp->recirc.epg_id), mp->recirc.is_ext);
 650   else
 651     gbp_recirc_delete (sw_if_index);
 652
 653   BAD_SW_IF_INDEX_LABEL;
 654
 655   REPLY_MACRO (VL_API_GBP_RECIRC_ADD_DEL_REPLY + GBP_MSG_BASE);
 656 }
 657
 658 static walk_rc_t
 659 gbp_recirc_send_details (gbp_recirc_t * gr, void *args)
 660 {
 661   vl_api_gbp_recirc_details_t *mp;
 662   gbp_walk_ctx_t *ctx;
 663
 664   ctx = args;
 665   mp = vl_msg_api_alloc (sizeof (*mp));
 666   if (!mp)
 667     return (WALK_STOP);
 668
 669   clib_memset (mp, 0, sizeof (*mp));
 670   mp->_vl_msg_id = ntohs (VL_API_GBP_RECIRC_DETAILS + GBP_MSG_BASE);
 671   mp->context = ctx->context;
 672
 673   mp->recirc.epg_id = ntohs (gr->gr_epg);
 674   mp->recirc.sw_if_index = ntohl (gr->gr_sw_if_index);
 675   mp->recirc.is_ext = ntohl (gr->gr_is_ext);
 676
 677   vl_api_send_msg (ctx->reg, (u8 *) mp);
 678
 679   return (WALK_CONTINUE);
 680 }
 681
 682 static void
 683 vl_api_gbp_recirc_dump_t_handler (vl_api_gbp_recirc_dump_t * mp)
 684 {
 685   vl_api_registration_t *reg;
 686
 687   reg = vl_api_client_index_to_registration (mp->client_index);
 688   if (!reg)
 689     return;
 690
 691   gbp_walk_ctx_t ctx = {
 692     .reg = reg,
 693     .context = mp->context,
 694   };
 695
 696   gbp_recirc_walk (gbp_recirc_send_details, &ctx);
 697 }
 698
 699 static void
 700 vl_api_gbp_ext_itf_add_del_t_handler (vl_api_gbp_ext_itf_add_del_t * mp)
 701 {
 702   vl_api_gbp_ext_itf_add_del_reply_t *rmp;
 703   u32 sw_if_index;
 704   int rv = 0;
 705
 706   sw_if_index = ntohl (mp->ext_itf.sw_if_index);
 707   if (!vnet_sw_if_index_is_api_valid (sw_if_index))
 708     goto bad_sw_if_index;
 709
 710   if (mp->is_add)
 711     rv = gbp_ext_itf_add (sw_if_index,
 712                           ntohl (mp->ext_itf.bd_id),
 713                           ntohl (mp->ext_itf.rd_id));
 714   else
 715     rv = gbp_ext_itf_delete (sw_if_index);
 716
 717   BAD_SW_IF_INDEX_LABEL;
 718
 719   REPLY_MACRO (VL_API_GBP_EXT_ITF_ADD_DEL_REPLY + GBP_MSG_BASE);
 720 }
 721
 722 static walk_rc_t
 723 gbp_ext_itf_send_details (gbp_ext_itf_t * gx, void *args)
 724 {
 725   vl_api_gbp_ext_itf_details_t *mp;
 726   gbp_walk_ctx_t *ctx;
 727
 728   ctx = args;
 729   mp = vl_msg_api_alloc (sizeof (*mp));
 730   if (!mp)
 731     return (WALK_STOP);
 732
 733   clib_memset (mp, 0, sizeof (*mp));
 734   mp->_vl_msg_id = ntohs (VL_API_GBP_EXT_ITF_DETAILS + GBP_MSG_BASE);
 735   mp->context = ctx->context;
 736
 737   mp->ext_itf.bd_id = ntohl (gbp_bridge_domain_get_bd_id (gx->gx_bd));
 738   mp->ext_itf.rd_id = ntohl (gbp_route_domain_get_rd_id (gx->gx_rd));
 739   mp->ext_itf.sw_if_index = ntohl (gx->gx_itf);
 740
 741   vl_api_send_msg (ctx->reg, (u8 *) mp);
 742
 743   return (WALK_CONTINUE);
 744 }
 745
 746 static void
 747 vl_api_gbp_ext_itf_dump_t_handler (vl_api_gbp_ext_itf_dump_t * mp)
 748 {
 749   vl_api_registration_t *reg;
 750
 751   reg = vl_api_client_index_to_registration (mp->client_index);
 752   if (!reg)
 753     return;
 754
 755   gbp_walk_ctx_t ctx = {
 756     .reg = reg,
 757     .context = mp->context,
 758   };
 759
 760   gbp_ext_itf_walk (gbp_ext_itf_send_details, &ctx);
 761 }
 762
 763 static int
 764 gbp_contract_rule_action_deocde (vl_api_gbp_rule_action_t in,
 765                                  gbp_rule_action_t * out)
 766 {
 767   in = clib_net_to_host_u32 (in);
 768
 769   switch (in)
 770     {
 771     case GBP_API_RULE_PERMIT:
 772       *out = GBP_RULE_PERMIT;
 773       return (0);
 774     case GBP_API_RULE_DENY:
 775       *out = GBP_RULE_DENY;
 776       return (0);
 777     case GBP_API_RULE_REDIRECT:
 778       *out = GBP_RULE_REDIRECT;
 779       return (0);
 780     }
 781
 782   return (-1);
 783 }
 784
 785 static int
 786 gbp_hash_mode_decode (vl_api_gbp_hash_mode_t in, gbp_hash_mode_t * out)
 787 {
 788   in = clib_net_to_host_u32 (in);
 789
 790   switch (in)
 791     {
 792     case GBP_API_HASH_MODE_SRC_IP:
 793       *out = GBP_HASH_MODE_SRC_IP;
 794       return (0);
 795     case GBP_API_HASH_MODE_DST_IP:
 796       *out = GBP_HASH_MODE_DST_IP;
 797       return (0);
 798     case GBP_API_HASH_MODE_SYMMETRIC:
 799       *out = GBP_HASH_MODE_SYMMETRIC;
 800       return (0);
 801     }
 802
 803   return (-2);
 804 }
 805
 806 static int
 807 gbp_next_hop_decode (const vl_api_gbp_next_hop_t * in, index_t * gnhi)
 808 {
 809   ip46_address_t ip;
 810   mac_address_t mac;
 811   index_t grd, gbd;
 812
 813   gbd = gbp_bridge_domain_find_and_lock (ntohl (in->bd_id));
 814
 815   if (INDEX_INVALID == gbd)
 816     return (VNET_API_ERROR_BD_NOT_MODIFIABLE);
 817
 818   grd = gbp_route_domain_find_and_lock (ntohl (in->rd_id));
 819
 820   if (INDEX_INVALID == grd)
 821     return (VNET_API_ERROR_NO_SUCH_FIB);
 822
 823   ip_address_decode (&in->ip, &ip);
 824   mac_address_decode (in->mac, &mac);
 825
 826   *gnhi = gbp_next_hop_alloc (&ip, grd, &mac, gbd);
 827
 828   return (0);
 829 }
 830
 831 static int
 832 gbp_next_hop_set_decode (const vl_api_gbp_next_hop_set_t * in,
 833                          gbp_hash_mode_t * hash_mode, index_t ** out)
 834 {
 835
 836   index_t *gnhis = NULL;
 837   int rv;
 838   u8 ii;
 839
 840   rv = gbp_hash_mode_decode (in->hash_mode, hash_mode);
 841
 842   if (0 != rv)
 843     return rv;
 844
 845   vec_validate (gnhis, in->n_nhs - 1);
 846
 847   for (ii = 0; ii < in->n_nhs; ii++)
 848     {
 849       rv = gbp_next_hop_decode (&in->nhs[ii], &gnhis[ii]);
 850
 851       if (0 != rv)
 852         {
 853           vec_free (gnhis);
 854           break;
 855         }
 856     }
 857
 858   *out = gnhis;
 859   return (rv);
 860 }
 861
 862 static int
 863 gbp_contract_rule_decode (const vl_api_gbp_rule_t * in, index_t * gui)
 864 {
 865   gbp_hash_mode_t hash_mode;
 866   gbp_rule_action_t action;
 867   index_t *nhs = NULL;
 868   int rv;
 869
 870   rv = gbp_contract_rule_action_deocde (in->action, &action);
 871
 872   if (0 != rv)
 873     return rv;
 874
 875   if (GBP_RULE_REDIRECT == action)
 876     {
 877       rv = gbp_next_hop_set_decode (&in->nh_set, &hash_mode, &nhs);
 878
 879       if (0 != rv)
 880         return (rv);
 881     }
 882   else
 883     {
 884       hash_mode = GBP_HASH_MODE_SRC_IP;
 885     }
 886
 887   *gui = gbp_rule_alloc (action, hash_mode, nhs);
 888
 889   return (rv);
 890 }
 891
 892 static int
 893 gbp_contract_rules_decode (u8 n_rules,
 894                            const vl_api_gbp_rule_t * rules, index_t ** out)
 895 {
 896   index_t *guis = NULL;
 897   int rv;
 898   u8 ii;
 899
 900   if (0 == n_rules)
 901     {
 902       *out = NULL;
 903       return (0);
 904     }
 905
 906   vec_validate (guis, n_rules - 1);
 907
 908   for (ii = 0; ii < n_rules; ii++)
 909     {
 910       rv = gbp_contract_rule_decode (&rules[ii], &guis[ii]);
 911
 912       if (0 != rv)
 913         {
 914           vec_free (guis);
 915           return (rv);
 916         }
 917     }
 918
 919   *out = guis;
 920   return (rv);
 921 }
 922
 923 static void
 924 vl_api_gbp_contract_add_del_t_handler (vl_api_gbp_contract_add_del_t * mp)
 925 {
 926   vl_api_gbp_contract_add_del_reply_t *rmp;
 927   u16 *allowed_ethertypes;
 928   index_t *rules;
 929   int ii, rv = 0;
 930   u8 *data, n_et;
 931   u16 *et;
 932
 933   if (mp->is_add)
 934     {
 935       rv = gbp_contract_rules_decode (mp->contract.n_rules,
 936                                       mp->contract.rules, &rules);
 937       if (0 != rv)
 938         goto out;
 939
 940       allowed_ethertypes = NULL;
 941
 942       /*
 943        * move past the variable legnth array of rules to get to the
 944        * allowed ether types
 945        */
 946       data = (((u8 *) & mp->contract.n_ether_types) +
 947               (sizeof (mp->contract.rules[0]) * mp->contract.n_rules));
 948       n_et = *data;
 949       et = (u16 *) (++data);
 950       vec_validate (allowed_ethertypes, n_et - 1);
 951
 952       for (ii = 0; ii < n_et; ii++)
 953         {
 954           /* leave the ether types in network order */
 955           allowed_ethertypes[ii] = et[ii];
 956         }
 957
 958       rv = gbp_contract_update (ntohs (mp->contract.src_epg),
 959                                 ntohs (mp->contract.dst_epg),
 960                                 ntohl (mp->contract.acl_index),
 961                                 rules, allowed_ethertypes);
 962     }
 963   else
 964     rv = gbp_contract_delete (ntohs (mp->contract.src_epg),
 965                               ntohs (mp->contract.dst_epg));
 966
 967 out:
 968   REPLY_MACRO (VL_API_GBP_CONTRACT_ADD_DEL_REPLY + GBP_MSG_BASE);
 969 }
 970
 971 static int
 972 gbp_contract_send_details (gbp_contract_t * gbpc, void *args)
 973 {
 974   vl_api_gbp_contract_details_t *mp;
 975   gbp_walk_ctx_t *ctx;
 976
 977   ctx = args;
 978   mp = vl_msg_api_alloc (sizeof (*mp));
 979   if (!mp)
 980     return 1;
 981
 982   clib_memset (mp, 0, sizeof (*mp));
 983   mp->_vl_msg_id = ntohs (VL_API_GBP_CONTRACT_DETAILS + GBP_MSG_BASE);
 984   mp->context = ctx->context;
 985
 986   mp->contract.src_epg = ntohs (gbpc->gc_key.gck_src);
 987   mp->contract.dst_epg = ntohs (gbpc->gc_key.gck_dst);
 988   // mp->contract.acl_index = ntohl (gbpc->gc_value.gc_acl_index);
 989
 990   vl_api_send_msg (ctx->reg, (u8 *) mp);
 991
 992   return (1);
 993 }
 994
 995 static void
 996 vl_api_gbp_contract_dump_t_handler (vl_api_gbp_contract_dump_t * mp)
 997 {
 998   vl_api_registration_t *reg;
 999
1000   reg = vl_api_client_index_to_registration (mp->client_index);
1001   if (!reg)
1002     return;
1003
1004   gbp_walk_ctx_t ctx = {
1005     .reg = reg,
1006     .context = mp->context,
1007   };
1008
1009   gbp_contract_walk (gbp_contract_send_details, &ctx);
1010 }
1011
1012 static int
1013 gbp_vxlan_tunnel_mode_2_layer (vl_api_gbp_vxlan_tunnel_mode_t mode,
1014                                gbp_vxlan_tunnel_layer_t * l)
1015 {
1016   mode = clib_net_to_host_u32 (mode);
1017
1018   switch (mode)
1019     {
1020     case GBP_VXLAN_TUNNEL_MODE_L2:
1021       *l = GBP_VXLAN_TUN_L2;
1022       return (0);
1023     case GBP_VXLAN_TUNNEL_MODE_L3:
1024       *l = GBP_VXLAN_TUN_L3;
1025       return (0);
1026     }
1027   return (-1);
1028 }
1029
1030 static void
1031 vl_api_gbp_vxlan_tunnel_add_t_handler (vl_api_gbp_vxlan_tunnel_add_t * mp)
1032 {
1033   vl_api_gbp_vxlan_tunnel_add_reply_t *rmp;
1034   gbp_vxlan_tunnel_layer_t layer;
1035   u32 sw_if_index;
1036   int rv = 0;
1037
1038   rv = gbp_vxlan_tunnel_mode_2_layer (mp->tunnel.mode, &layer);
1039
1040   if (0 != rv)
1041     goto out;
1042
1043   rv = gbp_vxlan_tunnel_add (ntohl (mp->tunnel.vni),
1044                              layer,
1045                              ntohl (mp->tunnel.bd_rd_id), &sw_if_index);
1046
1047 out:
1048   /* *INDENT-OFF* */
1049   REPLY_MACRO2 (VL_API_GBP_VXLAN_TUNNEL_ADD_REPLY + GBP_MSG_BASE,
1050   ({
1051     rmp->sw_if_index = htonl (sw_if_index);
1052   }));
1053   /* *INDENT-ON* */
1054 }
1055
1056 static void
1057 vl_api_gbp_vxlan_tunnel_del_t_handler (vl_api_gbp_vxlan_tunnel_add_t * mp)
1058 {
1059   vl_api_gbp_vxlan_tunnel_del_reply_t *rmp;
1060   int rv = 0;
1061
1062   rv = gbp_vxlan_tunnel_del (ntohl (mp->tunnel.vni));
1063
1064   REPLY_MACRO (VL_API_GBP_VXLAN_TUNNEL_DEL_REPLY + GBP_MSG_BASE);
1065 }
1066
1067 static vl_api_gbp_vxlan_tunnel_mode_t
1068 gbp_vxlan_tunnel_layer_2_mode (gbp_vxlan_tunnel_layer_t layer)
1069 {
1070   vl_api_gbp_vxlan_tunnel_mode_t mode = GBP_VXLAN_TUNNEL_MODE_L2;
1071
1072   switch (layer)
1073     {
1074     case GBP_VXLAN_TUN_L2:
1075       mode = GBP_VXLAN_TUNNEL_MODE_L2;
1076       break;
1077     case GBP_VXLAN_TUN_L3:
1078       mode = GBP_VXLAN_TUNNEL_MODE_L3;
1079       break;
1080     }
1081   mode = clib_host_to_net_u32 (mode);
1082
1083   return (mode);
1084 }
1085
1086 static walk_rc_t
1087 gbp_vxlan_tunnel_send_details (gbp_vxlan_tunnel_t * gt, void *args)
1088 {
1089   vl_api_gbp_vxlan_tunnel_details_t *mp;
1090   gbp_walk_ctx_t *ctx;
1091
1092   ctx = args;
1093   mp = vl_msg_api_alloc (sizeof (*mp));
1094   if (!mp)
1095     return 1;
1096
1097   memset (mp, 0, sizeof (*mp));
1098   mp->_vl_msg_id = htons (VL_API_GBP_VXLAN_TUNNEL_DETAILS + GBP_MSG_BASE);
1099   mp->context = ctx->context;
1100
1101   mp->tunnel.vni = htonl (gt->gt_vni);
1102   mp->tunnel.mode = gbp_vxlan_tunnel_layer_2_mode (gt->gt_layer);
1103   mp->tunnel.bd_rd_id = htonl (gt->gt_bd_rd_id);
1104
1105   vl_api_send_msg (ctx->reg, (u8 *) mp);
1106
1107   return (1);
1108 }
1109
1110 static void
1111 vl_api_gbp_vxlan_tunnel_dump_t_handler (vl_api_gbp_vxlan_tunnel_dump_t * mp)
1112 {
1113   vl_api_registration_t *reg;
1114
1115   reg = vl_api_client_index_to_registration (mp->client_index);
1116   if (!reg)
1117     return;
1118
1119   gbp_walk_ctx_t ctx = {
1120     .reg = reg,
1121     .context = mp->context,
1122   };
1123
1124   gbp_vxlan_walk (gbp_vxlan_tunnel_send_details, &ctx);
1125 }
1126
1127 /*
1128  * gbp_api_hookup
1129  * Add vpe's API message handlers to the table.
1130  * vlib has already mapped shared memory and
1131  * added the client registration handlers.
1132  * See .../vlib-api/vlibmemory/memclnt_vlib.c:memclnt_process()
1133  */
1134 #define vl_msg_name_crc_list
1135 #include <gbp/gbp_all_api_h.h>
1136 #undef vl_msg_name_crc_list
1137
1138 static void
1139 setup_message_id_table (api_main_t * am)
1140 {
1141 #define _(id,n,crc)                                     \
1142   vl_msg_api_add_msg_name_crc (am, #n "_" #crc, id + GBP_MSG_BASE);
1143   foreach_vl_msg_name_crc_gbp;
1144 #undef _
1145 }
1146
1147 static void
1148 gbp_api_hookup (vlib_main_t * vm)
1149 {
1150 #define _(N,n)                                                  \
1151     vl_msg_api_set_handlers(VL_API_##N + GBP_MSG_BASE,          \
1152                             #n,                                 \
1153                             vl_api_##n##_t_handler,             \
1154                             vl_noop_handler,                    \
1155                             vl_api_##n##_t_endian,              \
1156                             vl_api_##n##_t_print,               \
1157                             sizeof(vl_api_##n##_t), 1);
1158   foreach_gbp_api_msg;
1159 #undef _
1160 }
1161
1162 static clib_error_t *
1163 gbp_init (vlib_main_t * vm)
1164 {
1165   api_main_t *am = &api_main;
1166   gbp_main_t *gbpm = &gbp_main;
1167   u8 *name = format (0, "gbp_%08x%c", api_version, 0);
1168
1169   gbpm->gbp_acl_user_id = ~0;
1170
1171   /* Ask for a correctly-sized block of API message decode slots */
1172   msg_id_base = vl_msg_api_get_msg_ids ((char *) name,
1173                                         VL_MSG_FIRST_AVAILABLE);
1174   gbp_api_hookup (vm);
1175
1176   /* Add our API messages to the global name_crc hash table */
1177   setup_message_id_table (am);
1178
1179   vec_free (name);
1180   return (NULL);
1181 }
1182
1183 VLIB_API_INIT_FUNCTION (gbp_init);
1184
1185 /* *INDENT-OFF* */
1186 VLIB_PLUGIN_REGISTER () = {
1187     .version = VPP_BUILD_VER,
1188     .description = "Group Based Policy",
1189 };
1190 /* *INDENT-ON* */
1191
1192
1193 /*
1194  * fd.io coding-style-patch-verification: ON
1195  *
1196  * Local Variables:
1197  * eval: (c-set-style "gnu")
1198  * End:
1199  */