| Paul Bakker | 43b7e35 | 2011-01-18 15:27:19 +0000 | [diff] [blame] | 1 | /** | 
|  | 2 | * \file pkcs11.h | 
|  | 3 | * | 
|  | 4 | * \brief Wrapper for PKCS#11 library libpkcs11-helper | 
|  | 5 | * | 
|  | 6 | * \author Adriaan de Jong <dejong@fox-it.com> | 
| Darryl Green | a40a101 | 2018-01-05 15:33:17 +0000 | [diff] [blame] | 7 | */ | 
|  | 8 | /* | 
| Manuel Pégourié-Gonnard | 6fb8187 | 2015-07-27 11:11:48 +0200 | [diff] [blame] | 9 | *  Copyright (C) 2006-2015, ARM Limited, All Rights Reserved | 
| Manuel Pégourié-Gonnard | 37ff140 | 2015-09-04 14:21:07 +0200 | [diff] [blame] | 10 | *  SPDX-License-Identifier: Apache-2.0 | 
|  | 11 | * | 
|  | 12 | *  Licensed under the Apache License, Version 2.0 (the "License"); you may | 
|  | 13 | *  not use this file except in compliance with the License. | 
|  | 14 | *  You may obtain a copy of the License at | 
|  | 15 | * | 
|  | 16 | *  http://www.apache.org/licenses/LICENSE-2.0 | 
|  | 17 | * | 
|  | 18 | *  Unless required by applicable law or agreed to in writing, software | 
|  | 19 | *  distributed under the License is distributed on an "AS IS" BASIS, WITHOUT | 
|  | 20 | *  WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. | 
|  | 21 | *  See the License for the specific language governing permissions and | 
|  | 22 | *  limitations under the License. | 
| Paul Bakker | 43b7e35 | 2011-01-18 15:27:19 +0000 | [diff] [blame] | 23 | * | 
| Manuel Pégourié-Gonnard | fe44643 | 2015-03-06 13:17:10 +0000 | [diff] [blame] | 24 | *  This file is part of mbed TLS (https://tls.mbed.org) | 
| Paul Bakker | 43b7e35 | 2011-01-18 15:27:19 +0000 | [diff] [blame] | 25 | */ | 
| Manuel Pégourié-Gonnard | 2cf5a7c | 2015-04-08 12:49:31 +0200 | [diff] [blame] | 26 | #ifndef MBEDTLS_PKCS11_H | 
|  | 27 | #define MBEDTLS_PKCS11_H | 
| Paul Bakker | 43b7e35 | 2011-01-18 15:27:19 +0000 | [diff] [blame] | 28 |  | 
| Manuel Pégourié-Gonnard | 2cf5a7c | 2015-04-08 12:49:31 +0200 | [diff] [blame] | 29 | #if !defined(MBEDTLS_CONFIG_FILE) | 
| Paul Bakker | 314052f | 2011-08-15 09:07:52 +0000 | [diff] [blame] | 30 | #include "config.h" | 
| Manuel Pégourié-Gonnard | cef4ad2 | 2014-04-29 12:39:06 +0200 | [diff] [blame] | 31 | #else | 
| Manuel Pégourié-Gonnard | 2cf5a7c | 2015-04-08 12:49:31 +0200 | [diff] [blame] | 32 | #include MBEDTLS_CONFIG_FILE | 
| Manuel Pégourié-Gonnard | cef4ad2 | 2014-04-29 12:39:06 +0200 | [diff] [blame] | 33 | #endif | 
| Paul Bakker | 43b7e35 | 2011-01-18 15:27:19 +0000 | [diff] [blame] | 34 |  | 
| Manuel Pégourié-Gonnard | 2cf5a7c | 2015-04-08 12:49:31 +0200 | [diff] [blame] | 35 | #if defined(MBEDTLS_PKCS11_C) | 
| Paul Bakker | 43b7e35 | 2011-01-18 15:27:19 +0000 | [diff] [blame] | 36 |  | 
| Paul Bakker | c559c7a | 2013-09-18 14:13:26 +0200 | [diff] [blame] | 37 | #include "x509_crt.h" | 
| Paul Bakker | 43b7e35 | 2011-01-18 15:27:19 +0000 | [diff] [blame] | 38 |  | 
|  | 39 | #include <pkcs11-helper-1.0/pkcs11h-certificate.h> | 
|  | 40 |  | 
| Manuel Pégourié-Gonnard | 0223ab9 | 2015-10-05 11:40:01 +0100 | [diff] [blame] | 41 | #if ( defined(__ARMCC_VERSION) || defined(_MSC_VER) ) && \ | 
|  | 42 | !defined(inline) && !defined(__cplusplus) | 
| Paul Bakker | eb2c658 | 2012-09-27 19:15:01 +0000 | [diff] [blame] | 43 | #define inline __inline | 
| Manuel Pégourié-Gonnard | 20af64d | 2015-07-07 18:33:39 +0200 | [diff] [blame] | 44 | #endif | 
| Paul Bakker | eb2c658 | 2012-09-27 19:15:01 +0000 | [diff] [blame] | 45 |  | 
| Paul Bakker | 407a0da | 2013-06-27 14:29:21 +0200 | [diff] [blame] | 46 | #ifdef __cplusplus | 
|  | 47 | extern "C" { | 
|  | 48 | #endif | 
|  | 49 |  | 
| Paul Bakker | 43b7e35 | 2011-01-18 15:27:19 +0000 | [diff] [blame] | 50 | /** | 
|  | 51 | * Context for PKCS #11 private keys. | 
|  | 52 | */ | 
|  | 53 | typedef struct { | 
|  | 54 | pkcs11h_certificate_t pkcs11h_cert; | 
|  | 55 | int len; | 
| Manuel Pégourié-Gonnard | 2cf5a7c | 2015-04-08 12:49:31 +0200 | [diff] [blame] | 56 | } mbedtls_pkcs11_context; | 
| Paul Bakker | 43b7e35 | 2011-01-18 15:27:19 +0000 | [diff] [blame] | 57 |  | 
|  | 58 | /** | 
| Tillmann Karras | 588ad50 | 2015-09-25 04:27:22 +0200 | [diff] [blame] | 59 | * Initialize a mbedtls_pkcs11_context. | 
| Manuel Pégourié-Gonnard | eab147c | 2015-04-29 01:10:10 +0200 | [diff] [blame] | 60 | * (Just making memory references valid.) | 
|  | 61 | */ | 
|  | 62 | void mbedtls_pkcs11_init( mbedtls_pkcs11_context *ctx ); | 
|  | 63 |  | 
|  | 64 | /** | 
| Manuel Pégourié-Gonnard | b4fe3cb | 2015-01-22 16:11:05 +0000 | [diff] [blame] | 65 | * Fill in a mbed TLS certificate, based on the given PKCS11 helper certificate. | 
| Paul Bakker | 43b7e35 | 2011-01-18 15:27:19 +0000 | [diff] [blame] | 66 | * | 
|  | 67 | * \param cert          X.509 certificate to fill | 
|  | 68 | * \param pkcs11h_cert  PKCS #11 helper certificate | 
|  | 69 | * | 
|  | 70 | * \return              0 on success. | 
|  | 71 | */ | 
| Manuel Pégourié-Gonnard | eab147c | 2015-04-29 01:10:10 +0200 | [diff] [blame] | 72 | int mbedtls_pkcs11_x509_cert_bind( mbedtls_x509_crt *cert, pkcs11h_certificate_t pkcs11h_cert ); | 
| Paul Bakker | 43b7e35 | 2011-01-18 15:27:19 +0000 | [diff] [blame] | 73 |  | 
|  | 74 | /** | 
| Manuel Pégourié-Gonnard | eab147c | 2015-04-29 01:10:10 +0200 | [diff] [blame] | 75 | * Set up a mbedtls_pkcs11_context storing the given certificate. Note that the | 
| Manuel Pégourié-Gonnard | 2cf5a7c | 2015-04-08 12:49:31 +0200 | [diff] [blame] | 76 | * mbedtls_pkcs11_context will take over control of the certificate, freeing it when | 
| Paul Bakker | 43b7e35 | 2011-01-18 15:27:19 +0000 | [diff] [blame] | 77 | * done. | 
|  | 78 | * | 
|  | 79 | * \param priv_key      Private key structure to fill. | 
|  | 80 | * \param pkcs11_cert   PKCS #11 helper certificate | 
|  | 81 | * | 
|  | 82 | * \return              0 on success | 
|  | 83 | */ | 
| Manuel Pégourié-Gonnard | eab147c | 2015-04-29 01:10:10 +0200 | [diff] [blame] | 84 | int mbedtls_pkcs11_priv_key_bind( mbedtls_pkcs11_context *priv_key, | 
| Paul Bakker | 43b7e35 | 2011-01-18 15:27:19 +0000 | [diff] [blame] | 85 | pkcs11h_certificate_t pkcs11_cert ); | 
|  | 86 |  | 
|  | 87 | /** | 
|  | 88 | * Free the contents of the given private key context. Note that the structure | 
|  | 89 | * itself is not freed. | 
|  | 90 | * | 
|  | 91 | * \param priv_key      Private key structure to cleanup | 
|  | 92 | */ | 
| Manuel Pégourié-Gonnard | 2cf5a7c | 2015-04-08 12:49:31 +0200 | [diff] [blame] | 93 | void mbedtls_pkcs11_priv_key_free( mbedtls_pkcs11_context *priv_key ); | 
| Paul Bakker | 43b7e35 | 2011-01-18 15:27:19 +0000 | [diff] [blame] | 94 |  | 
|  | 95 | /** | 
| Paul Bakker | b9e4e2c | 2014-05-01 14:18:25 +0200 | [diff] [blame] | 96 | * \brief          Do an RSA private key decrypt, then remove the message | 
|  | 97 | *                 padding | 
| Paul Bakker | 43b7e35 | 2011-01-18 15:27:19 +0000 | [diff] [blame] | 98 | * | 
|  | 99 | * \param ctx      PKCS #11 context | 
| Manuel Pégourié-Gonnard | 2cf5a7c | 2015-04-08 12:49:31 +0200 | [diff] [blame] | 100 | * \param mode     must be MBEDTLS_RSA_PRIVATE, for compatibility with rsa.c's signature | 
| Paul Bakker | 43b7e35 | 2011-01-18 15:27:19 +0000 | [diff] [blame] | 101 | * \param input    buffer holding the encrypted data | 
|  | 102 | * \param output   buffer that will hold the plaintext | 
|  | 103 | * \param olen     will contain the plaintext length | 
|  | 104 | * \param output_max_len    maximum length of the output buffer | 
|  | 105 | * | 
| Manuel Pégourié-Gonnard | 2cf5a7c | 2015-04-08 12:49:31 +0200 | [diff] [blame] | 106 | * \return         0 if successful, or an MBEDTLS_ERR_RSA_XXX error code | 
| Paul Bakker | 43b7e35 | 2011-01-18 15:27:19 +0000 | [diff] [blame] | 107 | * | 
|  | 108 | * \note           The output buffer must be as large as the size | 
|  | 109 | *                 of ctx->N (eg. 128 bytes if RSA-1024 is used) otherwise | 
|  | 110 | *                 an error is thrown. | 
|  | 111 | */ | 
| Manuel Pégourié-Gonnard | 2cf5a7c | 2015-04-08 12:49:31 +0200 | [diff] [blame] | 112 | int mbedtls_pkcs11_decrypt( mbedtls_pkcs11_context *ctx, | 
| Paul Bakker | 23986e5 | 2011-04-24 08:57:21 +0000 | [diff] [blame] | 113 | int mode, size_t *olen, | 
| Paul Bakker | 43b7e35 | 2011-01-18 15:27:19 +0000 | [diff] [blame] | 114 | const unsigned char *input, | 
|  | 115 | unsigned char *output, | 
| Paul Bakker | 9a73632 | 2012-11-14 12:39:52 +0000 | [diff] [blame] | 116 | size_t output_max_len ); | 
| Paul Bakker | 43b7e35 | 2011-01-18 15:27:19 +0000 | [diff] [blame] | 117 |  | 
|  | 118 | /** | 
|  | 119 | * \brief          Do a private RSA to sign a message digest | 
|  | 120 | * | 
|  | 121 | * \param ctx      PKCS #11 context | 
| Manuel Pégourié-Gonnard | 2cf5a7c | 2015-04-08 12:49:31 +0200 | [diff] [blame] | 122 | * \param mode     must be MBEDTLS_RSA_PRIVATE, for compatibility with rsa.c's signature | 
|  | 123 | * \param md_alg   a MBEDTLS_MD_XXX (use MBEDTLS_MD_NONE for signing raw data) | 
|  | 124 | * \param hashlen  message digest length (for MBEDTLS_MD_NONE only) | 
| Paul Bakker | 43b7e35 | 2011-01-18 15:27:19 +0000 | [diff] [blame] | 125 | * \param hash     buffer holding the message digest | 
|  | 126 | * \param sig      buffer that will hold the ciphertext | 
|  | 127 | * | 
|  | 128 | * \return         0 if the signing operation was successful, | 
| Manuel Pégourié-Gonnard | 2cf5a7c | 2015-04-08 12:49:31 +0200 | [diff] [blame] | 129 | *                 or an MBEDTLS_ERR_RSA_XXX error code | 
| Paul Bakker | 43b7e35 | 2011-01-18 15:27:19 +0000 | [diff] [blame] | 130 | * | 
|  | 131 | * \note           The "sig" buffer must be as large as the size | 
|  | 132 | *                 of ctx->N (eg. 128 bytes if RSA-1024 is used). | 
|  | 133 | */ | 
| Manuel Pégourié-Gonnard | 2cf5a7c | 2015-04-08 12:49:31 +0200 | [diff] [blame] | 134 | int mbedtls_pkcs11_sign( mbedtls_pkcs11_context *ctx, | 
| Paul Bakker | 43b7e35 | 2011-01-18 15:27:19 +0000 | [diff] [blame] | 135 | int mode, | 
| Manuel Pégourié-Gonnard | 2cf5a7c | 2015-04-08 12:49:31 +0200 | [diff] [blame] | 136 | mbedtls_md_type_t md_alg, | 
| Paul Bakker | 23986e5 | 2011-04-24 08:57:21 +0000 | [diff] [blame] | 137 | unsigned int hashlen, | 
| Paul Bakker | 43b7e35 | 2011-01-18 15:27:19 +0000 | [diff] [blame] | 138 | const unsigned char *hash, | 
|  | 139 | unsigned char *sig ); | 
|  | 140 |  | 
| Paul Bakker | eb2c658 | 2012-09-27 19:15:01 +0000 | [diff] [blame] | 141 | /** | 
|  | 142 | * SSL/TLS wrappers for PKCS#11 functions | 
|  | 143 | */ | 
| Manuel Pégourié-Gonnard | 2cf5a7c | 2015-04-08 12:49:31 +0200 | [diff] [blame] | 144 | static inline int mbedtls_ssl_pkcs11_decrypt( void *ctx, int mode, size_t *olen, | 
| Paul Bakker | eb2c658 | 2012-09-27 19:15:01 +0000 | [diff] [blame] | 145 | const unsigned char *input, unsigned char *output, | 
| Paul Bakker | 9a73632 | 2012-11-14 12:39:52 +0000 | [diff] [blame] | 146 | size_t output_max_len ) | 
| Paul Bakker | eb2c658 | 2012-09-27 19:15:01 +0000 | [diff] [blame] | 147 | { | 
| Manuel Pégourié-Gonnard | 2cf5a7c | 2015-04-08 12:49:31 +0200 | [diff] [blame] | 148 | return mbedtls_pkcs11_decrypt( (mbedtls_pkcs11_context *) ctx, mode, olen, input, output, | 
| Paul Bakker | eb2c658 | 2012-09-27 19:15:01 +0000 | [diff] [blame] | 149 | output_max_len ); | 
|  | 150 | } | 
|  | 151 |  | 
| Manuel Pégourié-Gonnard | 2cf5a7c | 2015-04-08 12:49:31 +0200 | [diff] [blame] | 152 | static inline int mbedtls_ssl_pkcs11_sign( void *ctx, | 
| Paul Bakker | eb2c658 | 2012-09-27 19:15:01 +0000 | [diff] [blame] | 153 | int (*f_rng)(void *, unsigned char *, size_t), void *p_rng, | 
| Manuel Pégourié-Gonnard | 2cf5a7c | 2015-04-08 12:49:31 +0200 | [diff] [blame] | 154 | int mode, mbedtls_md_type_t md_alg, unsigned int hashlen, | 
| Paul Bakker | eb2c658 | 2012-09-27 19:15:01 +0000 | [diff] [blame] | 155 | const unsigned char *hash, unsigned char *sig ) | 
|  | 156 | { | 
|  | 157 | ((void) f_rng); | 
|  | 158 | ((void) p_rng); | 
| Manuel Pégourié-Gonnard | 2cf5a7c | 2015-04-08 12:49:31 +0200 | [diff] [blame] | 159 | return mbedtls_pkcs11_sign( (mbedtls_pkcs11_context *) ctx, mode, md_alg, | 
| Paul Bakker | eb2c658 | 2012-09-27 19:15:01 +0000 | [diff] [blame] | 160 | hashlen, hash, sig ); | 
|  | 161 | } | 
|  | 162 |  | 
| Manuel Pégourié-Gonnard | 2cf5a7c | 2015-04-08 12:49:31 +0200 | [diff] [blame] | 163 | static inline size_t mbedtls_ssl_pkcs11_key_len( void *ctx ) | 
| Paul Bakker | eb2c658 | 2012-09-27 19:15:01 +0000 | [diff] [blame] | 164 | { | 
| Manuel Pégourié-Gonnard | 2cf5a7c | 2015-04-08 12:49:31 +0200 | [diff] [blame] | 165 | return ( (mbedtls_pkcs11_context *) ctx )->len; | 
| Paul Bakker | eb2c658 | 2012-09-27 19:15:01 +0000 | [diff] [blame] | 166 | } | 
|  | 167 |  | 
| Paul Bakker | 407a0da | 2013-06-27 14:29:21 +0200 | [diff] [blame] | 168 | #ifdef __cplusplus | 
|  | 169 | } | 
|  | 170 | #endif | 
|  | 171 |  | 
| Manuel Pégourié-Gonnard | 2cf5a7c | 2015-04-08 12:49:31 +0200 | [diff] [blame] | 172 | #endif /* MBEDTLS_PKCS11_C */ | 
| Paul Bakker | 43b7e35 | 2011-01-18 15:27:19 +0000 | [diff] [blame] | 173 |  | 
| Manuel Pégourié-Gonnard | 2cf5a7c | 2015-04-08 12:49:31 +0200 | [diff] [blame] | 174 | #endif /* MBEDTLS_PKCS11_H */ |