9aa5654c9da501c886afe02e897a1c4efdf4feb3
[vpp.git] / src / vnet / ipsec / ipsec_input.c
1 /*
2  * decap.c : IPSec tunnel decapsulation
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/feature/feature.h>
22
23 #include <vnet/ipsec/ipsec.h>
24 #include <vnet/ipsec/esp.h>
25 #include <vnet/ipsec/ah.h>
26
27 #define foreach_ipsec_input_error                   \
28  _(RX_PKTS, "IPSEC pkts received")                  \
29  _(DECRYPTION_FAILED, "IPSEC decryption failed")
30
31 typedef enum
32 {
33 #define _(sym,str) IPSEC_INPUT_ERROR_##sym,
34   foreach_ipsec_input_error
35 #undef _
36     IPSEC_INPUT_N_ERROR,
37 } ipsec_input_error_t;
38
39 static char *ipsec_input_error_strings[] = {
40 #define _(sym,string) string,
41   foreach_ipsec_input_error
42 #undef _
43 };
44
45 typedef struct
46 {
47   u32 sa_id;
48   u32 spi;
49   u32 seq;
50 } ipsec_input_trace_t;
51
52 /* packet trace format function */
53 static u8 *
54 format_ipsec_input_trace (u8 * s, va_list * args)
55 {
56   CLIB_UNUSED (vlib_main_t * vm) = va_arg (*args, vlib_main_t *);
57   CLIB_UNUSED (vlib_node_t * node) = va_arg (*args, vlib_node_t *);
58   ipsec_input_trace_t *t = va_arg (*args, ipsec_input_trace_t *);
59
60   if (t->spi == 0 && t->seq == 0)
61     {
62       s = format (s, "esp: no esp packet");
63       return s;
64     }
65
66   if (t->sa_id != 0)
67     {
68       s = format (s, "esp: sa_id %u spi %u seq %u", t->sa_id, t->spi, t->seq);
69     }
70   else
71     {
72       s = format (s, "esp: no sa spi %u seq %u", t->spi, t->seq);
73     }
74   return s;
75 }
76
77 always_inline ipsec_policy_t *
78 ipsec_input_protect_policy_match (ipsec_spd_t * spd, u32 sa, u32 da, u32 spi)
79 {
80   ipsec_main_t *im = &ipsec_main;
81   ipsec_policy_t *p;
82   ipsec_sa_t *s;
83   u32 *i;
84
85   vec_foreach (i, spd->ipv4_inbound_protect_policy_indices)
86   {
87     p = pool_elt_at_index (spd->policies, *i);
88     s = pool_elt_at_index (im->sad, p->sa_index);
89
90     if (spi != s->spi)
91       continue;
92
93     if (s->is_tunnel)
94       {
95         if (da != clib_net_to_host_u32 (s->tunnel_dst_addr.ip4.as_u32))
96           continue;
97
98         if (sa != clib_net_to_host_u32 (s->tunnel_src_addr.ip4.as_u32))
99           continue;
100
101         return p;
102       }
103
104     if (da < clib_net_to_host_u32 (p->laddr.start.ip4.as_u32))
105       continue;
106
107     if (da > clib_net_to_host_u32 (p->laddr.stop.ip4.as_u32))
108       continue;
109
110     if (sa < clib_net_to_host_u32 (p->raddr.start.ip4.as_u32))
111       continue;
112
113     if (sa > clib_net_to_host_u32 (p->raddr.stop.ip4.as_u32))
114       continue;
115
116     return p;
117   }
118   return 0;
119 }
120
121 always_inline uword
122 ip6_addr_match_range (ip6_address_t * a, ip6_address_t * la,
123                       ip6_address_t * ua)
124 {
125   if ((memcmp (a->as_u64, la->as_u64, 2 * sizeof (u64)) >= 0) &&
126       (memcmp (a->as_u64, ua->as_u64, 2 * sizeof (u64)) <= 0))
127     return 1;
128   return 0;
129 }
130
131 always_inline ipsec_policy_t *
132 ipsec_input_ip6_protect_policy_match (ipsec_spd_t * spd,
133                                       ip6_address_t * sa,
134                                       ip6_address_t * da, u32 spi)
135 {
136   ipsec_main_t *im = &ipsec_main;
137   ipsec_policy_t *p;
138   ipsec_sa_t *s;
139   u32 *i;
140
141   vec_foreach (i, spd->ipv6_inbound_protect_policy_indices)
142   {
143     p = pool_elt_at_index (spd->policies, *i);
144     s = pool_elt_at_index (im->sad, p->sa_index);
145
146     if (spi != s->spi)
147       continue;
148
149     if (s->is_tunnel)
150       {
151         if (!ip6_address_is_equal (sa, &s->tunnel_src_addr.ip6))
152           continue;
153
154         if (!ip6_address_is_equal (da, &s->tunnel_dst_addr.ip6))
155           continue;
156
157         return p;
158       }
159
160     if (!ip6_addr_match_range (sa, &p->raddr.start.ip6, &p->raddr.stop.ip6))
161       continue;
162
163     if (!ip6_addr_match_range (da, &p->laddr.start.ip6, &p->laddr.stop.ip6))
164       continue;
165
166     return p;
167   }
168   return 0;
169 }
170
171 static vlib_node_registration_t ipsec_input_ip4_node;
172
173 static uword
174 ipsec_input_ip4_node_fn (vlib_main_t * vm,
175                          vlib_node_runtime_t * node,
176                          vlib_frame_t * from_frame)
177 {
178   u32 n_left_from, *from, next_index, *to_next;
179   ipsec_main_t *im = &ipsec_main;
180
181   from = vlib_frame_vector_args (from_frame);
182   n_left_from = from_frame->n_vectors;
183
184   next_index = node->cached_next_index;
185
186   while (n_left_from > 0)
187     {
188       u32 n_left_to_next;
189
190       vlib_get_next_frame (vm, node, next_index, to_next, n_left_to_next);
191
192       while (n_left_from > 0 && n_left_to_next > 0)
193         {
194           u32 bi0, next0;
195           vlib_buffer_t *b0;
196           ip4_header_t *ip0;
197           esp_header_t *esp0;
198           ah_header_t *ah0;
199           ip4_ipsec_config_t *c0;
200           ipsec_spd_t *spd0;
201           ipsec_policy_t *p0 = 0;
202
203           bi0 = to_next[0] = from[0];
204           from += 1;
205           n_left_from -= 1;
206           to_next += 1;
207           n_left_to_next -= 1;
208
209           b0 = vlib_get_buffer (vm, bi0);
210           c0 =
211             vnet_feature_next_with_data (vnet_buffer (b0)->sw_if_index
212                                          [VLIB_RX], &next0, b0,
213                                          sizeof (c0[0]));
214
215           spd0 = pool_elt_at_index (im->spds, c0->spd_index);
216
217           ip0 = vlib_buffer_get_current (b0);
218
219           if (PREDICT_TRUE (ip0->protocol == IP_PROTOCOL_IPSEC_ESP))
220             {
221 #if 0
222               clib_warning
223                 ("packet received from %U to %U spi %u size %u spd_id %u",
224                  format_ip4_address, ip0->src_address.as_u8,
225                  format_ip4_address, ip0->dst_address.as_u8,
226                  clib_net_to_host_u32 (esp0->spi),
227                  clib_net_to_host_u16 (ip0->length), spd0->id);
228 #endif
229
230               esp0 = (esp_header_t *) ((u8 *) ip0 + ip4_header_bytes (ip0));
231               p0 = ipsec_input_protect_policy_match (spd0,
232                                                      clib_net_to_host_u32
233                                                      (ip0->src_address.
234                                                       as_u32),
235                                                      clib_net_to_host_u32
236                                                      (ip0->dst_address.
237                                                       as_u32),
238                                                      clib_net_to_host_u32
239                                                      (esp0->spi));
240
241               if (PREDICT_TRUE (p0 != 0))
242                 {
243                   p0->counter.packets++;
244                   p0->counter.bytes += clib_net_to_host_u16 (ip0->length);
245                   vnet_buffer (b0)->ipsec.sad_index = p0->sa_index;
246                   vnet_buffer (b0)->ipsec.flags = 0;
247                   next0 = im->esp_decrypt_next_index;
248                   vlib_buffer_advance (b0, ip4_header_bytes (ip0));
249                   goto trace0;
250                 }
251
252               /* FIXME bypass and discard */
253             trace0:
254               if (PREDICT_FALSE (b0->flags & VLIB_BUFFER_IS_TRACED))
255                 {
256                   ipsec_input_trace_t *tr =
257                     vlib_add_trace (vm, node, b0, sizeof (*tr));
258                   if (ip0->protocol == IP_PROTOCOL_IPSEC_ESP)
259                     {
260                       if (p0)
261                         tr->sa_id = p0->sa_id;
262                       tr->spi = clib_host_to_net_u32 (esp0->spi);
263                       tr->seq = clib_host_to_net_u32 (esp0->seq);
264                     }
265                 }
266
267             }
268
269
270           if (PREDICT_TRUE (ip0->protocol == IP_PROTOCOL_IPSEC_AH))
271             {
272               ah0 = (ah_header_t *) ((u8 *) ip0 + ip4_header_bytes (ip0));
273               p0 = ipsec_input_protect_policy_match (spd0,
274                                                      clib_net_to_host_u32
275                                                      (ip0->src_address.
276                                                       as_u32),
277                                                      clib_net_to_host_u32
278                                                      (ip0->dst_address.
279                                                       as_u32),
280                                                      clib_net_to_host_u32
281                                                      (ah0->spi));
282
283               if (PREDICT_TRUE (p0 != 0))
284                 {
285                   p0->counter.packets++;
286                   p0->counter.bytes += clib_net_to_host_u16 (ip0->length);
287                   vnet_buffer (b0)->ipsec.sad_index = p0->sa_index;
288                   vnet_buffer (b0)->ipsec.flags = 0;
289                   next0 = im->ah_decrypt_next_index;
290                   goto trace1;
291                 }
292               /* FIXME bypass and discard */
293             trace1:
294               if (PREDICT_FALSE (b0->flags & VLIB_BUFFER_IS_TRACED))
295                 {
296                   ipsec_input_trace_t *tr =
297                     vlib_add_trace (vm, node, b0, sizeof (*tr));
298                   if (ip0->protocol == IP_PROTOCOL_IPSEC_ESP)
299                     {
300                       if (p0)
301                         tr->sa_id = p0->sa_id;
302                       tr->spi = clib_host_to_net_u32 (ah0->spi);
303                       tr->seq = clib_host_to_net_u32 (ah0->seq_no);
304                     }
305                 }
306             }
307
308           vlib_validate_buffer_enqueue_x1 (vm, node, next_index,
309                                            to_next, n_left_to_next, bi0,
310                                            next0);
311         }
312       vlib_put_next_frame (vm, node, next_index, n_left_to_next);
313     }
314   vlib_node_increment_counter (vm, ipsec_input_ip4_node.index,
315                                IPSEC_INPUT_ERROR_RX_PKTS,
316                                from_frame->n_vectors);
317
318   return from_frame->n_vectors;
319 }
320
321
322 /* *INDENT-OFF* */
323 VLIB_REGISTER_NODE (ipsec_input_ip4_node,static) = {
324   .function = ipsec_input_ip4_node_fn,
325   .name = "ipsec-input-ip4",
326   .vector_size = sizeof (u32),
327   .format_trace = format_ipsec_input_trace,
328   .type = VLIB_NODE_TYPE_INTERNAL,
329
330   .n_errors = ARRAY_LEN(ipsec_input_error_strings),
331   .error_strings = ipsec_input_error_strings,
332
333   .n_next_nodes = IPSEC_INPUT_N_NEXT,
334   .next_nodes = {
335 #define _(s,n) [IPSEC_INPUT_NEXT_##s] = n,
336     foreach_ipsec_input_next
337 #undef _
338   },
339 };
340 /* *INDENT-ON* */
341
342 VLIB_NODE_FUNCTION_MULTIARCH (ipsec_input_ip4_node, ipsec_input_ip4_node_fn)
343      static vlib_node_registration_t ipsec_input_ip6_node;
344
345      static uword
346        ipsec_input_ip6_node_fn (vlib_main_t * vm,
347                                 vlib_node_runtime_t * node,
348                                 vlib_frame_t * from_frame)
349 {
350   u32 n_left_from, *from, next_index, *to_next;
351   ipsec_main_t *im = &ipsec_main;
352
353   from = vlib_frame_vector_args (from_frame);
354   n_left_from = from_frame->n_vectors;
355
356   next_index = node->cached_next_index;
357
358   while (n_left_from > 0)
359     {
360       u32 n_left_to_next;
361
362       vlib_get_next_frame (vm, node, next_index, to_next, n_left_to_next);
363
364       while (n_left_from > 0 && n_left_to_next > 0)
365         {
366           u32 bi0, next0;
367           vlib_buffer_t *b0;
368           ip6_header_t *ip0;
369           esp_header_t *esp0;
370           ip4_ipsec_config_t *c0;
371           ipsec_spd_t *spd0;
372           ipsec_policy_t *p0 = 0;
373           u32 header_size = sizeof (ip0[0]);
374
375           bi0 = to_next[0] = from[0];
376           from += 1;
377           n_left_from -= 1;
378           to_next += 1;
379           n_left_to_next -= 1;
380
381           b0 = vlib_get_buffer (vm, bi0);
382           c0 =
383             vnet_feature_next_with_data (vnet_buffer (b0)->sw_if_index
384                                          [VLIB_RX], &next0, b0,
385                                          sizeof (c0[0]));
386
387           spd0 = pool_elt_at_index (im->spds, c0->spd_index);
388
389           ip0 = vlib_buffer_get_current (b0);
390           esp0 = (esp_header_t *) ((u8 *) ip0 + header_size);
391
392           if (PREDICT_TRUE (ip0->protocol == IP_PROTOCOL_IPSEC_ESP))
393             {
394 #if 0
395               clib_warning
396                 ("packet received from %U to %U spi %u size %u spd_id %u",
397                  format_ip6_address, &ip0->src_address, format_ip6_address,
398                  &ip0->dst_address, clib_net_to_host_u32 (esp0->spi),
399                  clib_net_to_host_u16 (ip0->payload_length) + header_size,
400                  spd0->id);
401 #endif
402               p0 = ipsec_input_ip6_protect_policy_match (spd0,
403                                                          &ip0->src_address,
404                                                          &ip0->dst_address,
405                                                          clib_net_to_host_u32
406                                                          (esp0->spi));
407
408               if (PREDICT_TRUE (p0 != 0))
409                 {
410                   p0->counter.packets++;
411                   p0->counter.bytes +=
412                     clib_net_to_host_u16 (ip0->payload_length);
413                   p0->counter.bytes += header_size;
414                   vnet_buffer (b0)->ipsec.sad_index = p0->sa_index;
415                   vnet_buffer (b0)->ipsec.flags = 0;
416                   next0 = im->esp_decrypt_next_index;
417                   vlib_buffer_advance (b0, header_size);
418                   goto trace0;
419                 }
420             }
421
422         trace0:
423           if (PREDICT_FALSE (b0->flags & VLIB_BUFFER_IS_TRACED))
424             {
425               ipsec_input_trace_t *tr =
426                 vlib_add_trace (vm, node, b0, sizeof (*tr));
427               if (ip0->protocol == IP_PROTOCOL_IPSEC_ESP)
428                 {
429                   if (p0)
430                     tr->sa_id = p0->sa_id;
431                   tr->spi = clib_host_to_net_u32 (esp0->spi);
432                   tr->seq = clib_host_to_net_u32 (esp0->seq);
433                 }
434             }
435
436           vlib_validate_buffer_enqueue_x1 (vm, node, next_index, to_next,
437                                            n_left_to_next, bi0, next0);
438         }
439       vlib_put_next_frame (vm, node, next_index, n_left_to_next);
440     }
441   vlib_node_increment_counter (vm, ipsec_input_ip6_node.index,
442                                IPSEC_INPUT_ERROR_RX_PKTS,
443                                from_frame->n_vectors);
444
445   return from_frame->n_vectors;
446 }
447
448
449 /* *INDENT-OFF* */
450 VLIB_REGISTER_NODE (ipsec_input_ip6_node,static) = {
451   .function = ipsec_input_ip6_node_fn,
452   .name = "ipsec-input-ip6",
453   .vector_size = sizeof (u32),
454   .format_trace = format_ipsec_input_trace,
455   .type = VLIB_NODE_TYPE_INTERNAL,
456
457   .n_errors = ARRAY_LEN(ipsec_input_error_strings),
458   .error_strings = ipsec_input_error_strings,
459
460   .sibling_of = "ipsec-input-ip4",
461 };
462 /* *INDENT-ON* */
463
464 VLIB_NODE_FUNCTION_MULTIARCH (ipsec_input_ip6_node, ipsec_input_ip6_node_fn)
465 /*
466  * fd.io coding-style-patch-verification: ON
467  *
468  * Local Variables:
469  * eval: (c-set-style "gnu")
470  * End:
471  */