ipsec: Support 4o6 and 6o4 for SPD tunnel mode SAs
[vpp.git] / src / vnet / ipsec / esp_encrypt.c
1 /*
2  * esp_encrypt.c : IPSec ESP encrypt node
3  *
4  * Copyright (c) 2015 Cisco and/or its affiliates.
5  * Licensed under the Apache License, Version 2.0 (the "License");
6  * you may not use this file except in compliance with the License.
7  * You may obtain a copy of the License at:
8  *
9  *     http://www.apache.org/licenses/LICENSE-2.0
10  *
11  * Unless required by applicable law or agreed to in writing, software
12  * distributed under the License is distributed on an "AS IS" BASIS,
13  * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
14  * See the License for the specific language governing permissions and
15  * limitations under the License.
16  */
17
18 #include <vnet/vnet.h>
19 #include <vnet/api_errno.h>
20 #include <vnet/ip/ip.h>
21 #include <vnet/udp/udp.h>
22
23 #include <vnet/crypto/crypto.h>
24
25 #include <vnet/ipsec/ipsec.h>
26 #include <vnet/ipsec/ipsec_tun.h>
27 #include <vnet/ipsec/esp.h>
28
29 #define foreach_esp_encrypt_next                   \
30 _(DROP4, "ip4-drop")                               \
31 _(DROP6, "ip6-drop")                               \
32 _(PENDING, "pending")                              \
33 _(HANDOFF4, "handoff4")                            \
34 _(HANDOFF6, "handoff6")                            \
35 _(INTERFACE_OUTPUT, "interface-output")
36
37 #define _(v, s) ESP_ENCRYPT_NEXT_##v,
38 typedef enum
39 {
40   foreach_esp_encrypt_next
41 #undef _
42     ESP_ENCRYPT_N_NEXT,
43 } esp_encrypt_next_t;
44
45 #define foreach_esp_encrypt_error                               \
46  _(RX_PKTS, "ESP pkts received")                                \
47  _(POST_RX_PKTS, "ESP-post pkts received")                      \
48  _(SEQ_CYCLED, "sequence number cycled (packet dropped)")       \
49  _(CRYPTO_ENGINE_ERROR, "crypto engine error (packet dropped)") \
50  _(CRYPTO_QUEUE_FULL, "crypto queue full (packet dropped)")     \
51  _(NO_BUFFERS, "no buffers (packet dropped)")                   \
52
53 typedef enum
54 {
55 #define _(sym,str) ESP_ENCRYPT_ERROR_##sym,
56   foreach_esp_encrypt_error
57 #undef _
58     ESP_ENCRYPT_N_ERROR,
59 } esp_encrypt_error_t;
60
61 static char *esp_encrypt_error_strings[] = {
62 #define _(sym,string) string,
63   foreach_esp_encrypt_error
64 #undef _
65 };
66
67 typedef struct
68 {
69   u32 sa_index;
70   u32 spi;
71   u32 seq;
72   u32 sa_seq_hi;
73   u8 udp_encap;
74   ipsec_crypto_alg_t crypto_alg;
75   ipsec_integ_alg_t integ_alg;
76 } esp_encrypt_trace_t;
77
78 typedef struct
79 {
80   u32 next_index;
81 } esp_encrypt_post_trace_t;
82
83 /* packet trace format function */
84 static u8 *
85 format_esp_encrypt_trace (u8 * s, va_list * args)
86 {
87   CLIB_UNUSED (vlib_main_t * vm) = va_arg (*args, vlib_main_t *);
88   CLIB_UNUSED (vlib_node_t * node) = va_arg (*args, vlib_node_t *);
89   esp_encrypt_trace_t *t = va_arg (*args, esp_encrypt_trace_t *);
90
91   s =
92     format (s,
93             "esp: sa-index %d spi %u (0x%08x) seq %u sa-seq-hi %u crypto %U integrity %U%s",
94             t->sa_index, t->spi, t->spi, t->seq, t->sa_seq_hi,
95             format_ipsec_crypto_alg,
96             t->crypto_alg, format_ipsec_integ_alg, t->integ_alg,
97             t->udp_encap ? " udp-encap-enabled" : "");
98   return s;
99 }
100
101 static u8 *
102 format_esp_post_encrypt_trace (u8 * s, va_list * args)
103 {
104   CLIB_UNUSED (vlib_main_t * vm) = va_arg (*args, vlib_main_t *);
105   CLIB_UNUSED (vlib_node_t * node) = va_arg (*args, vlib_node_t *);
106   esp_encrypt_post_trace_t *t = va_arg (*args, esp_encrypt_post_trace_t *);
107
108   s = format (s, "esp-post: next node index %u", t->next_index);
109   return s;
110 }
111
112 /* pad packet in input buffer */
113 static_always_inline u8 *
114 esp_add_footer_and_icv (vlib_main_t * vm, vlib_buffer_t ** last,
115                         u8 block_size, u8 icv_sz,
116                         u16 * next, vlib_node_runtime_t * node,
117                         u16 buffer_data_size, uword total_len)
118 {
119   static const u8 pad_data[ESP_MAX_BLOCK_SIZE] = {
120     0x01, 0x02, 0x03, 0x04, 0x05, 0x06, 0x07, 0x08,
121     0x09, 0x0a, 0x0b, 0x0c, 0x0d, 0x0e, 0x00, 0x00,
122   };
123
124   u16 min_length = total_len + sizeof (esp_footer_t);
125   u16 new_length = round_pow2 (min_length, block_size);
126   u8 pad_bytes = new_length - min_length;
127   esp_footer_t *f = (esp_footer_t *) (vlib_buffer_get_current (last[0]) +
128                                       last[0]->current_length + pad_bytes);
129   u16 tail_sz = sizeof (esp_footer_t) + pad_bytes + icv_sz;
130
131   if (last[0]->current_length + tail_sz > buffer_data_size)
132     {
133       u32 tmp_bi = 0;
134       if (vlib_buffer_alloc (vm, &tmp_bi, 1) != 1)
135         return 0;
136
137       vlib_buffer_t *tmp = vlib_get_buffer (vm, tmp_bi);
138       last[0]->next_buffer = tmp_bi;
139       last[0]->flags |= VLIB_BUFFER_NEXT_PRESENT;
140       f = (esp_footer_t *) (vlib_buffer_get_current (tmp) + pad_bytes);
141       tmp->current_length += tail_sz;
142       last[0] = tmp;
143     }
144   else
145     last[0]->current_length += tail_sz;
146
147   f->pad_length = pad_bytes;
148   if (pad_bytes)
149     {
150       ASSERT (pad_bytes <= ESP_MAX_BLOCK_SIZE);
151       pad_bytes = clib_min (ESP_MAX_BLOCK_SIZE, pad_bytes);
152       clib_memcpy_fast ((u8 *) f - pad_bytes, pad_data, pad_bytes);
153     }
154
155   return &f->next_header;
156 }
157
158 static_always_inline void
159 esp_update_ip4_hdr (ip4_header_t * ip4, u16 len, int is_transport, int is_udp)
160 {
161   ip_csum_t sum;
162   u16 old_len;
163
164   len = clib_net_to_host_u16 (len);
165   old_len = ip4->length;
166
167   if (is_transport)
168     {
169       u8 prot = is_udp ? IP_PROTOCOL_UDP : IP_PROTOCOL_IPSEC_ESP;
170
171       sum = ip_csum_update (ip4->checksum, ip4->protocol,
172                             prot, ip4_header_t, protocol);
173       ip4->protocol = prot;
174
175       sum = ip_csum_update (sum, old_len, len, ip4_header_t, length);
176     }
177   else
178     sum = ip_csum_update (ip4->checksum, old_len, len, ip4_header_t, length);
179
180   ip4->length = len;
181   ip4->checksum = ip_csum_fold (sum);
182 }
183
184 static_always_inline void
185 esp_fill_udp_hdr (ipsec_sa_t * sa, udp_header_t * udp, u16 len)
186 {
187   clib_memcpy_fast (udp, &sa->udp_hdr, sizeof (udp_header_t));
188   udp->length = clib_net_to_host_u16 (len);
189 }
190
191 static_always_inline u8
192 ext_hdr_is_pre_esp (u8 nexthdr)
193 {
194 #ifdef CLIB_HAVE_VEC128
195   static const u8x16 ext_hdr_types = {
196     IP_PROTOCOL_IP6_HOP_BY_HOP_OPTIONS,
197     IP_PROTOCOL_IPV6_ROUTE,
198     IP_PROTOCOL_IPV6_FRAGMENTATION,
199   };
200
201   return !u8x16_is_all_zero (ext_hdr_types == u8x16_splat (nexthdr));
202 #else
203   return ((nexthdr ^ IP_PROTOCOL_IP6_HOP_BY_HOP_OPTIONS) |
204           (nexthdr ^ IP_PROTOCOL_IPV6_ROUTE) |
205           (nexthdr ^ IP_PROTOCOL_IPV6_FRAGMENTATION) != 0);
206 #endif
207 }
208
209 static_always_inline u8
210 esp_get_ip6_hdr_len (ip6_header_t * ip6, ip6_ext_header_t ** ext_hdr)
211 {
212   /* this code assumes that HbH, route and frag headers will be before
213      others, if that is not the case, they will end up encrypted */
214   u8 len = sizeof (ip6_header_t);
215   ip6_ext_header_t *p;
216
217   /* if next packet doesn't have ext header */
218   if (ext_hdr_is_pre_esp (ip6->protocol) == 0)
219     {
220       *ext_hdr = NULL;
221       return len;
222     }
223
224   p = (void *) (ip6 + 1);
225   len += ip6_ext_header_len (p);
226
227   while (ext_hdr_is_pre_esp (p->next_hdr))
228     {
229       len += ip6_ext_header_len (p);
230       p = ip6_ext_next_header (p);
231     }
232
233   *ext_hdr = p;
234   return len;
235 }
236
237 static_always_inline void
238 esp_process_chained_ops (vlib_main_t * vm, vlib_node_runtime_t * node,
239                          vnet_crypto_op_t * ops, vlib_buffer_t * b[],
240                          u16 * nexts, vnet_crypto_op_chunk_t * chunks,
241                          u16 drop_next)
242 {
243   u32 n_fail, n_ops = vec_len (ops);
244   vnet_crypto_op_t *op = ops;
245
246   if (n_ops == 0)
247     return;
248
249   n_fail = n_ops - vnet_crypto_process_chained_ops (vm, op, chunks, n_ops);
250
251   while (n_fail)
252     {
253       ASSERT (op - ops < n_ops);
254
255       if (op->status != VNET_CRYPTO_OP_STATUS_COMPLETED)
256         {
257           u32 bi = op->user_data;
258           b[bi]->error = node->errors[ESP_ENCRYPT_ERROR_CRYPTO_ENGINE_ERROR];
259           nexts[bi] = drop_next;
260           n_fail--;
261         }
262       op++;
263     }
264 }
265
266 static_always_inline void
267 esp_process_ops (vlib_main_t * vm, vlib_node_runtime_t * node,
268                  vnet_crypto_op_t * ops, vlib_buffer_t * b[], u16 * nexts,
269                  u16 drop_next)
270 {
271   u32 n_fail, n_ops = vec_len (ops);
272   vnet_crypto_op_t *op = ops;
273
274   if (n_ops == 0)
275     return;
276
277   n_fail = n_ops - vnet_crypto_process_ops (vm, op, n_ops);
278
279   while (n_fail)
280     {
281       ASSERT (op - ops < n_ops);
282
283       if (op->status != VNET_CRYPTO_OP_STATUS_COMPLETED)
284         {
285           u32 bi = op->user_data;
286           b[bi]->error = node->errors[ESP_ENCRYPT_ERROR_CRYPTO_ENGINE_ERROR];
287           nexts[bi] = drop_next;
288           n_fail--;
289         }
290       op++;
291     }
292 }
293
294 typedef struct
295 {
296   u32 salt;
297   u64 iv;
298 } __clib_packed esp_gcm_nonce_t;
299
300 STATIC_ASSERT_SIZEOF (esp_gcm_nonce_t, 12);
301
302 static_always_inline u32
303 esp_encrypt_chain_crypto (vlib_main_t * vm, ipsec_per_thread_data_t * ptd,
304                           ipsec_sa_t * sa0, vlib_buffer_t * b,
305                           vlib_buffer_t * lb, u8 icv_sz, u8 * start,
306                           u32 start_len, u16 * n_ch)
307 {
308   vnet_crypto_op_chunk_t *ch;
309   vlib_buffer_t *cb = b;
310   u32 n_chunks = 1;
311   u32 total_len;
312   vec_add2 (ptd->chunks, ch, 1);
313   total_len = ch->len = start_len;
314   ch->src = ch->dst = start;
315   cb = vlib_get_buffer (vm, cb->next_buffer);
316
317   while (1)
318     {
319       vec_add2 (ptd->chunks, ch, 1);
320       n_chunks += 1;
321       if (lb == cb)
322         total_len += ch->len = cb->current_length - icv_sz;
323       else
324         total_len += ch->len = cb->current_length;
325       ch->src = ch->dst = vlib_buffer_get_current (cb);
326
327       if (!(cb->flags & VLIB_BUFFER_NEXT_PRESENT))
328         break;
329
330       cb = vlib_get_buffer (vm, cb->next_buffer);
331     }
332
333   if (n_ch)
334     *n_ch = n_chunks;
335
336   return total_len;
337 }
338
339 static_always_inline u32
340 esp_encrypt_chain_integ (vlib_main_t * vm, ipsec_per_thread_data_t * ptd,
341                          ipsec_sa_t * sa0, vlib_buffer_t * b,
342                          vlib_buffer_t * lb, u8 icv_sz, u8 * start,
343                          u32 start_len, u8 * digest, u16 * n_ch)
344 {
345   vnet_crypto_op_chunk_t *ch;
346   vlib_buffer_t *cb = b;
347   u32 n_chunks = 1;
348   u32 total_len;
349   vec_add2 (ptd->chunks, ch, 1);
350   total_len = ch->len = start_len;
351   ch->src = start;
352   cb = vlib_get_buffer (vm, cb->next_buffer);
353
354   while (1)
355     {
356       vec_add2 (ptd->chunks, ch, 1);
357       n_chunks += 1;
358       if (lb == cb)
359         {
360           total_len += ch->len = cb->current_length - icv_sz;
361           if (ipsec_sa_is_set_USE_ESN (sa0))
362             {
363               u32 seq_hi = clib_net_to_host_u32 (sa0->seq_hi);
364               clib_memcpy_fast (digest, &seq_hi, sizeof (seq_hi));
365               ch->len += sizeof (seq_hi);
366               total_len += sizeof (seq_hi);
367             }
368         }
369       else
370         total_len += ch->len = cb->current_length;
371       ch->src = vlib_buffer_get_current (cb);
372
373       if (!(cb->flags & VLIB_BUFFER_NEXT_PRESENT))
374         break;
375
376       cb = vlib_get_buffer (vm, cb->next_buffer);
377     }
378
379   if (n_ch)
380     *n_ch = n_chunks;
381
382   return total_len;
383 }
384
385 always_inline void
386 esp_prepare_sync_op (vlib_main_t * vm, ipsec_per_thread_data_t * ptd,
387                      vnet_crypto_op_t ** crypto_ops,
388                      vnet_crypto_op_t ** integ_ops, ipsec_sa_t * sa0,
389                      u8 * payload, u16 payload_len, u8 iv_sz, u8 icv_sz,
390                      vlib_buffer_t ** bufs, vlib_buffer_t ** b,
391                      vlib_buffer_t * lb, u32 hdr_len, esp_header_t * esp,
392                      esp_gcm_nonce_t * nonce)
393 {
394   if (sa0->crypto_enc_op_id)
395     {
396       vnet_crypto_op_t *op;
397       vec_add2_aligned (crypto_ops[0], op, 1, CLIB_CACHE_LINE_BYTES);
398       vnet_crypto_op_init (op, sa0->crypto_enc_op_id);
399
400       op->src = op->dst = payload;
401       op->key_index = sa0->crypto_key_index;
402       op->len = payload_len - icv_sz;
403       op->user_data = b - bufs;
404
405       if (ipsec_sa_is_set_IS_AEAD (sa0))
406         {
407           /*
408            * construct the AAD in a scratch space in front
409            * of the IP header.
410            */
411           op->aad = payload - hdr_len - sizeof (esp_aead_t);
412           op->aad_len = esp_aad_fill (op->aad, esp, sa0);
413
414           op->tag = payload + op->len;
415           op->tag_len = 16;
416
417           u64 *iv = (u64 *) (payload - iv_sz);
418           nonce->salt = sa0->salt;
419           nonce->iv = *iv = clib_host_to_net_u64 (sa0->gcm_iv_counter++);
420           op->iv = (u8 *) nonce;
421         }
422       else
423         {
424           op->iv = payload - iv_sz;
425           op->flags = VNET_CRYPTO_OP_FLAG_INIT_IV;
426         }
427
428       if (lb != b[0])
429         {
430           /* is chained */
431           op->flags |= VNET_CRYPTO_OP_FLAG_CHAINED_BUFFERS;
432           op->chunk_index = vec_len (ptd->chunks);
433           op->tag = vlib_buffer_get_tail (lb) - icv_sz;
434           esp_encrypt_chain_crypto (vm, ptd, sa0, b[0], lb, icv_sz, payload,
435                                     payload_len, &op->n_chunks);
436         }
437     }
438
439   if (sa0->integ_op_id)
440     {
441       vnet_crypto_op_t *op;
442       vec_add2_aligned (integ_ops[0], op, 1, CLIB_CACHE_LINE_BYTES);
443       vnet_crypto_op_init (op, sa0->integ_op_id);
444       op->src = payload - iv_sz - sizeof (esp_header_t);
445       op->digest = payload + payload_len - icv_sz;
446       op->key_index = sa0->integ_key_index;
447       op->digest_len = icv_sz;
448       op->len = payload_len - icv_sz + iv_sz + sizeof (esp_header_t);
449       op->user_data = b - bufs;
450
451       if (lb != b[0])
452         {
453           /* is chained */
454           op->flags |= VNET_CRYPTO_OP_FLAG_CHAINED_BUFFERS;
455           op->chunk_index = vec_len (ptd->chunks);
456           op->digest = vlib_buffer_get_tail (lb) - icv_sz;
457
458           esp_encrypt_chain_integ (vm, ptd, sa0, b[0], lb, icv_sz,
459                                    payload - iv_sz - sizeof (esp_header_t),
460                                    payload_len + iv_sz +
461                                    sizeof (esp_header_t), op->digest,
462                                    &op->n_chunks);
463         }
464       else if (ipsec_sa_is_set_USE_ESN (sa0))
465         {
466           u32 seq_hi = clib_net_to_host_u32 (sa0->seq_hi);
467           clib_memcpy_fast (op->digest, &seq_hi, sizeof (seq_hi));
468           op->len += sizeof (seq_hi);
469         }
470     }
471 }
472
473 static_always_inline int
474 esp_prepare_async_frame (vlib_main_t * vm, ipsec_per_thread_data_t * ptd,
475                          vnet_crypto_async_frame_t ** async_frame,
476                          ipsec_sa_t * sa, vlib_buffer_t * b,
477                          esp_header_t * esp, u8 * payload, u32 payload_len,
478                          u8 iv_sz, u8 icv_sz, u32 bi, u16 * next, u32 hdr_len,
479                          u16 async_next, vlib_buffer_t * lb)
480 {
481   esp_post_data_t *post = esp_post_data (b);
482   u8 *tag, *iv, *aad = 0;
483   u8 flag = 0;
484   u32 key_index;
485   i16 crypto_start_offset, integ_start_offset = 0;
486   u16 crypto_total_len, integ_total_len;
487
488   post->next_index = next[0];
489   next[0] = ESP_ENCRYPT_NEXT_PENDING;
490
491   /* crypto */
492   crypto_start_offset = payload - b->data;
493   crypto_total_len = integ_total_len = payload_len - icv_sz;
494   tag = payload + crypto_total_len;
495
496   /* aead */
497   if (ipsec_sa_is_set_IS_AEAD (sa))
498     {
499       esp_gcm_nonce_t *nonce;
500       u64 *pkt_iv = (u64 *) (payload - iv_sz);
501
502       aad = payload - hdr_len - sizeof (esp_aead_t);
503       esp_aad_fill (aad, esp, sa);
504       nonce = (esp_gcm_nonce_t *) (aad - sizeof (*nonce));
505       nonce->salt = sa->salt;
506       nonce->iv = *pkt_iv = clib_host_to_net_u64 (sa->gcm_iv_counter++);
507       iv = (u8 *) nonce;
508       key_index = sa->crypto_key_index;
509
510       if (lb != b)
511         {
512           /* chain */
513           flag |= VNET_CRYPTO_OP_FLAG_CHAINED_BUFFERS;
514           tag = vlib_buffer_get_tail (lb) - icv_sz;
515           crypto_total_len = esp_encrypt_chain_crypto (vm, ptd, sa, b, lb,
516                                                        icv_sz, payload,
517                                                        payload_len, 0);
518         }
519       goto out;
520     }
521
522   /* cipher then hash */
523   iv = payload - iv_sz;
524   integ_start_offset = crypto_start_offset - iv_sz - sizeof (esp_header_t);
525   integ_total_len += iv_sz + sizeof (esp_header_t);
526   flag |= VNET_CRYPTO_OP_FLAG_INIT_IV;
527   key_index = sa->linked_key_index;
528
529   if (b != lb)
530     {
531       flag |= VNET_CRYPTO_OP_FLAG_CHAINED_BUFFERS;
532       crypto_total_len = esp_encrypt_chain_crypto (vm, ptd, sa, b, lb,
533                                                    icv_sz, payload,
534                                                    payload_len, 0);
535       tag = vlib_buffer_get_tail (lb) - icv_sz;
536       integ_total_len = esp_encrypt_chain_integ (vm, ptd, sa, b, lb, icv_sz,
537                                                  payload - iv_sz -
538                                                  sizeof (esp_header_t),
539                                                  payload_len + iv_sz +
540                                                  sizeof (esp_header_t),
541                                                  tag, 0);
542     }
543   else if (ipsec_sa_is_set_USE_ESN (sa) && !ipsec_sa_is_set_IS_AEAD (sa))
544     {
545       u32 seq_hi = clib_net_to_host_u32 (sa->seq_hi);
546       clib_memcpy_fast (tag, &seq_hi, sizeof (seq_hi));
547       integ_total_len += sizeof (seq_hi);
548     }
549
550 out:
551   return vnet_crypto_async_add_to_frame (vm, async_frame, key_index,
552                                          crypto_total_len,
553                                          integ_total_len - crypto_total_len,
554                                          crypto_start_offset,
555                                          integ_start_offset, bi, async_next,
556                                          iv, tag, aad, flag);
557 }
558
559 /* when submitting a frame is failed, drop all buffers in the frame */
560 static_always_inline void
561 esp_async_recycle_failed_submit (vnet_crypto_async_frame_t * f,
562                                  vlib_buffer_t ** b, u16 * next,
563                                  u16 drop_next)
564 {
565   u32 n_drop = f->n_elts;
566   while (--n_drop)
567     {
568       (b - n_drop)[0]->error = ESP_ENCRYPT_ERROR_CRYPTO_ENGINE_ERROR;
569       (next - n_drop)[0] = drop_next;
570     }
571   vnet_crypto_async_reset_frame (f);
572 }
573
574 always_inline uword
575 esp_encrypt_inline (vlib_main_t * vm, vlib_node_runtime_t * node,
576                     vlib_frame_t * frame, int is_ip6, int is_tun,
577                     u16 async_next)
578 {
579   ipsec_main_t *im = &ipsec_main;
580   ipsec_per_thread_data_t *ptd = vec_elt_at_index (im->ptd, vm->thread_index);
581   u32 *from = vlib_frame_vector_args (frame);
582   u32 n_left = frame->n_vectors;
583   vlib_buffer_t *bufs[VLIB_FRAME_SIZE], **b = bufs;
584   u16 nexts[VLIB_FRAME_SIZE], *next = nexts;
585   esp_gcm_nonce_t nonces[VLIB_FRAME_SIZE], *nonce = nonces;
586   u32 thread_index = vm->thread_index;
587   u16 buffer_data_size = vlib_buffer_get_default_data_size (vm);
588   u32 current_sa_index = ~0, current_sa_packets = 0;
589   u32 current_sa_bytes = 0, spi = 0;
590   u8 block_sz = 0, iv_sz = 0, icv_sz = 0;
591   ipsec_sa_t *sa0 = 0;
592   vlib_buffer_t *lb;
593   vnet_crypto_op_t **crypto_ops = &ptd->crypto_ops;
594   vnet_crypto_op_t **integ_ops = &ptd->integ_ops;
595   vnet_crypto_async_frame_t *async_frame = 0;
596   int is_async = im->async_mode;
597   vnet_crypto_async_op_id_t last_async_op = ~0;
598   u16 drop_next = (is_ip6 ? ESP_ENCRYPT_NEXT_DROP6 : ESP_ENCRYPT_NEXT_DROP4);
599
600   vlib_get_buffers (vm, from, b, n_left);
601   if (!is_async)
602     {
603       vec_reset_length (ptd->crypto_ops);
604       vec_reset_length (ptd->integ_ops);
605       vec_reset_length (ptd->chained_crypto_ops);
606       vec_reset_length (ptd->chained_integ_ops);
607     }
608   vec_reset_length (ptd->chunks);
609
610   while (n_left > 0)
611     {
612       u32 sa_index0;
613       dpo_id_t *dpo;
614       esp_header_t *esp;
615       u8 *payload, *next_hdr_ptr;
616       u16 payload_len, payload_len_total, n_bufs;
617       u32 hdr_len;
618
619       if (n_left > 2)
620         {
621           u8 *p;
622           vlib_prefetch_buffer_header (b[2], LOAD);
623           p = vlib_buffer_get_current (b[1]);
624           CLIB_PREFETCH (p, CLIB_CACHE_LINE_BYTES, LOAD);
625           p -= CLIB_CACHE_LINE_BYTES;
626           CLIB_PREFETCH (p, CLIB_CACHE_LINE_BYTES, LOAD);
627         }
628
629       if (is_tun)
630         {
631           /* we are on a ipsec tunnel's feature arc */
632           vnet_buffer (b[0])->ipsec.sad_index =
633             sa_index0 = ipsec_tun_protect_get_sa_out
634             (vnet_buffer (b[0])->ip.adj_index[VLIB_TX]);
635         }
636       else
637         sa_index0 = vnet_buffer (b[0])->ipsec.sad_index;
638
639       if (sa_index0 != current_sa_index)
640         {
641           if (current_sa_packets)
642             vlib_increment_combined_counter (&ipsec_sa_counters, thread_index,
643                                              current_sa_index,
644                                              current_sa_packets,
645                                              current_sa_bytes);
646           current_sa_packets = current_sa_bytes = 0;
647
648           sa0 = pool_elt_at_index (im->sad, sa_index0);
649           current_sa_index = sa_index0;
650           spi = clib_net_to_host_u32 (sa0->spi);
651           block_sz = sa0->crypto_block_size;
652           icv_sz = sa0->integ_icv_size;
653           iv_sz = sa0->crypto_iv_size;
654
655           /* submit frame when op_id is different then the old one */
656           if (is_async && sa0->crypto_async_enc_op_id != last_async_op)
657             {
658               if (async_frame && async_frame->n_elts)
659                 {
660                   if (vnet_crypto_async_submit_open_frame (vm, async_frame)
661                       < 0)
662                     esp_async_recycle_failed_submit (async_frame, b,
663                                                      next, drop_next);
664                 }
665               async_frame =
666                 vnet_crypto_async_get_frame (vm, sa0->crypto_async_enc_op_id);
667               last_async_op = sa0->crypto_async_enc_op_id;
668             }
669         }
670
671       if (PREDICT_FALSE (~0 == sa0->encrypt_thread_index))
672         {
673           /* this is the first packet to use this SA, claim the SA
674            * for this thread. this could happen simultaneously on
675            * another thread */
676           clib_atomic_cmp_and_swap (&sa0->encrypt_thread_index, ~0,
677                                     ipsec_sa_assign_thread (thread_index));
678         }
679
680       if (PREDICT_TRUE (thread_index != sa0->encrypt_thread_index))
681         {
682           next[0] = (is_ip6 ?
683                      ESP_ENCRYPT_NEXT_HANDOFF6 : ESP_ENCRYPT_NEXT_HANDOFF4);
684           goto trace;
685         }
686
687       lb = b[0];
688       n_bufs = vlib_buffer_chain_linearize (vm, b[0]);
689       if (n_bufs == 0)
690         {
691           b[0]->error = node->errors[ESP_ENCRYPT_ERROR_NO_BUFFERS];
692           next[0] = drop_next;
693           goto trace;
694         }
695
696       if (n_bufs > 1)
697         {
698           crypto_ops = &ptd->chained_crypto_ops;
699           integ_ops = &ptd->chained_integ_ops;
700
701           /* find last buffer in the chain */
702           while (lb->flags & VLIB_BUFFER_NEXT_PRESENT)
703             lb = vlib_get_buffer (vm, lb->next_buffer);
704         }
705       else
706         {
707           crypto_ops = &ptd->crypto_ops;
708           integ_ops = &ptd->integ_ops;
709         }
710
711       if (PREDICT_FALSE (esp_seq_advance (sa0)))
712         {
713           b[0]->error = node->errors[ESP_ENCRYPT_ERROR_SEQ_CYCLED];
714           next[0] = drop_next;
715           goto trace;
716         }
717
718       /* space for IV */
719       hdr_len = iv_sz;
720
721       if (ipsec_sa_is_set_IS_TUNNEL (sa0))
722         {
723           payload = vlib_buffer_get_current (b[0]);
724           next_hdr_ptr = esp_add_footer_and_icv (vm, &lb, block_sz, icv_sz,
725                                                  next, node,
726                                                  buffer_data_size,
727                                                  vlib_buffer_length_in_chain
728                                                  (vm, b[0]));
729           if (!next_hdr_ptr)
730             {
731               b[0]->error = node->errors[ESP_ENCRYPT_ERROR_NO_BUFFERS];
732               next[0] = drop_next;
733               goto trace;
734             }
735           b[0]->flags &= ~VLIB_BUFFER_TOTAL_LENGTH_VALID;
736           payload_len = b[0]->current_length;
737           payload_len_total = vlib_buffer_length_in_chain (vm, b[0]);
738
739           /* ESP header */
740           hdr_len += sizeof (*esp);
741           esp = (esp_header_t *) (payload - hdr_len);
742
743           /* optional UDP header */
744           if (ipsec_sa_is_set_UDP_ENCAP (sa0))
745             {
746               hdr_len += sizeof (udp_header_t);
747               esp_fill_udp_hdr (sa0, (udp_header_t *) (payload - hdr_len),
748                                 payload_len_total + hdr_len);
749             }
750
751           /* IP header */
752           if (ipsec_sa_is_set_IS_TUNNEL_V6 (sa0))
753             {
754               ip6_header_t *ip6;
755               u16 len = sizeof (ip6_header_t);
756               hdr_len += len;
757               ip6 = (ip6_header_t *) (payload - hdr_len);
758               clib_memcpy_fast (ip6, &sa0->ip6_hdr, len);
759               *next_hdr_ptr = (is_ip6 ?
760                                IP_PROTOCOL_IPV6 : IP_PROTOCOL_IP_IN_IP);
761               len = payload_len_total + hdr_len - len;
762               ip6->payload_length = clib_net_to_host_u16 (len);
763             }
764           else
765             {
766               ip4_header_t *ip4;
767               u16 len = sizeof (ip4_header_t);
768               hdr_len += len;
769               ip4 = (ip4_header_t *) (payload - hdr_len);
770               clib_memcpy_fast (ip4, &sa0->ip4_hdr, len);
771               *next_hdr_ptr = (is_ip6 ?
772                                IP_PROTOCOL_IPV6 : IP_PROTOCOL_IP_IN_IP);
773               len = payload_len_total + hdr_len;
774               esp_update_ip4_hdr (ip4, len, /* is_transport */ 0, 0);
775             }
776
777           dpo = &sa0->dpo;
778           if (!is_tun)
779             {
780               next[0] = dpo->dpoi_next_node;
781               vnet_buffer (b[0])->ip.adj_index[VLIB_TX] = dpo->dpoi_index;
782             }
783           else
784             next[0] = ESP_ENCRYPT_NEXT_INTERFACE_OUTPUT;
785         }
786       else                      /* transport mode */
787         {
788           u8 *l2_hdr, l2_len, *ip_hdr, ip_len;
789           ip6_ext_header_t *ext_hdr;
790           udp_header_t *udp = 0;
791           u16 udp_len = 0;
792           u8 *old_ip_hdr = vlib_buffer_get_current (b[0]);
793
794           ip_len = is_ip6 ?
795             esp_get_ip6_hdr_len ((ip6_header_t *) old_ip_hdr, &ext_hdr) :
796             ip4_header_bytes ((ip4_header_t *) old_ip_hdr);
797
798           vlib_buffer_advance (b[0], ip_len);
799           payload = vlib_buffer_get_current (b[0]);
800           next_hdr_ptr = esp_add_footer_and_icv (vm, &lb, block_sz, icv_sz,
801                                                  next, node,
802                                                  buffer_data_size,
803                                                  vlib_buffer_length_in_chain
804                                                  (vm, b[0]));
805           if (!next_hdr_ptr)
806             goto trace;
807
808           b[0]->flags &= ~VLIB_BUFFER_TOTAL_LENGTH_VALID;
809           payload_len = b[0]->current_length;
810           payload_len_total = vlib_buffer_length_in_chain (vm, b[0]);
811
812           /* ESP header */
813           hdr_len += sizeof (*esp);
814           esp = (esp_header_t *) (payload - hdr_len);
815
816           /* optional UDP header */
817           if (ipsec_sa_is_set_UDP_ENCAP (sa0))
818             {
819               hdr_len += sizeof (udp_header_t);
820               udp = (udp_header_t *) (payload - hdr_len);
821             }
822
823           /* IP header */
824           hdr_len += ip_len;
825           ip_hdr = payload - hdr_len;
826
827           /* L2 header */
828           if (!is_tun)
829             {
830               l2_len = vnet_buffer (b[0])->ip.save_rewrite_length;
831               hdr_len += l2_len;
832               l2_hdr = payload - hdr_len;
833
834               /* copy l2 and ip header */
835               clib_memcpy_le32 (l2_hdr, old_ip_hdr - l2_len, l2_len);
836             }
837           else
838             l2_len = 0;
839
840           if (is_ip6)
841             {
842               ip6_header_t *ip6 = (ip6_header_t *) (old_ip_hdr);
843               if (PREDICT_TRUE (NULL == ext_hdr))
844                 {
845                   *next_hdr_ptr = ip6->protocol;
846                   ip6->protocol = IP_PROTOCOL_IPSEC_ESP;
847                 }
848               else
849                 {
850                   *next_hdr_ptr = ext_hdr->next_hdr;
851                   ext_hdr->next_hdr = IP_PROTOCOL_IPSEC_ESP;
852                 }
853               ip6->payload_length =
854                 clib_host_to_net_u16 (payload_len_total + hdr_len - l2_len -
855                                       sizeof (ip6_header_t));
856             }
857           else
858             {
859               u16 len;
860               ip4_header_t *ip4 = (ip4_header_t *) (old_ip_hdr);
861               *next_hdr_ptr = ip4->protocol;
862               len = payload_len_total + hdr_len - l2_len;
863               if (udp)
864                 {
865                   esp_update_ip4_hdr (ip4, len, /* is_transport */ 1, 1);
866                   udp_len = len - ip_len;
867                 }
868               else
869                 esp_update_ip4_hdr (ip4, len, /* is_transport */ 1, 0);
870             }
871
872           clib_memcpy_le64 (ip_hdr, old_ip_hdr, ip_len);
873
874           if (udp)
875             {
876               esp_fill_udp_hdr (sa0, udp, udp_len);
877             }
878
879           next[0] = ESP_ENCRYPT_NEXT_INTERFACE_OUTPUT;
880         }
881
882       esp->spi = spi;
883       esp->seq = clib_net_to_host_u32 (sa0->seq);
884
885       if (is_async)
886         {
887           if (PREDICT_FALSE (sa0->crypto_async_enc_op_id == 0))
888             goto trace;
889
890           if (esp_prepare_async_frame (vm, ptd, &async_frame, sa0, b[0], esp,
891                                        payload, payload_len, iv_sz,
892                                        icv_sz, from[b - bufs], next, hdr_len,
893                                        async_next, lb))
894             {
895               esp_async_recycle_failed_submit (async_frame, b, next,
896                                                drop_next);
897               goto trace;
898             }
899         }
900       else
901         {
902           esp_prepare_sync_op (vm, ptd, crypto_ops, integ_ops, sa0, payload,
903                                payload_len, iv_sz, icv_sz, bufs, b, lb,
904                                hdr_len, esp, nonce++);
905         }
906
907       vlib_buffer_advance (b[0], 0LL - hdr_len);
908
909       current_sa_packets += 1;
910       current_sa_bytes += payload_len_total;
911
912     trace:
913       if (PREDICT_FALSE (b[0]->flags & VLIB_BUFFER_IS_TRACED))
914         {
915           esp_encrypt_trace_t *tr = vlib_add_trace (vm, node, b[0],
916                                                     sizeof (*tr));
917           tr->sa_index = sa_index0;
918           tr->spi = sa0->spi;
919           tr->seq = sa0->seq;
920           tr->sa_seq_hi = sa0->seq_hi;
921           tr->udp_encap = ipsec_sa_is_set_UDP_ENCAP (sa0);
922           tr->crypto_alg = sa0->crypto_alg;
923           tr->integ_alg = sa0->integ_alg;
924         }
925       /* next */
926       n_left -= 1;
927       next += 1;
928       b += 1;
929     }
930
931   vlib_increment_combined_counter (&ipsec_sa_counters, thread_index,
932                                    current_sa_index, current_sa_packets,
933                                    current_sa_bytes);
934   if (!is_async)
935     {
936       esp_process_ops (vm, node, ptd->crypto_ops, bufs, nexts, drop_next);
937       esp_process_chained_ops (vm, node, ptd->chained_crypto_ops, bufs, nexts,
938                                ptd->chunks, drop_next);
939
940       esp_process_ops (vm, node, ptd->integ_ops, bufs, nexts, drop_next);
941       esp_process_chained_ops (vm, node, ptd->chained_integ_ops, bufs, nexts,
942                                ptd->chunks, drop_next);
943     }
944   else if (async_frame && async_frame->n_elts)
945     {
946       if (vnet_crypto_async_submit_open_frame (vm, async_frame) < 0)
947         esp_async_recycle_failed_submit (async_frame, b, next, drop_next);
948     }
949
950   vlib_node_increment_counter (vm, node->node_index,
951                                ESP_ENCRYPT_ERROR_RX_PKTS, frame->n_vectors);
952
953   vlib_buffer_enqueue_to_next (vm, node, from, nexts, frame->n_vectors);
954   return frame->n_vectors;
955 }
956
957 always_inline uword
958 esp_encrypt_post_inline (vlib_main_t * vm, vlib_node_runtime_t * node,
959                          vlib_frame_t * frame)
960 {
961   vlib_buffer_t *bufs[VLIB_FRAME_SIZE], **b = bufs;
962   u16 nexts[VLIB_FRAME_SIZE], *next = nexts;
963   u32 *from = vlib_frame_vector_args (frame);
964   u32 n_left = frame->n_vectors;
965
966   vlib_get_buffers (vm, from, b, n_left);
967
968   if (n_left >= 4)
969     {
970       vlib_prefetch_buffer_header (b[0], LOAD);
971       vlib_prefetch_buffer_header (b[1], LOAD);
972       vlib_prefetch_buffer_header (b[2], LOAD);
973       vlib_prefetch_buffer_header (b[3], LOAD);
974     }
975
976   while (n_left > 8)
977     {
978       vlib_prefetch_buffer_header (b[4], LOAD);
979       vlib_prefetch_buffer_header (b[5], LOAD);
980       vlib_prefetch_buffer_header (b[6], LOAD);
981       vlib_prefetch_buffer_header (b[7], LOAD);
982
983       next[0] = (esp_post_data (b[0]))->next_index;
984       next[1] = (esp_post_data (b[1]))->next_index;
985       next[2] = (esp_post_data (b[2]))->next_index;
986       next[3] = (esp_post_data (b[3]))->next_index;
987
988       if (PREDICT_FALSE (node->flags & VLIB_NODE_FLAG_TRACE))
989         {
990           if (b[0]->flags & VLIB_BUFFER_IS_TRACED)
991             {
992               esp_encrypt_post_trace_t *tr = vlib_add_trace (vm, node, b[0],
993                                                              sizeof (*tr));
994               tr->next_index = next[0];
995             }
996           if (b[1]->flags & VLIB_BUFFER_IS_TRACED)
997             {
998               esp_encrypt_post_trace_t *tr = vlib_add_trace (vm, node, b[1],
999                                                              sizeof (*tr));
1000               tr->next_index = next[1];
1001             }
1002           if (b[2]->flags & VLIB_BUFFER_IS_TRACED)
1003             {
1004               esp_encrypt_post_trace_t *tr = vlib_add_trace (vm, node, b[2],
1005                                                              sizeof (*tr));
1006               tr->next_index = next[2];
1007             }
1008           if (b[3]->flags & VLIB_BUFFER_IS_TRACED)
1009             {
1010               esp_encrypt_post_trace_t *tr = vlib_add_trace (vm, node, b[3],
1011                                                              sizeof (*tr));
1012               tr->next_index = next[3];
1013             }
1014         }
1015
1016       b += 4;
1017       next += 4;
1018       n_left -= 4;
1019     }
1020
1021   while (n_left > 0)
1022     {
1023       next[0] = (esp_post_data (b[0]))->next_index;
1024       if (PREDICT_FALSE (b[0]->flags & VLIB_BUFFER_IS_TRACED))
1025         {
1026           esp_encrypt_post_trace_t *tr = vlib_add_trace (vm, node, b[0],
1027                                                          sizeof (*tr));
1028           tr->next_index = next[0];
1029         }
1030
1031       b += 1;
1032       next += 1;
1033       n_left -= 1;
1034     }
1035
1036   vlib_node_increment_counter (vm, node->node_index,
1037                                ESP_ENCRYPT_ERROR_POST_RX_PKTS,
1038                                frame->n_vectors);
1039   vlib_buffer_enqueue_to_next (vm, node, from, nexts, frame->n_vectors);
1040   return frame->n_vectors;
1041 }
1042
1043 VLIB_NODE_FN (esp4_encrypt_node) (vlib_main_t * vm,
1044                                   vlib_node_runtime_t * node,
1045                                   vlib_frame_t * from_frame)
1046 {
1047   return esp_encrypt_inline (vm, node, from_frame, 0 /* is_ip6 */ , 0,
1048                              esp_encrypt_async_next.esp4_post_next);
1049 }
1050
1051 /* *INDENT-OFF* */
1052 VLIB_REGISTER_NODE (esp4_encrypt_node) = {
1053   .name = "esp4-encrypt",
1054   .vector_size = sizeof (u32),
1055   .format_trace = format_esp_encrypt_trace,
1056   .type = VLIB_NODE_TYPE_INTERNAL,
1057
1058   .n_errors = ARRAY_LEN(esp_encrypt_error_strings),
1059   .error_strings = esp_encrypt_error_strings,
1060
1061   .n_next_nodes = ESP_ENCRYPT_N_NEXT,
1062   .next_nodes = {
1063     [ESP_ENCRYPT_NEXT_DROP4] = "ip4-drop",
1064     [ESP_ENCRYPT_NEXT_DROP6] = "ip6-drop",
1065     [ESP_ENCRYPT_NEXT_HANDOFF4] = "esp4-encrypt-handoff",
1066     [ESP_ENCRYPT_NEXT_HANDOFF6] = "esp6-encrypt-handoff",
1067     [ESP_ENCRYPT_NEXT_INTERFACE_OUTPUT] = "interface-output",
1068     [ESP_ENCRYPT_NEXT_PENDING] = "esp-encrypt-pending",
1069   },
1070 };
1071 /* *INDENT-ON* */
1072
1073 VLIB_NODE_FN (esp4_encrypt_post_node) (vlib_main_t * vm,
1074                                        vlib_node_runtime_t * node,
1075                                        vlib_frame_t * from_frame)
1076 {
1077   return esp_encrypt_post_inline (vm, node, from_frame);
1078 }
1079
1080 /* *INDENT-OFF* */
1081 VLIB_REGISTER_NODE (esp4_encrypt_post_node) = {
1082   .name = "esp4-encrypt-post",
1083   .vector_size = sizeof (u32),
1084   .format_trace = format_esp_post_encrypt_trace,
1085   .type = VLIB_NODE_TYPE_INTERNAL,
1086   .sibling_of = "esp4-encrypt",
1087
1088   .n_errors = ARRAY_LEN(esp_encrypt_error_strings),
1089   .error_strings = esp_encrypt_error_strings,
1090 };
1091 /* *INDENT-ON* */
1092
1093 VLIB_NODE_FN (esp6_encrypt_node) (vlib_main_t * vm,
1094                                   vlib_node_runtime_t * node,
1095                                   vlib_frame_t * from_frame)
1096 {
1097   return esp_encrypt_inline (vm, node, from_frame, 1 /* is_ip6 */ , 0,
1098                              esp_encrypt_async_next.esp6_post_next);
1099 }
1100
1101 /* *INDENT-OFF* */
1102 VLIB_REGISTER_NODE (esp6_encrypt_node) = {
1103   .name = "esp6-encrypt",
1104   .vector_size = sizeof (u32),
1105   .format_trace = format_esp_encrypt_trace,
1106   .type = VLIB_NODE_TYPE_INTERNAL,
1107   .sibling_of = "esp4-encrypt",
1108
1109   .n_errors = ARRAY_LEN(esp_encrypt_error_strings),
1110   .error_strings = esp_encrypt_error_strings,
1111 };
1112 /* *INDENT-ON* */
1113
1114 VLIB_NODE_FN (esp6_encrypt_post_node) (vlib_main_t * vm,
1115                                        vlib_node_runtime_t * node,
1116                                        vlib_frame_t * from_frame)
1117 {
1118   return esp_encrypt_post_inline (vm, node, from_frame);
1119 }
1120
1121 /* *INDENT-OFF* */
1122 VLIB_REGISTER_NODE (esp6_encrypt_post_node) = {
1123   .name = "esp6-encrypt-post",
1124   .vector_size = sizeof (u32),
1125   .format_trace = format_esp_post_encrypt_trace,
1126   .type = VLIB_NODE_TYPE_INTERNAL,
1127   .sibling_of = "esp4-encrypt",
1128
1129   .n_errors = ARRAY_LEN(esp_encrypt_error_strings),
1130   .error_strings = esp_encrypt_error_strings,
1131 };
1132 /* *INDENT-ON* */
1133
1134 VLIB_NODE_FN (esp4_encrypt_tun_node) (vlib_main_t * vm,
1135                                       vlib_node_runtime_t * node,
1136                                       vlib_frame_t * from_frame)
1137 {
1138   return esp_encrypt_inline (vm, node, from_frame, 0 /* is_ip6 */ , 1,
1139                              esp_encrypt_async_next.esp4_tun_post_next);
1140 }
1141
1142 /* *INDENT-OFF* */
1143 VLIB_REGISTER_NODE (esp4_encrypt_tun_node) = {
1144   .name = "esp4-encrypt-tun",
1145   .vector_size = sizeof (u32),
1146   .format_trace = format_esp_encrypt_trace,
1147   .type = VLIB_NODE_TYPE_INTERNAL,
1148
1149   .n_errors = ARRAY_LEN(esp_encrypt_error_strings),
1150   .error_strings = esp_encrypt_error_strings,
1151
1152   .n_next_nodes = ESP_ENCRYPT_N_NEXT,
1153   .next_nodes = {
1154     [ESP_ENCRYPT_NEXT_DROP4] = "ip4-drop",
1155     [ESP_ENCRYPT_NEXT_DROP6] = "ip6-drop",
1156     [ESP_ENCRYPT_NEXT_HANDOFF4] = "esp4-encrypt-tun-handoff",
1157     [ESP_ENCRYPT_NEXT_HANDOFF6] = "error-drop",
1158     [ESP_ENCRYPT_NEXT_INTERFACE_OUTPUT] = "adj-midchain-tx",
1159     [ESP_ENCRYPT_NEXT_PENDING] = "esp-encrypt-pending",
1160   },
1161 };
1162
1163 VLIB_NODE_FN (esp4_encrypt_tun_post_node) (vlib_main_t * vm,
1164                                   vlib_node_runtime_t * node,
1165                                   vlib_frame_t * from_frame)
1166 {
1167   return esp_encrypt_post_inline (vm, node, from_frame);
1168 }
1169
1170 /* *INDENT-OFF* */
1171 VLIB_REGISTER_NODE (esp4_encrypt_tun_post_node) = {
1172   .name = "esp4-encrypt-tun-post",
1173   .vector_size = sizeof (u32),
1174   .format_trace = format_esp_post_encrypt_trace,
1175   .type = VLIB_NODE_TYPE_INTERNAL,
1176   .sibling_of = "esp4-encrypt-tun",
1177
1178   .n_errors = ARRAY_LEN(esp_encrypt_error_strings),
1179   .error_strings = esp_encrypt_error_strings,
1180 };
1181 /* *INDENT-ON* */
1182
1183 VLIB_NODE_FN (esp6_encrypt_tun_node) (vlib_main_t * vm,
1184                                       vlib_node_runtime_t * node,
1185                                       vlib_frame_t * from_frame)
1186 {
1187   return esp_encrypt_inline (vm, node, from_frame, 1 /* is_ip6 */ , 1,
1188                              esp_encrypt_async_next.esp6_tun_post_next);
1189 }
1190
1191 /* *INDENT-OFF* */
1192 VLIB_REGISTER_NODE (esp6_encrypt_tun_node) = {
1193   .name = "esp6-encrypt-tun",
1194   .vector_size = sizeof (u32),
1195   .format_trace = format_esp_encrypt_trace,
1196   .type = VLIB_NODE_TYPE_INTERNAL,
1197
1198   .n_errors = ARRAY_LEN(esp_encrypt_error_strings),
1199   .error_strings = esp_encrypt_error_strings,
1200
1201   .n_next_nodes = ESP_ENCRYPT_N_NEXT,
1202   .next_nodes = {
1203     [ESP_ENCRYPT_NEXT_DROP4] = "ip4-drop",
1204     [ESP_ENCRYPT_NEXT_DROP6] = "ip6-drop",
1205     [ESP_ENCRYPT_NEXT_HANDOFF4] = "error-drop",
1206     [ESP_ENCRYPT_NEXT_HANDOFF6] = "esp6-encrypt-tun-handoff",
1207     [ESP_ENCRYPT_NEXT_PENDING] = "esp-encrypt-pending",
1208     [ESP_ENCRYPT_NEXT_INTERFACE_OUTPUT] = "adj-midchain-tx",
1209   },
1210 };
1211
1212 /* *INDENT-ON* */
1213
1214 VLIB_NODE_FN (esp6_encrypt_tun_post_node) (vlib_main_t * vm,
1215                                            vlib_node_runtime_t * node,
1216                                            vlib_frame_t * from_frame)
1217 {
1218   return esp_encrypt_post_inline (vm, node, from_frame);
1219 }
1220
1221 /* *INDENT-OFF* */
1222 VLIB_REGISTER_NODE (esp6_encrypt_tun_post_node) = {
1223   .name = "esp6-encrypt-tun-post",
1224   .vector_size = sizeof (u32),
1225   .format_trace = format_esp_post_encrypt_trace,
1226   .type = VLIB_NODE_TYPE_INTERNAL,
1227   .sibling_of = "esp6-encrypt-tun",
1228
1229   .n_errors = ARRAY_LEN(esp_encrypt_error_strings),
1230   .error_strings = esp_encrypt_error_strings,
1231 };
1232 /* *INDENT-ON* */
1233
1234 typedef struct
1235 {
1236   u32 sa_index;
1237 } esp_no_crypto_trace_t;
1238
1239 static u8 *
1240 format_esp_no_crypto_trace (u8 * s, va_list * args)
1241 {
1242   CLIB_UNUSED (vlib_main_t * vm) = va_arg (*args, vlib_main_t *);
1243   CLIB_UNUSED (vlib_node_t * node) = va_arg (*args, vlib_node_t *);
1244   esp_no_crypto_trace_t *t = va_arg (*args, esp_no_crypto_trace_t *);
1245
1246   s = format (s, "esp-no-crypto: sa-index %u", t->sa_index);
1247
1248   return s;
1249 }
1250
1251 enum
1252 {
1253   ESP_NO_CRYPTO_NEXT_DROP,
1254   ESP_NO_CRYPTO_N_NEXT,
1255 };
1256
1257 enum
1258 {
1259   ESP_NO_CRYPTO_ERROR_RX_PKTS,
1260 };
1261
1262 static char *esp_no_crypto_error_strings[] = {
1263   "Outbound ESP packets received",
1264 };
1265
1266 always_inline uword
1267 esp_no_crypto_inline (vlib_main_t * vm, vlib_node_runtime_t * node,
1268                       vlib_frame_t * frame)
1269 {
1270   vlib_buffer_t *bufs[VLIB_FRAME_SIZE], **b = bufs;
1271   u32 *from = vlib_frame_vector_args (frame);
1272   u32 n_left = frame->n_vectors;
1273
1274   vlib_get_buffers (vm, from, b, n_left);
1275
1276   while (n_left > 0)
1277     {
1278       u32 sa_index0;
1279
1280       /* packets are always going to be dropped, but get the sa_index */
1281       sa_index0 = ipsec_tun_protect_get_sa_out
1282         (vnet_buffer (b[0])->ip.adj_index[VLIB_TX]);
1283
1284       if (PREDICT_FALSE (b[0]->flags & VLIB_BUFFER_IS_TRACED))
1285         {
1286           esp_no_crypto_trace_t *tr = vlib_add_trace (vm, node, b[0],
1287                                                       sizeof (*tr));
1288           tr->sa_index = sa_index0;
1289         }
1290
1291       n_left -= 1;
1292       b += 1;
1293     }
1294
1295   vlib_node_increment_counter (vm, node->node_index,
1296                                ESP_NO_CRYPTO_ERROR_RX_PKTS, frame->n_vectors);
1297
1298   vlib_buffer_enqueue_to_single_next (vm, node, from,
1299                                       ESP_NO_CRYPTO_NEXT_DROP,
1300                                       frame->n_vectors);
1301
1302   return frame->n_vectors;
1303 }
1304
1305 VLIB_NODE_FN (esp4_no_crypto_tun_node) (vlib_main_t * vm,
1306                                         vlib_node_runtime_t * node,
1307                                         vlib_frame_t * from_frame)
1308 {
1309   return esp_no_crypto_inline (vm, node, from_frame);
1310 }
1311
1312 /* *INDENT-OFF* */
1313 VLIB_REGISTER_NODE (esp4_no_crypto_tun_node) =
1314 {
1315   .name = "esp4-no-crypto",
1316   .vector_size = sizeof (u32),
1317   .format_trace = format_esp_no_crypto_trace,
1318   .n_errors = ARRAY_LEN(esp_no_crypto_error_strings),
1319   .error_strings = esp_no_crypto_error_strings,
1320   .n_next_nodes = ESP_NO_CRYPTO_N_NEXT,
1321   .next_nodes = {
1322     [ESP_NO_CRYPTO_NEXT_DROP] = "ip4-drop",
1323   },
1324 };
1325
1326 VLIB_NODE_FN (esp6_no_crypto_tun_node) (vlib_main_t * vm,
1327                                         vlib_node_runtime_t * node,
1328                                         vlib_frame_t * from_frame)
1329 {
1330   return esp_no_crypto_inline (vm, node, from_frame);
1331 }
1332
1333 /* *INDENT-OFF* */
1334 VLIB_REGISTER_NODE (esp6_no_crypto_tun_node) =
1335 {
1336   .name = "esp6-no-crypto",
1337   .vector_size = sizeof (u32),
1338   .format_trace = format_esp_no_crypto_trace,
1339   .n_errors = ARRAY_LEN(esp_no_crypto_error_strings),
1340   .error_strings = esp_no_crypto_error_strings,
1341   .n_next_nodes = ESP_NO_CRYPTO_N_NEXT,
1342   .next_nodes = {
1343     [ESP_NO_CRYPTO_NEXT_DROP] = "ip6-drop",
1344   },
1345 };
1346 /* *INDENT-ON* */
1347
1348 VLIB_NODE_FN (esp_encrypt_pending_node) (vlib_main_t * vm,
1349                                          vlib_node_runtime_t * node,
1350                                          vlib_frame_t * from_frame)
1351 {
1352   return from_frame->n_vectors;
1353 }
1354
1355 /* *INDENT-OFF* */
1356 VLIB_REGISTER_NODE (esp_encrypt_pending_node) = {
1357   .name = "esp-encrypt-pending",
1358   .vector_size = sizeof (u32),
1359   .type = VLIB_NODE_TYPE_INTERNAL,
1360
1361   .n_next_nodes = 0
1362 };
1363 /* *INDENT-ON* */
1364
1365 /*
1366  * fd.io coding-style-patch-verification: ON
1367  *
1368  * Local Variables:
1369  * eval: (c-set-style "gnu")
1370  * End:
1371  */