ARP: don't use RPC for requests initiated from the main thread
[vpp.git] / src / vnet / ethernet / arp.c
1 /*
2  * ethernet/arp.c: IP v4 ARP node
3  *
4  * Copyright (c) 2010 Cisco and/or its affiliates.
5  * Licensed under the Apache License, Version 2.0 (the "License");
6  * you may not use this file except in compliance with the License.
7  * You may obtain a copy of the License at:
8  *
9  *     http://www.apache.org/licenses/LICENSE-2.0
10  *
11  * Unless required by applicable law or agreed to in writing, software
12  * distributed under the License is distributed on an "AS IS" BASIS,
13  * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
14  * See the License for the specific language governing permissions and
15  * limitations under the License.
16  */
17
18 #include <vnet/ip/ip.h>
19 #include <vnet/ip/ip6.h>
20 #include <vnet/ethernet/ethernet.h>
21 #include <vnet/ethernet/arp.h>
22 #include <vnet/l2/l2_input.h>
23 #include <vppinfra/mhash.h>
24 #include <vnet/fib/ip4_fib.h>
25 #include <vnet/fib/fib_entry_src.h>
26 #include <vnet/adj/adj_nbr.h>
27 #include <vnet/adj/adj_mcast.h>
28 #include <vnet/mpls/mpls.h>
29 #include <vnet/l2/feat_bitmap.h>
30
31 /**
32  * @file
33  * @brief IPv4 ARP.
34  *
35  * This file contains code to manage the IPv4 ARP tables (IP Address
36  * to MAC Address lookup).
37  */
38
39
40 void vl_api_rpc_call_main_thread (void *fp, u8 * data, u32 data_length);
41
42 /**
43  * @brief Per-interface ARP configuration and state
44  */
45 typedef struct ethernet_arp_interface_t_
46 {
47   /**
48    * Hash table of ARP entries.
49    * Since this hash table is per-interface, the key is only the IPv4 address.
50    */
51   uword *arp_entries;
52 } ethernet_arp_interface_t;
53
54 typedef struct
55 {
56   ip4_address_t lo_addr;
57   ip4_address_t hi_addr;
58   u32 fib_index;
59 } ethernet_proxy_arp_t;
60
61 typedef struct
62 {
63   u32 next_index;
64   uword node_index;
65   uword type_opaque;
66   uword data;
67   /* Used for arp event notification only */
68   void *data_callback;
69   u32 pid;
70 } pending_resolution_t;
71
72 typedef struct
73 {
74   /* Hash tables mapping name to opcode. */
75   uword *opcode_by_name;
76
77   /* lite beer "glean" adjacency handling */
78   uword *pending_resolutions_by_address;
79   pending_resolution_t *pending_resolutions;
80
81   /* Mac address change notification */
82   uword *mac_changes_by_address;
83   pending_resolution_t *mac_changes;
84
85   ethernet_arp_ip4_entry_t *ip4_entry_pool;
86
87   /* ARP attack mitigation */
88   u32 arp_delete_rotor;
89   u32 limit_arp_cache_size;
90
91   /** Per interface state */
92   ethernet_arp_interface_t *ethernet_arp_by_sw_if_index;
93
94   /* Proxy arp vector */
95   ethernet_proxy_arp_t *proxy_arps;
96
97   uword wc_ip4_arp_publisher_node;
98   uword wc_ip4_arp_publisher_et;
99 } ethernet_arp_main_t;
100
101 static ethernet_arp_main_t ethernet_arp_main;
102
103 typedef struct
104 {
105   u32 sw_if_index;
106   ethernet_arp_ip4_over_ethernet_address_t a;
107   int is_static;
108   int is_no_fib_entry;
109   int flags;
110 #define ETHERNET_ARP_ARGS_REMOVE (1<<0)
111 #define ETHERNET_ARP_ARGS_FLUSH  (1<<1)
112 #define ETHERNET_ARP_ARGS_POPULATE  (1<<2)
113 #define ETHERNET_ARP_ARGS_WC_PUB  (1<<3)
114 } vnet_arp_set_ip4_over_ethernet_rpc_args_t;
115
116 static const u8 vrrp_prefix[] = { 0x00, 0x00, 0x5E, 0x00, 0x01 };
117
118 /* Node index for send_garp_na_process */
119 u32 send_garp_na_process_node_index;
120
121 static void
122 set_ip4_over_ethernet_rpc_callback (vnet_arp_set_ip4_over_ethernet_rpc_args_t
123                                     * a);
124
125 static u8 *
126 format_ethernet_arp_hardware_type (u8 * s, va_list * va)
127 {
128   ethernet_arp_hardware_type_t h = va_arg (*va, ethernet_arp_hardware_type_t);
129   char *t = 0;
130   switch (h)
131     {
132 #define _(n,f) case n: t = #f; break;
133       foreach_ethernet_arp_hardware_type;
134 #undef _
135
136     default:
137       return format (s, "unknown 0x%x", h);
138     }
139
140   return format (s, "%s", t);
141 }
142
143 static u8 *
144 format_ethernet_arp_opcode (u8 * s, va_list * va)
145 {
146   ethernet_arp_opcode_t o = va_arg (*va, ethernet_arp_opcode_t);
147   char *t = 0;
148   switch (o)
149     {
150 #define _(f) case ETHERNET_ARP_OPCODE_##f: t = #f; break;
151       foreach_ethernet_arp_opcode;
152 #undef _
153
154     default:
155       return format (s, "unknown 0x%x", o);
156     }
157
158   return format (s, "%s", t);
159 }
160
161 static uword
162 unformat_ethernet_arp_opcode_host_byte_order (unformat_input_t * input,
163                                               va_list * args)
164 {
165   int *result = va_arg (*args, int *);
166   ethernet_arp_main_t *am = &ethernet_arp_main;
167   int x, i;
168
169   /* Numeric opcode. */
170   if (unformat (input, "0x%x", &x) || unformat (input, "%d", &x))
171     {
172       if (x >= (1 << 16))
173         return 0;
174       *result = x;
175       return 1;
176     }
177
178   /* Named type. */
179   if (unformat_user (input, unformat_vlib_number_by_name,
180                      am->opcode_by_name, &i))
181     {
182       *result = i;
183       return 1;
184     }
185
186   return 0;
187 }
188
189 static uword
190 unformat_ethernet_arp_opcode_net_byte_order (unformat_input_t * input,
191                                              va_list * args)
192 {
193   int *result = va_arg (*args, int *);
194   if (!unformat_user
195       (input, unformat_ethernet_arp_opcode_host_byte_order, result))
196     return 0;
197
198   *result = clib_host_to_net_u16 ((u16) * result);
199   return 1;
200 }
201
202 static u8 *
203 format_ethernet_arp_header (u8 * s, va_list * va)
204 {
205   ethernet_arp_header_t *a = va_arg (*va, ethernet_arp_header_t *);
206   u32 max_header_bytes = va_arg (*va, u32);
207   u32 indent;
208   u16 l2_type, l3_type;
209
210   if (max_header_bytes != 0 && sizeof (a[0]) > max_header_bytes)
211     return format (s, "ARP header truncated");
212
213   l2_type = clib_net_to_host_u16 (a->l2_type);
214   l3_type = clib_net_to_host_u16 (a->l3_type);
215
216   indent = format_get_indent (s);
217
218   s = format (s, "%U, type %U/%U, address size %d/%d",
219               format_ethernet_arp_opcode, clib_net_to_host_u16 (a->opcode),
220               format_ethernet_arp_hardware_type, l2_type,
221               format_ethernet_type, l3_type,
222               a->n_l2_address_bytes, a->n_l3_address_bytes);
223
224   if (l2_type == ETHERNET_ARP_HARDWARE_TYPE_ethernet
225       && l3_type == ETHERNET_TYPE_IP4)
226     {
227       s = format (s, "\n%U%U/%U -> %U/%U",
228                   format_white_space, indent,
229                   format_ethernet_address, a->ip4_over_ethernet[0].ethernet,
230                   format_ip4_address, &a->ip4_over_ethernet[0].ip4,
231                   format_ethernet_address, a->ip4_over_ethernet[1].ethernet,
232                   format_ip4_address, &a->ip4_over_ethernet[1].ip4);
233     }
234   else
235     {
236       uword n2 = a->n_l2_address_bytes;
237       uword n3 = a->n_l3_address_bytes;
238       s = format (s, "\n%U%U/%U -> %U/%U",
239                   format_white_space, indent,
240                   format_hex_bytes, a->data + 0 * n2 + 0 * n3, n2,
241                   format_hex_bytes, a->data + 1 * n2 + 0 * n3, n3,
242                   format_hex_bytes, a->data + 1 * n2 + 1 * n3, n2,
243                   format_hex_bytes, a->data + 2 * n2 + 1 * n3, n3);
244     }
245
246   return s;
247 }
248
249 u8 *
250 format_ethernet_arp_ip4_entry (u8 * s, va_list * va)
251 {
252   vnet_main_t *vnm = va_arg (*va, vnet_main_t *);
253   ethernet_arp_ip4_entry_t *e = va_arg (*va, ethernet_arp_ip4_entry_t *);
254   vnet_sw_interface_t *si;
255   u8 *flags = 0;
256
257   if (!e)
258     return format (s, "%=12s%=16s%=6s%=20s%=24s", "Time", "IP4",
259                    "Flags", "Ethernet", "Interface");
260
261   si = vnet_get_sw_interface (vnm, e->sw_if_index);
262
263   if (e->flags & ETHERNET_ARP_IP4_ENTRY_FLAG_STATIC)
264     flags = format (flags, "S");
265
266   if (e->flags & ETHERNET_ARP_IP4_ENTRY_FLAG_DYNAMIC)
267     flags = format (flags, "D");
268
269   if (e->flags & ETHERNET_ARP_IP4_ENTRY_FLAG_NO_FIB_ENTRY)
270     flags = format (flags, "N");
271
272   s = format (s, "%=12U%=16U%=6s%=20U%U",
273               format_vlib_time, vnm->vlib_main, e->time_last_updated,
274               format_ip4_address, &e->ip4_address,
275               flags ? (char *) flags : "",
276               format_ethernet_address, e->ethernet_address,
277               format_vnet_sw_interface_name, vnm, si);
278
279   vec_free (flags);
280   return s;
281 }
282
283 typedef struct
284 {
285   u8 packet_data[64];
286 } ethernet_arp_input_trace_t;
287
288 static u8 *
289 format_ethernet_arp_input_trace (u8 * s, va_list * va)
290 {
291   CLIB_UNUSED (vlib_main_t * vm) = va_arg (*va, vlib_main_t *);
292   CLIB_UNUSED (vlib_node_t * node) = va_arg (*va, vlib_node_t *);
293   ethernet_arp_input_trace_t *t = va_arg (*va, ethernet_arp_input_trace_t *);
294
295   s = format (s, "%U",
296               format_ethernet_arp_header,
297               t->packet_data, sizeof (t->packet_data));
298
299   return s;
300 }
301
302 static u8 *
303 format_arp_term_input_trace (u8 * s, va_list * va)
304 {
305   CLIB_UNUSED (vlib_main_t * vm) = va_arg (*va, vlib_main_t *);
306   CLIB_UNUSED (vlib_node_t * node) = va_arg (*va, vlib_node_t *);
307   ethernet_arp_input_trace_t *t = va_arg (*va, ethernet_arp_input_trace_t *);
308
309   /* arp-term trace data saved is either arp or ip6/icmp6 packet:
310      - for arp, the 1st 16-bit field is hw type of value of 0x0001.
311      - for ip6, the first nibble has value of 6. */
312   s = format (s, "%U", t->packet_data[0] == 0 ?
313               format_ethernet_arp_header : format_ip6_header,
314               t->packet_data, sizeof (t->packet_data));
315
316   return s;
317 }
318
319 static void
320 arp_nbr_probe (ip_adjacency_t * adj)
321 {
322   vnet_main_t *vnm = vnet_get_main ();
323   ip4_main_t *im = &ip4_main;
324   ip_interface_address_t *ia;
325   ethernet_arp_header_t *h;
326   vnet_hw_interface_t *hi;
327   vnet_sw_interface_t *si;
328   ip4_address_t *src;
329   vlib_buffer_t *b;
330   vlib_main_t *vm;
331   u32 bi = 0;
332
333   vm = vlib_get_main ();
334
335   si = vnet_get_sw_interface (vnm, adj->rewrite_header.sw_if_index);
336
337   if (!(si->flags & VNET_SW_INTERFACE_FLAG_ADMIN_UP))
338     {
339       return;
340     }
341
342   src =
343     ip4_interface_address_matching_destination (im,
344                                                 &adj->sub_type.nbr.next_hop.
345                                                 ip4,
346                                                 adj->rewrite_header.
347                                                 sw_if_index, &ia);
348   if (!src)
349     {
350       return;
351     }
352
353   h =
354     vlib_packet_template_get_packet (vm, &im->ip4_arp_request_packet_template,
355                                      &bi);
356   if (!h)
357     return;
358
359   hi = vnet_get_sup_hw_interface (vnm, adj->rewrite_header.sw_if_index);
360
361   clib_memcpy (h->ip4_over_ethernet[0].ethernet,
362                hi->hw_address, sizeof (h->ip4_over_ethernet[0].ethernet));
363
364   h->ip4_over_ethernet[0].ip4 = src[0];
365   h->ip4_over_ethernet[1].ip4 = adj->sub_type.nbr.next_hop.ip4;
366
367   b = vlib_get_buffer (vm, bi);
368   vnet_buffer (b)->sw_if_index[VLIB_RX] =
369     vnet_buffer (b)->sw_if_index[VLIB_TX] = adj->rewrite_header.sw_if_index;
370
371   /* Add encapsulation string for software interface (e.g. ethernet header). */
372   vnet_rewrite_one_header (adj[0], h, sizeof (ethernet_header_t));
373   vlib_buffer_advance (b, -adj->rewrite_header.data_bytes);
374
375   {
376     vlib_frame_t *f = vlib_get_frame_to_node (vm, hi->output_node_index);
377     u32 *to_next = vlib_frame_vector_args (f);
378     to_next[0] = bi;
379     f->n_vectors = 1;
380     vlib_put_frame_to_node (vm, hi->output_node_index, f);
381   }
382 }
383
384 static void
385 arp_mk_complete (adj_index_t ai, ethernet_arp_ip4_entry_t * e)
386 {
387   adj_nbr_update_rewrite
388     (ai, ADJ_NBR_REWRITE_FLAG_COMPLETE,
389      ethernet_build_rewrite (vnet_get_main (),
390                              e->sw_if_index,
391                              adj_get_link_type (ai), e->ethernet_address));
392 }
393
394 static void
395 arp_mk_incomplete (adj_index_t ai)
396 {
397   ip_adjacency_t *adj = adj_get (ai);
398
399   adj_nbr_update_rewrite
400     (ai,
401      ADJ_NBR_REWRITE_FLAG_INCOMPLETE,
402      ethernet_build_rewrite (vnet_get_main (),
403                              adj->rewrite_header.sw_if_index,
404                              VNET_LINK_ARP,
405                              VNET_REWRITE_FOR_SW_INTERFACE_ADDRESS_BROADCAST));
406 }
407
408 static ethernet_arp_ip4_entry_t *
409 arp_entry_find (ethernet_arp_interface_t * eai, const ip4_address_t * addr)
410 {
411   ethernet_arp_main_t *am = &ethernet_arp_main;
412   ethernet_arp_ip4_entry_t *e = NULL;
413   uword *p;
414
415   if (NULL != eai->arp_entries)
416     {
417       p = hash_get (eai->arp_entries, addr->as_u32);
418       if (!p)
419         return (NULL);
420
421       e = pool_elt_at_index (am->ip4_entry_pool, p[0]);
422     }
423
424   return (e);
425 }
426
427 static adj_walk_rc_t
428 arp_mk_complete_walk (adj_index_t ai, void *ctx)
429 {
430   ethernet_arp_ip4_entry_t *e = ctx;
431
432   arp_mk_complete (ai, e);
433
434   return (ADJ_WALK_RC_CONTINUE);
435 }
436
437 static adj_walk_rc_t
438 arp_mk_incomplete_walk (adj_index_t ai, void *ctx)
439 {
440   arp_mk_incomplete (ai);
441
442   return (ADJ_WALK_RC_CONTINUE);
443 }
444
445 void
446 arp_update_adjacency (vnet_main_t * vnm, u32 sw_if_index, u32 ai)
447 {
448   ethernet_arp_main_t *am = &ethernet_arp_main;
449   ethernet_arp_interface_t *arp_int;
450   ethernet_arp_ip4_entry_t *e;
451   ip_adjacency_t *adj;
452
453   adj = adj_get (ai);
454
455   vec_validate (am->ethernet_arp_by_sw_if_index, sw_if_index);
456   arp_int = &am->ethernet_arp_by_sw_if_index[sw_if_index];
457   e = arp_entry_find (arp_int, &adj->sub_type.nbr.next_hop.ip4);
458
459   switch (adj->lookup_next_index)
460     {
461     case IP_LOOKUP_NEXT_GLEAN:
462       adj_glean_update_rewrite (ai);
463       break;
464     case IP_LOOKUP_NEXT_ARP:
465       if (NULL != e)
466         {
467           adj_nbr_walk_nh4 (sw_if_index,
468                             &e->ip4_address, arp_mk_complete_walk, e);
469         }
470       else
471         {
472           /*
473            * no matching ARP entry.
474            * construct the rewrite required to for an ARP packet, and stick
475            * that in the adj's pipe to smoke.
476            */
477           adj_nbr_update_rewrite
478             (ai,
479              ADJ_NBR_REWRITE_FLAG_INCOMPLETE,
480              ethernet_build_rewrite
481              (vnm,
482               sw_if_index,
483               VNET_LINK_ARP,
484               VNET_REWRITE_FOR_SW_INTERFACE_ADDRESS_BROADCAST));
485
486           /*
487            * since the FIB has added this adj for a route, it makes sense it
488            * may want to forward traffic sometime soon. Let's send a
489            * speculative ARP. just one. If we were to do periodically that
490            * wouldn't be bad either, but that's more code than i'm prepared to
491            * write at this time for relatively little reward.
492            */
493           arp_nbr_probe (adj);
494         }
495       break;
496     case IP_LOOKUP_NEXT_BCAST:
497       adj_nbr_update_rewrite (ai,
498                               ADJ_NBR_REWRITE_FLAG_COMPLETE,
499                               ethernet_build_rewrite
500                               (vnm,
501                                sw_if_index,
502                                VNET_LINK_IP4,
503                                VNET_REWRITE_FOR_SW_INTERFACE_ADDRESS_BROADCAST));
504       break;
505     case IP_LOOKUP_NEXT_MCAST:
506       {
507         /*
508          * Construct a partial rewrite from the known ethernet mcast dest MAC
509          */
510         u8 *rewrite;
511         u8 offset;
512
513         rewrite = ethernet_build_rewrite (vnm,
514                                           sw_if_index,
515                                           adj->ia_link,
516                                           ethernet_ip4_mcast_dst_addr ());
517         offset = vec_len (rewrite) - 2;
518
519         /*
520          * Complete the remaining fields of the adj's rewrite to direct the
521          * complete of the rewrite at switch time by copying in the IP
522          * dst address's bytes.
523          * Ofset is 2 bytes into the MAC desintation address.
524          */
525         adj_mcast_update_rewrite (ai, rewrite, offset);
526
527         break;
528       }
529     case IP_LOOKUP_NEXT_DROP:
530     case IP_LOOKUP_NEXT_PUNT:
531     case IP_LOOKUP_NEXT_LOCAL:
532     case IP_LOOKUP_NEXT_REWRITE:
533     case IP_LOOKUP_NEXT_MCAST_MIDCHAIN:
534     case IP_LOOKUP_NEXT_MIDCHAIN:
535     case IP_LOOKUP_NEXT_ICMP_ERROR:
536     case IP_LOOKUP_N_NEXT:
537       ASSERT (0);
538       break;
539     }
540 }
541
542 static void
543 arp_adj_fib_add (ethernet_arp_ip4_entry_t * e, u32 fib_index)
544 {
545   fib_prefix_t pfx = {
546     .fp_len = 32,
547     .fp_proto = FIB_PROTOCOL_IP4,
548     .fp_addr.ip4 = e->ip4_address,
549   };
550
551   e->fib_entry_index =
552     fib_table_entry_path_add (fib_index, &pfx, FIB_SOURCE_ADJ,
553                               FIB_ENTRY_FLAG_ATTACHED,
554                               DPO_PROTO_IP4, &pfx.fp_addr,
555                               e->sw_if_index, ~0, 1, NULL,
556                               FIB_ROUTE_PATH_FLAG_NONE);
557   fib_table_lock (fib_index, FIB_PROTOCOL_IP4, FIB_SOURCE_ADJ);
558 }
559
560 static void
561 arp_adj_fib_remove (ethernet_arp_ip4_entry_t * e, u32 fib_index)
562 {
563   if (FIB_NODE_INDEX_INVALID != e->fib_entry_index)
564     {
565       fib_prefix_t pfx = {
566         .fp_len = 32,
567         .fp_proto = FIB_PROTOCOL_IP4,
568         .fp_addr.ip4 = e->ip4_address,
569       };
570       u32 fib_index;
571
572       fib_index = ip4_fib_table_get_index_for_sw_if_index (e->sw_if_index);
573
574       fib_table_entry_path_remove (fib_index, &pfx,
575                                    FIB_SOURCE_ADJ,
576                                    DPO_PROTO_IP4,
577                                    &pfx.fp_addr,
578                                    e->sw_if_index, ~0, 1,
579                                    FIB_ROUTE_PATH_FLAG_NONE);
580       fib_table_unlock (fib_index, FIB_PROTOCOL_IP4, FIB_SOURCE_ADJ);
581     }
582 }
583
584 static ethernet_arp_ip4_entry_t *
585 force_reuse_arp_entry (void)
586 {
587   ethernet_arp_ip4_entry_t *e;
588   ethernet_arp_main_t *am = &ethernet_arp_main;
589   u32 count = 0;
590   u32 index = pool_next_index (am->ip4_entry_pool, am->arp_delete_rotor);
591   if (index == ~0)              /* Try again from elt 0 */
592     index = pool_next_index (am->ip4_entry_pool, index);
593
594   /* Find a non-static random entry to free up for reuse */
595   do
596     {
597       if ((count++ == 100) || (index == ~0))
598         return NULL;            /* give up after 100 entries */
599       e = pool_elt_at_index (am->ip4_entry_pool, index);
600       am->arp_delete_rotor = index;
601       index = pool_next_index (am->ip4_entry_pool, index);
602     }
603   while (e->flags & ETHERNET_ARP_IP4_ENTRY_FLAG_STATIC);
604
605   /* Remove ARP entry from its interface and update fib */
606   hash_unset
607     (am->ethernet_arp_by_sw_if_index[e->sw_if_index].arp_entries,
608      e->ip4_address.as_u32);
609   arp_adj_fib_remove
610     (e, ip4_fib_table_get_index_for_sw_if_index (e->sw_if_index));
611   adj_nbr_walk_nh4 (e->sw_if_index,
612                     &e->ip4_address, arp_mk_incomplete_walk, e);
613   return e;
614 }
615
616 static int
617 vnet_arp_set_ip4_over_ethernet_internal (vnet_main_t * vnm,
618                                          vnet_arp_set_ip4_over_ethernet_rpc_args_t
619                                          * args)
620 {
621   ethernet_arp_ip4_entry_t *e = 0;
622   ethernet_arp_main_t *am = &ethernet_arp_main;
623   ethernet_arp_ip4_over_ethernet_address_t *a = &args->a;
624   vlib_main_t *vm = vlib_get_main ();
625   int make_new_arp_cache_entry = 1;
626   uword *p;
627   pending_resolution_t *pr, *mc;
628   ethernet_arp_interface_t *arp_int;
629   int is_static = args->is_static;
630   u32 sw_if_index = args->sw_if_index;
631   int is_no_fib_entry = args->is_no_fib_entry;
632
633   vec_validate (am->ethernet_arp_by_sw_if_index, sw_if_index);
634
635   arp_int = &am->ethernet_arp_by_sw_if_index[sw_if_index];
636
637   if (NULL != arp_int->arp_entries)
638     {
639       p = hash_get (arp_int->arp_entries, a->ip4.as_u32);
640       if (p)
641         {
642           e = pool_elt_at_index (am->ip4_entry_pool, p[0]);
643
644           /* Refuse to over-write static arp. */
645           if (!is_static && (e->flags & ETHERNET_ARP_IP4_ENTRY_FLAG_STATIC))
646             {
647               /* if MAC address match, still check to send event */
648               if (0 == memcmp (e->ethernet_address,
649                                a->ethernet, sizeof (e->ethernet_address)))
650                 goto check_customers;
651               return -2;
652             }
653           make_new_arp_cache_entry = 0;
654         }
655     }
656
657   if (make_new_arp_cache_entry)
658     {
659       if (am->limit_arp_cache_size &&
660           pool_elts (am->ip4_entry_pool) >= am->limit_arp_cache_size)
661         {
662           e = force_reuse_arp_entry ();
663           if (NULL == e)
664             return -2;
665         }
666       else
667         pool_get (am->ip4_entry_pool, e);
668
669       if (NULL == arp_int->arp_entries)
670         arp_int->arp_entries = hash_create (0, sizeof (u32));
671
672       hash_set (arp_int->arp_entries, a->ip4.as_u32, e - am->ip4_entry_pool);
673
674       e->sw_if_index = sw_if_index;
675       e->ip4_address = a->ip4;
676       e->fib_entry_index = FIB_NODE_INDEX_INVALID;
677       clib_memcpy (e->ethernet_address,
678                    a->ethernet, sizeof (e->ethernet_address));
679
680       if (!is_no_fib_entry)
681         {
682           arp_adj_fib_add (e,
683                            ip4_fib_table_get_index_for_sw_if_index
684                            (e->sw_if_index));
685         }
686       else
687         {
688           e->flags |= ETHERNET_ARP_IP4_ENTRY_FLAG_NO_FIB_ENTRY;
689         }
690     }
691   else
692     {
693       /*
694        * prevent a DoS attack from the data-plane that
695        * spams us with no-op updates to the MAC address
696        */
697       if (0 == memcmp (e->ethernet_address,
698                        a->ethernet, sizeof (e->ethernet_address)))
699         {
700           e->time_last_updated = vlib_time_now (vm);
701           goto check_customers;
702         }
703
704       /* Update ethernet address. */
705       clib_memcpy (e->ethernet_address, a->ethernet,
706                    sizeof (e->ethernet_address));
707     }
708
709   /* Update time stamp and flags. */
710   e->time_last_updated = vlib_time_now (vm);
711   if (is_static)
712     {
713       e->flags &= ~ETHERNET_ARP_IP4_ENTRY_FLAG_DYNAMIC;
714       e->flags |= ETHERNET_ARP_IP4_ENTRY_FLAG_STATIC;
715     }
716   else
717     {
718       e->flags &= ~ETHERNET_ARP_IP4_ENTRY_FLAG_STATIC;
719       e->flags |= ETHERNET_ARP_IP4_ENTRY_FLAG_DYNAMIC;
720     }
721
722   adj_nbr_walk_nh4 (sw_if_index, &e->ip4_address, arp_mk_complete_walk, e);
723
724 check_customers:
725   /* Customer(s) waiting for this address to be resolved? */
726   p = hash_get (am->pending_resolutions_by_address, a->ip4.as_u32);
727   if (p)
728     {
729       u32 next_index;
730       next_index = p[0];
731
732       while (next_index != (u32) ~ 0)
733         {
734           pr = pool_elt_at_index (am->pending_resolutions, next_index);
735           vlib_process_signal_event (vm, pr->node_index,
736                                      pr->type_opaque, pr->data);
737           next_index = pr->next_index;
738           pool_put (am->pending_resolutions, pr);
739         }
740
741       hash_unset (am->pending_resolutions_by_address, a->ip4.as_u32);
742     }
743
744   /* Customer(s) requesting ARP event for this address? */
745   p = hash_get (am->mac_changes_by_address, a->ip4.as_u32);
746   if (p)
747     {
748       u32 next_index;
749       next_index = p[0];
750
751       while (next_index != (u32) ~ 0)
752         {
753           int (*fp) (u32, u8 *, u32, u32);
754           int rv = 1;
755           mc = pool_elt_at_index (am->mac_changes, next_index);
756           fp = mc->data_callback;
757
758           /* Call the user's data callback, return 1 to suppress dup events */
759           if (fp)
760             rv = (*fp) (mc->data, a->ethernet, sw_if_index, 0);
761
762           /*
763            * Signal the resolver process, as long as the user
764            * says they want to be notified
765            */
766           if (rv == 0)
767             vlib_process_signal_event (vm, mc->node_index,
768                                        mc->type_opaque, mc->data);
769           next_index = mc->next_index;
770         }
771     }
772
773   return 0;
774 }
775
776 void
777 vnet_register_ip4_arp_resolution_event (vnet_main_t * vnm,
778                                         void *address_arg,
779                                         uword node_index,
780                                         uword type_opaque, uword data)
781 {
782   ethernet_arp_main_t *am = &ethernet_arp_main;
783   ip4_address_t *address = address_arg;
784   uword *p;
785   pending_resolution_t *pr;
786
787   pool_get (am->pending_resolutions, pr);
788
789   pr->next_index = ~0;
790   pr->node_index = node_index;
791   pr->type_opaque = type_opaque;
792   pr->data = data;
793   pr->data_callback = 0;
794
795   p = hash_get (am->pending_resolutions_by_address, address->as_u32);
796   if (p)
797     {
798       /* Insert new resolution at the head of the list */
799       pr->next_index = p[0];
800       hash_unset (am->pending_resolutions_by_address, address->as_u32);
801     }
802
803   hash_set (am->pending_resolutions_by_address, address->as_u32,
804             pr - am->pending_resolutions);
805 }
806
807 int
808 vnet_add_del_ip4_arp_change_event (vnet_main_t * vnm,
809                                    void *data_callback,
810                                    u32 pid,
811                                    void *address_arg,
812                                    uword node_index,
813                                    uword type_opaque, uword data, int is_add)
814 {
815   ethernet_arp_main_t *am = &ethernet_arp_main;
816   ip4_address_t *address = address_arg;
817
818   /* Try to find an existing entry */
819   u32 *first = (u32 *) hash_get (am->mac_changes_by_address, address->as_u32);
820   u32 *p = first;
821   pending_resolution_t *mc;
822   while (p && *p != ~0)
823     {
824       mc = pool_elt_at_index (am->mac_changes, *p);
825       if (mc->node_index == node_index && mc->type_opaque == type_opaque
826           && mc->pid == pid)
827         break;
828       p = &mc->next_index;
829     }
830
831   int found = p && *p != ~0;
832   if (is_add)
833     {
834       if (found)
835         return VNET_API_ERROR_ENTRY_ALREADY_EXISTS;
836
837       pool_get (am->mac_changes, mc);
838       *mc = (pending_resolution_t)
839       {
840       .next_index = ~0,.node_index = node_index,.type_opaque =
841           type_opaque,.data = data,.data_callback = data_callback,.pid =
842           pid,};
843
844       /* Insert new resolution at the end of the list */
845       u32 new_idx = mc - am->mac_changes;
846       if (p)
847         p[0] = new_idx;
848       else
849         hash_set (am->mac_changes_by_address, address->as_u32, new_idx);
850     }
851   else
852     {
853       if (!found)
854         return VNET_API_ERROR_NO_SUCH_ENTRY;
855
856       /* Clients may need to clean up pool entries, too */
857       void (*fp) (u32, u8 *) = data_callback;
858       if (fp)
859         (*fp) (mc->data, 0 /* no new mac addrs */ );
860
861       /* Remove the entry from the list and delete the entry */
862       *p = mc->next_index;
863       pool_put (am->mac_changes, mc);
864
865       /* Remove from hash if we deleted the last entry */
866       if (*p == ~0 && p == first)
867         hash_unset (am->mac_changes_by_address, address->as_u32);
868     }
869   return 0;
870 }
871
872 /* Either we drop the packet or we send a reply to the sender. */
873 typedef enum
874 {
875   ARP_INPUT_NEXT_DROP,
876   ARP_INPUT_NEXT_REPLY_TX,
877   ARP_INPUT_N_NEXT,
878 } arp_input_next_t;
879
880 #define foreach_ethernet_arp_error                                      \
881   _ (replies_sent, "ARP replies sent")                                  \
882   _ (l2_type_not_ethernet, "L2 type not ethernet")                      \
883   _ (l3_type_not_ip4, "L3 type not IP4")                                \
884   _ (l3_src_address_not_local, "IP4 source address not local to subnet") \
885   _ (l3_dst_address_not_local, "IP4 destination address not local to subnet") \
886   _ (l3_dst_address_unset, "IP4 destination address is unset")          \
887   _ (l3_src_address_is_local, "IP4 source address matches local interface") \
888   _ (l3_src_address_learned, "ARP request IP4 source address learned")  \
889   _ (replies_received, "ARP replies received")                          \
890   _ (opcode_not_request, "ARP opcode not request")                      \
891   _ (proxy_arp_replies_sent, "Proxy ARP replies sent")                  \
892   _ (l2_address_mismatch, "ARP hw addr does not match L2 frame src addr") \
893   _ (gratuitous_arp, "ARP probe or announcement dropped") \
894   _ (interface_no_table, "Interface is not mapped to an IP table") \
895   _ (interface_not_ip_enabled, "Interface is not IP enabled") \
896
897 typedef enum
898 {
899 #define _(sym,string) ETHERNET_ARP_ERROR_##sym,
900   foreach_ethernet_arp_error
901 #undef _
902     ETHERNET_ARP_N_ERROR,
903 } ethernet_arp_input_error_t;
904
905 static int
906 arp_unnumbered (vlib_buffer_t * p0,
907                 u32 input_sw_if_index, u32 conn_sw_if_index)
908 {
909   vnet_main_t *vnm = vnet_get_main ();
910   vnet_interface_main_t *vim = &vnm->interface_main;
911   vnet_sw_interface_t *si;
912
913   /* verify that the input interface is unnumbered to the connected.
914    * the connected interface is the interface on which the subnet is
915    * configured */
916   si = &vim->sw_interfaces[input_sw_if_index];
917
918   if (!(si->flags & VNET_SW_INTERFACE_FLAG_UNNUMBERED &&
919         (si->unnumbered_sw_if_index == conn_sw_if_index)))
920     {
921       /* the input interface is not unnumbered to the interface on which
922        * the sub-net is configured that covers the ARP request.
923        * So this is not the case for unnumbered.. */
924       return 0;
925     }
926
927   return !0;
928 }
929
930 static u32
931 arp_learn (vnet_main_t * vnm,
932            ethernet_arp_main_t * am, u32 sw_if_index,
933            const ethernet_arp_ip4_over_ethernet_address_t * addr)
934 {
935   vnet_arp_set_ip4_over_ethernet (vnm, sw_if_index, addr, 0, 0);
936   return (ETHERNET_ARP_ERROR_l3_src_address_learned);
937 }
938
939 static uword
940 arp_input (vlib_main_t * vm, vlib_node_runtime_t * node, vlib_frame_t * frame)
941 {
942   ethernet_arp_main_t *am = &ethernet_arp_main;
943   vnet_main_t *vnm = vnet_get_main ();
944   ip4_main_t *im4 = &ip4_main;
945   u32 n_left_from, next_index, *from, *to_next;
946   u32 n_replies_sent = 0, n_proxy_arp_replies_sent = 0;
947
948   from = vlib_frame_vector_args (frame);
949   n_left_from = frame->n_vectors;
950   next_index = node->cached_next_index;
951
952   if (node->flags & VLIB_NODE_FLAG_TRACE)
953     vlib_trace_frame_buffers_only (vm, node, from, frame->n_vectors,
954                                    /* stride */ 1,
955                                    sizeof (ethernet_arp_input_trace_t));
956
957   while (n_left_from > 0)
958     {
959       u32 n_left_to_next;
960
961       vlib_get_next_frame (vm, node, next_index, to_next, n_left_to_next);
962
963       while (n_left_from > 0 && n_left_to_next > 0)
964         {
965           vlib_buffer_t *p0;
966           vnet_hw_interface_t *hw_if0;
967           ethernet_arp_header_t *arp0;
968           ethernet_header_t *eth_rx, *eth_tx;
969           const ip4_address_t *if_addr0;
970           ip4_address_t proxy_src;
971           u32 pi0, error0, next0, sw_if_index0, conn_sw_if_index0, fib_index0;
972           u8 is_request0, dst_is_local0, is_unnum0, is_vrrp_reply0;
973           ethernet_proxy_arp_t *pa;
974           fib_node_index_t dst_fei, src_fei;
975           const fib_prefix_t *pfx0;
976           fib_entry_flag_t src_flags, dst_flags;
977           u8 *rewrite0, rewrite0_len;
978
979           pi0 = from[0];
980           to_next[0] = pi0;
981           from += 1;
982           to_next += 1;
983           n_left_from -= 1;
984           n_left_to_next -= 1;
985           pa = 0;
986
987           p0 = vlib_get_buffer (vm, pi0);
988           arp0 = vlib_buffer_get_current (p0);
989           /* Fill in ethernet header. */
990           eth_rx = ethernet_buffer_get_header (p0);
991
992           is_request0 = arp0->opcode
993             == clib_host_to_net_u16 (ETHERNET_ARP_OPCODE_request);
994
995           error0 = ETHERNET_ARP_ERROR_replies_sent;
996
997           error0 =
998             (arp0->l2_type !=
999              clib_net_to_host_u16 (ETHERNET_ARP_HARDWARE_TYPE_ethernet) ?
1000              ETHERNET_ARP_ERROR_l2_type_not_ethernet : error0);
1001           error0 =
1002             (arp0->l3_type !=
1003              clib_net_to_host_u16 (ETHERNET_TYPE_IP4) ?
1004              ETHERNET_ARP_ERROR_l3_type_not_ip4 : error0);
1005           error0 =
1006             (0 == arp0->ip4_over_ethernet[0].ip4.as_u32 ?
1007              ETHERNET_ARP_ERROR_l3_dst_address_unset : error0);
1008
1009           sw_if_index0 = vnet_buffer (p0)->sw_if_index[VLIB_RX];
1010
1011           /* not playing the ARP game if the interface is not IPv4 enabled */
1012           error0 =
1013             (im4->ip_enabled_by_sw_if_index[sw_if_index0] == 0 ?
1014              ETHERNET_ARP_ERROR_interface_not_ip_enabled : error0);
1015
1016           if (error0)
1017             goto drop2;
1018
1019           /* Check that IP address is local and matches incoming interface. */
1020           fib_index0 = ip4_fib_table_get_index_for_sw_if_index (sw_if_index0);
1021           if (~0 == fib_index0)
1022             {
1023               error0 = ETHERNET_ARP_ERROR_interface_no_table;
1024               goto drop2;
1025
1026             }
1027           dst_fei = ip4_fib_table_lookup (ip4_fib_get (fib_index0),
1028                                           &arp0->ip4_over_ethernet[1].ip4,
1029                                           32);
1030           dst_flags = fib_entry_get_flags (dst_fei);
1031
1032           conn_sw_if_index0 = fib_entry_get_resolving_interface (dst_fei);
1033
1034           /* Honor unnumbered interface, if any */
1035           is_unnum0 = sw_if_index0 != conn_sw_if_index0;
1036
1037           {
1038             /*
1039              * we're looking for FIB entries that indicate the source
1040              * is attached. There may be more specific non-attached
1041              * routes that match the source, but these do not influence
1042              * whether we respond to an ARP request, i.e. they do not
1043              * influence whether we are the correct way for the sender
1044              * to reach us, they only affect how we reach the sender.
1045              */
1046             fib_entry_t *src_fib_entry;
1047             const fib_prefix_t *pfx;
1048             fib_entry_src_t *src;
1049             fib_source_t source;
1050             int attached;
1051             int mask;
1052
1053             mask = 32;
1054             attached = 0;
1055
1056             do
1057               {
1058                 src_fei = ip4_fib_table_lookup (ip4_fib_get (fib_index0),
1059                                                 &arp0->
1060                                                 ip4_over_ethernet[0].ip4,
1061                                                 mask);
1062                 src_fib_entry = fib_entry_get (src_fei);
1063
1064                 /*
1065                  * It's possible that the source that provides the
1066                  * flags we need, or the flags we must not have,
1067                  * is not the best source, so check then all.
1068                  */
1069                 /* *INDENT-OFF* */
1070                 FOR_EACH_SRC_ADDED(src_fib_entry, src, source,
1071                 ({
1072                   src_flags = fib_entry_get_flags_for_source (src_fei, source);
1073
1074                   /* Reject requests/replies with our local interface
1075                      address. */
1076                   if (FIB_ENTRY_FLAG_LOCAL & src_flags)
1077                     {
1078                       error0 = ETHERNET_ARP_ERROR_l3_src_address_is_local;
1079                       /*
1080                        * When VPP has an interface whose address is also
1081                        * applied to a TAP interface on the host, then VPP's
1082                        * TAP interface will be unnumbered  to the 'real'
1083                        * interface and do proxy ARP from the host.
1084                        * The curious aspect of this setup is that ARP requests
1085                        * from the host will come from the VPP's own address.
1086                        * So don't drop immediately here, instead go see if this
1087                        * is a proxy ARP case.
1088                        */
1089                       goto drop1;
1090                     }
1091                   /* A Source must also be local to subnet of matching
1092                    * interface address. */
1093                   if ((FIB_ENTRY_FLAG_ATTACHED & src_flags) ||
1094                       (FIB_ENTRY_FLAG_CONNECTED & src_flags))
1095                     {
1096                       attached = 1;
1097                       break;
1098                     }
1099                   /*
1100                    * else
1101                    *  The packet was sent from an address that is not
1102                    *  connected nor attached i.e. it is not from an
1103                    *  address that is covered by a link's sub-net,
1104                    *  nor is it a already learned host resp.
1105                    */
1106                 }));
1107                 /* *INDENT-ON* */
1108
1109                 /*
1110                  * shorter mask lookup for the next iteration.
1111                  */
1112                 pfx = fib_entry_get_prefix (src_fei);
1113                 mask = pfx->fp_len - 1;
1114
1115                 /*
1116                  * continue until we hit the default route or we find
1117                  * the attached we are looking for. The most likely
1118                  * outcome is we find the attached with the first source
1119                  * on the first lookup.
1120                  */
1121               }
1122             while (!attached &&
1123                    !fib_entry_is_sourced (src_fei, FIB_SOURCE_DEFAULT_ROUTE));
1124
1125             if (!attached)
1126               {
1127                 /*
1128                  * the matching route is a not attached, i.e. it was
1129                  * added as a result of routing, rather than interface/ARP
1130                  * configuration. If the matching route is not a host route
1131                  * (i.e. a /32)
1132                  */
1133                 error0 = ETHERNET_ARP_ERROR_l3_src_address_not_local;
1134                 goto drop2;
1135               }
1136           }
1137
1138           if (fib_entry_is_sourced (dst_fei, FIB_SOURCE_ADJ))
1139             {
1140               /*
1141                * We matched an adj-fib on ths source subnet (a /32 previously
1142                * added as a result of ARP). If this request is a gratuitous
1143                * ARP, then learn from it.
1144                * The check for matching an adj-fib, is to prevent hosts
1145                * from spamming us with gratuitous ARPS that might otherwise
1146                * blow our ARP cache
1147                */
1148               if (arp0->ip4_over_ethernet[0].ip4.as_u32 ==
1149                   arp0->ip4_over_ethernet[1].ip4.as_u32)
1150                 error0 = arp_learn (vnm, am, sw_if_index0,
1151                                     &arp0->ip4_over_ethernet[0]);
1152               goto drop2;
1153             }
1154           else if (!(FIB_ENTRY_FLAG_CONNECTED & dst_flags))
1155             {
1156               error0 = ETHERNET_ARP_ERROR_l3_dst_address_not_local;
1157               goto drop1;
1158             }
1159
1160           if (sw_if_index0 != fib_entry_get_resolving_interface (src_fei))
1161             {
1162               /*
1163                * The interface the ARP was received on is not the interface
1164                * on which the covering prefix is configured. Maybe this is a
1165                * case for unnumbered.
1166                */
1167               is_unnum0 = 1;
1168             }
1169
1170           dst_is_local0 = (FIB_ENTRY_FLAG_LOCAL & dst_flags);
1171           pfx0 = fib_entry_get_prefix (dst_fei);
1172           if_addr0 = &pfx0->fp_addr.ip4;
1173
1174           is_vrrp_reply0 =
1175             ((arp0->opcode ==
1176               clib_host_to_net_u16 (ETHERNET_ARP_OPCODE_reply))
1177              &&
1178              (!memcmp
1179               (arp0->ip4_over_ethernet[0].ethernet, vrrp_prefix,
1180                sizeof (vrrp_prefix))));
1181
1182           /* Trash ARP packets whose ARP-level source addresses do not
1183              match their L2-frame-level source addresses, unless it's
1184              a reply from a VRRP virtual router */
1185           if (memcmp
1186               (eth_rx->src_address, arp0->ip4_over_ethernet[0].ethernet,
1187                sizeof (eth_rx->src_address)) && !is_vrrp_reply0)
1188             {
1189               error0 = ETHERNET_ARP_ERROR_l2_address_mismatch;
1190               goto drop2;
1191             }
1192
1193           /* Learn or update sender's mapping only for replies to addresses
1194            * that are local to the subnet */
1195           if (arp0->opcode ==
1196               clib_host_to_net_u16 (ETHERNET_ARP_OPCODE_reply))
1197             {
1198               if (dst_is_local0)
1199                 error0 = arp_learn (vnm, am, sw_if_index0,
1200                                     &arp0->ip4_over_ethernet[0]);
1201               else
1202                 /* a reply for a non-local destination could be a GARP.
1203                  * GARPs for hosts we know were handled above, so this one
1204                  * we drop */
1205                 error0 = ETHERNET_ARP_ERROR_l3_dst_address_not_local;
1206
1207               goto drop1;
1208             }
1209           else if (arp0->opcode ==
1210                    clib_host_to_net_u16 (ETHERNET_ARP_OPCODE_request) &&
1211                    (dst_is_local0 == 0))
1212             {
1213               goto drop1;
1214             }
1215
1216         send_reply:
1217           /* Send a reply.
1218              An adjacency to the sender is not always present,
1219              so we use the interface to build us a rewrite string
1220              which will contain all the necessary tags. */
1221           rewrite0 = ethernet_build_rewrite (vnm, sw_if_index0,
1222                                              VNET_LINK_ARP,
1223                                              eth_rx->src_address);
1224           rewrite0_len = vec_len (rewrite0);
1225
1226           /* Figure out how much to rewind current data from adjacency. */
1227           vlib_buffer_advance (p0, -rewrite0_len);
1228           eth_tx = vlib_buffer_get_current (p0);
1229
1230           vnet_buffer (p0)->sw_if_index[VLIB_TX] = sw_if_index0;
1231           hw_if0 = vnet_get_sup_hw_interface (vnm, sw_if_index0);
1232
1233           /* Send reply back through input interface */
1234           vnet_buffer (p0)->sw_if_index[VLIB_TX] = sw_if_index0;
1235           next0 = ARP_INPUT_NEXT_REPLY_TX;
1236
1237           arp0->opcode = clib_host_to_net_u16 (ETHERNET_ARP_OPCODE_reply);
1238
1239           arp0->ip4_over_ethernet[1] = arp0->ip4_over_ethernet[0];
1240
1241           clib_memcpy (arp0->ip4_over_ethernet[0].ethernet,
1242                        hw_if0->hw_address, 6);
1243           clib_mem_unaligned (&arp0->ip4_over_ethernet[0].ip4.data_u32, u32) =
1244             if_addr0->data_u32;
1245
1246           /* Hardware must be ethernet-like. */
1247           ASSERT (vec_len (hw_if0->hw_address) == 6);
1248
1249           /* the rx nd tx ethernet headers wil overlap in the case
1250            * when we received a tagged VLAN=0 packet, but we are sending
1251            * back untagged */
1252           clib_memcpy (eth_tx, rewrite0, vec_len (rewrite0));
1253           vec_free (rewrite0);
1254
1255           if (NULL == pa)
1256             {
1257               if (is_unnum0)
1258                 {
1259                   if (!arp_unnumbered (p0, sw_if_index0, conn_sw_if_index0))
1260                     goto drop2;
1261                 }
1262             }
1263
1264           /* We are going to reply to this request, so, in the absence of
1265              errors, learn the sender */
1266           if (!error0)
1267             error0 = arp_learn (vnm, am, sw_if_index0,
1268                                 &arp0->ip4_over_ethernet[1]);
1269
1270           vlib_validate_buffer_enqueue_x1 (vm, node, next_index, to_next,
1271                                            n_left_to_next, pi0, next0);
1272
1273           n_replies_sent += 1;
1274           continue;
1275
1276         drop1:
1277           if (arp0->ip4_over_ethernet[0].ip4.as_u32 ==
1278               arp0->ip4_over_ethernet[1].ip4.as_u32)
1279             {
1280               error0 = ETHERNET_ARP_ERROR_gratuitous_arp;
1281               goto drop2;
1282             }
1283           /* See if proxy arp is configured for the address */
1284           if (is_request0)
1285             {
1286               vnet_sw_interface_t *si;
1287               u32 this_addr = clib_net_to_host_u32
1288                 (arp0->ip4_over_ethernet[1].ip4.as_u32);
1289               u32 fib_index0;
1290
1291               si = vnet_get_sw_interface (vnm, sw_if_index0);
1292
1293               if (!(si->flags & VNET_SW_INTERFACE_FLAG_PROXY_ARP))
1294                 goto drop2;
1295
1296               fib_index0 = vec_elt (im4->fib_index_by_sw_if_index,
1297                                     sw_if_index0);
1298
1299               vec_foreach (pa, am->proxy_arps)
1300               {
1301                 u32 lo_addr = clib_net_to_host_u32 (pa->lo_addr.as_u32);
1302                 u32 hi_addr = clib_net_to_host_u32 (pa->hi_addr.as_u32);
1303
1304                 /* an ARP request hit in the proxy-arp table? */
1305                 if ((this_addr >= lo_addr && this_addr <= hi_addr) &&
1306                     (fib_index0 == pa->fib_index))
1307                   {
1308                     proxy_src.as_u32 =
1309                       arp0->ip4_over_ethernet[1].ip4.data_u32;
1310
1311                     /*
1312                      * change the interface address to the proxied
1313                      */
1314                     if_addr0 = &proxy_src;
1315                     is_unnum0 = 0;
1316                     n_proxy_arp_replies_sent++;
1317                     goto send_reply;
1318                   }
1319               }
1320             }
1321
1322         drop2:
1323
1324           next0 = ARP_INPUT_NEXT_DROP;
1325           p0->error = node->errors[error0];
1326
1327           vlib_validate_buffer_enqueue_x1 (vm, node, next_index, to_next,
1328                                            n_left_to_next, pi0, next0);
1329         }
1330
1331       vlib_put_next_frame (vm, node, next_index, n_left_to_next);
1332     }
1333
1334   vlib_error_count (vm, node->node_index,
1335                     ETHERNET_ARP_ERROR_replies_sent,
1336                     n_replies_sent - n_proxy_arp_replies_sent);
1337
1338   vlib_error_count (vm, node->node_index,
1339                     ETHERNET_ARP_ERROR_proxy_arp_replies_sent,
1340                     n_proxy_arp_replies_sent);
1341   return frame->n_vectors;
1342 }
1343
1344 static char *ethernet_arp_error_strings[] = {
1345 #define _(sym,string) string,
1346   foreach_ethernet_arp_error
1347 #undef _
1348 };
1349
1350 /* *INDENT-OFF* */
1351 VLIB_REGISTER_NODE (arp_input_node, static) =
1352 {
1353   .function = arp_input,
1354   .name = "arp-input",
1355   .vector_size = sizeof (u32),
1356   .n_errors = ETHERNET_ARP_N_ERROR,
1357   .error_strings = ethernet_arp_error_strings,
1358   .n_next_nodes = ARP_INPUT_N_NEXT,
1359   .next_nodes = {
1360     [ARP_INPUT_NEXT_DROP] = "error-drop",
1361     [ARP_INPUT_NEXT_REPLY_TX] = "interface-output",
1362   },
1363   .format_buffer = format_ethernet_arp_header,
1364   .format_trace = format_ethernet_arp_input_trace,
1365 };
1366 /* *INDENT-ON* */
1367
1368 static int
1369 ip4_arp_entry_sort (void *a1, void *a2)
1370 {
1371   ethernet_arp_ip4_entry_t *e1 = a1;
1372   ethernet_arp_ip4_entry_t *e2 = a2;
1373
1374   int cmp;
1375   vnet_main_t *vnm = vnet_get_main ();
1376
1377   cmp = vnet_sw_interface_compare (vnm, e1->sw_if_index, e2->sw_if_index);
1378   if (!cmp)
1379     cmp = ip4_address_compare (&e1->ip4_address, &e2->ip4_address);
1380   return cmp;
1381 }
1382
1383 ethernet_arp_ip4_entry_t *
1384 ip4_neighbors_pool (void)
1385 {
1386   ethernet_arp_main_t *am = &ethernet_arp_main;
1387   return am->ip4_entry_pool;
1388 }
1389
1390 ethernet_arp_ip4_entry_t *
1391 ip4_neighbor_entries (u32 sw_if_index)
1392 {
1393   ethernet_arp_main_t *am = &ethernet_arp_main;
1394   ethernet_arp_ip4_entry_t *n, *ns = 0;
1395
1396   /* *INDENT-OFF* */
1397   pool_foreach (n, am->ip4_entry_pool, ({
1398     if (sw_if_index != ~0 && n->sw_if_index != sw_if_index)
1399       continue;
1400     vec_add1 (ns, n[0]);
1401   }));
1402   /* *INDENT-ON* */
1403
1404   if (ns)
1405     vec_sort_with_function (ns, ip4_arp_entry_sort);
1406   return ns;
1407 }
1408
1409 static clib_error_t *
1410 show_ip4_arp (vlib_main_t * vm,
1411               unformat_input_t * input, vlib_cli_command_t * cmd)
1412 {
1413   vnet_main_t *vnm = vnet_get_main ();
1414   ethernet_arp_main_t *am = &ethernet_arp_main;
1415   ethernet_arp_ip4_entry_t *e, *es;
1416   ethernet_proxy_arp_t *pa;
1417   clib_error_t *error = 0;
1418   u32 sw_if_index;
1419
1420   /* Filter entries by interface if given. */
1421   sw_if_index = ~0;
1422   (void) unformat_user (input, unformat_vnet_sw_interface, vnm, &sw_if_index);
1423
1424   es = ip4_neighbor_entries (sw_if_index);
1425   if (es)
1426     {
1427       vlib_cli_output (vm, "%U", format_ethernet_arp_ip4_entry, vnm, 0);
1428       vec_foreach (e, es)
1429       {
1430         vlib_cli_output (vm, "%U", format_ethernet_arp_ip4_entry, vnm, e);
1431       }
1432       vec_free (es);
1433     }
1434
1435   if (vec_len (am->proxy_arps))
1436     {
1437       vlib_cli_output (vm, "Proxy arps enabled for:");
1438       vec_foreach (pa, am->proxy_arps)
1439       {
1440         vlib_cli_output (vm, "Fib_index %d   %U - %U ",
1441                          pa->fib_index,
1442                          format_ip4_address, &pa->lo_addr,
1443                          format_ip4_address, &pa->hi_addr);
1444       }
1445     }
1446
1447   return error;
1448 }
1449
1450 /*?
1451  * Display all the IPv4 ARP entries.
1452  *
1453  * @cliexpar
1454  * Example of how to display the IPv4 ARP table:
1455  * @cliexstart{show ip arp}
1456  *    Time      FIB        IP4       Flags      Ethernet              Interface
1457  *    346.3028   0       6.1.1.3            de:ad:be:ef:ba:be   GigabitEthernet2/0/0
1458  *   3077.4271   0       6.1.1.4       S    de:ad:be:ef:ff:ff   GigabitEthernet2/0/0
1459  *   2998.6409   1       6.2.2.3            de:ad:be:ef:00:01   GigabitEthernet2/0/0
1460  * Proxy arps enabled for:
1461  * Fib_index 0   6.0.0.1 - 6.0.0.11
1462  * @cliexend
1463  ?*/
1464 /* *INDENT-OFF* */
1465 VLIB_CLI_COMMAND (show_ip4_arp_command, static) = {
1466   .path = "show ip arp",
1467   .function = show_ip4_arp,
1468   .short_help = "show ip arp",
1469 };
1470 /* *INDENT-ON* */
1471
1472 typedef struct
1473 {
1474   pg_edit_t l2_type, l3_type;
1475   pg_edit_t n_l2_address_bytes, n_l3_address_bytes;
1476   pg_edit_t opcode;
1477   struct
1478   {
1479     pg_edit_t ethernet;
1480     pg_edit_t ip4;
1481   } ip4_over_ethernet[2];
1482 } pg_ethernet_arp_header_t;
1483
1484 static inline void
1485 pg_ethernet_arp_header_init (pg_ethernet_arp_header_t * p)
1486 {
1487   /* Initialize fields that are not bit fields in the IP header. */
1488 #define _(f) pg_edit_init (&p->f, ethernet_arp_header_t, f);
1489   _(l2_type);
1490   _(l3_type);
1491   _(n_l2_address_bytes);
1492   _(n_l3_address_bytes);
1493   _(opcode);
1494   _(ip4_over_ethernet[0].ethernet);
1495   _(ip4_over_ethernet[0].ip4);
1496   _(ip4_over_ethernet[1].ethernet);
1497   _(ip4_over_ethernet[1].ip4);
1498 #undef _
1499 }
1500
1501 uword
1502 unformat_pg_arp_header (unformat_input_t * input, va_list * args)
1503 {
1504   pg_stream_t *s = va_arg (*args, pg_stream_t *);
1505   pg_ethernet_arp_header_t *p;
1506   u32 group_index;
1507
1508   p = pg_create_edit_group (s, sizeof (p[0]), sizeof (ethernet_arp_header_t),
1509                             &group_index);
1510   pg_ethernet_arp_header_init (p);
1511
1512   /* Defaults. */
1513   pg_edit_set_fixed (&p->l2_type, ETHERNET_ARP_HARDWARE_TYPE_ethernet);
1514   pg_edit_set_fixed (&p->l3_type, ETHERNET_TYPE_IP4);
1515   pg_edit_set_fixed (&p->n_l2_address_bytes, 6);
1516   pg_edit_set_fixed (&p->n_l3_address_bytes, 4);
1517
1518   if (!unformat (input, "%U: %U/%U -> %U/%U",
1519                  unformat_pg_edit,
1520                  unformat_ethernet_arp_opcode_net_byte_order, &p->opcode,
1521                  unformat_pg_edit,
1522                  unformat_ethernet_address, &p->ip4_over_ethernet[0].ethernet,
1523                  unformat_pg_edit,
1524                  unformat_ip4_address, &p->ip4_over_ethernet[0].ip4,
1525                  unformat_pg_edit,
1526                  unformat_ethernet_address, &p->ip4_over_ethernet[1].ethernet,
1527                  unformat_pg_edit,
1528                  unformat_ip4_address, &p->ip4_over_ethernet[1].ip4))
1529     {
1530       /* Free up any edits we may have added. */
1531       pg_free_edit_group (s);
1532       return 0;
1533     }
1534   return 1;
1535 }
1536
1537 clib_error_t *
1538 ip4_set_arp_limit (u32 arp_limit)
1539 {
1540   ethernet_arp_main_t *am = &ethernet_arp_main;
1541
1542   am->limit_arp_cache_size = arp_limit;
1543   return 0;
1544 }
1545
1546 /**
1547  * @brief Control Plane hook to remove an ARP entry
1548  */
1549 int
1550 vnet_arp_unset_ip4_over_ethernet (vnet_main_t * vnm,
1551                                   u32 sw_if_index,
1552                                   const
1553                                   ethernet_arp_ip4_over_ethernet_address_t *
1554                                   a)
1555 {
1556   vnet_arp_set_ip4_over_ethernet_rpc_args_t args;
1557
1558   args.sw_if_index = sw_if_index;
1559   args.flags = ETHERNET_ARP_ARGS_REMOVE;
1560   clib_memcpy (&args.a, a, sizeof (*a));
1561
1562   vl_api_rpc_call_main_thread (set_ip4_over_ethernet_rpc_callback,
1563                                (u8 *) & args, sizeof (args));
1564   return 0;
1565 }
1566
1567 /**
1568  * @brief publish wildcard arp event
1569  * @param sw_if_index The interface on which the ARP entires are acted
1570  */
1571 static int
1572 vnet_arp_wc_publish (u32 sw_if_index,
1573                      const ethernet_arp_ip4_over_ethernet_address_t * a)
1574 {
1575   vnet_arp_set_ip4_over_ethernet_rpc_args_t args = {
1576     .flags = ETHERNET_ARP_ARGS_WC_PUB,
1577     .sw_if_index = sw_if_index,
1578     .a = *a
1579   };
1580
1581   vl_api_rpc_call_main_thread (set_ip4_over_ethernet_rpc_callback,
1582                                (u8 *) & args, sizeof (args));
1583   return 0;
1584 }
1585
1586 static void
1587 vnet_arp_wc_publish_internal (vnet_main_t * vnm,
1588                               vnet_arp_set_ip4_over_ethernet_rpc_args_t *
1589                               args)
1590 {
1591   vlib_main_t *vm = vlib_get_main ();
1592   ethernet_arp_main_t *am = &ethernet_arp_main;
1593   uword ni = am->wc_ip4_arp_publisher_node;
1594   uword et = am->wc_ip4_arp_publisher_et;
1595
1596   if (ni == (uword) ~ 0)
1597     return;
1598   wc_arp_report_t *r =
1599     vlib_process_signal_event_data (vm, ni, et, 1, sizeof *r);
1600   r->ip4 = args->a.ip4.as_u32;
1601   r->sw_if_index = args->sw_if_index;
1602   memcpy (r->mac, args->a.ethernet, sizeof r->mac);
1603 }
1604
1605 void
1606 wc_arp_set_publisher_node (uword node_index, uword event_type)
1607 {
1608   ethernet_arp_main_t *am = &ethernet_arp_main;
1609   am->wc_ip4_arp_publisher_node = node_index;
1610   am->wc_ip4_arp_publisher_et = event_type;
1611 }
1612
1613 static void
1614 arp_entry_free (ethernet_arp_interface_t * eai, ethernet_arp_ip4_entry_t * e);
1615
1616 static int
1617 vnet_arp_flush_ip4_over_ethernet_internal (vnet_main_t * vnm,
1618                                            vnet_arp_set_ip4_over_ethernet_rpc_args_t
1619                                            * args)
1620 {
1621   ethernet_arp_main_t *am = &ethernet_arp_main;
1622   ethernet_arp_ip4_entry_t *e;
1623   ethernet_arp_interface_t *eai;
1624
1625   if (vec_len (am->ethernet_arp_by_sw_if_index) <= args->sw_if_index)
1626     return 0;
1627
1628   eai = &am->ethernet_arp_by_sw_if_index[args->sw_if_index];
1629
1630   e = arp_entry_find (eai, &args->a.ip4);
1631
1632   if (NULL != e)
1633     {
1634       adj_nbr_walk_nh4 (e->sw_if_index,
1635                         &e->ip4_address, arp_mk_incomplete_walk, e);
1636
1637       /*
1638        * The difference between flush and unset, is that an unset
1639        * means delete for static and dynamic entries. A flush
1640        * means delete only for dynamic. Flushing is what the DP
1641        * does in response to interface events. unset is only done
1642        * by the control plane.
1643        */
1644       if (e->flags & ETHERNET_ARP_IP4_ENTRY_FLAG_STATIC)
1645         {
1646           e->flags &= ~ETHERNET_ARP_IP4_ENTRY_FLAG_DYNAMIC;
1647         }
1648       else if (e->flags & ETHERNET_ARP_IP4_ENTRY_FLAG_DYNAMIC)
1649         {
1650           arp_entry_free (eai, e);
1651         }
1652     }
1653   return (0);
1654 }
1655
1656 /*
1657  * arp_add_del_interface_address
1658  *
1659  * callback when an interface address is added or deleted
1660  */
1661 static void
1662 arp_add_del_interface_address (ip4_main_t * im,
1663                                uword opaque,
1664                                u32 sw_if_index,
1665                                ip4_address_t * address,
1666                                u32 address_length,
1667                                u32 if_address_index, u32 is_del)
1668 {
1669   /*
1670    * Flush the ARP cache of all entries covered by the address
1671    * that is being removed.
1672    */
1673   ethernet_arp_main_t *am = &ethernet_arp_main;
1674   ethernet_arp_ip4_entry_t *e;
1675
1676   if (vec_len (am->ethernet_arp_by_sw_if_index) <= sw_if_index)
1677     return;
1678
1679   if (is_del)
1680     {
1681       ethernet_arp_interface_t *eai;
1682       u32 i, *to_delete = 0;
1683       hash_pair_t *pair;
1684
1685       eai = &am->ethernet_arp_by_sw_if_index[sw_if_index];
1686
1687       /* *INDENT-OFF* */
1688       hash_foreach_pair (pair, eai->arp_entries,
1689       ({
1690         e = pool_elt_at_index(am->ip4_entry_pool,
1691                               pair->value[0]);
1692         if (ip4_destination_matches_route (im, &e->ip4_address,
1693                                            address, address_length))
1694           {
1695             vec_add1 (to_delete, e - am->ip4_entry_pool);
1696           }
1697       }));
1698       /* *INDENT-ON* */
1699
1700       for (i = 0; i < vec_len (to_delete); i++)
1701         {
1702           e = pool_elt_at_index (am->ip4_entry_pool, to_delete[i]);
1703
1704           vnet_arp_set_ip4_over_ethernet_rpc_args_t delme = {
1705             .a.ip4.as_u32 = e->ip4_address.as_u32,
1706             .sw_if_index = e->sw_if_index,
1707             .flags = ETHERNET_ARP_ARGS_FLUSH,
1708           };
1709           clib_memcpy (&delme.a.ethernet, e->ethernet_address, 6);
1710
1711           vnet_arp_flush_ip4_over_ethernet_internal (vnet_get_main (),
1712                                                      &delme);
1713         }
1714
1715       vec_free (to_delete);
1716     }
1717 }
1718
1719 static void
1720 arp_table_bind (ip4_main_t * im,
1721                 uword opaque,
1722                 u32 sw_if_index, u32 new_fib_index, u32 old_fib_index)
1723 {
1724   ethernet_arp_main_t *am = &ethernet_arp_main;
1725   ethernet_arp_interface_t *eai;
1726   ethernet_arp_ip4_entry_t *e;
1727   hash_pair_t *pair;
1728
1729   /*
1730    * the IP table that the interface is bound to has changed.
1731    * reinstall all the adj fibs.
1732    */
1733
1734   if (vec_len (am->ethernet_arp_by_sw_if_index) <= sw_if_index)
1735     return;
1736
1737   eai = &am->ethernet_arp_by_sw_if_index[sw_if_index];
1738
1739   /* *INDENT-OFF* */
1740   hash_foreach_pair (pair, eai->arp_entries,
1741   ({
1742     e = pool_elt_at_index(am->ip4_entry_pool,
1743                           pair->value[0]);
1744     /*
1745      * remove the adj-fib from the old table and add to the new
1746      */
1747     arp_adj_fib_remove(e, old_fib_index);
1748     arp_adj_fib_add(e, new_fib_index);
1749   }));
1750   /* *INDENT-ON* */
1751
1752 }
1753
1754 static clib_error_t *
1755 ethernet_arp_init (vlib_main_t * vm)
1756 {
1757   ethernet_arp_main_t *am = &ethernet_arp_main;
1758   ip4_main_t *im = &ip4_main;
1759   clib_error_t *error;
1760   pg_node_t *pn;
1761
1762   if ((error = vlib_call_init_function (vm, ethernet_init)))
1763     return error;
1764
1765   ethernet_register_input_type (vm, ETHERNET_TYPE_ARP, arp_input_node.index);
1766
1767   pn = pg_get_node (arp_input_node.index);
1768   pn->unformat_edit = unformat_pg_arp_header;
1769
1770   am->opcode_by_name = hash_create_string (0, sizeof (uword));
1771 #define _(o) hash_set_mem (am->opcode_by_name, #o, ETHERNET_ARP_OPCODE_##o);
1772   foreach_ethernet_arp_opcode;
1773 #undef _
1774
1775   /* $$$ configurable */
1776   am->limit_arp_cache_size = 50000;
1777
1778   am->pending_resolutions_by_address = hash_create (0, sizeof (uword));
1779   am->mac_changes_by_address = hash_create (0, sizeof (uword));
1780   am->wc_ip4_arp_publisher_node = (uword) ~ 0;
1781
1782   /* don't trace ARP error packets */
1783   {
1784     vlib_node_runtime_t *rt =
1785       vlib_node_get_runtime (vm, arp_input_node.index);
1786
1787 #define _(a,b)                                  \
1788     vnet_pcap_drop_trace_filter_add_del         \
1789         (rt->errors[ETHERNET_ARP_ERROR_##a],    \
1790          1 /* is_add */);
1791     foreach_ethernet_arp_error
1792 #undef _
1793   }
1794
1795   ip4_add_del_interface_address_callback_t cb;
1796   cb.function = arp_add_del_interface_address;
1797   cb.function_opaque = 0;
1798   vec_add1 (im->add_del_interface_address_callbacks, cb);
1799
1800   ip4_table_bind_callback_t cbt;
1801   cbt.function = arp_table_bind;
1802   cbt.function_opaque = 0;
1803   vec_add1 (im->table_bind_callbacks, cbt);
1804
1805   return 0;
1806 }
1807
1808 VLIB_INIT_FUNCTION (ethernet_arp_init);
1809
1810 static void
1811 arp_entry_free (ethernet_arp_interface_t * eai, ethernet_arp_ip4_entry_t * e)
1812 {
1813   ethernet_arp_main_t *am = &ethernet_arp_main;
1814
1815   arp_adj_fib_remove
1816     (e, ip4_fib_table_get_index_for_sw_if_index (e->sw_if_index));
1817   hash_unset (eai->arp_entries, e->ip4_address.as_u32);
1818   pool_put (am->ip4_entry_pool, e);
1819 }
1820
1821 static inline int
1822 vnet_arp_unset_ip4_over_ethernet_internal (vnet_main_t * vnm,
1823                                            vnet_arp_set_ip4_over_ethernet_rpc_args_t
1824                                            * args)
1825 {
1826   ethernet_arp_main_t *am = &ethernet_arp_main;
1827   ethernet_arp_ip4_entry_t *e;
1828   ethernet_arp_interface_t *eai;
1829
1830   if (vec_len (am->ethernet_arp_by_sw_if_index) <= args->sw_if_index)
1831     return 0;
1832
1833   eai = &am->ethernet_arp_by_sw_if_index[args->sw_if_index];
1834
1835   e = arp_entry_find (eai, &args->a.ip4);
1836
1837   if (NULL != e)
1838     {
1839       adj_nbr_walk_nh4 (e->sw_if_index,
1840                         &e->ip4_address, arp_mk_incomplete_walk, e);
1841       arp_entry_free (eai, e);
1842     }
1843
1844   return 0;
1845 }
1846
1847
1848 static int
1849 vnet_arp_populate_ip4_over_ethernet_internal (vnet_main_t * vnm,
1850                                               vnet_arp_set_ip4_over_ethernet_rpc_args_t
1851                                               * args)
1852 {
1853   ethernet_arp_main_t *am = &ethernet_arp_main;
1854   ethernet_arp_ip4_entry_t *e;
1855   ethernet_arp_interface_t *eai;
1856
1857   vec_validate (am->ethernet_arp_by_sw_if_index, args->sw_if_index);
1858   eai = &am->ethernet_arp_by_sw_if_index[args->sw_if_index];
1859
1860   e = arp_entry_find (eai, &args->a.ip4);
1861
1862   if (NULL != e)
1863     {
1864       adj_nbr_walk_nh4 (e->sw_if_index,
1865                         &e->ip4_address, arp_mk_complete_walk, e);
1866     }
1867   return (0);
1868 }
1869
1870 static void
1871 set_ip4_over_ethernet_rpc_callback (vnet_arp_set_ip4_over_ethernet_rpc_args_t
1872                                     * a)
1873 {
1874   vnet_main_t *vm = vnet_get_main ();
1875   ASSERT (vlib_get_thread_index () == 0);
1876
1877   if (a->flags & ETHERNET_ARP_ARGS_REMOVE)
1878     vnet_arp_unset_ip4_over_ethernet_internal (vm, a);
1879   else if (a->flags & ETHERNET_ARP_ARGS_FLUSH)
1880     vnet_arp_flush_ip4_over_ethernet_internal (vm, a);
1881   else if (a->flags & ETHERNET_ARP_ARGS_POPULATE)
1882     vnet_arp_populate_ip4_over_ethernet_internal (vm, a);
1883   else if (a->flags & ETHERNET_ARP_ARGS_WC_PUB)
1884     vnet_arp_wc_publish_internal (vm, a);
1885   else
1886     vnet_arp_set_ip4_over_ethernet_internal (vm, a);
1887 }
1888
1889 /**
1890  * @brief Invoked when the interface's admin state changes
1891  */
1892 static clib_error_t *
1893 ethernet_arp_sw_interface_up_down (vnet_main_t * vnm,
1894                                    u32 sw_if_index, u32 flags)
1895 {
1896   ethernet_arp_main_t *am = &ethernet_arp_main;
1897   ethernet_arp_ip4_entry_t *e;
1898   u32 i, *to_update = 0;
1899
1900   /* *INDENT-OFF* */
1901   pool_foreach (e, am->ip4_entry_pool,
1902   ({
1903     if (e->sw_if_index == sw_if_index)
1904       vec_add1 (to_update,
1905                 e - am->ip4_entry_pool);
1906   }));
1907   /* *INDENT-ON* */
1908
1909   for (i = 0; i < vec_len (to_update); i++)
1910     {
1911       e = pool_elt_at_index (am->ip4_entry_pool, to_update[i]);
1912
1913       vnet_arp_set_ip4_over_ethernet_rpc_args_t update_me = {
1914         .a.ip4.as_u32 = e->ip4_address.as_u32,
1915         .sw_if_index = e->sw_if_index,
1916       };
1917
1918       clib_memcpy (&update_me.a.ethernet, e->ethernet_address, 6);
1919
1920       if (flags & VNET_SW_INTERFACE_FLAG_ADMIN_UP)
1921         {
1922           update_me.flags = ETHERNET_ARP_ARGS_POPULATE;
1923           vnet_arp_populate_ip4_over_ethernet_internal (vnm, &update_me);
1924         }
1925       else
1926         {
1927           update_me.flags = ETHERNET_ARP_ARGS_FLUSH;
1928           vnet_arp_flush_ip4_over_ethernet_internal (vnm, &update_me);
1929         }
1930     }
1931   vec_free (to_update);
1932
1933   return 0;
1934 }
1935
1936 VNET_SW_INTERFACE_ADMIN_UP_DOWN_FUNCTION (ethernet_arp_sw_interface_up_down);
1937
1938 static void
1939 increment_ip4_and_mac_address (ethernet_arp_ip4_over_ethernet_address_t * a)
1940 {
1941   u8 old;
1942   int i;
1943
1944   for (i = 3; i >= 0; i--)
1945     {
1946       old = a->ip4.as_u8[i];
1947       a->ip4.as_u8[i] += 1;
1948       if (old < a->ip4.as_u8[i])
1949         break;
1950     }
1951
1952   for (i = 5; i >= 0; i--)
1953     {
1954       old = a->ethernet[i];
1955       a->ethernet[i] += 1;
1956       if (old < a->ethernet[i])
1957         break;
1958     }
1959 }
1960
1961 int
1962 vnet_arp_set_ip4_over_ethernet (vnet_main_t * vnm,
1963                                 u32 sw_if_index,
1964                                 const ethernet_arp_ip4_over_ethernet_address_t
1965                                 * a, int is_static, int is_no_fib_entry)
1966 {
1967   vnet_arp_set_ip4_over_ethernet_rpc_args_t args;
1968
1969   args.sw_if_index = sw_if_index;
1970   args.is_static = is_static;
1971   args.is_no_fib_entry = is_no_fib_entry;
1972   args.flags = 0;
1973   clib_memcpy (&args.a, a, sizeof (*a));
1974
1975   vl_api_rpc_call_main_thread (set_ip4_over_ethernet_rpc_callback,
1976                                (u8 *) & args, sizeof (args));
1977   return 0;
1978 }
1979
1980 void
1981 proxy_arp_walk (proxy_arp_walk_t cb, void *data)
1982 {
1983   ethernet_arp_main_t *am = &ethernet_arp_main;
1984   ethernet_proxy_arp_t *pa;
1985
1986   vec_foreach (pa, am->proxy_arps)
1987   {
1988     if (!cb (&pa->lo_addr, &pa->hi_addr, pa->fib_index, data))
1989       break;
1990   }
1991 }
1992
1993 int
1994 vnet_proxy_arp_add_del (ip4_address_t * lo_addr,
1995                         ip4_address_t * hi_addr, u32 fib_index, int is_del)
1996 {
1997   ethernet_arp_main_t *am = &ethernet_arp_main;
1998   ethernet_proxy_arp_t *pa;
1999   u32 found_at_index = ~0;
2000
2001   vec_foreach (pa, am->proxy_arps)
2002   {
2003     if (pa->lo_addr.as_u32 == lo_addr->as_u32 &&
2004         pa->hi_addr.as_u32 == hi_addr->as_u32 && pa->fib_index == fib_index)
2005       {
2006         found_at_index = pa - am->proxy_arps;
2007         break;
2008       }
2009   }
2010
2011   if (found_at_index != ~0)
2012     {
2013       /* Delete, otherwise it's already in the table */
2014       if (is_del)
2015         vec_delete (am->proxy_arps, 1, found_at_index);
2016       return 0;
2017     }
2018   /* delete, no such entry */
2019   if (is_del)
2020     return VNET_API_ERROR_NO_SUCH_ENTRY;
2021
2022   /* add, not in table */
2023   vec_add2 (am->proxy_arps, pa, 1);
2024   pa->lo_addr.as_u32 = lo_addr->as_u32;
2025   pa->hi_addr.as_u32 = hi_addr->as_u32;
2026   pa->fib_index = fib_index;
2027   return 0;
2028 }
2029
2030 /*
2031  * Remove any proxy arp entries asdociated with the
2032  * specificed fib.
2033  */
2034 int
2035 vnet_proxy_arp_fib_reset (u32 fib_id)
2036 {
2037   ethernet_arp_main_t *am = &ethernet_arp_main;
2038   ethernet_proxy_arp_t *pa;
2039   u32 *entries_to_delete = 0;
2040   u32 fib_index;
2041   int i;
2042
2043   fib_index = fib_table_find (FIB_PROTOCOL_IP4, fib_id);
2044   if (~0 == fib_index)
2045     return VNET_API_ERROR_NO_SUCH_ENTRY;
2046
2047   vec_foreach (pa, am->proxy_arps)
2048   {
2049     if (pa->fib_index == fib_index)
2050       {
2051         vec_add1 (entries_to_delete, pa - am->proxy_arps);
2052       }
2053   }
2054
2055   for (i = 0; i < vec_len (entries_to_delete); i++)
2056     {
2057       vec_delete (am->proxy_arps, 1, entries_to_delete[i]);
2058     }
2059
2060   vec_free (entries_to_delete);
2061
2062   return 0;
2063 }
2064
2065 static clib_error_t *
2066 ip_arp_add_del_command_fn (vlib_main_t * vm,
2067                            unformat_input_t * input, vlib_cli_command_t * cmd)
2068 {
2069   vnet_main_t *vnm = vnet_get_main ();
2070   u32 sw_if_index;
2071   ethernet_arp_ip4_over_ethernet_address_t lo_addr, hi_addr, addr;
2072   int addr_valid = 0;
2073   int is_del = 0;
2074   int count = 1;
2075   u32 fib_index = 0;
2076   u32 fib_id;
2077   int is_static = 0;
2078   int is_no_fib_entry = 0;
2079   int is_proxy = 0;
2080
2081   while (unformat_check_input (input) != UNFORMAT_END_OF_INPUT)
2082     {
2083       /* set ip arp TenGigE1/1/0/1 1.2.3.4 aa:bb:... or aabb.ccdd... */
2084       if (unformat (input, "%U %U %U",
2085                     unformat_vnet_sw_interface, vnm, &sw_if_index,
2086                     unformat_ip4_address, &addr.ip4,
2087                     unformat_ethernet_address, &addr.ethernet))
2088         addr_valid = 1;
2089
2090       else if (unformat (input, "delete") || unformat (input, "del"))
2091         is_del = 1;
2092
2093       else if (unformat (input, "static"))
2094         is_static = 1;
2095
2096       else if (unformat (input, "no-fib-entry"))
2097         is_no_fib_entry = 1;
2098
2099       else if (unformat (input, "count %d", &count))
2100         ;
2101
2102       else if (unformat (input, "fib-id %d", &fib_id))
2103         {
2104           fib_index = fib_table_find (FIB_PROTOCOL_IP4, fib_id);
2105
2106           if (~0 == fib_index)
2107             return clib_error_return (0, "fib ID %d doesn't exist\n", fib_id);
2108         }
2109
2110       else if (unformat (input, "proxy %U - %U",
2111                          unformat_ip4_address, &lo_addr.ip4,
2112                          unformat_ip4_address, &hi_addr.ip4))
2113         is_proxy = 1;
2114       else
2115         break;
2116     }
2117
2118   if (is_proxy)
2119     {
2120       (void) vnet_proxy_arp_add_del (&lo_addr.ip4, &hi_addr.ip4,
2121                                      fib_index, is_del);
2122       return 0;
2123     }
2124
2125   if (addr_valid)
2126     {
2127       int i;
2128
2129       for (i = 0; i < count; i++)
2130         {
2131           if (is_del == 0)
2132             {
2133               uword event_type, *event_data = 0;
2134
2135               /* Park the debug CLI until the arp entry is installed */
2136               vnet_register_ip4_arp_resolution_event
2137                 (vnm, &addr.ip4, vlib_current_process (vm),
2138                  1 /* type */ , 0 /* data */ );
2139
2140               vnet_arp_set_ip4_over_ethernet
2141                 (vnm, sw_if_index, &addr, is_static, is_no_fib_entry);
2142
2143               vlib_process_wait_for_event (vm);
2144               event_type = vlib_process_get_events (vm, &event_data);
2145               vec_reset_length (event_data);
2146               if (event_type != 1)
2147                 clib_warning ("event type %d unexpected", event_type);
2148             }
2149           else
2150             vnet_arp_unset_ip4_over_ethernet (vnm, sw_if_index, &addr);
2151
2152           increment_ip4_and_mac_address (&addr);
2153         }
2154     }
2155   else
2156     {
2157       return clib_error_return (0, "unknown input `%U'",
2158                                 format_unformat_error, input);
2159     }
2160
2161   return 0;
2162 }
2163
2164 /* *INDENT-OFF* */
2165 /*?
2166  * Add or delete IPv4 ARP cache entries.
2167  *
2168  * @note 'set ip arp' options (e.g. delete, static, 'fib-id <id>',
2169  * 'count <number>', 'interface ip4_addr mac_addr') can be added in
2170  * any order and combination.
2171  *
2172  * @cliexpar
2173  * @parblock
2174  * Add or delete IPv4 ARP cache entries as follows. MAC Address can be in
2175  * either aa:bb:cc:dd:ee:ff format or aabb.ccdd.eeff format.
2176  * @cliexcmd{set ip arp GigabitEthernet2/0/0 6.0.0.3 dead.beef.babe}
2177  * @cliexcmd{set ip arp delete GigabitEthernet2/0/0 6.0.0.3 de:ad:be:ef:ba:be}
2178  *
2179  * To add or delete an IPv4 ARP cache entry to or from a specific fib
2180  * table:
2181  * @cliexcmd{set ip arp fib-id 1 GigabitEthernet2/0/0 6.0.0.3 dead.beef.babe}
2182  * @cliexcmd{set ip arp fib-id 1 delete GigabitEthernet2/0/0 6.0.0.3 dead.beef.babe}
2183  *
2184  * Add or delete IPv4 static ARP cache entries as follows:
2185  * @cliexcmd{set ip arp static GigabitEthernet2/0/0 6.0.0.3 dead.beef.babe}
2186  * @cliexcmd{set ip arp static delete GigabitEthernet2/0/0 6.0.0.3 dead.beef.babe}
2187  *
2188  * For testing / debugging purposes, the 'set ip arp' command can add or
2189  * delete multiple entries. Supply the 'count N' parameter:
2190  * @cliexcmd{set ip arp count 10 GigabitEthernet2/0/0 6.0.0.3 dead.beef.babe}
2191  * @endparblock
2192  ?*/
2193 VLIB_CLI_COMMAND (ip_arp_add_del_command, static) = {
2194   .path = "set ip arp",
2195   .short_help =
2196   "set ip arp [del] <intfc> <ip-address> <mac-address> [static] [no-fib-entry] [count <count>] [fib-id <fib-id>] [proxy <lo-addr> - <hi-addr>]",
2197   .function = ip_arp_add_del_command_fn,
2198 };
2199 /* *INDENT-ON* */
2200
2201 static clib_error_t *
2202 set_int_proxy_arp_command_fn (vlib_main_t * vm,
2203                               unformat_input_t *
2204                               input, vlib_cli_command_t * cmd)
2205 {
2206   vnet_main_t *vnm = vnet_get_main ();
2207   u32 sw_if_index;
2208   vnet_sw_interface_t *si;
2209   int enable = 0;
2210   int intfc_set = 0;
2211
2212   while (unformat_check_input (input) != UNFORMAT_END_OF_INPUT)
2213     {
2214       if (unformat (input, "%U", unformat_vnet_sw_interface,
2215                     vnm, &sw_if_index))
2216         intfc_set = 1;
2217       else if (unformat (input, "enable") || unformat (input, "on"))
2218         enable = 1;
2219       else if (unformat (input, "disable") || unformat (input, "off"))
2220         enable = 0;
2221       else
2222         break;
2223     }
2224
2225   if (intfc_set == 0)
2226     return clib_error_return (0, "unknown input '%U'",
2227                               format_unformat_error, input);
2228
2229   si = vnet_get_sw_interface (vnm, sw_if_index);
2230   ASSERT (si);
2231   if (enable)
2232     si->flags |= VNET_SW_INTERFACE_FLAG_PROXY_ARP;
2233   else
2234     si->flags &= ~VNET_SW_INTERFACE_FLAG_PROXY_ARP;
2235
2236   return 0;
2237 }
2238
2239 /* *INDENT-OFF* */
2240 /*?
2241  * Enable proxy-arp on an interface. The vpp stack will answer ARP
2242  * requests for the indicated address range. Multiple proxy-arp
2243  * ranges may be provisioned.
2244  *
2245  * @note Proxy ARP as a technology is infamous for blackholing traffic.
2246  * Also, the underlying implementation has not been performance-tuned.
2247  * Avoid creating an unnecessarily large set of ranges.
2248  *
2249  * @cliexpar
2250  * To enable proxy arp on a range of addresses, use:
2251  * @cliexcmd{set ip arp proxy 6.0.0.1 - 6.0.0.11}
2252  * Append 'del' to delete a range of proxy ARP addresses:
2253  * @cliexcmd{set ip arp proxy 6.0.0.1 - 6.0.0.11 del}
2254  * You must then specifically enable proxy arp on individual interfaces:
2255  * @cliexcmd{set interface proxy-arp GigabitEthernet0/8/0 enable}
2256  * To disable proxy arp on an individual interface:
2257  * @cliexcmd{set interface proxy-arp GigabitEthernet0/8/0 disable}
2258  ?*/
2259 VLIB_CLI_COMMAND (set_int_proxy_enable_command, static) = {
2260   .path = "set interface proxy-arp",
2261   .short_help =
2262   "set interface proxy-arp <intfc> [enable|disable]",
2263   .function = set_int_proxy_arp_command_fn,
2264 };
2265 /* *INDENT-ON* */
2266
2267
2268 /*
2269  * ARP/ND Termination in a L2 Bridge Domain based on IP4/IP6 to MAC
2270  * hash tables mac_by_ip4 and mac_by_ip6 for each BD.
2271  */
2272 typedef enum
2273 {
2274   ARP_TERM_NEXT_L2_OUTPUT,
2275   ARP_TERM_NEXT_DROP,
2276   ARP_TERM_N_NEXT,
2277 } arp_term_next_t;
2278
2279 u32 arp_term_next_node_index[32];
2280
2281 static uword
2282 arp_term_l2bd (vlib_main_t * vm,
2283                vlib_node_runtime_t * node, vlib_frame_t * frame)
2284 {
2285   l2input_main_t *l2im = &l2input_main;
2286   u32 n_left_from, next_index, *from, *to_next;
2287   u32 n_replies_sent = 0;
2288   u16 last_bd_index = ~0;
2289   l2_bridge_domain_t *last_bd_config = 0;
2290   l2_input_config_t *cfg0;
2291
2292   from = vlib_frame_vector_args (frame);
2293   n_left_from = frame->n_vectors;
2294   next_index = node->cached_next_index;
2295
2296   while (n_left_from > 0)
2297     {
2298       u32 n_left_to_next;
2299
2300       vlib_get_next_frame (vm, node, next_index, to_next, n_left_to_next);
2301
2302       while (n_left_from > 0 && n_left_to_next > 0)
2303         {
2304           vlib_buffer_t *p0;
2305           ethernet_header_t *eth0;
2306           ethernet_arp_header_t *arp0;
2307           ip6_header_t *iph0;
2308           u8 *l3h0;
2309           u32 pi0, error0, next0, sw_if_index0;
2310           u16 ethertype0;
2311           u16 bd_index0;
2312           u32 ip0;
2313           u8 *macp0;
2314
2315           pi0 = from[0];
2316           to_next[0] = pi0;
2317           from += 1;
2318           to_next += 1;
2319           n_left_from -= 1;
2320           n_left_to_next -= 1;
2321
2322           p0 = vlib_get_buffer (vm, pi0);
2323           // Terminate only local (SHG == 0) ARP
2324           if (vnet_buffer (p0)->l2.shg != 0)
2325             goto next_l2_feature;
2326
2327           eth0 = vlib_buffer_get_current (p0);
2328           l3h0 = (u8 *) eth0 + vnet_buffer (p0)->l2.l2_len;
2329           ethertype0 = clib_net_to_host_u16 (*(u16 *) (l3h0 - 2));
2330           arp0 = (ethernet_arp_header_t *) l3h0;
2331
2332           if (ethertype0 != ETHERNET_TYPE_ARP)
2333             goto check_ip6_nd;
2334
2335           if ((arp0->opcode !=
2336                clib_host_to_net_u16 (ETHERNET_ARP_OPCODE_request)) &&
2337               (arp0->opcode !=
2338                clib_host_to_net_u16 (ETHERNET_ARP_OPCODE_reply)))
2339             goto check_ip6_nd;
2340
2341           /* Must be ARP request/reply packet here */
2342           if (PREDICT_FALSE ((node->flags & VLIB_NODE_FLAG_TRACE) &&
2343                              (p0->flags & VLIB_BUFFER_IS_TRACED)))
2344             {
2345               u8 *t0 = vlib_add_trace (vm, node, p0,
2346                                        sizeof (ethernet_arp_input_trace_t));
2347               clib_memcpy (t0, l3h0, sizeof (ethernet_arp_input_trace_t));
2348             }
2349
2350           error0 = 0;
2351           error0 =
2352             (arp0->l2_type !=
2353              clib_net_to_host_u16 (ETHERNET_ARP_HARDWARE_TYPE_ethernet)
2354              ? ETHERNET_ARP_ERROR_l2_type_not_ethernet : error0);
2355           error0 =
2356             (arp0->l3_type !=
2357              clib_net_to_host_u16 (ETHERNET_TYPE_IP4) ?
2358              ETHERNET_ARP_ERROR_l3_type_not_ip4 : error0);
2359
2360           sw_if_index0 = vnet_buffer (p0)->sw_if_index[VLIB_RX];
2361
2362           if (error0)
2363             goto drop;
2364
2365           /* Trash ARP packets whose ARP-level source addresses do not
2366              match, or if requester address is mcast */
2367           if (PREDICT_FALSE
2368               (memcmp (eth0->src_address, arp0->ip4_over_ethernet[0].ethernet,
2369                        sizeof (eth0->src_address)) ||
2370                ethernet_address_cast (arp0->ip4_over_ethernet[0].ethernet)))
2371             {
2372               /* VRRP virtual MAC may be different to SMAC in ARP reply */
2373               if (memcmp (arp0->ip4_over_ethernet[0].ethernet, vrrp_prefix,
2374                           sizeof (vrrp_prefix)))
2375                 {
2376                   error0 = ETHERNET_ARP_ERROR_l2_address_mismatch;
2377                   goto drop;
2378                 }
2379             }
2380           if (PREDICT_FALSE
2381               (ip4_address_is_multicast (&arp0->ip4_over_ethernet[0].ip4)))
2382             {
2383               error0 = ETHERNET_ARP_ERROR_l3_src_address_not_local;
2384               goto drop;
2385             }
2386
2387           /* Check if anyone want ARP request events for L2 BDs */
2388           {
2389             ethernet_arp_main_t *am = &ethernet_arp_main;
2390             if (am->wc_ip4_arp_publisher_node != (uword) ~ 0)
2391               vnet_arp_wc_publish (sw_if_index0, &arp0->ip4_over_ethernet[0]);
2392           }
2393
2394           /* lookup BD mac_by_ip4 hash table for MAC entry */
2395           ip0 = arp0->ip4_over_ethernet[1].ip4.as_u32;
2396           bd_index0 = vnet_buffer (p0)->l2.bd_index;
2397           if (PREDICT_FALSE ((bd_index0 != last_bd_index)
2398                              || (last_bd_index == (u16) ~ 0)))
2399             {
2400               last_bd_index = bd_index0;
2401               last_bd_config = vec_elt_at_index (l2im->bd_configs, bd_index0);
2402             }
2403           macp0 = (u8 *) hash_get (last_bd_config->mac_by_ip4, ip0);
2404
2405           if (PREDICT_FALSE (!macp0))
2406             goto next_l2_feature;       /* MAC not found */
2407
2408           /* MAC found, send ARP reply -
2409              Convert ARP request packet to ARP reply */
2410           arp0->opcode = clib_host_to_net_u16 (ETHERNET_ARP_OPCODE_reply);
2411           arp0->ip4_over_ethernet[1] = arp0->ip4_over_ethernet[0];
2412           arp0->ip4_over_ethernet[0].ip4.as_u32 = ip0;
2413           clib_memcpy (arp0->ip4_over_ethernet[0].ethernet, macp0, 6);
2414           clib_memcpy (eth0->dst_address, eth0->src_address, 6);
2415           clib_memcpy (eth0->src_address, macp0, 6);
2416           n_replies_sent += 1;
2417
2418         output_response:
2419           /* For BVI, need to use l2-fwd node to send ARP reply as
2420              l2-output node cannot output packet to BVI properly */
2421           cfg0 = vec_elt_at_index (l2im->configs, sw_if_index0);
2422           if (PREDICT_FALSE (cfg0->bvi))
2423             {
2424               vnet_buffer (p0)->l2.feature_bitmap |= L2INPUT_FEAT_FWD;
2425               vnet_buffer (p0)->sw_if_index[VLIB_RX] = 0;
2426               goto next_l2_feature;
2427             }
2428
2429           /* Send ARP/ND reply back out input interface through l2-output */
2430           vnet_buffer (p0)->sw_if_index[VLIB_TX] = sw_if_index0;
2431           next0 = ARP_TERM_NEXT_L2_OUTPUT;
2432           vlib_validate_buffer_enqueue_x1 (vm, node, next_index,
2433                                            to_next, n_left_to_next, pi0,
2434                                            next0);
2435           continue;
2436
2437         check_ip6_nd:
2438           /* IP6 ND event notification or solicitation handling to generate
2439              local response instead of flooding */
2440           iph0 = (ip6_header_t *) l3h0;
2441           if (PREDICT_FALSE (ethertype0 == ETHERNET_TYPE_IP6 &&
2442                              iph0->protocol == IP_PROTOCOL_ICMP6 &&
2443                              !ip6_address_is_unspecified
2444                              (&iph0->src_address)))
2445             {
2446               sw_if_index0 = vnet_buffer (p0)->sw_if_index[VLIB_RX];
2447               if (vnet_ip6_nd_term
2448                   (vm, node, p0, eth0, iph0, sw_if_index0,
2449                    vnet_buffer (p0)->l2.bd_index))
2450                 goto output_response;
2451             }
2452
2453         next_l2_feature:
2454           {
2455             next0 = vnet_l2_feature_next (p0, arp_term_next_node_index,
2456                                           L2INPUT_FEAT_ARP_TERM);
2457             vlib_validate_buffer_enqueue_x1 (vm, node, next_index,
2458                                              to_next, n_left_to_next,
2459                                              pi0, next0);
2460             continue;
2461           }
2462
2463         drop:
2464           if (0 == arp0->ip4_over_ethernet[0].ip4.as_u32 ||
2465               (arp0->ip4_over_ethernet[0].ip4.as_u32 ==
2466                arp0->ip4_over_ethernet[1].ip4.as_u32))
2467             {
2468               error0 = ETHERNET_ARP_ERROR_gratuitous_arp;
2469             }
2470           next0 = ARP_TERM_NEXT_DROP;
2471           p0->error = node->errors[error0];
2472
2473           vlib_validate_buffer_enqueue_x1 (vm, node, next_index,
2474                                            to_next, n_left_to_next, pi0,
2475                                            next0);
2476         }
2477
2478       vlib_put_next_frame (vm, node, next_index, n_left_to_next);
2479     }
2480
2481   vlib_error_count (vm, node->node_index,
2482                     ETHERNET_ARP_ERROR_replies_sent, n_replies_sent);
2483   return frame->n_vectors;
2484 }
2485
2486 /* *INDENT-OFF* */
2487 VLIB_REGISTER_NODE (arp_term_l2bd_node, static) = {
2488   .function = arp_term_l2bd,
2489   .name = "arp-term-l2bd",
2490   .vector_size = sizeof (u32),
2491   .n_errors = ETHERNET_ARP_N_ERROR,
2492   .error_strings = ethernet_arp_error_strings,
2493   .n_next_nodes = ARP_TERM_N_NEXT,
2494   .next_nodes = {
2495     [ARP_TERM_NEXT_L2_OUTPUT] = "l2-output",
2496     [ARP_TERM_NEXT_DROP] = "error-drop",
2497   },
2498   .format_buffer = format_ethernet_arp_header,
2499   .format_trace = format_arp_term_input_trace,
2500 };
2501 /* *INDENT-ON* */
2502
2503 clib_error_t *
2504 arp_term_init (vlib_main_t * vm)
2505 {
2506   // Initialize the feature next-node indexes
2507   feat_bitmap_init_next_nodes (vm,
2508                                arp_term_l2bd_node.index,
2509                                L2INPUT_N_FEAT,
2510                                l2input_get_feat_names (),
2511                                arp_term_next_node_index);
2512   return 0;
2513 }
2514
2515 VLIB_INIT_FUNCTION (arp_term_init);
2516
2517 void
2518 change_arp_mac (u32 sw_if_index, ethernet_arp_ip4_entry_t * e)
2519 {
2520   if (e->sw_if_index == sw_if_index)
2521     {
2522       adj_nbr_walk_nh4 (e->sw_if_index,
2523                         &e->ip4_address, arp_mk_complete_walk, e);
2524     }
2525 }
2526
2527 void
2528 ethernet_arp_change_mac (u32 sw_if_index)
2529 {
2530   ethernet_arp_main_t *am = &ethernet_arp_main;
2531   ethernet_arp_ip4_entry_t *e;
2532   adj_index_t ai;
2533
2534   /* *INDENT-OFF* */
2535   pool_foreach (e, am->ip4_entry_pool,
2536   ({
2537     change_arp_mac (sw_if_index, e);
2538   }));
2539   /* *INDENT-ON* */
2540
2541   ai = adj_glean_get (FIB_PROTOCOL_IP4, sw_if_index);
2542
2543   if (ADJ_INDEX_INVALID != ai)
2544     adj_glean_update_rewrite (ai);
2545 }
2546
2547 void
2548 send_ip4_garp (vlib_main_t * vm, u32 sw_if_index)
2549 {
2550   ip4_main_t *i4m = &ip4_main;
2551   ip4_address_t *ip4_addr = ip4_interface_first_address (i4m, sw_if_index, 0);
2552
2553   send_ip4_garp_w_addr (vm, ip4_addr, sw_if_index);
2554 }
2555
2556 void
2557 send_ip4_garp_w_addr (vlib_main_t * vm,
2558                       const ip4_address_t * ip4_addr, u32 sw_if_index)
2559 {
2560   ip4_main_t *i4m = &ip4_main;
2561   vnet_main_t *vnm = vnet_get_main ();
2562   u8 *rewrite, rewrite_len;
2563   vnet_hw_interface_t *hi = vnet_get_sup_hw_interface (vnm, sw_if_index);
2564
2565   if (ip4_addr)
2566     {
2567       clib_warning ("Sending GARP for IP4 address %U on sw_if_idex %d",
2568                     format_ip4_address, ip4_addr, sw_if_index);
2569
2570       /* Form GARP packet for output - Gratuitous ARP is an ARP request packet
2571          where the interface IP/MAC pair is used for both source and request
2572          MAC/IP pairs in the request */
2573       u32 bi = 0;
2574       ethernet_arp_header_t *h = vlib_packet_template_get_packet
2575         (vm, &i4m->ip4_arp_request_packet_template, &bi);
2576
2577       if (!h)
2578         return;
2579
2580       clib_memcpy (h->ip4_over_ethernet[0].ethernet, hi->hw_address,
2581                    sizeof (h->ip4_over_ethernet[0].ethernet));
2582       clib_memcpy (h->ip4_over_ethernet[1].ethernet, hi->hw_address,
2583                    sizeof (h->ip4_over_ethernet[1].ethernet));
2584       h->ip4_over_ethernet[0].ip4 = ip4_addr[0];
2585       h->ip4_over_ethernet[1].ip4 = ip4_addr[0];
2586
2587       /* Setup MAC header with ARP Etype and broadcast DMAC */
2588       vlib_buffer_t *b = vlib_get_buffer (vm, bi);
2589       rewrite =
2590         ethernet_build_rewrite (vnm, sw_if_index, VNET_LINK_ARP,
2591                                 VNET_REWRITE_FOR_SW_INTERFACE_ADDRESS_BROADCAST);
2592       rewrite_len = vec_len (rewrite);
2593       vlib_buffer_advance (b, -rewrite_len);
2594       ethernet_header_t *e = vlib_buffer_get_current (b);
2595       clib_memcpy (e->dst_address, rewrite, rewrite_len);
2596       vec_free (rewrite);
2597
2598       /* Send GARP packet out the specified interface */
2599       vnet_buffer (b)->sw_if_index[VLIB_RX] =
2600         vnet_buffer (b)->sw_if_index[VLIB_TX] = sw_if_index;
2601       vlib_frame_t *f = vlib_get_frame_to_node (vm, hi->output_node_index);
2602       u32 *to_next = vlib_frame_vector_args (f);
2603       to_next[0] = bi;
2604       f->n_vectors = 1;
2605       vlib_put_frame_to_node (vm, hi->output_node_index, f);
2606     }
2607 }
2608
2609 /*
2610  * fd.io coding-style-patch-verification: ON
2611  *
2612  * Local Variables:
2613  * eval: (c-set-style "gnu")
2614  * End:
2615  */