FD.io VPP  v18.01.2-1-g9b554f3
Vector Packet Processing
ah_encrypt.c
Go to the documentation of this file.
1 /*
2  * ah_encrypt.c : IPSec AH 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 
22 #include <vnet/ipsec/ipsec.h>
23 #include <vnet/ipsec/esp.h>
24 #include <vnet/ipsec/ah.h>
25 
26 #define foreach_ah_encrypt_next \
27 _(DROP, "error-drop") \
28 _(IP4_LOOKUP, "ip4-lookup") \
29 _(IP6_LOOKUP, "ip6-lookup") \
30 _(INTERFACE_OUTPUT, "interface-output")
31 
32 #define _(v, s) AH_ENCRYPT_NEXT_##v,
33 typedef enum
34 {
36 #undef _
39 
40 #define foreach_ah_encrypt_error \
41  _(RX_PKTS, "AH pkts received") \
42  _(SEQ_CYCLED, "sequence number cycled")
43 
44 
45 typedef enum
46 {
47 #define _(sym,str) AH_ENCRYPT_ERROR_##sym,
49 #undef _
52 
53 static char *ah_encrypt_error_strings[] = {
54 #define _(sym,string) string,
56 #undef _
57 };
58 
60 
61 typedef struct
62 {
67 
68 /* packet trace format function */
69 static u8 *
70 format_ah_encrypt_trace (u8 * s, va_list * args)
71 {
72  CLIB_UNUSED (vlib_main_t * vm) = va_arg (*args, vlib_main_t *);
73  CLIB_UNUSED (vlib_node_t * node) = va_arg (*args, vlib_node_t *);
74  ah_encrypt_trace_t *t = va_arg (*args, ah_encrypt_trace_t *);
75 
76  s = format (s, "ah: spi %u seq %u integrity %U",
78  return s;
79 }
80 
81 static uword
83  vlib_node_runtime_t * node, vlib_frame_t * from_frame)
84 {
85  u32 n_left_from, *from, *to_next = 0, next_index;
86  int icv_size = 0;
87  from = vlib_frame_vector_args (from_frame);
88  n_left_from = from_frame->n_vectors;
89  ipsec_main_t *im = &ipsec_main;
91  next_index = node->cached_next_index;
92 
93  while (n_left_from > 0)
94  {
95  u32 n_left_to_next;
96 
97  vlib_get_next_frame (vm, node, next_index, to_next, n_left_to_next);
98 
99  while (n_left_from > 0 && n_left_to_next > 0)
100  {
101  u32 i_bi0, next0;
102  vlib_buffer_t *i_b0 = 0;
103  u32 sa_index0;
104  ipsec_sa_t *sa0;
105  ip4_and_ah_header_t *ih0, *oh0 = 0;
106  ip6_and_ah_header_t *ih6_0, *oh6_0 = 0;
107  u8 is_ipv6;
108  u8 ip_hdr_size;
109  u8 next_hdr_type;
110  u8 transport_mode = 0;
111  u8 tos = 0;
112  u8 ttl = 0;
113 
114  i_bi0 = from[0];
115  from += 1;
116  n_left_from -= 1;
117  n_left_to_next -= 1;
118  next0 = AH_ENCRYPT_NEXT_DROP;
119 
120  i_b0 = vlib_get_buffer (vm, i_bi0);
121  to_next[0] = i_bi0;
122  to_next += 1;
123  sa_index0 = vnet_buffer (i_b0)->ipsec.sad_index;
124  sa0 = pool_elt_at_index (im->sad, sa_index0);
125 
126  if (PREDICT_FALSE (esp_seq_advance (sa0)))
127  {
128  clib_warning ("sequence number counter has cycled SPI %u",
129  sa0->spi);
131  AH_ENCRYPT_ERROR_SEQ_CYCLED, 1);
132  //TODO need to confirm if below is needed
133  to_next[0] = i_bi0;
134  to_next += 1;
135  goto trace;
136  }
137 
138 
139  sa0->total_data_size += i_b0->current_length;
140 
141  ssize_t adv;
142  ih0 = vlib_buffer_get_current (i_b0);
143  ttl = ih0->ip4.ttl;
144  tos = ih0->ip4.tos;
145 
146  is_ipv6 = (ih0->ip4.ip_version_and_header_length & 0xF0) == 0x60;
147  /* is ipv6 */
148  if (PREDICT_TRUE (sa0->is_tunnel))
149  {
150  if (PREDICT_TRUE (!is_ipv6))
151  adv = -sizeof (ip4_and_ah_header_t);
152  else
153  adv = -sizeof (ip6_and_ah_header_t);
154  }
155  else
156  {
157  adv = -sizeof (ah_header_t);
158  }
159 
160  icv_size =
162  /*transport mode save the eth header before it is overwritten */
163  if (PREDICT_FALSE (!sa0->is_tunnel))
164  {
166  ((u8 *) vlib_buffer_get_current (i_b0) -
167  sizeof (ethernet_header_t));
168  ethernet_header_t *oeh0 =
169  (ethernet_header_t *) ((u8 *) ieh0 + (adv - icv_size));
170  clib_memcpy (oeh0, ieh0, sizeof (ethernet_header_t));
171  }
172 
173  vlib_buffer_advance (i_b0, adv - icv_size);
174 
175  /* is ipv6 */
176  if (PREDICT_FALSE (is_ipv6))
177  {
178  ih6_0 = (ip6_and_ah_header_t *) ih0;
179  ip_hdr_size = sizeof (ip6_header_t);
180  oh6_0 = vlib_buffer_get_current (i_b0);
181 
182  if (PREDICT_TRUE (sa0->is_tunnel))
183  {
184  next_hdr_type = IP_PROTOCOL_IPV6;
185  oh6_0->ip6.ip_version_traffic_class_and_flow_label =
186  ih6_0->ip6.ip_version_traffic_class_and_flow_label;
187  }
188  else
189  {
190  next_hdr_type = ih6_0->ip6.protocol;
191  memmove (oh6_0, ih6_0, sizeof (ip6_header_t));
192  }
193 
194  oh6_0->ip6.protocol = IP_PROTOCOL_IPSEC_AH;
195  oh6_0->ip6.hop_limit = 254;
196  oh6_0->ah.spi = clib_net_to_host_u32 (sa0->spi);
197  oh6_0->ah.seq_no = clib_net_to_host_u32 (sa0->seq);
198  oh6_0->ip6.payload_length =
199  clib_host_to_net_u16 (vlib_buffer_length_in_chain (vm, i_b0) -
200  sizeof (ip6_header_t));
201  }
202  else
203  {
204  ip_hdr_size = sizeof (ip4_header_t);
205  oh0 = vlib_buffer_get_current (i_b0);
206  memset (oh0, 0, sizeof (ip4_and_ah_header_t));
207 
208  if (PREDICT_TRUE (sa0->is_tunnel))
209  {
210  next_hdr_type = IP_PROTOCOL_IP_IN_IP;
211  }
212  else
213  {
214  next_hdr_type = ih0->ip4.protocol;
215  memmove (oh0, ih0, sizeof (ip4_header_t));
216  }
217 
218  oh0->ip4.length =
219  clib_host_to_net_u16 (vlib_buffer_length_in_chain (vm, i_b0));
220  oh0->ip4.ip_version_and_header_length = 0x45;
221  oh0->ip4.fragment_id = 0;
222  oh0->ip4.flags_and_fragment_offset = 0;
223  oh0->ip4.ttl = 0;
224  oh0->ip4.tos = 0;
225  oh0->ip4.protocol = IP_PROTOCOL_IPSEC_AH;
226  oh0->ah.spi = clib_net_to_host_u32 (sa0->spi);
227  oh0->ah.seq_no = clib_net_to_host_u32 (sa0->seq);
228  oh0->ip4.checksum = 0;
229  oh0->ah.nexthdr = next_hdr_type;
230  oh0->ah.hdrlen = 4;
231  }
232 
233 
234 
235  if (PREDICT_TRUE
236  (!is_ipv6 && sa0->is_tunnel && !sa0->is_tunnel_ip6))
237  {
238  oh0->ip4.src_address.as_u32 = sa0->tunnel_src_addr.ip4.as_u32;
239  oh0->ip4.dst_address.as_u32 = sa0->tunnel_dst_addr.ip4.as_u32;
240 
241  next0 = AH_ENCRYPT_NEXT_IP4_LOOKUP;
242  vnet_buffer (i_b0)->sw_if_index[VLIB_TX] = (u32) ~ 0;
243  }
244  else if (is_ipv6 && sa0->is_tunnel && sa0->is_tunnel_ip6)
245  {
246  oh6_0->ip6.src_address.as_u64[0] =
247  sa0->tunnel_src_addr.ip6.as_u64[0];
248  oh6_0->ip6.src_address.as_u64[1] =
249  sa0->tunnel_src_addr.ip6.as_u64[1];
250  oh6_0->ip6.dst_address.as_u64[0] =
251  sa0->tunnel_dst_addr.ip6.as_u64[0];
252  oh6_0->ip6.dst_address.as_u64[1] =
253  sa0->tunnel_dst_addr.ip6.as_u64[1];
254 
255  next0 = AH_ENCRYPT_NEXT_IP6_LOOKUP;
256  vnet_buffer (i_b0)->sw_if_index[VLIB_TX] = (u32) ~ 0;
257  }
258  else
259  {
260  transport_mode = 1;
261  next0 = AH_ENCRYPT_NEXT_INTERFACE_OUTPUT;
262  }
263 
264  u8 sig[64];
265  memset (sig, 0, sizeof (sig));
266  u8 *digest = NULL;
267  {
268  digest = vlib_buffer_get_current (i_b0) + ip_hdr_size + icv_size;
269  memset (digest, 0, icv_size);
270  }
271 
272  hmac_calc (sa0->integ_alg, sa0->integ_key,
273  sa0->integ_key_len,
274  (u8 *) vlib_buffer_get_current (i_b0),
275  i_b0->current_length, sig, sa0->use_esn, sa0->seq_hi);
276 
277  memcpy (digest, (char *) &sig[0], 12);
278 
279  if (PREDICT_FALSE (is_ipv6))
280  {
281  }
282  else
283  {
284  oh0->ip4.ttl = ttl;
285  oh0->ip4.tos = tos;
286  oh0->ip4.checksum = ip4_header_checksum (&oh0->ip4);
287  }
288 
289  if (transport_mode)
290  vlib_buffer_advance (i_b0, -sizeof (ethernet_header_t));;
291 
292  trace:
294  {
295  i_b0->flags |= VLIB_BUFFER_IS_TRACED;
296  ah_encrypt_trace_t *tr =
297  vlib_add_trace (vm, node, i_b0, sizeof (*tr));
298  tr->spi = sa0->spi;
299  tr->seq = sa0->seq - 1;
300  tr->integ_alg = sa0->integ_alg;
301  }
302 
303  vlib_validate_buffer_enqueue_x1 (vm, node, next_index,
304  to_next, n_left_to_next, i_bi0,
305  next0);
306  }
307  vlib_put_next_frame (vm, node, next_index, n_left_to_next);
308  }
310  AH_ENCRYPT_ERROR_RX_PKTS,
311  from_frame->n_vectors);
312 
313  return from_frame->n_vectors;
314 }
315 
316 
317 /* *INDENT-OFF* */
319  .function = ah_encrypt_node_fn,
320  .name = "ah-encrypt",
321  .vector_size = sizeof (u32),
322  .format_trace = format_ah_encrypt_trace,
323  .type = VLIB_NODE_TYPE_INTERNAL,
324 
325  .n_errors = ARRAY_LEN(ah_encrypt_error_strings),
326  .error_strings = ah_encrypt_error_strings,
327 
328  .n_next_nodes = AH_ENCRYPT_N_NEXT,
329  .next_nodes = {
330 #define _(s,n) [AH_ENCRYPT_NEXT_##s] = n,
332 #undef _
333  },
334 };
335 /* *INDENT-ON* */
336 
338 /*
339  * fd.io coding-style-patch-verification: ON
340  *
341  * Local Variables:
342  * eval: (c-set-style "gnu")
343  * End:
344  */
#define CLIB_UNUSED(x)
Definition: clib.h:79
ip46_address_t tunnel_src_addr
Definition: ipsec.h:130
static vlib_cli_command_t trace
(constructor) VLIB_CLI_COMMAND (trace)
Definition: memory_vlib.c:1679
ipsec_proto_main_integ_alg_t * ipsec_proto_main_integ_algs
Definition: esp.h:93
#define PREDICT_TRUE(x)
Definition: clib.h:106
#define NULL
Definition: clib.h:55
static unsigned int hmac_calc(ipsec_integ_alg_t alg, u8 *key, int key_len, u8 *data, int data_len, u8 *signature, u8 use_esn, u32 seq_hi)
Definition: esp.h:323
ipsec_integ_alg_t integ_alg
Definition: ipsec.h:121
u8 is_tunnel
Definition: ipsec.h:128
struct _vlib_node_registration vlib_node_registration_t
u8 * format(u8 *s, const char *fmt,...)
Definition: format.c:419
static uword vlib_buffer_length_in_chain(vlib_main_t *vm, vlib_buffer_t *b)
Get length in bytes of the buffer chain.
Definition: buffer_funcs.h:107
u32 spi
Definition: ipsec.h:114
u32 seq_hi
Definition: ipsec.h:137
static int esp_seq_advance(ipsec_sa_t *sa)
Definition: esp.h:225
u8 integ_key[128]
Definition: ipsec.h:123
ipsec_main_t ipsec_main
Definition: ipsec.c:28
u8 use_esn
Definition: ipsec.h:125
ipsec_integ_alg_t integ_alg
Definition: ah_encrypt.c:65
#define pool_elt_at_index(p, i)
Returns pointer to element at given index.
Definition: pool.h:459
ipsec_integ_alg_t
Definition: ipsec.h:97
u16 current_length
Nbytes between current data and the end of this buffer.
Definition: buffer.h:72
u8 is_tunnel_ip6
Definition: ipsec.h:129
static void * vlib_buffer_get_current(vlib_buffer_t *b)
Get pointer to current data to process.
Definition: buffer.h:195
#define PREDICT_FALSE(x)
Definition: clib.h:105
ah_encrypt_next_t
Definition: ah_encrypt.c:33
#define vlib_validate_buffer_enqueue_x1(vm, node, next_index, to_next, n_left_to_next, bi0, next0)
Finish enqueueing one buffer forward in the graph.
Definition: buffer_node.h:218
#define vlib_get_next_frame(vm, node, next_index, vectors, n_vectors_left)
Get pointer to next frame vector data by (vlib_node_runtime_t, next_index).
Definition: node_funcs.h:364
static void vlib_node_increment_counter(vlib_main_t *vm, u32 node_index, u32 counter_index, u64 increment)
Definition: node_funcs.h:1158
ip46_address_t tunnel_dst_addr
Definition: ipsec.h:131
static u8 * format_ah_encrypt_trace(u8 *s, va_list *args)
Definition: ah_encrypt.c:70
u16 n_vectors
Definition: node.h:344
vlib_main_t * vm
Definition: buffer.c:283
static char * ah_encrypt_error_strings[]
Definition: ah_encrypt.c:53
#define clib_warning(format, args...)
Definition: error.h:59
#define VLIB_BUFFER_IS_TRACED
Definition: buffer.h:93
#define clib_memcpy(a, b, c)
Definition: string.h:75
#define ARRAY_LEN(x)
Definition: clib.h:59
void vlib_put_next_frame(vlib_main_t *vm, vlib_node_runtime_t *r, u32 next_index, u32 n_vectors_left)
Release pointer to next frame vector data.
Definition: main.c:454
u16 cached_next_index
Next frame index that vector arguments were last enqueued to last time this node ran.
Definition: node.h:456
unsigned int u32
Definition: types.h:88
#define foreach_ah_encrypt_error
Definition: ah_encrypt.c:40
ipsec_sa_t * sad
Definition: ipsec.h:258
u64 total_data_size
Definition: ipsec.h:143
u8 integ_key_len
Definition: ipsec.h:122
static void vlib_buffer_advance(vlib_buffer_t *b, word l)
Advance current data pointer by the supplied (signed!) amount.
Definition: buffer.h:208
u32 seq
Definition: ipsec.h:136
u64 uword
Definition: types.h:112
static void * vlib_add_trace(vlib_main_t *vm, vlib_node_runtime_t *r, vlib_buffer_t *b, u32 n_data_bytes)
Definition: trace_funcs.h:55
u8 * format_ipsec_integ_alg(u8 *s, va_list *args)
Definition: ipsec_format.c:90
Definition: defs.h:47
static uword ah_encrypt_node_fn(vlib_main_t *vm, vlib_node_runtime_t *node, vlib_frame_t *from_frame)
Definition: ah_encrypt.c:82
unsigned char u8
Definition: types.h:56
static void * vlib_frame_vector_args(vlib_frame_t *f)
Get pointer to frame vector data.
Definition: node_funcs.h:267
#define vnet_buffer(b)
Definition: buffer.h:326
#define VLIB_NODE_FUNCTION_MULTIARCH(node, fn)
Definition: node.h:158
#define VLIB_REGISTER_NODE(x,...)
Definition: node.h:143
Definition: ah.h:27
ipsec_proto_main_t ipsec_proto_main
Definition: esp_encrypt.c:25
ah_encrypt_error_t
Definition: ah_encrypt.c:45
#define foreach_ah_encrypt_next
Definition: ah_encrypt.c:26
vlib_node_registration_t ah_encrypt_node
(constructor) VLIB_REGISTER_NODE (ah_encrypt_node)
Definition: ah_encrypt.c:59
u32 flags
buffer flags: VLIB_BUFFER_FREE_LIST_INDEX_MASK: bits used to store free list index, VLIB_BUFFER_IS_TRACED: trace this buffer.
Definition: buffer.h:75
static vlib_buffer_t * vlib_get_buffer(vlib_main_t *vm, u32 buffer_index)
Translate buffer index into buffer pointer.
Definition: buffer_funcs.h:57
static u16 ip4_header_checksum(ip4_header_t *i)
Definition: ip4_packet.h:239