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