xref: /freebsd/crypto/openssh/ssh-rsa.c (revision d6eb98610fa65663bf0df4574b7cb2c5c4ffda71)
1 /* $OpenBSD: ssh-rsa.c,v 1.67 2018/07/03 11:39:54 djm Exp $ */
2 /*
3  * Copyright (c) 2000, 2003 Markus Friedl <markus@openbsd.org>
4  *
5  * Permission to use, copy, modify, and distribute this software for any
6  * purpose with or without fee is hereby granted, provided that the above
7  * copyright notice and this permission notice appear in all copies.
8  *
9  * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
10  * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
11  * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
12  * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
13  * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
14  * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
15  * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
16  */
17 
18 #include "includes.h"
19 
20 #ifdef WITH_OPENSSL
21 
22 #include <sys/types.h>
23 
24 #include <openssl/evp.h>
25 #include <openssl/err.h>
26 
27 #include <stdarg.h>
28 #include <string.h>
29 
30 #include "sshbuf.h"
31 #include "compat.h"
32 #include "ssherr.h"
33 #define SSHKEY_INTERNAL
34 #include "sshkey.h"
35 #include "digest.h"
36 #include "log.h"
37 
38 #include "openbsd-compat/openssl-compat.h"
39 
40 static int openssh_RSA_verify(int, u_char *, size_t, u_char *, size_t, RSA *);
41 
42 static const char *
43 rsa_hash_alg_ident(int hash_alg)
44 {
45 	switch (hash_alg) {
46 	case SSH_DIGEST_SHA1:
47 		return "ssh-rsa";
48 	case SSH_DIGEST_SHA256:
49 		return "rsa-sha2-256";
50 	case SSH_DIGEST_SHA512:
51 		return "rsa-sha2-512";
52 	}
53 	return NULL;
54 }
55 
56 /*
57  * Returns the hash algorithm ID for a given algorithm identifier as used
58  * inside the signature blob,
59  */
60 static int
61 rsa_hash_id_from_ident(const char *ident)
62 {
63 	if (strcmp(ident, "ssh-rsa") == 0)
64 		return SSH_DIGEST_SHA1;
65 	if (strcmp(ident, "rsa-sha2-256") == 0)
66 		return SSH_DIGEST_SHA256;
67 	if (strcmp(ident, "rsa-sha2-512") == 0)
68 		return SSH_DIGEST_SHA512;
69 	return -1;
70 }
71 
72 /*
73  * Return the hash algorithm ID for the specified key name. This includes
74  * all the cases of rsa_hash_id_from_ident() but also the certificate key
75  * types.
76  */
77 static int
78 rsa_hash_id_from_keyname(const char *alg)
79 {
80 	int r;
81 
82 	if ((r = rsa_hash_id_from_ident(alg)) != -1)
83 		return r;
84 	if (strcmp(alg, "ssh-rsa-cert-v01@openssh.com") == 0)
85 		return SSH_DIGEST_SHA1;
86 	if (strcmp(alg, "rsa-sha2-256-cert-v01@openssh.com") == 0)
87 		return SSH_DIGEST_SHA256;
88 	if (strcmp(alg, "rsa-sha2-512-cert-v01@openssh.com") == 0)
89 		return SSH_DIGEST_SHA512;
90 	return -1;
91 }
92 
93 static int
94 rsa_hash_alg_nid(int type)
95 {
96 	switch (type) {
97 	case SSH_DIGEST_SHA1:
98 		return NID_sha1;
99 	case SSH_DIGEST_SHA256:
100 		return NID_sha256;
101 	case SSH_DIGEST_SHA512:
102 		return NID_sha512;
103 	default:
104 		return -1;
105 	}
106 }
107 
108 int
109 ssh_rsa_complete_crt_parameters(struct sshkey *key, const BIGNUM *iqmp)
110 {
111 	const BIGNUM *rsa_p, *rsa_q, *rsa_d;
112 	BIGNUM *aux = NULL, *d_consttime = NULL;
113 	BIGNUM *rsa_dmq1 = NULL, *rsa_dmp1 = NULL, *rsa_iqmp = NULL;
114 	BN_CTX *ctx = NULL;
115 	int r;
116 
117 	if (key == NULL || key->rsa == NULL ||
118 	    sshkey_type_plain(key->type) != KEY_RSA)
119 		return SSH_ERR_INVALID_ARGUMENT;
120 
121 	RSA_get0_key(key->rsa, NULL, NULL, &rsa_d);
122 	RSA_get0_factors(key->rsa, &rsa_p, &rsa_q);
123 
124 	if ((ctx = BN_CTX_new()) == NULL)
125 		return SSH_ERR_ALLOC_FAIL;
126 	if ((aux = BN_new()) == NULL ||
127 	    (rsa_dmq1 = BN_new()) == NULL ||
128 	    (rsa_dmp1 = BN_new()) == NULL)
129 		return SSH_ERR_ALLOC_FAIL;
130 	if ((d_consttime = BN_dup(rsa_d)) == NULL ||
131 	    (rsa_iqmp = BN_dup(iqmp)) == NULL) {
132 		r = SSH_ERR_ALLOC_FAIL;
133 		goto out;
134 	}
135 	BN_set_flags(aux, BN_FLG_CONSTTIME);
136 	BN_set_flags(d_consttime, BN_FLG_CONSTTIME);
137 
138 	if ((BN_sub(aux, rsa_q, BN_value_one()) == 0) ||
139 	    (BN_mod(rsa_dmq1, d_consttime, aux, ctx) == 0) ||
140 	    (BN_sub(aux, rsa_p, BN_value_one()) == 0) ||
141 	    (BN_mod(rsa_dmp1, d_consttime, aux, ctx) == 0)) {
142 		r = SSH_ERR_LIBCRYPTO_ERROR;
143 		goto out;
144 	}
145 	if (!RSA_set0_crt_params(key->rsa, rsa_dmp1, rsa_dmq1, rsa_iqmp)) {
146 		r = SSH_ERR_LIBCRYPTO_ERROR;
147 		goto out;
148 	}
149 	rsa_dmp1 = rsa_dmq1 = rsa_iqmp = NULL; /* transferred */
150 	/* success */
151 	r = 0;
152  out:
153 	BN_clear_free(aux);
154 	BN_clear_free(d_consttime);
155 	BN_clear_free(rsa_dmp1);
156 	BN_clear_free(rsa_dmq1);
157 	BN_clear_free(rsa_iqmp);
158 	BN_CTX_free(ctx);
159 	return r;
160 }
161 
162 /* RSASSA-PKCS1-v1_5 (PKCS #1 v2.0 signature) with SHA1 */
163 int
164 ssh_rsa_sign(const struct sshkey *key, u_char **sigp, size_t *lenp,
165     const u_char *data, size_t datalen, const char *alg_ident)
166 {
167 	const BIGNUM *rsa_n;
168 	u_char digest[SSH_DIGEST_MAX_LENGTH], *sig = NULL;
169 	size_t slen = 0;
170 	u_int dlen, len;
171 	int nid, hash_alg, ret = SSH_ERR_INTERNAL_ERROR;
172 	struct sshbuf *b = NULL;
173 
174 	if (lenp != NULL)
175 		*lenp = 0;
176 	if (sigp != NULL)
177 		*sigp = NULL;
178 
179 	if (alg_ident == NULL || strlen(alg_ident) == 0)
180 		hash_alg = SSH_DIGEST_SHA1;
181 	else
182 		hash_alg = rsa_hash_id_from_keyname(alg_ident);
183 	if (key == NULL || key->rsa == NULL || hash_alg == -1 ||
184 	    sshkey_type_plain(key->type) != KEY_RSA)
185 		return SSH_ERR_INVALID_ARGUMENT;
186 	RSA_get0_key(key->rsa, &rsa_n, NULL, NULL);
187 	if (BN_num_bits(rsa_n) < SSH_RSA_MINIMUM_MODULUS_SIZE)
188 		return SSH_ERR_KEY_LENGTH;
189 	slen = RSA_size(key->rsa);
190 	if (slen <= 0 || slen > SSHBUF_MAX_BIGNUM)
191 		return SSH_ERR_INVALID_ARGUMENT;
192 
193 	/* hash the data */
194 	nid = rsa_hash_alg_nid(hash_alg);
195 	if ((dlen = ssh_digest_bytes(hash_alg)) == 0)
196 		return SSH_ERR_INTERNAL_ERROR;
197 	if ((ret = ssh_digest_memory(hash_alg, data, datalen,
198 	    digest, sizeof(digest))) != 0)
199 		goto out;
200 
201 	if ((sig = malloc(slen)) == NULL) {
202 		ret = SSH_ERR_ALLOC_FAIL;
203 		goto out;
204 	}
205 
206 	if (RSA_sign(nid, digest, dlen, sig, &len, key->rsa) != 1) {
207 		ret = SSH_ERR_LIBCRYPTO_ERROR;
208 		goto out;
209 	}
210 	if (len < slen) {
211 		size_t diff = slen - len;
212 		memmove(sig + diff, sig, len);
213 		explicit_bzero(sig, diff);
214 	} else if (len > slen) {
215 		ret = SSH_ERR_INTERNAL_ERROR;
216 		goto out;
217 	}
218 	/* encode signature */
219 	if ((b = sshbuf_new()) == NULL) {
220 		ret = SSH_ERR_ALLOC_FAIL;
221 		goto out;
222 	}
223 	if ((ret = sshbuf_put_cstring(b, rsa_hash_alg_ident(hash_alg))) != 0 ||
224 	    (ret = sshbuf_put_string(b, sig, slen)) != 0)
225 		goto out;
226 	len = sshbuf_len(b);
227 	if (sigp != NULL) {
228 		if ((*sigp = malloc(len)) == NULL) {
229 			ret = SSH_ERR_ALLOC_FAIL;
230 			goto out;
231 		}
232 		memcpy(*sigp, sshbuf_ptr(b), len);
233 	}
234 	if (lenp != NULL)
235 		*lenp = len;
236 	ret = 0;
237  out:
238 	explicit_bzero(digest, sizeof(digest));
239 	freezero(sig, slen);
240 	sshbuf_free(b);
241 	return ret;
242 }
243 
244 int
245 ssh_rsa_verify(const struct sshkey *key,
246     const u_char *sig, size_t siglen, const u_char *data, size_t datalen,
247     const char *alg)
248 {
249 	const BIGNUM *rsa_n;
250 	char *sigtype = NULL;
251 	int hash_alg, want_alg, ret = SSH_ERR_INTERNAL_ERROR;
252 	size_t len = 0, diff, modlen, dlen;
253 	struct sshbuf *b = NULL;
254 	u_char digest[SSH_DIGEST_MAX_LENGTH], *osigblob, *sigblob = NULL;
255 
256 	if (key == NULL || key->rsa == NULL ||
257 	    sshkey_type_plain(key->type) != KEY_RSA ||
258 	    sig == NULL || siglen == 0)
259 		return SSH_ERR_INVALID_ARGUMENT;
260 	RSA_get0_key(key->rsa, &rsa_n, NULL, NULL);
261 	if (BN_num_bits(rsa_n) < SSH_RSA_MINIMUM_MODULUS_SIZE)
262 		return SSH_ERR_KEY_LENGTH;
263 
264 	if ((b = sshbuf_from(sig, siglen)) == NULL)
265 		return SSH_ERR_ALLOC_FAIL;
266 	if (sshbuf_get_cstring(b, &sigtype, NULL) != 0) {
267 		ret = SSH_ERR_INVALID_FORMAT;
268 		goto out;
269 	}
270 	if ((hash_alg = rsa_hash_id_from_ident(sigtype)) == -1) {
271 		ret = SSH_ERR_KEY_TYPE_MISMATCH;
272 		goto out;
273 	}
274 	/*
275 	 * Allow ssh-rsa-cert-v01 certs to generate SHA2 signatures for
276 	 * legacy reasons, but otherwise the signature type should match.
277 	 */
278 	if (alg != NULL && strcmp(alg, "ssh-rsa-cert-v01@openssh.com") != 0) {
279 		if ((want_alg = rsa_hash_id_from_keyname(alg)) == -1) {
280 			ret = SSH_ERR_INVALID_ARGUMENT;
281 			goto out;
282 		}
283 		if (hash_alg != want_alg) {
284 			ret = SSH_ERR_SIGNATURE_INVALID;
285 			goto out;
286 		}
287 	}
288 	if (sshbuf_get_string(b, &sigblob, &len) != 0) {
289 		ret = SSH_ERR_INVALID_FORMAT;
290 		goto out;
291 	}
292 	if (sshbuf_len(b) != 0) {
293 		ret = SSH_ERR_UNEXPECTED_TRAILING_DATA;
294 		goto out;
295 	}
296 	/* RSA_verify expects a signature of RSA_size */
297 	modlen = RSA_size(key->rsa);
298 	if (len > modlen) {
299 		ret = SSH_ERR_KEY_BITS_MISMATCH;
300 		goto out;
301 	} else if (len < modlen) {
302 		diff = modlen - len;
303 		osigblob = sigblob;
304 		if ((sigblob = realloc(sigblob, modlen)) == NULL) {
305 			sigblob = osigblob; /* put it back for clear/free */
306 			ret = SSH_ERR_ALLOC_FAIL;
307 			goto out;
308 		}
309 		memmove(sigblob + diff, sigblob, len);
310 		explicit_bzero(sigblob, diff);
311 		len = modlen;
312 	}
313 	if ((dlen = ssh_digest_bytes(hash_alg)) == 0) {
314 		ret = SSH_ERR_INTERNAL_ERROR;
315 		goto out;
316 	}
317 	if ((ret = ssh_digest_memory(hash_alg, data, datalen,
318 	    digest, sizeof(digest))) != 0)
319 		goto out;
320 
321 	ret = openssh_RSA_verify(hash_alg, digest, dlen, sigblob, len,
322 	    key->rsa);
323  out:
324 	freezero(sigblob, len);
325 	free(sigtype);
326 	sshbuf_free(b);
327 	explicit_bzero(digest, sizeof(digest));
328 	return ret;
329 }
330 
331 /*
332  * See:
333  * http://www.rsasecurity.com/rsalabs/pkcs/pkcs-1/
334  * ftp://ftp.rsasecurity.com/pub/pkcs/pkcs-1/pkcs-1v2-1.asn
335  */
336 
337 /*
338  * id-sha1 OBJECT IDENTIFIER ::= { iso(1) identified-organization(3)
339  *	oiw(14) secsig(3) algorithms(2) 26 }
340  */
341 static const u_char id_sha1[] = {
342 	0x30, 0x21, /* type Sequence, length 0x21 (33) */
343 	0x30, 0x09, /* type Sequence, length 0x09 */
344 	0x06, 0x05, /* type OID, length 0x05 */
345 	0x2b, 0x0e, 0x03, 0x02, 0x1a, /* id-sha1 OID */
346 	0x05, 0x00, /* NULL */
347 	0x04, 0x14  /* Octet string, length 0x14 (20), followed by sha1 hash */
348 };
349 
350 /*
351  * See http://csrc.nist.gov/groups/ST/crypto_apps_infra/csor/algorithms.html
352  * id-sha256 OBJECT IDENTIFIER ::= { joint-iso-itu-t(2) country(16) us(840)
353  *      organization(1) gov(101) csor(3) nistAlgorithm(4) hashAlgs(2)
354  *      id-sha256(1) }
355  */
356 static const u_char id_sha256[] = {
357 	0x30, 0x31, /* type Sequence, length 0x31 (49) */
358 	0x30, 0x0d, /* type Sequence, length 0x0d (13) */
359 	0x06, 0x09, /* type OID, length 0x09 */
360 	0x60, 0x86, 0x48, 0x01, 0x65, 0x03, 0x04, 0x02, 0x01, /* id-sha256 */
361 	0x05, 0x00, /* NULL */
362 	0x04, 0x20  /* Octet string, length 0x20 (32), followed by sha256 hash */
363 };
364 
365 /*
366  * See http://csrc.nist.gov/groups/ST/crypto_apps_infra/csor/algorithms.html
367  * id-sha512 OBJECT IDENTIFIER ::= { joint-iso-itu-t(2) country(16) us(840)
368  *      organization(1) gov(101) csor(3) nistAlgorithm(4) hashAlgs(2)
369  *      id-sha256(3) }
370  */
371 static const u_char id_sha512[] = {
372 	0x30, 0x51, /* type Sequence, length 0x51 (81) */
373 	0x30, 0x0d, /* type Sequence, length 0x0d (13) */
374 	0x06, 0x09, /* type OID, length 0x09 */
375 	0x60, 0x86, 0x48, 0x01, 0x65, 0x03, 0x04, 0x02, 0x03, /* id-sha512 */
376 	0x05, 0x00, /* NULL */
377 	0x04, 0x40  /* Octet string, length 0x40 (64), followed by sha512 hash */
378 };
379 
380 static int
381 rsa_hash_alg_oid(int hash_alg, const u_char **oidp, size_t *oidlenp)
382 {
383 	switch (hash_alg) {
384 	case SSH_DIGEST_SHA1:
385 		*oidp = id_sha1;
386 		*oidlenp = sizeof(id_sha1);
387 		break;
388 	case SSH_DIGEST_SHA256:
389 		*oidp = id_sha256;
390 		*oidlenp = sizeof(id_sha256);
391 		break;
392 	case SSH_DIGEST_SHA512:
393 		*oidp = id_sha512;
394 		*oidlenp = sizeof(id_sha512);
395 		break;
396 	default:
397 		return SSH_ERR_INVALID_ARGUMENT;
398 	}
399 	return 0;
400 }
401 
402 static int
403 openssh_RSA_verify(int hash_alg, u_char *hash, size_t hashlen,
404     u_char *sigbuf, size_t siglen, RSA *rsa)
405 {
406 	size_t rsasize = 0, oidlen = 0, hlen = 0;
407 	int ret, len, oidmatch, hashmatch;
408 	const u_char *oid = NULL;
409 	u_char *decrypted = NULL;
410 
411 	if ((ret = rsa_hash_alg_oid(hash_alg, &oid, &oidlen)) != 0)
412 		return ret;
413 	ret = SSH_ERR_INTERNAL_ERROR;
414 	hlen = ssh_digest_bytes(hash_alg);
415 	if (hashlen != hlen) {
416 		ret = SSH_ERR_INVALID_ARGUMENT;
417 		goto done;
418 	}
419 	rsasize = RSA_size(rsa);
420 	if (rsasize <= 0 || rsasize > SSHBUF_MAX_BIGNUM ||
421 	    siglen == 0 || siglen > rsasize) {
422 		ret = SSH_ERR_INVALID_ARGUMENT;
423 		goto done;
424 	}
425 	if ((decrypted = malloc(rsasize)) == NULL) {
426 		ret = SSH_ERR_ALLOC_FAIL;
427 		goto done;
428 	}
429 	if ((len = RSA_public_decrypt(siglen, sigbuf, decrypted, rsa,
430 	    RSA_PKCS1_PADDING)) < 0) {
431 		ret = SSH_ERR_LIBCRYPTO_ERROR;
432 		goto done;
433 	}
434 	if (len < 0 || (size_t)len != hlen + oidlen) {
435 		ret = SSH_ERR_INVALID_FORMAT;
436 		goto done;
437 	}
438 	oidmatch = timingsafe_bcmp(decrypted, oid, oidlen) == 0;
439 	hashmatch = timingsafe_bcmp(decrypted + oidlen, hash, hlen) == 0;
440 	if (!oidmatch || !hashmatch) {
441 		ret = SSH_ERR_SIGNATURE_INVALID;
442 		goto done;
443 	}
444 	ret = 0;
445 done:
446 	freezero(decrypted, rsasize);
447 	return ret;
448 }
449 #endif /* WITH_OPENSSL */
450