1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
495
496
497
498
499
500
501
502
503
504
505
506
507
508
509
510
511
512
513
514
515
516
517
518
519
520
521
522
523
524
525
526
527
528
529
530
531
532
533
534
535
536
537
538
539
540
541
542
543
544
545
546
547
548
549
550
551
552
553
554
555
556
557
558
559
560
561
562
563
564
565
566
567
568
569
570
571
572
573
574
575
576
577
578
579
580
581
582
583
584
585
586
587
588
589
590
591
592
593
594
595
596
597
598
|
/*
* Copyright (c) 2015 Cisco and/or its affiliates.
* Licensed under the Apache License, Version 2.0 (the "License");
* you may not use this file except in compliance with the License.
* You may obtain a copy of the License at:
*
* http://www.apache.org/licenses/LICENSE-2.0
*
* Unless required by applicable law or agreed to in writing, software
* distributed under the License is distributed on an "AS IS" BASIS,
* WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
* See the License for the specific language governing permissions and
* limitations under the License.
*/
#include <vlib/vlib.h>
#include <vnet/vnet.h>
#include <vnet/pg/pg.h>
#include <vppinfra/error.h>
#include <vnet/udp/udp.h>
#include <plugins/ikev2/ikev2.h>
#include <plugins/ikev2/ikev2_priv.h>
u8 *
format_ikev2_id_type_and_data (u8 * s, va_list * args)
{
ikev2_id_t *id = va_arg (*args, ikev2_id_t *);
if (id->type == 0 || vec_len (id->data) == 0)
return format (s, "none");
s = format (s, "%U", format_ikev2_id_type, id->type);
if (id->type == IKEV2_ID_TYPE_ID_FQDN ||
id->type == IKEV2_ID_TYPE_ID_RFC822_ADDR)
{
s = format (s, " %v", id->data);
}
else
{
s =
format (s, " %U", format_hex_bytes, &id->data,
(uword) (vec_len (id->data)));
}
return s;
}
static clib_error_t *
show_ikev2_sa_command_fn (vlib_main_t * vm,
unformat_input_t * input, vlib_cli_command_t * cmd)
{
ikev2_main_t *km = &ikev2_main;
ikev2_main_per_thread_data_t *tkm;
ikev2_sa_t *sa;
ikev2_ts_t *ts;
ikev2_child_sa_t *child;
ikev2_sa_transform_t *tr;
vec_foreach (tkm, km->per_thread_data)
{
/* *INDENT-OFF* */
pool_foreach (sa, tkm->sas, ({
u8 * s = 0;
vlib_cli_output(vm, " iip %U ispi %lx rip %U rspi %lx",
format_ip4_address, &sa->iaddr, sa->ispi,
format_ip4_address, &sa->raddr, sa->rspi);
tr = ikev2_sa_get_td_for_type(sa->r_proposals, IKEV2_TRANSFORM_TYPE_ENCR);
s = format(s, "%U ", format_ikev2_sa_transform, tr);
tr = ikev2_sa_get_td_for_type(sa->r_proposals, IKEV2_TRANSFORM_TYPE_PRF);
s = format(s, "%U ", format_ikev2_sa_transform, tr);
tr = ikev2_sa_get_td_for_type(sa->r_proposals, IKEV2_TRANSFORM_TYPE_INTEG);
s = format(s, "%U ", format_ikev2_sa_transform, tr);
tr = ikev2_sa_get_td_for_type(sa->r_proposals, IKEV2_TRANSFORM_TYPE_DH);
s = format(s, "%U ", format_ikev2_sa_transform, tr);
vlib_cli_output(vm, " %v", s);
vec_free(s);
vlib_cli_output(vm, " nonce i:%U\n r:%U",
format_hex_bytes, sa->i_nonce, vec_len(sa->i_nonce),
format_hex_bytes, sa->r_nonce, vec_len(sa->r_nonce));
vlib_cli_output(vm, " SK_d %U",
format_hex_bytes, sa->sk_d, vec_len(sa->sk_d));
vlib_cli_output(vm, " SK_a i:%U\n r:%U",
format_hex_bytes, sa->sk_ai, vec_len(sa->sk_ai),
format_hex_bytes, sa->sk_ar, vec_len(sa->sk_ar));
vlib_cli_output(vm, " SK_e i:%U\n r:%U",
format_hex_bytes, sa->sk_ei, vec_len(sa->sk_ei),
format_hex_bytes, sa->sk_er, vec_len(sa->sk_er));
vlib_cli_output(vm, " SK_p i:%U\n r:%U",
format_hex_bytes, sa->sk_pi, vec_len(sa->sk_pi),
format_hex_bytes, sa->sk_pr, vec_len(sa->sk_pr));
vlib_cli_output(vm, " identifier (i) %U",
format_ikev2_id_type_and_data, &sa->i_id);
vlib_cli_output(vm, " identifier (r) %U",
format_ikev2_id_type_and_data, &sa->r_id);
vec_foreach(child, sa->childs)
{
vlib_cli_output(vm, " child sa %u:", child - sa->childs);
tr = ikev2_sa_get_td_for_type(child->r_proposals, IKEV2_TRANSFORM_TYPE_ENCR);
s = format(s, "%U ", format_ikev2_sa_transform, tr);
tr = ikev2_sa_get_td_for_type(child->r_proposals, IKEV2_TRANSFORM_TYPE_INTEG);
s = format(s, "%U ", format_ikev2_sa_transform, tr);
tr = ikev2_sa_get_td_for_type(child->r_proposals, IKEV2_TRANSFORM_TYPE_ESN);
s = format(s, "%U ", format_ikev2_sa_transform, tr);
vlib_cli_output(vm, " %v", s);
vec_free(s);
vlib_cli_output(vm, " spi(i) %lx spi(r) %lx",
child->i_proposals ? child->i_proposals[0].spi : 0,
child->r_proposals ? child->r_proposals[0].spi : 0);
vlib_cli_output(vm, " SK_e i:%U\n r:%U",
format_hex_bytes, child->sk_ei, vec_len(child->sk_ei),
format_hex_bytes, child->sk_er, vec_len(child->sk_er));
vlib_cli_output(vm, " SK_a i:%U\n r:%U",
format_hex_bytes, child->sk_ai, vec_len(child->sk_ai),
format_hex_bytes, child->sk_ar, vec_len(child->sk_ar));
vlib_cli_output(vm, " traffic selectors (i):");
vec_foreach(ts, child->tsi)
{
vlib_cli_output(vm, " %u type %u protocol_id %u addr "
"%U - %U port %u - %u",
ts - child->tsi,
ts->ts_type, ts->protocol_id,
format_ip4_address, &ts->start_addr,
format_ip4_address, &ts->end_addr,
clib_net_to_host_u16( ts->start_port),
clib_net_to_host_u16( ts->end_port));
}
vlib_cli_output(vm, " traffic selectors (r):");
vec_foreach(ts, child->tsr)
{
vlib_cli_output(vm, " %u type %u protocol_id %u addr "
"%U - %U port %u - %u",
ts - child->tsr,
ts->ts_type, ts->protocol_id,
format_ip4_address, &ts->start_addr,
format_ip4_address, &ts->end_addr,
clib_net_to_host_u16( ts->start_port),
clib_net_to_host_u16( ts->end_port));
}
}
vlib_cli_output(vm, "");
}));
/* *INDENT-ON* */
}
return 0;
}
/* *INDENT-OFF* */
VLIB_CLI_COMMAND (show_ikev2_sa_command, static) = {
.path = "show ikev2 sa",
.short_help = "show ikev2 sa",
.function = show_ikev2_sa_command_fn,
};
/* *INDENT-ON* */
static clib_error_t *
ikev2_profile_add_del_command_fn (vlib_main_t * vm,
unformat_input_t * input,
vlib_cli_command_t * cmd)
{
vnet_main_t *vnm = vnet_get_main ();
unformat_input_t _line_input, *line_input = &_line_input;
u8 *name = 0;
clib_error_t *r = 0;
u32 id_type;
u8 *data = 0;
u32 tmp1, tmp2, tmp3;
u64 tmp4, tmp5;
ip4_address_t ip4;
ip4_address_t end_addr;
u32 responder_sw_if_index = (u32) ~ 0;
ip4_address_t responder_ip4;
ikev2_transform_encr_type_t crypto_alg;
ikev2_transform_integ_type_t integ_alg;
ikev2_transform_dh_type_t dh_type;
const char *valid_chars = "a-zA-Z0-9_";
if (!unformat_user (input, unformat_line_input, line_input))
return 0;
while (unformat_check_input (line_input) != UNFORMAT_END_OF_INPUT)
{
if (unformat (line_input, "add %U", unformat_token, valid_chars, &name))
{
r = ikev2_add_del_profile (vm, name, 1);
goto done;
}
else
if (unformat
(line_input, "del %U", unformat_token, valid_chars, &name))
{
r = ikev2_add_del_profile (vm, name, 0);
goto done;
}
else if (unformat (line_input, "set %U auth shared-key-mic string %v",
unformat_token, valid_chars, &name, &data))
{
r =
ikev2_set_profile_auth (vm, name,
IKEV2_AUTH_METHOD_SHARED_KEY_MIC, data,
0);
goto done;
}
else if (unformat (line_input, "set %U auth shared-key-mic hex %U",
unformat_token, valid_chars, &name,
unformat_hex_string, &data))
{
r =
ikev2_set_profile_auth (vm, name,
IKEV2_AUTH_METHOD_SHARED_KEY_MIC, data,
1);
goto done;
}
else if (unformat (line_input, "set %U auth rsa-sig cert-file %v",
unformat_token, valid_chars, &name, &data))
{
r =
ikev2_set_profile_auth (vm, name, IKEV2_AUTH_METHOD_RSA_SIG, data,
0);
goto done;
}
else if (unformat (line_input, "set %U id local %U %U",
unformat_token, valid_chars, &name,
unformat_ikev2_id_type, &id_type,
unformat_ip4_address, &ip4))
{
data = vec_new (u8, 4);
clib_memcpy (data, ip4.as_u8, 4);
r =
ikev2_set_profile_id (vm, name, (u8) id_type, data, /*local */ 1);
goto done;
}
else if (unformat (line_input, "set %U id local %U 0x%U",
unformat_token, valid_chars, &name,
unformat_ikev2_id_type, &id_type,
unformat_hex_string, &data))
{
r =
ikev2_set_profile_id (vm, name, (u8) id_type, data, /*local */ 1);
goto done;
}
else if (unformat (line_input, "set %U id local %U %v",
unformat_token, valid_chars, &name,
unformat_ikev2_id_type, &id_type, &data))
{
r =
ikev2_set_profile_id (vm, name, (u8) id_type, data, /*local */ 1);
goto done;
}
else if (unformat (line_input, "set %U id remote %U %U",
unformat_token, valid_chars, &name,
unformat_ikev2_id_type, &id_type,
unformat_ip4_address, &ip4))
{
data = vec_new (u8, 4);
clib_memcpy (data, ip4.as_u8, 4);
r = ikev2_set_profile_id (vm, name, (u8) id_type, data, /*remote */
0);
goto done;
}
else if (unformat (line_input, "set %U id remote %U 0x%U",
unformat_token, valid_chars, &name,
unformat_ikev2_id_type, &id_type,
unformat_hex_string, &data))
{
r = ikev2_set_profile_id (vm, name, (u8) id_type, data, /*remote */
0);
goto done;
}
else if (unformat (line_input, "set %U id remote %U %v",
unformat_token, valid_chars, &name,
unformat_ikev2_id_type, &id_type, &data))
{
r = ikev2_set_profile_id (vm, name, (u8) id_type, data, /*remote */
0);
goto done;
}
else if (unformat (line_input, "set %U traffic-selector local "
"ip-range %U - %U port-range %u - %u protocol %u",
unformat_token, valid_chars, &name,
unformat_ip4_address, &ip4,
unformat_ip4_address, &end_addr,
&tmp1, &tmp2, &tmp3))
{
r =
ikev2_set_profile_ts (vm, name, (u8) tmp3, (u16) tmp1, (u16) tmp2,
ip4, end_addr, /*local */ 1);
goto done;
}
else if (unformat (line_input, "set %U traffic-selector remote "
"ip-range %U - %U port-range %u - %u protocol %u",
unformat_token, valid_chars, &name,
unformat_ip4_address, &ip4,
unformat_ip4_address, &end_addr,
&tmp1, &tmp2, &tmp3))
{
r =
ikev2_set_profile_ts (vm, name, (u8) tmp3, (u16) tmp1, (u16) tmp2,
ip4, end_addr, /*remote */ 0);
goto done;
}
else if (unformat (line_input, "set %U responder %U %U",
unformat_token, valid_chars, &name,
unformat_vnet_sw_interface, vnm,
&responder_sw_if_index, unformat_ip4_address,
&responder_ip4))
{
r =
ikev2_set_profile_responder (vm, name, responder_sw_if_index,
responder_ip4);
goto done;
}
else
if (unformat
(line_input,
"set %U ike-crypto-alg %U %u ike-integ-alg %U ike-dh %U",
unformat_token, valid_chars, &name,
unformat_ikev2_transform_encr_type, &crypto_alg, &tmp1,
unformat_ikev2_transform_integ_type, &integ_alg,
unformat_ikev2_transform_dh_type, &dh_type))
{
r =
ikev2_set_profile_ike_transforms (vm, name, crypto_alg, integ_alg,
dh_type, tmp1);
goto done;
}
else
if (unformat
(line_input,
"set %U esp-crypto-alg %U %u esp-integ-alg %U esp-dh %U",
unformat_token, valid_chars, &name,
unformat_ikev2_transform_encr_type, &crypto_alg, &tmp1,
unformat_ikev2_transform_integ_type, &integ_alg,
unformat_ikev2_transform_dh_type, &dh_type))
{
r =
ikev2_set_profile_esp_transforms (vm, name, crypto_alg, integ_alg,
dh_type, tmp1);
goto done;
}
else if (unformat (line_input, "set %U sa-lifetime %lu %u %u %lu",
unformat_token, valid_chars, &name,
&tmp4, &tmp1, &tmp2, &tmp5))
{
r =
ikev2_set_profile_sa_lifetime (vm, name, tmp4, tmp1, tmp2, tmp5);
goto done;
}
else
break;
}
r = clib_error_return (0, "parse error: '%U'",
format_unformat_error, line_input);
done:
vec_free (name);
vec_free (data);
unformat_free (line_input);
return r;
}
/* *INDENT-OFF* */
VLIB_CLI_COMMAND (ikev2_profile_add_del_command, static) = {
.path = "ikev2 profile",
.short_help =
"ikev2 profile [add|del] <id>\n"
"ikev2 profile set <id> auth [rsa-sig|shared-key-mic] [cert-file|string|hex]"
" <data>\n"
"ikev2 profile set <id> id <local|remote> <type> <data>\n"
"ikev2 profile set <id> traffic-selector <local|remote> ip-range "
"<start-addr> - <end-addr> port-range <start-port> - <end-port> "
"protocol <protocol-number>\n"
"ikev2 profile set <id> responder <interface> <addr>\n"
"ikev2 profile set <id> ike-crypto-alg <crypto alg> <key size> ike-integ-alg <integ alg> ike-dh <dh type>\n"
"ikev2 profile set <id> esp-crypto-alg <crypto alg> <key size> esp-integ-alg <integ alg> esp-dh <dh type>\n"
"ikev2 profile set <id> sa-lifetime <seconds> <jitter> <handover> <max bytes>",
.function = ikev2_profile_add_del_command_fn,
};
/* *INDENT-ON* */
static clib_error_t *
show_ikev2_profile_command_fn (vlib_main_t * vm,
unformat_input_t * input,
vlib_cli_command_t * cmd)
{
ikev2_main_t *km = &ikev2_main;
ikev2_profile_t *p;
/* *INDENT-OFF* */
pool_foreach (p, km->profiles, ({
vlib_cli_output(vm, "profile %v", p->name);
if (p->auth.data)
{
if (p->auth.hex)
vlib_cli_output(vm, " auth-method %U auth data 0x%U",
format_ikev2_auth_method, p->auth.method,
format_hex_bytes, p->auth.data, vec_len(p->auth.data));
else
vlib_cli_output(vm, " auth-method %U auth data %v",
format_ikev2_auth_method, p->auth.method, p->auth.data);
}
if (p->loc_id.data)
{
if (p->loc_id.type == IKEV2_ID_TYPE_ID_IPV4_ADDR)
vlib_cli_output(vm, " local id-type %U data %U",
format_ikev2_id_type, p->loc_id.type,
format_ip4_address, p->loc_id.data);
else if (p->loc_id.type == IKEV2_ID_TYPE_ID_KEY_ID)
vlib_cli_output(vm, " local id-type %U data 0x%U",
format_ikev2_id_type, p->loc_id.type,
format_hex_bytes, p->loc_id.data,
vec_len(p->loc_id.data));
else
vlib_cli_output(vm, " local id-type %U data %v",
format_ikev2_id_type, p->loc_id.type, p->loc_id.data);
}
if (p->rem_id.data)
{
if (p->rem_id.type == IKEV2_ID_TYPE_ID_IPV4_ADDR)
vlib_cli_output(vm, " remote id-type %U data %U",
format_ikev2_id_type, p->rem_id.type,
format_ip4_address, p->rem_id.data);
else if (p->rem_id.type == IKEV2_ID_TYPE_ID_KEY_ID)
vlib_cli_output(vm, " remote id-type %U data 0x%U",
format_ikev2_id_type, p->rem_id.type,
format_hex_bytes, p->rem_id.data,
vec_len(p->rem_id.data));
else
vlib_cli_output(vm, " remote id-type %U data %v",
format_ikev2_id_type, p->rem_id.type, p->rem_id.data);
}
if (p->loc_ts.end_addr.as_u32)
vlib_cli_output(vm, " local traffic-selector addr %U - %U port %u - %u"
" protocol %u",
format_ip4_address, &p->loc_ts.start_addr,
format_ip4_address, &p->loc_ts.end_addr,
p->loc_ts.start_port, p->loc_ts.end_port,
p->loc_ts.protocol_id);
if (p->rem_ts.end_addr.as_u32)
vlib_cli_output(vm, " remote traffic-selector addr %U - %U port %u - %u"
" protocol %u",
format_ip4_address, &p->rem_ts.start_addr,
format_ip4_address, &p->rem_ts.end_addr,
p->rem_ts.start_port, p->rem_ts.end_port,
p->rem_ts.protocol_id);
}));
/* *INDENT-ON* */
return 0;
}
/* *INDENT-OFF* */
VLIB_CLI_COMMAND (show_ikev2_profile_command, static) = {
.path = "show ikev2 profile",
.short_help = "show ikev2 profile",
.function = show_ikev2_profile_command_fn,
};
/* *INDENT-ON* */
static clib_error_t *
set_ikev2_local_key_command_fn (vlib_main_t * vm,
unformat_input_t * input,
vlib_cli_command_t * cmd)
{
unformat_input_t _line_input, *line_input = &_line_input;
clib_error_t *r = 0;
u8 *data = 0;
if (!unformat_user (input, unformat_line_input, line_input))
return 0;
while (unformat_check_input (line_input) != UNFORMAT_END_OF_INPUT)
{
if (unformat (line_input, "%s", &data))
{
r = ikev2_set_local_key (vm, data);
goto done;
}
else
break;
}
r = clib_error_return (0, "parse error: '%U'",
format_unformat_error, line_input);
done:
vec_free (data);
unformat_free (line_input);
return r;
}
/* *INDENT-OFF* */
VLIB_CLI_COMMAND (set_ikev2_local_key_command, static) = {
.path = "set ikev2 local key",
.short_help =
"set ikev2 local key <file>",
.function = set_ikev2_local_key_command_fn,
};
/* *INDENT-ON* */
static clib_error_t *
ikev2_initiate_command_fn (vlib_main_t * vm,
unformat_input_t * input, vlib_cli_command_t * cmd)
{
unformat_input_t _line_input, *line_input = &_line_input;
clib_error_t *r = 0;
u8 *name = 0;
u32 tmp1;
u64 tmp2;
const char *valid_chars = "a-zA-Z0-9_";
if (!unformat_user (input, unformat_line_input, line_input))
return 0;
while (unformat_check_input (line_input) != UNFORMAT_END_OF_INPUT)
{
if (unformat
(line_input, "sa-init %U", unformat_token, valid_chars, &name))
{
r = ikev2_initiate_sa_init (vm, name);
goto done;
}
else if (unformat (line_input, "del-child-sa %x", &tmp1))
{
r = ikev2_initiate_delete_child_sa (vm, tmp1);
goto done;
}
else if (unformat (line_input, "del-sa %lx", &tmp2))
{
r = ikev2_initiate_delete_ike_sa (vm, tmp2);
goto done;
}
else if (unformat (line_input, "rekey-child-sa %x", &tmp1))
{
r = ikev2_initiate_rekey_child_sa (vm, tmp1);
goto done;
}
else
break;
}
r = clib_error_return (0, "parse error: '%U'",
format_unformat_error, line_input);
done:
vec_free (name);
unformat_free (line_input);
return r;
}
/* *INDENT-OFF* */
VLIB_CLI_COMMAND (ikev2_initiate_command, static) = {
.path = "ikev2 initiate",
.short_help =
"ikev2 initiate sa-init <profile id>\n"
"ikev2 initiate del-child-sa <child sa ispi>\n"
"ikev2 initiate del-sa <sa ispi>\n"
"ikev2 initiate rekey-child-sa <profile id> <child sa ispi>\n",
.function = ikev2_initiate_command_fn,
};
/* *INDENT-ON* */
void
ikev2_cli_reference (void)
{
}
/*
* fd.io coding-style-patch-verification: ON
*
* Local Variables:
* eval: (c-set-style "gnu")
* End:
*/
|