Kev Mann / mbed-dev-OS5_10_4

features/mbedtls/src/pkcs11.c@2:7aab896b1a3b, 2019-03-13 (annotated)

Committer:
kevman
Date:
Wed Mar 13 11:03:24 2019 +0000
Revision:
2:7aab896b1a3b
Parent:
0:38ceb79fef03 
2019-03-13

Who changed what in which revision?

UserRevisionLine numberNew contents of line
kevman 0:38ceb79fef03 1 /**
kevman 0:38ceb79fef03 2 * \file pkcs11.c
kevman 0:38ceb79fef03 3 *
kevman 0:38ceb79fef03 4 * \brief Wrapper for PKCS#11 library libpkcs11-helper
kevman 0:38ceb79fef03 5 *
kevman 0:38ceb79fef03 6 * \author Adriaan de Jong <dejong@fox-it.com>
kevman 0:38ceb79fef03 7 *
kevman 0:38ceb79fef03 8 * Copyright (C) 2006-2015, ARM Limited, All Rights Reserved
kevman 0:38ceb79fef03 9 * SPDX-License-Identifier: Apache-2.0
kevman 0:38ceb79fef03 10 *
kevman 0:38ceb79fef03 11 * Licensed under the Apache License, Version 2.0 (the "License"); you may
kevman 0:38ceb79fef03 12 * not use this file except in compliance with the License.
kevman 0:38ceb79fef03 13 * You may obtain a copy of the License at
kevman 0:38ceb79fef03 14 *
kevman 0:38ceb79fef03 15 * http://www.apache.org/licenses/LICENSE-2.0
kevman 0:38ceb79fef03 16 *
kevman 0:38ceb79fef03 17 * Unless required by applicable law or agreed to in writing, software
kevman 0:38ceb79fef03 18 * distributed under the License is distributed on an "AS IS" BASIS, WITHOUT
kevman 0:38ceb79fef03 19 * WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
kevman 0:38ceb79fef03 20 * See the License for the specific language governing permissions and
kevman 0:38ceb79fef03 21 * limitations under the License.
kevman 0:38ceb79fef03 22 *
kevman 0:38ceb79fef03 23 * This file is part of mbed TLS (https://tls.mbed.org)
kevman 0:38ceb79fef03 24 */
kevman 0:38ceb79fef03 25
kevman 0:38ceb79fef03 26 #include "mbedtls/pkcs11.h"
kevman 0:38ceb79fef03 27
kevman 0:38ceb79fef03 28 #if defined(MBEDTLS_PKCS11_C)
kevman 0:38ceb79fef03 29
kevman 0:38ceb79fef03 30 #include "mbedtls/md.h"
kevman 0:38ceb79fef03 31 #include "mbedtls/oid.h"
kevman 0:38ceb79fef03 32 #include "mbedtls/x509_crt.h"
kevman 0:38ceb79fef03 33
kevman 0:38ceb79fef03 34 #if defined(MBEDTLS_PLATFORM_C)
kevman 0:38ceb79fef03 35 #include "mbedtls/platform.h"
kevman 0:38ceb79fef03 36 #else
kevman 0:38ceb79fef03 37 #include <stdlib.h>
kevman 0:38ceb79fef03 38 #define mbedtls_calloc calloc
kevman 0:38ceb79fef03 39 #define mbedtls_free free
kevman 0:38ceb79fef03 40 #endif
kevman 0:38ceb79fef03 41
kevman 0:38ceb79fef03 42 #include <string.h>
kevman 0:38ceb79fef03 43
kevman 0:38ceb79fef03 44 void mbedtls_pkcs11_init( mbedtls_pkcs11_context *ctx )
kevman 0:38ceb79fef03 45 {
kevman 0:38ceb79fef03 46 memset( ctx, 0, sizeof( mbedtls_pkcs11_context ) );
kevman 0:38ceb79fef03 47 }
kevman 0:38ceb79fef03 48
kevman 0:38ceb79fef03 49 int mbedtls_pkcs11_x509_cert_bind( mbedtls_x509_crt *cert, pkcs11h_certificate_t pkcs11_cert )
kevman 0:38ceb79fef03 50 {
kevman 0:38ceb79fef03 51 int ret = 1;
kevman 0:38ceb79fef03 52 unsigned char *cert_blob = NULL;
kevman 0:38ceb79fef03 53 size_t cert_blob_size = 0;
kevman 0:38ceb79fef03 54
kevman 0:38ceb79fef03 55 if( cert == NULL )
kevman 0:38ceb79fef03 56 {
kevman 0:38ceb79fef03 57 ret = 2;
kevman 0:38ceb79fef03 58 goto cleanup;
kevman 0:38ceb79fef03 59 }
kevman 0:38ceb79fef03 60
kevman 0:38ceb79fef03 61 if( pkcs11h_certificate_getCertificateBlob( pkcs11_cert, NULL,
kevman 0:38ceb79fef03 62 &cert_blob_size ) != CKR_OK )
kevman 0:38ceb79fef03 63 {
kevman 0:38ceb79fef03 64 ret = 3;
kevman 0:38ceb79fef03 65 goto cleanup;
kevman 0:38ceb79fef03 66 }
kevman 0:38ceb79fef03 67
kevman 0:38ceb79fef03 68 cert_blob = mbedtls_calloc( 1, cert_blob_size );
kevman 0:38ceb79fef03 69 if( NULL == cert_blob )
kevman 0:38ceb79fef03 70 {
kevman 0:38ceb79fef03 71 ret = 4;
kevman 0:38ceb79fef03 72 goto cleanup;
kevman 0:38ceb79fef03 73 }
kevman 0:38ceb79fef03 74
kevman 0:38ceb79fef03 75 if( pkcs11h_certificate_getCertificateBlob( pkcs11_cert, cert_blob,
kevman 0:38ceb79fef03 76 &cert_blob_size ) != CKR_OK )
kevman 0:38ceb79fef03 77 {
kevman 0:38ceb79fef03 78 ret = 5;
kevman 0:38ceb79fef03 79 goto cleanup;
kevman 0:38ceb79fef03 80 }
kevman 0:38ceb79fef03 81
kevman 0:38ceb79fef03 82 if( 0 != mbedtls_x509_crt_parse( cert, cert_blob, cert_blob_size ) )
kevman 0:38ceb79fef03 83 {
kevman 0:38ceb79fef03 84 ret = 6;
kevman 0:38ceb79fef03 85 goto cleanup;
kevman 0:38ceb79fef03 86 }
kevman 0:38ceb79fef03 87
kevman 0:38ceb79fef03 88 ret = 0;
kevman 0:38ceb79fef03 89
kevman 0:38ceb79fef03 90 cleanup:
kevman 0:38ceb79fef03 91 if( NULL != cert_blob )
kevman 0:38ceb79fef03 92 mbedtls_free( cert_blob );
kevman 0:38ceb79fef03 93
kevman 0:38ceb79fef03 94 return( ret );
kevman 0:38ceb79fef03 95 }
kevman 0:38ceb79fef03 96
kevman 0:38ceb79fef03 97
kevman 0:38ceb79fef03 98 int mbedtls_pkcs11_priv_key_bind( mbedtls_pkcs11_context *priv_key,
kevman 0:38ceb79fef03 99 pkcs11h_certificate_t pkcs11_cert )
kevman 0:38ceb79fef03 100 {
kevman 0:38ceb79fef03 101 int ret = 1;
kevman 0:38ceb79fef03 102 mbedtls_x509_crt cert;
kevman 0:38ceb79fef03 103
kevman 0:38ceb79fef03 104 mbedtls_x509_crt_init( &cert );
kevman 0:38ceb79fef03 105
kevman 0:38ceb79fef03 106 if( priv_key == NULL )
kevman 0:38ceb79fef03 107 goto cleanup;
kevman 0:38ceb79fef03 108
kevman 0:38ceb79fef03 109 if( 0 != mbedtls_pkcs11_x509_cert_bind( &cert, pkcs11_cert ) )
kevman 0:38ceb79fef03 110 goto cleanup;
kevman 0:38ceb79fef03 111
kevman 0:38ceb79fef03 112 priv_key->len = mbedtls_pk_get_len( &cert.pk );
kevman 0:38ceb79fef03 113 priv_key->pkcs11h_cert = pkcs11_cert;
kevman 0:38ceb79fef03 114
kevman 0:38ceb79fef03 115 ret = 0;
kevman 0:38ceb79fef03 116
kevman 0:38ceb79fef03 117 cleanup:
kevman 0:38ceb79fef03 118 mbedtls_x509_crt_free( &cert );
kevman 0:38ceb79fef03 119
kevman 0:38ceb79fef03 120 return( ret );
kevman 0:38ceb79fef03 121 }
kevman 0:38ceb79fef03 122
kevman 0:38ceb79fef03 123 void mbedtls_pkcs11_priv_key_free( mbedtls_pkcs11_context *priv_key )
kevman 0:38ceb79fef03 124 {
kevman 0:38ceb79fef03 125 if( NULL != priv_key )
kevman 0:38ceb79fef03 126 pkcs11h_certificate_freeCertificate( priv_key->pkcs11h_cert );
kevman 0:38ceb79fef03 127 }
kevman 0:38ceb79fef03 128
kevman 0:38ceb79fef03 129 int mbedtls_pkcs11_decrypt( mbedtls_pkcs11_context *ctx,
kevman 0:38ceb79fef03 130 int mode, size_t *olen,
kevman 0:38ceb79fef03 131 const unsigned char *input,
kevman 0:38ceb79fef03 132 unsigned char *output,
kevman 0:38ceb79fef03 133 size_t output_max_len )
kevman 0:38ceb79fef03 134 {
kevman 0:38ceb79fef03 135 size_t input_len, output_len;
kevman 0:38ceb79fef03 136
kevman 0:38ceb79fef03 137 if( NULL == ctx )
kevman 0:38ceb79fef03 138 return( MBEDTLS_ERR_RSA_BAD_INPUT_DATA );
kevman 0:38ceb79fef03 139
kevman 0:38ceb79fef03 140 if( MBEDTLS_RSA_PRIVATE != mode )
kevman 0:38ceb79fef03 141 return( MBEDTLS_ERR_RSA_BAD_INPUT_DATA );
kevman 0:38ceb79fef03 142
kevman 0:38ceb79fef03 143 output_len = input_len = ctx->len;
kevman 0:38ceb79fef03 144
kevman 0:38ceb79fef03 145 if( input_len < 16 || input_len > output_max_len )
kevman 0:38ceb79fef03 146 return( MBEDTLS_ERR_RSA_BAD_INPUT_DATA );
kevman 0:38ceb79fef03 147
kevman 0:38ceb79fef03 148 /* Determine size of output buffer */
kevman 0:38ceb79fef03 149 if( pkcs11h_certificate_decryptAny( ctx->pkcs11h_cert, CKM_RSA_PKCS, input,
kevman 0:38ceb79fef03 150 input_len, NULL, &output_len ) != CKR_OK )
kevman 0:38ceb79fef03 151 {
kevman 0:38ceb79fef03 152 return( MBEDTLS_ERR_RSA_BAD_INPUT_DATA );
kevman 0:38ceb79fef03 153 }
kevman 0:38ceb79fef03 154
kevman 0:38ceb79fef03 155 if( output_len > output_max_len )
kevman 0:38ceb79fef03 156 return( MBEDTLS_ERR_RSA_OUTPUT_TOO_LARGE );
kevman 0:38ceb79fef03 157
kevman 0:38ceb79fef03 158 if( pkcs11h_certificate_decryptAny( ctx->pkcs11h_cert, CKM_RSA_PKCS, input,
kevman 0:38ceb79fef03 159 input_len, output, &output_len ) != CKR_OK )
kevman 0:38ceb79fef03 160 {
kevman 0:38ceb79fef03 161 return( MBEDTLS_ERR_RSA_BAD_INPUT_DATA );
kevman 0:38ceb79fef03 162 }
kevman 0:38ceb79fef03 163 *olen = output_len;
kevman 0:38ceb79fef03 164 return( 0 );
kevman 0:38ceb79fef03 165 }
kevman 0:38ceb79fef03 166
kevman 0:38ceb79fef03 167 int mbedtls_pkcs11_sign( mbedtls_pkcs11_context *ctx,
kevman 0:38ceb79fef03 168 int mode,
kevman 0:38ceb79fef03 169 mbedtls_md_type_t md_alg,
kevman 0:38ceb79fef03 170 unsigned int hashlen,
kevman 0:38ceb79fef03 171 const unsigned char *hash,
kevman 0:38ceb79fef03 172 unsigned char *sig )
kevman 0:38ceb79fef03 173 {
kevman 0:38ceb79fef03 174 size_t sig_len = 0, asn_len = 0, oid_size = 0;
kevman 0:38ceb79fef03 175 unsigned char *p = sig;
kevman 0:38ceb79fef03 176 const char *oid;
kevman 0:38ceb79fef03 177
kevman 0:38ceb79fef03 178 if( NULL == ctx )
kevman 0:38ceb79fef03 179 return( MBEDTLS_ERR_RSA_BAD_INPUT_DATA );
kevman 0:38ceb79fef03 180
kevman 0:38ceb79fef03 181 if( MBEDTLS_RSA_PRIVATE != mode )
kevman 0:38ceb79fef03 182 return( MBEDTLS_ERR_RSA_BAD_INPUT_DATA );
kevman 0:38ceb79fef03 183
kevman 0:38ceb79fef03 184 if( md_alg != MBEDTLS_MD_NONE )
kevman 0:38ceb79fef03 185 {
kevman 0:38ceb79fef03 186 const mbedtls_md_info_t *md_info = mbedtls_md_info_from_type( md_alg );
kevman 0:38ceb79fef03 187 if( md_info == NULL )
kevman 0:38ceb79fef03 188 return( MBEDTLS_ERR_RSA_BAD_INPUT_DATA );
kevman 0:38ceb79fef03 189
kevman 0:38ceb79fef03 190 if( mbedtls_oid_get_oid_by_md( md_alg, &oid, &oid_size ) != 0 )
kevman 0:38ceb79fef03 191 return( MBEDTLS_ERR_RSA_BAD_INPUT_DATA );
kevman 0:38ceb79fef03 192
kevman 0:38ceb79fef03 193 hashlen = mbedtls_md_get_size( md_info );
kevman 0:38ceb79fef03 194 asn_len = 10 + oid_size;
kevman 0:38ceb79fef03 195 }
kevman 0:38ceb79fef03 196
kevman 0:38ceb79fef03 197 sig_len = ctx->len;
kevman 0:38ceb79fef03 198 if( hashlen > sig_len || asn_len > sig_len ||
kevman 0:38ceb79fef03 199 hashlen + asn_len > sig_len )
kevman 0:38ceb79fef03 200 {
kevman 0:38ceb79fef03 201 return( MBEDTLS_ERR_RSA_BAD_INPUT_DATA );
kevman 0:38ceb79fef03 202 }
kevman 0:38ceb79fef03 203
kevman 0:38ceb79fef03 204 if( md_alg != MBEDTLS_MD_NONE )
kevman 0:38ceb79fef03 205 {
kevman 0:38ceb79fef03 206 /*
kevman 0:38ceb79fef03 207 * DigestInfo ::= SEQUENCE {
kevman 0:38ceb79fef03 208 * digestAlgorithm DigestAlgorithmIdentifier,
kevman 0:38ceb79fef03 209 * digest Digest }
kevman 0:38ceb79fef03 210 *
kevman 0:38ceb79fef03 211 * DigestAlgorithmIdentifier ::= AlgorithmIdentifier
kevman 0:38ceb79fef03 212 *
kevman 0:38ceb79fef03 213 * Digest ::= OCTET STRING
kevman 0:38ceb79fef03 214 */
kevman 0:38ceb79fef03 215 *p++ = MBEDTLS_ASN1_SEQUENCE | MBEDTLS_ASN1_CONSTRUCTED;
kevman 0:38ceb79fef03 216 *p++ = (unsigned char) ( 0x08 + oid_size + hashlen );
kevman 0:38ceb79fef03 217 *p++ = MBEDTLS_ASN1_SEQUENCE | MBEDTLS_ASN1_CONSTRUCTED;
kevman 0:38ceb79fef03 218 *p++ = (unsigned char) ( 0x04 + oid_size );
kevman 0:38ceb79fef03 219 *p++ = MBEDTLS_ASN1_OID;
kevman 0:38ceb79fef03 220 *p++ = oid_size & 0xFF;
kevman 0:38ceb79fef03 221 memcpy( p, oid, oid_size );
kevman 0:38ceb79fef03 222 p += oid_size;
kevman 0:38ceb79fef03 223 *p++ = MBEDTLS_ASN1_NULL;
kevman 0:38ceb79fef03 224 *p++ = 0x00;
kevman 0:38ceb79fef03 225 *p++ = MBEDTLS_ASN1_OCTET_STRING;
kevman 0:38ceb79fef03 226 *p++ = hashlen;
kevman 0:38ceb79fef03 227 }
kevman 0:38ceb79fef03 228
kevman 0:38ceb79fef03 229 memcpy( p, hash, hashlen );
kevman 0:38ceb79fef03 230
kevman 0:38ceb79fef03 231 if( pkcs11h_certificate_signAny( ctx->pkcs11h_cert, CKM_RSA_PKCS, sig,
kevman 0:38ceb79fef03 232 asn_len + hashlen, sig, &sig_len ) != CKR_OK )
kevman 0:38ceb79fef03 233 {
kevman 0:38ceb79fef03 234 return( MBEDTLS_ERR_RSA_BAD_INPUT_DATA );
kevman 0:38ceb79fef03 235 }
kevman 0:38ceb79fef03 236
kevman 0:38ceb79fef03 237 return( 0 );
kevman 0:38ceb79fef03 238 }
kevman 0:38ceb79fef03 239
kevman 0:38ceb79fef03 240 #endif /* defined(MBEDTLS_PKCS11_C) */