8c932ccf68d207ee6d140cfabf4953e220f180d5
[vpp.git] / src / plugins / avf / output.c
1 /*
2  *------------------------------------------------------------------
3  * Copyright (c) 2018 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 <vlib/vlib.h>
19 #include <vlib/unix/unix.h>
20 #include <vlib/pci/pci.h>
21 #include <vppinfra/ring.h>
22
23 #include <vnet/ethernet/ethernet.h>
24 #include <vnet/ip/ip4_packet.h>
25 #include <vnet/ip/ip6_packet.h>
26 #include <vnet/udp/udp_packet.h>
27 #include <vnet/tcp/tcp_packet.h>
28
29 #include <vnet/devices/devices.h>
30
31 #include <avf/avf.h>
32
33 static_always_inline u8
34 avf_tx_desc_get_dtyp (avf_tx_desc_t * d)
35 {
36   return d->qword[1] & 0x0f;
37 }
38
39 struct avf_ip4_psh
40 {
41   u32 src;
42   u32 dst;
43   u8 zero;
44   u8 proto;
45   u16 l4len;
46 };
47
48 struct avf_ip6_psh
49 {
50   ip6_address_t src;
51   ip6_address_t dst;
52   u32 l4len;
53   u32 proto;
54 };
55
56 static_always_inline u64
57 avf_tx_prepare_cksum (vlib_buffer_t * b, u8 is_tso)
58 {
59   u64 flags = 0;
60   if (!is_tso && !(b->flags & VNET_BUFFER_F_OFFLOAD))
61     return 0;
62
63   u32 oflags = vnet_buffer2 (b)->oflags;
64   u32 is_tcp = is_tso || oflags & VNET_BUFFER_OFFLOAD_F_TCP_CKSUM;
65   u32 is_udp = !is_tso && oflags & VNET_BUFFER_OFFLOAD_F_UDP_CKSUM;
66   u32 is_ip4 = b->flags & VNET_BUFFER_F_IS_IP4;
67   u32 is_ip6 = b->flags & VNET_BUFFER_F_IS_IP6;
68   ASSERT (!is_tcp || !is_udp);
69   ASSERT (is_ip4 || is_ip6);
70   i16 l2_hdr_offset = b->current_data;
71   i16 l3_hdr_offset = vnet_buffer (b)->l3_hdr_offset;
72   i16 l4_hdr_offset = vnet_buffer (b)->l4_hdr_offset;
73   u16 l2_len = l3_hdr_offset - l2_hdr_offset;
74   u16 l3_len = l4_hdr_offset - l3_hdr_offset;
75   ip4_header_t *ip4 = (void *) (b->data + l3_hdr_offset);
76   ip6_header_t *ip6 = (void *) (b->data + l3_hdr_offset);
77   tcp_header_t *tcp = (void *) (b->data + l4_hdr_offset);
78   udp_header_t *udp = (void *) (b->data + l4_hdr_offset);
79   u16 l4_len =
80     is_tcp ? tcp_header_bytes (tcp) : is_udp ? sizeof (udp_header_t) : 0;
81   u16 sum = 0;
82
83   flags |= AVF_TXD_OFFSET_MACLEN (l2_len) |
84     AVF_TXD_OFFSET_IPLEN (l3_len) | AVF_TXD_OFFSET_L4LEN (l4_len);
85   flags |= is_ip4 ? AVF_TXD_CMD_IIPT_IPV4 : AVF_TXD_CMD_IIPT_IPV6;
86   flags |= is_tcp ? AVF_TXD_CMD_L4T_TCP : is_udp ? AVF_TXD_CMD_L4T_UDP : 0;
87
88   if (is_ip4)
89     ip4->checksum = 0;
90
91   if (is_tso)
92     {
93       if (is_ip4)
94         ip4->length = 0;
95       else
96         ip6->payload_length = 0;
97     }
98
99   if (is_tcp || is_udp)
100     {
101       if (is_ip4)
102         {
103           struct avf_ip4_psh psh = { 0 };
104           psh.src = ip4->src_address.as_u32;
105           psh.dst = ip4->dst_address.as_u32;
106           psh.proto = ip4->protocol;
107           psh.l4len =
108             is_tso ? 0 :
109             clib_host_to_net_u16 (clib_net_to_host_u16 (ip4->length) -
110                                   (l4_hdr_offset - l3_hdr_offset));
111           sum = ~ip_csum (&psh, sizeof (psh));
112         }
113       else
114         {
115           struct avf_ip6_psh psh = { 0 };
116           psh.src = ip6->src_address;
117           psh.dst = ip6->dst_address;
118           psh.proto = clib_host_to_net_u32 ((u32) ip6->protocol);
119           psh.l4len = is_tso ? 0 : ip6->payload_length;
120           sum = ~ip_csum (&psh, sizeof (psh));
121         }
122     }
123   /* ip_csum does a byte swap for some reason... */
124   sum = clib_net_to_host_u16 (sum);
125   if (is_tcp)
126     tcp->checksum = sum;
127   else if (is_udp)
128     udp->checksum = sum;
129   return flags;
130 }
131
132 static_always_inline u32
133 avf_tx_fill_ctx_desc (vlib_main_t *vm, avf_txq_t *txq, avf_tx_desc_t *d,
134                       vlib_buffer_t *b)
135 {
136   vlib_buffer_t *ctx_ph;
137   u32 *bi = txq->ph_bufs;
138
139 next:
140   ctx_ph = vlib_get_buffer (vm, bi[0]);
141   if (PREDICT_FALSE (ctx_ph->ref_count == 255))
142     {
143       bi++;
144       goto next;
145     }
146
147   /* Acquire a reference on the placeholder buffer */
148   ctx_ph->ref_count++;
149
150   u16 l234hdr_sz = vnet_buffer (b)->l4_hdr_offset - b->current_data +
151                    vnet_buffer2 (b)->gso_l4_hdr_sz;
152   u16 tlen = vlib_buffer_length_in_chain (vm, b) - l234hdr_sz;
153   d[0].qword[0] = 0;
154   d[0].qword[1] = AVF_TXD_DTYP_CTX | AVF_TXD_CTX_CMD_TSO
155     | AVF_TXD_CTX_SEG_MSS (vnet_buffer2 (b)->gso_size) |
156     AVF_TXD_CTX_SEG_TLEN (tlen);
157   return bi[0];
158 }
159
160 static_always_inline void
161 avf_tx_copy_desc (avf_tx_desc_t *d, avf_tx_desc_t *s, u32 n_descs)
162 {
163 #if defined CLIB_HAVE_VEC512
164   while (n_descs >= 8)
165     {
166       u64x8u *dv = (u64x8u *) d;
167       u64x8u *sv = (u64x8u *) s;
168
169       dv[0] = sv[0];
170       dv[1] = sv[1];
171
172       /* next */
173       d += 8;
174       s += 8;
175       n_descs -= 8;
176     }
177 #elif defined CLIB_HAVE_VEC256
178   while (n_descs >= 4)
179     {
180       u64x4u *dv = (u64x4u *) d;
181       u64x4u *sv = (u64x4u *) s;
182
183       dv[0] = sv[0];
184       dv[1] = sv[1];
185
186       /* next */
187       d += 4;
188       s += 4;
189       n_descs -= 4;
190     }
191 #elif defined CLIB_HAVE_VEC128
192   while (n_descs >= 2)
193     {
194       u64x2u *dv = (u64x2u *) d;
195       u64x2u *sv = (u64x2u *) s;
196
197       dv[0] = sv[0];
198       dv[1] = sv[1];
199
200       /* next */
201       d += 2;
202       s += 2;
203       n_descs -= 2;
204     }
205 #endif
206   while (n_descs)
207     {
208       d[0].qword[0] = s[0].qword[0];
209       d[0].qword[1] = s[0].qword[1];
210       d++;
211       s++;
212       n_descs--;
213     }
214 }
215
216 static_always_inline u16
217 avf_tx_prepare (vlib_main_t *vm, vlib_node_runtime_t *node, avf_txq_t *txq,
218                 u32 *buffers, u32 n_packets, u16 *n_enq_descs, int use_va_dma)
219 {
220   u64 bits = AVF_TXD_CMD_EOP | AVF_TXD_CMD_RSV;
221   const u32 offload_mask = VNET_BUFFER_F_OFFLOAD | VNET_BUFFER_F_GSO;
222   u64 one_by_one_offload_flags = 0;
223   int is_tso;
224   u16 n_desc = 0;
225   u16 n_desc_left, n_packets_left = n_packets;
226   vlib_buffer_t *b[4];
227   avf_tx_desc_t *d = txq->tmp_descs;
228   u32 *tb = txq->tmp_bufs;
229
230   n_desc_left = txq->size - txq->n_enqueued - 8;
231
232   if (n_desc_left == 0)
233     return 0;
234
235   while (n_packets_left && n_desc_left)
236     {
237       u32 or_flags;
238       if (n_packets_left < 8 || n_desc_left < 4)
239         goto one_by_one;
240
241       vlib_prefetch_buffer_with_index (vm, buffers[4], LOAD);
242       vlib_prefetch_buffer_with_index (vm, buffers[5], LOAD);
243       vlib_prefetch_buffer_with_index (vm, buffers[6], LOAD);
244       vlib_prefetch_buffer_with_index (vm, buffers[7], LOAD);
245
246       b[0] = vlib_get_buffer (vm, buffers[0]);
247       b[1] = vlib_get_buffer (vm, buffers[1]);
248       b[2] = vlib_get_buffer (vm, buffers[2]);
249       b[3] = vlib_get_buffer (vm, buffers[3]);
250
251       or_flags = b[0]->flags | b[1]->flags | b[2]->flags | b[3]->flags;
252
253       if (or_flags & (VLIB_BUFFER_NEXT_PRESENT | offload_mask))
254         goto one_by_one;
255
256       vlib_buffer_copy_indices (tb, buffers, 4);
257
258       if (use_va_dma)
259         {
260           d[0].qword[0] = vlib_buffer_get_current_va (b[0]);
261           d[1].qword[0] = vlib_buffer_get_current_va (b[1]);
262           d[2].qword[0] = vlib_buffer_get_current_va (b[2]);
263           d[3].qword[0] = vlib_buffer_get_current_va (b[3]);
264         }
265       else
266         {
267           d[0].qword[0] = vlib_buffer_get_current_pa (vm, b[0]);
268           d[1].qword[0] = vlib_buffer_get_current_pa (vm, b[1]);
269           d[2].qword[0] = vlib_buffer_get_current_pa (vm, b[2]);
270           d[3].qword[0] = vlib_buffer_get_current_pa (vm, b[3]);
271         }
272
273       d[0].qword[1] = ((u64) b[0]->current_length) << 34 | bits;
274       d[1].qword[1] = ((u64) b[1]->current_length) << 34 | bits;
275       d[2].qword[1] = ((u64) b[2]->current_length) << 34 | bits;
276       d[3].qword[1] = ((u64) b[3]->current_length) << 34 | bits;
277
278       n_desc += 4;
279       buffers += 4;
280       n_packets_left -= 4;
281       n_desc_left -= 4;
282       d += 4;
283       tb += 4;
284       continue;
285
286     one_by_one:
287       one_by_one_offload_flags = 0;
288       tb[0] = buffers[0];
289       b[0] = vlib_get_buffer (vm, buffers[0]);
290       is_tso = ! !(b[0]->flags & VNET_BUFFER_F_GSO);
291       if (PREDICT_FALSE (is_tso || b[0]->flags & offload_mask))
292         one_by_one_offload_flags |= avf_tx_prepare_cksum (b[0], is_tso);
293
294       /* Deal with chain buffer if present */
295       if (is_tso || b[0]->flags & VLIB_BUFFER_NEXT_PRESENT)
296         {
297           u16 n_desc_needed = 1 + is_tso;
298           vlib_buffer_t *b0 = b[0];
299
300           /* Wish there were a buffer count for chain buffer */
301           while (b0->flags & VLIB_BUFFER_NEXT_PRESENT)
302             {
303               b0 = vlib_get_buffer (vm, b0->next_buffer);
304               n_desc_needed++;
305             }
306
307           /* spec says data descriptor is limited to 8 segments */
308           if (PREDICT_FALSE (!is_tso && n_desc_needed > 8))
309             {
310               vlib_buffer_free_one (vm, buffers[0]);
311               vlib_error_count (vm, node->node_index,
312                                 AVF_TX_ERROR_SEGMENT_SIZE_EXCEEDED, 1);
313               n_packets_left -= 1;
314               buffers += 1;
315               continue;
316             }
317
318           if (PREDICT_FALSE (n_desc_left < n_desc_needed))
319             /*
320              * Slow path may be able to to deal with this since it can handle
321              * ring wrap
322              */
323             break;
324
325           /* Enqueue a context descriptor if needed */
326           if (PREDICT_FALSE (is_tso))
327             {
328               tb[1] = tb[0];
329               tb[0] = avf_tx_fill_ctx_desc (vm, txq, d, b[0]);
330               n_desc += 1;
331               n_desc_left -= 1;
332               d += 1;
333               tb += 1;
334             }
335           while (b[0]->flags & VLIB_BUFFER_NEXT_PRESENT)
336             {
337               if (use_va_dma)
338                 d[0].qword[0] = vlib_buffer_get_current_va (b[0]);
339               else
340                 d[0].qword[0] = vlib_buffer_get_current_pa (vm, b[0]);
341
342               d[0].qword[1] = (((u64) b[0]->current_length) << 34) |
343                 AVF_TXD_CMD_RSV | one_by_one_offload_flags;
344
345               n_desc += 1;
346               n_desc_left -= 1;
347               d += 1;
348               tb += 1;
349
350               tb[0] = b[0]->next_buffer;
351               b[0] = vlib_get_buffer (vm, b[0]->next_buffer);
352             }
353         }
354
355       if (use_va_dma)
356         d[0].qword[0] = vlib_buffer_get_current_va (b[0]);
357       else
358         d[0].qword[0] = vlib_buffer_get_current_pa (vm, b[0]);
359
360       d[0].qword[1] =
361         (((u64) b[0]->current_length) << 34) | bits | one_by_one_offload_flags;
362
363       n_desc += 1;
364       buffers += 1;
365       n_packets_left -= 1;
366       n_desc_left -= 1;
367       d += 1;
368       tb += 1;
369     }
370
371   *n_enq_descs = n_desc;
372   return n_packets - n_packets_left;
373 }
374
375 VNET_DEVICE_CLASS_TX_FN (avf_device_class) (vlib_main_t * vm,
376                                             vlib_node_runtime_t * node,
377                                             vlib_frame_t * frame)
378 {
379   vnet_interface_output_runtime_t *rd = (void *) node->runtime_data;
380   avf_device_t *ad = avf_get_device (rd->dev_instance);
381   u32 thread_index = vm->thread_index;
382   u8 qid = thread_index;
383   avf_txq_t *txq = vec_elt_at_index (ad->txqs, qid % ad->num_queue_pairs);
384   u16 next = txq->next;
385   u16 mask = txq->size - 1;
386   u32 *buffers = vlib_frame_vector_args (frame);
387   u16 n_enq, n_left, n_desc, *slot;
388   u16 n_retry = 2;
389
390   clib_spinlock_lock_if_init (&txq->lock);
391
392   n_left = frame->n_vectors;
393
394 retry:
395   /* release consumed bufs */
396   if (txq->n_enqueued)
397     {
398       i32 complete_slot = -1;
399       while (1)
400         {
401           u16 *slot = clib_ring_get_first (txq->rs_slots);
402
403           if (slot == 0)
404             break;
405
406           if (avf_tx_desc_get_dtyp (txq->descs + slot[0]) != 0x0F)
407             break;
408
409           complete_slot = slot[0];
410
411           clib_ring_deq (txq->rs_slots);
412         }
413
414       if (complete_slot >= 0)
415         {
416           u16 first, mask, n_free;
417           mask = txq->size - 1;
418           first = (txq->next - txq->n_enqueued) & mask;
419           n_free = (complete_slot + 1 - first) & mask;
420
421           txq->n_enqueued -= n_free;
422           vlib_buffer_free_from_ring_no_next (vm, txq->bufs, first, txq->size,
423                                               n_free);
424         }
425     }
426
427   n_desc = 0;
428   if (ad->flags & AVF_DEVICE_F_VA_DMA)
429     n_enq = avf_tx_prepare (vm, node, txq, buffers, n_left, &n_desc, 1);
430   else
431     n_enq = avf_tx_prepare (vm, node, txq, buffers, n_left, &n_desc, 0);
432
433   if (n_desc)
434     {
435       if (PREDICT_TRUE (next + n_desc <= txq->size))
436         {
437           /* no wrap */
438           avf_tx_copy_desc (txq->descs + next, txq->tmp_descs, n_desc);
439           vlib_buffer_copy_indices (txq->bufs + next, txq->tmp_bufs, n_desc);
440         }
441       else
442         {
443           /* wrap */
444           u32 n_not_wrap = txq->size - next;
445           avf_tx_copy_desc (txq->descs + next, txq->tmp_descs, n_not_wrap);
446           avf_tx_copy_desc (txq->descs, txq->tmp_descs + n_not_wrap,
447                             n_desc - n_not_wrap);
448           vlib_buffer_copy_indices (txq->bufs + next, txq->tmp_bufs,
449                                     n_not_wrap);
450           vlib_buffer_copy_indices (txq->bufs, txq->tmp_bufs + n_not_wrap,
451                                     n_desc - n_not_wrap);
452         }
453
454       next += n_desc;
455       if ((slot = clib_ring_enq (txq->rs_slots)))
456         {
457           u16 rs_slot = slot[0] = (next - 1) & mask;
458           txq->descs[rs_slot].qword[1] |= AVF_TXD_CMD_RS;
459         }
460
461       txq->next = next & mask;
462       avf_tail_write (txq->qtx_tail, txq->next);
463       txq->n_enqueued += n_desc;
464       n_left -= n_enq;
465     }
466
467   if (n_left)
468     {
469       buffers += n_enq;
470
471       if (n_retry--)
472         goto retry;
473
474       vlib_buffer_free (vm, buffers, n_left);
475       vlib_error_count (vm, node->node_index,
476                         AVF_TX_ERROR_NO_FREE_SLOTS, n_left);
477     }
478
479   clib_spinlock_unlock_if_init (&txq->lock);
480
481   return frame->n_vectors - n_left;
482 }
483
484 /*
485  * fd.io coding-style-patch-verification: ON
486  *
487  * Local Variables:
488  * eval: (c-set-style "gnu")
489  * End:
490  */