Absolute File Name: | /home/opencoverage/opencoverage/guest-scripts/openssl/src/ssl/tls_srp.c |
Source code | Switch to Preprocessed file |
Line | Source | Count | ||||||||||||||||||
---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|
1 | /* | - | ||||||||||||||||||
2 | * Copyright 2004-2018 The OpenSSL Project Authors. All Rights Reserved. | - | ||||||||||||||||||
3 | * Copyright (c) 2004, EdelKey Project. All Rights Reserved. | - | ||||||||||||||||||
4 | * | - | ||||||||||||||||||
5 | * Licensed under the OpenSSL license (the "License"). You may not use | - | ||||||||||||||||||
6 | * this file except in compliance with the License. You can obtain a copy | - | ||||||||||||||||||
7 | * in the file LICENSE in the source distribution or at | - | ||||||||||||||||||
8 | * https://www.openssl.org/source/license.html | - | ||||||||||||||||||
9 | * | - | ||||||||||||||||||
10 | * Originally written by Christophe Renou and Peter Sylvester, | - | ||||||||||||||||||
11 | * for the EdelKey project. | - | ||||||||||||||||||
12 | */ | - | ||||||||||||||||||
13 | - | |||||||||||||||||||
14 | #include <openssl/crypto.h> | - | ||||||||||||||||||
15 | #include <openssl/rand.h> | - | ||||||||||||||||||
16 | #include <openssl/err.h> | - | ||||||||||||||||||
17 | #include "ssl_locl.h" | - | ||||||||||||||||||
18 | - | |||||||||||||||||||
19 | #ifndef OPENSSL_NO_SRP | - | ||||||||||||||||||
20 | # include <openssl/srp.h> | - | ||||||||||||||||||
21 | - | |||||||||||||||||||
22 | int SSL_CTX_SRP_CTX_free(struct ssl_ctx_st *ctx) | - | ||||||||||||||||||
23 | { | - | ||||||||||||||||||
24 | if (ctx == NULL)
| 0-8017 | ||||||||||||||||||
25 | return 0; never executed: return 0; | 0 | ||||||||||||||||||
26 | OPENSSL_free(ctx->srp_ctx.login); | - | ||||||||||||||||||
27 | OPENSSL_free(ctx->srp_ctx.info); | - | ||||||||||||||||||
28 | BN_free(ctx->srp_ctx.N); | - | ||||||||||||||||||
29 | BN_free(ctx->srp_ctx.g); | - | ||||||||||||||||||
30 | BN_free(ctx->srp_ctx.s); | - | ||||||||||||||||||
31 | BN_free(ctx->srp_ctx.B); | - | ||||||||||||||||||
32 | BN_free(ctx->srp_ctx.A); | - | ||||||||||||||||||
33 | BN_free(ctx->srp_ctx.a); | - | ||||||||||||||||||
34 | BN_free(ctx->srp_ctx.b); | - | ||||||||||||||||||
35 | BN_free(ctx->srp_ctx.v); | - | ||||||||||||||||||
36 | memset(&ctx->srp_ctx, 0, sizeof(ctx->srp_ctx)); | - | ||||||||||||||||||
37 | ctx->srp_ctx.strength = SRP_MINIMAL_N; | - | ||||||||||||||||||
38 | return 1; executed 8017 times by 2 tests: return 1; Executed by:
| 8017 | ||||||||||||||||||
39 | } | - | ||||||||||||||||||
40 | - | |||||||||||||||||||
41 | int SSL_SRP_CTX_free(struct ssl_st *s) | - | ||||||||||||||||||
42 | { | - | ||||||||||||||||||
43 | if (s == NULL)
| 0-8322 | ||||||||||||||||||
44 | return 0; never executed: return 0; | 0 | ||||||||||||||||||
45 | OPENSSL_free(s->srp_ctx.login); | - | ||||||||||||||||||
46 | OPENSSL_free(s->srp_ctx.info); | - | ||||||||||||||||||
47 | BN_free(s->srp_ctx.N); | - | ||||||||||||||||||
48 | BN_free(s->srp_ctx.g); | - | ||||||||||||||||||
49 | BN_free(s->srp_ctx.s); | - | ||||||||||||||||||
50 | BN_free(s->srp_ctx.B); | - | ||||||||||||||||||
51 | BN_free(s->srp_ctx.A); | - | ||||||||||||||||||
52 | BN_free(s->srp_ctx.a); | - | ||||||||||||||||||
53 | BN_free(s->srp_ctx.b); | - | ||||||||||||||||||
54 | BN_free(s->srp_ctx.v); | - | ||||||||||||||||||
55 | memset(&s->srp_ctx, 0, sizeof(s->srp_ctx)); | - | ||||||||||||||||||
56 | s->srp_ctx.strength = SRP_MINIMAL_N; | - | ||||||||||||||||||
57 | return 1; executed 8322 times by 2 tests: return 1; Executed by:
| 8322 | ||||||||||||||||||
58 | } | - | ||||||||||||||||||
59 | - | |||||||||||||||||||
60 | int SSL_SRP_CTX_init(struct ssl_st *s) | - | ||||||||||||||||||
61 | { | - | ||||||||||||||||||
62 | SSL_CTX *ctx; | - | ||||||||||||||||||
63 | - | |||||||||||||||||||
64 | if ((s == NULL) || ((ctx = s->ctx) == NULL))
| 0-8322 | ||||||||||||||||||
65 | return 0; never executed: return 0; | 0 | ||||||||||||||||||
66 | - | |||||||||||||||||||
67 | memset(&s->srp_ctx, 0, sizeof(s->srp_ctx)); | - | ||||||||||||||||||
68 | - | |||||||||||||||||||
69 | s->srp_ctx.SRP_cb_arg = ctx->srp_ctx.SRP_cb_arg; | - | ||||||||||||||||||
70 | /* set client Hello login callback */ | - | ||||||||||||||||||
71 | s->srp_ctx.TLS_ext_srp_username_callback = | - | ||||||||||||||||||
72 | ctx->srp_ctx.TLS_ext_srp_username_callback; | - | ||||||||||||||||||
73 | /* set SRP N/g param callback for verification */ | - | ||||||||||||||||||
74 | s->srp_ctx.SRP_verify_param_callback = | - | ||||||||||||||||||
75 | ctx->srp_ctx.SRP_verify_param_callback; | - | ||||||||||||||||||
76 | /* set SRP client passwd callback */ | - | ||||||||||||||||||
77 | s->srp_ctx.SRP_give_srp_client_pwd_callback = | - | ||||||||||||||||||
78 | ctx->srp_ctx.SRP_give_srp_client_pwd_callback; | - | ||||||||||||||||||
79 | - | |||||||||||||||||||
80 | s->srp_ctx.strength = ctx->srp_ctx.strength; | - | ||||||||||||||||||
81 | - | |||||||||||||||||||
82 | if (((ctx->srp_ctx.N != NULL) &&
| 0-8322 | ||||||||||||||||||
83 | ((s->srp_ctx.N = BN_dup(ctx->srp_ctx.N)) == NULL)) ||
| 0 | ||||||||||||||||||
84 | ((ctx->srp_ctx.g != NULL) &&
| 0-8322 | ||||||||||||||||||
85 | ((s->srp_ctx.g = BN_dup(ctx->srp_ctx.g)) == NULL)) ||
| 0 | ||||||||||||||||||
86 | ((ctx->srp_ctx.s != NULL) &&
| 0-8322 | ||||||||||||||||||
87 | ((s->srp_ctx.s = BN_dup(ctx->srp_ctx.s)) == NULL)) ||
| 0 | ||||||||||||||||||
88 | ((ctx->srp_ctx.B != NULL) &&
| 0-8322 | ||||||||||||||||||
89 | ((s->srp_ctx.B = BN_dup(ctx->srp_ctx.B)) == NULL)) ||
| 0 | ||||||||||||||||||
90 | ((ctx->srp_ctx.A != NULL) &&
| 0-8322 | ||||||||||||||||||
91 | ((s->srp_ctx.A = BN_dup(ctx->srp_ctx.A)) == NULL)) ||
| 0 | ||||||||||||||||||
92 | ((ctx->srp_ctx.a != NULL) &&
| 0-8322 | ||||||||||||||||||
93 | ((s->srp_ctx.a = BN_dup(ctx->srp_ctx.a)) == NULL)) ||
| 0 | ||||||||||||||||||
94 | ((ctx->srp_ctx.v != NULL) &&
| 0-8322 | ||||||||||||||||||
95 | ((s->srp_ctx.v = BN_dup(ctx->srp_ctx.v)) == NULL)) ||
| 0 | ||||||||||||||||||
96 | ((ctx->srp_ctx.b != NULL) &&
| 0-8322 | ||||||||||||||||||
97 | ((s->srp_ctx.b = BN_dup(ctx->srp_ctx.b)) == NULL))) {
| 0 | ||||||||||||||||||
98 | SSLerr(SSL_F_SSL_SRP_CTX_INIT, ERR_R_BN_LIB); | - | ||||||||||||||||||
99 | goto err; never executed: goto err; | 0 | ||||||||||||||||||
100 | } | - | ||||||||||||||||||
101 | if ((ctx->srp_ctx.login != NULL) &&
| 11-8311 | ||||||||||||||||||
102 | ((s->srp_ctx.login = OPENSSL_strdup(ctx->srp_ctx.login)) == NULL)) {
| 0-11 | ||||||||||||||||||
103 | SSLerr(SSL_F_SSL_SRP_CTX_INIT, ERR_R_INTERNAL_ERROR); | - | ||||||||||||||||||
104 | goto err; never executed: goto err; | 0 | ||||||||||||||||||
105 | } | - | ||||||||||||||||||
106 | if ((ctx->srp_ctx.info != NULL) &&
| 6-8316 | ||||||||||||||||||
107 | ((s->srp_ctx.info = BUF_strdup(ctx->srp_ctx.info)) == NULL)) {
| 0-6 | ||||||||||||||||||
108 | SSLerr(SSL_F_SSL_SRP_CTX_INIT, ERR_R_INTERNAL_ERROR); | - | ||||||||||||||||||
109 | goto err; never executed: goto err; | 0 | ||||||||||||||||||
110 | } | - | ||||||||||||||||||
111 | s->srp_ctx.srp_Mask = ctx->srp_ctx.srp_Mask; | - | ||||||||||||||||||
112 | - | |||||||||||||||||||
113 | return 1; executed 8322 times by 2 tests: return 1; Executed by:
| 8322 | ||||||||||||||||||
114 | err: | - | ||||||||||||||||||
115 | OPENSSL_free(s->srp_ctx.login); | - | ||||||||||||||||||
116 | OPENSSL_free(s->srp_ctx.info); | - | ||||||||||||||||||
117 | BN_free(s->srp_ctx.N); | - | ||||||||||||||||||
118 | BN_free(s->srp_ctx.g); | - | ||||||||||||||||||
119 | BN_free(s->srp_ctx.s); | - | ||||||||||||||||||
120 | BN_free(s->srp_ctx.B); | - | ||||||||||||||||||
121 | BN_free(s->srp_ctx.A); | - | ||||||||||||||||||
122 | BN_free(s->srp_ctx.a); | - | ||||||||||||||||||
123 | BN_free(s->srp_ctx.b); | - | ||||||||||||||||||
124 | BN_free(s->srp_ctx.v); | - | ||||||||||||||||||
125 | memset(&s->srp_ctx, 0, sizeof(s->srp_ctx)); | - | ||||||||||||||||||
126 | return 0; never executed: return 0; | 0 | ||||||||||||||||||
127 | } | - | ||||||||||||||||||
128 | - | |||||||||||||||||||
129 | int SSL_CTX_SRP_CTX_init(struct ssl_ctx_st *ctx) | - | ||||||||||||||||||
130 | { | - | ||||||||||||||||||
131 | if (ctx == NULL)
| 0-8017 | ||||||||||||||||||
132 | return 0; never executed: return 0; | 0 | ||||||||||||||||||
133 | - | |||||||||||||||||||
134 | memset(&ctx->srp_ctx, 0, sizeof(ctx->srp_ctx)); | - | ||||||||||||||||||
135 | ctx->srp_ctx.strength = SRP_MINIMAL_N; | - | ||||||||||||||||||
136 | - | |||||||||||||||||||
137 | return 1; executed 8017 times by 2 tests: return 1; Executed by:
| 8017 | ||||||||||||||||||
138 | } | - | ||||||||||||||||||
139 | - | |||||||||||||||||||
140 | /* server side */ | - | ||||||||||||||||||
141 | int SSL_srp_server_param_with_username(SSL *s, int *ad) | - | ||||||||||||||||||
142 | { | - | ||||||||||||||||||
143 | unsigned char b[SSL_MAX_MASTER_KEY_LENGTH]; | - | ||||||||||||||||||
144 | int al; | - | ||||||||||||||||||
145 | - | |||||||||||||||||||
146 | *ad = SSL_AD_UNKNOWN_PSK_IDENTITY; | - | ||||||||||||||||||
147 | if ((s->srp_ctx.TLS_ext_srp_username_callback != NULL) &&
| 0-10 | ||||||||||||||||||
148 | ((al =
| 0-10 | ||||||||||||||||||
149 | s->srp_ctx.TLS_ext_srp_username_callback(s, ad,
| 0-10 | ||||||||||||||||||
150 | s->srp_ctx.SRP_cb_arg)) !=
| 0-10 | ||||||||||||||||||
151 | SSL_ERROR_NONE))
| 0-10 | ||||||||||||||||||
152 | return al; never executed: return al; | 0 | ||||||||||||||||||
153 | - | |||||||||||||||||||
154 | *ad = SSL_AD_INTERNAL_ERROR; | - | ||||||||||||||||||
155 | if ((s->srp_ctx.N == NULL) ||
| 0-10 | ||||||||||||||||||
156 | (s->srp_ctx.g == NULL) ||
| 0-10 | ||||||||||||||||||
157 | (s->srp_ctx.s == NULL) || (s->srp_ctx.v == NULL))
| 0-10 | ||||||||||||||||||
158 | return SSL3_AL_FATAL; never executed: return 2; | 0 | ||||||||||||||||||
159 | - | |||||||||||||||||||
160 | if (RAND_priv_bytes(b, sizeof(b)) <= 0)
| 0-10 | ||||||||||||||||||
161 | return SSL3_AL_FATAL; never executed: return 2; | 0 | ||||||||||||||||||
162 | s->srp_ctx.b = BN_bin2bn(b, sizeof(b), NULL); | - | ||||||||||||||||||
163 | OPENSSL_cleanse(b, sizeof(b)); | - | ||||||||||||||||||
164 | - | |||||||||||||||||||
165 | /* Calculate: B = (kv + g^b) % N */ | - | ||||||||||||||||||
166 | - | |||||||||||||||||||
167 | return ((s->srp_ctx.B = executed 10 times by 1 test: return ((s->srp_ctx.B = SRP_Calc_B(s->srp_ctx.b, s->srp_ctx.N, s->srp_ctx.g, s->srp_ctx.v)) != ((void *)0) ) ? 0 : 2; Executed by:
| 0-10 | ||||||||||||||||||
168 | SRP_Calc_B(s->srp_ctx.b, s->srp_ctx.N, s->srp_ctx.g, executed 10 times by 1 test: return ((s->srp_ctx.B = SRP_Calc_B(s->srp_ctx.b, s->srp_ctx.N, s->srp_ctx.g, s->srp_ctx.v)) != ((void *)0) ) ? 0 : 2; Executed by:
| 0-10 | ||||||||||||||||||
169 | s->srp_ctx.v)) != executed 10 times by 1 test: return ((s->srp_ctx.B = SRP_Calc_B(s->srp_ctx.b, s->srp_ctx.N, s->srp_ctx.g, s->srp_ctx.v)) != ((void *)0) ) ? 0 : 2; Executed by:
| 0-10 | ||||||||||||||||||
170 | NULL) ? SSL_ERROR_NONE : SSL3_AL_FATAL; executed 10 times by 1 test: return ((s->srp_ctx.B = SRP_Calc_B(s->srp_ctx.b, s->srp_ctx.N, s->srp_ctx.g, s->srp_ctx.v)) != ((void *)0) ) ? 0 : 2; Executed by:
| 0-10 | ||||||||||||||||||
171 | } | - | ||||||||||||||||||
172 | - | |||||||||||||||||||
173 | /* | - | ||||||||||||||||||
174 | * If the server just has the raw password, make up a verifier entry on the | - | ||||||||||||||||||
175 | * fly | - | ||||||||||||||||||
176 | */ | - | ||||||||||||||||||
177 | int SSL_set_srp_server_param_pw(SSL *s, const char *user, const char *pass, | - | ||||||||||||||||||
178 | const char *grp) | - | ||||||||||||||||||
179 | { | - | ||||||||||||||||||
180 | SRP_gN *GN = SRP_get_default_gN(grp); | - | ||||||||||||||||||
181 | if (GN == NULL)
| 0-4 | ||||||||||||||||||
182 | return -1; never executed: return -1; | 0 | ||||||||||||||||||
183 | s->srp_ctx.N = BN_dup(GN->N); | - | ||||||||||||||||||
184 | s->srp_ctx.g = BN_dup(GN->g); | - | ||||||||||||||||||
185 | BN_clear_free(s->srp_ctx.v); | - | ||||||||||||||||||
186 | s->srp_ctx.v = NULL; | - | ||||||||||||||||||
187 | BN_clear_free(s->srp_ctx.s); | - | ||||||||||||||||||
188 | s->srp_ctx.s = NULL; | - | ||||||||||||||||||
189 | if (!SRP_create_verifier_BN
| 0-4 | ||||||||||||||||||
190 | (user, pass, &s->srp_ctx.s, &s->srp_ctx.v, GN->N, GN->g))
| 0-4 | ||||||||||||||||||
191 | return -1; never executed: return -1; | 0 | ||||||||||||||||||
192 | - | |||||||||||||||||||
193 | return 1; executed 4 times by 1 test: return 1; Executed by:
| 4 | ||||||||||||||||||
194 | } | - | ||||||||||||||||||
195 | - | |||||||||||||||||||
196 | int SSL_set_srp_server_param(SSL *s, const BIGNUM *N, const BIGNUM *g, | - | ||||||||||||||||||
197 | BIGNUM *sa, BIGNUM *v, char *info) | - | ||||||||||||||||||
198 | { | - | ||||||||||||||||||
199 | if (N != NULL) {
| 0-6 | ||||||||||||||||||
200 | if (s->srp_ctx.N != NULL) {
| 0-6 | ||||||||||||||||||
201 | if (!BN_copy(s->srp_ctx.N, N)) {
| 0 | ||||||||||||||||||
202 | BN_free(s->srp_ctx.N); | - | ||||||||||||||||||
203 | s->srp_ctx.N = NULL; | - | ||||||||||||||||||
204 | } never executed: end of block | 0 | ||||||||||||||||||
205 | } else never executed: end of block | 0 | ||||||||||||||||||
206 | s->srp_ctx.N = BN_dup(N); executed 6 times by 1 test: s->srp_ctx.N = BN_dup(N); Executed by:
| 6 | ||||||||||||||||||
207 | } | - | ||||||||||||||||||
208 | if (g != NULL) {
| 0-6 | ||||||||||||||||||
209 | if (s->srp_ctx.g != NULL) {
| 0-6 | ||||||||||||||||||
210 | if (!BN_copy(s->srp_ctx.g, g)) {
| 0 | ||||||||||||||||||
211 | BN_free(s->srp_ctx.g); | - | ||||||||||||||||||
212 | s->srp_ctx.g = NULL; | - | ||||||||||||||||||
213 | } never executed: end of block | 0 | ||||||||||||||||||
214 | } else never executed: end of block | 0 | ||||||||||||||||||
215 | s->srp_ctx.g = BN_dup(g); executed 6 times by 1 test: s->srp_ctx.g = BN_dup(g); Executed by:
| 6 | ||||||||||||||||||
216 | } | - | ||||||||||||||||||
217 | if (sa != NULL) {
| 0-6 | ||||||||||||||||||
218 | if (s->srp_ctx.s != NULL) {
| 0-6 | ||||||||||||||||||
219 | if (!BN_copy(s->srp_ctx.s, sa)) {
| 0 | ||||||||||||||||||
220 | BN_free(s->srp_ctx.s); | - | ||||||||||||||||||
221 | s->srp_ctx.s = NULL; | - | ||||||||||||||||||
222 | } never executed: end of block | 0 | ||||||||||||||||||
223 | } else never executed: end of block | 0 | ||||||||||||||||||
224 | s->srp_ctx.s = BN_dup(sa); executed 6 times by 1 test: s->srp_ctx.s = BN_dup(sa); Executed by:
| 6 | ||||||||||||||||||
225 | } | - | ||||||||||||||||||
226 | if (v != NULL) {
| 0-6 | ||||||||||||||||||
227 | if (s->srp_ctx.v != NULL) {
| 0-6 | ||||||||||||||||||
228 | if (!BN_copy(s->srp_ctx.v, v)) {
| 0 | ||||||||||||||||||
229 | BN_free(s->srp_ctx.v); | - | ||||||||||||||||||
230 | s->srp_ctx.v = NULL; | - | ||||||||||||||||||
231 | } never executed: end of block | 0 | ||||||||||||||||||
232 | } else never executed: end of block | 0 | ||||||||||||||||||
233 | s->srp_ctx.v = BN_dup(v); executed 6 times by 1 test: s->srp_ctx.v = BN_dup(v); Executed by:
| 6 | ||||||||||||||||||
234 | } | - | ||||||||||||||||||
235 | if (info != NULL) {
| 2-4 | ||||||||||||||||||
236 | if (s->srp_ctx.info)
| 0-4 | ||||||||||||||||||
237 | OPENSSL_free(s->srp_ctx.info); never executed: CRYPTO_free(s->srp_ctx.info, __FILE__, 237); | 0 | ||||||||||||||||||
238 | if ((s->srp_ctx.info = BUF_strdup(info)) == NULL)
| 0-4 | ||||||||||||||||||
239 | return -1; never executed: return -1; | 0 | ||||||||||||||||||
240 | } executed 4 times by 1 test: end of block Executed by:
| 4 | ||||||||||||||||||
241 | - | |||||||||||||||||||
242 | if (!(s->srp_ctx.N) ||
| 0-6 | ||||||||||||||||||
243 | !(s->srp_ctx.g) || !(s->srp_ctx.s) || !(s->srp_ctx.v))
| 0-6 | ||||||||||||||||||
244 | return -1; never executed: return -1; | 0 | ||||||||||||||||||
245 | - | |||||||||||||||||||
246 | return 1; executed 6 times by 1 test: return 1; Executed by:
| 6 | ||||||||||||||||||
247 | } | - | ||||||||||||||||||
248 | - | |||||||||||||||||||
249 | int srp_generate_server_master_secret(SSL *s) | - | ||||||||||||||||||
250 | { | - | ||||||||||||||||||
251 | BIGNUM *K = NULL, *u = NULL; | - | ||||||||||||||||||
252 | int ret = -1, tmp_len = 0; | - | ||||||||||||||||||
253 | unsigned char *tmp = NULL; | - | ||||||||||||||||||
254 | - | |||||||||||||||||||
255 | if (!SRP_Verify_A_mod_N(s->srp_ctx.A, s->srp_ctx.N))
| 0-10 | ||||||||||||||||||
256 | goto err; never executed: goto err; | 0 | ||||||||||||||||||
257 | if ((u = SRP_Calc_u(s->srp_ctx.A, s->srp_ctx.B, s->srp_ctx.N)) == NULL)
| 0-10 | ||||||||||||||||||
258 | goto err; never executed: goto err; | 0 | ||||||||||||||||||
259 | if ((K = SRP_Calc_server_key(s->srp_ctx.A, s->srp_ctx.v, u, s->srp_ctx.b,
| 0-10 | ||||||||||||||||||
260 | s->srp_ctx.N)) == NULL)
| 0-10 | ||||||||||||||||||
261 | goto err; never executed: goto err; | 0 | ||||||||||||||||||
262 | - | |||||||||||||||||||
263 | tmp_len = BN_num_bytes(K); | - | ||||||||||||||||||
264 | if ((tmp = OPENSSL_malloc(tmp_len)) == NULL) {
| 0-10 | ||||||||||||||||||
265 | SSLfatal(s, SSL_AD_INTERNAL_ERROR, | - | ||||||||||||||||||
266 | SSL_F_SRP_GENERATE_SERVER_MASTER_SECRET, ERR_R_MALLOC_FAILURE); | - | ||||||||||||||||||
267 | goto err; never executed: goto err; | 0 | ||||||||||||||||||
268 | } | - | ||||||||||||||||||
269 | BN_bn2bin(K, tmp); | - | ||||||||||||||||||
270 | /* Calls SSLfatal() as required */ | - | ||||||||||||||||||
271 | ret = ssl_generate_master_secret(s, tmp, tmp_len, 1); | - | ||||||||||||||||||
272 | err: code before this statement executed 10 times by 1 test: err: Executed by:
| 10 | ||||||||||||||||||
273 | BN_clear_free(K); | - | ||||||||||||||||||
274 | BN_clear_free(u); | - | ||||||||||||||||||
275 | return ret; executed 10 times by 1 test: return ret; Executed by:
| 10 | ||||||||||||||||||
276 | } | - | ||||||||||||||||||
277 | - | |||||||||||||||||||
278 | /* client side */ | - | ||||||||||||||||||
279 | int srp_generate_client_master_secret(SSL *s) | - | ||||||||||||||||||
280 | { | - | ||||||||||||||||||
281 | BIGNUM *x = NULL, *u = NULL, *K = NULL; | - | ||||||||||||||||||
282 | int ret = -1, tmp_len = 0; | - | ||||||||||||||||||
283 | char *passwd = NULL; | - | ||||||||||||||||||
284 | unsigned char *tmp = NULL; | - | ||||||||||||||||||
285 | - | |||||||||||||||||||
286 | /* | - | ||||||||||||||||||
287 | * Checks if b % n == 0 | - | ||||||||||||||||||
288 | */ | - | ||||||||||||||||||
289 | if (SRP_Verify_B_mod_N(s->srp_ctx.B, s->srp_ctx.N) == 0
| 0-10 | ||||||||||||||||||
290 | || (u = SRP_Calc_u(s->srp_ctx.A, s->srp_ctx.B, s->srp_ctx.N))
| 0-10 | ||||||||||||||||||
291 | == NULL
| 0-10 | ||||||||||||||||||
292 | || s->srp_ctx.SRP_give_srp_client_pwd_callback == NULL) {
| 0-10 | ||||||||||||||||||
293 | SSLfatal(s, SSL_AD_INTERNAL_ERROR, | - | ||||||||||||||||||
294 | SSL_F_SRP_GENERATE_CLIENT_MASTER_SECRET, ERR_R_INTERNAL_ERROR); | - | ||||||||||||||||||
295 | goto err; never executed: goto err; | 0 | ||||||||||||||||||
296 | } | - | ||||||||||||||||||
297 | if ((passwd = s->srp_ctx.SRP_give_srp_client_pwd_callback(s,
| 0-10 | ||||||||||||||||||
298 | s->srp_ctx.SRP_cb_arg))
| 0-10 | ||||||||||||||||||
299 | == NULL) {
| 0-10 | ||||||||||||||||||
300 | SSLfatal(s, SSL_AD_INTERNAL_ERROR, | - | ||||||||||||||||||
301 | SSL_F_SRP_GENERATE_CLIENT_MASTER_SECRET, | - | ||||||||||||||||||
302 | SSL_R_CALLBACK_FAILED); | - | ||||||||||||||||||
303 | goto err; never executed: goto err; | 0 | ||||||||||||||||||
304 | } | - | ||||||||||||||||||
305 | if ((x = SRP_Calc_x(s->srp_ctx.s, s->srp_ctx.login, passwd)) == NULL
| 0-10 | ||||||||||||||||||
306 | || (K = SRP_Calc_client_key(s->srp_ctx.N, s->srp_ctx.B,
| 0-10 | ||||||||||||||||||
307 | s->srp_ctx.g, x,
| 0-10 | ||||||||||||||||||
308 | s->srp_ctx.a, u)) == NULL) {
| 0-10 | ||||||||||||||||||
309 | SSLfatal(s, SSL_AD_INTERNAL_ERROR, | - | ||||||||||||||||||
310 | SSL_F_SRP_GENERATE_CLIENT_MASTER_SECRET, ERR_R_INTERNAL_ERROR); | - | ||||||||||||||||||
311 | goto err; never executed: goto err; | 0 | ||||||||||||||||||
312 | } | - | ||||||||||||||||||
313 | - | |||||||||||||||||||
314 | tmp_len = BN_num_bytes(K); | - | ||||||||||||||||||
315 | if ((tmp = OPENSSL_malloc(tmp_len)) == NULL) {
| 0-10 | ||||||||||||||||||
316 | SSLfatal(s, SSL_AD_INTERNAL_ERROR, | - | ||||||||||||||||||
317 | SSL_F_SRP_GENERATE_CLIENT_MASTER_SECRET, ERR_R_MALLOC_FAILURE); | - | ||||||||||||||||||
318 | goto err; never executed: goto err; | 0 | ||||||||||||||||||
319 | } | - | ||||||||||||||||||
320 | BN_bn2bin(K, tmp); | - | ||||||||||||||||||
321 | /* Calls SSLfatal() as required */ | - | ||||||||||||||||||
322 | ret = ssl_generate_master_secret(s, tmp, tmp_len, 1); | - | ||||||||||||||||||
323 | err: code before this statement executed 10 times by 1 test: err: Executed by:
| 10 | ||||||||||||||||||
324 | BN_clear_free(K); | - | ||||||||||||||||||
325 | BN_clear_free(x); | - | ||||||||||||||||||
326 | if (passwd != NULL)
| 0-10 | ||||||||||||||||||
327 | OPENSSL_clear_free(passwd, strlen(passwd)); executed 10 times by 1 test: CRYPTO_clear_free(passwd, strlen(passwd), __FILE__, 327); Executed by:
| 10 | ||||||||||||||||||
328 | BN_clear_free(u); | - | ||||||||||||||||||
329 | return ret; executed 10 times by 1 test: return ret; Executed by:
| 10 | ||||||||||||||||||
330 | } | - | ||||||||||||||||||
331 | - | |||||||||||||||||||
332 | int srp_verify_server_param(SSL *s) | - | ||||||||||||||||||
333 | { | - | ||||||||||||||||||
334 | SRP_CTX *srp = &s->srp_ctx; | - | ||||||||||||||||||
335 | /* | - | ||||||||||||||||||
336 | * Sanity check parameters: we can quickly check B % N == 0 by checking B | - | ||||||||||||||||||
337 | * != 0 since B < N | - | ||||||||||||||||||
338 | */ | - | ||||||||||||||||||
339 | if (BN_ucmp(srp->g, srp->N) >= 0 || BN_ucmp(srp->B, srp->N) >= 0
| 0-10 | ||||||||||||||||||
340 | || BN_is_zero(srp->B)) {
| 0-10 | ||||||||||||||||||
341 | SSLfatal(s, SSL_AD_ILLEGAL_PARAMETER, SSL_F_SRP_VERIFY_SERVER_PARAM, | - | ||||||||||||||||||
342 | SSL_R_BAD_DATA); | - | ||||||||||||||||||
343 | return 0; never executed: return 0; | 0 | ||||||||||||||||||
344 | } | - | ||||||||||||||||||
345 | - | |||||||||||||||||||
346 | if (BN_num_bits(srp->N) < srp->strength) {
| 0-10 | ||||||||||||||||||
347 | SSLfatal(s, SSL_AD_INSUFFICIENT_SECURITY, SSL_F_SRP_VERIFY_SERVER_PARAM, | - | ||||||||||||||||||
348 | SSL_R_INSUFFICIENT_SECURITY); | - | ||||||||||||||||||
349 | return 0; never executed: return 0; | 0 | ||||||||||||||||||
350 | } | - | ||||||||||||||||||
351 | - | |||||||||||||||||||
352 | if (srp->SRP_verify_param_callback) {
| 0-10 | ||||||||||||||||||
353 | if (srp->SRP_verify_param_callback(s, srp->SRP_cb_arg) <= 0) {
| 0 | ||||||||||||||||||
354 | SSLfatal(s, SSL_AD_INSUFFICIENT_SECURITY, | - | ||||||||||||||||||
355 | SSL_F_SRP_VERIFY_SERVER_PARAM, | - | ||||||||||||||||||
356 | SSL_R_CALLBACK_FAILED); | - | ||||||||||||||||||
357 | return 0; never executed: return 0; | 0 | ||||||||||||||||||
358 | } | - | ||||||||||||||||||
359 | } else if (!SRP_check_known_gN_param(srp->g, srp->N)) { never executed: end of block
| 0-10 | ||||||||||||||||||
360 | SSLfatal(s, SSL_AD_INSUFFICIENT_SECURITY, SSL_F_SRP_VERIFY_SERVER_PARAM, | - | ||||||||||||||||||
361 | SSL_R_INSUFFICIENT_SECURITY); | - | ||||||||||||||||||
362 | return 0; never executed: return 0; | 0 | ||||||||||||||||||
363 | } | - | ||||||||||||||||||
364 | - | |||||||||||||||||||
365 | return 1; executed 10 times by 1 test: return 1; Executed by:
| 10 | ||||||||||||||||||
366 | } | - | ||||||||||||||||||
367 | - | |||||||||||||||||||
368 | int SRP_Calc_A_param(SSL *s) | - | ||||||||||||||||||
369 | { | - | ||||||||||||||||||
370 | unsigned char rnd[SSL_MAX_MASTER_KEY_LENGTH]; | - | ||||||||||||||||||
371 | - | |||||||||||||||||||
372 | if (RAND_priv_bytes(rnd, sizeof(rnd)) <= 0)
| 0-10 | ||||||||||||||||||
373 | return 0; never executed: return 0; | 0 | ||||||||||||||||||
374 | s->srp_ctx.a = BN_bin2bn(rnd, sizeof(rnd), s->srp_ctx.a); | - | ||||||||||||||||||
375 | OPENSSL_cleanse(rnd, sizeof(rnd)); | - | ||||||||||||||||||
376 | - | |||||||||||||||||||
377 | if (!(s->srp_ctx.A = SRP_Calc_A(s->srp_ctx.a, s->srp_ctx.N, s->srp_ctx.g)))
| 0-10 | ||||||||||||||||||
378 | return 0; never executed: return 0; | 0 | ||||||||||||||||||
379 | - | |||||||||||||||||||
380 | return 1; executed 10 times by 1 test: return 1; Executed by:
| 10 | ||||||||||||||||||
381 | } | - | ||||||||||||||||||
382 | - | |||||||||||||||||||
383 | BIGNUM *SSL_get_srp_g(SSL *s) | - | ||||||||||||||||||
384 | { | - | ||||||||||||||||||
385 | if (s->srp_ctx.g != NULL)
| 0 | ||||||||||||||||||
386 | return s->srp_ctx.g; never executed: return s->srp_ctx.g; | 0 | ||||||||||||||||||
387 | return s->ctx->srp_ctx.g; never executed: return s->ctx->srp_ctx.g; | 0 | ||||||||||||||||||
388 | } | - | ||||||||||||||||||
389 | - | |||||||||||||||||||
390 | BIGNUM *SSL_get_srp_N(SSL *s) | - | ||||||||||||||||||
391 | { | - | ||||||||||||||||||
392 | if (s->srp_ctx.N != NULL)
| 0 | ||||||||||||||||||
393 | return s->srp_ctx.N; never executed: return s->srp_ctx.N; | 0 | ||||||||||||||||||
394 | return s->ctx->srp_ctx.N; never executed: return s->ctx->srp_ctx.N; | 0 | ||||||||||||||||||
395 | } | - | ||||||||||||||||||
396 | - | |||||||||||||||||||
397 | char *SSL_get_srp_username(SSL *s) | - | ||||||||||||||||||
398 | { | - | ||||||||||||||||||
399 | if (s->srp_ctx.login != NULL)
| 0-10 | ||||||||||||||||||
400 | return s->srp_ctx.login; executed 10 times by 1 test: return s->srp_ctx.login; Executed by:
| 10 | ||||||||||||||||||
401 | return s->ctx->srp_ctx.login; never executed: return s->ctx->srp_ctx.login; | 0 | ||||||||||||||||||
402 | } | - | ||||||||||||||||||
403 | - | |||||||||||||||||||
404 | char *SSL_get_srp_userinfo(SSL *s) | - | ||||||||||||||||||
405 | { | - | ||||||||||||||||||
406 | if (s->srp_ctx.info != NULL)
| 0 | ||||||||||||||||||
407 | return s->srp_ctx.info; never executed: return s->srp_ctx.info; | 0 | ||||||||||||||||||
408 | return s->ctx->srp_ctx.info; never executed: return s->ctx->srp_ctx.info; | 0 | ||||||||||||||||||
409 | } | - | ||||||||||||||||||
410 | - | |||||||||||||||||||
411 | # define tls1_ctx_ctrl ssl3_ctx_ctrl | - | ||||||||||||||||||
412 | # define tls1_ctx_callback_ctrl ssl3_ctx_callback_ctrl | - | ||||||||||||||||||
413 | - | |||||||||||||||||||
414 | int SSL_CTX_set_srp_username(SSL_CTX *ctx, char *name) | - | ||||||||||||||||||
415 | { | - | ||||||||||||||||||
416 | return tls1_ctx_ctrl(ctx, SSL_CTRL_SET_TLS_EXT_SRP_USERNAME, 0, name); executed 11 times by 1 test: return ssl3_ctx_ctrl(ctx, 79, 0, name); Executed by:
| 11 | ||||||||||||||||||
417 | } | - | ||||||||||||||||||
418 | - | |||||||||||||||||||
419 | int SSL_CTX_set_srp_password(SSL_CTX *ctx, char *password) | - | ||||||||||||||||||
420 | { | - | ||||||||||||||||||
421 | return tls1_ctx_ctrl(ctx, SSL_CTRL_SET_TLS_EXT_SRP_PASSWORD, 0, password); executed 6 times by 1 test: return ssl3_ctx_ctrl(ctx, 81, 0, password); Executed by:
| 6 | ||||||||||||||||||
422 | } | - | ||||||||||||||||||
423 | - | |||||||||||||||||||
424 | int SSL_CTX_set_srp_strength(SSL_CTX *ctx, int strength) | - | ||||||||||||||||||
425 | { | - | ||||||||||||||||||
426 | return tls1_ctx_ctrl(ctx, SSL_CTRL_SET_TLS_EXT_SRP_STRENGTH, strength, executed 1 time by 1 test: return ssl3_ctx_ctrl(ctx, 80, strength, ((void *)0) ); Executed by:
| 1 | ||||||||||||||||||
427 | NULL); executed 1 time by 1 test: return ssl3_ctx_ctrl(ctx, 80, strength, ((void *)0) ); Executed by:
| 1 | ||||||||||||||||||
428 | } | - | ||||||||||||||||||
429 | - | |||||||||||||||||||
430 | int SSL_CTX_set_srp_verify_param_callback(SSL_CTX *ctx, | - | ||||||||||||||||||
431 | int (*cb) (SSL *, void *)) | - | ||||||||||||||||||
432 | { | - | ||||||||||||||||||
433 | return tls1_ctx_callback_ctrl(ctx, SSL_CTRL_SET_SRP_VERIFY_PARAM_CB, executed 1 time by 1 test: return ssl3_ctx_callback_ctrl(ctx, 76, (void (*)(void))cb); Executed by:
| 1 | ||||||||||||||||||
434 | (void (*)(void))cb); executed 1 time by 1 test: return ssl3_ctx_callback_ctrl(ctx, 76, (void (*)(void))cb); Executed by:
| 1 | ||||||||||||||||||
435 | } | - | ||||||||||||||||||
436 | - | |||||||||||||||||||
437 | int SSL_CTX_set_srp_cb_arg(SSL_CTX *ctx, void *arg) | - | ||||||||||||||||||
438 | { | - | ||||||||||||||||||
439 | return tls1_ctx_ctrl(ctx, SSL_CTRL_SET_SRP_ARG, 0, arg); executed 9 times by 1 test: return ssl3_ctx_ctrl(ctx, 78, 0, arg); Executed by:
| 9 | ||||||||||||||||||
440 | } | - | ||||||||||||||||||
441 | - | |||||||||||||||||||
442 | int SSL_CTX_set_srp_username_callback(SSL_CTX *ctx, | - | ||||||||||||||||||
443 | int (*cb) (SSL *, int *, void *)) | - | ||||||||||||||||||
444 | { | - | ||||||||||||||||||
445 | return tls1_ctx_callback_ctrl(ctx, SSL_CTRL_SET_TLS_EXT_SRP_USERNAME_CB, executed 10 times by 1 test: return ssl3_ctx_callback_ctrl(ctx, 75, (void (*)(void))cb); Executed by:
| 10 | ||||||||||||||||||
446 | (void (*)(void))cb); executed 10 times by 1 test: return ssl3_ctx_callback_ctrl(ctx, 75, (void (*)(void))cb); Executed by:
| 10 | ||||||||||||||||||
447 | } | - | ||||||||||||||||||
448 | - | |||||||||||||||||||
449 | int SSL_CTX_set_srp_client_pwd_callback(SSL_CTX *ctx, | - | ||||||||||||||||||
450 | char *(*cb) (SSL *, void *)) | - | ||||||||||||||||||
451 | { | - | ||||||||||||||||||
452 | return tls1_ctx_callback_ctrl(ctx, SSL_CTRL_SET_SRP_GIVE_CLIENT_PWD_CB, executed 5 times by 1 test: return ssl3_ctx_callback_ctrl(ctx, 77, (void (*)(void))cb); Executed by:
| 5 | ||||||||||||||||||
453 | (void (*)(void))cb); executed 5 times by 1 test: return ssl3_ctx_callback_ctrl(ctx, 77, (void (*)(void))cb); Executed by:
| 5 | ||||||||||||||||||
454 | } | - | ||||||||||||||||||
455 | - | |||||||||||||||||||
456 | #endif | - | ||||||||||||||||||
Source code | Switch to Preprocessed file |