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