477 lines
16 KiB
C
477 lines
16 KiB
C
|
#include "ca.h"
|
||
|
|
||
|
#define DFL_ISSUER_CRT "/spiffs/CA.crt"
|
||
|
#define DFL_REQUEST_FILE "/spiffs/cert.req"
|
||
|
#define DFL_SUBJECT_KEY "subject.key"
|
||
|
#define DFL_ISSUER_KEY "/spiffs/keyfile.key"
|
||
|
#define DFL_SUBJECT_PWD ""
|
||
|
#define DFL_ISSUER_PWD ""
|
||
|
#define DFL_OUTPUT_FILENAME "/spiffs/cert.crt"
|
||
|
#define DFL_SUBJECT_NAME "CN=Cert,O=mbed TLS,C=UK"
|
||
|
#define DFL_ISSUER_NAME "CN=CA,O=mbed TLS,C=UK"
|
||
|
#define DFL_NOT_BEFORE "20010101000000"
|
||
|
#define DFL_NOT_AFTER "20301231235959"
|
||
|
#define DFL_SERIAL "1"
|
||
|
#define DFL_SELFSIGN 0
|
||
|
#define DFL_IS_CA 0
|
||
|
#define DFL_MAX_PATHLEN -1
|
||
|
#define DFL_KEY_USAGE 0
|
||
|
#define DFL_NS_CERT_TYPE 0
|
||
|
#define DFL_VERSION 3
|
||
|
#define DFL_AUTH_IDENT 1
|
||
|
#define DFL_SUBJ_IDENT 1
|
||
|
#define DFL_CONSTRAINTS 1
|
||
|
#define DFL_DIGEST MBEDTLS_MD_SHA256
|
||
|
|
||
|
struct options
|
||
|
{
|
||
|
const char *issuer_crt; /* filename of the issuer certificate */
|
||
|
const char *request_file; /* filename of the certificate request */
|
||
|
const char *subject_key; /* filename of the subject key file */
|
||
|
const char *issuer_key; /* filename of the issuer key file */
|
||
|
const char *subject_pwd; /* password for the subject key file */
|
||
|
const char *issuer_pwd; /* password for the issuer key file */
|
||
|
const char *output_file; /* where to store the constructed CRT */
|
||
|
const char *subject_name; /* subject name for certificate */
|
||
|
const char *issuer_name; /* issuer name for certificate */
|
||
|
const char *not_before; /* validity period not before */
|
||
|
const char *not_after; /* validity period not after */
|
||
|
const char *serial; /* serial number string */
|
||
|
int selfsign; /* selfsign the certificate */
|
||
|
int is_ca; /* is a CA certificate */
|
||
|
int max_pathlen; /* maximum CA path length */
|
||
|
int authority_identifier; /* add authority identifier to CRT */
|
||
|
int subject_identifier; /* add subject identifier to CRT */
|
||
|
int basic_constraints; /* add basic constraints ext to CRT */
|
||
|
int version; /* CRT version */
|
||
|
mbedtls_md_type_t md; /* Hash used for signing */
|
||
|
unsigned char key_usage; /* key usage flags */
|
||
|
unsigned char ns_cert_type; /* NS cert type */
|
||
|
} opt;
|
||
|
|
||
|
void certifikat(void * pvParameters){
|
||
|
|
||
|
int ret = 1;
|
||
|
int exit_code = MBEDTLS_EXIT_FAILURE;
|
||
|
mbedtls_x509_crt issuer_crt;
|
||
|
mbedtls_pk_context loaded_issuer_key, loaded_subject_key;
|
||
|
mbedtls_pk_context *issuer_key = &loaded_issuer_key,
|
||
|
*subject_key = &loaded_subject_key;
|
||
|
char *buf = calloc(1024,sizeof(char));
|
||
|
char issuer_name[256] ;//= calloc(256,sizeof(char));
|
||
|
// int i;
|
||
|
// char *p, *q, *r;
|
||
|
#if defined(MBEDTLS_X509_CSR_PARSE_C)
|
||
|
char subject_name[256];// = calloc(256,sizeof(char));
|
||
|
mbedtls_x509_csr csr;
|
||
|
#endif
|
||
|
|
||
|
mbedtls_x509write_cert crt;
|
||
|
mbedtls_mpi serial;
|
||
|
mbedtls_entropy_context entropy;
|
||
|
mbedtls_ctr_drbg_context ctr_drbg;
|
||
|
const char *pers = "crt example app";
|
||
|
|
||
|
mbedtls_x509write_crt_init( &crt );
|
||
|
mbedtls_pk_init( &loaded_issuer_key );
|
||
|
mbedtls_pk_init( &loaded_subject_key );
|
||
|
mbedtls_mpi_init( &serial );
|
||
|
mbedtls_ctr_drbg_init( &ctr_drbg );
|
||
|
mbedtls_entropy_init( &entropy );
|
||
|
#if defined(MBEDTLS_X509_CSR_PARSE_C)
|
||
|
mbedtls_x509_csr_init( &csr );
|
||
|
#endif
|
||
|
mbedtls_x509_crt_init( &issuer_crt );
|
||
|
memset( buf, 0, 1024 );
|
||
|
|
||
|
opt.issuer_crt = DFL_ISSUER_CRT;
|
||
|
opt.request_file = DFL_REQUEST_FILE;
|
||
|
opt.subject_key = DFL_SUBJECT_KEY;
|
||
|
opt.issuer_key = DFL_ISSUER_KEY;
|
||
|
opt.subject_pwd = DFL_SUBJECT_PWD;
|
||
|
opt.issuer_pwd = DFL_ISSUER_PWD;
|
||
|
opt.output_file = DFL_OUTPUT_FILENAME;
|
||
|
opt.subject_name = DFL_SUBJECT_NAME;
|
||
|
opt.issuer_name = DFL_ISSUER_NAME;
|
||
|
opt.not_before = DFL_NOT_BEFORE;
|
||
|
opt.not_after = DFL_NOT_AFTER;
|
||
|
opt.serial = DFL_SERIAL;
|
||
|
opt.selfsign = DFL_SELFSIGN;
|
||
|
opt.is_ca = DFL_IS_CA;
|
||
|
opt.max_pathlen = DFL_MAX_PATHLEN;
|
||
|
opt.key_usage = DFL_KEY_USAGE;
|
||
|
opt.ns_cert_type = DFL_NS_CERT_TYPE;
|
||
|
opt.version = DFL_VERSION - 1;
|
||
|
opt.md = DFL_DIGEST;
|
||
|
opt.subject_identifier = DFL_SUBJ_IDENT;
|
||
|
opt.authority_identifier = DFL_AUTH_IDENT;
|
||
|
opt.basic_constraints = DFL_CONSTRAINTS;
|
||
|
|
||
|
|
||
|
/*
|
||
|
* 0. Seed the PRNG
|
||
|
*/
|
||
|
mbedtls_printf( " . Seeding the random number generator..." );
|
||
|
fflush( stdout );
|
||
|
|
||
|
if( ( ret = mbedtls_ctr_drbg_seed( &ctr_drbg, mbedtls_entropy_func, &entropy,
|
||
|
(const unsigned char *) pers,
|
||
|
strlen( pers ) ) ) != 0 )
|
||
|
{
|
||
|
mbedtls_strerror( ret, buf, 1024 );
|
||
|
mbedtls_printf( " failed\n ! mbedtls_ctr_drbg_seed returned %d - %s\n",
|
||
|
ret, buf );
|
||
|
goto exit;
|
||
|
}
|
||
|
|
||
|
mbedtls_printf( " ok\n" );
|
||
|
|
||
|
// Parse serial to MPI
|
||
|
//
|
||
|
mbedtls_printf( " . Reading serial number..." );
|
||
|
fflush( stdout );
|
||
|
|
||
|
if( ( ret = mbedtls_mpi_read_string( &serial, 10, opt.serial ) ) != 0 )
|
||
|
{
|
||
|
mbedtls_strerror( ret, buf, 1024 );
|
||
|
mbedtls_printf( " failed\n ! mbedtls_mpi_read_string "
|
||
|
"returned -0x%04x - %s\n\n", -ret, buf );
|
||
|
goto exit;
|
||
|
}
|
||
|
|
||
|
mbedtls_printf( " ok\n" );
|
||
|
|
||
|
// Parse issuer certificate if present
|
||
|
//
|
||
|
if( !opt.selfsign && strlen( opt.issuer_crt ) )
|
||
|
{
|
||
|
/*
|
||
|
* 1.0.a. Load the certificates
|
||
|
*/
|
||
|
mbedtls_printf( " . Loading the issuer certificate ..." );
|
||
|
fflush( stdout );
|
||
|
|
||
|
if( ( ret = mbedtls_x509_crt_parse_file( &issuer_crt, opt.issuer_crt ) ) != 0 )
|
||
|
{
|
||
|
mbedtls_strerror( ret, buf, 1024 );
|
||
|
mbedtls_printf( " failed\n ! mbedtls_x509_crt_parse_file "
|
||
|
"returned -0x%04x - %s\n\n", -ret, buf );
|
||
|
goto exit;
|
||
|
}
|
||
|
|
||
|
ret = mbedtls_x509_dn_gets( issuer_name, sizeof(issuer_name),
|
||
|
&issuer_crt.subject );
|
||
|
if( ret < 0 )
|
||
|
{
|
||
|
mbedtls_strerror( ret, buf, 1024 );
|
||
|
mbedtls_printf( " failed\n ! mbedtls_x509_dn_gets "
|
||
|
"returned -0x%04x - %s\n\n", -ret, buf );
|
||
|
goto exit;
|
||
|
}
|
||
|
|
||
|
opt.issuer_name = issuer_name;
|
||
|
|
||
|
mbedtls_printf( " ok\n" );
|
||
|
}
|
||
|
|
||
|
#if defined(MBEDTLS_X509_CSR_PARSE_C)
|
||
|
// Parse certificate request if present
|
||
|
//
|
||
|
if( !opt.selfsign && strlen( opt.request_file ) )
|
||
|
{
|
||
|
/*
|
||
|
* 1.0.b. Load the CSR
|
||
|
*/
|
||
|
mbedtls_printf( " . Loading the certificate request ..." );
|
||
|
fflush( stdout );
|
||
|
|
||
|
if( ( ret = mbedtls_x509_csr_parse_file( &csr, opt.request_file ) ) != 0 )
|
||
|
{
|
||
|
mbedtls_strerror( ret, buf, 1024 );
|
||
|
mbedtls_printf( " failed\n ! mbedtls_x509_csr_parse_file "
|
||
|
"returned -0x%04x - %s\n\n", -ret, buf );
|
||
|
goto exit;
|
||
|
}
|
||
|
|
||
|
ret = mbedtls_x509_dn_gets( subject_name, sizeof(subject_name),
|
||
|
&csr.subject );
|
||
|
if( ret < 0 )
|
||
|
{
|
||
|
mbedtls_strerror( ret, buf, 1024 );
|
||
|
mbedtls_printf( " failed\n ! mbedtls_x509_dn_gets "
|
||
|
"returned -0x%04x - %s\n\n", -ret, buf );
|
||
|
goto exit;
|
||
|
}
|
||
|
|
||
|
opt.subject_name = subject_name;
|
||
|
subject_key = &csr.pk;
|
||
|
|
||
|
mbedtls_printf( " ok\n" );
|
||
|
}
|
||
|
#endif /* MBEDTLS_X509_CSR_PARSE_C */
|
||
|
|
||
|
/*
|
||
|
* 1.1. Load the keys
|
||
|
*/
|
||
|
if( !opt.selfsign && !strlen( opt.request_file ) )
|
||
|
{
|
||
|
mbedtls_printf( " . Loading the subject key ..." );
|
||
|
fflush( stdout );
|
||
|
|
||
|
ret = mbedtls_pk_parse_keyfile( &loaded_subject_key, opt.subject_key,
|
||
|
opt.subject_pwd );
|
||
|
if( ret != 0 )
|
||
|
{
|
||
|
mbedtls_strerror( ret, buf, 1024 );
|
||
|
mbedtls_printf( " failed\n ! mbedtls_pk_parse_keyfile "
|
||
|
"returned -0x%04x - %s\n\n", -ret, buf );
|
||
|
goto exit;
|
||
|
}
|
||
|
|
||
|
mbedtls_printf( " ok\n" );
|
||
|
}
|
||
|
|
||
|
mbedtls_printf( " . Loading the issuer key ..." );
|
||
|
fflush( stdout );
|
||
|
|
||
|
ret = mbedtls_pk_parse_keyfile( &loaded_issuer_key, opt.issuer_key,
|
||
|
opt.issuer_pwd );
|
||
|
if( ret != 0 )
|
||
|
{
|
||
|
mbedtls_strerror( ret, buf, 1024 );
|
||
|
mbedtls_printf( " failed\n ! mbedtls_pk_parse_keyfile "
|
||
|
"returned -x%02x - %s\n\n", -ret, buf );
|
||
|
goto exit;
|
||
|
}
|
||
|
|
||
|
// Check if key and issuer certificate match
|
||
|
//
|
||
|
if( strlen( opt.issuer_crt ) )
|
||
|
{
|
||
|
if( mbedtls_pk_check_pair( &issuer_crt.pk, issuer_key ) != 0 )
|
||
|
{
|
||
|
mbedtls_printf( " failed\n ! issuer_key does not match "
|
||
|
"issuer certificate\n\n" );
|
||
|
goto exit;
|
||
|
}
|
||
|
}
|
||
|
|
||
|
mbedtls_printf( " ok\n" );
|
||
|
|
||
|
if( opt.selfsign )
|
||
|
{
|
||
|
opt.subject_name = opt.issuer_name;
|
||
|
subject_key = issuer_key;
|
||
|
}
|
||
|
|
||
|
mbedtls_x509write_crt_set_subject_key( &crt, subject_key );
|
||
|
mbedtls_x509write_crt_set_issuer_key( &crt, issuer_key );
|
||
|
|
||
|
/*
|
||
|
* 1.0. Check the names for validity
|
||
|
*/
|
||
|
if( ( ret = mbedtls_x509write_crt_set_subject_name( &crt, opt.subject_name ) ) != 0 )
|
||
|
{
|
||
|
mbedtls_strerror( ret, buf, 1024 );
|
||
|
mbedtls_printf( " failed\n ! mbedtls_x509write_crt_set_subject_name "
|
||
|
"returned -0x%04x - %s\n\n", -ret, buf );
|
||
|
goto exit;
|
||
|
}
|
||
|
|
||
|
if( ( ret = mbedtls_x509write_crt_set_issuer_name( &crt, opt.issuer_name ) ) != 0 )
|
||
|
{
|
||
|
mbedtls_strerror( ret, buf, 1024 );
|
||
|
mbedtls_printf( " failed\n ! mbedtls_x509write_crt_set_issuer_name "
|
||
|
"returned -0x%04x - %s\n\n", -ret, buf );
|
||
|
goto exit;
|
||
|
}
|
||
|
|
||
|
mbedtls_printf( " . Setting certificate values ..." );
|
||
|
fflush( stdout );
|
||
|
|
||
|
mbedtls_x509write_crt_set_version( &crt, opt.version );
|
||
|
mbedtls_x509write_crt_set_md_alg( &crt, opt.md );
|
||
|
|
||
|
ret = mbedtls_x509write_crt_set_serial( &crt, &serial );
|
||
|
if( ret != 0 )
|
||
|
{
|
||
|
mbedtls_strerror( ret, buf, 1024 );
|
||
|
mbedtls_printf( " failed\n ! mbedtls_x509write_crt_set_serial "
|
||
|
"returned -0x%04x - %s\n\n", -ret, buf );
|
||
|
goto exit;
|
||
|
}
|
||
|
|
||
|
ret = mbedtls_x509write_crt_set_validity( &crt, opt.not_before, opt.not_after );
|
||
|
if( ret != 0 )
|
||
|
{
|
||
|
mbedtls_strerror( ret, buf, 1024 );
|
||
|
mbedtls_printf( " failed\n ! mbedtls_x509write_crt_set_validity "
|
||
|
"returned -0x%04x - %s\n\n", -ret, buf );
|
||
|
goto exit;
|
||
|
}
|
||
|
|
||
|
mbedtls_printf( " ok\n" );
|
||
|
|
||
|
if( opt.version == MBEDTLS_X509_CRT_VERSION_3 &&
|
||
|
opt.basic_constraints != 0 )
|
||
|
{
|
||
|
mbedtls_printf( " . Adding the Basic Constraints extension ..." );
|
||
|
fflush( stdout );
|
||
|
|
||
|
ret = mbedtls_x509write_crt_set_basic_constraints( &crt, opt.is_ca,
|
||
|
opt.max_pathlen );
|
||
|
if( ret != 0 )
|
||
|
{
|
||
|
mbedtls_strerror( ret, buf, 1024 );
|
||
|
mbedtls_printf( " failed\n ! x509write_crt_set_basic_contraints "
|
||
|
"returned -0x%04x - %s\n\n", -ret, buf );
|
||
|
goto exit;
|
||
|
}
|
||
|
|
||
|
mbedtls_printf( " ok\n" );
|
||
|
}
|
||
|
|
||
|
#if defined(MBEDTLS_SHA1_C)
|
||
|
if( opt.version == MBEDTLS_X509_CRT_VERSION_3 &&
|
||
|
opt.subject_identifier != 0 )
|
||
|
{
|
||
|
mbedtls_printf( " . Adding the Subject Key Identifier ..." );
|
||
|
fflush( stdout );
|
||
|
|
||
|
ret = mbedtls_x509write_crt_set_subject_key_identifier( &crt );
|
||
|
if( ret != 0 )
|
||
|
{
|
||
|
mbedtls_strerror( ret, buf, 1024 );
|
||
|
mbedtls_printf( " failed\n ! mbedtls_x509write_crt_set_subject"
|
||
|
"_key_identifier returned -0x%04x - %s\n\n",
|
||
|
-ret, buf );
|
||
|
goto exit;
|
||
|
}
|
||
|
|
||
|
mbedtls_printf( " ok\n" );
|
||
|
}
|
||
|
|
||
|
if( opt.version == MBEDTLS_X509_CRT_VERSION_3 &&
|
||
|
opt.authority_identifier != 0 )
|
||
|
{
|
||
|
mbedtls_printf( " . Adding the Authority Key Identifier ..." );
|
||
|
fflush( stdout );
|
||
|
|
||
|
ret = mbedtls_x509write_crt_set_authority_key_identifier( &crt );
|
||
|
if( ret != 0 )
|
||
|
{
|
||
|
mbedtls_strerror( ret, buf, 1024 );
|
||
|
mbedtls_printf( " failed\n ! mbedtls_x509write_crt_set_authority_"
|
||
|
"key_identifier returned -0x%04x - %s\n\n",
|
||
|
-ret, buf );
|
||
|
goto exit;
|
||
|
}
|
||
|
|
||
|
mbedtls_printf( " ok\n" );
|
||
|
}
|
||
|
#endif /* MBEDTLS_SHA1_C */
|
||
|
|
||
|
if( opt.version == MBEDTLS_X509_CRT_VERSION_3 &&
|
||
|
opt.key_usage != 0 )
|
||
|
{
|
||
|
mbedtls_printf( " . Adding the Key Usage extension ..." );
|
||
|
fflush( stdout );
|
||
|
|
||
|
ret = mbedtls_x509write_crt_set_key_usage( &crt, opt.key_usage );
|
||
|
if( ret != 0 )
|
||
|
{
|
||
|
mbedtls_strerror( ret, buf, 1024 );
|
||
|
mbedtls_printf( " failed\n ! mbedtls_x509write_crt_set_key_usage "
|
||
|
"returned -0x%04x - %s\n\n", -ret, buf );
|
||
|
goto exit;
|
||
|
}
|
||
|
|
||
|
mbedtls_printf( " ok\n" );
|
||
|
}
|
||
|
|
||
|
if( opt.version == MBEDTLS_X509_CRT_VERSION_3 &&
|
||
|
opt.ns_cert_type != 0 )
|
||
|
{
|
||
|
mbedtls_printf( " . Adding the NS Cert Type extension ..." );
|
||
|
fflush( stdout );
|
||
|
|
||
|
ret = mbedtls_x509write_crt_set_ns_cert_type( &crt, opt.ns_cert_type );
|
||
|
if( ret != 0 )
|
||
|
{
|
||
|
mbedtls_strerror( ret, buf, 1024 );
|
||
|
mbedtls_printf( " failed\n ! mbedtls_x509write_crt_set_ns_cert_type "
|
||
|
"returned -0x%04x - %s\n\n", -ret, buf );
|
||
|
goto exit;
|
||
|
}
|
||
|
|
||
|
mbedtls_printf( " ok\n" );
|
||
|
}
|
||
|
|
||
|
/*
|
||
|
* 1.2. Writing the certificate
|
||
|
*/
|
||
|
mbedtls_printf( " . Writing the certificate..." );
|
||
|
fflush( stdout );
|
||
|
|
||
|
unsigned char output_buf[4096];
|
||
|
memset( output_buf, 0, 4096 );
|
||
|
//////////////////////////////////////////////////////////
|
||
|
//ret = mbedtls_x509write_crt_pem( &crt, output_buf, 4096, mbedtls_ctr_drbg_random, &ctr_drbg );
|
||
|
if( ( ret = write_certificate( &crt, opt.output_file, mbedtls_ctr_drbg_random, &ctr_drbg ) ) != 0 )
|
||
|
{
|
||
|
mbedtls_strerror( ret, buf, 1024 );
|
||
|
mbedtls_printf( " failed\n ! write_certificate -0x%04x - %s\n\n",
|
||
|
-ret, buf );
|
||
|
goto exit;
|
||
|
}
|
||
|
|
||
|
mbedtls_printf( " ok\n" );
|
||
|
|
||
|
exit_code = MBEDTLS_EXIT_SUCCESS;
|
||
|
|
||
|
exit:
|
||
|
#if defined(MBEDTLS_X509_CSR_PARSE_C)
|
||
|
mbedtls_x509_csr_free( &csr );
|
||
|
#endif /* MBEDTLS_X509_CSR_PARSE_C */
|
||
|
mbedtls_x509_crt_free( &issuer_crt );
|
||
|
mbedtls_x509write_crt_free( &crt );
|
||
|
mbedtls_pk_free( &loaded_subject_key );
|
||
|
mbedtls_pk_free( &loaded_issuer_key );
|
||
|
mbedtls_mpi_free( &serial );
|
||
|
mbedtls_ctr_drbg_free( &ctr_drbg );
|
||
|
mbedtls_entropy_free( &entropy );
|
||
|
|
||
|
|
||
|
for(;;){
|
||
|
vTaskDelay(40);
|
||
|
}
|
||
|
}
|
||
|
int write_certificate( mbedtls_x509write_cert *crt, const char *output_file,
|
||
|
int (*f_rng)(void *, unsigned char *, size_t),
|
||
|
void *p_rng )
|
||
|
{
|
||
|
int ret;
|
||
|
FILE *f;
|
||
|
unsigned char output_buf[4096];
|
||
|
size_t len = 0;
|
||
|
|
||
|
memset( output_buf, 0, 4096 );
|
||
|
if( ( ret = mbedtls_x509write_crt_pem( crt, output_buf, 4096,
|
||
|
f_rng, p_rng ) ) < 0 )
|
||
|
return( ret );
|
||
|
|
||
|
len = strlen( (char *) output_buf );
|
||
|
|
||
|
if( ( f = fopen( output_file, "w" ) ) == NULL )
|
||
|
return( -1 );
|
||
|
|
||
|
if( fwrite( output_buf, 1, len, f ) != len )
|
||
|
{
|
||
|
fclose( f );
|
||
|
return( -1 );
|
||
|
}
|
||
|
|
||
|
fclose( f );
|
||
|
read_file("/spiffs/cert.crt");
|
||
|
return( 0 );
|
||
|
}
|