2 * Copyright (c) 2015 Cisco and/or its affiliates.
3 * Licensed under the Apache License, Version 2.0 (the "License");
4 * you may not use this file except in compliance with the License.
5 * You may obtain a copy of the License at:
7 * http://www.apache.org/licenses/LICENSE-2.0
9 * Unless required by applicable law or agreed to in writing, software
10 * distributed under the License is distributed on an "AS IS" BASIS,
11 * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
12 * See the License for the specific language governing permissions and
13 * limitations under the License.
15 #include <vlib/vlib.h>
16 #include <vnet/vnet.h>
17 #include <vnet/pg/pg.h>
18 #include <vppinfra/error.h>
19 #include <vnet/ip/udp.h>
20 #include <vnet/ipsec/ikev2.h>
21 #include <vnet/ipsec/ikev2_priv.h>
24 format_ikev2_id_type_and_data (u8 * s, va_list * args)
26 ikev2_id_t * id = va_arg (*args, ikev2_id_t *);
28 if (id->type == 0 || vec_len(id->data) == 0)
29 return format(s, "none");
31 s = format(s, "%U", format_ikev2_id_type, id->type);
33 if (id->type == IKEV2_ID_TYPE_ID_FQDN ||
34 id->type == IKEV2_ID_TYPE_ID_RFC822_ADDR)
36 s = format(s, " %v", id->data);
40 s = format(s, " %U", format_hex_bytes, &id->data, (uword) (vec_len(id->data)));
48 show_ikev2_sa_command_fn (vlib_main_t * vm,
49 unformat_input_t * input,
50 vlib_cli_command_t * cmd)
52 ikev2_main_t * km = &ikev2_main;
55 ikev2_child_sa_t * child;
56 ikev2_sa_transform_t * tr;
58 pool_foreach (sa, km->sas, ({
60 vlib_cli_output(vm, " iip %U ispi %lx rip %U rspi %lx",
61 format_ip4_address, &sa->iaddr, sa->ispi,
62 format_ip4_address, &sa->raddr, sa->rspi);
64 tr = ikev2_sa_get_td_for_type(sa->r_proposals, IKEV2_TRANSFORM_TYPE_ENCR);
65 s = format(s, "%U ", format_ikev2_sa_transform, tr);
67 tr = ikev2_sa_get_td_for_type(sa->r_proposals, IKEV2_TRANSFORM_TYPE_PRF);
68 s = format(s, "%U ", format_ikev2_sa_transform, tr);
70 tr = ikev2_sa_get_td_for_type(sa->r_proposals, IKEV2_TRANSFORM_TYPE_INTEG);
71 s = format(s, "%U ", format_ikev2_sa_transform, tr);
73 tr = ikev2_sa_get_td_for_type(sa->r_proposals, IKEV2_TRANSFORM_TYPE_DH);
74 s = format(s, "%U ", format_ikev2_sa_transform, tr);
76 vlib_cli_output(vm, " %v", s);
79 vlib_cli_output(vm, " nonce i:%U\n r:%U",
80 format_hex_bytes, sa->i_nonce, vec_len(sa->i_nonce),
81 format_hex_bytes, sa->r_nonce, vec_len(sa->r_nonce));
83 vlib_cli_output(vm, " SK_d %U",
84 format_hex_bytes, sa->sk_d, vec_len(sa->sk_d));
85 vlib_cli_output(vm, " SK_a i:%U\n r:%U",
86 format_hex_bytes, sa->sk_ai, vec_len(sa->sk_ai),
87 format_hex_bytes, sa->sk_ar, vec_len(sa->sk_ar));
88 vlib_cli_output(vm, " SK_e i:%U\n r:%U",
89 format_hex_bytes, sa->sk_ei, vec_len(sa->sk_ei),
90 format_hex_bytes, sa->sk_er, vec_len(sa->sk_er));
91 vlib_cli_output(vm, " SK_p i:%U\n r:%U",
92 format_hex_bytes, sa->sk_pi, vec_len(sa->sk_pi),
93 format_hex_bytes, sa->sk_pr, vec_len(sa->sk_pr));
95 vlib_cli_output(vm, " identifier (i) %U",
96 format_ikev2_id_type_and_data, &sa->i_id);
97 vlib_cli_output(vm, " identifier (r) %U",
98 format_ikev2_id_type_and_data, &sa->r_id);
100 vec_foreach(child, sa->childs)
102 vlib_cli_output(vm, " child sa %u:", child - sa->childs);
104 tr = ikev2_sa_get_td_for_type(child->r_proposals, IKEV2_TRANSFORM_TYPE_ENCR);
105 s = format(s, "%U ", format_ikev2_sa_transform, tr);
107 tr = ikev2_sa_get_td_for_type(child->r_proposals, IKEV2_TRANSFORM_TYPE_INTEG);
108 s = format(s, "%U ", format_ikev2_sa_transform, tr);
110 tr = ikev2_sa_get_td_for_type(child->r_proposals, IKEV2_TRANSFORM_TYPE_ESN);
111 s = format(s, "%U ", format_ikev2_sa_transform, tr);
113 vlib_cli_output(vm, " %v", s);
116 vlib_cli_output(vm, " spi(i) %lx spi(r) %lx",
117 child->i_proposals ? child->i_proposals[0].spi : 0,
118 child->r_proposals ? child->r_proposals[0].spi : 0);
120 vlib_cli_output(vm, " SK_e i:%U\n r:%U",
121 format_hex_bytes, child->sk_ei, vec_len(child->sk_ei),
122 format_hex_bytes, child->sk_er, vec_len(child->sk_er));
123 vlib_cli_output(vm, " SK_a i:%U\n r:%U",
124 format_hex_bytes, child->sk_ai, vec_len(child->sk_ai),
125 format_hex_bytes, child->sk_ar, vec_len(child->sk_ar));
126 vlib_cli_output(vm, " traffic selectors (i):");
127 vec_foreach(ts, child->tsi)
129 vlib_cli_output(vm, " %u type %u protocol_id %u addr "
130 "%U - %U port %u - %u",
132 ts->ts_type, ts->protocol_id,
133 format_ip4_address, &ts->start_addr,
134 format_ip4_address, &ts->end_addr,
135 clib_net_to_host_u16( ts->start_port),
136 clib_net_to_host_u16( ts->end_port));
138 vlib_cli_output(vm, " traffic selectors (r):");
139 vec_foreach(ts, child->tsr)
141 vlib_cli_output(vm, " %u type %u protocol_id %u addr "
142 "%U - %U port %u - %u",
144 ts->ts_type, ts->protocol_id,
145 format_ip4_address, &ts->start_addr,
146 format_ip4_address, &ts->end_addr,
147 clib_net_to_host_u16( ts->start_port),
148 clib_net_to_host_u16( ts->end_port));
151 vlib_cli_output(vm, "");
156 VLIB_CLI_COMMAND (show_ikev2_sa_command, static) = {
157 .path = "show ikev2 sa",
158 .short_help = "show ikev2 sa",
159 .function = show_ikev2_sa_command_fn,
162 static clib_error_t *
163 ikev2_profile_add_del_command_fn (vlib_main_t * vm,
164 unformat_input_t * input,
165 vlib_cli_command_t * cmd)
167 unformat_input_t _line_input, * line_input = &_line_input;
169 clib_error_t * r = 0;
172 u32 tmp1, tmp2, tmp3;
174 ip4_address_t end_addr;
176 const char * valid_chars = "a-zA-Z0-9_";
178 if (! unformat_user (input, unformat_line_input, line_input))
181 while (unformat_check_input (line_input) != UNFORMAT_END_OF_INPUT) {
182 if (unformat (line_input, "add %U", unformat_token, valid_chars, &name))
184 r = ikev2_add_del_profile(vm, name, 1);
187 else if (unformat (line_input, "del %U", unformat_token, valid_chars, &name))
189 r = ikev2_add_del_profile(vm, name, 0);
192 else if (unformat (line_input, "set %U auth shared-key-mic string %v",
193 unformat_token, valid_chars, &name, &data))
195 r = ikev2_set_profile_auth(vm, name, IKEV2_AUTH_METHOD_SHARED_KEY_MIC,
199 else if (unformat (line_input, "set %U auth shared-key-mic hex %U",
200 unformat_token, valid_chars, &name,
201 unformat_hex_string, &data))
203 r = ikev2_set_profile_auth(vm, name, IKEV2_AUTH_METHOD_SHARED_KEY_MIC,
207 else if (unformat (line_input, "set %U auth rsa-sig cert-file %v",
208 unformat_token, valid_chars, &name,
211 r = ikev2_set_profile_auth(vm, name, IKEV2_AUTH_METHOD_RSA_SIG, data, 0);
214 else if (unformat (line_input, "set %U id local %U %U",
215 unformat_token, valid_chars, &name,
216 unformat_ikev2_id_type, &id_type,
217 unformat_ip4_address, &ip4))
219 data = vec_new(u8, 4);
220 clib_memcpy(data, ip4.as_u8, 4);
221 r = ikev2_set_profile_id(vm, name, (u8) id_type, data, /*local*/ 1);
224 else if (unformat (line_input, "set %U id local %U 0x%U",
225 unformat_token, valid_chars, &name,
226 unformat_ikev2_id_type, &id_type,
227 unformat_hex_string, &data))
229 r = ikev2_set_profile_id(vm, name, (u8) id_type, data, /*local*/ 1);
232 else if (unformat (line_input, "set %U id local %U %v",
233 unformat_token, valid_chars, &name,
234 unformat_ikev2_id_type, &id_type, &data))
236 r = ikev2_set_profile_id(vm, name, (u8) id_type, data, /*local*/ 1);
239 else if (unformat (line_input, "set %U id remote %U %U",
240 unformat_token, valid_chars, &name,
241 unformat_ikev2_id_type, &id_type,
242 unformat_ip4_address, &ip4))
244 data = vec_new(u8, 4);
245 clib_memcpy(data, ip4.as_u8, 4);
246 r = ikev2_set_profile_id(vm, name, (u8) id_type, data, /*remote*/ 0);
249 else if (unformat (line_input, "set %U id remote %U 0x%U",
250 unformat_token, valid_chars, &name,
251 unformat_ikev2_id_type, &id_type,
252 unformat_hex_string, &data))
254 r = ikev2_set_profile_id(vm, name, (u8) id_type, data, /*remote*/ 0);
257 else if (unformat (line_input, "set %U id remote %U %v",
258 unformat_token, valid_chars, &name,
259 unformat_ikev2_id_type, &id_type, &data))
261 r = ikev2_set_profile_id(vm, name, (u8) id_type, data, /*remote*/ 0);
264 else if (unformat (line_input, "set %U traffic-selector local "
265 "ip-range %U - %U port-range %u - %u protocol %u",
266 unformat_token, valid_chars, &name,
267 unformat_ip4_address, &ip4,
268 unformat_ip4_address, &end_addr,
269 &tmp1, &tmp2, &tmp3))
271 r = ikev2_set_profile_ts(vm, name, (u8)tmp3, (u16)tmp1, (u16)tmp2,
272 ip4, end_addr, /*local*/ 1);
275 else if (unformat (line_input, "set %U traffic-selector remote "
276 "ip-range %U - %U port-range %u - %u protocol %u",
277 unformat_token, valid_chars, &name,
278 unformat_ip4_address, &ip4,
279 unformat_ip4_address, &end_addr,
280 &tmp1, &tmp2, &tmp3))
282 r = ikev2_set_profile_ts(vm, name, (u8)tmp3, (u16)tmp1, (u16)tmp2,
283 ip4, end_addr, /*remote*/ 0);
290 r = clib_error_return (0, "parse error: '%U'",
291 format_unformat_error, line_input);
296 unformat_free (line_input);
300 VLIB_CLI_COMMAND (ikev2_profile_add_del_command, static) = {
301 .path = "ikev2 profile",
303 "ikev2 profile [add|del] <id>\n"
304 "ikev2 profile set <id> auth [rsa-sig|shared-key-mic] [cert-file|string|hex]"
306 "ikev2 profile set <id> id <local|remote> <type> <data>\n"
307 "ikev2 profile set <id> traffic-selector <local|remote> ip-range "
308 "<start-addr> - <end-addr> port-range <start-port> - <end-port> "
309 "protocol <protocol-number>",
310 .function = ikev2_profile_add_del_command_fn,
313 static clib_error_t *
314 show_ikev2_profile_command_fn (vlib_main_t * vm,
315 unformat_input_t * input,
316 vlib_cli_command_t * cmd)
318 ikev2_main_t * km = &ikev2_main;
321 pool_foreach (p, km->profiles, ({
322 vlib_cli_output(vm, "profile %v", p->name);
327 vlib_cli_output(vm, " auth-method %U auth data 0x%U",
328 format_ikev2_auth_method, p->auth.method,
329 format_hex_bytes, p->auth.data, vec_len(p->auth.data));
331 vlib_cli_output(vm, " auth-method %U auth data %v",
332 format_ikev2_auth_method, p->auth.method, p->auth.data);
337 if (p->loc_id.type == IKEV2_ID_TYPE_ID_IPV4_ADDR)
338 vlib_cli_output(vm, " local id-type %U data %U",
339 format_ikev2_id_type, p->loc_id.type,
340 format_ip4_address, p->loc_id.data);
341 else if (p->loc_id.type == IKEV2_ID_TYPE_ID_KEY_ID)
342 vlib_cli_output(vm, " local id-type %U data 0x%U",
343 format_ikev2_id_type, p->loc_id.type,
344 format_hex_bytes, p->loc_id.data,
345 vec_len(p->loc_id.data));
347 vlib_cli_output(vm, " local id-type %U data %v",
348 format_ikev2_id_type, p->loc_id.type, p->loc_id.data);
353 if (p->rem_id.type == IKEV2_ID_TYPE_ID_IPV4_ADDR)
354 vlib_cli_output(vm, " remote id-type %U data %U",
355 format_ikev2_id_type, p->rem_id.type,
356 format_ip4_address, p->rem_id.data);
357 else if (p->rem_id.type == IKEV2_ID_TYPE_ID_KEY_ID)
358 vlib_cli_output(vm, " remote id-type %U data 0x%U",
359 format_ikev2_id_type, p->rem_id.type,
360 format_hex_bytes, p->rem_id.data,
361 vec_len(p->rem_id.data));
363 vlib_cli_output(vm, " remote id-type %U data %v",
364 format_ikev2_id_type, p->rem_id.type, p->rem_id.data);
367 if (p->loc_ts.end_addr.as_u32)
368 vlib_cli_output(vm, " local traffic-selector addr %U - %U port %u - %u"
370 format_ip4_address, &p->loc_ts.start_addr,
371 format_ip4_address, &p->loc_ts.end_addr,
372 p->loc_ts.start_port, p->loc_ts.end_port,
373 p->loc_ts.protocol_id);
375 if (p->rem_ts.end_addr.as_u32)
376 vlib_cli_output(vm, " remote traffic-selector addr %U - %U port %u - %u"
378 format_ip4_address, &p->rem_ts.start_addr,
379 format_ip4_address, &p->rem_ts.end_addr,
380 p->rem_ts.start_port, p->rem_ts.end_port,
381 p->rem_ts.protocol_id);
387 VLIB_CLI_COMMAND (show_ikev2_profile_command, static) = {
388 .path = "show ikev2 profile",
389 .short_help = "show ikev2 profile",
390 .function = show_ikev2_profile_command_fn,
393 static clib_error_t *
394 set_ikev2_local_key_command_fn (vlib_main_t * vm,
395 unformat_input_t * input,
396 vlib_cli_command_t * cmd)
398 unformat_input_t _line_input, * line_input = &_line_input;
399 clib_error_t * r = 0;
402 if (! unformat_user (input, unformat_line_input, line_input))
405 while (unformat_check_input (line_input) != UNFORMAT_END_OF_INPUT) {
406 if (unformat (line_input, "%v", &data))
408 r = ikev2_set_local_key(vm, data);
415 r = clib_error_return (0, "parse error: '%U'",
416 format_unformat_error, line_input);
420 unformat_free (line_input);
424 VLIB_CLI_COMMAND (set_ikev2_local_key_command, static) = {
425 .path = "set ikev2 local key",
427 "set ikev2 local key <file>",
428 .function = set_ikev2_local_key_command_fn,
432 ikev2_cli_init (vlib_main_t * vm)
437 VLIB_INIT_FUNCTION (ikev2_cli_init);