| /* BEGIN_HEADER */ |
| #include "mbedtls/bignum.h" |
| #include "mbedtls/x509.h" |
| #include "mbedtls/x509_crt.h" |
| #include "mbedtls/x509_crl.h" |
| #include "mbedtls/x509_csr.h" |
| #include "mbedtls/pem.h" |
| #include "mbedtls/oid.h" |
| #include "mbedtls/base64.h" |
| #include "string.h" |
| |
| #if MBEDTLS_X509_MAX_INTERMEDIATE_CA > 19 |
| #error "The value of MBEDTLS_X509_MAX_INTERMEDIATE_C is larger \ |
| than the current threshold 19. To test larger values, please \ |
| adapt the script tests/data_files/dir-max/long.sh." |
| #endif |
| |
| /* Test-only profile allowing all digests, PK algorithms, and curves. */ |
| const mbedtls_x509_crt_profile profile_all = |
| { |
| 0xFFFFFFFF, /* Any MD */ |
| 0xFFFFFFFF, /* Any PK alg */ |
| 0xFFFFFFFF, /* Any curve */ |
| 1024, |
| }; |
| |
| /* Profile for backward compatibility. Allows SHA-1, unlike the default |
| profile. */ |
| const mbedtls_x509_crt_profile compat_profile = |
| { |
| MBEDTLS_X509_ID_FLAG( MBEDTLS_MD_SHA1 ) | |
| MBEDTLS_X509_ID_FLAG( MBEDTLS_MD_RIPEMD160 ) | |
| MBEDTLS_X509_ID_FLAG( MBEDTLS_MD_SHA224 ) | |
| MBEDTLS_X509_ID_FLAG( MBEDTLS_MD_SHA256 ) | |
| MBEDTLS_X509_ID_FLAG( MBEDTLS_MD_SHA384 ) | |
| MBEDTLS_X509_ID_FLAG( MBEDTLS_MD_SHA512 ), |
| 0xFFFFFFF, /* Any PK alg */ |
| 0xFFFFFFF, /* Any curve */ |
| 1024, |
| }; |
| |
| const mbedtls_x509_crt_profile profile_rsa3072 = |
| { |
| MBEDTLS_X509_ID_FLAG( MBEDTLS_MD_SHA256 ) | |
| MBEDTLS_X509_ID_FLAG( MBEDTLS_MD_SHA384 ) | |
| MBEDTLS_X509_ID_FLAG( MBEDTLS_MD_SHA512 ), |
| MBEDTLS_X509_ID_FLAG( MBEDTLS_PK_RSA ), |
| 0, |
| 3072, |
| }; |
| |
| const mbedtls_x509_crt_profile profile_sha512 = |
| { |
| MBEDTLS_X509_ID_FLAG( MBEDTLS_MD_SHA512 ), |
| 0xFFFFFFF, /* Any PK alg */ |
| 0xFFFFFFF, /* Any curve */ |
| 1024, |
| }; |
| |
| int verify_none( void *data, mbedtls_x509_crt *crt, int certificate_depth, uint32_t *flags ) |
| { |
| ((void) data); |
| ((void) crt); |
| ((void) certificate_depth); |
| *flags |= MBEDTLS_X509_BADCERT_OTHER; |
| |
| return 0; |
| } |
| |
| int verify_all( void *data, mbedtls_x509_crt *crt, int certificate_depth, uint32_t *flags ) |
| { |
| ((void) data); |
| ((void) crt); |
| ((void) certificate_depth); |
| *flags = 0; |
| |
| return 0; |
| } |
| |
| #if defined(MBEDTLS_X509_TRUSTED_CERTIFICATE_CALLBACK) |
| int ca_callback_fail( void *data, mbedtls_x509_crt const *child, mbedtls_x509_crt **candidates ) |
| { |
| ((void) data); |
| ((void) child); |
| ((void) candidates); |
| |
| return -1; |
| } |
| |
| int ca_callback( void *data, mbedtls_x509_crt const *child, |
| mbedtls_x509_crt **candidates ) |
| { |
| int ret = 0; |
| mbedtls_x509_crt *ca = (mbedtls_x509_crt *) data; |
| mbedtls_x509_crt *first; |
| |
| /* This is a test-only implementation of the CA callback |
| * which always returns the entire list of trusted certificates. |
| * Production implementations managing a large number of CAs |
| * should use an efficient presentation and lookup for the |
| * set of trusted certificates (such as a hashtable) and only |
| * return those trusted certificates which satisfy basic |
| * parental checks, such as the matching of child `Issuer` |
| * and parent `Subject` field. */ |
| ((void) child); |
| |
| first = mbedtls_calloc( 1, sizeof( mbedtls_x509_crt ) ); |
| if( first == NULL ) |
| { |
| ret = -1; |
| goto exit; |
| } |
| mbedtls_x509_crt_init( first ); |
| |
| if( mbedtls_x509_crt_parse_der( first, ca->raw.p, ca->raw.len ) != 0 ) |
| { |
| ret = -1; |
| goto exit; |
| } |
| |
| while( ca->next != NULL ) |
| { |
| ca = ca->next; |
| if( mbedtls_x509_crt_parse_der( first, ca->raw.p, ca->raw.len ) != 0 ) |
| { |
| ret = -1; |
| goto exit; |
| } |
| } |
| |
| exit: |
| |
| if( ret != 0 ) |
| { |
| mbedtls_x509_crt_free( first ); |
| mbedtls_free( first ); |
| first = NULL; |
| } |
| |
| *candidates = first; |
| return( ret ); |
| } |
| #endif /* MBEDTLS_X509_TRUSTED_CERTIFICATE_CALLBACK */ |
| |
| int verify_fatal( void *data, mbedtls_x509_crt *crt, int certificate_depth, uint32_t *flags ) |
| { |
| int *levels = (int *) data; |
| |
| ((void) crt); |
| ((void) certificate_depth); |
| |
| /* Simulate a fatal error in the callback */ |
| if( *levels & ( 1 << certificate_depth ) ) |
| { |
| *flags |= ( 1 << certificate_depth ); |
| return( -1 - certificate_depth ); |
| } |
| |
| return( 0 ); |
| } |
| |
| /* strsep() not available on Windows */ |
| char *mystrsep(char **stringp, const char *delim) |
| { |
| const char *p; |
| char *ret = *stringp; |
| |
| if( *stringp == NULL ) |
| return( NULL ); |
| |
| for( ; ; (*stringp)++ ) |
| { |
| if( **stringp == '\0' ) |
| { |
| *stringp = NULL; |
| goto done; |
| } |
| |
| for( p = delim; *p != '\0'; p++ ) |
| if( **stringp == *p ) |
| { |
| **stringp = '\0'; |
| (*stringp)++; |
| goto done; |
| } |
| } |
| |
| done: |
| return( ret ); |
| } |
| |
| #if defined(MBEDTLS_X509_CRT_PARSE_C) |
| typedef struct { |
| char buf[512]; |
| char *p; |
| } verify_print_context; |
| |
| void verify_print_init( verify_print_context *ctx ) |
| { |
| memset( ctx, 0, sizeof( verify_print_context ) ); |
| ctx->p = ctx->buf; |
| } |
| |
| int verify_print( void *data, mbedtls_x509_crt *crt, int certificate_depth, uint32_t *flags ) |
| { |
| int ret; |
| verify_print_context *ctx = (verify_print_context *) data; |
| char *p = ctx->p; |
| size_t n = ctx->buf + sizeof( ctx->buf ) - ctx->p; |
| ((void) flags); |
| |
| ret = mbedtls_snprintf( p, n, "depth %d - serial ", certificate_depth ); |
| MBEDTLS_X509_SAFE_SNPRINTF; |
| |
| ret = mbedtls_x509_serial_gets( p, n, &crt->serial ); |
| MBEDTLS_X509_SAFE_SNPRINTF; |
| |
| ret = mbedtls_snprintf( p, n, " - subject " ); |
| MBEDTLS_X509_SAFE_SNPRINTF; |
| |
| ret = mbedtls_x509_dn_gets( p, n, &crt->subject ); |
| MBEDTLS_X509_SAFE_SNPRINTF; |
| |
| ret = mbedtls_snprintf( p, n, " - flags 0x%08x\n", *flags ); |
| MBEDTLS_X509_SAFE_SNPRINTF; |
| |
| ctx->p = p; |
| |
| return( 0 ); |
| } |
| |
| int verify_parse_san( mbedtls_x509_subject_alternative_name *san, |
| char **buf, size_t *size ) |
| { |
| int ret; |
| size_t i; |
| char *p = *buf; |
| size_t n = *size; |
| |
| ret = mbedtls_snprintf( p, n, "type : %u", san->type ); |
| MBEDTLS_X509_SAFE_SNPRINTF; |
| |
| switch( san->type ) |
| { |
| case( MBEDTLS_X509_SAN_OTHER_NAME ): |
| ret = mbedtls_snprintf( p, n, "\notherName :"); |
| MBEDTLS_X509_SAFE_SNPRINTF; |
| |
| if( MBEDTLS_OID_CMP( MBEDTLS_OID_ON_HW_MODULE_NAME, |
| &san->san.other_name.value.hardware_module_name.oid ) != 0 ) |
| { |
| ret = mbedtls_snprintf( p, n, " hardware module name :" ); |
| MBEDTLS_X509_SAFE_SNPRINTF; |
| ret = mbedtls_snprintf( p, n, " hardware type : " ); |
| MBEDTLS_X509_SAFE_SNPRINTF; |
| |
| ret = mbedtls_oid_get_numeric_string( p, n, |
| &san->san.other_name.value.hardware_module_name.oid ); |
| MBEDTLS_X509_SAFE_SNPRINTF; |
| |
| ret = mbedtls_snprintf( p, n, ", hardware serial number : " ); |
| MBEDTLS_X509_SAFE_SNPRINTF; |
| |
| if( san->san.other_name.value.hardware_module_name.val.len >= n ) |
| { |
| *p = '\0'; |
| return( MBEDTLS_ERR_X509_BUFFER_TOO_SMALL ); |
| } |
| |
| for( i=0; i < san->san.other_name.value.hardware_module_name.val.len; i++ ) |
| { |
| *p++ = san->san.other_name.value.hardware_module_name.val.p[i]; |
| } |
| n -= san->san.other_name.value.hardware_module_name.val.len; |
| } |
| break;/* MBEDTLS_OID_ON_HW_MODULE_NAME */ |
| case( MBEDTLS_X509_SAN_DNS_NAME ): |
| ret = mbedtls_snprintf( p, n, "\ndNSName : " ); |
| MBEDTLS_X509_SAFE_SNPRINTF; |
| if( san->san.unstructured_name.len >= n ) |
| { |
| *p = '\0'; |
| return( MBEDTLS_ERR_X509_BUFFER_TOO_SMALL ); |
| } |
| n -= san->san.unstructured_name.len; |
| for( i = 0; i < san->san.unstructured_name.len; i++ ) |
| *p++ = san->san.unstructured_name.p[i]; |
| break;/* MBEDTLS_X509_SAN_DNS_NAME */ |
| |
| default: |
| /* |
| * Should not happen. |
| */ |
| return( -1 ); |
| } |
| ret = mbedtls_snprintf( p, n, "\n" ); |
| MBEDTLS_X509_SAFE_SNPRINTF; |
| |
| *size = n; |
| *buf = p; |
| |
| return( 0 ); |
| } |
| #endif /* MBEDTLS_X509_CRT_PARSE_C */ |
| /* END_HEADER */ |
| |
| /* BEGIN_DEPENDENCIES |
| * depends_on:MBEDTLS_BIGNUM_C |
| * END_DEPENDENCIES |
| */ |
| |
| /* BEGIN_CASE depends_on:MBEDTLS_FS_IO:MBEDTLS_X509_CRT_PARSE_C */ |
| void x509_parse_san( char * crt_file, char * result_str ) |
| { |
| int ret; |
| mbedtls_x509_crt crt; |
| mbedtls_x509_subject_alternative_name san; |
| mbedtls_x509_sequence *cur = NULL; |
| char buf[2000]; |
| char *p = buf; |
| size_t n = sizeof( buf ); |
| |
| mbedtls_x509_crt_init( &crt ); |
| memset( buf, 0, 2000 ); |
| |
| TEST_ASSERT( mbedtls_x509_crt_parse_file( &crt, crt_file ) == 0 ); |
| |
| if( crt.ext_types & MBEDTLS_X509_EXT_SUBJECT_ALT_NAME ) |
| { |
| cur = &crt.subject_alt_names; |
| while( cur != NULL ) |
| { |
| ret = mbedtls_x509_parse_subject_alt_name( &cur->buf, &san ); |
| TEST_ASSERT( ret == 0 || ret == MBEDTLS_ERR_X509_FEATURE_UNAVAILABLE ); |
| /* |
| * If san type not supported, ignore. |
| */ |
| if( ret == 0) |
| TEST_ASSERT( verify_parse_san( &san, &p, &n ) == 0 ); |
| cur = cur->next; |
| } |
| } |
| |
| TEST_ASSERT( strcmp( buf, result_str ) == 0 ); |
| |
| exit: |
| |
| mbedtls_x509_crt_free( &crt ); |
| } |
| /* END_CASE */ |
| |
| /* BEGIN_CASE depends_on:MBEDTLS_FS_IO:MBEDTLS_X509_CRT_PARSE_C */ |
| void x509_cert_info( char * crt_file, char * result_str ) |
| { |
| mbedtls_x509_crt crt; |
| char buf[2000]; |
| int res; |
| |
| mbedtls_x509_crt_init( &crt ); |
| memset( buf, 0, 2000 ); |
| |
| TEST_ASSERT( mbedtls_x509_crt_parse_file( &crt, crt_file ) == 0 ); |
| res = mbedtls_x509_crt_info( buf, 2000, "", &crt ); |
| |
| TEST_ASSERT( res != -1 ); |
| TEST_ASSERT( res != -2 ); |
| |
| TEST_ASSERT( strcmp( buf, result_str ) == 0 ); |
| |
| exit: |
| mbedtls_x509_crt_free( &crt ); |
| } |
| /* END_CASE */ |
| |
| /* BEGIN_CASE depends_on:MBEDTLS_FS_IO:MBEDTLS_X509_CRL_PARSE_C */ |
| void mbedtls_x509_crl_info( char * crl_file, char * result_str ) |
| { |
| mbedtls_x509_crl crl; |
| char buf[2000]; |
| int res; |
| |
| mbedtls_x509_crl_init( &crl ); |
| memset( buf, 0, 2000 ); |
| |
| TEST_ASSERT( mbedtls_x509_crl_parse_file( &crl, crl_file ) == 0 ); |
| res = mbedtls_x509_crl_info( buf, 2000, "", &crl ); |
| |
| TEST_ASSERT( res != -1 ); |
| TEST_ASSERT( res != -2 ); |
| |
| TEST_ASSERT( strcmp( buf, result_str ) == 0 ); |
| |
| exit: |
| mbedtls_x509_crl_free( &crl ); |
| } |
| /* END_CASE */ |
| |
| /* BEGIN_CASE depends_on:MBEDTLS_FS_IO:MBEDTLS_X509_CRL_PARSE_C */ |
| void mbedtls_x509_crl_parse( char * crl_file, int result ) |
| { |
| mbedtls_x509_crl crl; |
| char buf[2000]; |
| |
| mbedtls_x509_crl_init( &crl ); |
| memset( buf, 0, 2000 ); |
| |
| TEST_ASSERT( mbedtls_x509_crl_parse_file( &crl, crl_file ) == result ); |
| |
| exit: |
| mbedtls_x509_crl_free( &crl ); |
| } |
| /* END_CASE */ |
| |
| /* BEGIN_CASE depends_on:MBEDTLS_FS_IO:MBEDTLS_X509_CSR_PARSE_C */ |
| void mbedtls_x509_csr_info( char * csr_file, char * result_str ) |
| { |
| mbedtls_x509_csr csr; |
| char buf[2000]; |
| int res; |
| |
| mbedtls_x509_csr_init( &csr ); |
| memset( buf, 0, 2000 ); |
| |
| TEST_ASSERT( mbedtls_x509_csr_parse_file( &csr, csr_file ) == 0 ); |
| res = mbedtls_x509_csr_info( buf, 2000, "", &csr ); |
| |
| TEST_ASSERT( res != -1 ); |
| TEST_ASSERT( res != -2 ); |
| |
| TEST_ASSERT( strcmp( buf, result_str ) == 0 ); |
| |
| exit: |
| mbedtls_x509_csr_free( &csr ); |
| } |
| /* END_CASE */ |
| |
| /* BEGIN_CASE depends_on:MBEDTLS_X509_CRT_PARSE_C */ |
| void x509_verify_info( int flags, char * prefix, char * result_str ) |
| { |
| char buf[2000]; |
| int res; |
| |
| memset( buf, 0, sizeof( buf ) ); |
| |
| res = mbedtls_x509_crt_verify_info( buf, sizeof( buf ), prefix, flags ); |
| |
| TEST_ASSERT( res >= 0 ); |
| |
| TEST_ASSERT( strcmp( buf, result_str ) == 0 ); |
| } |
| /* END_CASE */ |
| |
| /* BEGIN_CASE depends_on:MBEDTLS_FS_IO:MBEDTLS_X509_CRT_PARSE_C:MBEDTLS_X509_CRL_PARSE_C:MBEDTLS_ECP_RESTARTABLE:MBEDTLS_ECDSA_C */ |
| void x509_verify_restart( char *crt_file, char *ca_file, |
| int result, int flags_result, |
| int max_ops, int min_restart, int max_restart ) |
| { |
| int ret, cnt_restart; |
| mbedtls_x509_crt_restart_ctx rs_ctx; |
| mbedtls_x509_crt crt; |
| mbedtls_x509_crt ca; |
| uint32_t flags = 0; |
| |
| /* |
| * See comments on ecp_test_vect_restart() for op count precision. |
| * |
| * For reference, with mbed TLS 2.6 and default settings: |
| * - ecdsa_verify() for P-256: ~ 6700 |
| * - ecdsa_verify() for P-384: ~ 18800 |
| * - x509_verify() for server5 -> test-ca2: ~ 18800 |
| * - x509_verify() for server10 -> int-ca3 -> int-ca2: ~ 25500 |
| */ |
| |
| mbedtls_x509_crt_restart_init( &rs_ctx ); |
| mbedtls_x509_crt_init( &crt ); |
| mbedtls_x509_crt_init( &ca ); |
| |
| TEST_ASSERT( mbedtls_x509_crt_parse_file( &crt, crt_file ) == 0 ); |
| TEST_ASSERT( mbedtls_x509_crt_parse_file( &ca, ca_file ) == 0 ); |
| |
| mbedtls_ecp_set_max_ops( max_ops ); |
| |
| cnt_restart = 0; |
| do { |
| ret = mbedtls_x509_crt_verify_restartable( &crt, &ca, NULL, |
| &mbedtls_x509_crt_profile_default, NULL, &flags, |
| NULL, NULL, &rs_ctx ); |
| } while( ret == MBEDTLS_ERR_ECP_IN_PROGRESS && ++cnt_restart ); |
| |
| TEST_ASSERT( ret == result ); |
| TEST_ASSERT( flags == (uint32_t) flags_result ); |
| |
| TEST_ASSERT( cnt_restart >= min_restart ); |
| TEST_ASSERT( cnt_restart <= max_restart ); |
| |
| /* Do we leak memory when aborting? */ |
| ret = mbedtls_x509_crt_verify_restartable( &crt, &ca, NULL, |
| &mbedtls_x509_crt_profile_default, NULL, &flags, |
| NULL, NULL, &rs_ctx ); |
| TEST_ASSERT( ret == result || ret == MBEDTLS_ERR_ECP_IN_PROGRESS ); |
| |
| exit: |
| mbedtls_x509_crt_restart_free( &rs_ctx ); |
| mbedtls_x509_crt_free( &crt ); |
| mbedtls_x509_crt_free( &ca ); |
| } |
| /* END_CASE */ |
| |
| /* BEGIN_CASE depends_on:MBEDTLS_FS_IO:MBEDTLS_X509_CRT_PARSE_C:MBEDTLS_X509_CRL_PARSE_C */ |
| void x509_verify( char *crt_file, char *ca_file, char *crl_file, |
| char *cn_name_str, int result, int flags_result, |
| char *profile_str, |
| char *verify_callback ) |
| { |
| mbedtls_x509_crt crt; |
| mbedtls_x509_crt ca; |
| mbedtls_x509_crl crl; |
| uint32_t flags = 0; |
| int res; |
| int (*f_vrfy)(void *, mbedtls_x509_crt *, int, uint32_t *) = NULL; |
| char * cn_name = NULL; |
| const mbedtls_x509_crt_profile *profile; |
| |
| #if defined(MBEDTLS_USE_PSA_CRYPTO) |
| TEST_ASSERT( psa_crypto_init() == 0 ); |
| #endif |
| |
| mbedtls_x509_crt_init( &crt ); |
| mbedtls_x509_crt_init( &ca ); |
| mbedtls_x509_crl_init( &crl ); |
| |
| if( strcmp( cn_name_str, "NULL" ) != 0 ) |
| cn_name = cn_name_str; |
| |
| if( strcmp( profile_str, "" ) == 0 ) |
| profile = &mbedtls_x509_crt_profile_default; |
| else if( strcmp( profile_str, "next" ) == 0 ) |
| profile = &mbedtls_x509_crt_profile_next; |
| else if( strcmp( profile_str, "suite_b" ) == 0 ) |
| profile = &mbedtls_x509_crt_profile_suiteb; |
| else if( strcmp( profile_str, "compat" ) == 0 ) |
| profile = &compat_profile; |
| else if( strcmp( profile_str, "all" ) == 0 ) |
| profile = &profile_all; |
| else |
| TEST_ASSERT( "Unknown algorithm profile" == 0 ); |
| |
| if( strcmp( verify_callback, "NULL" ) == 0 ) |
| f_vrfy = NULL; |
| else if( strcmp( verify_callback, "verify_none" ) == 0 ) |
| f_vrfy = verify_none; |
| else if( strcmp( verify_callback, "verify_all" ) == 0 ) |
| f_vrfy = verify_all; |
| else |
| TEST_ASSERT( "No known verify callback selected" == 0 ); |
| |
| TEST_ASSERT( mbedtls_x509_crt_parse_file( &crt, crt_file ) == 0 ); |
| TEST_ASSERT( mbedtls_x509_crt_parse_file( &ca, ca_file ) == 0 ); |
| TEST_ASSERT( mbedtls_x509_crl_parse_file( &crl, crl_file ) == 0 ); |
| |
| res = mbedtls_x509_crt_verify_with_profile( &crt, &ca, &crl, profile, cn_name, &flags, f_vrfy, NULL ); |
| |
| TEST_ASSERT( res == ( result ) ); |
| TEST_ASSERT( flags == (uint32_t)( flags_result ) ); |
| |
| #if defined(MBEDTLS_X509_TRUSTED_CERTIFICATE_CALLBACK) |
| /* CRLs aren't supported with CA callbacks, so skip the CA callback |
| * version of the test if CRLs are in use. */ |
| if( crl_file == NULL || strcmp( crl_file, "" ) == 0 ) |
| { |
| flags = 0; |
| |
| res = mbedtls_x509_crt_verify_with_ca_cb( &crt, ca_callback, &ca, profile, cn_name, &flags, f_vrfy, NULL ); |
| |
| TEST_ASSERT( res == ( result ) ); |
| TEST_ASSERT( flags == (uint32_t)( flags_result ) ); |
| } |
| #endif /* MBEDTLS_X509_TRUSTED_CERTIFICATE_CALLBACK */ |
| exit: |
| mbedtls_x509_crt_free( &crt ); |
| mbedtls_x509_crt_free( &ca ); |
| mbedtls_x509_crl_free( &crl ); |
| } |
| /* END_CASE */ |
| |
| /* BEGIN_CASE depends_on:MBEDTLS_FS_IO:MBEDTLS_X509_CRT_PARSE_C:MBEDTLS_X509_CRL_PARSE_C:MBEDTLS_X509_TRUSTED_CERTIFICATE_CALLBACK */ |
| void x509_verify_ca_cb_failure( char *crt_file, char *ca_file, char *name, |
| int exp_ret ) |
| { |
| int ret; |
| mbedtls_x509_crt crt; |
| mbedtls_x509_crt ca; |
| uint32_t flags = 0; |
| |
| mbedtls_x509_crt_init( &crt ); |
| mbedtls_x509_crt_init( &ca ); |
| |
| TEST_ASSERT( mbedtls_x509_crt_parse_file( &crt, crt_file ) == 0 ); |
| TEST_ASSERT( mbedtls_x509_crt_parse_file( &ca, ca_file ) == 0 ); |
| |
| if( strcmp( name, "NULL" ) == 0 ) |
| name = NULL; |
| |
| ret = mbedtls_x509_crt_verify_with_ca_cb( &crt, ca_callback_fail, &ca, |
| &compat_profile, name, &flags, |
| NULL, NULL ); |
| |
| TEST_ASSERT( ret == exp_ret ); |
| TEST_ASSERT( flags == (uint32_t)( -1 ) ); |
| exit: |
| mbedtls_x509_crt_free( &crt ); |
| mbedtls_x509_crt_free( &ca ); |
| } |
| /* END_CASE */ |
| |
| /* BEGIN_CASE depends_on:MBEDTLS_FS_IO:MBEDTLS_X509_CRT_PARSE_C */ |
| void x509_verify_callback( char *crt_file, char *ca_file, char *name, |
| int exp_ret, char *exp_vrfy_out ) |
| { |
| int ret; |
| mbedtls_x509_crt crt; |
| mbedtls_x509_crt ca; |
| uint32_t flags = 0; |
| verify_print_context vrfy_ctx; |
| |
| #if defined(MBEDTLS_USE_PSA_CRYPTO) |
| TEST_ASSERT( psa_crypto_init() == 0 ); |
| #endif |
| |
| mbedtls_x509_crt_init( &crt ); |
| mbedtls_x509_crt_init( &ca ); |
| verify_print_init( &vrfy_ctx ); |
| |
| TEST_ASSERT( mbedtls_x509_crt_parse_file( &crt, crt_file ) == 0 ); |
| TEST_ASSERT( mbedtls_x509_crt_parse_file( &ca, ca_file ) == 0 ); |
| |
| if( strcmp( name, "NULL" ) == 0 ) |
| name = NULL; |
| |
| ret = mbedtls_x509_crt_verify_with_profile( &crt, &ca, NULL, |
| &compat_profile, |
| name, &flags, |
| verify_print, &vrfy_ctx ); |
| |
| TEST_ASSERT( ret == exp_ret ); |
| TEST_ASSERT( strcmp( vrfy_ctx.buf, exp_vrfy_out ) == 0 ); |
| |
| exit: |
| mbedtls_x509_crt_free( &crt ); |
| mbedtls_x509_crt_free( &ca ); |
| } |
| /* END_CASE */ |
| |
| /* BEGIN_CASE depends_on:MBEDTLS_FS_IO:MBEDTLS_X509_CRT_PARSE_C */ |
| void mbedtls_x509_dn_gets( char * crt_file, char * entity, char * result_str ) |
| { |
| mbedtls_x509_crt crt; |
| char buf[2000]; |
| int res = 0; |
| |
| mbedtls_x509_crt_init( &crt ); |
| memset( buf, 0, 2000 ); |
| |
| TEST_ASSERT( mbedtls_x509_crt_parse_file( &crt, crt_file ) == 0 ); |
| if( strcmp( entity, "subject" ) == 0 ) |
| res = mbedtls_x509_dn_gets( buf, 2000, &crt.subject ); |
| else if( strcmp( entity, "issuer" ) == 0 ) |
| res = mbedtls_x509_dn_gets( buf, 2000, &crt.issuer ); |
| else |
| TEST_ASSERT( "Unknown entity" == 0 ); |
| |
| TEST_ASSERT( res != -1 ); |
| TEST_ASSERT( res != -2 ); |
| |
| TEST_ASSERT( strcmp( buf, result_str ) == 0 ); |
| |
| exit: |
| mbedtls_x509_crt_free( &crt ); |
| } |
| /* END_CASE */ |
| |
| /* BEGIN_CASE depends_on:MBEDTLS_FS_IO:MBEDTLS_X509_CRT_PARSE_C */ |
| void mbedtls_x509_time_is_past( char * crt_file, char * entity, int result ) |
| { |
| mbedtls_x509_crt crt; |
| |
| mbedtls_x509_crt_init( &crt ); |
| |
| TEST_ASSERT( mbedtls_x509_crt_parse_file( &crt, crt_file ) == 0 ); |
| |
| if( strcmp( entity, "valid_from" ) == 0 ) |
| TEST_ASSERT( mbedtls_x509_time_is_past( &crt.valid_from ) == result ); |
| else if( strcmp( entity, "valid_to" ) == 0 ) |
| TEST_ASSERT( mbedtls_x509_time_is_past( &crt.valid_to ) == result ); |
| else |
| TEST_ASSERT( "Unknown entity" == 0 ); |
| |
| exit: |
| mbedtls_x509_crt_free( &crt ); |
| } |
| /* END_CASE */ |
| |
| /* BEGIN_CASE depends_on:MBEDTLS_FS_IO:MBEDTLS_X509_CRT_PARSE_C */ |
| void mbedtls_x509_time_is_future( char * crt_file, char * entity, int result ) |
| { |
| mbedtls_x509_crt crt; |
| |
| mbedtls_x509_crt_init( &crt ); |
| |
| TEST_ASSERT( mbedtls_x509_crt_parse_file( &crt, crt_file ) == 0 ); |
| |
| if( strcmp( entity, "valid_from" ) == 0 ) |
| TEST_ASSERT( mbedtls_x509_time_is_future( &crt.valid_from ) == result ); |
| else if( strcmp( entity, "valid_to" ) == 0 ) |
| TEST_ASSERT( mbedtls_x509_time_is_future( &crt.valid_to ) == result ); |
| else |
| TEST_ASSERT( "Unknown entity" == 0 ); |
| |
| exit: |
| mbedtls_x509_crt_free( &crt ); |
| } |
| /* END_CASE */ |
| |
| /* BEGIN_CASE depends_on:MBEDTLS_X509_CRT_PARSE_C:MBEDTLS_FS_IO */ |
| void x509parse_crt_file( char * crt_file, int result ) |
| { |
| mbedtls_x509_crt crt; |
| |
| mbedtls_x509_crt_init( &crt ); |
| |
| TEST_ASSERT( mbedtls_x509_crt_parse_file( &crt, crt_file ) == result ); |
| |
| exit: |
| mbedtls_x509_crt_free( &crt ); |
| } |
| /* END_CASE */ |
| |
| /* BEGIN_CASE depends_on:MBEDTLS_X509_CRT_PARSE_C */ |
| void x509parse_crt( data_t * buf, char * result_str, int result ) |
| { |
| mbedtls_x509_crt crt; |
| unsigned char output[2000]; |
| int res; |
| |
| mbedtls_x509_crt_init( &crt ); |
| memset( output, 0, 2000 ); |
| |
| TEST_ASSERT( mbedtls_x509_crt_parse_der( &crt, buf->x, buf->len ) == ( result ) ); |
| if( ( result ) == 0 ) |
| { |
| res = mbedtls_x509_crt_info( (char *) output, 2000, "", &crt ); |
| |
| TEST_ASSERT( res != -1 ); |
| TEST_ASSERT( res != -2 ); |
| |
| TEST_ASSERT( strcmp( (char *) output, result_str ) == 0 ); |
| } |
| |
| mbedtls_x509_crt_free( &crt ); |
| mbedtls_x509_crt_init( &crt ); |
| memset( output, 0, 2000 ); |
| |
| TEST_ASSERT( mbedtls_x509_crt_parse_der_nocopy( &crt, buf->x, buf->len ) == ( result ) ); |
| if( ( result ) == 0 ) |
| { |
| res = mbedtls_x509_crt_info( (char *) output, 2000, "", &crt ); |
| |
| TEST_ASSERT( res != -1 ); |
| TEST_ASSERT( res != -2 ); |
| |
| TEST_ASSERT( strcmp( (char *) output, result_str ) == 0 ); |
| } |
| |
| exit: |
| mbedtls_x509_crt_free( &crt ); |
| } |
| /* END_CASE */ |
| |
| /* BEGIN_CASE depends_on:MBEDTLS_X509_CRL_PARSE_C */ |
| void x509parse_crl( data_t * buf, char * result_str, int result ) |
| { |
| mbedtls_x509_crl crl; |
| unsigned char output[2000]; |
| int res; |
| |
| mbedtls_x509_crl_init( &crl ); |
| memset( output, 0, 2000 ); |
| |
| |
| TEST_ASSERT( mbedtls_x509_crl_parse( &crl, buf->x, buf->len ) == ( result ) ); |
| if( ( result ) == 0 ) |
| { |
| res = mbedtls_x509_crl_info( (char *) output, 2000, "", &crl ); |
| |
| TEST_ASSERT( res != -1 ); |
| TEST_ASSERT( res != -2 ); |
| |
| TEST_ASSERT( strcmp( (char *) output, result_str ) == 0 ); |
| } |
| |
| exit: |
| mbedtls_x509_crl_free( &crl ); |
| } |
| /* END_CASE */ |
| |
| /* BEGIN_CASE depends_on:MBEDTLS_X509_CSR_PARSE_C */ |
| void mbedtls_x509_csr_parse( data_t * csr_der, char * ref_out, int ref_ret ) |
| { |
| mbedtls_x509_csr csr; |
| char my_out[1000]; |
| int my_ret; |
| |
| mbedtls_x509_csr_init( &csr ); |
| memset( my_out, 0, sizeof( my_out ) ); |
| |
| my_ret = mbedtls_x509_csr_parse_der( &csr, csr_der->x, csr_der->len ); |
| TEST_ASSERT( my_ret == ref_ret ); |
| |
| if( ref_ret == 0 ) |
| { |
| size_t my_out_len = mbedtls_x509_csr_info( my_out, sizeof( my_out ), "", &csr ); |
| TEST_ASSERT( my_out_len == strlen( ref_out ) ); |
| TEST_ASSERT( strcmp( my_out, ref_out ) == 0 ); |
| } |
| |
| exit: |
| mbedtls_x509_csr_free( &csr ); |
| } |
| /* END_CASE */ |
| |
| /* BEGIN_CASE depends_on:MBEDTLS_FS_IO:MBEDTLS_X509_CRT_PARSE_C */ |
| void mbedtls_x509_crt_parse_path( char * crt_path, int ret, int nb_crt ) |
| { |
| mbedtls_x509_crt chain, *cur; |
| int i; |
| |
| mbedtls_x509_crt_init( &chain ); |
| |
| TEST_ASSERT( mbedtls_x509_crt_parse_path( &chain, crt_path ) == ret ); |
| |
| /* Check how many certs we got */ |
| for( i = 0, cur = &chain; cur != NULL; cur = cur->next ) |
| if( cur->raw.p != NULL ) |
| i++; |
| |
| TEST_ASSERT( i == nb_crt ); |
| |
| exit: |
| mbedtls_x509_crt_free( &chain ); |
| } |
| /* END_CASE */ |
| |
| /* BEGIN_CASE depends_on:MBEDTLS_FS_IO:MBEDTLS_X509_CRT_PARSE_C */ |
| void mbedtls_x509_crt_verify_max( char *ca_file, char *chain_dir, int nb_int, |
| int ret_chk, int flags_chk ) |
| { |
| char file_buf[128]; |
| int ret; |
| uint32_t flags; |
| mbedtls_x509_crt trusted, chain; |
| |
| #if defined(MBEDTLS_USE_PSA_CRYPTO) |
| TEST_ASSERT( psa_crypto_init() == 0 ); |
| #endif |
| |
| /* |
| * We expect chain_dir to contain certificates 00.crt, 01.crt, etc. |
| * with NN.crt signed by NN-1.crt |
| */ |
| |
| mbedtls_x509_crt_init( &trusted ); |
| mbedtls_x509_crt_init( &chain ); |
| |
| /* Load trusted root */ |
| TEST_ASSERT( mbedtls_x509_crt_parse_file( &trusted, ca_file ) == 0 ); |
| |
| /* Load a chain with nb_int intermediates (from 01 to nb_int), |
| * plus one "end-entity" cert (nb_int + 1) */ |
| ret = mbedtls_snprintf( file_buf, sizeof file_buf, "%s/c%02d.pem", chain_dir, |
| nb_int + 1 ); |
| TEST_ASSERT( ret > 0 && (size_t) ret < sizeof file_buf ); |
| TEST_ASSERT( mbedtls_x509_crt_parse_file( &chain, file_buf ) == 0 ); |
| |
| /* Try to verify that chain */ |
| ret = mbedtls_x509_crt_verify( &chain, &trusted, NULL, NULL, &flags, |
| NULL, NULL ); |
| TEST_ASSERT( ret == ret_chk ); |
| TEST_ASSERT( flags == (uint32_t) flags_chk ); |
| |
| exit: |
| mbedtls_x509_crt_free( &chain ); |
| mbedtls_x509_crt_free( &trusted ); |
| } |
| /* END_CASE */ |
| |
| /* BEGIN_CASE depends_on:MBEDTLS_FS_IO:MBEDTLS_X509_CRT_PARSE_C */ |
| void mbedtls_x509_crt_verify_chain( char *chain_paths, char *trusted_ca, |
| int flags_result, int result, |
| char *profile_name, int vrfy_fatal_lvls ) |
| { |
| char* act; |
| uint32_t flags; |
| int res; |
| mbedtls_x509_crt trusted, chain; |
| const mbedtls_x509_crt_profile *profile = NULL; |
| |
| #if defined(MBEDTLS_USE_PSA_CRYPTO) |
| TEST_ASSERT( psa_crypto_init() == 0 ); |
| #endif |
| |
| mbedtls_x509_crt_init( &chain ); |
| mbedtls_x509_crt_init( &trusted ); |
| |
| while( ( act = mystrsep( &chain_paths, " " ) ) != NULL ) |
| TEST_ASSERT( mbedtls_x509_crt_parse_file( &chain, act ) == 0 ); |
| TEST_ASSERT( mbedtls_x509_crt_parse_file( &trusted, trusted_ca ) == 0 ); |
| |
| if( strcmp( profile_name, "" ) == 0 ) |
| profile = &mbedtls_x509_crt_profile_default; |
| else if( strcmp( profile_name, "next" ) == 0 ) |
| profile = &mbedtls_x509_crt_profile_next; |
| else if( strcmp( profile_name, "suiteb" ) == 0 ) |
| profile = &mbedtls_x509_crt_profile_suiteb; |
| else if( strcmp( profile_name, "rsa3072" ) == 0 ) |
| profile = &profile_rsa3072; |
| else if( strcmp( profile_name, "sha512" ) == 0 ) |
| profile = &profile_sha512; |
| |
| res = mbedtls_x509_crt_verify_with_profile( &chain, &trusted, NULL, profile, |
| NULL, &flags, verify_fatal, &vrfy_fatal_lvls ); |
| |
| TEST_ASSERT( res == ( result ) ); |
| TEST_ASSERT( flags == (uint32_t)( flags_result ) ); |
| |
| exit: |
| mbedtls_x509_crt_free( &trusted ); |
| mbedtls_x509_crt_free( &chain ); |
| } |
| /* END_CASE */ |
| |
| /* BEGIN_CASE depends_on:MBEDTLS_X509_USE_C */ |
| void x509_oid_desc( data_t * buf, char * ref_desc ) |
| { |
| mbedtls_x509_buf oid; |
| const char *desc = NULL; |
| int ret; |
| |
| |
| oid.tag = MBEDTLS_ASN1_OID; |
| oid.p = buf->x; |
| oid.len = buf->len; |
| |
| ret = mbedtls_oid_get_extended_key_usage( &oid, &desc ); |
| |
| if( strcmp( ref_desc, "notfound" ) == 0 ) |
| { |
| TEST_ASSERT( ret != 0 ); |
| TEST_ASSERT( desc == NULL ); |
| } |
| else |
| { |
| TEST_ASSERT( ret == 0 ); |
| TEST_ASSERT( desc != NULL ); |
| TEST_ASSERT( strcmp( desc, ref_desc ) == 0 ); |
| } |
| } |
| /* END_CASE */ |
| |
| /* BEGIN_CASE depends_on:MBEDTLS_X509_USE_C */ |
| void x509_oid_numstr( data_t * oid_buf, char * numstr, int blen, int ret ) |
| { |
| mbedtls_x509_buf oid; |
| char num_buf[100]; |
| |
| memset( num_buf, 0x2a, sizeof num_buf ); |
| |
| oid.tag = MBEDTLS_ASN1_OID; |
| oid.p = oid_buf->x; |
| oid.len = oid_buf->len; |
| |
| TEST_ASSERT( (size_t) blen <= sizeof num_buf ); |
| |
| TEST_ASSERT( mbedtls_oid_get_numeric_string( num_buf, blen, &oid ) == ret ); |
| |
| if( ret >= 0 ) |
| { |
| TEST_ASSERT( num_buf[ret] == 0 ); |
| TEST_ASSERT( strcmp( num_buf, numstr ) == 0 ); |
| } |
| } |
| /* END_CASE */ |
| |
| /* BEGIN_CASE depends_on:MBEDTLS_FS_IO:MBEDTLS_X509_CRT_PARSE_C:MBEDTLS_X509_CHECK_KEY_USAGE */ |
| void x509_check_key_usage( char * crt_file, int usage, int ret ) |
| { |
| mbedtls_x509_crt crt; |
| |
| mbedtls_x509_crt_init( &crt ); |
| |
| TEST_ASSERT( mbedtls_x509_crt_parse_file( &crt, crt_file ) == 0 ); |
| |
| TEST_ASSERT( mbedtls_x509_crt_check_key_usage( &crt, usage ) == ret ); |
| |
| exit: |
| mbedtls_x509_crt_free( &crt ); |
| } |
| /* END_CASE */ |
| |
| /* BEGIN_CASE depends_on:MBEDTLS_FS_IO:MBEDTLS_X509_CRT_PARSE_C:MBEDTLS_X509_CHECK_EXTENDED_KEY_USAGE */ |
| void x509_check_extended_key_usage( char * crt_file, data_t * oid, int ret |
| ) |
| { |
| mbedtls_x509_crt crt; |
| |
| mbedtls_x509_crt_init( &crt ); |
| |
| |
| TEST_ASSERT( mbedtls_x509_crt_parse_file( &crt, crt_file ) == 0 ); |
| |
| TEST_ASSERT( mbedtls_x509_crt_check_extended_key_usage( &crt, (const char *)oid->x, oid->len ) == ret ); |
| |
| exit: |
| mbedtls_x509_crt_free( &crt ); |
| } |
| /* END_CASE */ |
| |
| /* BEGIN_CASE depends_on:MBEDTLS_X509_USE_C */ |
| void x509_get_time( int tag, char * time_str, int ret, int year, int mon, |
| int day, int hour, int min, int sec ) |
| { |
| mbedtls_x509_time time; |
| unsigned char buf[21]; |
| unsigned char* start = buf; |
| unsigned char* end = buf; |
| |
| memset( &time, 0x00, sizeof( time ) ); |
| *end = (unsigned char)tag; end++; |
| *end = strlen( time_str ); |
| TEST_ASSERT( *end < 20 ); |
| end++; |
| memcpy( end, time_str, (size_t)*(end - 1) ); |
| end += *(end - 1); |
| |
| TEST_ASSERT( mbedtls_x509_get_time( &start, end, &time ) == ret ); |
| if( ret == 0 ) |
| { |
| TEST_ASSERT( year == time.year ); |
| TEST_ASSERT( mon == time.mon ); |
| TEST_ASSERT( day == time.day ); |
| TEST_ASSERT( hour == time.hour ); |
| TEST_ASSERT( min == time.min ); |
| TEST_ASSERT( sec == time.sec ); |
| } |
| } |
| /* END_CASE */ |
| |
| /* BEGIN_CASE depends_on:MBEDTLS_X509_CRT_PARSE_C:MBEDTLS_X509_RSASSA_PSS_SUPPORT */ |
| void x509_parse_rsassa_pss_params( data_t * hex_params, int params_tag, |
| int ref_msg_md, int ref_mgf_md, |
| int ref_salt_len, int ref_ret ) |
| { |
| int my_ret; |
| mbedtls_x509_buf params; |
| mbedtls_md_type_t my_msg_md, my_mgf_md; |
| int my_salt_len; |
| |
| params.p = hex_params->x; |
| params.len = hex_params->len; |
| params.tag = params_tag; |
| |
| my_ret = mbedtls_x509_get_rsassa_pss_params( ¶ms, &my_msg_md, &my_mgf_md, |
| &my_salt_len ); |
| |
| TEST_ASSERT( my_ret == ref_ret ); |
| |
| if( ref_ret == 0 ) |
| { |
| TEST_ASSERT( my_msg_md == (mbedtls_md_type_t) ref_msg_md ); |
| TEST_ASSERT( my_mgf_md == (mbedtls_md_type_t) ref_mgf_md ); |
| TEST_ASSERT( my_salt_len == ref_salt_len ); |
| } |
| |
| exit: |
| ;; |
| } |
| /* END_CASE */ |
| |
| /* BEGIN_CASE depends_on:MBEDTLS_X509_CRT_PARSE_C:MBEDTLS_SELF_TEST */ |
| void x509_selftest( ) |
| { |
| TEST_ASSERT( mbedtls_x509_self_test( 1 ) == 0 ); |
| } |
| /* END_CASE */ |