lib/librte_vhost/virtio_net.c

   1 /* SPDX-License-Identifier: BSD-3-Clause
   2  * Copyright(c) 2010-2016 Intel Corporation
   3  */
   4
   5 #include <stdint.h>
   6 #include <stdbool.h>
   7 #include <linux/virtio_net.h>
   8
   9 #include <rte_mbuf.h>
  10 #include <rte_memcpy.h>
  11 #include <rte_ether.h>
  12 #include <rte_ip.h>
  13 #include <rte_vhost.h>
  14 #include <rte_tcp.h>
  15 #include <rte_udp.h>
  16 #include <rte_sctp.h>
  17 #include <rte_arp.h>
  18 #include <rte_spinlock.h>
  19 #include <rte_malloc.h>
  20
  21 #include "iotlb.h"
  22 #include "vhost.h"
  23
  24 #define MAX_PKT_BURST 32
  25
  26 #define MAX_BATCH_LEN 256
  27
  28 static  __rte_always_inline bool
  29 rxvq_is_mergeable(struct virtio_net *dev)
  30 {
  31         return dev->features & (1ULL << VIRTIO_NET_F_MRG_RXBUF);
  32 }
  33
  34 static bool
  35 is_valid_virt_queue_idx(uint32_t idx, int is_tx, uint32_t nr_vring)
  36 {
  37         return (is_tx ^ (idx & 1)) == 0 && idx < nr_vring;
  38 }
  39
  40 static __rte_always_inline void *
  41 alloc_copy_ind_table(struct virtio_net *dev, struct vhost_virtqueue *vq,
  42                 uint64_t desc_addr, uint64_t desc_len)
  43 {
  44         void *idesc;
  45         uint64_t src, dst;
  46         uint64_t len, remain = desc_len;
  47
  48         idesc = rte_malloc(__func__, desc_len, 0);
  49         if (unlikely(!idesc))
  50                 return 0;
  51
  52         dst = (uint64_t)(uintptr_t)idesc;
  53
  54         while (remain) {
  55                 len = remain;
  56                 src = vhost_iova_to_vva(dev, vq, desc_addr, &len,
  57                                 VHOST_ACCESS_RO);
  58                 if (unlikely(!src || !len)) {
  59                         rte_free(idesc);
  60                         return 0;
  61                 }
  62
  63                 rte_memcpy((void *)(uintptr_t)dst, (void *)(uintptr_t)src, len);
  64
  65                 remain -= len;
  66                 dst += len;
  67                 desc_addr += len;
  68         }
  69
  70         return idesc;
  71 }
  72
  73 static __rte_always_inline void
  74 free_ind_table(void *idesc)
  75 {
  76         rte_free(idesc);
  77 }
  78
  79 static __rte_always_inline void
  80 do_flush_shadow_used_ring_split(struct virtio_net *dev,
  81                         struct vhost_virtqueue *vq,
  82                         uint16_t to, uint16_t from, uint16_t size)
  83 {
  84         rte_memcpy(&vq->used->ring[to],
  85                         &vq->shadow_used_split[from],
  86                         size * sizeof(struct vring_used_elem));
  87         vhost_log_cache_used_vring(dev, vq,
  88                         offsetof(struct vring_used, ring[to]),
  89                         size * sizeof(struct vring_used_elem));
  90 }
  91
  92 static __rte_always_inline void
  93 flush_shadow_used_ring_split(struct virtio_net *dev, struct vhost_virtqueue *vq)
  94 {
  95         uint16_t used_idx = vq->last_used_idx & (vq->size - 1);
  96
  97         if (used_idx + vq->shadow_used_idx <= vq->size) {
  98                 do_flush_shadow_used_ring_split(dev, vq, used_idx, 0,
  99                                           vq->shadow_used_idx);
 100         } else {
 101                 uint16_t size;
 102
 103                 /* update used ring interval [used_idx, vq->size] */
 104                 size = vq->size - used_idx;
 105                 do_flush_shadow_used_ring_split(dev, vq, used_idx, 0, size);
 106
 107                 /* update the left half used ring interval [0, left_size] */
 108                 do_flush_shadow_used_ring_split(dev, vq, 0, size,
 109                                           vq->shadow_used_idx - size);
 110         }
 111         vq->last_used_idx += vq->shadow_used_idx;
 112
 113         rte_smp_wmb();
 114
 115         vhost_log_cache_sync(dev, vq);
 116
 117         *(volatile uint16_t *)&vq->used->idx += vq->shadow_used_idx;
 118         vq->shadow_used_idx = 0;
 119         vhost_log_used_vring(dev, vq, offsetof(struct vring_used, idx),
 120                 sizeof(vq->used->idx));
 121 }
 122
 123 static __rte_always_inline void
 124 update_shadow_used_ring_split(struct vhost_virtqueue *vq,
 125                          uint16_t desc_idx, uint16_t len)
 126 {
 127         uint16_t i = vq->shadow_used_idx++;
 128
 129         vq->shadow_used_split[i].id  = desc_idx;
 130         vq->shadow_used_split[i].len = len;
 131 }
 132
 133 static __rte_always_inline void
 134 flush_shadow_used_ring_packed(struct virtio_net *dev,
 135                         struct vhost_virtqueue *vq)
 136 {
 137         int i;
 138         uint16_t used_idx = vq->last_used_idx;
 139
 140         /* Split loop in two to save memory barriers */
 141         for (i = 0; i < vq->shadow_used_idx; i++) {
 142                 vq->desc_packed[used_idx].id = vq->shadow_used_packed[i].id;
 143                 vq->desc_packed[used_idx].len = vq->shadow_used_packed[i].len;
 144
 145                 used_idx += vq->shadow_used_packed[i].count;
 146                 if (used_idx >= vq->size)
 147                         used_idx -= vq->size;
 148         }
 149
 150         rte_smp_wmb();
 151
 152         for (i = 0; i < vq->shadow_used_idx; i++) {
 153                 uint16_t flags;
 154
 155                 if (vq->shadow_used_packed[i].len)
 156                         flags = VRING_DESC_F_WRITE;
 157                 else
 158                         flags = 0;
 159
 160                 if (vq->used_wrap_counter) {
 161                         flags |= VRING_DESC_F_USED;
 162                         flags |= VRING_DESC_F_AVAIL;
 163                 } else {
 164                         flags &= ~VRING_DESC_F_USED;
 165                         flags &= ~VRING_DESC_F_AVAIL;
 166                 }
 167
 168                 vq->desc_packed[vq->last_used_idx].flags = flags;
 169
 170                 vhost_log_cache_used_vring(dev, vq,
 171                                         vq->last_used_idx *
 172                                         sizeof(struct vring_packed_desc),
 173                                         sizeof(struct vring_packed_desc));
 174
 175                 vq->last_used_idx += vq->shadow_used_packed[i].count;
 176                 if (vq->last_used_idx >= vq->size) {
 177                         vq->used_wrap_counter ^= 1;
 178                         vq->last_used_idx -= vq->size;
 179                 }
 180         }
 181
 182         rte_smp_wmb();
 183         vq->shadow_used_idx = 0;
 184         vhost_log_cache_sync(dev, vq);
 185 }
 186
 187 static __rte_always_inline void
 188 update_shadow_used_ring_packed(struct vhost_virtqueue *vq,
 189                          uint16_t desc_idx, uint16_t len, uint16_t count)
 190 {
 191         uint16_t i = vq->shadow_used_idx++;
 192
 193         vq->shadow_used_packed[i].id  = desc_idx;
 194         vq->shadow_used_packed[i].len = len;
 195         vq->shadow_used_packed[i].count = count;
 196 }
 197
 198 static inline void
 199 do_data_copy_enqueue(struct virtio_net *dev, struct vhost_virtqueue *vq)
 200 {
 201         struct batch_copy_elem *elem = vq->batch_copy_elems;
 202         uint16_t count = vq->batch_copy_nb_elems;
 203         int i;
 204
 205         for (i = 0; i < count; i++) {
 206                 rte_memcpy(elem[i].dst, elem[i].src, elem[i].len);
 207                 vhost_log_cache_write(dev, vq, elem[i].log_addr, elem[i].len);
 208                 PRINT_PACKET(dev, (uintptr_t)elem[i].dst, elem[i].len, 0);
 209         }
 210
 211         vq->batch_copy_nb_elems = 0;
 212 }
 213
 214 static inline void
 215 do_data_copy_dequeue(struct vhost_virtqueue *vq)
 216 {
 217         struct batch_copy_elem *elem = vq->batch_copy_elems;
 218         uint16_t count = vq->batch_copy_nb_elems;
 219         int i;
 220
 221         for (i = 0; i < count; i++)
 222                 rte_memcpy(elem[i].dst, elem[i].src, elem[i].len);
 223
 224         vq->batch_copy_nb_elems = 0;
 225 }
 226
 227 /* avoid write operation when necessary, to lessen cache issues */
 228 #define ASSIGN_UNLESS_EQUAL(var, val) do {      \
 229         if ((var) != (val))                     \
 230                 (var) = (val);                  \
 231 } while (0)
 232
 233 static __rte_always_inline void
 234 virtio_enqueue_offload(struct rte_mbuf *m_buf, struct virtio_net_hdr *net_hdr)
 235 {
 236         uint64_t csum_l4 = m_buf->ol_flags & PKT_TX_L4_MASK;
 237
 238         if (m_buf->ol_flags & PKT_TX_TCP_SEG)
 239                 csum_l4 |= PKT_TX_TCP_CKSUM;
 240
 241         if (csum_l4) {
 242                 net_hdr->flags = VIRTIO_NET_HDR_F_NEEDS_CSUM;
 243                 net_hdr->csum_start = m_buf->l2_len + m_buf->l3_len;
 244
 245                 switch (csum_l4) {
 246                 case PKT_TX_TCP_CKSUM:
 247                         net_hdr->csum_offset = (offsetof(struct tcp_hdr,
 248                                                 cksum));
 249                         break;
 250                 case PKT_TX_UDP_CKSUM:
 251                         net_hdr->csum_offset = (offsetof(struct udp_hdr,
 252                                                 dgram_cksum));
 253                         break;
 254                 case PKT_TX_SCTP_CKSUM:
 255                         net_hdr->csum_offset = (offsetof(struct sctp_hdr,
 256                                                 cksum));
 257                         break;
 258                 }
 259         } else {
 260                 ASSIGN_UNLESS_EQUAL(net_hdr->csum_start, 0);
 261                 ASSIGN_UNLESS_EQUAL(net_hdr->csum_offset, 0);
 262                 ASSIGN_UNLESS_EQUAL(net_hdr->flags, 0);
 263         }
 264
 265         /* IP cksum verification cannot be bypassed, then calculate here */
 266         if (m_buf->ol_flags & PKT_TX_IP_CKSUM) {
 267                 struct ipv4_hdr *ipv4_hdr;
 268
 269                 ipv4_hdr = rte_pktmbuf_mtod_offset(m_buf, struct ipv4_hdr *,
 270                                                    m_buf->l2_len);
 271                 ipv4_hdr->hdr_checksum = rte_ipv4_cksum(ipv4_hdr);
 272         }
 273
 274         if (m_buf->ol_flags & PKT_TX_TCP_SEG) {
 275                 if (m_buf->ol_flags & PKT_TX_IPV4)
 276                         net_hdr->gso_type = VIRTIO_NET_HDR_GSO_TCPV4;
 277                 else
 278                         net_hdr->gso_type = VIRTIO_NET_HDR_GSO_TCPV6;
 279                 net_hdr->gso_size = m_buf->tso_segsz;
 280                 net_hdr->hdr_len = m_buf->l2_len + m_buf->l3_len
 281                                         + m_buf->l4_len;
 282         } else if (m_buf->ol_flags & PKT_TX_UDP_SEG) {
 283                 net_hdr->gso_type = VIRTIO_NET_HDR_GSO_UDP;
 284                 net_hdr->gso_size = m_buf->tso_segsz;
 285                 net_hdr->hdr_len = m_buf->l2_len + m_buf->l3_len +
 286                         m_buf->l4_len;
 287         } else {
 288                 ASSIGN_UNLESS_EQUAL(net_hdr->gso_type, 0);
 289                 ASSIGN_UNLESS_EQUAL(net_hdr->gso_size, 0);
 290                 ASSIGN_UNLESS_EQUAL(net_hdr->hdr_len, 0);
 291         }
 292 }
 293
 294 static __rte_always_inline int
 295 map_one_desc(struct virtio_net *dev, struct vhost_virtqueue *vq,
 296                 struct buf_vector *buf_vec, uint16_t *vec_idx,
 297                 uint64_t desc_iova, uint64_t desc_len, uint8_t perm)
 298 {
 299         uint16_t vec_id = *vec_idx;
 300
 301         while (desc_len) {
 302                 uint64_t desc_addr;
 303                 uint64_t desc_chunck_len = desc_len;
 304
 305                 if (unlikely(vec_id >= BUF_VECTOR_MAX))
 306                         return -1;
 307
 308                 desc_addr = vhost_iova_to_vva(dev, vq,
 309                                 desc_iova,
 310                                 &desc_chunck_len,
 311                                 perm);
 312                 if (unlikely(!desc_addr))
 313                         return -1;
 314
 315                 buf_vec[vec_id].buf_iova = desc_iova;
 316                 buf_vec[vec_id].buf_addr = desc_addr;
 317                 buf_vec[vec_id].buf_len  = desc_chunck_len;
 318
 319                 desc_len -= desc_chunck_len;
 320                 desc_iova += desc_chunck_len;
 321                 vec_id++;
 322         }
 323         *vec_idx = vec_id;
 324
 325         return 0;
 326 }
 327
 328 static __rte_always_inline int
 329 fill_vec_buf_split(struct virtio_net *dev, struct vhost_virtqueue *vq,
 330                          uint32_t avail_idx, uint16_t *vec_idx,
 331                          struct buf_vector *buf_vec, uint16_t *desc_chain_head,
 332                          uint16_t *desc_chain_len, uint8_t perm)
 333 {
 334         uint16_t idx = vq->avail->ring[avail_idx & (vq->size - 1)];
 335         uint16_t vec_id = *vec_idx;
 336         uint32_t len    = 0;
 337         uint64_t dlen;
 338         struct vring_desc *descs = vq->desc;
 339         struct vring_desc *idesc = NULL;
 340
 341         *desc_chain_head = idx;
 342
 343         if (vq->desc[idx].flags & VRING_DESC_F_INDIRECT) {
 344                 dlen = vq->desc[idx].len;
 345                 descs = (struct vring_desc *)(uintptr_t)
 346                         vhost_iova_to_vva(dev, vq, vq->desc[idx].addr,
 347                                                 &dlen,
 348                                                 VHOST_ACCESS_RO);
 349                 if (unlikely(!descs))
 350                         return -1;
 351
 352                 if (unlikely(dlen < vq->desc[idx].len)) {
 353                         /*
 354                          * The indirect desc table is not contiguous
 355                          * in process VA space, we have to copy it.
 356                          */
 357                         idesc = alloc_copy_ind_table(dev, vq,
 358                                         vq->desc[idx].addr, vq->desc[idx].len);
 359                         if (unlikely(!idesc))
 360                                 return -1;
 361
 362                         descs = idesc;
 363                 }
 364
 365                 idx = 0;
 366         }
 367
 368         while (1) {
 369                 if (unlikely(idx >= vq->size)) {
 370                         free_ind_table(idesc);
 371                         return -1;
 372                 }
 373
 374                 len += descs[idx].len;
 375
 376                 if (unlikely(map_one_desc(dev, vq, buf_vec, &vec_id,
 377                                                 descs[idx].addr, descs[idx].len,
 378                                                 perm))) {
 379                         free_ind_table(idesc);
 380                         return -1;
 381                 }
 382
 383                 if ((descs[idx].flags & VRING_DESC_F_NEXT) == 0)
 384                         break;
 385
 386                 idx = descs[idx].next;
 387         }
 388
 389         *desc_chain_len = len;
 390         *vec_idx = vec_id;
 391
 392         if (unlikely(!!idesc))
 393                 free_ind_table(idesc);
 394
 395         return 0;
 396 }
 397
 398 /*
 399  * Returns -1 on fail, 0 on success
 400  */
 401 static inline int
 402 reserve_avail_buf_split(struct virtio_net *dev, struct vhost_virtqueue *vq,
 403                                 uint32_t size, struct buf_vector *buf_vec,
 404                                 uint16_t *num_buffers, uint16_t avail_head,
 405                                 uint16_t *nr_vec)
 406 {
 407         uint16_t cur_idx;
 408         uint16_t vec_idx = 0;
 409         uint16_t max_tries, tries = 0;
 410
 411         uint16_t head_idx = 0;
 412         uint16_t len = 0;
 413
 414         *num_buffers = 0;
 415         cur_idx  = vq->last_avail_idx;
 416
 417         if (rxvq_is_mergeable(dev))
 418                 max_tries = vq->size;
 419         else
 420                 max_tries = 1;
 421
 422         while (size > 0) {
 423                 if (unlikely(cur_idx == avail_head))
 424                         return -1;
 425
 426                 if (unlikely(fill_vec_buf_split(dev, vq, cur_idx,
 427                                                 &vec_idx, buf_vec,
 428                                                 &head_idx, &len,
 429                                                 VHOST_ACCESS_RW) < 0))
 430                         return -1;
 431                 len = RTE_MIN(len, size);
 432                 update_shadow_used_ring_split(vq, head_idx, len);
 433                 size -= len;
 434
 435                 cur_idx++;
 436                 tries++;
 437                 *num_buffers += 1;
 438
 439                 /*
 440                  * if we tried all available ring items, and still
 441                  * can't get enough buf, it means something abnormal
 442                  * happened.
 443                  */
 444                 if (unlikely(tries > max_tries))
 445                         return -1;
 446         }
 447
 448         *nr_vec = vec_idx;
 449
 450         return 0;
 451 }
 452
 453 static __rte_always_inline int
 454 fill_vec_buf_packed_indirect(struct virtio_net *dev,
 455                         struct vhost_virtqueue *vq,
 456                         struct vring_packed_desc *desc, uint16_t *vec_idx,
 457                         struct buf_vector *buf_vec, uint16_t *len, uint8_t perm)
 458 {
 459         uint16_t i;
 460         uint32_t nr_descs;
 461         uint16_t vec_id = *vec_idx;
 462         uint64_t dlen;
 463         struct vring_packed_desc *descs, *idescs = NULL;
 464
 465         dlen = desc->len;
 466         descs = (struct vring_packed_desc *)(uintptr_t)
 467                 vhost_iova_to_vva(dev, vq, desc->addr, &dlen, VHOST_ACCESS_RO);
 468         if (unlikely(!descs))
 469                 return -1;
 470
 471         if (unlikely(dlen < desc->len)) {
 472                 /*
 473                  * The indirect desc table is not contiguous
 474                  * in process VA space, we have to copy it.
 475                  */
 476                 idescs = alloc_copy_ind_table(dev, vq, desc->addr, desc->len);
 477                 if (unlikely(!idescs))
 478                         return -1;
 479
 480                 descs = idescs;
 481         }
 482
 483         nr_descs =  desc->len / sizeof(struct vring_packed_desc);
 484         if (unlikely(nr_descs >= vq->size)) {
 485                 free_ind_table(idescs);
 486                 return -1;
 487         }
 488
 489         for (i = 0; i < nr_descs; i++) {
 490                 if (unlikely(vec_id >= BUF_VECTOR_MAX)) {
 491                         free_ind_table(idescs);
 492                         return -1;
 493                 }
 494
 495                 *len += descs[i].len;
 496                 if (unlikely(map_one_desc(dev, vq, buf_vec, &vec_id,
 497                                                 descs[i].addr, descs[i].len,
 498                                                 perm)))
 499                         return -1;
 500         }
 501         *vec_idx = vec_id;
 502
 503         if (unlikely(!!idescs))
 504                 free_ind_table(idescs);
 505
 506         return 0;
 507 }
 508
 509 static __rte_always_inline int
 510 fill_vec_buf_packed(struct virtio_net *dev, struct vhost_virtqueue *vq,
 511                                 uint16_t avail_idx, uint16_t *desc_count,
 512                                 struct buf_vector *buf_vec, uint16_t *vec_idx,
 513                                 uint16_t *buf_id, uint16_t *len, uint8_t perm)
 514 {
 515         bool wrap_counter = vq->avail_wrap_counter;
 516         struct vring_packed_desc *descs = vq->desc_packed;
 517         uint16_t vec_id = *vec_idx;
 518
 519         if (avail_idx < vq->last_avail_idx)
 520                 wrap_counter ^= 1;
 521
 522         if (unlikely(!desc_is_avail(&descs[avail_idx], wrap_counter)))
 523                 return -1;
 524
 525         *desc_count = 0;
 526
 527         while (1) {
 528                 if (unlikely(vec_id >= BUF_VECTOR_MAX))
 529                         return -1;
 530
 531                 *desc_count += 1;
 532                 *buf_id = descs[avail_idx].id;
 533
 534                 if (descs[avail_idx].flags & VRING_DESC_F_INDIRECT) {
 535                         if (unlikely(fill_vec_buf_packed_indirect(dev, vq,
 536                                                         &descs[avail_idx],
 537                                                         &vec_id, buf_vec,
 538                                                         len, perm) < 0))
 539                                 return -1;
 540                 } else {
 541                         *len += descs[avail_idx].len;
 542
 543                         if (unlikely(map_one_desc(dev, vq, buf_vec, &vec_id,
 544                                                         descs[avail_idx].addr,
 545                                                         descs[avail_idx].len,
 546                                                         perm)))
 547                                 return -1;
 548                 }
 549
 550                 if ((descs[avail_idx].flags & VRING_DESC_F_NEXT) == 0)
 551                         break;
 552
 553                 if (++avail_idx >= vq->size) {
 554                         avail_idx -= vq->size;
 555                         wrap_counter ^= 1;
 556                 }
 557         }
 558
 559         *vec_idx = vec_id;
 560
 561         return 0;
 562 }
 563
 564 /*
 565  * Returns -1 on fail, 0 on success
 566  */
 567 static inline int
 568 reserve_avail_buf_packed(struct virtio_net *dev, struct vhost_virtqueue *vq,
 569                                 uint32_t size, struct buf_vector *buf_vec,
 570                                 uint16_t *nr_vec, uint16_t *num_buffers,
 571                                 uint16_t *nr_descs)
 572 {
 573         uint16_t avail_idx;
 574         uint16_t vec_idx = 0;
 575         uint16_t max_tries, tries = 0;
 576
 577         uint16_t buf_id = 0;
 578         uint16_t len = 0;
 579         uint16_t desc_count;
 580
 581         *num_buffers = 0;
 582         avail_idx = vq->last_avail_idx;
 583
 584         if (rxvq_is_mergeable(dev))
 585                 max_tries = vq->size;
 586         else
 587                 max_tries = 1;
 588
 589         while (size > 0) {
 590                 if (unlikely(fill_vec_buf_packed(dev, vq,
 591                                                 avail_idx, &desc_count,
 592                                                 buf_vec, &vec_idx,
 593                                                 &buf_id, &len,
 594                                                 VHOST_ACCESS_RO) < 0))
 595                         return -1;
 596
 597                 len = RTE_MIN(len, size);
 598                 update_shadow_used_ring_packed(vq, buf_id, len, desc_count);
 599                 size -= len;
 600
 601                 avail_idx += desc_count;
 602                 if (avail_idx >= vq->size)
 603                         avail_idx -= vq->size;
 604
 605                 *nr_descs += desc_count;
 606                 tries++;
 607                 *num_buffers += 1;
 608
 609                 /*
 610                  * if we tried all available ring items, and still
 611                  * can't get enough buf, it means something abnormal
 612                  * happened.
 613                  */
 614                 if (unlikely(tries > max_tries))
 615                         return -1;
 616         }
 617
 618         *nr_vec = vec_idx;
 619
 620         return 0;
 621 }
 622
 623 static __rte_always_inline int
 624 copy_mbuf_to_desc(struct virtio_net *dev, struct vhost_virtqueue *vq,
 625                             struct rte_mbuf *m, struct buf_vector *buf_vec,
 626                             uint16_t nr_vec, uint16_t num_buffers)
 627 {
 628         uint32_t vec_idx = 0;
 629         uint32_t mbuf_offset, mbuf_avail;
 630         uint32_t buf_offset, buf_avail;
 631         uint64_t buf_addr, buf_iova, buf_len;
 632         uint32_t cpy_len;
 633         uint64_t hdr_addr;
 634         struct rte_mbuf *hdr_mbuf;
 635         struct batch_copy_elem *batch_copy = vq->batch_copy_elems;
 636         struct virtio_net_hdr_mrg_rxbuf tmp_hdr, *hdr = NULL;
 637         int error = 0;
 638
 639         if (unlikely(m == NULL)) {
 640                 error = -1;
 641                 goto out;
 642         }
 643
 644         buf_addr = buf_vec[vec_idx].buf_addr;
 645         buf_iova = buf_vec[vec_idx].buf_iova;
 646         buf_len = buf_vec[vec_idx].buf_len;
 647
 648         if (nr_vec > 1)
 649                 rte_prefetch0((void *)(uintptr_t)buf_vec[1].buf_addr);
 650
 651         if (unlikely(buf_len < dev->vhost_hlen && nr_vec <= 1)) {
 652                 error = -1;
 653                 goto out;
 654         }
 655
 656         hdr_mbuf = m;
 657         hdr_addr = buf_addr;
 658         if (unlikely(buf_len < dev->vhost_hlen))
 659                 hdr = &tmp_hdr;
 660         else
 661                 hdr = (struct virtio_net_hdr_mrg_rxbuf *)(uintptr_t)hdr_addr;
 662
 663         VHOST_LOG_DEBUG(VHOST_DATA, "(%d) RX: num merge buffers %d\n",
 664                 dev->vid, num_buffers);
 665
 666         if (unlikely(buf_len < dev->vhost_hlen)) {
 667                 buf_offset = dev->vhost_hlen - buf_len;
 668                 vec_idx++;
 669                 buf_addr = buf_vec[vec_idx].buf_addr;
 670                 buf_iova = buf_vec[vec_idx].buf_iova;
 671                 buf_len = buf_vec[vec_idx].buf_len;
 672                 buf_avail = buf_len - buf_offset;
 673         } else {
 674                 buf_offset = dev->vhost_hlen;
 675                 buf_avail = buf_len - dev->vhost_hlen;
 676         }
 677
 678         mbuf_avail  = rte_pktmbuf_data_len(m);
 679         mbuf_offset = 0;
 680         while (mbuf_avail != 0 || m->next != NULL) {
 681                 /* done with current buf, get the next one */
 682                 if (buf_avail == 0) {
 683                         vec_idx++;
 684                         if (unlikely(vec_idx >= nr_vec)) {
 685                                 error = -1;
 686                                 goto out;
 687                         }
 688
 689                         buf_addr = buf_vec[vec_idx].buf_addr;
 690                         buf_iova = buf_vec[vec_idx].buf_iova;
 691                         buf_len = buf_vec[vec_idx].buf_len;
 692
 693                         /* Prefetch next buffer address. */
 694                         if (vec_idx + 1 < nr_vec)
 695                                 rte_prefetch0((void *)(uintptr_t)
 696                                                 buf_vec[vec_idx + 1].buf_addr);
 697                         buf_offset = 0;
 698                         buf_avail  = buf_len;
 699                 }
 700
 701                 /* done with current mbuf, get the next one */
 702                 if (mbuf_avail == 0) {
 703                         m = m->next;
 704
 705                         mbuf_offset = 0;
 706                         mbuf_avail  = rte_pktmbuf_data_len(m);
 707                 }
 708
 709                 if (hdr_addr) {
 710                         virtio_enqueue_offload(hdr_mbuf, &hdr->hdr);
 711                         if (rxvq_is_mergeable(dev))
 712                                 ASSIGN_UNLESS_EQUAL(hdr->num_buffers,
 713                                                 num_buffers);
 714
 715                         if (unlikely(hdr == &tmp_hdr)) {
 716                                 uint64_t len;
 717                                 uint64_t remain = dev->vhost_hlen;
 718                                 uint64_t src = (uint64_t)(uintptr_t)hdr, dst;
 719                                 uint64_t iova = buf_vec[0].buf_iova;
 720                                 uint16_t hdr_vec_idx = 0;
 721
 722                                 while (remain) {
 723                                         len = remain;
 724                                         dst = buf_vec[hdr_vec_idx].buf_addr;
 725                                         rte_memcpy((void *)(uintptr_t)dst,
 726                                                         (void *)(uintptr_t)src,
 727                                                         len);
 728
 729                                         PRINT_PACKET(dev, (uintptr_t)dst,
 730                                                         (uint32_t)len, 0);
 731                                         vhost_log_cache_write(dev, vq,
 732                                                         iova, len);
 733
 734                                         remain -= len;
 735                                         iova += len;
 736                                         src += len;
 737                                         hdr_vec_idx++;
 738                                 }
 739                         } else {
 740                                 PRINT_PACKET(dev, (uintptr_t)hdr_addr,
 741                                                 dev->vhost_hlen, 0);
 742                                 vhost_log_cache_write(dev, vq,
 743                                                 buf_vec[0].buf_iova,
 744                                                 dev->vhost_hlen);
 745                         }
 746
 747                         hdr_addr = 0;
 748                 }
 749
 750                 cpy_len = RTE_MIN(buf_len, mbuf_avail);
 751
 752                 if (likely(cpy_len > MAX_BATCH_LEN ||
 753                                         vq->batch_copy_nb_elems >= vq->size)) {
 754                         rte_memcpy((void *)((uintptr_t)(buf_addr + buf_offset)),
 755                                 rte_pktmbuf_mtod_offset(m, void *, mbuf_offset),
 756                                 cpy_len);
 757                         vhost_log_cache_write(dev, vq, buf_iova + buf_offset,
 758                                         cpy_len);
 759                         PRINT_PACKET(dev, (uintptr_t)(buf_addr + buf_offset),
 760                                 cpy_len, 0);
 761                 } else {
 762                         batch_copy[vq->batch_copy_nb_elems].dst =
 763                                 (void *)((uintptr_t)(buf_addr + buf_offset));
 764                         batch_copy[vq->batch_copy_nb_elems].src =
 765                                 rte_pktmbuf_mtod_offset(m, void *, mbuf_offset);
 766                         batch_copy[vq->batch_copy_nb_elems].log_addr =
 767                                 buf_iova + buf_offset;
 768                         batch_copy[vq->batch_copy_nb_elems].len = cpy_len;
 769                         vq->batch_copy_nb_elems++;
 770                 }
 771
 772                 mbuf_avail  -= cpy_len;
 773                 mbuf_offset += cpy_len;
 774                 buf_avail  -= cpy_len;
 775                 buf_offset += cpy_len;
 776         }
 777
 778 out:
 779
 780         return error;
 781 }
 782
 783 static __rte_always_inline uint32_t
 784 virtio_dev_rx_split(struct virtio_net *dev, struct vhost_virtqueue *vq,
 785         struct rte_mbuf **pkts, uint32_t count)
 786 {
 787         uint32_t pkt_idx = 0;
 788         uint16_t num_buffers;
 789         struct buf_vector buf_vec[BUF_VECTOR_MAX];
 790         uint16_t avail_head;
 791
 792         rte_prefetch0(&vq->avail->ring[vq->last_avail_idx & (vq->size - 1)]);
 793         avail_head = *((volatile uint16_t *)&vq->avail->idx);
 794
 795         for (pkt_idx = 0; pkt_idx < count; pkt_idx++) {
 796                 uint32_t pkt_len = pkts[pkt_idx]->pkt_len + dev->vhost_hlen;
 797                 uint16_t nr_vec = 0;
 798
 799                 if (unlikely(reserve_avail_buf_split(dev, vq,
 800                                                 pkt_len, buf_vec, &num_buffers,
 801                                                 avail_head, &nr_vec) < 0)) {
 802                         VHOST_LOG_DEBUG(VHOST_DATA,
 803                                 "(%d) failed to get enough desc from vring\n",
 804                                 dev->vid);
 805                         vq->shadow_used_idx -= num_buffers;
 806                         break;
 807                 }
 808
 809                 rte_prefetch0((void *)(uintptr_t)buf_vec[0].buf_addr);
 810
 811                 VHOST_LOG_DEBUG(VHOST_DATA, "(%d) current index %d | end index %d\n",
 812                         dev->vid, vq->last_avail_idx,
 813                         vq->last_avail_idx + num_buffers);
 814
 815                 if (copy_mbuf_to_desc(dev, vq, pkts[pkt_idx],
 816                                                 buf_vec, nr_vec,
 817                                                 num_buffers) < 0) {
 818                         vq->shadow_used_idx -= num_buffers;
 819                         break;
 820                 }
 821
 822                 vq->last_avail_idx += num_buffers;
 823         }
 824
 825         do_data_copy_enqueue(dev, vq);
 826
 827         if (likely(vq->shadow_used_idx)) {
 828                 flush_shadow_used_ring_split(dev, vq);
 829                 vhost_vring_call_split(dev, vq);
 830         }
 831
 832         return pkt_idx;
 833 }
 834
 835 static __rte_always_inline uint32_t
 836 virtio_dev_rx_packed(struct virtio_net *dev, struct vhost_virtqueue *vq,
 837         struct rte_mbuf **pkts, uint32_t count)
 838 {
 839         uint32_t pkt_idx = 0;
 840         uint16_t num_buffers;
 841         struct buf_vector buf_vec[BUF_VECTOR_MAX];
 842
 843         for (pkt_idx = 0; pkt_idx < count; pkt_idx++) {
 844                 uint32_t pkt_len = pkts[pkt_idx]->pkt_len + dev->vhost_hlen;
 845                 uint16_t nr_vec = 0;
 846                 uint16_t nr_descs = 0;
 847
 848                 if (unlikely(reserve_avail_buf_packed(dev, vq,
 849                                                 pkt_len, buf_vec, &nr_vec,
 850                                                 &num_buffers, &nr_descs) < 0)) {
 851                         VHOST_LOG_DEBUG(VHOST_DATA,
 852                                 "(%d) failed to get enough desc from vring\n",
 853                                 dev->vid);
 854                         vq->shadow_used_idx -= num_buffers;
 855                         break;
 856                 }
 857
 858                 rte_prefetch0((void *)(uintptr_t)buf_vec[0].buf_addr);
 859
 860                 VHOST_LOG_DEBUG(VHOST_DATA, "(%d) current index %d | end index %d\n",
 861                         dev->vid, vq->last_avail_idx,
 862                         vq->last_avail_idx + num_buffers);
 863
 864                 if (copy_mbuf_to_desc(dev, vq, pkts[pkt_idx],
 865                                                 buf_vec, nr_vec,
 866                                                 num_buffers) < 0) {
 867                         vq->shadow_used_idx -= num_buffers;
 868                         break;
 869                 }
 870
 871                 vq->last_avail_idx += nr_descs;
 872                 if (vq->last_avail_idx >= vq->size) {
 873                         vq->last_avail_idx -= vq->size;
 874                         vq->avail_wrap_counter ^= 1;
 875                 }
 876         }
 877
 878         do_data_copy_enqueue(dev, vq);
 879
 880         if (likely(vq->shadow_used_idx)) {
 881                 flush_shadow_used_ring_packed(dev, vq);
 882                 vhost_vring_call_packed(dev, vq);
 883         }
 884
 885         return pkt_idx;
 886 }
 887
 888 static __rte_always_inline uint32_t
 889 virtio_dev_rx(struct virtio_net *dev, uint16_t queue_id,
 890         struct rte_mbuf **pkts, uint32_t count)
 891 {
 892         struct vhost_virtqueue *vq;
 893
 894         VHOST_LOG_DEBUG(VHOST_DATA, "(%d) %s\n", dev->vid, __func__);
 895         if (unlikely(!is_valid_virt_queue_idx(queue_id, 0, dev->nr_vring))) {
 896                 RTE_LOG(ERR, VHOST_DATA, "(%d) %s: invalid virtqueue idx %d.\n",
 897                         dev->vid, __func__, queue_id);
 898                 return 0;
 899         }
 900
 901         vq = dev->virtqueue[queue_id];
 902
 903         rte_spinlock_lock(&vq->access_lock);
 904
 905         if (unlikely(vq->enabled == 0))
 906                 goto out_access_unlock;
 907
 908         if (dev->features & (1ULL << VIRTIO_F_IOMMU_PLATFORM))
 909                 vhost_user_iotlb_rd_lock(vq);
 910
 911         if (unlikely(vq->access_ok == 0))
 912                 if (unlikely(vring_translate(dev, vq) < 0))
 913                         goto out;
 914
 915         count = RTE_MIN((uint32_t)MAX_PKT_BURST, count);
 916         if (count == 0)
 917                 goto out;
 918
 919         if (vq_is_packed(dev))
 920                 count = virtio_dev_rx_packed(dev, vq, pkts, count);
 921         else
 922                 count = virtio_dev_rx_split(dev, vq, pkts, count);
 923
 924 out:
 925         if (dev->features & (1ULL << VIRTIO_F_IOMMU_PLATFORM))
 926                 vhost_user_iotlb_rd_unlock(vq);
 927
 928 out_access_unlock:
 929         rte_spinlock_unlock(&vq->access_lock);
 930
 931         return count;
 932 }
 933
 934 uint16_t
 935 rte_vhost_enqueue_burst(int vid, uint16_t queue_id,
 936         struct rte_mbuf **pkts, uint16_t count)
 937 {
 938         struct virtio_net *dev = get_device(vid);
 939
 940         if (!dev)
 941                 return 0;
 942
 943         if (unlikely(!(dev->flags & VIRTIO_DEV_BUILTIN_VIRTIO_NET))) {
 944                 RTE_LOG(ERR, VHOST_DATA,
 945                         "(%d) %s: built-in vhost net backend is disabled.\n",
 946                         dev->vid, __func__);
 947                 return 0;
 948         }
 949
 950         return virtio_dev_rx(dev, queue_id, pkts, count);
 951 }
 952
 953 static inline bool
 954 virtio_net_with_host_offload(struct virtio_net *dev)
 955 {
 956         if (dev->features &
 957                         ((1ULL << VIRTIO_NET_F_CSUM) |
 958                          (1ULL << VIRTIO_NET_F_HOST_ECN) |
 959                          (1ULL << VIRTIO_NET_F_HOST_TSO4) |
 960                          (1ULL << VIRTIO_NET_F_HOST_TSO6) |
 961                          (1ULL << VIRTIO_NET_F_HOST_UFO)))
 962                 return true;
 963
 964         return false;
 965 }
 966
 967 static void
 968 parse_ethernet(struct rte_mbuf *m, uint16_t *l4_proto, void **l4_hdr)
 969 {
 970         struct ipv4_hdr *ipv4_hdr;
 971         struct ipv6_hdr *ipv6_hdr;
 972         void *l3_hdr = NULL;
 973         struct ether_hdr *eth_hdr;
 974         uint16_t ethertype;
 975
 976         eth_hdr = rte_pktmbuf_mtod(m, struct ether_hdr *);
 977
 978         m->l2_len = sizeof(struct ether_hdr);
 979         ethertype = rte_be_to_cpu_16(eth_hdr->ether_type);
 980
 981         if (ethertype == ETHER_TYPE_VLAN) {
 982                 struct vlan_hdr *vlan_hdr = (struct vlan_hdr *)(eth_hdr + 1);
 983
 984                 m->l2_len += sizeof(struct vlan_hdr);
 985                 ethertype = rte_be_to_cpu_16(vlan_hdr->eth_proto);
 986         }
 987
 988         l3_hdr = (char *)eth_hdr + m->l2_len;
 989
 990         switch (ethertype) {
 991         case ETHER_TYPE_IPv4:
 992                 ipv4_hdr = l3_hdr;
 993                 *l4_proto = ipv4_hdr->next_proto_id;
 994                 m->l3_len = (ipv4_hdr->version_ihl & 0x0f) * 4;
 995                 *l4_hdr = (char *)l3_hdr + m->l3_len;
 996                 m->ol_flags |= PKT_TX_IPV4;
 997                 break;
 998         case ETHER_TYPE_IPv6:
 999                 ipv6_hdr = l3_hdr;
1000                 *l4_proto = ipv6_hdr->proto;
1001                 m->l3_len = sizeof(struct ipv6_hdr);
1002                 *l4_hdr = (char *)l3_hdr + m->l3_len;
1003                 m->ol_flags |= PKT_TX_IPV6;
1004                 break;
1005         default:
1006                 m->l3_len = 0;
1007                 *l4_proto = 0;
1008                 *l4_hdr = NULL;
1009                 break;
1010         }
1011 }
1012
1013 static __rte_always_inline void
1014 vhost_dequeue_offload(struct virtio_net_hdr *hdr, struct rte_mbuf *m)
1015 {
1016         uint16_t l4_proto = 0;
1017         void *l4_hdr = NULL;
1018         struct tcp_hdr *tcp_hdr = NULL;
1019
1020         if (hdr->flags == 0 && hdr->gso_type == VIRTIO_NET_HDR_GSO_NONE)
1021                 return;
1022
1023         parse_ethernet(m, &l4_proto, &l4_hdr);
1024         if (hdr->flags == VIRTIO_NET_HDR_F_NEEDS_CSUM) {
1025                 if (hdr->csum_start == (m->l2_len + m->l3_len)) {
1026                         switch (hdr->csum_offset) {
1027                         case (offsetof(struct tcp_hdr, cksum)):
1028                                 if (l4_proto == IPPROTO_TCP)
1029                                         m->ol_flags |= PKT_TX_TCP_CKSUM;
1030                                 break;
1031                         case (offsetof(struct udp_hdr, dgram_cksum)):
1032                                 if (l4_proto == IPPROTO_UDP)
1033                                         m->ol_flags |= PKT_TX_UDP_CKSUM;
1034                                 break;
1035                         case (offsetof(struct sctp_hdr, cksum)):
1036                                 if (l4_proto == IPPROTO_SCTP)
1037                                         m->ol_flags |= PKT_TX_SCTP_CKSUM;
1038                                 break;
1039                         default:
1040                                 break;
1041                         }
1042                 }
1043         }
1044
1045         if (l4_hdr && hdr->gso_type != VIRTIO_NET_HDR_GSO_NONE) {
1046                 switch (hdr->gso_type & ~VIRTIO_NET_HDR_GSO_ECN) {
1047                 case VIRTIO_NET_HDR_GSO_TCPV4:
1048                 case VIRTIO_NET_HDR_GSO_TCPV6:
1049                         tcp_hdr = l4_hdr;
1050                         m->ol_flags |= PKT_TX_TCP_SEG;
1051                         m->tso_segsz = hdr->gso_size;
1052                         m->l4_len = (tcp_hdr->data_off & 0xf0) >> 2;
1053                         break;
1054                 case VIRTIO_NET_HDR_GSO_UDP:
1055                         m->ol_flags |= PKT_TX_UDP_SEG;
1056                         m->tso_segsz = hdr->gso_size;
1057                         m->l4_len = sizeof(struct udp_hdr);
1058                         break;
1059                 default:
1060                         RTE_LOG(WARNING, VHOST_DATA,
1061                                 "unsupported gso type %u.\n", hdr->gso_type);
1062                         break;
1063                 }
1064         }
1065 }
1066
1067 static __rte_always_inline void
1068 put_zmbuf(struct zcopy_mbuf *zmbuf)
1069 {
1070         zmbuf->in_use = 0;
1071 }
1072
1073 static __rte_always_inline int
1074 copy_desc_to_mbuf(struct virtio_net *dev, struct vhost_virtqueue *vq,
1075                   struct buf_vector *buf_vec, uint16_t nr_vec,
1076                   struct rte_mbuf *m, struct rte_mempool *mbuf_pool)
1077 {
1078         uint32_t buf_avail, buf_offset;
1079         uint64_t buf_addr, buf_iova, buf_len;
1080         uint32_t mbuf_avail, mbuf_offset;
1081         uint32_t cpy_len;
1082         struct rte_mbuf *cur = m, *prev = m;
1083         struct virtio_net_hdr tmp_hdr;
1084         struct virtio_net_hdr *hdr = NULL;
1085         /* A counter to avoid desc dead loop chain */
1086         uint16_t vec_idx = 0;
1087         struct batch_copy_elem *batch_copy = vq->batch_copy_elems;
1088         int error = 0;
1089
1090         buf_addr = buf_vec[vec_idx].buf_addr;
1091         buf_iova = buf_vec[vec_idx].buf_iova;
1092         buf_len = buf_vec[vec_idx].buf_len;
1093
1094         if (unlikely(buf_len < dev->vhost_hlen && nr_vec <= 1)) {
1095                 error = -1;
1096                 goto out;
1097         }
1098
1099         if (likely(nr_vec > 1))
1100                 rte_prefetch0((void *)(uintptr_t)buf_vec[1].buf_addr);
1101
1102         if (virtio_net_with_host_offload(dev)) {
1103                 if (unlikely(buf_len < sizeof(struct virtio_net_hdr))) {
1104                         uint64_t len;
1105                         uint64_t remain = sizeof(struct virtio_net_hdr);
1106                         uint64_t src;
1107                         uint64_t dst = (uint64_t)(uintptr_t)&tmp_hdr;
1108                         uint16_t hdr_vec_idx = 0;
1109
1110                         /*
1111                          * No luck, the virtio-net header doesn't fit
1112                          * in a contiguous virtual area.
1113                          */
1114                         while (remain) {
1115                                 len = remain;
1116                                 src = buf_vec[hdr_vec_idx].buf_addr;
1117                                 rte_memcpy((void *)(uintptr_t)dst,
1118                                                    (void *)(uintptr_t)src, len);
1119
1120                                 remain -= len;
1121                                 dst += len;
1122                                 hdr_vec_idx++;
1123                         }
1124
1125                         hdr = &tmp_hdr;
1126                 } else {
1127                         hdr = (struct virtio_net_hdr *)((uintptr_t)buf_addr);
1128                         rte_prefetch0(hdr);
1129                 }
1130         }
1131
1132         /*
1133          * A virtio driver normally uses at least 2 desc buffers
1134          * for Tx: the first for storing the header, and others
1135          * for storing the data.
1136          */
1137         if (unlikely(buf_len < dev->vhost_hlen)) {
1138                 buf_offset = dev->vhost_hlen - buf_len;
1139                 vec_idx++;
1140                 buf_addr = buf_vec[vec_idx].buf_addr;
1141                 buf_iova = buf_vec[vec_idx].buf_iova;
1142                 buf_len = buf_vec[vec_idx].buf_len;
1143                 buf_avail  = buf_len - buf_offset;
1144         } else if (buf_len == dev->vhost_hlen) {
1145                 if (unlikely(++vec_idx >= nr_vec))
1146                         goto out;
1147                 buf_addr = buf_vec[vec_idx].buf_addr;
1148                 buf_iova = buf_vec[vec_idx].buf_iova;
1149                 buf_len = buf_vec[vec_idx].buf_len;
1150
1151                 buf_offset = 0;
1152                 buf_avail = buf_len;
1153         } else {
1154                 buf_offset = dev->vhost_hlen;
1155                 buf_avail = buf_vec[vec_idx].buf_len - dev->vhost_hlen;
1156         }
1157
1158         rte_prefetch0((void *)(uintptr_t)
1159                         (buf_addr + buf_offset));
1160
1161         PRINT_PACKET(dev,
1162                         (uintptr_t)(buf_addr + buf_offset),
1163                         (uint32_t)buf_avail, 0);
1164
1165         mbuf_offset = 0;
1166         mbuf_avail  = m->buf_len - RTE_PKTMBUF_HEADROOM;
1167         while (1) {
1168                 uint64_t hpa;
1169
1170                 cpy_len = RTE_MIN(buf_avail, mbuf_avail);
1171
1172                 /*
1173                  * A desc buf might across two host physical pages that are
1174                  * not continuous. In such case (gpa_to_hpa returns 0), data
1175                  * will be copied even though zero copy is enabled.
1176                  */
1177                 if (unlikely(dev->dequeue_zero_copy && (hpa = gpa_to_hpa(dev,
1178                                         buf_iova + buf_offset, cpy_len)))) {
1179                         cur->data_len = cpy_len;
1180                         cur->data_off = 0;
1181                         cur->buf_addr =
1182                                 (void *)(uintptr_t)(buf_addr + buf_offset);
1183                         cur->buf_iova = hpa;
1184
1185                         /*
1186                          * In zero copy mode, one mbuf can only reference data
1187                          * for one or partial of one desc buff.
1188                          */
1189                         mbuf_avail = cpy_len;
1190                 } else {
1191                         if (likely(cpy_len > MAX_BATCH_LEN ||
1192                                    vq->batch_copy_nb_elems >= vq->size ||
1193                                    (hdr && cur == m))) {
1194                                 rte_memcpy(rte_pktmbuf_mtod_offset(cur, void *,
1195                                                                    mbuf_offset),
1196                                            (void *)((uintptr_t)(buf_addr +
1197                                                            buf_offset)),
1198                                            cpy_len);
1199                         } else {
1200                                 batch_copy[vq->batch_copy_nb_elems].dst =
1201                                         rte_pktmbuf_mtod_offset(cur, void *,
1202                                                                 mbuf_offset);
1203                                 batch_copy[vq->batch_copy_nb_elems].src =
1204                                         (void *)((uintptr_t)(buf_addr +
1205                                                                 buf_offset));
1206                                 batch_copy[vq->batch_copy_nb_elems].len =
1207                                         cpy_len;
1208                                 vq->batch_copy_nb_elems++;
1209                         }
1210                 }
1211
1212                 mbuf_avail  -= cpy_len;
1213                 mbuf_offset += cpy_len;
1214                 buf_avail -= cpy_len;
1215                 buf_offset += cpy_len;
1216
1217                 /* This buf reaches to its end, get the next one */
1218                 if (buf_avail == 0) {
1219                         if (++vec_idx >= nr_vec)
1220                                 break;
1221
1222                         buf_addr = buf_vec[vec_idx].buf_addr;
1223                         buf_iova = buf_vec[vec_idx].buf_iova;
1224                         buf_len = buf_vec[vec_idx].buf_len;
1225
1226                         /*
1227                          * Prefecth desc n + 1 buffer while
1228                          * desc n buffer is processed.
1229                          */
1230                         if (vec_idx + 1 < nr_vec)
1231                                 rte_prefetch0((void *)(uintptr_t)
1232                                                 buf_vec[vec_idx + 1].buf_addr);
1233
1234                         buf_offset = 0;
1235                         buf_avail  = buf_len;
1236
1237                         PRINT_PACKET(dev, (uintptr_t)buf_addr,
1238                                         (uint32_t)buf_avail, 0);
1239                 }
1240
1241                 /*
1242                  * This mbuf reaches to its end, get a new one
1243                  * to hold more data.
1244                  */
1245                 if (mbuf_avail == 0) {
1246                         cur = rte_pktmbuf_alloc(mbuf_pool);
1247                         if (unlikely(cur == NULL)) {
1248                                 RTE_LOG(ERR, VHOST_DATA, "Failed to "
1249                                         "allocate memory for mbuf.\n");
1250                                 error = -1;
1251                                 goto out;
1252                         }
1253                         if (unlikely(dev->dequeue_zero_copy))
1254                                 rte_mbuf_refcnt_update(cur, 1);
1255
1256                         prev->next = cur;
1257                         prev->data_len = mbuf_offset;
1258                         m->nb_segs += 1;
1259                         m->pkt_len += mbuf_offset;
1260                         prev = cur;
1261
1262                         mbuf_offset = 0;
1263                         mbuf_avail  = cur->buf_len - RTE_PKTMBUF_HEADROOM;
1264                 }
1265         }
1266
1267         prev->data_len = mbuf_offset;
1268         m->pkt_len    += mbuf_offset;
1269
1270         if (hdr)
1271                 vhost_dequeue_offload(hdr, m);
1272
1273 out:
1274
1275         return error;
1276 }
1277
1278 static __rte_always_inline struct zcopy_mbuf *
1279 get_zmbuf(struct vhost_virtqueue *vq)
1280 {
1281         uint16_t i;
1282         uint16_t last;
1283         int tries = 0;
1284
1285         /* search [last_zmbuf_idx, zmbuf_size) */
1286         i = vq->last_zmbuf_idx;
1287         last = vq->zmbuf_size;
1288
1289 again:
1290         for (; i < last; i++) {
1291                 if (vq->zmbufs[i].in_use == 0) {
1292                         vq->last_zmbuf_idx = i + 1;
1293                         vq->zmbufs[i].in_use = 1;
1294                         return &vq->zmbufs[i];
1295                 }
1296         }
1297
1298         tries++;
1299         if (tries == 1) {
1300                 /* search [0, last_zmbuf_idx) */
1301                 i = 0;
1302                 last = vq->last_zmbuf_idx;
1303                 goto again;
1304         }
1305
1306         return NULL;
1307 }
1308
1309 static __rte_always_inline bool
1310 mbuf_is_consumed(struct rte_mbuf *m)
1311 {
1312         while (m) {
1313                 if (rte_mbuf_refcnt_read(m) > 1)
1314                         return false;
1315                 m = m->next;
1316         }
1317
1318         return true;
1319 }
1320
1321 static __rte_always_inline void
1322 restore_mbuf(struct rte_mbuf *m)
1323 {
1324         uint32_t mbuf_size, priv_size;
1325
1326         while (m) {
1327                 priv_size = rte_pktmbuf_priv_size(m->pool);
1328                 mbuf_size = sizeof(struct rte_mbuf) + priv_size;
1329                 /* start of buffer is after mbuf structure and priv data */
1330
1331                 m->buf_addr = (char *)m + mbuf_size;
1332                 m->buf_iova = rte_mempool_virt2iova(m) + mbuf_size;
1333                 m = m->next;
1334         }
1335 }
1336
1337 static __rte_always_inline uint16_t
1338 virtio_dev_tx_split(struct virtio_net *dev, struct vhost_virtqueue *vq,
1339         struct rte_mempool *mbuf_pool, struct rte_mbuf **pkts, uint16_t count)
1340 {
1341         uint16_t i;
1342         uint16_t free_entries;
1343
1344         if (unlikely(dev->dequeue_zero_copy)) {
1345                 struct zcopy_mbuf *zmbuf, *next;
1346                 int nr_updated = 0;
1347
1348                 for (zmbuf = TAILQ_FIRST(&vq->zmbuf_list);
1349                      zmbuf != NULL; zmbuf = next) {
1350                         next = TAILQ_NEXT(zmbuf, next);
1351
1352                         if (mbuf_is_consumed(zmbuf->mbuf)) {
1353                                 update_shadow_used_ring_split(vq,
1354                                                 zmbuf->desc_idx, 0);
1355                                 nr_updated += 1;
1356
1357                                 TAILQ_REMOVE(&vq->zmbuf_list, zmbuf, next);
1358                                 restore_mbuf(zmbuf->mbuf);
1359                                 rte_pktmbuf_free(zmbuf->mbuf);
1360                                 put_zmbuf(zmbuf);
1361                                 vq->nr_zmbuf -= 1;
1362                         }
1363                 }
1364
1365                 flush_shadow_used_ring_split(dev, vq);
1366                 vhost_vring_call_split(dev, vq);
1367         }
1368
1369         rte_prefetch0(&vq->avail->ring[vq->last_avail_idx & (vq->size - 1)]);
1370
1371         free_entries = *((volatile uint16_t *)&vq->avail->idx) -
1372                         vq->last_avail_idx;
1373         if (free_entries == 0)
1374                 return 0;
1375
1376         VHOST_LOG_DEBUG(VHOST_DATA, "(%d) %s\n", dev->vid, __func__);
1377
1378         count = RTE_MIN(count, MAX_PKT_BURST);
1379         count = RTE_MIN(count, free_entries);
1380         VHOST_LOG_DEBUG(VHOST_DATA, "(%d) about to dequeue %u buffers\n",
1381                         dev->vid, count);
1382
1383         for (i = 0; i < count; i++) {
1384                 struct buf_vector buf_vec[BUF_VECTOR_MAX];
1385                 uint16_t head_idx, dummy_len;
1386                 uint16_t nr_vec = 0;
1387                 int err;
1388
1389                 if (unlikely(fill_vec_buf_split(dev, vq,
1390                                                 vq->last_avail_idx + i,
1391                                                 &nr_vec, buf_vec,
1392                                                 &head_idx, &dummy_len,
1393                                                 VHOST_ACCESS_RO) < 0))
1394                         break;
1395
1396                 if (likely(dev->dequeue_zero_copy == 0))
1397                         update_shadow_used_ring_split(vq, head_idx, 0);
1398
1399                 rte_prefetch0((void *)(uintptr_t)buf_vec[0].buf_addr);
1400
1401                 pkts[i] = rte_pktmbuf_alloc(mbuf_pool);
1402                 if (unlikely(pkts[i] == NULL)) {
1403                         RTE_LOG(ERR, VHOST_DATA,
1404                                 "Failed to allocate memory for mbuf.\n");
1405                         break;
1406                 }
1407
1408                 err = copy_desc_to_mbuf(dev, vq, buf_vec, nr_vec, pkts[i],
1409                                 mbuf_pool);
1410                 if (unlikely(err)) {
1411                         rte_pktmbuf_free(pkts[i]);
1412                         break;
1413                 }
1414
1415                 if (unlikely(dev->dequeue_zero_copy)) {
1416                         struct zcopy_mbuf *zmbuf;
1417
1418                         zmbuf = get_zmbuf(vq);
1419                         if (!zmbuf) {
1420                                 rte_pktmbuf_free(pkts[i]);
1421                                 break;
1422                         }
1423                         zmbuf->mbuf = pkts[i];
1424                         zmbuf->desc_idx = head_idx;
1425
1426                         /*
1427                          * Pin lock the mbuf; we will check later to see
1428                          * whether the mbuf is freed (when we are the last
1429                          * user) or not. If that's the case, we then could
1430                          * update the used ring safely.
1431                          */
1432                         rte_mbuf_refcnt_update(pkts[i], 1);
1433
1434                         vq->nr_zmbuf += 1;
1435                         TAILQ_INSERT_TAIL(&vq->zmbuf_list, zmbuf, next);
1436                 }
1437         }
1438         vq->last_avail_idx += i;
1439
1440         if (likely(dev->dequeue_zero_copy == 0)) {
1441                 do_data_copy_dequeue(vq);
1442                 if (unlikely(i < count))
1443                         vq->shadow_used_idx = i;
1444                 flush_shadow_used_ring_split(dev, vq);
1445                 vhost_vring_call_split(dev, vq);
1446         }
1447
1448         return i;
1449 }
1450
1451 static __rte_always_inline uint16_t
1452 virtio_dev_tx_packed(struct virtio_net *dev, struct vhost_virtqueue *vq,
1453         struct rte_mempool *mbuf_pool, struct rte_mbuf **pkts, uint16_t count)
1454 {
1455         uint16_t i;
1456
1457         rte_prefetch0(&vq->desc_packed[vq->last_avail_idx]);
1458
1459         if (unlikely(dev->dequeue_zero_copy)) {
1460                 struct zcopy_mbuf *zmbuf, *next;
1461
1462                 for (zmbuf = TAILQ_FIRST(&vq->zmbuf_list);
1463                      zmbuf != NULL; zmbuf = next) {
1464                         next = TAILQ_NEXT(zmbuf, next);
1465
1466                         if (mbuf_is_consumed(zmbuf->mbuf)) {
1467                                 update_shadow_used_ring_packed(vq,
1468                                                 zmbuf->desc_idx,
1469                                                 0,
1470                                                 zmbuf->desc_count);
1471
1472                                 TAILQ_REMOVE(&vq->zmbuf_list, zmbuf, next);
1473                                 restore_mbuf(zmbuf->mbuf);
1474                                 rte_pktmbuf_free(zmbuf->mbuf);
1475                                 put_zmbuf(zmbuf);
1476                                 vq->nr_zmbuf -= 1;
1477                         }
1478                 }
1479
1480                 flush_shadow_used_ring_packed(dev, vq);
1481                 vhost_vring_call_packed(dev, vq);
1482         }
1483
1484         VHOST_LOG_DEBUG(VHOST_DATA, "(%d) %s\n", dev->vid, __func__);
1485
1486         count = RTE_MIN(count, MAX_PKT_BURST);
1487         VHOST_LOG_DEBUG(VHOST_DATA, "(%d) about to dequeue %u buffers\n",
1488                         dev->vid, count);
1489
1490         for (i = 0; i < count; i++) {
1491                 struct buf_vector buf_vec[BUF_VECTOR_MAX];
1492                 uint16_t buf_id, dummy_len;
1493                 uint16_t desc_count, nr_vec = 0;
1494                 int err;
1495
1496                 if (unlikely(fill_vec_buf_packed(dev, vq,
1497                                                 vq->last_avail_idx, &desc_count,
1498                                                 buf_vec, &nr_vec,
1499                                                 &buf_id, &dummy_len,
1500                                                 VHOST_ACCESS_RW) < 0))
1501                         break;
1502
1503                 if (likely(dev->dequeue_zero_copy == 0))
1504                         update_shadow_used_ring_packed(vq, buf_id, 0,
1505                                         desc_count);
1506
1507                 rte_prefetch0((void *)(uintptr_t)buf_vec[0].buf_addr);
1508
1509                 pkts[i] = rte_pktmbuf_alloc(mbuf_pool);
1510                 if (unlikely(pkts[i] == NULL)) {
1511                         RTE_LOG(ERR, VHOST_DATA,
1512                                 "Failed to allocate memory for mbuf.\n");
1513                         break;
1514                 }
1515
1516                 err = copy_desc_to_mbuf(dev, vq, buf_vec, nr_vec, pkts[i],
1517                                 mbuf_pool);
1518                 if (unlikely(err)) {
1519                         rte_pktmbuf_free(pkts[i]);
1520                         break;
1521                 }
1522
1523                 if (unlikely(dev->dequeue_zero_copy)) {
1524                         struct zcopy_mbuf *zmbuf;
1525
1526                         zmbuf = get_zmbuf(vq);
1527                         if (!zmbuf) {
1528                                 rte_pktmbuf_free(pkts[i]);
1529                                 break;
1530                         }
1531                         zmbuf->mbuf = pkts[i];
1532                         zmbuf->desc_idx = buf_id;
1533                         zmbuf->desc_count = desc_count;
1534
1535                         /*
1536                          * Pin lock the mbuf; we will check later to see
1537                          * whether the mbuf is freed (when we are the last
1538                          * user) or not. If that's the case, we then could
1539                          * update the used ring safely.
1540                          */
1541                         rte_mbuf_refcnt_update(pkts[i], 1);
1542
1543                         vq->nr_zmbuf += 1;
1544                         TAILQ_INSERT_TAIL(&vq->zmbuf_list, zmbuf, next);
1545                 }
1546
1547                 vq->last_avail_idx += desc_count;
1548                 if (vq->last_avail_idx >= vq->size) {
1549                         vq->last_avail_idx -= vq->size;
1550                         vq->avail_wrap_counter ^= 1;
1551                 }
1552         }
1553
1554         if (likely(dev->dequeue_zero_copy == 0)) {
1555                 do_data_copy_dequeue(vq);
1556                 if (unlikely(i < count))
1557                         vq->shadow_used_idx = i;
1558                 flush_shadow_used_ring_packed(dev, vq);
1559                 vhost_vring_call_packed(dev, vq);
1560         }
1561
1562         return i;
1563 }
1564
1565 uint16_t
1566 rte_vhost_dequeue_burst(int vid, uint16_t queue_id,
1567         struct rte_mempool *mbuf_pool, struct rte_mbuf **pkts, uint16_t count)
1568 {
1569         struct virtio_net *dev;
1570         struct rte_mbuf *rarp_mbuf = NULL;
1571         struct vhost_virtqueue *vq;
1572
1573         dev = get_device(vid);
1574         if (!dev)
1575                 return 0;
1576
1577         if (unlikely(!(dev->flags & VIRTIO_DEV_BUILTIN_VIRTIO_NET))) {
1578                 RTE_LOG(ERR, VHOST_DATA,
1579                         "(%d) %s: built-in vhost net backend is disabled.\n",
1580                         dev->vid, __func__);
1581                 return 0;
1582         }
1583
1584         if (unlikely(!is_valid_virt_queue_idx(queue_id, 1, dev->nr_vring))) {
1585                 RTE_LOG(ERR, VHOST_DATA, "(%d) %s: invalid virtqueue idx %d.\n",
1586                         dev->vid, __func__, queue_id);
1587                 return 0;
1588         }
1589
1590         vq = dev->virtqueue[queue_id];
1591
1592         if (unlikely(rte_spinlock_trylock(&vq->access_lock) == 0))
1593                 return 0;
1594
1595         if (unlikely(vq->enabled == 0))
1596                 goto out_access_unlock;
1597
1598         if (dev->features & (1ULL << VIRTIO_F_IOMMU_PLATFORM))
1599                 vhost_user_iotlb_rd_lock(vq);
1600
1601         if (unlikely(vq->access_ok == 0))
1602                 if (unlikely(vring_translate(dev, vq) < 0))
1603                         goto out;
1604
1605         /*
1606          * Construct a RARP broadcast packet, and inject it to the "pkts"
1607          * array, to looks like that guest actually send such packet.
1608          *
1609          * Check user_send_rarp() for more information.
1610          *
1611          * broadcast_rarp shares a cacheline in the virtio_net structure
1612          * with some fields that are accessed during enqueue and
1613          * rte_atomic16_cmpset() causes a write if using cmpxchg. This could
1614          * result in false sharing between enqueue and dequeue.
1615          *
1616          * Prevent unnecessary false sharing by reading broadcast_rarp first
1617          * and only performing cmpset if the read indicates it is likely to
1618          * be set.
1619          */
1620         if (unlikely(rte_atomic16_read(&dev->broadcast_rarp) &&
1621                         rte_atomic16_cmpset((volatile uint16_t *)
1622                                 &dev->broadcast_rarp.cnt, 1, 0))) {
1623
1624                 rarp_mbuf = rte_net_make_rarp_packet(mbuf_pool, &dev->mac);
1625                 if (rarp_mbuf == NULL) {
1626                         RTE_LOG(ERR, VHOST_DATA,
1627                                 "Failed to make RARP packet.\n");
1628                         return 0;
1629                 }
1630                 count -= 1;
1631         }
1632
1633         if (vq_is_packed(dev))
1634                 count = virtio_dev_tx_packed(dev, vq, mbuf_pool, pkts, count);
1635         else
1636                 count = virtio_dev_tx_split(dev, vq, mbuf_pool, pkts, count);
1637
1638 out:
1639         if (dev->features & (1ULL << VIRTIO_F_IOMMU_PLATFORM))
1640                 vhost_user_iotlb_rd_unlock(vq);
1641
1642 out_access_unlock:
1643         rte_spinlock_unlock(&vq->access_lock);
1644
1645         if (unlikely(rarp_mbuf != NULL)) {
1646                 /*
1647                  * Inject it to the head of "pkts" array, so that switch's mac
1648                  * learning table will get updated first.
1649                  */
1650                 memmove(&pkts[1], pkts, count * sizeof(struct rte_mbuf *));
1651                 pkts[0] = rarp_mbuf;
1652                 count += 1;
1653         }
1654
1655         return count;
1656 }