http: fix client receiving large data
[vpp.git] / src / vnet / ip / lookup.c
1 /*
2  * Copyright (c) 2015 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  * ip/ip_lookup.c: ip4/6 adjacency and lookup table management
17  *
18  * Copyright (c) 2008 Eliot Dresselhaus
19  *
20  * Permission is hereby granted, free of charge, to any person obtaining
21  * a copy of this software and associated documentation files (the
22  * "Software"), to deal in the Software without restriction, including
23  * without limitation the rights to use, copy, modify, merge, publish,
24  * distribute, sublicense, and/or sell copies of the Software, and to
25  * permit persons to whom the Software is furnished to do so, subject to
26  * the following conditions:
27  *
28  * The above copyright notice and this permission notice shall be
29  * included in all copies or substantial portions of the Software.
30  *
31  *  THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
32  *  EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
33  *  MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
34  *  NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
35  *  LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
36  *  OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
37  *  WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
38  */
39
40 #include <vnet/ip/ip.h>
41 #include <vnet/adj/adj.h>
42 #include <vnet/fib/fib_table.h>
43 #include <vnet/fib/ip4_fib.h>
44 #include <vnet/fib/ip6_fib.h>
45 #include <vnet/mpls/mpls.h>
46 #include <vnet/mfib/mfib_table.h>
47 #include <vnet/dpo/drop_dpo.h>
48 #include <vnet/dpo/classify_dpo.h>
49 #include <vnet/dpo/punt_dpo.h>
50 #include <vnet/dpo/receive_dpo.h>
51 #include <vnet/dpo/ip_null_dpo.h>
52
53 /**
54  * @file
55  * @brief IPv4 and IPv6 adjacency and lookup table management.
56  *
57  */
58
59 static clib_error_t *
60 ip_sw_interface_add_del (vnet_main_t * vnm, u32 sw_if_index, u32 is_add)
61 {
62   vec_validate_init_empty (ip4_main.
63                            lookup_main.if_address_pool_index_by_sw_if_index,
64                            sw_if_index, ~0);
65   vec_validate_init_empty (ip6_main.
66                            lookup_main.if_address_pool_index_by_sw_if_index,
67                            sw_if_index, ~0);
68
69   return (NULL);
70 }
71
72 VNET_SW_INTERFACE_ADD_DEL_FUNCTION (ip_sw_interface_add_del);
73
74 void
75 ip_lookup_init (ip_lookup_main_t * lm, u32 is_ip6)
76 {
77   if (!lm->fib_result_n_bytes)
78     lm->fib_result_n_bytes = sizeof (uword);
79
80   lm->is_ip6 = is_ip6;
81   mhash_init (&lm->prefix_to_if_prefix_index, sizeof (uword),
82               sizeof (ip_interface_prefix_key_t));
83   if (is_ip6)
84     {
85       lm->format_address_and_length = format_ip6_address_and_length;
86       mhash_init (&lm->address_to_if_address_index, sizeof (uword),
87                   sizeof (ip6_address_fib_t));
88     }
89   else
90     {
91       lm->format_address_and_length = format_ip4_address_and_length;
92       mhash_init (&lm->address_to_if_address_index, sizeof (uword),
93                   sizeof (ip4_address_fib_t));
94     }
95
96   {
97     int i;
98
99     /* Setup all IP protocols to be punted and builtin-unknown. */
100     for (i = 0; i < 256; i++)
101       {
102         lm->local_next_by_ip_protocol[i] = IP_LOCAL_NEXT_PUNT;
103         lm->builtin_protocol_by_ip_protocol[i] = IP_BUILTIN_PROTOCOL_UNKNOWN;
104       }
105
106     lm->local_next_by_ip_protocol[IP_PROTOCOL_UDP] = IP_LOCAL_NEXT_UDP_LOOKUP;
107     lm->local_next_by_ip_protocol[is_ip6 ? IP_PROTOCOL_ICMP6 :
108                                   IP_PROTOCOL_ICMP] = IP_LOCAL_NEXT_ICMP;
109     lm->builtin_protocol_by_ip_protocol[IP_PROTOCOL_UDP] =
110       IP_BUILTIN_PROTOCOL_UDP;
111     lm->builtin_protocol_by_ip_protocol[is_ip6 ? IP_PROTOCOL_ICMP6 :
112                                         IP_PROTOCOL_ICMP] =
113       IP_BUILTIN_PROTOCOL_ICMP;
114   }
115 }
116
117 u8 *
118 format_ip_flow_hash_config (u8 * s, va_list * args)
119 {
120   flow_hash_config_t flow_hash_config = va_arg (*args, u32);
121
122 #define _(n, b, v)                                                            \
123   if (flow_hash_config & v)                                                   \
124     s = format (s, "%s ", #n);
125   foreach_flow_hash_bit;
126 #undef _
127
128   return s;
129 }
130
131 uword
132 unformat_ip_flow_hash_config (unformat_input_t *input, va_list *args)
133 {
134   flow_hash_config_t *flow_hash_config = va_arg (*args, flow_hash_config_t *);
135   uword start_index = unformat_check_input (input);
136   int matched_once = 0;
137
138   if (unformat (input, "default"))
139     {
140       *flow_hash_config = IP_FLOW_HASH_DEFAULT;
141       return 1;
142     }
143   while (!unformat_is_eof (input) &&
144          !is_white_space (unformat_peek_input (input)))
145     {
146       if (unformat (input, "%_,"))
147         ;
148 #define _(a, b, c)                                                            \
149   else if (unformat (input, "%_" #a))                                         \
150   {                                                                           \
151     *flow_hash_config |= c;                                                   \
152     matched_once = 1;                                                         \
153   }
154       foreach_flow_hash_bit
155 #undef _
156         else
157       {
158         /* Roll back to our start */
159         input->index = start_index;
160         return 0;
161       }
162     }
163
164   return matched_once;
165 }
166
167 u8 *
168 format_ip_adjacency_packet_data (u8 * s, va_list * args)
169 {
170   u8 *packet_data = va_arg (*args, u8 *);
171   u32 n_packet_data_bytes = va_arg (*args, u32);
172
173   s = format (s, "%U", format_hex_bytes, packet_data, n_packet_data_bytes);
174
175   return s;
176 }
177
178 static uword
179 unformat_dpo (unformat_input_t * input, va_list * args)
180 {
181   dpo_id_t *dpo = va_arg (*args, dpo_id_t *);
182   fib_protocol_t fp = va_arg (*args, int);
183   dpo_proto_t proto;
184
185   proto = fib_proto_to_dpo (fp);
186
187   if (unformat (input, "drop"))
188     dpo_copy (dpo, drop_dpo_get (proto));
189   else if (unformat (input, "punt"))
190     dpo_copy (dpo, punt_dpo_get (proto));
191   else if (unformat (input, "local"))
192     receive_dpo_add_or_lock (proto, ~0, NULL, dpo);
193   else if (unformat (input, "null-send-unreach"))
194     ip_null_dpo_add_and_lock (proto, IP_NULL_ACTION_SEND_ICMP_UNREACH, dpo);
195   else if (unformat (input, "null-send-prohibit"))
196     ip_null_dpo_add_and_lock (proto, IP_NULL_ACTION_SEND_ICMP_PROHIBIT, dpo);
197   else if (unformat (input, "null"))
198     ip_null_dpo_add_and_lock (proto, IP_NULL_ACTION_NONE, dpo);
199   else if (unformat (input, "classify"))
200     {
201       u32 classify_table_index;
202
203       if (!unformat (input, "%d", &classify_table_index))
204         {
205           clib_warning ("classify adj must specify table index");
206           return 0;
207         }
208
209       dpo_set (dpo, DPO_CLASSIFY, proto,
210                classify_dpo_create (proto, classify_table_index));
211     }
212   else
213     return 0;
214
215   return 1;
216 }
217
218 const ip46_address_t zero_addr = {
219   .as_u64 = {
220              0, 0},
221 };
222
223 bool
224 fib_prefix_validate (const fib_prefix_t *prefix)
225 {
226   if (FIB_PROTOCOL_IP4 == prefix->fp_proto)
227     {
228       if (prefix->fp_len > 32)
229         {
230           return false;
231         }
232     }
233
234   if (FIB_PROTOCOL_IP6 == prefix->fp_proto)
235     {
236       if (prefix->fp_len > 128)
237         {
238           return false;
239         }
240     }
241   return true;
242 }
243
244 static clib_error_t *
245 vnet_ip_route_cmd (vlib_main_t * vm,
246                    unformat_input_t * main_input, vlib_cli_command_t * cmd)
247 {
248   unformat_input_t _line_input, *line_input = &_line_input;
249   u32 table_id, is_del, fib_index, payload_proto;
250   dpo_id_t dpo = DPO_INVALID, *dpos = NULL;
251   fib_route_path_t *rpaths = NULL, rpath;
252   fib_prefix_t *prefixs = NULL, pfx;
253   clib_error_t *error = NULL;
254   f64 count;
255   int i;
256
257   is_del = 0;
258   table_id = 0;
259   count = 1;
260   clib_memset (&pfx, 0, sizeof (pfx));
261
262   /* Get a line of input. */
263   if (!unformat_user (main_input, unformat_line_input, line_input))
264     return 0;
265
266   while (unformat_check_input (line_input) != UNFORMAT_END_OF_INPUT)
267     {
268       clib_memset (&rpath, 0, sizeof (rpath));
269
270       if (unformat (line_input, "table %d", &table_id))
271         ;
272       else if (unformat (line_input, "count %f", &count))
273         ;
274
275       else if (unformat (line_input, "%U/%d",
276                          unformat_ip4_address, &pfx.fp_addr.ip4, &pfx.fp_len))
277         {
278           payload_proto = pfx.fp_proto = FIB_PROTOCOL_IP4;
279           vec_add1 (prefixs, pfx);
280         }
281       else if (unformat (line_input, "%U/%d",
282                          unformat_ip6_address, &pfx.fp_addr.ip6, &pfx.fp_len))
283         {
284           payload_proto = pfx.fp_proto = FIB_PROTOCOL_IP6;
285           vec_add1 (prefixs, pfx);
286         }
287       else if (unformat (line_input, "via %U",
288                          unformat_fib_route_path, &rpath, &payload_proto))
289         {
290           vec_add1 (rpaths, rpath);
291         }
292       else if (vec_len (prefixs) > 0 &&
293                unformat (line_input, "via %U",
294                          unformat_dpo, &dpo, prefixs[0].fp_proto))
295         {
296           vec_add1 (dpos, dpo);
297         }
298       else if (unformat (line_input, "del"))
299         is_del = 1;
300       else if (unformat (line_input, "add"))
301         is_del = 0;
302       else
303         {
304           error = unformat_parse_error (line_input);
305           goto done;
306         }
307     }
308
309   if (vec_len (prefixs) == 0)
310     {
311       error =
312         clib_error_return (0, "expected ip4/ip6 destination address/length.");
313       goto done;
314     }
315
316   if (!is_del && vec_len (rpaths) + vec_len (dpos) == 0)
317     {
318       error = clib_error_return (0, "expected paths.");
319       goto done;
320     }
321
322   if (~0 == table_id)
323     {
324       /*
325        * if no table_id is passed we will manipulate the default
326        */
327       fib_index = 0;
328     }
329   else
330     {
331       fib_index = fib_table_find (prefixs[0].fp_proto, table_id);
332
333       if (~0 == fib_index)
334         {
335           error = clib_error_return (0, "Nonexistent table id %d", table_id);
336           goto done;
337         }
338     }
339
340   for (i = 0; i < vec_len (prefixs); i++)
341     {
342       if (is_del && 0 == vec_len (rpaths))
343         {
344           fib_table_entry_delete (fib_index, &prefixs[i], FIB_SOURCE_CLI);
345         }
346       else if (!is_del && 1 == vec_len (dpos))
347         {
348           fib_table_entry_special_dpo_add (fib_index,
349                                            &prefixs[i],
350                                            FIB_SOURCE_CLI,
351                                            FIB_ENTRY_FLAG_EXCLUSIVE,
352                                            &dpos[0]);
353           dpo_reset (&dpos[0]);
354         }
355       else if (vec_len (dpos) > 0)
356         {
357           error =
358             clib_error_return (0,
359                                "Load-balancing over multiple special adjacencies is unsupported");
360           goto done;
361         }
362       else if (0 < vec_len (rpaths))
363         {
364           u32 k, n;
365           f64 t[2];
366           n = count;
367           t[0] = vlib_time_now (vm);
368
369           for (k = 0; k < n; k++)
370             {
371               fib_prefix_t rpfx = {
372                 .fp_len = prefixs[i].fp_len,
373                 .fp_proto = prefixs[i].fp_proto,
374                 .fp_addr = prefixs[i].fp_addr,
375               };
376
377               if (!fib_prefix_validate (&rpfx))
378                 {
379                   vlib_cli_output (vm, "Invalid prefix len: %d", rpfx.fp_len);
380                   continue;
381                 }
382
383               if (is_del)
384                 fib_table_entry_path_remove2 (fib_index,
385                                               &rpfx, FIB_SOURCE_CLI, rpaths);
386               else
387                 fib_table_entry_path_add2 (fib_index,
388                                            &rpfx,
389                                            FIB_SOURCE_CLI,
390                                            FIB_ENTRY_FLAG_NONE, rpaths);
391
392               fib_prefix_increment (&prefixs[i]);
393             }
394
395           t[1] = vlib_time_now (vm);
396           if (count > 1)
397             vlib_cli_output (vm, "%.6e routes/sec", count / (t[1] - t[0]));
398         }
399       else
400         {
401           error = clib_error_return (0, "Don't understand what you want...");
402           goto done;
403         }
404     }
405
406 done:
407   vec_free (dpos);
408   vec_free (prefixs);
409   vec_free (rpaths);
410   unformat_free (line_input);
411   return error;
412 }
413
414 clib_error_t *
415 vnet_ip_table_cmd (vlib_main_t * vm,
416                    unformat_input_t * main_input,
417                    vlib_cli_command_t * cmd, fib_protocol_t fproto)
418 {
419   unformat_input_t _line_input, *line_input = &_line_input;
420   clib_error_t *error = NULL;
421   u32 table_id, is_add;
422   u8 *name = NULL;
423
424   is_add = 1;
425   table_id = ~0;
426
427   /* Get a line of input. */
428   if (!unformat_user (main_input, unformat_line_input, line_input))
429     return 0;
430
431   while (unformat_check_input (line_input) != UNFORMAT_END_OF_INPUT)
432     {
433       if (unformat (line_input, "%d", &table_id))
434         ;
435       else if (unformat (line_input, "del"))
436         is_add = 0;
437       else if (unformat (line_input, "add"))
438         is_add = 1;
439       else if (unformat (line_input, "name %s", &name))
440         ;
441       else
442         {
443           error = unformat_parse_error (line_input);
444           goto done;
445         }
446     }
447
448   if (0 == table_id)
449     {
450       error = clib_error_return (0, "Can't change the default table");
451       goto done;
452     }
453   else
454         {
455           if (is_add)
456             {
457               if (~0 == table_id)
458                 {
459                   table_id = ip_table_get_unused_id (fproto);
460                   vlib_cli_output (vm, "%u\n", table_id);
461                 }
462               ip_table_create (fproto, table_id, 0, name);
463             }
464           else
465             {
466               if (~0 == table_id)
467                 {
468                   error = clib_error_return (0, "No table id");
469                   goto done;
470                 }
471               ip_table_delete (fproto, table_id, 0);
472             }
473         }
474
475 done:
476   vec_free (name);
477   unformat_free (line_input);
478   return error;
479 }
480
481 clib_error_t *
482 vnet_ip4_table_cmd (vlib_main_t * vm,
483                     unformat_input_t * main_input, vlib_cli_command_t * cmd)
484 {
485   return (vnet_ip_table_cmd (vm, main_input, cmd, FIB_PROTOCOL_IP4));
486 }
487
488 clib_error_t *
489 vnet_ip6_table_cmd (vlib_main_t * vm,
490                     unformat_input_t * main_input, vlib_cli_command_t * cmd)
491 {
492   return (vnet_ip_table_cmd (vm, main_input, cmd, FIB_PROTOCOL_IP6));
493 }
494
495 clib_error_t *
496 vnet_show_ip_table_cmd (vlib_main_t *vm, unformat_input_t *main_input,
497                         vlib_cli_command_t *cmd, fib_protocol_t fproto)
498 {
499   unformat_input_t _line_input, *line_input = &_line_input;
500   fib_table_t *fib, *fibs;
501   clib_error_t *error = NULL;
502   u32 table_id = ~0, fib_index;
503   /* Get a line of input. */
504   if (unformat_user (main_input, unformat_line_input, line_input))
505     {
506       while (unformat_check_input (line_input) != UNFORMAT_END_OF_INPUT)
507         {
508           if (unformat (line_input, "%d", &table_id))
509             ;
510           else
511             {
512               error = unformat_parse_error (line_input);
513               goto done;
514             }
515         }
516       unformat_free (line_input);
517     }
518
519   fibs = (fproto == FIB_PROTOCOL_IP4) ? ip4_main.fibs : ip6_main.fibs;
520
521   if (table_id != (u32) ~0)
522     {
523       fib_index = fib_table_find (fproto, table_id);
524       if (fib_index == (u32) ~0)
525         {
526           error = clib_error_return (0, "Couldn't find table with table_id %u",
527                                      table_id);
528           goto done;
529         }
530
531       fib = fib_table_get (fib_index, fproto);
532       vlib_cli_output (vm, "[%u] table_id:%u %v", fib->ft_index,
533                        fib->ft_table_id, fib->ft_desc);
534     }
535   else
536     {
537       pool_foreach (fib, fibs)
538         vlib_cli_output (vm, "[%u] table_id:%u %v", fib->ft_index,
539                          fib->ft_table_id, fib->ft_desc);
540     }
541
542 done:
543   return error;
544 }
545
546 clib_error_t *
547 vnet_show_ip4_table_cmd (vlib_main_t *vm, unformat_input_t *main_input,
548                          vlib_cli_command_t *cmd)
549 {
550   return (vnet_show_ip_table_cmd (vm, main_input, cmd, FIB_PROTOCOL_IP4));
551 }
552
553 clib_error_t *
554 vnet_show_ip6_table_cmd (vlib_main_t *vm, unformat_input_t *main_input,
555                          vlib_cli_command_t *cmd)
556 {
557   return (vnet_show_ip_table_cmd (vm, main_input, cmd, FIB_PROTOCOL_IP6));
558 }
559
560 VLIB_CLI_COMMAND (vlib_cli_ip_command, static) = {
561   .path = "ip",
562   .short_help = "Internet protocol (IP) commands",
563 };
564
565 VLIB_CLI_COMMAND (vlib_cli_ip6_command, static) = {
566   .path = "ip6",
567   .short_help = "Internet protocol version 6 (IPv6) commands",
568 };
569
570 VLIB_CLI_COMMAND (vlib_cli_show_ip_command, static) = {
571   .path = "show ip",
572   .short_help = "Internet protocol (IP) show commands",
573 };
574
575 VLIB_CLI_COMMAND (vlib_cli_show_ip6_command, static) = {
576   .path = "show ip6",
577   .short_help = "Internet protocol version 6 (IPv6) show commands",
578 };
579
580 /*?
581  * This command is used to add or delete IPv4 or IPv6 routes. All
582  * IP Addresses ('<em><dst-ip-addr>/<width></em>',
583  * '<em><next-hop-ip-addr></em>' and '<em><adj-hop-ip-addr></em>')
584  * can be IPv4 or IPv6, but all must be of the same form in a single
585  * command. To display the current set of routes, use the commands
586  * '<em>show ip fib</em>' and '<em>show ip6 fib</em>'.
587  *
588  * @cliexpar
589  * Example of how to add a straight forward static route:
590  * @cliexcmd{ip route add 6.0.1.2/32 via 6.0.0.1 GigabitEthernet2/0/0}
591  * Example of how to delete a straight forward static route:
592  * @cliexcmd{ip route del 6.0.1.2/32 via 6.0.0.1 GigabitEthernet2/0/0}
593  * Mainly for route add/del performance testing, one can add or delete
594  * multiple routes by adding 'count N' to the previous item:
595  * @cliexcmd{ip route add count 10 7.0.0.0/24 via 6.0.0.1 GigabitEthernet2/0/0}
596  * Add multiple routes for the same destination to create equal-cost multipath:
597  * @cliexcmd{ip route add 7.0.0.1/32 via 6.0.0.1 GigabitEthernet2/0/0}
598  * @cliexcmd{ip route add 7.0.0.1/32 via 6.0.0.2 GigabitEthernet2/0/0}
599  * For unequal-cost multipath, specify the desired weights. This
600  * combination of weights results in 3/4 of the traffic following the
601  * second path, 1/4 following the first path:
602  * @cliexcmd{ip route add 7.0.0.1/32 via 6.0.0.1 GigabitEthernet2/0/0 weight 1}
603  * @cliexcmd{ip route add 7.0.0.1/32 via 6.0.0.2 GigabitEthernet2/0/0 weight 3}
604  * To add a route to a particular FIB table (VRF), use:
605  * @cliexcmd{ip route add 172.16.24.0/24 table 7 via GigabitEthernet2/0/0}
606  ?*/
607 VLIB_CLI_COMMAND (ip_route_command, static) = {
608   .path = "ip route",
609   .short_help = "ip route [add|del] [count <n>] <dst-ip-addr>/<width> [table "
610                 "<table-id>] via [next-hop-address] [next-hop-interface] "
611                 "[next-hop-table <value>] [weight <value>] [preference "
612                 "<value>] [udp-encap <value>] [ip4-lookup-in-table <value>] "
613                 "[ip6-lookup-in-table <value>] [mpls-lookup-in-table <value>] "
614                 "[resolve-via-host] [resolve-via-connected] [rx-ip4|rx-ip6 "
615                 "<interface>] [out-labels <value value value>]",
616   .function = vnet_ip_route_cmd,
617   .is_mp_safe = 1,
618 };
619
620 /*?
621  * This command is used to add or delete IPv4  Tables. All
622  * Tables must be explicitly added before that can be used. Creating a
623  * table will add both unicast and multicast FIBs
624  *
625  ?*/
626 VLIB_CLI_COMMAND (ip4_table_command, static) = {
627   .path = "ip table",
628   .short_help = "ip table [add|del] <table-id>",
629   .function = vnet_ip4_table_cmd,
630 };
631
632 /*?
633  * This command is used to add or delete IPv4  Tables. All
634  * Tables must be explicitly added before that can be used. Creating a
635  * table will add both unicast and multicast FIBs
636  *
637  ?*/
638 VLIB_CLI_COMMAND (ip6_table_command, static) = {
639   .path = "ip6 table",
640   .short_help = "ip6 table [add|del] <table-id>",
641   .function = vnet_ip6_table_cmd,
642 };
643
644 VLIB_CLI_COMMAND (show_ip4_table_command, static) = {
645   .path = "show ip table",
646   .short_help = "show ip table <table-id>",
647   .function = vnet_show_ip4_table_cmd,
648 };
649
650 VLIB_CLI_COMMAND (show_ip6_table_command, static) = {
651   .path = "show ip6 table",
652   .short_help = "show ip6 table <table-id>",
653   .function = vnet_show_ip6_table_cmd,
654 };
655
656 static clib_error_t *
657 ip_table_bind_cmd (vlib_main_t * vm,
658                    unformat_input_t * input,
659                    vlib_cli_command_t * cmd,
660                    fib_protocol_t fproto)
661 {
662   vnet_main_t *vnm = vnet_get_main ();
663   clib_error_t *error = 0;
664   u32 sw_if_index, table_id;
665   int rv;
666
667   sw_if_index = ~0;
668
669   if (!unformat_user (input, unformat_vnet_sw_interface, vnm, &sw_if_index))
670     {
671       error = clib_error_return (0, "unknown interface `%U'",
672                                  format_unformat_error, input);
673       goto done;
674     }
675
676   if (unformat (input, "%d", &table_id))
677     ;
678   else
679     {
680       error = clib_error_return (0, "expected table id `%U'",
681                                  format_unformat_error, input);
682       goto done;
683     }
684
685   rv = ip_table_bind (fproto, sw_if_index, table_id);
686
687   if (VNET_API_ERROR_ADDRESS_FOUND_FOR_INTERFACE == rv)
688     {
689       error = clib_error_return (0, "IP addresses are still present on %U",
690                                  format_vnet_sw_if_index_name,
691                                  vnet_get_main(),
692                                  sw_if_index);
693     }
694   else if (VNET_API_ERROR_NO_SUCH_FIB == rv)
695     {
696       error = clib_error_return (0, "no such table %d", table_id);
697     }
698   else if (0 != rv)
699     {
700       error = clib_error_return (0, "unknown error");
701     }
702
703  done:
704   return error;
705 }
706
707 static clib_error_t *
708 ip4_table_bind_cmd (vlib_main_t * vm,
709                     unformat_input_t * input,
710                     vlib_cli_command_t * cmd)
711 {
712   return (ip_table_bind_cmd (vm , input, cmd, FIB_PROTOCOL_IP4));
713 }
714
715 static clib_error_t *
716 ip6_table_bind_cmd (vlib_main_t * vm,
717                     unformat_input_t * input,
718                     vlib_cli_command_t * cmd)
719 {
720   return (ip_table_bind_cmd (vm , input, cmd, FIB_PROTOCOL_IP6));
721 }
722
723 /*?
724  * Place the indicated interface into the supplied IPv4 FIB table (also known
725  * as a VRF). The FIB table must be created using "ip table add" already. To
726  * display the current IPv4 FIB table, use the command '<em>show ip fib</em>'.
727  * FIB table will only be displayed if a route has been added to the table, or
728  * an IP Address is assigned to an interface in the table (which adds a route
729  * automatically).
730  *
731  * @note IP addresses added after setting the interface IP table are added to
732  * the indicated FIB table. If an IP address is added prior to changing the
733  * table then this is an error. The control plane must remove these addresses
734  * first and then change the table. VPP will not automatically move the
735  * addresses from the old to the new table as it does not know the validity
736  * of such a change.
737  *
738  * @cliexpar
739  * Example of how to add an interface to an IPv4 FIB table (where 2 is the table-id):
740  * @cliexcmd{set interface ip table GigabitEthernet2/0/0 2}
741  ?*/
742 VLIB_CLI_COMMAND (set_interface_ip_table_command, static) =
743 {
744   .path = "set interface ip table",
745   .function = ip4_table_bind_cmd,
746   .short_help = "set interface ip table <interface> <table-id>",
747 };
748
749 /*?
750  * Place the indicated interface into the supplied IPv6 FIB table (also known
751  * as a VRF). The FIB table must be created using "ip6 table add" already. To
752  * display the current IPv6 FIB table, use the command '<em>show ip6 fib</em>'.
753  * FIB table will only be displayed if a route has been added to the table, or
754  * an IP Address is assigned to an interface in the table (which adds a route
755  * automatically).
756  *
757  * @note IP addresses added after setting the interface IP table are added to
758  * the indicated FIB table. If an IP address is added prior to changing the
759  * table then this is an error. The control plane must remove these addresses
760  * first and then change the table. VPP will not automatically move the
761  * addresses from the old to the new table as it does not know the validity
762  * of such a change.
763  *
764  * @cliexpar
765  * Example of how to add an interface to an IPv6 FIB table (where 2 is the table-id):
766  * @cliexcmd{set interface ip6 table GigabitEthernet2/0/0 2}
767  ?*/
768 VLIB_CLI_COMMAND (set_interface_ip6_table_command, static) =
769 {
770   .path = "set interface ip6 table",
771   .function = ip6_table_bind_cmd,
772   .short_help = "set interface ip6 table <interface> <table-id>"
773 };
774
775 clib_error_t *
776 vnet_ip_mroute_cmd (vlib_main_t * vm,
777                     unformat_input_t * main_input, vlib_cli_command_t * cmd)
778 {
779   unformat_input_t _line_input, *line_input = &_line_input;
780   fib_route_path_t rpath, *rpaths = NULL;
781   clib_error_t *error = NULL;
782   u32 table_id, is_del, payload_proto;
783   mfib_prefix_t pfx;
784   u32 fib_index;
785   mfib_entry_flags_t eflags = 0;
786   u32 gcount, scount, ss, gg, incr;
787   f64 timet[2];
788   u32 rpf_id = MFIB_RPF_ID_NONE;
789
790   gcount = scount = 1;
791   is_del = 0;
792   table_id = 0;
793   clib_memset (&pfx, 0, sizeof (pfx));
794   clib_memset (&rpath, 0, sizeof (rpath));
795   rpath.frp_sw_if_index = ~0;
796
797   /* Get a line of input. */
798   if (!unformat_user (main_input, unformat_line_input, line_input))
799     return 0;
800
801   while (unformat_check_input (line_input) != UNFORMAT_END_OF_INPUT)
802     {
803       if (unformat (line_input, "table %d", &table_id))
804         ;
805       else if (unformat (line_input, "del"))
806         is_del = 1;
807       else if (unformat (line_input, "add"))
808         is_del = 0;
809       else if (unformat (line_input, "rpf-id %d", &rpf_id))
810         ;
811       else if (unformat (line_input, "scount %d", &scount))
812         ;
813       else if (unformat (line_input, "gcount %d", &gcount))
814         ;
815       else if (unformat (line_input, "%U %U",
816                          unformat_ip4_address,
817                          &pfx.fp_src_addr.ip4,
818                          unformat_ip4_address, &pfx.fp_grp_addr.ip4))
819         {
820           payload_proto = pfx.fp_proto = FIB_PROTOCOL_IP4;
821           pfx.fp_len = 64;
822         }
823       else if (unformat (line_input, "%U %U",
824                          unformat_ip6_address,
825                          &pfx.fp_src_addr.ip6,
826                          unformat_ip6_address, &pfx.fp_grp_addr.ip6))
827         {
828           payload_proto = pfx.fp_proto = FIB_PROTOCOL_IP6;
829           pfx.fp_len = 256;
830         }
831       else if (unformat (line_input, "%U/%d",
832                          unformat_ip4_address,
833                          &pfx.fp_grp_addr.ip4, &pfx.fp_len))
834         {
835           clib_memset (&pfx.fp_src_addr.ip4, 0, sizeof (pfx.fp_src_addr.ip4));
836           payload_proto = pfx.fp_proto = FIB_PROTOCOL_IP4;
837         }
838       else if (unformat (line_input, "%U/%d",
839                          unformat_ip6_address,
840                          &pfx.fp_grp_addr.ip6, &pfx.fp_len))
841         {
842           clib_memset (&pfx.fp_src_addr.ip6, 0, sizeof (pfx.fp_src_addr.ip6));
843           payload_proto = pfx.fp_proto = FIB_PROTOCOL_IP6;
844         }
845       else if (unformat (line_input, "%U",
846                          unformat_ip4_address, &pfx.fp_grp_addr.ip4))
847         {
848           clib_memset (&pfx.fp_src_addr.ip4, 0, sizeof (pfx.fp_src_addr.ip4));
849           payload_proto = pfx.fp_proto = FIB_PROTOCOL_IP4;
850           pfx.fp_len = 32;
851         }
852       else if (unformat (line_input, "%U",
853                          unformat_ip6_address, &pfx.fp_grp_addr.ip6))
854         {
855           clib_memset (&pfx.fp_src_addr.ip6, 0, sizeof (pfx.fp_src_addr.ip6));
856           payload_proto = pfx.fp_proto = FIB_PROTOCOL_IP6;
857           pfx.fp_len = 128;
858         }
859       else if (unformat (line_input, "via local Forward"))
860         {
861           clib_memset (&rpath.frp_addr, 0, sizeof (rpath.frp_addr));
862           rpath.frp_sw_if_index = ~0;
863           rpath.frp_weight = 1;
864           rpath.frp_flags |= FIB_ROUTE_PATH_LOCAL;
865           /*
866            * set the path proto appropriately for the prefix
867            */
868           rpath.frp_proto = fib_proto_to_dpo (pfx.fp_proto);
869           rpath.frp_mitf_flags = MFIB_ITF_FLAG_FORWARD;
870
871           vec_add1 (rpaths, rpath);
872         }
873       else if (unformat (line_input, "via %U",
874                          unformat_fib_route_path, &rpath, &payload_proto))
875         {
876           vec_add1 (rpaths, rpath);
877         }
878       else if (unformat (line_input, "%U",
879                          unformat_mfib_entry_flags, &eflags))
880         ;
881       else
882         {
883           error = unformat_parse_error (line_input);
884           goto done;
885         }
886     }
887
888   if (~0 == table_id)
889     {
890       /*
891        * if no table_id is passed we will manipulate the default
892        */
893       fib_index = 0;
894     }
895   else
896     {
897       fib_index = mfib_table_find (pfx.fp_proto, table_id);
898
899       if (~0 == fib_index)
900         {
901           error = clib_error_return (0, "Nonexistent table id %d", table_id);
902           goto done;
903         }
904     }
905
906   timet[0] = vlib_time_now (vm);
907
908   if (FIB_PROTOCOL_IP4 == pfx.fp_proto)
909     {
910       incr = 1 << (32 - (pfx.fp_len % 32));
911     }
912   else
913     {
914       incr = 1 << (128 - (pfx.fp_len % 128));
915     }
916
917   for (ss = 0; ss < scount; ss++)
918     {
919       for (gg = 0; gg < gcount; gg++)
920         {
921           if (is_del && 0 == vec_len (rpaths))
922             {
923               /* no path provided => route delete */
924               mfib_table_entry_delete (fib_index, &pfx, MFIB_SOURCE_CLI);
925             }
926           else if (eflags || (MFIB_RPF_ID_NONE != rpf_id))
927             {
928               mfib_table_entry_update (fib_index, &pfx, MFIB_SOURCE_CLI,
929                                        rpf_id, eflags);
930             }
931           else
932             {
933               if (is_del)
934                 mfib_table_entry_path_remove (fib_index,
935                                               &pfx, MFIB_SOURCE_CLI, rpaths);
936               else
937                 mfib_table_entry_path_update (fib_index, &pfx, MFIB_SOURCE_CLI,
938                                               MFIB_ENTRY_FLAG_NONE, rpaths);
939             }
940
941           if (FIB_PROTOCOL_IP4 == pfx.fp_proto)
942             {
943               pfx.fp_grp_addr.ip4.as_u32 =
944                 clib_host_to_net_u32 (incr +
945                                       clib_net_to_host_u32 (pfx.
946                                                             fp_grp_addr.ip4.
947                                                             as_u32));
948             }
949           else
950             {
951               int bucket = (incr < 64 ? 0 : 1);
952               pfx.fp_grp_addr.ip6.as_u64[bucket] =
953                 clib_host_to_net_u64 (incr +
954                                       clib_net_to_host_u64 (pfx.
955                                                             fp_grp_addr.ip6.as_u64
956                                                             [bucket]));
957
958             }
959         }
960       if (FIB_PROTOCOL_IP4 == pfx.fp_proto)
961         {
962           pfx.fp_src_addr.ip4.as_u32 =
963             clib_host_to_net_u32 (1 +
964                                   clib_net_to_host_u32 (pfx.fp_src_addr.
965                                                         ip4.as_u32));
966         }
967       else
968         {
969           pfx.fp_src_addr.ip6.as_u64[1] =
970             clib_host_to_net_u64 (1 +
971                                   clib_net_to_host_u64 (pfx.fp_src_addr.
972                                                         ip6.as_u64[1]));
973         }
974     }
975
976   timet[1] = vlib_time_now (vm);
977
978   if (scount > 1 || gcount > 1)
979     vlib_cli_output (vm, "%.6e routes/sec",
980                      (scount * gcount) / (timet[1] - timet[0]));
981
982 done:
983   vec_free (rpaths);
984   unformat_free (line_input);
985
986   return error;
987 }
988
989 /*?
990  * This command is used to add or delete IPv4 or IPv6  multicast routes. All
991  * IP Addresses ('<em><dst-ip-addr>/<width></em>',
992  * '<em><next-hop-ip-addr></em>' and '<em><adj-hop-ip-addr></em>')
993  * can be IPv4 or IPv6, but all must be of the same form in a single
994  * command. To display the current set of routes, use the commands
995  * '<em>show ip mfib</em>' and '<em>show ip6 mfib</em>'.
996  * The full set of support flags for interfaces and route is shown via;
997  * '<em>show mfib route flags</em>' and '<em>show mfib itf flags</em>'
998  * respectively.
999  * @cliexpar
1000  * Example of how to add a forwarding interface to a route (and create the
1001  * route if it does not exist)
1002  * @cliexcmd{ip mroute add 232.1.1.1 via GigabitEthernet2/0/0 Forward}
1003  * Example of how to add an accepting interface to a route (and create the
1004  * route if it does not exist)
1005  * @cliexcmd{ip mroute add 232.1.1.1 via GigabitEthernet2/0/1 Accept}
1006  * Example of changing the route's flags to send signals via the API
1007  * @cliexcmd{ip mroute add 232.1.1.1 Signal}
1008
1009  ?*/
1010 VLIB_CLI_COMMAND (ip_mroute_command, static) =
1011 {
1012   .path = "ip mroute",
1013   .short_help = "ip mroute [add|del] <dst-ip-addr>/<width> [table <table-id>] [rpf-id <ID>] [via <next-hop-ip-addr> [<interface>],",
1014   .function = vnet_ip_mroute_cmd,
1015   .is_mp_safe = 1,
1016 };
1017
1018 /*
1019  * fd.io coding-style-patch-verification: ON
1020  *
1021  * Local Variables:
1022  * eval: (c-set-style "gnu")
1023  * End:
1024  */