961127141f349fbc9ca537273c38dd966700fcbe
[vpp.git] / src / vnet / devices / virtio / 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 #include <sys/types.h>
19 #include <sys/stat.h>
20 #include <fcntl.h>
21 #include <net/if.h>
22 #include <linux/if_tun.h>
23 #include <sys/ioctl.h>
24 #include <sys/eventfd.h>
25
26 #include <vlib/vlib.h>
27 #include <vlib/unix/unix.h>
28 #include <vnet/ethernet/ethernet.h>
29 #include <vnet/devices/devices.h>
30 #include <vnet/feature/feature.h>
31 #include <vnet/ip/ip4_packet.h>
32 #include <vnet/ip/ip6_packet.h>
33 #include <vnet/udp/udp_packet.h>
34 #include <vnet/devices/virtio/virtio.h>
35
36
37 #define foreach_virtio_input_error \
38   _(UNKNOWN, "unknown")
39
40 typedef enum
41 {
42 #define _(f,s) VIRTIO_INPUT_ERROR_##f,
43   foreach_virtio_input_error
44 #undef _
45     VIRTIO_INPUT_N_ERROR,
46 } virtio_input_error_t;
47
48 static char *virtio_input_error_strings[] = {
49 #define _(n,s) s,
50   foreach_virtio_input_error
51 #undef _
52 };
53
54 typedef struct
55 {
56   u32 next_index;
57   u32 hw_if_index;
58   u16 ring;
59   u16 len;
60   struct virtio_net_hdr_v1 hdr;
61 } virtio_input_trace_t;
62
63 static u8 *
64 format_virtio_input_trace (u8 * s, va_list * args)
65 {
66   CLIB_UNUSED (vlib_main_t * vm) = va_arg (*args, vlib_main_t *);
67   CLIB_UNUSED (vlib_node_t * node) = va_arg (*args, vlib_node_t *);
68   virtio_input_trace_t *t = va_arg (*args, virtio_input_trace_t *);
69   u32 indent = format_get_indent (s);
70
71   s = format (s, "virtio: hw_if_index %d next-index %d vring %u len %u",
72               t->hw_if_index, t->next_index, t->ring, t->len);
73   s = format (s, "\n%Uhdr: flags 0x%02x gso_type 0x%02x hdr_len %u "
74               "gso_size %u csum_start %u csum_offset %u num_buffers %u",
75               format_white_space, indent + 2,
76               t->hdr.flags, t->hdr.gso_type, t->hdr.hdr_len, t->hdr.gso_size,
77               t->hdr.csum_start, t->hdr.csum_offset, t->hdr.num_buffers);
78   return s;
79 }
80
81 static_always_inline void
82 virtio_refill_vring (vlib_main_t * vm, virtio_if_t * vif,
83                      virtio_if_type_t type, virtio_vring_t * vring,
84                      const int hdr_sz)
85 {
86   u16 used, next, avail, n_slots;
87   u16 sz = vring->size;
88   u16 mask = sz - 1;
89
90 more:
91   used = vring->desc_in_use;
92
93   if (sz - used < sz / 8)
94     return;
95
96   /* deliver free buffers in chunks of 64 */
97   n_slots = clib_min (sz - used, 64);
98
99   next = vring->desc_next;
100   avail = vring->avail->idx;
101   n_slots =
102     vlib_buffer_alloc_to_ring_from_pool (vm, vring->buffers, next,
103                                          vring->size, n_slots,
104                                          vring->buffer_pool_index);
105
106   if (n_slots == 0)
107     return;
108
109   while (n_slots)
110     {
111       struct vring_desc *d = &vring->desc[next];;
112       vlib_buffer_t *b = vlib_get_buffer (vm, vring->buffers[next]);
113       /*
114        * current_data may not be initialized with 0 and may contain
115        * previous offset. Here we want to make sure, it should be 0
116        * initialized.
117        */
118       b->current_data = -hdr_sz;
119       memset (vlib_buffer_get_current (b), 0, hdr_sz);
120       d->addr =
121         ((type == VIRTIO_IF_TYPE_PCI) ? vlib_buffer_get_current_pa (vm,
122                                                                     b) :
123          pointer_to_uword (vlib_buffer_get_current (b)));
124       d->len = vlib_buffer_get_default_data_size (vm) + hdr_sz;
125       d->flags = VRING_DESC_F_WRITE;
126       vring->avail->ring[avail & mask] = next;
127       avail++;
128       next = (next + 1) & mask;
129       n_slots--;
130       used++;
131     }
132   CLIB_MEMORY_STORE_BARRIER ();
133   vring->avail->idx = avail;
134   vring->desc_next = next;
135   vring->desc_in_use = used;
136
137   if ((vring->used->flags & VIRTIO_RING_FLAG_MASK_INT) == 0)
138     {
139       virtio_kick (vm, vring, vif);
140     }
141   goto more;
142 }
143
144 static_always_inline void
145 virtio_needs_csum (vlib_buffer_t * b0, struct virtio_net_hdr_v1 *hdr,
146                    u8 * l4_proto, u8 * l4_hdr_sz, virtio_if_type_t type)
147 {
148   if (hdr->flags & VIRTIO_NET_HDR_F_NEEDS_CSUM)
149     {
150       u16 ethertype = 0, l2hdr_sz = 0;
151
152       if (type == VIRTIO_IF_TYPE_TUN)
153         {
154           switch (b0->data[0] & 0xf0)
155             {
156             case 0x40:
157               ethertype = ETHERNET_TYPE_IP4;
158               break;
159             case 0x60:
160               ethertype = ETHERNET_TYPE_IP6;
161               break;
162             }
163         }
164       else
165         {
166           ethernet_header_t *eh =
167             (ethernet_header_t *) vlib_buffer_get_current (b0);
168           ethertype = clib_net_to_host_u16 (eh->type);
169           l2hdr_sz = sizeof (ethernet_header_t);
170
171           if (ethernet_frame_is_tagged (ethertype))
172             {
173               ethernet_vlan_header_t *vlan =
174                 (ethernet_vlan_header_t *) (eh + 1);
175
176               ethertype = clib_net_to_host_u16 (vlan->type);
177               l2hdr_sz += sizeof (*vlan);
178               if (ethertype == ETHERNET_TYPE_VLAN)
179                 {
180                   vlan++;
181                   ethertype = clib_net_to_host_u16 (vlan->type);
182                   l2hdr_sz += sizeof (*vlan);
183                 }
184             }
185         }
186
187       vnet_buffer (b0)->l2_hdr_offset = 0;
188       vnet_buffer (b0)->l3_hdr_offset = l2hdr_sz;
189
190       if (PREDICT_TRUE (ethertype == ETHERNET_TYPE_IP4))
191         {
192           ip4_header_t *ip4 =
193             (ip4_header_t *) (vlib_buffer_get_current (b0) + l2hdr_sz);
194           vnet_buffer (b0)->l4_hdr_offset = l2hdr_sz + ip4_header_bytes (ip4);
195           *l4_proto = ip4->protocol;
196           b0->flags |=
197             (VNET_BUFFER_F_IS_IP4 | VNET_BUFFER_F_OFFLOAD_IP_CKSUM);
198           b0->flags |=
199             (VNET_BUFFER_F_L2_HDR_OFFSET_VALID
200              | VNET_BUFFER_F_L3_HDR_OFFSET_VALID |
201              VNET_BUFFER_F_L4_HDR_OFFSET_VALID);
202         }
203       else if (PREDICT_TRUE (ethertype == ETHERNET_TYPE_IP6))
204         {
205           ip6_header_t *ip6 =
206             (ip6_header_t *) (vlib_buffer_get_current (b0) + l2hdr_sz);
207           vnet_buffer (b0)->l4_hdr_offset = l2hdr_sz + sizeof (ip6_header_t);
208           /* FIXME IPv6 EH traversal */
209           *l4_proto = ip6->protocol;
210           b0->flags |= (VNET_BUFFER_F_IS_IP6 |
211                         VNET_BUFFER_F_L2_HDR_OFFSET_VALID
212                         | VNET_BUFFER_F_L3_HDR_OFFSET_VALID |
213                         VNET_BUFFER_F_L4_HDR_OFFSET_VALID);
214         }
215       if (*l4_proto == IP_PROTOCOL_TCP)
216         {
217           b0->flags |= VNET_BUFFER_F_OFFLOAD_TCP_CKSUM;
218           tcp_header_t *tcp = (tcp_header_t *) (vlib_buffer_get_current (b0) +
219                                                 vnet_buffer
220                                                 (b0)->l4_hdr_offset);
221           *l4_hdr_sz = tcp_header_bytes (tcp);
222         }
223       else if (*l4_proto == IP_PROTOCOL_UDP)
224         {
225           b0->flags |= VNET_BUFFER_F_OFFLOAD_UDP_CKSUM;
226           udp_header_t *udp = (udp_header_t *) (vlib_buffer_get_current (b0) +
227                                                 vnet_buffer
228                                                 (b0)->l4_hdr_offset);
229           *l4_hdr_sz = sizeof (*udp);
230         }
231     }
232 }
233
234 static_always_inline void
235 fill_gso_buffer_flags (vlib_buffer_t * b0, struct virtio_net_hdr_v1 *hdr,
236                        u8 l4_proto, u8 l4_hdr_sz)
237 {
238   if (hdr->gso_type == VIRTIO_NET_HDR_GSO_TCPV4)
239     {
240       ASSERT (hdr->flags & VIRTIO_NET_HDR_F_NEEDS_CSUM);
241       vnet_buffer2 (b0)->gso_size = hdr->gso_size;
242       vnet_buffer2 (b0)->gso_l4_hdr_sz = l4_hdr_sz;
243       b0->flags |= VNET_BUFFER_F_GSO | VNET_BUFFER_F_IS_IP4;
244     }
245   if (hdr->gso_type == VIRTIO_NET_HDR_GSO_TCPV6)
246     {
247       ASSERT (hdr->flags & VIRTIO_NET_HDR_F_NEEDS_CSUM);
248       vnet_buffer2 (b0)->gso_size = hdr->gso_size;
249       vnet_buffer2 (b0)->gso_l4_hdr_sz = l4_hdr_sz;
250       b0->flags |= VNET_BUFFER_F_GSO | VNET_BUFFER_F_IS_IP6;
251     }
252 }
253
254 static_always_inline uword
255 virtio_device_input_gso_inline (vlib_main_t * vm, vlib_node_runtime_t * node,
256                                 vlib_frame_t * frame, virtio_if_t * vif,
257                                 u16 qid, virtio_if_type_t type,
258                                 int gso_enabled, int checksum_offload_enabled)
259 {
260   vnet_main_t *vnm = vnet_get_main ();
261   u32 thread_index = vm->thread_index;
262   uword n_trace = vlib_get_trace_count (vm, node);
263   virtio_vring_t *vring = vec_elt_at_index (vif->rxq_vrings, qid);
264   u32 next_index = VNET_DEVICE_INPUT_NEXT_ETHERNET_INPUT;
265   const int hdr_sz = vif->virtio_net_hdr_sz;
266   u32 *to_next = 0;
267   u32 n_rx_packets = 0;
268   u32 n_rx_bytes = 0;
269   u16 mask = vring->size - 1;
270   u16 last = vring->last_used_idx;
271   u16 n_left = vring->used->idx - last;
272
273   if ((vring->used->flags & VIRTIO_RING_FLAG_MASK_INT) == 0 &&
274       vring->last_kick_avail_idx != vring->avail->idx)
275     virtio_kick (vm, vring, vif);
276
277   if (n_left == 0)
278     goto refill;
279
280   if (type == VIRTIO_IF_TYPE_TUN)
281     next_index = VNET_DEVICE_INPUT_NEXT_IP4_INPUT;
282
283   while (n_left)
284     {
285       u32 n_left_to_next;
286       u32 next0 = next_index;
287
288       vlib_get_next_frame (vm, node, next_index, to_next, n_left_to_next);
289
290       while (n_left && n_left_to_next)
291         {
292           u8 l4_proto = 0, l4_hdr_sz = 0;
293           u16 num_buffers = 1;
294           struct vring_used_elem *e = &vring->used->ring[last & mask];
295           struct virtio_net_hdr_v1 *hdr;
296           u16 slot = e->id;
297           u16 len = e->len - hdr_sz;
298           u32 bi0 = vring->buffers[slot];
299           vlib_buffer_t *b0 = vlib_get_buffer (vm, bi0);
300           hdr = vlib_buffer_get_current (b0);
301           if (hdr_sz == sizeof (struct virtio_net_hdr_v1))
302             num_buffers = hdr->num_buffers;
303
304           b0->flags = VLIB_BUFFER_TOTAL_LENGTH_VALID;
305           b0->current_data = 0;
306           b0->current_length = len;
307
308           if (checksum_offload_enabled)
309             virtio_needs_csum (b0, hdr, &l4_proto, &l4_hdr_sz, type);
310
311           if (gso_enabled)
312             fill_gso_buffer_flags (b0, hdr, l4_proto, l4_hdr_sz);
313
314           vnet_buffer (b0)->sw_if_index[VLIB_RX] = vif->sw_if_index;
315           vnet_buffer (b0)->sw_if_index[VLIB_TX] = (u32) ~ 0;
316
317           /* if multisegment packet */
318           if (PREDICT_FALSE (num_buffers > 1))
319             {
320               vlib_buffer_t *pb, *cb;
321               pb = b0;
322               b0->total_length_not_including_first_buffer = 0;
323               while (num_buffers > 1)
324                 {
325                   last++;
326                   e = &vring->used->ring[last & mask];
327                   u32 cbi = vring->buffers[e->id];
328                   cb = vlib_get_buffer (vm, cbi);
329
330                   /* current buffer */
331                   cb->current_length = e->len;
332
333                   /* previous buffer */
334                   pb->next_buffer = cbi;
335                   pb->flags |= VLIB_BUFFER_NEXT_PRESENT;
336
337                   /* first buffer */
338                   b0->total_length_not_including_first_buffer += e->len;
339
340                   pb = cb;
341                   vring->desc_in_use--;
342                   num_buffers--;
343                   n_left--;
344                 }
345               len += b0->total_length_not_including_first_buffer;
346             }
347
348           if (type == VIRTIO_IF_TYPE_TUN)
349             {
350               switch (b0->data[0] & 0xf0)
351                 {
352                 case 0x40:
353                   next0 = VNET_DEVICE_INPUT_NEXT_IP4_INPUT;
354                   break;
355                 case 0x60:
356                   next0 = VNET_DEVICE_INPUT_NEXT_IP6_INPUT;
357                   break;
358                 default:
359                   next0 = VNET_DEVICE_INPUT_NEXT_DROP;
360                   break;
361                 }
362             }
363
364           if (PREDICT_FALSE (vif->per_interface_next_index != ~0))
365             next0 = vif->per_interface_next_index;
366
367           if (type != VIRTIO_IF_TYPE_TUN)
368             {
369               /* only for l2, redirect if feature path enabled */
370               vnet_feature_start_device_input_x1 (vif->sw_if_index, &next0,
371                                                   b0);
372             }
373
374           /* trace */
375           VLIB_BUFFER_TRACE_TRAJECTORY_INIT (b0);
376
377           if (PREDICT_FALSE (n_trace > 0))
378             {
379               virtio_input_trace_t *tr;
380               vlib_trace_buffer (vm, node, next0, b0,
381                                  /* follow_chain */ 1);
382               vlib_set_trace_count (vm, node, --n_trace);
383               tr = vlib_add_trace (vm, node, b0, sizeof (*tr));
384               tr->next_index = next0;
385               tr->hw_if_index = vif->hw_if_index;
386               tr->len = len;
387               clib_memcpy_fast (&tr->hdr, hdr, hdr_sz);
388             }
389
390           /* enqueue buffer */
391           to_next[0] = bi0;
392           vring->desc_in_use--;
393           to_next += 1;
394           n_left_to_next--;
395           n_left--;
396           last++;
397
398           /* enqueue */
399           vlib_validate_buffer_enqueue_x1 (vm, node, next_index, to_next,
400                                            n_left_to_next, bi0, next0);
401
402           /* next packet */
403           n_rx_packets++;
404           n_rx_bytes += len;
405         }
406       vlib_put_next_frame (vm, node, next_index, n_left_to_next);
407     }
408   vring->last_used_idx = last;
409
410   vlib_increment_combined_counter (vnm->interface_main.combined_sw_if_counters
411                                    + VNET_INTERFACE_COUNTER_RX, thread_index,
412                                    vif->sw_if_index, n_rx_packets,
413                                    n_rx_bytes);
414
415 refill:
416   virtio_refill_vring (vm, vif, type, vring, hdr_sz);
417
418   return n_rx_packets;
419 }
420
421 static_always_inline uword
422 virtio_device_input_inline (vlib_main_t * vm, vlib_node_runtime_t * node,
423                             vlib_frame_t * frame, virtio_if_t * vif, u16 qid,
424                             virtio_if_type_t type)
425 {
426
427   if (vif->gso_enabled)
428     return virtio_device_input_gso_inline (vm, node, frame, vif,
429                                            qid, type, 1, 1);
430   else if (vif->csum_offload_enabled)
431     return virtio_device_input_gso_inline (vm, node, frame, vif,
432                                            qid, type, 0, 1);
433   else
434     return virtio_device_input_gso_inline (vm, node, frame, vif,
435                                            qid, type, 0, 0);
436   return 0;
437 }
438
439 VLIB_NODE_FN (virtio_input_node) (vlib_main_t * vm,
440                                   vlib_node_runtime_t * node,
441                                   vlib_frame_t * frame)
442 {
443   u32 n_rx = 0;
444   virtio_main_t *nm = &virtio_main;
445   vnet_device_input_runtime_t *rt = (void *) node->runtime_data;
446   vnet_device_and_queue_t *dq;
447
448   foreach_device_and_queue (dq, rt->devices_and_queues)
449   {
450     virtio_if_t *vif;
451     vif = vec_elt_at_index (nm->interfaces, dq->dev_instance);
452     if (vif->flags & VIRTIO_IF_FLAG_ADMIN_UP)
453       {
454         if (vif->type == VIRTIO_IF_TYPE_TAP)
455           n_rx += virtio_device_input_inline (vm, node, frame, vif,
456                                               dq->queue_id,
457                                               VIRTIO_IF_TYPE_TAP);
458         else if (vif->type == VIRTIO_IF_TYPE_PCI)
459           n_rx += virtio_device_input_inline (vm, node, frame, vif,
460                                               dq->queue_id,
461                                               VIRTIO_IF_TYPE_PCI);
462         else if (vif->type == VIRTIO_IF_TYPE_TUN)
463           n_rx += virtio_device_input_inline (vm, node, frame, vif,
464                                               dq->queue_id,
465                                               VIRTIO_IF_TYPE_TUN);
466       }
467   }
468
469   return n_rx;
470 }
471
472 /* *INDENT-OFF* */
473 VLIB_REGISTER_NODE (virtio_input_node) = {
474   .name = "virtio-input",
475   .sibling_of = "device-input",
476   .format_trace = format_virtio_input_trace,
477   .flags = VLIB_NODE_FLAG_TRACE_SUPPORTED,
478   .type = VLIB_NODE_TYPE_INPUT,
479   .state = VLIB_NODE_STATE_INTERRUPT,
480   .n_errors = VIRTIO_INPUT_N_ERROR,
481   .error_strings = virtio_input_error_strings,
482 };
483 /* *INDENT-ON* */
484
485 /*
486  * fd.io coding-style-patch-verification: ON
487  *
488  * Local Variables:
489  * eval: (c-set-style "gnu")
490  * End:
491  */