vnet/vnet/lisp-gpe/lisp_gpe.c

   1 /*
   2  * Copyright (c) 2016 Cisco and/or its affiliates.
   3  * Licensed under the Apache License, Version 2.0 (the "License");
   4  * you may not use this file except in compliance with the License.
   5  * You may obtain a copy of the License at:
   6  *
   7  *     http://www.apache.org/licenses/LICENSE-2.0
   8  *
   9  * Unless required by applicable law or agreed to in writing, software
  10  * distributed under the License is distributed on an "AS IS" BASIS,
  11  * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
  12  * See the License for the specific language governing permissions and
  13  * limitations under the License.
  14  */
  15
  16 #include <vnet/lisp-gpe/lisp_gpe.h>
  17
  18 lisp_gpe_main_t lisp_gpe_main;
  19
  20 static int
  21 lisp_gpe_rewrite (lisp_gpe_tunnel_t * t)
  22 {
  23   u8 *rw = 0;
  24   lisp_gpe_header_t * lisp0;
  25   int len;
  26
  27   if (ip_addr_version(&t->src) == IP4)
  28     {
  29       ip4_header_t * ip0;
  30       ip4_udp_lisp_gpe_header_t * h0;
  31       len = sizeof(*h0);
  32
  33       vec_validate_aligned(rw, len - 1, CLIB_CACHE_LINE_BYTES);
  34
  35       h0 = (ip4_udp_lisp_gpe_header_t *) rw;
  36
  37       /* Fixed portion of the (outer) ip4 header */
  38       ip0 = &h0->ip4;
  39       ip0->ip_version_and_header_length = 0x45;
  40       ip0->ttl = 254;
  41       ip0->protocol = IP_PROTOCOL_UDP;
  42
  43       /* we fix up the ip4 header length and checksum after-the-fact */
  44       ip_address_copy_addr(&ip0->src_address, &t->src);
  45       ip_address_copy_addr(&ip0->dst_address, &t->dst);
  46       ip0->checksum = ip4_header_checksum (ip0);
  47
  48       /* UDP header, randomize src port on something, maybe? */
  49       h0->udp.src_port = clib_host_to_net_u16 (4341);
  50       h0->udp.dst_port = clib_host_to_net_u16 (UDP_DST_PORT_lisp_gpe);
  51
  52       /* LISP-gpe header */
  53       lisp0 = &h0->lisp;
  54     }
  55   else
  56     {
  57       ip6_header_t * ip0;
  58       ip6_udp_lisp_gpe_header_t * h0;
  59       len = sizeof(*h0);
  60
  61       vec_validate_aligned(rw, len - 1, CLIB_CACHE_LINE_BYTES);
  62
  63       h0 = (ip6_udp_lisp_gpe_header_t *) rw;
  64
  65       /* Fixed portion of the (outer) ip6 header */
  66       ip0 = &h0->ip6;
  67       ip0->ip_version_traffic_class_and_flow_label =
  68           clib_host_to_net_u32 (0x6 << 28);
  69       ip0->hop_limit = 254;
  70       ip0->protocol = IP_PROTOCOL_UDP;
  71
  72       /* we fix up the ip6 header length after-the-fact */
  73       ip_address_copy_addr(&ip0->src_address, &t->src);
  74       ip_address_copy_addr(&ip0->dst_address, &t->dst);
  75
  76       /* UDP header, randomize src port on something, maybe? */
  77       h0->udp.src_port = clib_host_to_net_u16 (4341);
  78       h0->udp.dst_port = clib_host_to_net_u16 (UDP_DST_PORT_lisp_gpe);
  79
  80       /* LISP-gpe header */
  81       lisp0 = &h0->lisp;
  82     }
  83
  84   lisp0->flags = t->flags;
  85   lisp0->ver_res = t->ver_res;
  86   lisp0->res = t->res;
  87   lisp0->next_protocol = t->next_protocol;
  88   lisp0->iid = clib_host_to_net_u32 (t->vni);
  89
  90   t->rewrite = rw;
  91   return 0;
  92 }
  93
  94 #define foreach_copy_field                      \
  95 _(encap_fib_index)                              \
  96 _(decap_fib_index)                              \
  97 _(decap_next_index)                             \
  98 _(vni)
  99
 100 static u32
 101 add_del_ip_tunnel (vnet_lisp_gpe_add_del_fwd_entry_args_t *a,
 102                    u32 * tun_index_res)
 103 {
 104   lisp_gpe_main_t * lgm = &lisp_gpe_main;
 105   lisp_gpe_tunnel_t *t = 0;
 106   uword * p;
 107   int rv;
 108   lisp_gpe_tunnel_key_t key;
 109
 110   /* prepare tunnel key */
 111   memset(&key, 0, sizeof(key));
 112   ip_prefix_copy(&key.eid, &gid_address_ippref(&a->deid));
 113   ip_address_copy(&key.dst_loc, &a->dlocator);
 114   key.iid = clib_host_to_net_u32 (a->vni);
 115
 116   p = mhash_get (&lgm->lisp_gpe_tunnel_by_key, &key);
 117
 118   if (a->is_add)
 119     {
 120       /* adding a tunnel: tunnel must not already exist */
 121       if (p)
 122         return VNET_API_ERROR_INVALID_VALUE;
 123
 124       if (a->decap_next_index >= LISP_GPE_INPUT_N_NEXT)
 125         return VNET_API_ERROR_INVALID_DECAP_NEXT;
 126
 127       pool_get_aligned (lgm->tunnels, t, CLIB_CACHE_LINE_BYTES);
 128       memset (t, 0, sizeof (*t));
 129
 130       /* copy from arg structure */
 131 #define _(x) t->x = a->x;
 132       foreach_copy_field;
 133 #undef _
 134
 135       ip_address_copy(&t->src, &a->slocator);
 136       ip_address_copy(&t->dst, &a->dlocator);
 137
 138       t->flags |= LISP_GPE_FLAGS_P;
 139       t->next_protocol = ip_prefix_version(&key.eid) == IP4 ?
 140           LISP_GPE_NEXT_PROTO_IP4 : LISP_GPE_NEXT_PROTO_IP6;
 141
 142       rv = lisp_gpe_rewrite (t);
 143
 144       if (rv)
 145         {
 146           pool_put(lgm->tunnels, t);
 147           return rv;
 148         }
 149
 150       mhash_set(&lgm->lisp_gpe_tunnel_by_key, &key, t - lgm->tunnels, 0);
 151
 152       /* return tunnel index */
 153       if (tun_index_res)
 154         tun_index_res[0] = t - lgm->tunnels;
 155     }
 156   else
 157     {
 158       /* deleting a tunnel: tunnel must exist */
 159       if (!p)
 160         {
 161           clib_warning("Tunnel for eid %U doesn't exist!", format_gid_address,
 162                        &a->deid);
 163           return VNET_API_ERROR_NO_SUCH_ENTRY;
 164         }
 165
 166       t = pool_elt_at_index(lgm->tunnels, p[0]);
 167
 168       mhash_unset(&lgm->lisp_gpe_tunnel_by_key, &key, 0);
 169
 170       vec_free(t->rewrite);
 171       pool_put(lgm->tunnels, t);
 172     }
 173
 174   return 0;
 175 }
 176
 177 static int
 178 add_del_negative_fwd_entry (lisp_gpe_main_t * lgm,
 179                             vnet_lisp_gpe_add_del_fwd_entry_args_t * a)
 180 {
 181   ip_adjacency_t adj;
 182   /* setup adjacency for eid */
 183   memset (&adj, 0, sizeof(adj));
 184   adj.n_adj = 1;
 185   adj.explicit_fib_index = ~0;
 186
 187   ip_prefix_t * dpref = &gid_address_ippref(&a->deid);
 188   ip_prefix_t * spref = &gid_address_ippref(&a->seid);
 189
 190   switch (a->action)
 191     {
 192     case NO_ACTION:
 193       /* TODO update timers? */
 194     case FORWARD_NATIVE:
 195       /* TODO check if route/next-hop for eid exists in fib and add
 196        * more specific for the eid with the next-hop found */
 197     case SEND_MAP_REQUEST:
 198       /* insert tunnel that always sends map-request */
 199       adj.rewrite_header.sw_if_index = ~0;
 200       adj.lookup_next_index = (u32) (ip_prefix_version(dpref) == IP4) ?
 201                                      LGPE_IP4_LOOKUP_NEXT_LISP_CP_LOOKUP:
 202                                      LGPE_IP6_LOOKUP_NEXT_LISP_CP_LOOKUP;
 203       /* add/delete route for prefix */
 204       return ip_sd_fib_add_del_route (lgm, dpref, spref, a->table_id, &adj,
 205                                       a->is_add);
 206     case DROP:
 207       /* for drop fwd entries, just add route, no need to add encap tunnel */
 208       adj.lookup_next_index =  (u32) (ip_prefix_version(dpref) == IP4 ?
 209               LGPE_IP4_LOOKUP_NEXT_DROP : LGPE_IP6_LOOKUP_NEXT_DROP);
 210
 211       /* add/delete route for prefix */
 212       return ip_sd_fib_add_del_route (lgm, dpref, spref, a->table_id, &adj,
 213                                       a->is_add);
 214     default:
 215       return -1;
 216     }
 217 }
 218
 219 int
 220 vnet_lisp_gpe_add_del_fwd_entry (vnet_lisp_gpe_add_del_fwd_entry_args_t * a,
 221                                  u32 * hw_if_indexp)
 222 {
 223   lisp_gpe_main_t * lgm = &lisp_gpe_main;
 224   ip_adjacency_t adj, * adjp;
 225   u32 adj_index, rv, tun_index = ~0;
 226   ip_prefix_t * dpref, * spref;
 227   uword * lookup_next_index, * lgpe_sw_if_index, * lnip;
 228   u8 ip_ver;
 229
 230   /* treat negative fwd entries separately */
 231   if (a->is_negative)
 232     return add_del_negative_fwd_entry (lgm, a);
 233
 234   dpref = &gid_address_ippref(&a->deid);
 235   spref = &gid_address_ippref(&a->seid);
 236   ip_ver = ip_prefix_version(dpref);
 237
 238   /* add/del tunnel to tunnels pool and prepares rewrite */
 239   rv = add_del_ip_tunnel (a, &tun_index);
 240   if (rv)
 241     return rv;
 242
 243   /* setup adjacency for eid */
 244   memset (&adj, 0, sizeof(adj));
 245   adj.n_adj = 1;
 246
 247   /* fill in lookup_next_index with a 'legal' value to avoid problems */
 248   adj.lookup_next_index = (ip_ver == IP4) ?
 249           lgm->ip4_lookup_next_lgpe_ip4_lookup :
 250           lgm->ip6_lookup_next_lgpe_ip6_lookup;
 251
 252   if (a->is_add)
 253     {
 254       /* send packets that hit this adj to lisp-gpe interface output node in
 255        * requested vrf. */
 256       lnip = ip_ver == IP4 ?
 257               lgm->lgpe_ip4_lookup_next_index_by_table_id :
 258               lgm->lgpe_ip6_lookup_next_index_by_table_id;
 259       lookup_next_index = hash_get(lnip, a->table_id);
 260       lgpe_sw_if_index = hash_get(lgm->lisp_gpe_hw_if_index_by_table_id,
 261                                   a->table_id);
 262
 263       /* the assumption is that the interface must've been created before
 264        * programming the dp */
 265       ASSERT(lookup_next_index != 0);
 266       ASSERT(lgpe_sw_if_index != 0);
 267
 268       /* hijack explicit fib index to store lisp interface node index */
 269       adj.explicit_fib_index = lookup_next_index[0];
 270       adj.rewrite_header.node_index = tun_index;
 271       adj.rewrite_header.sw_if_index = lgpe_sw_if_index[0];
 272     }
 273
 274   /* add/delete route for prefix */
 275   rv = ip_sd_fib_add_del_route (lgm, dpref, spref, a->table_id, &adj,
 276                                 a->is_add);
 277
 278   /* check that everything worked */
 279   if (CLIB_DEBUG && a->is_add)
 280     {
 281       adj_index = ip_sd_fib_get_route (lgm, dpref, spref, a->table_id);
 282       ASSERT(adj_index != 0);
 283
 284       adjp = ip_get_adjacency ((ip_ver == IP4) ? lgm->lm4 : lgm->lm6,
 285                                adj_index);
 286
 287       ASSERT(adjp != 0);
 288       ASSERT(adjp->rewrite_header.node_index == tun_index);
 289     }
 290
 291   return rv;
 292 }
 293
 294 static clib_error_t *
 295 lisp_gpe_add_del_fwd_entry_command_fn (vlib_main_t * vm,
 296                                        unformat_input_t * input,
 297                                        vlib_cli_command_t * cmd)
 298 {
 299   unformat_input_t _line_input, * line_input = &_line_input;
 300   u8 is_add = 1;
 301   ip_address_t slocator, dlocator, *slocators = 0, *dlocators = 0;
 302   ip_prefix_t * prefp;
 303   gid_address_t * eids = 0, eid;
 304   clib_error_t * error = 0;
 305   u32 i;
 306
 307   prefp = &gid_address_ippref(&eid);
 308
 309   /* Get a line of input. */
 310   if (! unformat_user (input, unformat_line_input, line_input))
 311     return 0;
 312
 313   while (unformat_check_input (line_input) != UNFORMAT_END_OF_INPUT)
 314     {
 315       if (unformat (line_input, "del"))
 316         is_add = 0;
 317       else if (unformat (line_input, "add"))
 318         is_add = 1;
 319       else if (unformat (line_input, "eid %U slocator %U dlocator %U",
 320                          unformat_ip_prefix, prefp,
 321                          unformat_ip_address, &slocator,
 322                          unformat_ip_address, &dlocator))
 323         {
 324           vec_add1 (eids, eid);
 325           vec_add1 (slocators, slocator);
 326           vec_add1 (dlocators, dlocator);
 327         }
 328       else
 329         {
 330           error = unformat_parse_error (line_input);
 331           goto done;
 332         }
 333     }
 334   unformat_free (line_input);
 335
 336   if (vec_len (eids) + vec_len (slocators) == 0)
 337     {
 338       error = clib_error_return (0, "expected ip4/ip6 eids/locators.");
 339       goto done;
 340     }
 341
 342   if (vec_len (eids) != vec_len (slocators))
 343     {
 344       error = clib_error_return (0, "number of eids not equal to that of "
 345           "locators.");
 346       goto done;
 347     }
 348
 349   for (i = 0; i < vec_len(eids); i++)
 350     {
 351       vnet_lisp_gpe_add_del_fwd_entry_args_t a;
 352       memset (&a, 0, sizeof(a));
 353
 354       a.is_add = is_add;
 355       a.deid = eids[i];
 356       a.slocator = slocators[i];
 357       a.dlocator = dlocators[i];
 358       vnet_lisp_gpe_add_del_fwd_entry (&a, 0);
 359     }
 360
 361  done:
 362   vec_free(eids);
 363   vec_free(slocators);
 364   vec_free(dlocators);
 365   return error;
 366 }
 367
 368 VLIB_CLI_COMMAND (lisp_gpe_add_del_fwd_entry_command, static) = {
 369   .path = "lisp gpe maptunnel",
 370   .short_help = "lisp gpe maptunnel eid <eid> sloc <src-locator> "
 371       "dloc <dst-locator> [del]",
 372   .function = lisp_gpe_add_del_fwd_entry_command_fn,
 373 };
 374
 375 static u8 *
 376 format_decap_next (u8 * s, va_list * args)
 377 {
 378   u32 next_index = va_arg (*args, u32);
 379
 380   switch (next_index)
 381     {
 382     case LISP_GPE_INPUT_NEXT_DROP:
 383       return format (s, "drop");
 384     case LISP_GPE_INPUT_NEXT_IP4_INPUT:
 385       return format (s, "ip4");
 386     case LISP_GPE_INPUT_NEXT_IP6_INPUT:
 387       return format (s, "ip6");
 388     default:
 389       return format (s, "unknown %d", next_index);
 390     }
 391   return s;
 392 }
 393
 394 u8 *
 395 format_lisp_gpe_tunnel (u8 * s, va_list * args)
 396 {
 397   lisp_gpe_tunnel_t * t = va_arg (*args, lisp_gpe_tunnel_t *);
 398   lisp_gpe_main_t * lgm = &lisp_gpe_main;
 399
 400   s = format (s,
 401               "[%d] %U (src) %U (dst) fibs: encap %d, decap %d",
 402               t - lgm->tunnels,
 403               format_ip_address, &t->src,
 404               format_ip_address, &t->dst,
 405               t->encap_fib_index,
 406               t->decap_fib_index);
 407
 408   s = format (s, " decap next %U\n", format_decap_next, t->decap_next_index);
 409   s = format (s, "lisp ver %d ", (t->ver_res>>6));
 410
 411 #define _(n,v) if (t->flags & v) s = format (s, "%s-bit ", #n);
 412   foreach_lisp_gpe_flag_bit;
 413 #undef _
 414
 415   s = format (s, "next_protocol %d ver_res %x res %x\n",
 416               t->next_protocol, t->ver_res, t->res);
 417
 418   s = format (s, "iid %d (0x%x)\n", t->vni, t->vni);
 419   return s;
 420 }
 421
 422 static clib_error_t *
 423 show_lisp_gpe_tunnel_command_fn (vlib_main_t * vm,
 424                                 unformat_input_t * input,
 425                                 vlib_cli_command_t * cmd)
 426 {
 427   lisp_gpe_main_t * lgm = &lisp_gpe_main;
 428   lisp_gpe_tunnel_t * t;
 429
 430   if (pool_elts (lgm->tunnels) == 0)
 431     vlib_cli_output (vm, "No lisp-gpe tunnels configured...");
 432
 433   pool_foreach (t, lgm->tunnels,
 434   ({
 435     vlib_cli_output (vm, "%U", format_lisp_gpe_tunnel, t);
 436   }));
 437
 438   return 0;
 439 }
 440
 441 VLIB_CLI_COMMAND (show_lisp_gpe_tunnel_command, static) = {
 442     .path = "show lisp gpe tunnel",
 443     .function = show_lisp_gpe_tunnel_command_fn,
 444 };
 445
 446 u8
 447 vnet_lisp_gpe_enable_disable_status(void)
 448 {
 449   lisp_gpe_main_t * lgm = &lisp_gpe_main;
 450
 451   return lgm->is_en;
 452 }
 453
 454 clib_error_t *
 455 vnet_lisp_gpe_enable_disable (vnet_lisp_gpe_enable_disable_args_t * a)
 456 {
 457   lisp_gpe_main_t * lgm = &lisp_gpe_main;
 458   vnet_main_t * vnm = lgm->vnet_main;
 459
 460   if (a->is_en)
 461     {
 462       /* add lgpe_ip4_lookup as possible next_node for ip4 lookup */
 463       if (lgm->ip4_lookup_next_lgpe_ip4_lookup == ~0)
 464         {
 465           lgm->ip4_lookup_next_lgpe_ip4_lookup = vlib_node_add_next (
 466               vnm->vlib_main, ip4_lookup_node.index,
 467               lgpe_ip4_lookup_node.index);
 468         }
 469       /* add lgpe_ip6_lookup as possible next_node for ip6 lookup */
 470       if (lgm->ip6_lookup_next_lgpe_ip6_lookup == ~0)
 471         {
 472           lgm->ip6_lookup_next_lgpe_ip6_lookup = vlib_node_add_next (
 473               vnm->vlib_main, ip6_lookup_node.index,
 474               lgpe_ip6_lookup_node.index);
 475         }
 476       else
 477         {
 478           /* ask cp to re-add ifaces and defaults */
 479         }
 480
 481       lgm->is_en = 1;
 482     }
 483   else
 484     {
 485       CLIB_UNUSED(uword * val);
 486       hash_pair_t * p;
 487       u32 * table_ids = 0, * table_id;
 488       lisp_gpe_tunnel_key_t * tunnels = 0, * tunnel;
 489       vnet_lisp_gpe_add_del_fwd_entry_args_t _at, * at = &_at;
 490       vnet_lisp_gpe_add_del_iface_args_t _ai, * ai= &_ai;
 491
 492       /* remove all tunnels */
 493       mhash_foreach(tunnel, val, &lgm->lisp_gpe_tunnel_by_key, ({
 494         vec_add1(tunnels, tunnel[0]);
 495       }));
 496
 497       vec_foreach(tunnel, tunnels) {
 498         memset(at, 0, sizeof(at[0]));
 499         at->is_add = 0;
 500         gid_address_type(&at->deid) = GID_ADDR_IP_PREFIX;
 501         ip_prefix_copy(&gid_address_ippref(&at->deid), &tunnel->eid);
 502         ip_address_copy(&at->dlocator, &tunnel->dst_loc);
 503         vnet_lisp_gpe_add_del_fwd_entry (at, 0);
 504       }
 505       vec_free(tunnels);
 506
 507       /* disable all ifaces */
 508       hash_foreach_pair(p, lgm->lisp_gpe_hw_if_index_by_table_id, ({
 509         vec_add1(table_ids, p->key);
 510       }));
 511
 512       vec_foreach(table_id, table_ids) {
 513         ai->is_add = 0;
 514         ai->table_id = table_id[0];
 515
 516         /* disables interface and removes defaults */
 517         vnet_lisp_gpe_add_del_iface(ai, 0);
 518       }
 519       vec_free(table_ids);
 520       lgm->is_en = 0;
 521     }
 522
 523   return 0;
 524 }
 525
 526 static clib_error_t *
 527 lisp_gpe_enable_disable_command_fn (vlib_main_t * vm, unformat_input_t * input,
 528                                     vlib_cli_command_t * cmd)
 529 {
 530   unformat_input_t _line_input, * line_input = &_line_input;
 531   u8 is_en = 1;
 532   vnet_lisp_gpe_enable_disable_args_t _a, * a = &_a;
 533
 534   /* Get a line of input. */
 535   if (! unformat_user (input, unformat_line_input, line_input))
 536     return 0;
 537
 538   while (unformat_check_input (line_input) != UNFORMAT_END_OF_INPUT)
 539     {
 540       if (unformat (line_input, "enable"))
 541         is_en = 1;
 542       else if (unformat (line_input, "disable"))
 543         is_en = 0;
 544       else
 545         {
 546           return clib_error_return (0, "parse error: '%U'",
 547                                    format_unformat_error, line_input);
 548         }
 549     }
 550   a->is_en = is_en;
 551   return vnet_lisp_gpe_enable_disable (a);
 552 }
 553
 554 VLIB_CLI_COMMAND (enable_disable_lisp_gpe_command, static) = {
 555   .path = "lisp gpe",
 556   .short_help = "lisp gpe [enable|disable]",
 557   .function = lisp_gpe_enable_disable_command_fn,
 558 };
 559
 560 static clib_error_t *
 561 lisp_show_iface_command_fn (vlib_main_t * vm,
 562                             unformat_input_t * input,
 563                             vlib_cli_command_t * cmd)
 564 {
 565   lisp_gpe_main_t * lgm = &lisp_gpe_main;
 566   hash_pair_t * p;
 567
 568   vlib_cli_output (vm, "%=10s%=12s", "vrf", "hw_if_index");
 569   hash_foreach_pair (p, lgm->lisp_gpe_hw_if_index_by_table_id, ({
 570     vlib_cli_output (vm, "%=10d%=10d", p->key, p->value[0]);
 571   }));
 572   return 0;
 573 }
 574
 575 VLIB_CLI_COMMAND (lisp_show_iface_command) = {
 576     .path = "show lisp gpe interface",
 577     .short_help = "show lisp gpe interface",
 578     .function = lisp_show_iface_command_fn,
 579 };
 580
 581 clib_error_t *
 582 lisp_gpe_init (vlib_main_t *vm)
 583 {
 584   lisp_gpe_main_t * lgm = &lisp_gpe_main;
 585   clib_error_t * error = 0;
 586
 587   if ((error = vlib_call_init_function (vm, ip_main_init)))
 588     return error;
 589
 590   if ((error = vlib_call_init_function (vm, ip4_lookup_init)))
 591     return error;
 592
 593   lgm->vnet_main = vnet_get_main();
 594   lgm->vlib_main = vm;
 595   lgm->im4 = &ip4_main;
 596   lgm->im6 = &ip6_main;
 597   lgm->lm4 = &ip4_main.lookup_main;
 598   lgm->lm6 = &ip6_main.lookup_main;
 599   lgm->ip4_lookup_next_lgpe_ip4_lookup = ~0;
 600   lgm->ip6_lookup_next_lgpe_ip6_lookup = ~0;
 601
 602   mhash_init (&lgm->lisp_gpe_tunnel_by_key, sizeof(uword),
 603               sizeof(lisp_gpe_tunnel_key_t));
 604
 605   udp_register_dst_port (vm, UDP_DST_PORT_lisp_gpe,
 606                          lisp_gpe_ip4_input_node.index, 1 /* is_ip4 */);
 607   udp_register_dst_port (vm, UDP_DST_PORT_lisp_gpe6,
 608                          lisp_gpe_ip6_input_node.index, 0 /* is_ip4 */);
 609   return 0;
 610 }
 611
 612 u8 *
 613 format_vnet_lisp_gpe_status (u8 * s, va_list * args)
 614 {
 615   lisp_gpe_main_t * lgm = &lisp_gpe_main;
 616   return format (s, "%s", lgm->is_en ? "enabled" : "disabled");
 617 }
 618
 619 VLIB_INIT_FUNCTION(lisp_gpe_init);