vlib: fix trace number accounting
[vpp.git] / src / plugins / memif / node.c
1 /*
2  *------------------------------------------------------------------
3  * Copyright (c) 2016 Cisco and/or its affiliates.
4  * Licensed under the Apache License, Version 2.0 (the "License");
5  * you may not use this file except in compliance with the License.
6  * You may obtain a copy of the License at:
7  *
8  *     http://www.apache.org/licenses/LICENSE-2.0
9  *
10  * Unless required by applicable law or agreed to in writing, software
11  * distributed under the License is distributed on an "AS IS" BASIS,
12  * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
13  * See the License for the specific language governing permissions and
14  * limitations under the License.
15  *------------------------------------------------------------------
16  */
17
18 #define _GNU_SOURCE
19 #include <stdint.h>
20 #include <net/if.h>
21 #include <sys/ioctl.h>
22 #include <sys/uio.h>
23
24 #include <vlib/vlib.h>
25 #include <vlib/unix/unix.h>
26 #include <vnet/ethernet/ethernet.h>
27 #include <vnet/devices/devices.h>
28 #include <vnet/feature/feature.h>
29
30 #include <memif/memif.h>
31 #include <memif/private.h>
32
33 #define foreach_memif_input_error \
34   _(BUFFER_ALLOC_FAIL, "buffer allocation failed")              \
35   _(NOT_IP, "not ip packet")
36
37 typedef enum
38 {
39 #define _(f,s) MEMIF_INPUT_ERROR_##f,
40   foreach_memif_input_error
41 #undef _
42     MEMIF_INPUT_N_ERROR,
43 } memif_input_error_t;
44
45 static __clib_unused char *memif_input_error_strings[] = {
46 #define _(n,s) s,
47   foreach_memif_input_error
48 #undef _
49 };
50
51 typedef struct
52 {
53   u32 next_index;
54   u32 hw_if_index;
55   u16 ring;
56 } memif_input_trace_t;
57
58 static __clib_unused u8 *
59 format_memif_input_trace (u8 * s, va_list * args)
60 {
61   CLIB_UNUSED (vlib_main_t * vm) = va_arg (*args, vlib_main_t *);
62   CLIB_UNUSED (vlib_node_t * node) = va_arg (*args, vlib_node_t *);
63   memif_input_trace_t *t = va_arg (*args, memif_input_trace_t *);
64   u32 indent = format_get_indent (s);
65
66   s = format (s, "memif: hw_if_index %d next-index %d",
67               t->hw_if_index, t->next_index);
68   s = format (s, "\n%Uslot: ring %u", format_white_space, indent + 2,
69               t->ring);
70   return s;
71 }
72
73 static_always_inline u32
74 memif_next_from_ip_hdr (vlib_node_runtime_t * node, vlib_buffer_t * b)
75 {
76   u8 *ptr = vlib_buffer_get_current (b);
77   u8 v = *ptr & 0xf0;
78
79   if (PREDICT_TRUE (v == 0x40))
80     return VNET_DEVICE_INPUT_NEXT_IP4_NCS_INPUT;
81   else if (PREDICT_TRUE (v == 0x60))
82     return VNET_DEVICE_INPUT_NEXT_IP6_INPUT;
83
84   b->error = node->errors[MEMIF_INPUT_ERROR_NOT_IP];
85   return VNET_DEVICE_INPUT_NEXT_DROP;
86 }
87
88 static_always_inline void
89 memif_trace_buffer (vlib_main_t * vm, vlib_node_runtime_t * node,
90                     memif_if_t * mif, vlib_buffer_t * b, u32 next, u16 qid,
91                     uword * n_tracep)
92 {
93   VLIB_BUFFER_TRACE_TRAJECTORY_INIT (b);
94
95   if (PREDICT_TRUE
96       (b != 0 && vlib_trace_buffer (vm, node, next, b, /* follow_chain */ 0)))
97     {
98       memif_input_trace_t *tr;
99       vlib_set_trace_count (vm, node, --(*n_tracep));
100       tr = vlib_add_trace (vm, node, b, sizeof (*tr));
101       tr->next_index = next;
102       tr->hw_if_index = mif->hw_if_index;
103       tr->ring = qid;
104     }
105 }
106
107 static_always_inline void
108 memif_add_copy_op (memif_per_thread_data_t * ptd, void *data, u32 len,
109                    u16 buffer_offset, u16 buffer_vec_index)
110 {
111   memif_copy_op_t *co;
112   vec_add2_aligned (ptd->copy_ops, co, 1, CLIB_CACHE_LINE_BYTES);
113   co->data = data;
114   co->data_len = len;
115   co->buffer_offset = buffer_offset;
116   co->buffer_vec_index = buffer_vec_index;
117 }
118
119 static_always_inline void
120 memif_add_to_chain (vlib_main_t * vm, vlib_buffer_t * b, u32 * buffers,
121                     u32 buffer_size)
122 {
123   vlib_buffer_t *seg = b;
124   i32 bytes_left = b->current_length - buffer_size + b->current_data;
125
126   if (PREDICT_TRUE (bytes_left <= 0))
127     return;
128
129   b->current_length -= bytes_left;
130   b->total_length_not_including_first_buffer = bytes_left;
131
132   while (bytes_left)
133     {
134       seg->flags |= VLIB_BUFFER_NEXT_PRESENT;
135       seg->next_buffer = buffers[0];
136       seg = vlib_get_buffer (vm, buffers[0]);
137       buffers++;
138       seg->current_data = 0;
139       seg->current_length = clib_min (buffer_size, bytes_left);
140       bytes_left -= seg->current_length;
141     }
142 }
143
144 static_always_inline u32
145 sat_sub (u32 x, u32 y)
146 {
147   u32 res = x - y;
148   res &= -(res <= x);
149   return res;
150 }
151
152 /* branchless validation of the descriptor - uses saturated subtraction */
153 static_always_inline u32
154 memif_desc_is_invalid (memif_if_t * mif, memif_desc_t * d, u32 buffer_length)
155 {
156   u32 rv;
157   u16 valid_flags = MEMIF_DESC_FLAG_NEXT;
158
159   rv = d->flags & (~valid_flags);
160   rv |= sat_sub (d->region + 1, vec_len (mif->regions));
161   rv |= sat_sub (d->length, buffer_length);
162   rv |= sat_sub (d->offset + d->length, mif->regions[d->region].region_size);
163
164   if (PREDICT_FALSE (rv))
165     {
166       mif->flags |= MEMIF_IF_FLAG_ERROR;
167       return 1;
168     }
169
170   return 0;
171 }
172
173 static_always_inline uword
174 memif_device_input_inline (vlib_main_t * vm, vlib_node_runtime_t * node,
175                            vlib_frame_t * frame, memif_if_t * mif,
176                            memif_ring_type_t type, u16 qid,
177                            memif_interface_mode_t mode)
178 {
179   vnet_main_t *vnm = vnet_get_main ();
180   memif_main_t *mm = &memif_main;
181   memif_ring_t *ring;
182   memif_queue_t *mq;
183   u16 buffer_size = vlib_buffer_get_default_data_size (vm);
184   uword n_trace = vlib_get_trace_count (vm, node);
185   u16 nexts[MEMIF_RX_VECTOR_SZ], *next = nexts;
186   u32 _to_next_bufs[MEMIF_RX_VECTOR_SZ], *to_next_bufs = _to_next_bufs, *bi;
187   u32 n_rx_packets = 0, n_rx_bytes = 0;
188   u32 n_left, n_left_to_next;
189   u32 next_index = VNET_DEVICE_INPUT_NEXT_ETHERNET_INPUT;
190   vlib_buffer_t *b0, *b1, *b2, *b3;
191   u32 thread_index = vm->thread_index;
192   memif_per_thread_data_t *ptd = vec_elt_at_index (mm->per_thread_data,
193                                                    thread_index);
194   vlib_buffer_t bt;
195   u16 cur_slot, last_slot, ring_size, n_slots, mask;
196   i16 start_offset;
197   u16 n_buffers = 0, n_alloc;
198   memif_copy_op_t *co;
199   memif_packet_op_t *po;
200   memif_region_index_t last_region = ~0;
201   void *last_region_shm = 0;
202
203   mq = vec_elt_at_index (mif->rx_queues, qid);
204   ring = mq->ring;
205   ring_size = 1 << mq->log2_ring_size;
206   mask = ring_size - 1;
207
208   /* asume that somebody will want to add ethernet header on the packet
209      so start with IP header at offset 14 */
210   start_offset = (mode == MEMIF_INTERFACE_MODE_IP) ? 14 : 0;
211
212   /* for S2M rings, we are consumers of packet buffers, and for M2S rings we
213      are producers of empty buffers */
214   cur_slot = (type == MEMIF_RING_S2M) ? mq->last_head : mq->last_tail;
215   last_slot = (type == MEMIF_RING_S2M) ? ring->head : ring->tail;
216   if (cur_slot == last_slot)
217     goto refill;
218   n_slots = last_slot - cur_slot;
219
220   /* construct copy and packet vector out of ring slots */
221   while (n_slots && n_rx_packets < MEMIF_RX_VECTOR_SZ)
222     {
223       u32 dst_off, src_off, n_bytes_left;
224       u16 s0;
225       memif_desc_t *d0;
226       void *mb0;
227       po = ptd->packet_ops + n_rx_packets;
228       n_rx_packets++;
229       po->first_buffer_vec_index = n_buffers++;
230       po->packet_len = 0;
231       src_off = 0;
232       dst_off = start_offset;
233
234     next_slot:
235       CLIB_PREFETCH (&ring->desc[(cur_slot + 8) & mask],
236                      CLIB_CACHE_LINE_BYTES, LOAD);
237       s0 = cur_slot & mask;
238       d0 = &ring->desc[s0];
239       n_bytes_left = d0->length;
240
241       /* slave resets buffer length,
242        * so it can produce full size buffer for master
243        */
244       if (type == MEMIF_RING_M2S)
245         d0->length = mif->run.buffer_size;
246
247       po->packet_len += n_bytes_left;
248       if (PREDICT_FALSE (last_region != d0->region))
249         {
250           last_region_shm = mif->regions[d0->region].shm;
251           last_region = d0->region;
252         }
253       mb0 = last_region_shm + d0->offset;
254
255       do
256         {
257           u32 dst_free = buffer_size - dst_off;
258           if (dst_free == 0)
259             {
260               dst_off = 0;
261               dst_free = buffer_size;
262               n_buffers++;
263             }
264           u32 bytes_to_copy = clib_min (dst_free, n_bytes_left);
265           memif_add_copy_op (ptd, mb0 + src_off, bytes_to_copy, dst_off,
266                              n_buffers - 1);
267           n_bytes_left -= bytes_to_copy;
268           src_off += bytes_to_copy;
269           dst_off += bytes_to_copy;
270         }
271       while (PREDICT_FALSE (n_bytes_left));
272
273       cur_slot++;
274       n_slots--;
275       if ((d0->flags & MEMIF_DESC_FLAG_NEXT) && n_slots)
276         {
277           src_off = 0;
278           goto next_slot;
279         }
280     }
281
282   /* allocate free buffers */
283   vec_validate_aligned (ptd->buffers, n_buffers - 1, CLIB_CACHE_LINE_BYTES);
284   n_alloc = vlib_buffer_alloc_from_pool (vm, ptd->buffers, n_buffers,
285                                          mq->buffer_pool_index);
286   if (PREDICT_FALSE (n_alloc != n_buffers))
287     {
288       if (n_alloc)
289         vlib_buffer_free (vm, ptd->buffers, n_alloc);
290       vlib_error_count (vm, node->node_index,
291                         MEMIF_INPUT_ERROR_BUFFER_ALLOC_FAIL, 1);
292       goto refill;
293     }
294
295   /* copy data */
296   n_left = vec_len (ptd->copy_ops);
297   co = ptd->copy_ops;
298   while (n_left >= 8)
299     {
300       CLIB_PREFETCH (co[4].data, CLIB_CACHE_LINE_BYTES, LOAD);
301       CLIB_PREFETCH (co[5].data, CLIB_CACHE_LINE_BYTES, LOAD);
302       CLIB_PREFETCH (co[6].data, CLIB_CACHE_LINE_BYTES, LOAD);
303       CLIB_PREFETCH (co[7].data, CLIB_CACHE_LINE_BYTES, LOAD);
304
305       b0 = vlib_get_buffer (vm, ptd->buffers[co[0].buffer_vec_index]);
306       b1 = vlib_get_buffer (vm, ptd->buffers[co[1].buffer_vec_index]);
307       b2 = vlib_get_buffer (vm, ptd->buffers[co[2].buffer_vec_index]);
308       b3 = vlib_get_buffer (vm, ptd->buffers[co[3].buffer_vec_index]);
309
310       clib_memcpy_fast (b0->data + co[0].buffer_offset, co[0].data,
311                         co[0].data_len);
312       clib_memcpy_fast (b1->data + co[1].buffer_offset, co[1].data,
313                         co[1].data_len);
314       clib_memcpy_fast (b2->data + co[2].buffer_offset, co[2].data,
315                         co[2].data_len);
316       clib_memcpy_fast (b3->data + co[3].buffer_offset, co[3].data,
317                         co[3].data_len);
318
319       co += 4;
320       n_left -= 4;
321     }
322   while (n_left)
323     {
324       b0 = vlib_get_buffer (vm, ptd->buffers[co[0].buffer_vec_index]);
325       clib_memcpy_fast (b0->data + co[0].buffer_offset, co[0].data,
326                         co[0].data_len);
327       co += 1;
328       n_left -= 1;
329     }
330
331   /* release slots from the ring */
332   if (type == MEMIF_RING_S2M)
333     {
334       CLIB_MEMORY_STORE_BARRIER ();
335       ring->tail = mq->last_head = cur_slot;
336     }
337   else
338     {
339       mq->last_tail = cur_slot;
340     }
341
342   /* prepare buffer template and next indices */
343   vnet_buffer (&ptd->buffer_template)->sw_if_index[VLIB_RX] =
344     mif->sw_if_index;
345   vnet_buffer (&ptd->buffer_template)->feature_arc_index = 0;
346   ptd->buffer_template.current_data = start_offset;
347   ptd->buffer_template.current_config_index = 0;
348   ptd->buffer_template.buffer_pool_index = mq->buffer_pool_index;
349   ptd->buffer_template.ref_count = 1;
350
351   if (mode == MEMIF_INTERFACE_MODE_ETHERNET)
352     {
353       next_index = VNET_DEVICE_INPUT_NEXT_ETHERNET_INPUT;
354       if (mif->per_interface_next_index != ~0)
355         next_index = mif->per_interface_next_index;
356       else
357         vnet_feature_start_device_input_x1 (mif->sw_if_index, &next_index,
358                                             &ptd->buffer_template);
359
360       vlib_get_new_next_frame (vm, node, next_index, to_next_bufs,
361                                n_left_to_next);
362       if (PREDICT_TRUE (next_index == VNET_DEVICE_INPUT_NEXT_ETHERNET_INPUT))
363         {
364           vlib_next_frame_t *nf;
365           vlib_frame_t *f;
366           ethernet_input_frame_t *ef;
367           nf = vlib_node_runtime_get_next_frame (vm, node, next_index);
368           f = vlib_get_frame (vm, nf->frame);
369           f->flags = ETH_INPUT_FRAME_F_SINGLE_SW_IF_IDX;
370
371           ef = vlib_frame_scalar_args (f);
372           ef->sw_if_index = mif->sw_if_index;
373           ef->hw_if_index = mif->hw_if_index;
374           vlib_frame_no_append (f);
375         }
376     }
377
378   /* process buffer metadata */
379   u32 n_from = n_rx_packets;
380   po = ptd->packet_ops;
381   bi = to_next_bufs;
382
383   /* copy template into local variable - will save per packet load */
384   vlib_buffer_copy_template (&bt, &ptd->buffer_template);
385
386   while (n_from >= 8)
387     {
388       b0 = vlib_get_buffer (vm, ptd->buffers[po[0].first_buffer_vec_index]);
389       b1 = vlib_get_buffer (vm, ptd->buffers[po[1].first_buffer_vec_index]);
390       b2 = vlib_get_buffer (vm, ptd->buffers[po[2].first_buffer_vec_index]);
391       b3 = vlib_get_buffer (vm, ptd->buffers[po[3].first_buffer_vec_index]);
392
393       vlib_prefetch_buffer_header (b0, STORE);
394       vlib_prefetch_buffer_header (b1, STORE);
395       vlib_prefetch_buffer_header (b2, STORE);
396       vlib_prefetch_buffer_header (b3, STORE);
397
398       /* enqueue buffer */
399       u32 fbvi[4];
400       fbvi[0] = po[0].first_buffer_vec_index;
401       fbvi[1] = po[1].first_buffer_vec_index;
402       fbvi[2] = po[2].first_buffer_vec_index;
403       fbvi[3] = po[3].first_buffer_vec_index;
404
405       bi[0] = ptd->buffers[fbvi[0]];
406       bi[1] = ptd->buffers[fbvi[1]];
407       bi[2] = ptd->buffers[fbvi[2]];
408       bi[3] = ptd->buffers[fbvi[3]];
409
410       b0 = vlib_get_buffer (vm, bi[0]);
411       b1 = vlib_get_buffer (vm, bi[1]);
412       b2 = vlib_get_buffer (vm, bi[2]);
413       b3 = vlib_get_buffer (vm, bi[3]);
414
415       vlib_buffer_copy_template (b0, &bt);
416       vlib_buffer_copy_template (b1, &bt);
417       vlib_buffer_copy_template (b2, &bt);
418       vlib_buffer_copy_template (b3, &bt);
419
420       b0->current_length = po[0].packet_len;
421       n_rx_bytes += b0->current_length;
422       b1->current_length = po[1].packet_len;
423       n_rx_bytes += b1->current_length;
424       b2->current_length = po[2].packet_len;
425       n_rx_bytes += b2->current_length;
426       b3->current_length = po[3].packet_len;
427       n_rx_bytes += b3->current_length;
428
429       memif_add_to_chain (vm, b0, ptd->buffers + fbvi[0] + 1, buffer_size);
430       memif_add_to_chain (vm, b1, ptd->buffers + fbvi[1] + 1, buffer_size);
431       memif_add_to_chain (vm, b2, ptd->buffers + fbvi[2] + 1, buffer_size);
432       memif_add_to_chain (vm, b3, ptd->buffers + fbvi[3] + 1, buffer_size);
433
434       if (mode == MEMIF_INTERFACE_MODE_IP)
435         {
436           next[0] = memif_next_from_ip_hdr (node, b0);
437           next[1] = memif_next_from_ip_hdr (node, b1);
438           next[2] = memif_next_from_ip_hdr (node, b2);
439           next[3] = memif_next_from_ip_hdr (node, b3);
440         }
441
442       /* next */
443       n_from -= 4;
444       po += 4;
445       bi += 4;
446       next += 4;
447     }
448   while (n_from)
449     {
450       u32 fbvi[4];
451       /* enqueue buffer */
452       fbvi[0] = po[0].first_buffer_vec_index;
453       bi[0] = ptd->buffers[fbvi[0]];
454       b0 = vlib_get_buffer (vm, bi[0]);
455       vlib_buffer_copy_template (b0, &bt);
456       b0->current_length = po->packet_len;
457       n_rx_bytes += b0->current_length;
458
459       memif_add_to_chain (vm, b0, ptd->buffers + fbvi[0] + 1, buffer_size);
460
461       if (mode == MEMIF_INTERFACE_MODE_IP)
462         {
463           next[0] = memif_next_from_ip_hdr (node, b0);
464         }
465
466       /* next */
467       n_from -= 1;
468       po += 1;
469       bi += 1;
470       next += 1;
471     }
472
473   /* packet trace if enabled */
474   if (PREDICT_FALSE ((n_trace = vlib_get_trace_count (vm, node))))
475     {
476       u32 n_left = n_rx_packets;
477       bi = to_next_bufs;
478       next = nexts;
479       u32 ni = next_index;
480       while (n_trace && n_left)
481         {
482           vlib_buffer_t *b;
483           memif_input_trace_t *tr;
484           if (mode != MEMIF_INTERFACE_MODE_ETHERNET)
485             ni = next[0];
486           b = vlib_get_buffer (vm, bi[0]);
487           if (PREDICT_TRUE
488               (vlib_trace_buffer (vm, node, ni, b, /* follow_chain */ 0)))
489             {
490               tr = vlib_add_trace (vm, node, b, sizeof (*tr));
491               tr->next_index = ni;
492               tr->hw_if_index = mif->hw_if_index;
493               tr->ring = qid;
494               n_trace--;
495             }
496
497           /* next */
498           n_left--;
499           bi++;
500           next++;
501         }
502       vlib_set_trace_count (vm, node, n_trace);
503     }
504
505   if (mode == MEMIF_INTERFACE_MODE_ETHERNET)
506     {
507       n_left_to_next -= n_rx_packets;
508       vlib_put_next_frame (vm, node, next_index, n_left_to_next);
509     }
510   else
511     vlib_buffer_enqueue_to_next (vm, node, to_next_bufs, nexts, n_rx_packets);
512
513   vlib_increment_combined_counter (vnm->interface_main.combined_sw_if_counters
514                                    + VNET_INTERFACE_COUNTER_RX, thread_index,
515                                    mif->sw_if_index, n_rx_packets,
516                                    n_rx_bytes);
517
518   /* refill ring with empty buffers */
519 refill:
520   vec_reset_length (ptd->buffers);
521   vec_reset_length (ptd->copy_ops);
522
523   if (type == MEMIF_RING_M2S)
524     {
525       u16 head = ring->head;
526       n_slots = ring_size - head + mq->last_tail;
527
528       while (n_slots--)
529         {
530           u16 s = head++ & mask;
531           memif_desc_t *d = &ring->desc[s];
532           d->length = mif->run.buffer_size;
533         }
534
535       CLIB_MEMORY_STORE_BARRIER ();
536       ring->head = head;
537     }
538
539   return n_rx_packets;
540 }
541
542 static_always_inline uword
543 memif_device_input_zc_inline (vlib_main_t * vm, vlib_node_runtime_t * node,
544                               vlib_frame_t * frame, memif_if_t * mif,
545                               u16 qid, memif_interface_mode_t mode)
546 {
547   vnet_main_t *vnm = vnet_get_main ();
548   memif_main_t *mm = &memif_main;
549   memif_ring_t *ring;
550   memif_queue_t *mq;
551   u32 next_index;
552   uword n_trace = vlib_get_trace_count (vm, node);
553   u32 n_rx_packets = 0, n_rx_bytes = 0;
554   u32 *to_next = 0, *buffers;
555   u32 bi0, bi1, bi2, bi3;
556   u16 s0, s1, s2, s3;
557   memif_desc_t *d0, *d1, *d2, *d3;
558   vlib_buffer_t *b0, *b1, *b2, *b3;
559   u32 thread_index = vm->thread_index;
560   memif_per_thread_data_t *ptd = vec_elt_at_index (mm->per_thread_data,
561                                                    thread_index);
562   u16 cur_slot, last_slot, ring_size, n_slots, mask, head;
563   i16 start_offset;
564   u32 buffer_length;
565   u16 n_alloc, n_from;
566
567   mq = vec_elt_at_index (mif->rx_queues, qid);
568   ring = mq->ring;
569   ring_size = 1 << mq->log2_ring_size;
570   mask = ring_size - 1;
571
572   next_index = (mode == MEMIF_INTERFACE_MODE_IP) ?
573     VNET_DEVICE_INPUT_NEXT_IP6_INPUT : VNET_DEVICE_INPUT_NEXT_ETHERNET_INPUT;
574
575   /* asume that somebody will want to add ethernet header on the packet
576      so start with IP header at offset 14 */
577   start_offset = (mode == MEMIF_INTERFACE_MODE_IP) ? 14 : 0;
578   buffer_length = vlib_buffer_get_default_data_size (vm) - start_offset;
579
580   cur_slot = mq->last_tail;
581   last_slot = ring->tail;
582   if (cur_slot == last_slot)
583     goto refill;
584   n_slots = last_slot - cur_slot;
585
586   /* process ring slots */
587   vec_validate_aligned (ptd->buffers, MEMIF_RX_VECTOR_SZ,
588                         CLIB_CACHE_LINE_BYTES);
589   while (n_slots && n_rx_packets < MEMIF_RX_VECTOR_SZ)
590     {
591       vlib_buffer_t *hb;
592
593       s0 = cur_slot & mask;
594       bi0 = mq->buffers[s0];
595       ptd->buffers[n_rx_packets++] = bi0;
596
597       CLIB_PREFETCH (&ring->desc[(cur_slot + 8) & mask],
598                      CLIB_CACHE_LINE_BYTES, LOAD);
599       d0 = &ring->desc[s0];
600       hb = b0 = vlib_get_buffer (vm, bi0);
601       b0->current_data = start_offset;
602       b0->current_length = d0->length;
603       n_rx_bytes += d0->length;
604
605       if (0 && memif_desc_is_invalid (mif, d0, buffer_length))
606         return 0;
607
608       cur_slot++;
609       n_slots--;
610       if (PREDICT_FALSE ((d0->flags & MEMIF_DESC_FLAG_NEXT) && n_slots))
611         {
612           hb->flags |= VLIB_BUFFER_TOTAL_LENGTH_VALID;
613         next_slot:
614           s0 = cur_slot & mask;
615           d0 = &ring->desc[s0];
616           bi0 = mq->buffers[s0];
617
618           /* previous buffer */
619           b0->next_buffer = bi0;
620           b0->flags |= VLIB_BUFFER_NEXT_PRESENT;
621
622           /* current buffer */
623           b0 = vlib_get_buffer (vm, bi0);
624           b0->current_data = start_offset;
625           b0->current_length = d0->length;
626           hb->total_length_not_including_first_buffer += d0->length;
627           n_rx_bytes += d0->length;
628
629           cur_slot++;
630           n_slots--;
631           if ((d0->flags & MEMIF_DESC_FLAG_NEXT) && n_slots)
632             goto next_slot;
633         }
634     }
635
636   /* release slots from the ring */
637   mq->last_tail = cur_slot;
638
639   n_from = n_rx_packets;
640   buffers = ptd->buffers;
641
642   while (n_from)
643     {
644       u32 n_left_to_next;
645       u32 next0, next1, next2, next3;
646
647       vlib_get_next_frame (vm, node, next_index, to_next, n_left_to_next);
648       while (n_from >= 8 && n_left_to_next >= 4)
649         {
650           b0 = vlib_get_buffer (vm, buffers[4]);
651           b1 = vlib_get_buffer (vm, buffers[5]);
652           b2 = vlib_get_buffer (vm, buffers[6]);
653           b3 = vlib_get_buffer (vm, buffers[7]);
654           vlib_prefetch_buffer_header (b0, STORE);
655           vlib_prefetch_buffer_header (b1, STORE);
656           vlib_prefetch_buffer_header (b2, STORE);
657           vlib_prefetch_buffer_header (b3, STORE);
658
659           /* enqueue buffer */
660           to_next[0] = bi0 = buffers[0];
661           to_next[1] = bi1 = buffers[1];
662           to_next[2] = bi2 = buffers[2];
663           to_next[3] = bi3 = buffers[3];
664           to_next += 4;
665           n_left_to_next -= 4;
666           buffers += 4;
667
668           b0 = vlib_get_buffer (vm, bi0);
669           b1 = vlib_get_buffer (vm, bi1);
670           b2 = vlib_get_buffer (vm, bi2);
671           b3 = vlib_get_buffer (vm, bi3);
672
673           vnet_buffer (b0)->sw_if_index[VLIB_RX] = mif->sw_if_index;
674           vnet_buffer (b0)->sw_if_index[VLIB_TX] = ~0;
675           vnet_buffer (b1)->sw_if_index[VLIB_RX] = mif->sw_if_index;
676           vnet_buffer (b1)->sw_if_index[VLIB_TX] = ~0;
677           vnet_buffer (b2)->sw_if_index[VLIB_RX] = mif->sw_if_index;
678           vnet_buffer (b2)->sw_if_index[VLIB_TX] = ~0;
679           vnet_buffer (b3)->sw_if_index[VLIB_RX] = mif->sw_if_index;
680           vnet_buffer (b3)->sw_if_index[VLIB_TX] = ~0;
681
682           if (mode == MEMIF_INTERFACE_MODE_IP)
683             {
684               next0 = memif_next_from_ip_hdr (node, b0);
685               next1 = memif_next_from_ip_hdr (node, b1);
686               next2 = memif_next_from_ip_hdr (node, b2);
687               next3 = memif_next_from_ip_hdr (node, b3);
688             }
689           else if (mode == MEMIF_INTERFACE_MODE_ETHERNET)
690             {
691               if (PREDICT_FALSE (mif->per_interface_next_index != ~0))
692                 {
693                   next0 = mif->per_interface_next_index;
694                   next1 = mif->per_interface_next_index;
695                   next2 = mif->per_interface_next_index;
696                   next3 = mif->per_interface_next_index;
697                 }
698               else
699                 {
700                   next0 = next1 = next2 = next3 = next_index;
701                   /* redirect if feature path enabled */
702                   vnet_feature_start_device_input_x1 (mif->sw_if_index,
703                                                       &next0, b0);
704                   vnet_feature_start_device_input_x1 (mif->sw_if_index,
705                                                       &next1, b1);
706                   vnet_feature_start_device_input_x1 (mif->sw_if_index,
707                                                       &next2, b2);
708                   vnet_feature_start_device_input_x1 (mif->sw_if_index,
709                                                       &next3, b3);
710                 }
711             }
712
713           /* trace */
714           if (PREDICT_FALSE (n_trace > 0))
715             {
716               memif_trace_buffer (vm, node, mif, b0, next0, qid, &n_trace);
717               if (PREDICT_FALSE (n_trace > 0))
718                 memif_trace_buffer (vm, node, mif, b1, next1, qid, &n_trace);
719               if (PREDICT_FALSE (n_trace > 0))
720                 memif_trace_buffer (vm, node, mif, b2, next2, qid, &n_trace);
721               if (PREDICT_FALSE (n_trace > 0))
722                 memif_trace_buffer (vm, node, mif, b3, next3, qid, &n_trace);
723             }
724
725           /* enqueue */
726           vlib_validate_buffer_enqueue_x4 (vm, node, next_index, to_next,
727                                            n_left_to_next, bi0, bi1, bi2, bi3,
728                                            next0, next1, next2, next3);
729
730           /* next */
731           n_from -= 4;
732         }
733       while (n_from && n_left_to_next)
734         {
735           /* enqueue buffer */
736           to_next[0] = bi0 = buffers[0];
737           to_next += 1;
738           n_left_to_next--;
739           buffers += 1;
740
741           b0 = vlib_get_buffer (vm, bi0);
742           vnet_buffer (b0)->sw_if_index[VLIB_RX] = mif->sw_if_index;
743           vnet_buffer (b0)->sw_if_index[VLIB_TX] = ~0;
744
745           if (mode == MEMIF_INTERFACE_MODE_IP)
746             {
747               next0 = memif_next_from_ip_hdr (node, b0);
748             }
749           else if (mode == MEMIF_INTERFACE_MODE_ETHERNET)
750             {
751               if (PREDICT_FALSE (mif->per_interface_next_index != ~0))
752                 next0 = mif->per_interface_next_index;
753               else
754                 {
755                   next0 = next_index;
756                   /* redirect if feature path enabled */
757                   vnet_feature_start_device_input_x1 (mif->sw_if_index,
758                                                       &next0, b0);
759                 }
760             }
761
762           /* trace */
763           if (PREDICT_FALSE (n_trace > 0))
764             memif_trace_buffer (vm, node, mif, b0, next0, qid, &n_trace);
765
766           /* enqueue */
767           vlib_validate_buffer_enqueue_x1 (vm, node, next_index, to_next,
768                                            n_left_to_next, bi0, next0);
769
770           /* next */
771           n_from--;
772         }
773       vlib_put_next_frame (vm, node, next_index, n_left_to_next);
774     }
775
776   vlib_increment_combined_counter (vnm->interface_main.combined_sw_if_counters
777                                    + VNET_INTERFACE_COUNTER_RX, thread_index,
778                                    mif->sw_if_index, n_rx_packets,
779                                    n_rx_bytes);
780
781   /* refill ring with empty buffers */
782 refill:
783   vec_reset_length (ptd->buffers);
784
785   head = ring->head;
786   n_slots = ring_size - head + mq->last_tail;
787
788   if (n_slots < 32)
789     goto done;
790
791   memif_desc_t *dt = &ptd->desc_template;
792   clib_memset (dt, 0, sizeof (memif_desc_t));
793   dt->length = buffer_length;
794
795   n_alloc = vlib_buffer_alloc_to_ring_from_pool (vm, mq->buffers, head & mask,
796                                                  ring_size, n_slots,
797                                                  mq->buffer_pool_index);
798
799   if (PREDICT_FALSE (n_alloc != n_slots))
800     {
801       vlib_error_count (vm, node->node_index,
802                         MEMIF_INPUT_ERROR_BUFFER_ALLOC_FAIL, 1);
803     }
804
805   while (n_alloc >= 32)
806     {
807       bi0 = mq->buffers[(head + 4) & mask];
808       vlib_prefetch_buffer_with_index (vm, bi0, LOAD);
809       bi1 = mq->buffers[(head + 5) & mask];
810       vlib_prefetch_buffer_with_index (vm, bi1, LOAD);
811       bi2 = mq->buffers[(head + 6) & mask];
812       vlib_prefetch_buffer_with_index (vm, bi2, LOAD);
813       bi3 = mq->buffers[(head + 7) & mask];
814       vlib_prefetch_buffer_with_index (vm, bi3, LOAD);
815
816       s0 = head++ & mask;
817       s1 = head++ & mask;
818       s2 = head++ & mask;
819       s3 = head++ & mask;
820
821       d0 = &ring->desc[s0];
822       d1 = &ring->desc[s1];
823       d2 = &ring->desc[s2];
824       d3 = &ring->desc[s3];
825
826       clib_memcpy_fast (d0, dt, sizeof (memif_desc_t));
827       clib_memcpy_fast (d1, dt, sizeof (memif_desc_t));
828       clib_memcpy_fast (d2, dt, sizeof (memif_desc_t));
829       clib_memcpy_fast (d3, dt, sizeof (memif_desc_t));
830
831       b0 = vlib_get_buffer (vm, mq->buffers[s0]);
832       b1 = vlib_get_buffer (vm, mq->buffers[s1]);
833       b2 = vlib_get_buffer (vm, mq->buffers[s2]);
834       b3 = vlib_get_buffer (vm, mq->buffers[s3]);
835
836       d0->region = b0->buffer_pool_index + 1;
837       d1->region = b1->buffer_pool_index + 1;
838       d2->region = b2->buffer_pool_index + 1;
839       d3->region = b3->buffer_pool_index + 1;
840
841       d0->offset =
842         (void *) b0->data - mif->regions[d0->region].shm + start_offset;
843       d1->offset =
844         (void *) b1->data - mif->regions[d1->region].shm + start_offset;
845       d2->offset =
846         (void *) b2->data - mif->regions[d2->region].shm + start_offset;
847       d3->offset =
848         (void *) b3->data - mif->regions[d3->region].shm + start_offset;
849
850       n_alloc -= 4;
851     }
852   while (n_alloc)
853     {
854       s0 = head++ & mask;
855       d0 = &ring->desc[s0];
856       clib_memcpy_fast (d0, dt, sizeof (memif_desc_t));
857       b0 = vlib_get_buffer (vm, mq->buffers[s0]);
858       d0->region = b0->buffer_pool_index + 1;
859       d0->offset =
860         (void *) b0->data - mif->regions[d0->region].shm + start_offset;
861
862       n_alloc -= 1;
863     }
864
865   CLIB_MEMORY_STORE_BARRIER ();
866   ring->head = head;
867
868 done:
869   return n_rx_packets;
870 }
871
872
873 VLIB_NODE_FN (memif_input_node) (vlib_main_t * vm,
874                                  vlib_node_runtime_t * node,
875                                  vlib_frame_t * frame)
876 {
877   u32 n_rx = 0;
878   memif_main_t *mm = &memif_main;
879   vnet_device_input_runtime_t *rt = (void *) node->runtime_data;
880   vnet_device_and_queue_t *dq;
881   memif_interface_mode_t mode_ip = MEMIF_INTERFACE_MODE_IP;
882   memif_interface_mode_t mode_eth = MEMIF_INTERFACE_MODE_ETHERNET;
883
884   foreach_device_and_queue (dq, rt->devices_and_queues)
885   {
886     memif_if_t *mif;
887     mif = vec_elt_at_index (mm->interfaces, dq->dev_instance);
888     if ((mif->flags & MEMIF_IF_FLAG_ADMIN_UP) &&
889         (mif->flags & MEMIF_IF_FLAG_CONNECTED))
890       {
891         if (mif->flags & MEMIF_IF_FLAG_ZERO_COPY)
892           {
893             if (mif->mode == MEMIF_INTERFACE_MODE_IP)
894               n_rx += memif_device_input_zc_inline (vm, node, frame, mif,
895                                                     dq->queue_id, mode_ip);
896             else
897               n_rx += memif_device_input_zc_inline (vm, node, frame, mif,
898                                                     dq->queue_id, mode_eth);
899           }
900         else if (mif->flags & MEMIF_IF_FLAG_IS_SLAVE)
901           {
902             if (mif->mode == MEMIF_INTERFACE_MODE_IP)
903               n_rx += memif_device_input_inline (vm, node, frame, mif,
904                                                  MEMIF_RING_M2S, dq->queue_id,
905                                                  mode_ip);
906             else
907               n_rx += memif_device_input_inline (vm, node, frame, mif,
908                                                  MEMIF_RING_M2S, dq->queue_id,
909                                                  mode_eth);
910           }
911         else
912           {
913             if (mif->mode == MEMIF_INTERFACE_MODE_IP)
914               n_rx += memif_device_input_inline (vm, node, frame, mif,
915                                                  MEMIF_RING_S2M, dq->queue_id,
916                                                  mode_ip);
917             else
918               n_rx += memif_device_input_inline (vm, node, frame, mif,
919                                                  MEMIF_RING_S2M, dq->queue_id,
920                                                  mode_eth);
921           }
922       }
923   }
924
925   return n_rx;
926 }
927
928 /* *INDENT-OFF* */
929 VLIB_REGISTER_NODE (memif_input_node) = {
930   .name = "memif-input",
931   .flags = VLIB_NODE_FLAG_TRACE_SUPPORTED,
932   .sibling_of = "device-input",
933   .format_trace = format_memif_input_trace,
934   .type = VLIB_NODE_TYPE_INPUT,
935   .state = VLIB_NODE_STATE_INTERRUPT,
936   .n_errors = MEMIF_INPUT_N_ERROR,
937   .error_strings = memif_input_error_strings,
938 };
939
940 /* *INDENT-ON* */
941
942
943 /*
944  * fd.io coding-style-patch-verification: ON
945  *
946  * Local Variables:
947  * eval: (c-set-style "gnu")
948  * End:
949  */