src/vnet/mpls/mpls_api.c

   1 /*
   2  *------------------------------------------------------------------
   3  * mpls_api.c - mpls 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/mpls/mpls.h>
  26 #include <vnet/mpls/mpls_tunnel.h>
  27 #include <vnet/fib/fib_table.h>
  28 #include <vnet/fib/fib_api.h>
  29 #include <vnet/fib/mpls_fib.h>
  30 #include <vnet/fib/fib_path_list.h>
  31 #include <vnet/ip/ip_types_api.h>
  32
  33 #include <vnet/format_fns.h>
  34 #include <vnet/mpls/mpls.api_enum.h>
  35 #include <vnet/mpls/mpls.api_types.h>
  36
  37 #define REPLY_MSG_ID_BASE mpls_main.msg_id_base
  38 #include <vlibapi/api_helper_macros.h>
  39
  40 void
  41 mpls_table_delete (u32 table_id, u8 is_api)
  42 {
  43   u32 fib_index;
  44
  45   /*
  46    * The MPLS defult table must also be explicitly created via the API.
  47    * So in contrast to IP, it gets no special treatment here.
  48    *
  49    * The API holds only one lock on the table.
  50    * i.e. it can be added many times via the API but needs to be
  51    * deleted only once.
  52    */
  53   fib_index = fib_table_find (FIB_PROTOCOL_MPLS, table_id);
  54
  55   if (~0 != fib_index)
  56     {
  57       fib_table_unlock (fib_index,
  58                         FIB_PROTOCOL_MPLS,
  59                         (is_api ? FIB_SOURCE_API : FIB_SOURCE_CLI));
  60     }
  61 }
  62
  63 void
  64 vl_api_mpls_table_add_del_t_handler (vl_api_mpls_table_add_del_t * mp)
  65 {
  66   vl_api_mpls_table_add_del_reply_t *rmp;
  67   vnet_main_t *vnm;
  68   int rv = 0;
  69
  70   vnm = vnet_get_main ();
  71   vnm->api_errno = 0;
  72
  73   if (mp->mt_is_add)
  74     mpls_table_create (ntohl (mp->mt_table.mt_table_id),
  75                        1, mp->mt_table.mt_name);
  76   else
  77     mpls_table_delete (ntohl (mp->mt_table.mt_table_id), 1);
  78
  79   // NB: Nothing sets rv; none of the above returns an error
  80
  81   REPLY_MACRO (VL_API_MPLS_TABLE_ADD_DEL_REPLY);
  82 }
  83
  84 static int
  85 mpls_ip_bind_unbind_handler (vnet_main_t * vnm,
  86                              vl_api_mpls_ip_bind_unbind_t * mp)
  87 {
  88   u32 mpls_fib_index, ip_fib_index;
  89   fib_prefix_t pfx;
  90
  91   mpls_fib_index =
  92     fib_table_find (FIB_PROTOCOL_MPLS, ntohl (mp->mb_mpls_table_id));
  93
  94   if (~0 == mpls_fib_index)
  95     {
  96       return VNET_API_ERROR_NO_SUCH_FIB;
  97     }
  98
  99   ip_prefix_decode (&mp->mb_prefix, &pfx);
 100
 101   ip_fib_index = fib_table_find (pfx.fp_proto, ntohl (mp->mb_ip_table_id));
 102   if (~0 == ip_fib_index)
 103     return VNET_API_ERROR_NO_SUCH_FIB;
 104
 105   if (mp->mb_is_bind)
 106     fib_table_entry_local_label_add (ip_fib_index, &pfx,
 107                                      ntohl (mp->mb_label));
 108   else
 109     fib_table_entry_local_label_remove (ip_fib_index, &pfx,
 110                                         ntohl (mp->mb_label));
 111
 112   return (0);
 113 }
 114
 115 void
 116 vl_api_mpls_ip_bind_unbind_t_handler (vl_api_mpls_ip_bind_unbind_t * mp)
 117 {
 118   vl_api_mpls_ip_bind_unbind_reply_t *rmp;
 119   vnet_main_t *vnm;
 120   int rv;
 121
 122   vnm = vnet_get_main ();
 123   vnm->api_errno = 0;
 124
 125   rv = mpls_ip_bind_unbind_handler (vnm, mp);
 126   rv = (rv == 0) ? vnm->api_errno : rv;
 127
 128   REPLY_MACRO (VL_API_MPLS_IP_BIND_UNBIND_REPLY);
 129 }
 130
 131 static int
 132 mpls_route_add_del_t_handler (vnet_main_t * vnm,
 133                               vl_api_mpls_route_add_del_t * mp,
 134                               u32 * stats_index)
 135 {
 136   fib_route_path_t *rpaths = NULL, *rpath;
 137   vl_api_fib_path_t *apath;
 138   u32 fib_index;
 139   int rv, ii;
 140
 141   fib_prefix_t pfx = {
 142     .fp_len = 21,
 143     .fp_proto = FIB_PROTOCOL_MPLS,
 144     .fp_eos = mp->mr_route.mr_eos,
 145     .fp_label = ntohl (mp->mr_route.mr_label),
 146   };
 147   if (pfx.fp_eos)
 148     {
 149       pfx.fp_payload_proto = mp->mr_route.mr_eos_proto;
 150     }
 151   else
 152     {
 153       pfx.fp_payload_proto = DPO_PROTO_MPLS;
 154     }
 155
 156   rv = fib_api_table_id_decode (FIB_PROTOCOL_MPLS,
 157                                 ntohl (mp->mr_route.mr_table_id), &fib_index);
 158   if (0 != rv)
 159     goto out;
 160
 161   vec_validate (rpaths, mp->mr_route.mr_n_paths - 1);
 162
 163   for (ii = 0; ii < mp->mr_route.mr_n_paths; ii++)
 164     {
 165       apath = &mp->mr_route.mr_paths[ii];
 166       rpath = &rpaths[ii];
 167
 168       rv = fib_api_path_decode (apath, rpath);
 169
 170       if (0 != rv)
 171         goto out;
 172     }
 173
 174   rv = fib_api_route_add_del (
 175     mp->mr_is_add, mp->mr_is_multipath, fib_index, &pfx, FIB_SOURCE_API,
 176     (mp->mr_route.mr_is_multicast ? FIB_ENTRY_FLAG_MULTICAST :
 177                                     FIB_ENTRY_FLAG_NONE),
 178     rpaths);
 179
 180   if (mp->mr_is_add && 0 == rv)
 181     *stats_index = fib_table_entry_get_stats_index (fib_index, &pfx);
 182
 183 out:
 184   vec_free (rpaths);
 185
 186   return (rv);
 187 }
 188
 189 void
 190 vl_api_mpls_route_add_del_t_handler (vl_api_mpls_route_add_del_t * mp)
 191 {
 192   vl_api_mpls_route_add_del_reply_t *rmp;
 193   vnet_main_t *vnm;
 194   u32 stats_index;
 195   int rv;
 196
 197   vnm = vnet_get_main ();
 198   stats_index = ~0;
 199
 200   rv = mpls_route_add_del_t_handler (vnm, mp, &stats_index);
 201
 202   /* *INDENT-OFF* */
 203   REPLY_MACRO2 (VL_API_MPLS_ROUTE_ADD_DEL_REPLY,
 204   ({
 205     rmp->stats_index = htonl (stats_index);
 206   }));
 207   /* *INDENT-ON* */
 208 }
 209
 210 void
 211 mpls_table_create (u32 table_id, u8 is_api, const u8 * name)
 212 {
 213   /*
 214    * The MPLS defult table must also be explicitly created via the API.
 215    * So in contrast to IP, it gets no special treatment here.
 216    */
 217
 218   /*
 219    * The API holds only one lock on the table.
 220    * i.e. it can be added many times via the API but needs to be
 221    * deleted only once.
 222    */
 223       fib_table_find_or_create_and_lock_w_name (FIB_PROTOCOL_MPLS,
 224                                                 table_id,
 225                                                 (is_api ?
 226                                                  FIB_SOURCE_API :
 227                                                  FIB_SOURCE_CLI), name);
 228 }
 229
 230 static void
 231 vl_api_mpls_tunnel_add_del_t_handler (vl_api_mpls_tunnel_add_del_t * mp)
 232 {
 233   u32 tunnel_sw_if_index = ~0, tunnel_index = ~0;
 234   vl_api_mpls_tunnel_add_del_reply_t *rmp;
 235   fib_route_path_t *rpath, *rpaths = NULL;
 236   int ii, rv = 0;
 237
 238   vec_validate (rpaths, mp->mt_tunnel.mt_n_paths - 1);
 239
 240   for (ii = 0; ii < mp->mt_tunnel.mt_n_paths; ii++)
 241     {
 242       rpath = &rpaths[ii];
 243
 244       rv = fib_api_path_decode (&mp->mt_tunnel.mt_paths[ii], rpath);
 245
 246       if (0 != rv)
 247         goto out;
 248     }
 249   tunnel_sw_if_index = ntohl (mp->mt_tunnel.mt_sw_if_index);
 250
 251   if (mp->mt_is_add)
 252     {
 253       if (~0 == tunnel_sw_if_index)
 254         tunnel_sw_if_index =
 255           vnet_mpls_tunnel_create (mp->mt_tunnel.mt_l2_only,
 256                                    mp->mt_tunnel.mt_is_multicast,
 257                                    mp->mt_tunnel.mt_tag);
 258       vnet_mpls_tunnel_path_add (tunnel_sw_if_index, rpaths);
 259
 260       tunnel_index = vnet_mpls_tunnel_get_index (tunnel_sw_if_index);
 261     }
 262   else
 263     {
 264       tunnel_index = vnet_mpls_tunnel_get_index (tunnel_sw_if_index);
 265       tunnel_sw_if_index = ntohl (mp->mt_tunnel.mt_sw_if_index);
 266       if (!vnet_mpls_tunnel_path_remove (tunnel_sw_if_index, rpaths))
 267         vnet_mpls_tunnel_del (tunnel_sw_if_index);
 268     }
 269
 270   vec_free (rpaths);
 271
 272 out:
 273   /* *INDENT-OFF* */
 274   REPLY_MACRO2(VL_API_MPLS_TUNNEL_ADD_DEL_REPLY,
 275   ({
 276     rmp->sw_if_index = ntohl(tunnel_sw_if_index);
 277     rmp->tunnel_index = ntohl(tunnel_index);
 278   }));
 279   /* *INDENT-ON* */
 280 }
 281
 282 static void
 283   vl_api_sw_interface_set_mpls_enable_t_handler
 284   (vl_api_sw_interface_set_mpls_enable_t * mp)
 285 {
 286   vl_api_sw_interface_set_mpls_enable_reply_t *rmp;
 287   int rv = 0;
 288
 289   VALIDATE_SW_IF_INDEX (mp);
 290
 291   rv = mpls_sw_interface_enable_disable (&mpls_main, ntohl (mp->sw_if_index),
 292                                          mp->enable);
 293
 294   BAD_SW_IF_INDEX_LABEL;
 295   REPLY_MACRO (VL_API_SW_INTERFACE_SET_MPLS_ENABLE_REPLY);
 296 }
 297
 298 typedef struct mpls_tunnel_send_walk_ctx_t_
 299 {
 300   vl_api_registration_t *reg;
 301   u32 sw_if_index;
 302   u32 context;
 303 } mpls_tunnel_send_walk_ctx_t;
 304
 305 static void
 306 send_mpls_tunnel_entry (u32 mti, void *arg)
 307 {
 308   mpls_tunnel_send_walk_ctx_t *ctx;
 309   vl_api_mpls_tunnel_details_t *mp;
 310   fib_path_encode_ctx_t path_ctx = {
 311     .rpaths = NULL,
 312   };
 313   const mpls_tunnel_t *mt;
 314   fib_route_path_t *rpath;
 315   vl_api_fib_path_t *fp;
 316   u32 n;
 317
 318   ctx = arg;
 319
 320   mt = mpls_tunnel_get (mti);
 321
 322   if (~0 != ctx->sw_if_index && mt->mt_sw_if_index != ctx->sw_if_index)
 323     return;
 324
 325   n = fib_path_list_get_n_paths (mt->mt_path_list);
 326
 327   mp = vl_msg_api_alloc (sizeof (*mp) + n * sizeof (vl_api_fib_path_t));
 328   clib_memset (mp, 0, sizeof (*mp) + n * sizeof (vl_api_fib_path_t));
 329
 330   mp->_vl_msg_id = ntohs (REPLY_MSG_ID_BASE + VL_API_MPLS_TUNNEL_DETAILS);
 331   mp->context = ctx->context;
 332
 333   mp->mt_tunnel.mt_n_paths = n;
 334   mp->mt_tunnel.mt_sw_if_index = ntohl (mt->mt_sw_if_index);
 335   mp->mt_tunnel.mt_tunnel_index = ntohl (mti);
 336   mp->mt_tunnel.mt_l2_only = ! !(MPLS_TUNNEL_FLAG_L2 & mt->mt_flags);
 337   mp->mt_tunnel.mt_is_multicast = ! !(MPLS_TUNNEL_FLAG_MCAST & mt->mt_flags);
 338   memcpy (mp->mt_tunnel.mt_tag, mt->mt_tag, sizeof (mp->mt_tunnel.mt_tag));
 339
 340   fib_path_list_walk_w_ext (mt->mt_path_list,
 341                             &mt->mt_path_exts, fib_path_encode, &path_ctx);
 342
 343   fp = mp->mt_tunnel.mt_paths;
 344   vec_foreach (rpath, path_ctx.rpaths)
 345   {
 346     fib_api_path_encode (rpath, fp);
 347     fp++;
 348   }
 349
 350   vl_api_send_msg (ctx->reg, (u8 *) mp);
 351
 352   vec_free (path_ctx.rpaths);
 353 }
 354
 355 static void
 356 vl_api_mpls_tunnel_dump_t_handler (vl_api_mpls_tunnel_dump_t * mp)
 357 {
 358   vl_api_registration_t *reg;
 359
 360   reg = vl_api_client_index_to_registration (mp->client_index);
 361   if (!reg)
 362     return;
 363
 364   mpls_tunnel_send_walk_ctx_t ctx = {
 365     .reg = reg,
 366     .sw_if_index = ntohl (mp->sw_if_index),
 367     .context = mp->context,
 368   };
 369   mpls_tunnel_walk (send_mpls_tunnel_entry, &ctx);
 370 }
 371
 372 static void
 373 send_mpls_table_details (vpe_api_main_t * am,
 374                          vl_api_registration_t * reg,
 375                          u32 context, const fib_table_t * table)
 376 {
 377   vl_api_mpls_table_details_t *mp;
 378
 379   mp = vl_msg_api_alloc (sizeof (*mp));
 380   memset (mp, 0, sizeof (*mp));
 381   mp->_vl_msg_id = ntohs (REPLY_MSG_ID_BASE + VL_API_MPLS_TABLE_DETAILS);
 382   mp->context = context;
 383
 384   mp->mt_table.mt_table_id = htonl (table->ft_table_id);
 385   memcpy (mp->mt_table.mt_name,
 386           table->ft_desc,
 387           clib_min (vec_len (table->ft_desc), sizeof (mp->mt_table.mt_name)));
 388
 389   vl_api_send_msg (reg, (u8 *) mp);
 390 }
 391
 392 static void
 393 vl_api_mpls_table_dump_t_handler (vl_api_mpls_table_dump_t * mp)
 394 {
 395   vpe_api_main_t *am = &vpe_api_main;
 396   vl_api_registration_t *reg;
 397   mpls_main_t *mm = &mpls_main;
 398   fib_table_t *fib_table;
 399
 400   reg = vl_api_client_index_to_registration (mp->client_index);
 401   if (!reg)
 402     return;
 403
 404   /* *INDENT-OFF* */
 405   pool_foreach (fib_table, mm->fibs)
 406    {
 407     send_mpls_table_details(am, reg, mp->context, fib_table);
 408   }
 409   /* *INDENT-ON* */
 410 }
 411
 412 static void
 413 send_mpls_route_details (vpe_api_main_t * am,
 414                          vl_api_registration_t * reg,
 415                          u32 context, fib_node_index_t fib_entry_index)
 416 {
 417   fib_route_path_t *rpaths, *rpath;
 418   vl_api_mpls_route_details_t *mp;
 419   const fib_prefix_t *pfx;
 420   vl_api_fib_path_t *fp;
 421   int path_count;
 422
 423   rpaths = fib_entry_encode (fib_entry_index);
 424   pfx = fib_entry_get_prefix (fib_entry_index);
 425
 426   path_count = vec_len (rpaths);
 427   mp = vl_msg_api_alloc (sizeof (*mp) + path_count * sizeof (*fp));
 428   if (!mp)
 429     return;
 430   clib_memset (mp, 0, sizeof (*mp));
 431   mp->_vl_msg_id = ntohs (REPLY_MSG_ID_BASE + VL_API_MPLS_ROUTE_DETAILS);
 432   mp->context = context;
 433
 434   mp->mr_route.mr_table_id =
 435     htonl (fib_table_get_table_id
 436            (fib_entry_get_fib_index (fib_entry_index), pfx->fp_proto));
 437   mp->mr_route.mr_eos = pfx->fp_eos;
 438   mp->mr_route.mr_eos_proto = pfx->fp_payload_proto;
 439   mp->mr_route.mr_label = htonl (pfx->fp_label);
 440
 441   mp->mr_route.mr_n_paths = path_count;
 442   fp = mp->mr_route.mr_paths;
 443   vec_foreach (rpath, rpaths)
 444   {
 445     fib_api_path_encode (rpath, fp);
 446     fp++;
 447   }
 448
 449   vec_free (rpaths);
 450   vl_api_send_msg (reg, (u8 *) mp);
 451 }
 452
 453 typedef struct vl_api_mpls_route_dump_table_walk_ctx_t_
 454 {
 455   fib_node_index_t *lfeis;
 456 } vl_api_mpls_route_dump_table_walk_ctx_t;
 457
 458 static fib_table_walk_rc_t
 459 vl_api_mpls_route_dump_table_walk (fib_node_index_t fei, void *arg)
 460 {
 461   vl_api_mpls_route_dump_table_walk_ctx_t *ctx = arg;
 462
 463   vec_add1 (ctx->lfeis, fei);
 464
 465   return (FIB_TABLE_WALK_CONTINUE);
 466 }
 467
 468 static void
 469 vl_api_mpls_route_dump_t_handler (vl_api_mpls_route_dump_t * mp)
 470 {
 471   vpe_api_main_t *am = &vpe_api_main;
 472   vl_api_registration_t *reg;
 473   fib_node_index_t *lfeip = NULL;
 474   vl_api_mpls_route_dump_table_walk_ctx_t ctx = {
 475     .lfeis = NULL,
 476   };
 477   u32 fib_index;
 478
 479   reg = vl_api_client_index_to_registration (mp->client_index);
 480   if (!reg)
 481     return;
 482
 483   fib_index = fib_table_find (FIB_PROTOCOL_MPLS,
 484                               ntohl (mp->table.mt_table_id));
 485
 486   if (INDEX_INVALID != fib_index)
 487     {
 488       fib_table_walk (fib_index,
 489                       FIB_PROTOCOL_MPLS,
 490                       vl_api_mpls_route_dump_table_walk, &ctx);
 491       vec_sort_with_function (ctx.lfeis, fib_entry_cmp_for_sort);
 492
 493       vec_foreach (lfeip, ctx.lfeis)
 494       {
 495         send_mpls_route_details (am, reg, mp->context, *lfeip);
 496       }
 497
 498       vec_free (ctx.lfeis);
 499     }
 500 }
 501
 502 #include <vnet/mpls/mpls.api.c>
 503 static clib_error_t *
 504 mpls_api_hookup (vlib_main_t * vm)
 505 {
 506   api_main_t *am = vlibapi_get_main ();
 507
 508   /*
 509    * Trace space for 8 MPLS encap labels
 510    */
 511   am->api_trace_cfg[VL_API_MPLS_TUNNEL_ADD_DEL].size += 8 * sizeof (u32);
 512
 513   /*
 514    * Set up the (msg_name, crc, message-id) table
 515    */
 516   REPLY_MSG_ID_BASE = setup_message_id_table ();
 517
 518   return 0;
 519 }
 520
 521 VLIB_API_INIT_FUNCTION (mpls_api_hookup);
 522
 523 /*
 524  * fd.io coding-style-patch-verification: ON
 525  *
 526  * Local Variables:
 527  * eval: (c-set-style "gnu")
 528  * End:
 529  */