X-Git-Url: http://git.silcnet.org/gitweb/?a=blobdiff_plain;f=lib%2Fsilccrypt%2Fsilcpkcs1.c;h=5db3f82a72e2795f26ac133d6d25de6de8846c89;hb=e7b6c157b80152bf9fb9266e6bdd93f9fb0db776;hp=bfdded05218f814f7ab93838cbe1d20bf3caae70;hpb=40f8443d8d3a6577336ee66d18e04d9ac4d956bb;p=silc.git diff --git a/lib/silccrypt/silcpkcs1.c b/lib/silccrypt/silcpkcs1.c index bfdded05..5db3f82a 100644 --- a/lib/silccrypt/silcpkcs1.c +++ b/lib/silccrypt/silcpkcs1.c @@ -4,7 +4,7 @@ Author: Pekka Riikonen - Copyright (C) 2003 Pekka Riikonen + Copyright (C) 2003 - 2007 Pekka Riikonen This program is free software; you can redistribute it and/or modify it under the terms of the GNU General Public License as published by @@ -19,7 +19,10 @@ /* $Id$ */ #include "silc.h" -#include "silcpkcs1.h" +#include "rsa.h" +#include "silcpkcs1_i.h" + +/************************** PKCS #1 message format ***************************/ /* Minimum padding in block */ #define SILC_PKCS1_MIN_PADDING 8 @@ -34,11 +37,11 @@ success. */ SilcBool silc_pkcs1_encode(SilcPkcs1BlockType bt, - const unsigned char *data, - SilcUInt32 data_len, - unsigned char *dest_data, - SilcUInt32 dest_data_size, - SilcRng rng) + const unsigned char *data, + SilcUInt32 data_len, + unsigned char *dest_data, + SilcUInt32 dest_data_size, + SilcRng rng) { SilcInt32 padlen; int i; @@ -46,7 +49,8 @@ SilcBool silc_pkcs1_encode(SilcPkcs1BlockType bt, SILC_LOG_DEBUG(("PKCS#1 encoding, bt %d", bt)); if (!data || !dest_data || - dest_data_size < 3 || dest_data_size < data_len) { + dest_data_size < SILC_PKCS1_MIN_PADDING + 3 || + dest_data_size < data_len) { SILC_LOG_DEBUG(("Data to be encoded is too long")); return FALSE; } @@ -71,14 +75,15 @@ SilcBool silc_pkcs1_encode(SilcPkcs1BlockType bt, case SILC_PKCS1_BT_PUB: /* Encryption */ + if (!rng) { + SILC_LOG_ERROR(("Cannot encrypt: random number generator not provided")); + return FALSE; + } /* It is guaranteed this routine does not return zero byte. */ - if (rng) - for (i = 2; i < padlen; i++) - dest_data[i] = silc_rng_get_byte_fast(rng); - else - for (i = 2; i < padlen; i++) - dest_data[i] = silc_rng_global_get_byte_fast(); + for (i = 2; i < padlen; i++) + dest_data[i] = silc_rng_get_byte_fast(rng); + break; } @@ -97,11 +102,11 @@ SilcBool silc_pkcs1_encode(SilcPkcs1BlockType bt, Returns TRUE on success. */ SilcBool silc_pkcs1_decode(SilcPkcs1BlockType bt, - const unsigned char *data, - SilcUInt32 data_len, - unsigned char *dest_data, - SilcUInt32 dest_data_size, - SilcUInt32 *dest_len) + const unsigned char *data, + SilcUInt32 data_len, + unsigned char *dest_data, + SilcUInt32 dest_data_size, + SilcUInt32 *dest_len) { int i = 0; @@ -158,3 +163,750 @@ SilcBool silc_pkcs1_decode(SilcPkcs1BlockType bt, return TRUE; } + + +/***************************** PKCS #1 PKCS API ******************************/ + +/* Generates RSA key pair. */ + +SILC_PKCS_ALG_GENERATE_KEY(silc_pkcs1_generate_key) +{ + SilcUInt32 prime_bits = keylen / 2; + SilcMPInt p, q; + SilcBool found = FALSE; + + if (keylen < 768 || keylen > 16384) + return FALSE; + + silc_mp_init(&p); + silc_mp_init(&q); + + /* Find p and q */ + while (!found) { + silc_math_gen_prime(&p, prime_bits, FALSE, rng); + silc_math_gen_prime(&q, prime_bits, FALSE, rng); + if ((silc_mp_cmp(&p, &q)) != 0) + found = TRUE; + } + + /* If p is smaller than q, switch them */ + if ((silc_mp_cmp(&p, &q)) > 0) { + SilcMPInt hlp; + silc_mp_init(&hlp); + + silc_mp_set(&hlp, &p); + silc_mp_set(&p, &q); + silc_mp_set(&q, &hlp); + + silc_mp_uninit(&hlp); + } + + /* Generate the actual keys */ + if (!silc_rsa_generate_keys(keylen, &p, &q, ret_public_key, ret_private_key)) + return FALSE; + + silc_mp_uninit(&p); + silc_mp_uninit(&q); + + return TRUE; +} + +/* Import PKCS #1 compliant public key */ + +SILC_PKCS_ALG_IMPORT_PUBLIC_KEY(silc_pkcs1_import_public_key) +{ + SilcAsn1 asn1 = NULL; + SilcBufferStruct alg_key; + RsaPublicKey *pubkey; + + if (!ret_public_key) + return 0; + + asn1 = silc_asn1_alloc(NULL); + if (!asn1) + return 0; + + /* Allocate RSA public key */ + *ret_public_key = pubkey = silc_calloc(1, sizeof(*pubkey)); + if (!pubkey) + goto err; + + /* Parse the PKCS #1 public key */ + silc_buffer_set(&alg_key, key, key_len); + if (!silc_asn1_decode(asn1, &alg_key, + SILC_ASN1_OPTS(SILC_ASN1_ALLOC), + SILC_ASN1_SEQUENCE, + SILC_ASN1_INT(&pubkey->n), + SILC_ASN1_INT(&pubkey->e), + SILC_ASN1_END, SILC_ASN1_END)) + goto err; + + /* Set key length */ + pubkey->bits = ((silc_mp_sizeinbase(&pubkey->n, 2) + 7) / 8) * 8; + + silc_asn1_free(asn1); + + return key_len; + + err: + silc_free(pubkey); + silc_asn1_free(asn1); + return 0; +} + +/* Export PKCS #1 compliant public key */ + +SILC_PKCS_ALG_EXPORT_PUBLIC_KEY(silc_pkcs1_export_public_key) +{ + RsaPublicKey *key = public_key; + SilcAsn1 asn1 = NULL; + SilcBufferStruct alg_key; + unsigned char *ret; + + asn1 = silc_asn1_alloc(stack); + if (!asn1) + goto err; + + /* Encode to PKCS #1 public key */ + memset(&alg_key, 0, sizeof(alg_key)); + if (!silc_asn1_encode(asn1, &alg_key, + SILC_ASN1_OPTS(SILC_ASN1_ALLOC), + SILC_ASN1_SEQUENCE, + SILC_ASN1_INT(&key->n), + SILC_ASN1_INT(&key->e), + SILC_ASN1_END, SILC_ASN1_END)) + goto err; + + ret = silc_buffer_steal(&alg_key, ret_len); + silc_asn1_free(asn1); + + return ret; + + err: + if (asn1) + silc_asn1_free(asn1); + return NULL; +} + +/* Returns key length */ + +SILC_PKCS_ALG_PUBLIC_KEY_BITLEN(silc_pkcs1_public_key_bitlen) +{ + RsaPublicKey *key = public_key; + return key->bits; +} + +/* Copy public key */ + +SILC_PKCS_ALG_PUBLIC_KEY_COPY(silc_pkcs1_public_key_copy) +{ + RsaPublicKey *key = public_key, *new_key; + + new_key = silc_calloc(1, sizeof(*new_key)); + if (!new_key) + return NULL; + + silc_mp_init(&new_key->n); + silc_mp_init(&new_key->e); + silc_mp_set(&new_key->n, &key->n); + silc_mp_set(&new_key->e, &key->e); + new_key->bits = key->bits; + + return new_key; +} + +/* Compare public keys */ + +SILC_PKCS_ALG_PUBLIC_KEY_COMPARE(silc_pkcs1_public_key_compare) +{ + RsaPublicKey *k1 = key1, *k2 = key2; + + if (k1->bits != k2->bits) + return FALSE; + if (silc_mp_cmp(&k1->e, &k2->e) != 0) + return FALSE; + if (silc_mp_cmp(&k1->n, &k2->n) != 0) + return FALSE; + + return TRUE; +} + +/* Frees public key */ + +SILC_PKCS_ALG_PUBLIC_KEY_FREE(silc_pkcs1_public_key_free) +{ + RsaPublicKey *key = public_key; + + silc_mp_uninit(&key->n); + silc_mp_uninit(&key->e); + silc_free(key); +} + +/* Import PKCS #1 compliant private key */ + +SILC_PKCS_ALG_IMPORT_PRIVATE_KEY(silc_pkcs1_import_private_key) +{ + SilcAsn1 asn1; + SilcBufferStruct alg_key; + RsaPrivateKey *privkey; + SilcUInt32 ver; + + if (!ret_private_key) + return 0; + + asn1 = silc_asn1_alloc(NULL); + if (!asn1) + return 0; + + /* Allocate RSA private key */ + *ret_private_key = privkey = silc_calloc(1, sizeof(*privkey)); + if (!privkey) + goto err; + + /* Parse the PKCS #1 private key */ + silc_buffer_set(&alg_key, key, key_len); + if (!silc_asn1_decode(asn1, &alg_key, + SILC_ASN1_OPTS(SILC_ASN1_ALLOC), + SILC_ASN1_SEQUENCE, + SILC_ASN1_SHORT_INT(&ver), + SILC_ASN1_INT(&privkey->n), + SILC_ASN1_INT(&privkey->e), + SILC_ASN1_INT(&privkey->d), + SILC_ASN1_INT(&privkey->p), + SILC_ASN1_INT(&privkey->q), + SILC_ASN1_INT(&privkey->dP), + SILC_ASN1_INT(&privkey->dQ), + SILC_ASN1_INT(&privkey->qP), + SILC_ASN1_END, SILC_ASN1_END)) + goto err; + + if (ver != 0) + goto err; + + /* Set key length */ + privkey->bits = ((silc_mp_sizeinbase(&privkey->n, 2) + 7) / 8) * 8; + + silc_asn1_free(asn1); + + return key_len; + + err: + silc_free(privkey); + silc_asn1_free(asn1); + return 0; +} + +/* Export PKCS #1 compliant private key */ + +SILC_PKCS_ALG_EXPORT_PRIVATE_KEY(silc_pkcs1_export_private_key) +{ + RsaPrivateKey *key = private_key; + SilcAsn1 asn1; + SilcBufferStruct alg_key; + unsigned char *ret; + + asn1 = silc_asn1_alloc(stack); + if (!asn1) + return FALSE; + + /* Encode to PKCS #1 private key */ + memset(&alg_key, 0, sizeof(alg_key)); + if (!silc_asn1_encode(asn1, &alg_key, + SILC_ASN1_OPTS(SILC_ASN1_ALLOC), + SILC_ASN1_SEQUENCE, + SILC_ASN1_SHORT_INT(0), + SILC_ASN1_INT(&key->n), + SILC_ASN1_INT(&key->e), + SILC_ASN1_INT(&key->d), + SILC_ASN1_INT(&key->p), + SILC_ASN1_INT(&key->q), + SILC_ASN1_INT(&key->dP), + SILC_ASN1_INT(&key->dQ), + SILC_ASN1_INT(&key->qP), + SILC_ASN1_END, SILC_ASN1_END)) + goto err; + + ret = silc_buffer_steal(&alg_key, ret_len); + silc_asn1_free(asn1); + + return ret; + + err: + silc_asn1_free(asn1); + return NULL; +} + +/* Returns key length */ + +SILC_PKCS_ALG_PRIVATE_KEY_BITLEN(silc_pkcs1_private_key_bitlen) +{ + RsaPrivateKey *key = private_key; + return key->bits; +} + +/* Frees private key */ + +SILC_PKCS_ALG_PRIVATE_KEY_FREE(silc_pkcs1_private_key_free) +{ + RsaPrivateKey *key = private_key; + + silc_mp_uninit(&key->n); + silc_mp_uninit(&key->e); + silc_mp_uninit(&key->d); + silc_mp_uninit(&key->dP); + silc_mp_uninit(&key->dQ); + silc_mp_uninit(&key->qP); + silc_mp_uninit(&key->p); + silc_mp_uninit(&key->q); + silc_free(key); +} + +/* PKCS #1 RSA routines */ + +SILC_PKCS_ALG_ENCRYPT(silc_pkcs1_encrypt) +{ + RsaPublicKey *key = public_key; + SilcMPInt mp_tmp; + SilcMPInt mp_dst; + unsigned char padded[2048 + 1]; + SilcUInt32 len = (key->bits + 7) / 8; + SilcStack stack; + + if (sizeof(padded) < len) { + encrypt_cb(FALSE, NULL, 0, context); + return NULL; + } + + /* Pad data */ + if (!silc_pkcs1_encode(SILC_PKCS1_BT_PUB, src, src_len, + padded, len, rng)) { + encrypt_cb(FALSE, NULL, 0, context); + return NULL; + } + + stack = silc_stack_alloc(2048, silc_crypto_stack()); + + silc_mp_sinit(stack, &mp_tmp); + silc_mp_sinit(stack, &mp_dst); + + /* Data to MP */ + silc_mp_bin2mp(padded, len, &mp_tmp); + + /* Encrypt */ + silc_rsa_public_operation(key, &mp_tmp, &mp_dst); + + /* MP to data */ + silc_mp_mp2bin_noalloc(&mp_dst, padded, len); + + /* Deliver result */ + encrypt_cb(TRUE, padded, len, context); + + memset(padded, 0, sizeof(padded)); + silc_mp_suninit(stack, &mp_tmp); + silc_mp_suninit(stack, &mp_dst); + silc_stack_free(stack); + + return NULL; +} + +SILC_PKCS_ALG_DECRYPT(silc_pkcs1_decrypt) +{ + RsaPrivateKey *key = private_key; + SilcMPInt mp_tmp; + SilcMPInt mp_dst; + unsigned char *padded, unpadded[2048 + 1]; + SilcUInt32 padded_len, dst_len; + SilcStack stack; + + if (sizeof(unpadded) < (key->bits + 7) / 8) { + decrypt_cb(FALSE, NULL, 0, context); + return NULL; + } + + stack = silc_stack_alloc(2048, silc_crypto_stack()); + + silc_mp_sinit(stack, &mp_tmp); + silc_mp_sinit(stack, &mp_dst); + + /* Data to MP */ + silc_mp_bin2mp(src, src_len, &mp_tmp); + + /* Decrypt */ + silc_rsa_private_operation(key, &mp_tmp, &mp_dst); + + /* MP to data */ + padded = silc_mp_mp2bin(&mp_dst, (key->bits + 7) / 8, &padded_len); + + /* Unpad data */ + if (!silc_pkcs1_decode(SILC_PKCS1_BT_PUB, padded, padded_len, + unpadded, sizeof(unpadded), &dst_len)) { + memset(padded, 0, padded_len); + silc_free(padded); + silc_mp_suninit(stack, &mp_tmp); + silc_mp_suninit(stack, &mp_dst); + decrypt_cb(FALSE, NULL, 0, context); + return NULL; + } + + /* Deliver result */ + decrypt_cb(TRUE, unpadded, dst_len, context); + + memset(padded, 0, padded_len); + memset(unpadded, 0, sizeof(unpadded)); + silc_free(padded); + silc_mp_suninit(stack, &mp_tmp); + silc_mp_suninit(stack, &mp_dst); + silc_stack_free(stack); + + return NULL; +} + +/* PKCS #1 sign with appendix, hash OID included in the signature */ + +SILC_PKCS_ALG_SIGN(silc_pkcs1_sign) +{ + RsaPrivateKey *key = private_key; + unsigned char padded[2048 + 1], hashr[SILC_HASH_MAXLEN]; + SilcMPInt mp_tmp; + SilcMPInt mp_dst; + SilcBufferStruct di; + SilcUInt32 len = (key->bits + 7) / 8; + const char *oid; + SilcStack stack; + SilcAsn1 asn1; + + SILC_LOG_DEBUG(("Sign")); + + if (sizeof(padded) < len) { + sign_cb(FALSE, NULL, 0, context); + return NULL; + } + + oid = silc_hash_get_oid(hash); + if (!oid) { + sign_cb(FALSE, NULL, 0, context); + return NULL; + } + + stack = silc_stack_alloc(2048, silc_crypto_stack()); + + asn1 = silc_asn1_alloc(stack); + if (!asn1) { + silc_stack_free(stack); + sign_cb(FALSE, NULL, 0, context); + return NULL; + } + + /* Compute hash */ + if (compute_hash) { + silc_hash_make(hash, src, src_len, hashr); + src = hashr; + src_len = silc_hash_len(hash); + } + + /* Encode digest info */ + memset(&di, 0, sizeof(di)); + if (!silc_asn1_encode(asn1, &di, + SILC_ASN1_SEQUENCE, + SILC_ASN1_SEQUENCE, + SILC_ASN1_OID(oid), + SILC_ASN1_NULL(TRUE), + SILC_ASN1_END, + SILC_ASN1_OCTET_STRING(src, src_len), + SILC_ASN1_END, SILC_ASN1_END)) { + silc_asn1_free(asn1); + silc_stack_free(stack); + sign_cb(FALSE, NULL, 0, context); + return NULL; + } + SILC_LOG_HEXDUMP(("DigestInfo"), silc_buffer_data(&di), + silc_buffer_len(&di)); + + /* Pad data */ + if (!silc_pkcs1_encode(SILC_PKCS1_BT_PRV1, silc_buffer_data(&di), + silc_buffer_len(&di), padded, len, NULL)) { + silc_asn1_free(asn1); + silc_stack_free(stack); + sign_cb(FALSE, NULL, 0, context); + return NULL; + } + + silc_mp_sinit(stack, &mp_tmp); + silc_mp_sinit(stack, &mp_dst); + + /* Data to MP */ + silc_mp_bin2mp(padded, len, &mp_tmp); + + /* Sign */ + silc_rsa_private_operation(key, &mp_tmp, &mp_dst); + + /* MP to data */ + silc_mp_mp2bin_noalloc(&mp_dst, padded, len); + + /* Deliver result */ + sign_cb(TRUE, padded, len, context); + + memset(padded, 0, sizeof(padded)); + if (compute_hash) + memset(hashr, 0, sizeof(hashr)); + silc_mp_suninit(stack, &mp_tmp); + silc_mp_suninit(stack, &mp_dst); + silc_asn1_free(asn1); + silc_stack_free(stack); + + return NULL; +} + +/* PKCS #1 verification with appendix. */ + +SILC_PKCS_ALG_VERIFY(silc_pkcs1_verify) +{ + RsaPublicKey *key = public_key; + SilcBool ret = FALSE; + SilcMPInt mp_tmp2; + SilcMPInt mp_dst; + unsigned char *verify, unpadded[2048 + 1], hashr[SILC_HASH_MAXLEN]; + SilcUInt32 verify_len, len = (key->bits + 7) / 8; + SilcBufferStruct di, ldi; + SilcBool has_null = TRUE; + SilcHash ihash = NULL; + SilcStack stack; + SilcAsn1 asn1; + char *oid; + + SILC_LOG_DEBUG(("Verify signature")); + + stack = silc_stack_alloc(2048, silc_crypto_stack()); + + asn1 = silc_asn1_alloc(stack); + if (!asn1) { + verify_cb(FALSE, context); + return NULL; + } + + silc_mp_sinit(stack, &mp_tmp2); + silc_mp_sinit(stack, &mp_dst); + + /* Format the signature into MP int */ + silc_mp_bin2mp(signature, signature_len, &mp_tmp2); + + /* Verify */ + silc_rsa_public_operation(key, &mp_tmp2, &mp_dst); + + /* MP to data */ + verify = silc_mp_mp2bin(&mp_dst, len, &verify_len); + + /* Unpad data */ + if (!silc_pkcs1_decode(SILC_PKCS1_BT_PRV1, verify, verify_len, + unpadded, sizeof(unpadded), &len)) + goto err; + silc_buffer_set(&di, unpadded, len); + + /* If hash isn't given, allocate the one given in digest info */ + if (!hash) { + has_null = FALSE; + + /* Decode digest info */ + if (!silc_asn1_decode(asn1, &di, + SILC_ASN1_OPTS(SILC_ASN1_ACCUMUL), + SILC_ASN1_SEQUENCE, + SILC_ASN1_SEQUENCE, + SILC_ASN1_OID(&oid), + SILC_ASN1_NULL_T(SILC_ASN1_OPTIONAL, + SILC_ASN1_TAG_NULL, &has_null), + SILC_ASN1_END, + SILC_ASN1_END, SILC_ASN1_END)) + goto err; + + if (!silc_hash_alloc_by_oid(oid, &ihash)) { + SILC_LOG_DEBUG(("Unknown OID %s", oid)); + goto err; + } + hash = ihash; + } + + /* Hash the data */ + silc_hash_make(hash, data, data_len, hashr); + data = hashr; + data_len = silc_hash_len(hash); + oid = (char *)silc_hash_get_oid(hash); + + /* Encode digest info for comparison */ + memset(&ldi, 0, sizeof(ldi)); + if (!silc_asn1_encode(asn1, &ldi, + SILC_ASN1_OPTS(SILC_ASN1_ACCUMUL), + SILC_ASN1_SEQUENCE, + SILC_ASN1_SEQUENCE, + SILC_ASN1_OID(oid), + SILC_ASN1_NULL(has_null), + SILC_ASN1_END, + SILC_ASN1_OCTET_STRING(data, data_len), + SILC_ASN1_END, SILC_ASN1_END)) + goto err; + + SILC_LOG_HEXDUMP(("DigestInfo remote"), silc_buffer_data(&di), + silc_buffer_len(&di)); + SILC_LOG_HEXDUMP(("DigestInfo local"), silc_buffer_data(&ldi), + silc_buffer_len(&ldi)); + + /* Compare */ + if (silc_buffer_len(&di) == silc_buffer_len(&ldi) && + !memcmp(silc_buffer_data(&di), silc_buffer_data(&ldi), + silc_buffer_len(&ldi))) + ret = TRUE; + + /* Deliver result */ + verify_cb(ret, context); + + memset(verify, 0, verify_len); + memset(unpadded, 0, sizeof(unpadded)); + silc_free(verify); + silc_mp_suninit(stack, &mp_tmp2); + silc_mp_suninit(stack, &mp_dst); + if (hash) + memset(hashr, 0, sizeof(hashr)); + if (ihash) + silc_hash_free(ihash); + silc_asn1_free(asn1); + silc_stack_free(stack); + + return NULL; + + err: + memset(verify, 0, verify_len); + silc_free(verify); + silc_mp_suninit(stack, &mp_tmp2); + silc_mp_suninit(stack, &mp_dst); + if (ihash) + silc_hash_free(ihash); + silc_asn1_free(asn1); + silc_stack_free(stack); + + verify_cb(FALSE, context); + return NULL; +} + +/* PKCS #1 sign without hash oid */ + +SILC_PKCS_ALG_SIGN(silc_pkcs1_sign_no_oid) +{ + RsaPrivateKey *key = private_key; + SilcMPInt mp_tmp; + SilcMPInt mp_dst; + unsigned char padded[2048 + 1], hashr[SILC_HASH_MAXLEN]; + SilcUInt32 len = (key->bits + 7) / 8; + SilcStack stack; + + SILC_LOG_DEBUG(("Sign")); + + if (sizeof(padded) < len) { + sign_cb(FALSE, NULL, 0, context); + return NULL; + } + + /* Compute hash if requested */ + if (compute_hash) { + silc_hash_make(hash, src, src_len, hashr); + src = hashr; + src_len = silc_hash_len(hash); + } + + /* Pad data */ + if (!silc_pkcs1_encode(SILC_PKCS1_BT_PRV1, src, src_len, + padded, len, NULL)) { + sign_cb(FALSE, NULL, 0, context); + return NULL; + } + + stack = silc_stack_alloc(2048, silc_crypto_stack()); + + silc_mp_sinit(stack, &mp_tmp); + silc_mp_sinit(stack, &mp_dst); + + /* Data to MP */ + silc_mp_bin2mp(padded, len, &mp_tmp); + + /* Sign */ + silc_rsa_private_operation(key, &mp_tmp, &mp_dst); + + /* MP to data */ + silc_mp_mp2bin_noalloc(&mp_dst, padded, len); + + /* Deliver result */ + sign_cb(TRUE, padded, len, context); + + memset(padded, 0, sizeof(padded)); + if (compute_hash) + memset(hashr, 0, sizeof(hashr)); + silc_mp_suninit(stack, &mp_tmp); + silc_mp_suninit(stack, &mp_dst); + silc_stack_free(stack); + + return NULL; +} + +/* PKCS #1 verify without hash oid */ + +SILC_PKCS_ALG_VERIFY(silc_pkcs1_verify_no_oid) +{ + RsaPublicKey *key = public_key; + SilcBool ret = FALSE; + SilcMPInt mp_tmp2; + SilcMPInt mp_dst; + unsigned char *verify, unpadded[2048 + 1], hashr[SILC_HASH_MAXLEN]; + SilcUInt32 verify_len, len = (key->bits + 7) / 8; + SilcStack stack; + + SILC_LOG_DEBUG(("Verify signature")); + + stack = silc_stack_alloc(2048, silc_crypto_stack()); + + silc_mp_sinit(stack, &mp_tmp2); + silc_mp_sinit(stack, &mp_dst); + + /* Format the signature into MP int */ + silc_mp_bin2mp(signature, signature_len, &mp_tmp2); + + /* Verify */ + silc_rsa_public_operation(key, &mp_tmp2, &mp_dst); + + /* MP to data */ + verify = silc_mp_mp2bin(&mp_dst, len, &verify_len); + + /* Unpad data */ + if (!silc_pkcs1_decode(SILC_PKCS1_BT_PRV1, verify, verify_len, + unpadded, sizeof(unpadded), &len)) { + memset(verify, 0, verify_len); + silc_free(verify); + silc_mp_suninit(stack, &mp_tmp2); + silc_mp_suninit(stack, &mp_dst); + silc_stack_free(stack); + verify_cb(FALSE, context); + return NULL; + } + + /* Hash data if requested */ + if (hash) { + silc_hash_make(hash, data, data_len, hashr); + data = hashr; + data_len = silc_hash_len(hash); + } + + /* Compare */ + if (len == data_len && !memcmp(data, unpadded, len)) + ret = TRUE; + + /* Deliver result */ + verify_cb(ret, context); + + memset(verify, 0, verify_len); + memset(unpadded, 0, sizeof(unpadded)); + if (hash) + memset(hashr, 0, sizeof(hashr)); + silc_free(verify); + silc_mp_suninit(stack, &mp_tmp2); + silc_mp_suninit(stack, &mp_dst); + silc_stack_free(stack); + + return NULL; +}