fib: fix crash when create vxlan/vxlan-gpe/geneve/gtpu tunnel.
[vpp.git] / src / vnet / fib / fib_types.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/ip/ip.h>
17
18 #include <vnet/fib/fib_types.h>
19 #include <vnet/fib/fib_internal.h>
20 #include <vnet/fib/fib_table.h>
21 #include <vnet/mfib/mfib_types.h>
22 #include <vnet/mpls/mpls.h>
23
24 /*
25  * arrays of protocol and link names
26  */
27 static const char* fib_protocol_names[] = FIB_PROTOCOLS;
28 static const char* vnet_link_names[] = VNET_LINKS;
29 static const char* fib_forw_chain_names[] = FIB_FORW_CHAINS;
30 static const char* fib_mpls_lsp_mode_names[] = FIB_MPLS_LSP_MODES;
31
32 u8 *
33 format_fib_protocol (u8 * s, va_list * ap)
34 {
35     fib_protocol_t proto = va_arg(*ap, int); // fib_protocol_t promotion
36
37     return (format (s, "%s", fib_protocol_names[proto]));
38 }
39
40 u8 *
41 format_vnet_link (u8 * s, va_list * ap)
42 {
43     vnet_link_t link = va_arg(*ap, int); // vnet_link_t promotion
44
45     return (format (s, "%s", vnet_link_names[link]));
46 }
47
48 u8 *
49 format_fib_forw_chain_type (u8 * s, va_list * args)
50 {
51     fib_forward_chain_type_t fct = va_arg(*args, int);
52
53     return (format (s, "%s", fib_forw_chain_names[fct]));
54 }
55
56 u8 *
57 format_fib_mpls_lsp_mode(u8 *s, va_list *ap)
58 {
59     fib_mpls_lsp_mode_t mode = va_arg(*ap, int);
60
61     return (format (s, "%s", fib_mpls_lsp_mode_names[mode])); 
62 }
63
64 u8 *
65 format_fib_mpls_label (u8 *s, va_list *ap)
66 {
67     fib_mpls_label_t *label = va_arg(*ap, fib_mpls_label_t *);
68
69     s = format(s, "%U %U ttl:%d exp:%d",
70                format_mpls_unicast_label,
71                label->fml_value,
72                format_fib_mpls_lsp_mode,
73                label->fml_mode,
74                label->fml_ttl,
75                label->fml_exp);
76
77     return (s);
78 }
79
80 void
81 fib_prefix_from_ip46_addr (fib_protocol_t fproto,
82                            const ip46_address_t *addr,
83                            fib_prefix_t *pfx)
84 {
85     ASSERT(FIB_PROTOCOL_MPLS != fproto);
86
87     pfx->fp_proto = fproto;
88     pfx->fp_len = ((FIB_PROTOCOL_IP4 == fproto) ?
89                     32 : 128);
90     pfx->fp_addr = *addr;
91     pfx->___fp___pad = 0;
92 }
93
94 u8 *
95 format_fib_route_path_flags (u8 *s, va_list *ap)
96 {
97     fib_route_path_flags_t flags = va_arg (*ap, fib_route_path_flags_t);
98
99     if (flags & FIB_ROUTE_PATH_RESOLVE_VIA_HOST)
100         s = format (s, "via-host");
101     if (flags & FIB_ROUTE_PATH_RESOLVE_VIA_ATTACHED)
102         s = format (s, "via-attached,");
103     if (flags & FIB_ROUTE_PATH_LOCAL)
104         s = format (s, "local,");
105     if (flags & FIB_ROUTE_PATH_ATTACHED)
106         s = format (s, "attached,");
107     if (flags & FIB_ROUTE_PATH_DROP)
108          s = format (s, "drop,");
109    if (flags & FIB_ROUTE_PATH_EXCLUSIVE)
110         s = format (s, "exclusive,");
111     if (flags & FIB_ROUTE_PATH_INTF_RX)
112         s = format (s, "intf-rx,");
113     if (flags & FIB_ROUTE_PATH_RPF_ID)
114         s = format (s, "rpf-id,");
115     if (flags & FIB_ROUTE_PATH_SOURCE_LOOKUP)
116         s = format (s, "src-lkup,");
117     if (flags & FIB_ROUTE_PATH_UDP_ENCAP)
118         s = format (s, "udp-encap,");
119     if (flags & FIB_ROUTE_PATH_BIER_FMASK)
120         s = format (s, "bier-fmask,");
121     if (flags & FIB_ROUTE_PATH_BIER_TABLE)
122         s = format (s, "bier-table,");
123     if (flags & FIB_ROUTE_PATH_BIER_IMP)
124         s = format (s, "bier-imp,");
125     if (flags & FIB_ROUTE_PATH_DEAG)
126         s = format (s, "deag,");
127     if (flags & FIB_ROUTE_PATH_DVR)
128         s = format (s, "dvr,");
129     if (flags & FIB_ROUTE_PATH_ICMP_UNREACH)
130         s = format (s, "imcp-unreach,");
131     if (flags & FIB_ROUTE_PATH_ICMP_PROHIBIT)
132         s = format (s, "icmp-prohibit,");
133     if (flags & FIB_ROUTE_PATH_CLASSIFY)
134         s = format (s, "classify,");
135     if (flags & FIB_ROUTE_PATH_POP_PW_CW)
136         s = format (s, "pop-pw-cw,");
137
138     return (s);
139 }
140
141 u8 *
142 format_fib_route_path (u8 *s, va_list *ap)
143 {
144     fib_route_path_t *rpath = va_arg (*ap, fib_route_path_t*);
145
146     s = format (s, "%U %U, %U, [%U]",
147                 format_dpo_proto, rpath->frp_proto,
148                 format_ip46_address, &rpath->frp_addr, IP46_TYPE_ANY,
149                 format_vnet_sw_if_index_name, vnet_get_main (),
150                 rpath->frp_sw_if_index,
151                 format_fib_route_path_flags, rpath->frp_flags);
152
153     return (s);
154 }
155
156 void
157 fib_prefix_from_mpls_label (mpls_label_t label,
158                             mpls_eos_bit_t eos,
159                             fib_prefix_t *pfx)
160 {
161     pfx->fp_proto = FIB_PROTOCOL_MPLS;
162     pfx->fp_len = 21;
163     pfx->fp_label = label;
164     pfx->fp_eos = eos;
165     pfx->___fp___pad = 0;
166 }
167
168 void
169 fib_prefix_copy (fib_prefix_t *dst,
170                  const fib_prefix_t *src)
171 {
172     clib_memcpy(dst, src, sizeof(*dst));
173 }
174
175 int
176 fib_prefix_cmp (const fib_prefix_t *p1,
177                 const fib_prefix_t *p2)
178 {
179     int res;
180
181     res = (p1->fp_proto - p2->fp_proto);
182
183     if (0 == res)
184     {
185         switch (p1->fp_proto)
186         {
187         case FIB_PROTOCOL_IP4:
188         case FIB_PROTOCOL_IP6:
189             res = (p1->fp_len - p2->fp_len);
190
191             if (0 == res)
192             {
193                 res = ip46_address_cmp(&p1->fp_addr, &p2->fp_addr);
194             }
195             break;
196         case FIB_PROTOCOL_MPLS:
197             res = (p1->fp_label - p2->fp_label);
198
199             if (0 == res)
200             {
201                 res = (p1->fp_eos - p2->fp_eos);
202             }
203             break;
204         }
205     }
206
207     return (res);
208 }
209
210 int
211 fib_prefix_is_cover (const fib_prefix_t *p1,
212                      const fib_prefix_t *p2)
213 {
214     switch (p1->fp_proto)
215     {
216     case FIB_PROTOCOL_IP4:
217         return (ip4_destination_matches_route(&ip4_main,
218                                               &p1->fp_addr.ip4,
219                                               &p2->fp_addr.ip4,
220                                               p1->fp_len));
221     case FIB_PROTOCOL_IP6:
222         return (ip6_destination_matches_route(&ip6_main,
223                                               &p1->fp_addr.ip6,
224                                               &p2->fp_addr.ip6,
225                                               p1->fp_len));
226     case FIB_PROTOCOL_MPLS:
227         break;
228     }
229     return (0);
230 }
231
232 u8
233 fib_prefix_get_host_length (fib_protocol_t proto)
234 {
235     switch (proto)
236     {
237     case FIB_PROTOCOL_IP4:
238         return (32);
239     case FIB_PROTOCOL_IP6:
240         return (128);
241     case FIB_PROTOCOL_MPLS:
242         return (21);
243     }
244     return (0);
245 }
246
247 int
248 fib_prefix_is_host (const fib_prefix_t *prefix)
249 {
250     switch (prefix->fp_proto)
251     {
252     case FIB_PROTOCOL_IP4:
253         return (prefix->fp_len == 32);
254     case FIB_PROTOCOL_IP6:
255         return (prefix->fp_len == 128);
256     case FIB_PROTOCOL_MPLS:
257         return (!0);
258     }
259     return (0);
260 }
261
262 void
263 fib_prefix_normalize (const fib_prefix_t *p,
264                       fib_prefix_t *out)
265 {
266     fib_prefix_copy (out, p);
267
268     switch (p->fp_proto)
269     {
270     case FIB_PROTOCOL_IP4:
271         ip4_address_normalize(&out->fp_addr.ip4, out->fp_len);
272         break;
273     case FIB_PROTOCOL_IP6:
274         ip6_address_normalize(&out->fp_addr.ip6, out->fp_len);
275         break;
276     case FIB_PROTOCOL_MPLS:
277         break;
278     }
279 }
280
281 u8 *
282 format_fib_prefix (u8 * s, va_list * args)
283 {
284     fib_prefix_t *fp = va_arg (*args, fib_prefix_t *);
285
286     /*
287      * protocol specific so it prints ::/0 correctly.
288      */
289     switch (fp->fp_proto)
290     {
291     case FIB_PROTOCOL_IP6:
292     {
293         ip6_address_t p6 = fp->fp_addr.ip6;
294
295         ip6_address_mask(&p6, &(ip6_main.fib_masks[fp->fp_len]));
296         s = format (s, "%U", format_ip6_address, &p6);
297         break;
298     }
299     case FIB_PROTOCOL_IP4:
300     {
301         ip4_address_t p4 = fp->fp_addr.ip4;
302         p4.as_u32 &= ip4_main.fib_masks[fp->fp_len];
303
304         s = format (s, "%U", format_ip4_address, &p4);
305         break;
306     }
307     case FIB_PROTOCOL_MPLS:
308         s = format (s, "%U:%U",
309                     format_mpls_unicast_label, fp->fp_label,
310                     format_mpls_eos_bit, fp->fp_eos);
311         break;
312     }
313     s = format (s, "/%d", fp->fp_len);
314
315     return (s);
316 }
317
318 int
319 fib_route_path_cmp (const fib_route_path_t *rpath1,
320                     const fib_route_path_t *rpath2)
321 {
322     int res;
323
324     res = ip46_address_cmp(&rpath1->frp_addr,
325                            &rpath2->frp_addr);
326
327     if (0 != res) return (res);
328
329     res = (rpath1->frp_sw_if_index - rpath2->frp_sw_if_index);
330
331     if (0 != res) return (res);
332
333     if (ip46_address_is_zero(&rpath1->frp_addr))
334     {
335         res = rpath1->frp_fib_index - rpath2->frp_fib_index;
336     }
337
338     return (res);
339 }
340
341 dpo_proto_t
342 fib_proto_to_dpo (fib_protocol_t fib_proto)
343 {
344     switch (fib_proto)
345     {
346     case FIB_PROTOCOL_IP6:
347         return (DPO_PROTO_IP6);
348     case FIB_PROTOCOL_IP4:
349         return (DPO_PROTO_IP4);
350     case FIB_PROTOCOL_MPLS:
351         return (DPO_PROTO_MPLS);
352     }
353     ASSERT(0);
354     return (0);
355 }
356
357 fib_protocol_t
358 dpo_proto_to_fib (dpo_proto_t dpo_proto)
359 {
360     switch (dpo_proto)
361     {
362     case DPO_PROTO_IP6:
363         return (FIB_PROTOCOL_IP6);
364     case DPO_PROTO_IP4:
365         return (FIB_PROTOCOL_IP4);
366     case DPO_PROTO_MPLS:
367         return (FIB_PROTOCOL_MPLS);
368     default:
369         break;
370     }
371     ASSERT(0);
372     return (0);
373 }
374
375 vnet_link_t
376 fib_proto_to_link (fib_protocol_t proto)
377 {
378     switch (proto)
379     {
380     case FIB_PROTOCOL_IP4:
381         return (VNET_LINK_IP4);
382     case FIB_PROTOCOL_IP6:
383         return (VNET_LINK_IP6);
384     case FIB_PROTOCOL_MPLS:
385         return (VNET_LINK_MPLS);
386     }
387     ASSERT(0);
388     return (0);
389 }
390
391 ip46_type_t
392 fib_proto_to_ip46 (fib_protocol_t fproto)
393 {
394     switch (fproto)
395     {
396     case FIB_PROTOCOL_IP4:
397         return (IP46_TYPE_IP4);
398     case FIB_PROTOCOL_IP6:
399         return (IP46_TYPE_IP6);
400     case FIB_PROTOCOL_MPLS:
401         return (IP46_TYPE_ANY);
402     }
403     ASSERT(0);
404     return (IP46_TYPE_ANY);
405 }
406
407 fib_protocol_t
408 fib_proto_from_ip46 (ip46_type_t iproto)
409 {
410     switch (iproto)
411     {
412     case IP46_TYPE_IP4:
413         return FIB_PROTOCOL_IP4;
414     case IP46_TYPE_IP6:
415         return FIB_PROTOCOL_IP6;
416     case IP46_TYPE_ANY:
417         ASSERT(0);
418         return FIB_PROTOCOL_IP4;
419     }
420
421     ASSERT(0);
422     return FIB_PROTOCOL_IP4;
423 }
424
425 fib_forward_chain_type_t
426 fib_forw_chain_type_from_dpo_proto (dpo_proto_t proto)
427 {
428     switch (proto)
429     {
430     case DPO_PROTO_IP4:
431         return (FIB_FORW_CHAIN_TYPE_UNICAST_IP4);
432     case DPO_PROTO_IP6:
433         return (FIB_FORW_CHAIN_TYPE_UNICAST_IP6);
434     case DPO_PROTO_MPLS:
435         return (FIB_FORW_CHAIN_TYPE_MPLS_NON_EOS);
436     case DPO_PROTO_ETHERNET:
437         return (FIB_FORW_CHAIN_TYPE_ETHERNET);
438     case DPO_PROTO_NSH:
439         return (FIB_FORW_CHAIN_TYPE_NSH);
440     case DPO_PROTO_BIER:
441         return (FIB_FORW_CHAIN_TYPE_BIER);
442     }
443     ASSERT(0);
444     return (FIB_FORW_CHAIN_TYPE_UNICAST_IP4);
445 }
446
447 fib_forward_chain_type_t
448 fib_forw_chain_type_from_fib_proto (fib_protocol_t proto)
449 {
450     switch (proto)
451     {
452     case FIB_PROTOCOL_IP4:
453         return (FIB_FORW_CHAIN_TYPE_UNICAST_IP4);
454     case FIB_PROTOCOL_IP6:
455         return (FIB_FORW_CHAIN_TYPE_UNICAST_IP6);
456     case FIB_PROTOCOL_MPLS:
457         return (FIB_FORW_CHAIN_TYPE_MPLS_NON_EOS);
458     }
459     ASSERT(0);
460     return (FIB_FORW_CHAIN_TYPE_UNICAST_IP4);
461 }
462
463 vnet_link_t
464 fib_forw_chain_type_to_link_type (fib_forward_chain_type_t fct)
465 {
466     switch (fct)
467     {
468     case FIB_FORW_CHAIN_TYPE_UNICAST_IP4:
469     case FIB_FORW_CHAIN_TYPE_MCAST_IP4:
470         return (VNET_LINK_IP4);
471     case FIB_FORW_CHAIN_TYPE_UNICAST_IP6:
472     case FIB_FORW_CHAIN_TYPE_MCAST_IP6:
473         return (VNET_LINK_IP6);
474     case FIB_FORW_CHAIN_TYPE_ETHERNET:
475         return (VNET_LINK_ETHERNET);
476     case FIB_FORW_CHAIN_TYPE_NSH:
477         return (VNET_LINK_NSH);
478     case FIB_FORW_CHAIN_TYPE_MPLS_EOS:
479     case FIB_FORW_CHAIN_TYPE_BIER:
480         /*
481          * insufficient information to to convert
482          */
483         ASSERT(0);
484         break;
485     case FIB_FORW_CHAIN_TYPE_MPLS_NON_EOS:
486         return (VNET_LINK_MPLS);
487     }
488     return (VNET_LINK_IP4);
489 }
490
491 fib_forward_chain_type_t
492 fib_forw_chain_type_from_link_type (vnet_link_t link_type)
493 {
494     switch (link_type)
495     {
496     case VNET_LINK_IP4:
497         return (FIB_FORW_CHAIN_TYPE_UNICAST_IP4);
498     case VNET_LINK_IP6:
499         return (FIB_FORW_CHAIN_TYPE_UNICAST_IP6);
500     case VNET_LINK_MPLS:
501         return (FIB_FORW_CHAIN_TYPE_MPLS_NON_EOS);
502     case VNET_LINK_ETHERNET:
503         return (FIB_FORW_CHAIN_TYPE_ETHERNET);
504     case VNET_LINK_NSH:
505         return (FIB_FORW_CHAIN_TYPE_NSH);
506     case VNET_LINK_ARP:
507         break;
508     }
509
510     ASSERT(0);
511     return (FIB_FORW_CHAIN_TYPE_UNICAST_IP4);
512 }
513
514 dpo_proto_t
515 fib_forw_chain_type_to_dpo_proto (fib_forward_chain_type_t fct)
516 {
517     switch (fct)
518     {
519     case FIB_FORW_CHAIN_TYPE_UNICAST_IP4:
520     case FIB_FORW_CHAIN_TYPE_MCAST_IP4:
521         return (DPO_PROTO_IP4);
522     case FIB_FORW_CHAIN_TYPE_UNICAST_IP6:
523     case FIB_FORW_CHAIN_TYPE_MCAST_IP6:
524         return (DPO_PROTO_IP6);
525     case FIB_FORW_CHAIN_TYPE_ETHERNET:
526         return (DPO_PROTO_ETHERNET);
527     case FIB_FORW_CHAIN_TYPE_NSH:
528         return (DPO_PROTO_NSH);
529     case FIB_FORW_CHAIN_TYPE_BIER:
530         return (DPO_PROTO_BIER);
531     case FIB_FORW_CHAIN_TYPE_MPLS_EOS:
532     case FIB_FORW_CHAIN_TYPE_MPLS_NON_EOS:
533         return (DPO_PROTO_MPLS);
534     }
535     return (DPO_PROTO_IP4);
536 }
537
538 uword
539 unformat_fib_route_path (unformat_input_t * input, va_list * args)
540 {
541     fib_route_path_t *rpath = va_arg (*args, fib_route_path_t *);
542     dpo_proto_t *payload_proto = va_arg (*args, void*);
543     dpo_proto_t explicit_proto = DPO_PROTO_NONE;
544     u32 weight, preference, udp_encap_id, fi;
545     mpls_label_t out_label;
546     vnet_main_t *vnm;
547
548     vnm = vnet_get_main ();
549     clib_memset(rpath, 0, sizeof(*rpath));
550     rpath->frp_weight = 1;
551     rpath->frp_sw_if_index = ~0;
552
553     while (unformat_check_input (input) != UNFORMAT_END_OF_INPUT)
554     {
555         if (unformat (input, "%U %U",
556                       unformat_ip4_address,
557                       &rpath->frp_addr.ip4,
558                       unformat_vnet_sw_interface, vnm,
559                       &rpath->frp_sw_if_index))
560         {
561             rpath->frp_proto = DPO_PROTO_IP4;
562         }
563         else if (unformat (input, "%U %U",
564                            unformat_ip6_address,
565                            &rpath->frp_addr.ip6,
566                            unformat_vnet_sw_interface, vnm,
567                            &rpath->frp_sw_if_index))
568         {
569             rpath->frp_proto = DPO_PROTO_IP6;
570         }
571         else if (unformat (input, "weight %u", &weight))
572         {
573             rpath->frp_weight = weight;
574         }
575         else if (unformat (input, "preference %u", &preference))
576         {
577             rpath->frp_preference = preference;
578         }
579         else if (unformat (input, "%U next-hop-table %d",
580                            unformat_ip4_address,
581                            &rpath->frp_addr.ip4,
582                            &rpath->frp_fib_index))
583         {
584             rpath->frp_sw_if_index = ~0;
585             rpath->frp_proto = DPO_PROTO_IP4;
586
587             /*
588              * the user enter table-ids, convert to index
589              */
590             fi = fib_table_find (FIB_PROTOCOL_IP4, rpath->frp_fib_index);
591             if (~0 == fi)
592                 return 0;
593             rpath->frp_fib_index = fi;
594         }
595         else if (unformat (input, "%U next-hop-table %d",
596                            unformat_ip6_address,
597                            &rpath->frp_addr.ip6,
598                            &rpath->frp_fib_index))
599         {
600             rpath->frp_sw_if_index = ~0;
601             rpath->frp_proto = DPO_PROTO_IP6;
602             fi = fib_table_find (FIB_PROTOCOL_IP6, rpath->frp_fib_index);
603             if (~0 == fi)
604                 return 0;
605             rpath->frp_fib_index = fi;
606         }
607         else if (unformat (input, "%U",
608                            unformat_ip4_address,
609                            &rpath->frp_addr.ip4))
610         {
611             /*
612              * the recursive next-hops are by default in the default table
613              */
614             rpath->frp_fib_index = 0;
615             rpath->frp_sw_if_index = ~0;
616             rpath->frp_proto = DPO_PROTO_IP4;
617         }
618         else if (unformat (input, "%U",
619                            unformat_ip6_address,
620                            &rpath->frp_addr.ip6))
621         {
622             rpath->frp_fib_index = 0;
623             rpath->frp_sw_if_index = ~0;
624             rpath->frp_proto = DPO_PROTO_IP6;
625         }
626         else if (unformat (input, "udp-encap %d", &udp_encap_id))
627         {
628             rpath->frp_udp_encap_id = udp_encap_id;
629             rpath->frp_flags |= FIB_ROUTE_PATH_UDP_ENCAP;
630             rpath->frp_proto = *payload_proto;
631         }
632         else if (unformat (input, "lookup in table %d", &rpath->frp_fib_index))
633         {
634             rpath->frp_proto = *payload_proto;
635             rpath->frp_sw_if_index = ~0;
636             rpath->frp_flags |= FIB_ROUTE_PATH_DEAG;
637         }
638         else if (unformat (input, "resolve-via-host"))
639         {
640             rpath->frp_flags |= FIB_ROUTE_PATH_RESOLVE_VIA_HOST;
641         }
642         else if (unformat (input, "resolve-via-attached"))
643         {
644             rpath->frp_flags |= FIB_ROUTE_PATH_RESOLVE_VIA_ATTACHED;
645         }
646         else if (unformat (input, "pop-pw-cw"))
647         {
648             rpath->frp_flags |= FIB_ROUTE_PATH_POP_PW_CW;
649         }
650         else if (unformat (input,
651                            "ip4-lookup-in-table %d",
652                            &rpath->frp_fib_index))
653         {
654             rpath->frp_proto = DPO_PROTO_IP4;
655             *payload_proto = DPO_PROTO_IP4;
656             fi = fib_table_find (FIB_PROTOCOL_IP4, rpath->frp_fib_index);
657             if (~0 == fi)
658                 return 0;
659             rpath->frp_fib_index = fi;
660         }
661         else if (unformat (input,
662                            "ip6-lookup-in-table %d",
663                            &rpath->frp_fib_index))
664         {
665             rpath->frp_proto = DPO_PROTO_IP6;
666             *payload_proto = DPO_PROTO_IP6;
667             fi = fib_table_find (FIB_PROTOCOL_IP6, rpath->frp_fib_index);
668             if (~0 == fi)
669                 return 0;
670             rpath->frp_fib_index = fi;
671         }
672         else if (unformat (input,
673                            "mpls-lookup-in-table %d",
674                            &rpath->frp_fib_index))
675         {
676             rpath->frp_proto = DPO_PROTO_MPLS;
677             *payload_proto = DPO_PROTO_MPLS;
678             fi = fib_table_find (FIB_PROTOCOL_MPLS, rpath->frp_fib_index);
679             if (~0 == fi)
680                 return 0;
681             rpath->frp_fib_index = fi;
682         }
683         else if (unformat (input, "src-lookup"))
684         {
685             rpath->frp_flags |= FIB_ROUTE_PATH_SOURCE_LOOKUP;
686         }
687         else if (unformat (input,
688                            "l2-input-on %U",
689                            unformat_vnet_sw_interface, vnm,
690                            &rpath->frp_sw_if_index))
691         {
692             rpath->frp_proto = DPO_PROTO_ETHERNET;
693             *payload_proto = DPO_PROTO_ETHERNET;
694             rpath->frp_flags |= FIB_ROUTE_PATH_INTF_RX;
695         }
696         else if (unformat (input, "via-label %U",
697                            unformat_mpls_unicast_label,
698                            &rpath->frp_local_label))
699         {
700             rpath->frp_eos = MPLS_NON_EOS;
701             rpath->frp_proto = DPO_PROTO_MPLS;
702             rpath->frp_sw_if_index = ~0;
703         }
704         else if (unformat (input, "rx-ip4 %U",
705                            unformat_vnet_sw_interface, vnm,
706                            &rpath->frp_sw_if_index))
707         {
708             rpath->frp_proto = DPO_PROTO_IP4;
709             rpath->frp_flags = FIB_ROUTE_PATH_INTF_RX;
710         }
711       else if (unformat (input, "local"))
712         {
713           clib_memset (&rpath->frp_addr, 0, sizeof (rpath->frp_addr));
714           rpath->frp_sw_if_index = ~0;
715           rpath->frp_weight = 1;
716           rpath->frp_flags |= FIB_ROUTE_PATH_LOCAL;
717         }
718       else if (unformat (input, "out-labels"))
719         {
720             while (unformat (input, "%U",
721                              unformat_mpls_unicast_label, &out_label))
722             {
723                 fib_mpls_label_t fml = {
724                     .fml_value = out_label,
725                 };
726                 vec_add1(rpath->frp_label_stack, fml);
727             }
728         }
729       else if (unformat (input, "ip4"))
730         {
731           explicit_proto = DPO_PROTO_IP4;
732         }
733       else if (unformat (input, "ip6"))
734         {
735           explicit_proto = DPO_PROTO_IP6;
736         }
737         else if (unformat (input, "%U",
738                            unformat_vnet_sw_interface, vnm,
739                            &rpath->frp_sw_if_index))
740         {
741             rpath->frp_proto = *payload_proto;
742         }
743         else if (unformat (input, "%U",
744                          unformat_mfib_itf_flags, &rpath->frp_mitf_flags))
745         ;
746         else if (unformat (input, "via"))
747         {
748             /* new path, back up and return */
749             unformat_put_input (input);
750             unformat_put_input (input);
751             unformat_put_input (input);
752             unformat_put_input (input);
753             break;
754         }
755         else
756         {
757             return (0);
758         }
759     }
760
761     if (DPO_PROTO_NONE != explicit_proto)
762       *payload_proto = rpath->frp_proto = explicit_proto;
763
764     return (1);
765 }
766
767 /*
768  * Return true if the path is attached
769  */
770 int
771 fib_route_path_is_attached (const fib_route_path_t *rpath)
772 {
773     /*
774      * DVR paths are not attached, since we are not playing the
775      * L3 game with these
776      */
777     if (rpath->frp_flags & (FIB_ROUTE_PATH_DVR |
778                             FIB_ROUTE_PATH_UDP_ENCAP))
779     {
780         return (0);
781     }
782
783     /*
784      * - All zeros next-hop
785      * - a valid interface
786      */
787     if (ip46_address_is_zero(&rpath->frp_addr) &&
788         (~0 != rpath->frp_sw_if_index))
789     {
790         return (!0);
791     }
792     else if (rpath->frp_flags & FIB_ROUTE_PATH_ATTACHED ||
793              rpath->frp_flags & FIB_ROUTE_PATH_GLEAN)
794     {
795         return (!0);
796     }
797     return (0);
798 }
799
800 static void
801 fib_prefix_ip4_addr_increment (fib_prefix_t *pfx)
802 {
803     /* Calculate the addend based on the host length of address */
804     u32 incr = 1ULL << (32 - pfx->fp_len);
805     ip4_address_t dst = (pfx->fp_addr).ip4;
806     dst.as_u32 = clib_host_to_net_u32 (incr + clib_net_to_host_u32 (dst.as_u32));
807     pfx->fp_addr.ip4.as_u32 = dst.as_u32;
808 }
809
810 static void
811 fib_prefix_ip6_addr_increment (fib_prefix_t *pfx)
812 {
813     /*
814      * Calculate the addend based on the host length of address
815      * and which part(lower 64 bits or higher 64 bits) it lies
816      * in
817      */
818     u32 host_len = 128 - pfx->fp_len;
819     u64 incr = 1ULL << ((host_len > 64) ? (host_len - 64) : host_len);
820     i32 bucket = (host_len < 64 ? 1 : 0);
821     ip6_address_t dst = (pfx->fp_addr).ip6;
822     u64 tmp = incr + clib_net_to_host_u64 (dst.as_u64[bucket]);
823     /* Handle overflow */
824     if (bucket && (tmp < incr))
825     {
826         dst.as_u64[1] = clib_host_to_net_u64 (tmp);
827         dst.as_u64[0] = clib_host_to_net_u64 (1ULL + clib_net_to_host_u64 (dst.as_u64[0]));
828     }
829     else
830         dst.as_u64[bucket] = clib_host_to_net_u64 (tmp);
831
832     pfx->fp_addr.ip6.as_u128 = dst.as_u128;
833 }
834
835 /*
836  * Increase IPv4/IPv6 address according to the prefix length
837  */
838 void fib_prefix_increment (fib_prefix_t *pfx)
839 {
840     switch (pfx->fp_proto)
841     {
842     case FIB_PROTOCOL_IP4:
843         fib_prefix_ip4_addr_increment (pfx);
844         break;
845     case FIB_PROTOCOL_IP6:
846         fib_prefix_ip6_addr_increment (pfx);
847         break;
848     case FIB_PROTOCOL_MPLS:
849         break;
850     }
851 }