1046 lines
31 KiB
C
1046 lines
31 KiB
C
/*
|
|
* X509 buffer writing functionality
|
|
*
|
|
* Copyright (C) 2006-2013, Brainspark B.V.
|
|
*
|
|
* This file is part of PolarSSL (http://www.polarssl.org)
|
|
* Lead Maintainer: Paul Bakker <polarssl_maintainer at polarssl.org>
|
|
*
|
|
* All rights reserved.
|
|
*
|
|
* 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
|
|
* the Free Software Foundation; either version 2 of the License, or
|
|
* (at your option) any later version.
|
|
*
|
|
* This program is distributed in the hope that it will be useful,
|
|
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
* GNU General Public License for more details.
|
|
*
|
|
* You should have received a copy of the GNU General Public License along
|
|
* with this program; if not, write to the Free Software Foundation, Inc.,
|
|
* 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
|
|
*/
|
|
|
|
#include "polarssl/config.h"
|
|
|
|
#if defined(POLARSSL_X509_WRITE_C)
|
|
|
|
#include "polarssl/asn1write.h"
|
|
#include "polarssl/x509write.h"
|
|
#include "polarssl/x509.h"
|
|
#include "polarssl/md.h"
|
|
#include "polarssl/oid.h"
|
|
|
|
#include "polarssl/sha1.h"
|
|
|
|
#if defined(POLARSSL_BASE64_C)
|
|
#include "polarssl/base64.h"
|
|
#endif
|
|
|
|
#if defined(POLARSSL_MEMORY_C)
|
|
#include "polarssl/memory.h"
|
|
#else
|
|
#include <stdlib.h>
|
|
#define polarssl_malloc malloc
|
|
#define polarssl_free free
|
|
#endif
|
|
|
|
static int x509write_string_to_names( asn1_named_data **head, char *name )
|
|
{
|
|
int ret = 0;
|
|
char *s = name, *c = s;
|
|
char *end = s + strlen( s );
|
|
char *oid = NULL;
|
|
int in_tag = 1;
|
|
asn1_named_data *cur;
|
|
|
|
/* Clear existing chain if present */
|
|
asn1_free_named_data_list( head );
|
|
|
|
while( c <= end )
|
|
{
|
|
if( in_tag && *c == '=' )
|
|
{
|
|
if( memcmp( s, "CN", 2 ) == 0 && c - s == 2 )
|
|
oid = OID_AT_CN;
|
|
else if( memcmp( s, "C", 1 ) == 0 && c - s == 1 )
|
|
oid = OID_AT_COUNTRY;
|
|
else if( memcmp( s, "O", 1 ) == 0 && c - s == 1 )
|
|
oid = OID_AT_ORGANIZATION;
|
|
else if( memcmp( s, "L", 1 ) == 0 && c - s == 1 )
|
|
oid = OID_AT_LOCALITY;
|
|
else if( memcmp( s, "R", 1 ) == 0 && c - s == 1 )
|
|
oid = OID_PKCS9_EMAIL;
|
|
else if( memcmp( s, "OU", 2 ) == 0 && c - s == 2 )
|
|
oid = OID_AT_ORG_UNIT;
|
|
else if( memcmp( s, "ST", 2 ) == 0 && c - s == 2 )
|
|
oid = OID_AT_STATE;
|
|
else
|
|
{
|
|
ret = POLARSSL_ERR_X509WRITE_UNKNOWN_OID;
|
|
goto exit;
|
|
}
|
|
|
|
s = c + 1;
|
|
in_tag = 0;
|
|
}
|
|
|
|
if( !in_tag && ( *c == ',' || c == end ) )
|
|
{
|
|
if( ( cur = asn1_store_named_data( head, oid, strlen( oid ),
|
|
(unsigned char *) s,
|
|
c - s ) ) == NULL )
|
|
{
|
|
return( POLARSSL_ERR_X509WRITE_MALLOC_FAILED );
|
|
}
|
|
|
|
while( c < end && *(c + 1) == ' ' )
|
|
c++;
|
|
|
|
s = c + 1;
|
|
in_tag = 1;
|
|
}
|
|
c++;
|
|
}
|
|
|
|
exit:
|
|
|
|
return( ret );
|
|
}
|
|
|
|
/*
|
|
* RSAPublicKey ::= SEQUENCE {
|
|
* modulus INTEGER, -- n
|
|
* publicExponent INTEGER -- e
|
|
* }
|
|
*/
|
|
static int x509_write_rsa_pubkey( unsigned char **p, unsigned char *start,
|
|
rsa_context *rsa )
|
|
{
|
|
int ret;
|
|
size_t len = 0;
|
|
|
|
ASN1_CHK_ADD( len, asn1_write_mpi( p, start, &rsa->E ) );
|
|
ASN1_CHK_ADD( len, asn1_write_mpi( p, start, &rsa->N ) );
|
|
|
|
ASN1_CHK_ADD( len, asn1_write_len( p, start, len ) );
|
|
ASN1_CHK_ADD( len, asn1_write_tag( p, start, ASN1_CONSTRUCTED | ASN1_SEQUENCE ) );
|
|
|
|
return( len );
|
|
}
|
|
|
|
void x509write_csr_init( x509write_csr *ctx )
|
|
{
|
|
memset( ctx, 0, sizeof(x509write_csr) );
|
|
}
|
|
|
|
void x509write_csr_free( x509write_csr *ctx )
|
|
{
|
|
asn1_free_named_data_list( &ctx->subject );
|
|
asn1_free_named_data_list( &ctx->extensions );
|
|
|
|
memset( ctx, 0, sizeof(x509write_csr) );
|
|
}
|
|
|
|
void x509write_csr_set_md_alg( x509write_csr *ctx, md_type_t md_alg )
|
|
{
|
|
ctx->md_alg = md_alg;
|
|
}
|
|
|
|
void x509write_csr_set_rsa_key( x509write_csr *ctx, rsa_context *rsa )
|
|
{
|
|
ctx->rsa = rsa;
|
|
}
|
|
|
|
int x509write_csr_set_subject_name( x509write_csr *ctx, char *subject_name )
|
|
{
|
|
return x509write_string_to_names( &ctx->subject, subject_name );
|
|
}
|
|
|
|
/* The first byte of the value in the asn1_named_data structure is reserved
|
|
* to store the critical boolean for us
|
|
*/
|
|
static int x509_set_extension( asn1_named_data **head,
|
|
const char *oid, size_t oid_len,
|
|
int critical,
|
|
const unsigned char *val, size_t val_len )
|
|
{
|
|
asn1_named_data *cur;
|
|
|
|
if( ( cur = asn1_store_named_data( head, oid, oid_len,
|
|
NULL, val_len + 1 ) ) == NULL )
|
|
{
|
|
return( POLARSSL_ERR_X509WRITE_MALLOC_FAILED );
|
|
}
|
|
|
|
cur->val.p[0] = critical;
|
|
memcpy( cur->val.p + 1, val, val_len );
|
|
|
|
return( 0 );
|
|
}
|
|
|
|
int x509write_csr_set_extension( x509write_csr *ctx,
|
|
const char *oid, size_t oid_len,
|
|
const unsigned char *val, size_t val_len )
|
|
{
|
|
return x509_set_extension( &ctx->extensions, oid, oid_len,
|
|
0, val, val_len );
|
|
}
|
|
|
|
int x509write_csr_set_key_usage( x509write_csr *ctx, unsigned char key_usage )
|
|
{
|
|
unsigned char buf[4];
|
|
unsigned char *c;
|
|
int ret;
|
|
|
|
c = buf + 4;
|
|
|
|
if( ( ret = asn1_write_bitstring( &c, buf, &key_usage, 7 ) ) != 4 )
|
|
return( ret );
|
|
|
|
ret = x509write_csr_set_extension( ctx, OID_KEY_USAGE,
|
|
OID_SIZE( OID_KEY_USAGE ),
|
|
buf, 4 );
|
|
if( ret != 0 )
|
|
return( ret );
|
|
|
|
return( 0 );
|
|
}
|
|
|
|
int x509write_csr_set_ns_cert_type( x509write_csr *ctx,
|
|
unsigned char ns_cert_type )
|
|
{
|
|
unsigned char buf[4];
|
|
unsigned char *c;
|
|
int ret;
|
|
|
|
c = buf + 4;
|
|
|
|
if( ( ret = asn1_write_bitstring( &c, buf, &ns_cert_type, 8 ) ) != 4 )
|
|
return( ret );
|
|
|
|
ret = x509write_csr_set_extension( ctx, OID_NS_CERT_TYPE,
|
|
OID_SIZE( OID_NS_CERT_TYPE ),
|
|
buf, 4 );
|
|
if( ret != 0 )
|
|
return( ret );
|
|
|
|
return( 0 );
|
|
}
|
|
|
|
void x509write_crt_init( x509write_cert *ctx )
|
|
{
|
|
memset( ctx, 0, sizeof(x509write_cert) );
|
|
|
|
mpi_init( &ctx->serial );
|
|
ctx->version = X509_CRT_VERSION_3;
|
|
}
|
|
|
|
void x509write_crt_free( x509write_cert *ctx )
|
|
{
|
|
mpi_free( &ctx->serial );
|
|
|
|
asn1_free_named_data_list( &ctx->subject );
|
|
asn1_free_named_data_list( &ctx->issuer );
|
|
asn1_free_named_data_list( &ctx->extensions );
|
|
|
|
memset( ctx, 0, sizeof(x509write_csr) );
|
|
}
|
|
|
|
void x509write_crt_set_md_alg( x509write_cert *ctx, md_type_t md_alg )
|
|
{
|
|
ctx->md_alg = md_alg;
|
|
}
|
|
|
|
void x509write_crt_set_subject_key( x509write_cert *ctx, rsa_context *rsa )
|
|
{
|
|
ctx->subject_key = rsa;
|
|
}
|
|
|
|
void x509write_crt_set_issuer_key( x509write_cert *ctx, rsa_context *rsa )
|
|
{
|
|
ctx->issuer_key = rsa;
|
|
}
|
|
|
|
int x509write_crt_set_subject_name( x509write_cert *ctx, char *subject_name )
|
|
{
|
|
return x509write_string_to_names( &ctx->subject, subject_name );
|
|
}
|
|
|
|
int x509write_crt_set_issuer_name( x509write_cert *ctx, char *issuer_name )
|
|
{
|
|
return x509write_string_to_names( &ctx->issuer, issuer_name );
|
|
}
|
|
|
|
int x509write_crt_set_serial( x509write_cert *ctx, const mpi *serial )
|
|
{
|
|
int ret;
|
|
|
|
if( ( ret = mpi_copy( &ctx->serial, serial ) ) != 0 )
|
|
return( ret );
|
|
|
|
return( 0 );
|
|
}
|
|
|
|
int x509write_crt_set_validity( x509write_cert *ctx, char *not_before,
|
|
char *not_after )
|
|
{
|
|
if( strlen(not_before) != X509_RFC5280_UTC_TIME_LEN - 1 ||
|
|
strlen(not_after) != X509_RFC5280_UTC_TIME_LEN - 1 )
|
|
{
|
|
return( POLARSSL_ERR_X509WRITE_BAD_INPUT_DATA );
|
|
}
|
|
strncpy( ctx->not_before, not_before, X509_RFC5280_UTC_TIME_LEN );
|
|
strncpy( ctx->not_after , not_after , X509_RFC5280_UTC_TIME_LEN );
|
|
ctx->not_before[X509_RFC5280_UTC_TIME_LEN - 1] = 'Z';
|
|
ctx->not_after[X509_RFC5280_UTC_TIME_LEN - 1] = 'Z';
|
|
|
|
return( 0 );
|
|
}
|
|
|
|
int x509write_crt_set_extension( x509write_cert *ctx,
|
|
const char *oid, size_t oid_len,
|
|
int critical,
|
|
const unsigned char *val, size_t val_len )
|
|
{
|
|
return x509_set_extension( &ctx->extensions, oid, oid_len,
|
|
critical, val, val_len );
|
|
}
|
|
|
|
int x509write_crt_set_basic_constraints( x509write_cert *ctx,
|
|
int is_ca, int max_pathlen )
|
|
{
|
|
int ret;
|
|
unsigned char buf[9];
|
|
unsigned char *c = buf + sizeof(buf);
|
|
size_t len = 0;
|
|
|
|
memset( buf, 0, sizeof(buf) );
|
|
|
|
if( is_ca && max_pathlen > 127 )
|
|
return( POLARSSL_ERR_X509WRITE_BAD_INPUT_DATA );
|
|
|
|
if( is_ca )
|
|
{
|
|
if( max_pathlen >= 0 )
|
|
{
|
|
ASN1_CHK_ADD( len, asn1_write_int( &c, buf, max_pathlen ) );
|
|
}
|
|
ASN1_CHK_ADD( len, asn1_write_bool( &c, buf, 1 ) );
|
|
}
|
|
|
|
ASN1_CHK_ADD( len, asn1_write_len( &c, buf, len ) );
|
|
ASN1_CHK_ADD( len, asn1_write_tag( &c, buf, ASN1_CONSTRUCTED | ASN1_SEQUENCE ) );
|
|
|
|
return x509write_crt_set_extension( ctx, OID_BASIC_CONSTRAINTS,
|
|
OID_SIZE( OID_BASIC_CONSTRAINTS ),
|
|
0, buf + sizeof(buf) - len, len );
|
|
}
|
|
|
|
int x509write_crt_set_subject_key_identifier( x509write_cert *ctx )
|
|
{
|
|
int ret;
|
|
unsigned char buf[POLARSSL_MPI_MAX_SIZE * 2 + 20]; /* tag, length + 2xMPI */
|
|
unsigned char *c = buf + sizeof(buf);
|
|
size_t len = 0;
|
|
|
|
memset( buf, 0, sizeof(buf));
|
|
ASN1_CHK_ADD( len, x509_write_rsa_pubkey( &c, buf, ctx->subject_key ) );
|
|
|
|
sha1( buf + sizeof(buf) - len, len, buf + sizeof(buf) - 20 );
|
|
c = buf + sizeof(buf) - 20;
|
|
len = 20;
|
|
|
|
ASN1_CHK_ADD( len, asn1_write_len( &c, buf, len ) );
|
|
ASN1_CHK_ADD( len, asn1_write_tag( &c, buf, ASN1_OCTET_STRING ) );
|
|
|
|
return x509write_crt_set_extension( ctx, OID_SUBJECT_KEY_IDENTIFIER,
|
|
OID_SIZE( OID_SUBJECT_KEY_IDENTIFIER ),
|
|
0, buf + sizeof(buf) - len, len );
|
|
}
|
|
|
|
int x509write_crt_set_authority_key_identifier( x509write_cert *ctx )
|
|
{
|
|
int ret;
|
|
unsigned char buf[POLARSSL_MPI_MAX_SIZE * 2 + 20]; /* tag, length + 2xMPI */
|
|
unsigned char *c = buf + sizeof(buf);
|
|
size_t len = 0;
|
|
|
|
memset( buf, 0, sizeof(buf));
|
|
ASN1_CHK_ADD( len, x509_write_rsa_pubkey( &c, buf, ctx->issuer_key ) );
|
|
|
|
sha1( buf + sizeof(buf) - len, len, buf + sizeof(buf) - 20 );
|
|
c = buf + sizeof(buf) - 20;
|
|
len = 20;
|
|
|
|
ASN1_CHK_ADD( len, asn1_write_len( &c, buf, len ) );
|
|
ASN1_CHK_ADD( len, asn1_write_tag( &c, buf, ASN1_CONTEXT_SPECIFIC | 0 ) );
|
|
|
|
ASN1_CHK_ADD( len, asn1_write_len( &c, buf, len ) );
|
|
ASN1_CHK_ADD( len, asn1_write_tag( &c, buf, ASN1_CONSTRUCTED | ASN1_SEQUENCE ) );
|
|
|
|
return x509write_crt_set_extension( ctx, OID_AUTHORITY_KEY_IDENTIFIER,
|
|
OID_SIZE( OID_AUTHORITY_KEY_IDENTIFIER ),
|
|
0, buf + sizeof(buf) - len, len );
|
|
}
|
|
|
|
int x509write_crt_set_key_usage( x509write_cert *ctx, unsigned char key_usage )
|
|
{
|
|
unsigned char buf[4];
|
|
unsigned char *c;
|
|
int ret;
|
|
|
|
c = buf + 4;
|
|
|
|
if( ( ret = asn1_write_bitstring( &c, buf, &key_usage, 7 ) ) != 4 )
|
|
return( ret );
|
|
|
|
ret = x509write_crt_set_extension( ctx, OID_KEY_USAGE,
|
|
OID_SIZE( OID_KEY_USAGE ),
|
|
1, buf, 4 );
|
|
if( ret != 0 )
|
|
return( ret );
|
|
|
|
return( 0 );
|
|
}
|
|
|
|
int x509write_crt_set_ns_cert_type( x509write_cert *ctx,
|
|
unsigned char ns_cert_type )
|
|
{
|
|
unsigned char buf[4];
|
|
unsigned char *c;
|
|
int ret;
|
|
|
|
c = buf + 4;
|
|
|
|
if( ( ret = asn1_write_bitstring( &c, buf, &ns_cert_type, 8 ) ) != 4 )
|
|
return( ret );
|
|
|
|
ret = x509write_crt_set_extension( ctx, OID_NS_CERT_TYPE,
|
|
OID_SIZE( OID_NS_CERT_TYPE ),
|
|
0, buf, 4 );
|
|
if( ret != 0 )
|
|
return( ret );
|
|
|
|
return( 0 );
|
|
}
|
|
|
|
int x509write_pubkey_der( rsa_context *rsa, unsigned char *buf, size_t size )
|
|
{
|
|
int ret;
|
|
unsigned char *c;
|
|
size_t len = 0;
|
|
|
|
c = buf + size - 1;
|
|
|
|
ASN1_CHK_ADD( len, x509_write_rsa_pubkey( &c, buf, rsa ) );
|
|
|
|
if( c - buf < 1 )
|
|
return( POLARSSL_ERR_ASN1_BUF_TOO_SMALL );
|
|
|
|
/*
|
|
* SubjectPublicKeyInfo ::= SEQUENCE {
|
|
* algorithm AlgorithmIdentifier,
|
|
* subjectPublicKey BIT STRING }
|
|
*/
|
|
*--c = 0;
|
|
len += 1;
|
|
|
|
ASN1_CHK_ADD( len, asn1_write_len( &c, buf, len ) );
|
|
ASN1_CHK_ADD( len, asn1_write_tag( &c, buf, ASN1_BIT_STRING ) );
|
|
|
|
ASN1_CHK_ADD( len, asn1_write_algorithm_identifier( &c, buf,
|
|
OID_PKCS1_RSA, OID_SIZE( OID_PKCS1_RSA ) ) );
|
|
|
|
ASN1_CHK_ADD( len, asn1_write_len( &c, buf, len ) );
|
|
ASN1_CHK_ADD( len, asn1_write_tag( &c, buf, ASN1_CONSTRUCTED | ASN1_SEQUENCE ) );
|
|
|
|
return( len );
|
|
}
|
|
|
|
int x509write_key_der( rsa_context *rsa, unsigned char *buf, size_t size )
|
|
{
|
|
int ret;
|
|
unsigned char *c;
|
|
size_t len = 0;
|
|
|
|
c = buf + size - 1;
|
|
|
|
ASN1_CHK_ADD( len, asn1_write_mpi( &c, buf, &rsa->QP ) );
|
|
ASN1_CHK_ADD( len, asn1_write_mpi( &c, buf, &rsa->DQ ) );
|
|
ASN1_CHK_ADD( len, asn1_write_mpi( &c, buf, &rsa->DP ) );
|
|
ASN1_CHK_ADD( len, asn1_write_mpi( &c, buf, &rsa->Q ) );
|
|
ASN1_CHK_ADD( len, asn1_write_mpi( &c, buf, &rsa->P ) );
|
|
ASN1_CHK_ADD( len, asn1_write_mpi( &c, buf, &rsa->D ) );
|
|
ASN1_CHK_ADD( len, asn1_write_mpi( &c, buf, &rsa->E ) );
|
|
ASN1_CHK_ADD( len, asn1_write_mpi( &c, buf, &rsa->N ) );
|
|
ASN1_CHK_ADD( len, asn1_write_int( &c, buf, 0 ) );
|
|
|
|
ASN1_CHK_ADD( len, asn1_write_len( &c, buf, len ) );
|
|
ASN1_CHK_ADD( len, asn1_write_tag( &c, buf, ASN1_CONSTRUCTED | ASN1_SEQUENCE ) );
|
|
|
|
// TODO: Make NON RSA Specific variant later on
|
|
/* *--c = 0;
|
|
len += 1;
|
|
|
|
len += asn1_write_len( &c, len);
|
|
len += asn1_write_tag( &c, ASN1_BIT_STRING );
|
|
|
|
len += asn1_write_oid( &c, OID_PKCS1_RSA );
|
|
|
|
len += asn1_write_int( &c, 0 );
|
|
|
|
len += asn1_write_len( &c, len);
|
|
len += asn1_write_tag( &c, ASN1_CONSTRUCTED | ASN1_SEQUENCE );*/
|
|
|
|
/* for(i = 0; i < len; ++i)
|
|
{
|
|
if (i % 16 == 0 ) printf("\n");
|
|
printf("%02x ", c[i]);
|
|
}
|
|
printf("\n");*/
|
|
|
|
return( len );
|
|
}
|
|
|
|
/*
|
|
* RelativeDistinguishedName ::=
|
|
* SET OF AttributeTypeAndValue
|
|
*
|
|
* AttributeTypeAndValue ::= SEQUENCE {
|
|
* type AttributeType,
|
|
* value AttributeValue }
|
|
*
|
|
* AttributeType ::= OBJECT IDENTIFIER
|
|
*
|
|
* AttributeValue ::= ANY DEFINED BY AttributeType
|
|
*/
|
|
static int x509_write_name( unsigned char **p, unsigned char *start,
|
|
const char *oid, size_t oid_len,
|
|
const unsigned char *name, size_t name_len )
|
|
{
|
|
int ret;
|
|
size_t len = 0;
|
|
|
|
// Write PrintableString for all except OID_PKCS9_EMAIL
|
|
//
|
|
if( OID_SIZE( OID_PKCS9_EMAIL ) == oid_len &&
|
|
memcmp( oid, OID_PKCS9_EMAIL, oid_len ) == 0 )
|
|
{
|
|
ASN1_CHK_ADD( len, asn1_write_ia5_string( p, start,
|
|
(const char *) name,
|
|
name_len ) );
|
|
}
|
|
else
|
|
{
|
|
ASN1_CHK_ADD( len, asn1_write_printable_string( p, start,
|
|
(const char *) name,
|
|
name_len ) );
|
|
}
|
|
|
|
// Write OID
|
|
//
|
|
ASN1_CHK_ADD( len, asn1_write_oid( p, start, oid, oid_len ) );
|
|
|
|
ASN1_CHK_ADD( len, asn1_write_len( p, start, len ) );
|
|
ASN1_CHK_ADD( len, asn1_write_tag( p, start, ASN1_CONSTRUCTED | ASN1_SEQUENCE ) );
|
|
|
|
ASN1_CHK_ADD( len, asn1_write_len( p, start, len ) );
|
|
ASN1_CHK_ADD( len, asn1_write_tag( p, start, ASN1_CONSTRUCTED | ASN1_SET ) );
|
|
|
|
return( len );
|
|
}
|
|
|
|
static int x509_write_names( unsigned char **p, unsigned char *start,
|
|
asn1_named_data *first )
|
|
{
|
|
int ret;
|
|
size_t len = 0;
|
|
asn1_named_data *cur = first;
|
|
|
|
while( cur != NULL )
|
|
{
|
|
ASN1_CHK_ADD( len, x509_write_name( p, start, (char *) cur->oid.p,
|
|
cur->oid.len,
|
|
cur->val.p, cur->val.len ) );
|
|
cur = cur->next;
|
|
}
|
|
|
|
ASN1_CHK_ADD( len, asn1_write_len( p, start, len ) );
|
|
ASN1_CHK_ADD( len, asn1_write_tag( p, start, ASN1_CONSTRUCTED | ASN1_SEQUENCE ) );
|
|
|
|
return( len );
|
|
}
|
|
|
|
static int x509_write_sig( unsigned char **p, unsigned char *start,
|
|
const char *oid, size_t oid_len,
|
|
unsigned char *sig, size_t size )
|
|
{
|
|
int ret;
|
|
size_t len = 0;
|
|
|
|
if( *p - start < (int) size + 1 )
|
|
return( POLARSSL_ERR_ASN1_BUF_TOO_SMALL );
|
|
|
|
len = size;
|
|
(*p) -= len;
|
|
memcpy( *p, sig, len );
|
|
|
|
*--(*p) = 0;
|
|
len += 1;
|
|
|
|
ASN1_CHK_ADD( len, asn1_write_len( p, start, len ) );
|
|
ASN1_CHK_ADD( len, asn1_write_tag( p, start, ASN1_BIT_STRING ) );
|
|
|
|
// Write OID
|
|
//
|
|
ASN1_CHK_ADD( len, asn1_write_algorithm_identifier( p, start, oid,
|
|
oid_len ) );
|
|
|
|
return( len );
|
|
}
|
|
|
|
static int x509_write_time( unsigned char **p, unsigned char *start,
|
|
const char *time, size_t size )
|
|
{
|
|
int ret;
|
|
size_t len = 0;
|
|
|
|
/*
|
|
* write ASN1_UTC_TIME if year < 2050 (2 bytes shorter)
|
|
*/
|
|
if( time[0] == '2' && time[1] == '0' && time [2] < '5' )
|
|
{
|
|
ASN1_CHK_ADD( len, asn1_write_raw_buffer( p, start,
|
|
(const unsigned char *) time + 2,
|
|
size - 2 ) );
|
|
ASN1_CHK_ADD( len, asn1_write_len( p, start, len ) );
|
|
ASN1_CHK_ADD( len, asn1_write_tag( p, start, ASN1_UTC_TIME ) );
|
|
}
|
|
else
|
|
{
|
|
ASN1_CHK_ADD( len, asn1_write_raw_buffer( p, start,
|
|
(const unsigned char *) time,
|
|
size ) );
|
|
ASN1_CHK_ADD( len, asn1_write_len( p, start, len ) );
|
|
ASN1_CHK_ADD( len, asn1_write_tag( p, start, ASN1_GENERALIZED_TIME ) );
|
|
}
|
|
|
|
return( len );
|
|
}
|
|
|
|
static int x509_write_extension( unsigned char **p, unsigned char *start,
|
|
asn1_named_data *ext )
|
|
{
|
|
int ret;
|
|
size_t len = 0;
|
|
|
|
ASN1_CHK_ADD( len, asn1_write_raw_buffer( p, start, ext->val.p + 1,
|
|
ext->val.len - 1 ) );
|
|
ASN1_CHK_ADD( len, asn1_write_len( p, start, ext->val.len - 1 ) );
|
|
ASN1_CHK_ADD( len, asn1_write_tag( p, start, ASN1_OCTET_STRING ) );
|
|
|
|
if( ext->val.p[0] != 0 )
|
|
{
|
|
ASN1_CHK_ADD( len, asn1_write_bool( p, start, 1 ) );
|
|
}
|
|
|
|
ASN1_CHK_ADD( len, asn1_write_raw_buffer( p, start, ext->oid.p,
|
|
ext->oid.len ) );
|
|
ASN1_CHK_ADD( len, asn1_write_len( p, start, ext->oid.len ) );
|
|
ASN1_CHK_ADD( len, asn1_write_tag( p, start, ASN1_OID ) );
|
|
|
|
ASN1_CHK_ADD( len, asn1_write_len( p, start, len ) );
|
|
ASN1_CHK_ADD( len, asn1_write_tag( p, start, ASN1_CONSTRUCTED | ASN1_SEQUENCE ) );
|
|
|
|
return( len );
|
|
}
|
|
|
|
/*
|
|
* Extension ::= SEQUENCE {
|
|
* extnID OBJECT IDENTIFIER,
|
|
* critical BOOLEAN DEFAULT FALSE,
|
|
* extnValue OCTET STRING
|
|
* -- contains the DER encoding of an ASN.1 value
|
|
* -- corresponding to the extension type identified
|
|
* -- by extnID
|
|
* }
|
|
*/
|
|
static int x509_write_extensions( unsigned char **p, unsigned char *start,
|
|
asn1_named_data *first )
|
|
{
|
|
int ret;
|
|
size_t len = 0;
|
|
asn1_named_data *cur_ext = first;
|
|
|
|
while( cur_ext != NULL )
|
|
{
|
|
ASN1_CHK_ADD( len, x509_write_extension( p, start, cur_ext ) );
|
|
cur_ext = cur_ext->next;
|
|
}
|
|
|
|
return( len );
|
|
}
|
|
|
|
int x509write_csr_der( x509write_csr *ctx, unsigned char *buf, size_t size )
|
|
{
|
|
int ret;
|
|
const char *sig_oid;
|
|
size_t sig_oid_len = 0;
|
|
unsigned char *c, *c2;
|
|
unsigned char hash[64];
|
|
unsigned char sig[POLARSSL_MPI_MAX_SIZE];
|
|
unsigned char tmp_buf[2048];
|
|
size_t pub_len = 0, sig_len = 0;
|
|
size_t len = 0;
|
|
|
|
c = tmp_buf + 2048 - 1;
|
|
|
|
ASN1_CHK_ADD( len, x509_write_extensions( &c, tmp_buf, ctx->extensions ) );
|
|
|
|
if( len )
|
|
{
|
|
ASN1_CHK_ADD( len, asn1_write_len( &c, tmp_buf, len ) );
|
|
ASN1_CHK_ADD( len, asn1_write_tag( &c, tmp_buf, ASN1_CONSTRUCTED | ASN1_SEQUENCE ) );
|
|
|
|
ASN1_CHK_ADD( len, asn1_write_len( &c, tmp_buf, len ) );
|
|
ASN1_CHK_ADD( len, asn1_write_tag( &c, tmp_buf, ASN1_CONSTRUCTED | ASN1_SET ) );
|
|
|
|
ASN1_CHK_ADD( len, asn1_write_oid( &c, tmp_buf, OID_PKCS9_CSR_EXT_REQ,
|
|
OID_SIZE( OID_PKCS9_CSR_EXT_REQ ) ) );
|
|
|
|
ASN1_CHK_ADD( len, asn1_write_len( &c, tmp_buf, len ) );
|
|
ASN1_CHK_ADD( len, asn1_write_tag( &c, tmp_buf, ASN1_CONSTRUCTED | ASN1_SEQUENCE ) );
|
|
}
|
|
|
|
ASN1_CHK_ADD( len, asn1_write_len( &c, tmp_buf, len ) );
|
|
ASN1_CHK_ADD( len, asn1_write_tag( &c, tmp_buf, ASN1_CONSTRUCTED | ASN1_CONTEXT_SPECIFIC ) );
|
|
|
|
ASN1_CHK_ADD( pub_len, asn1_write_mpi( &c, tmp_buf, &ctx->rsa->E ) );
|
|
ASN1_CHK_ADD( pub_len, asn1_write_mpi( &c, tmp_buf, &ctx->rsa->N ) );
|
|
|
|
ASN1_CHK_ADD( pub_len, asn1_write_len( &c, tmp_buf, pub_len ) );
|
|
ASN1_CHK_ADD( pub_len, asn1_write_tag( &c, tmp_buf, ASN1_CONSTRUCTED | ASN1_SEQUENCE ) );
|
|
|
|
if( c - tmp_buf < 1 )
|
|
return( POLARSSL_ERR_ASN1_BUF_TOO_SMALL );
|
|
|
|
/*
|
|
* AlgorithmIdentifier ::= SEQUENCE {
|
|
* algorithm OBJECT IDENTIFIER,
|
|
* parameters ANY DEFINED BY algorithm OPTIONAL }
|
|
*/
|
|
*--c = 0;
|
|
pub_len += 1;
|
|
|
|
ASN1_CHK_ADD( pub_len, asn1_write_len( &c, tmp_buf, pub_len ) );
|
|
ASN1_CHK_ADD( pub_len, asn1_write_tag( &c, tmp_buf, ASN1_BIT_STRING ) );
|
|
|
|
ASN1_CHK_ADD( pub_len, asn1_write_algorithm_identifier( &c, tmp_buf,
|
|
OID_PKCS1_RSA, OID_SIZE( OID_PKCS1_RSA ) ) );
|
|
|
|
len += pub_len;
|
|
ASN1_CHK_ADD( len, asn1_write_len( &c, tmp_buf, pub_len ) );
|
|
ASN1_CHK_ADD( len, asn1_write_tag( &c, tmp_buf, ASN1_CONSTRUCTED | ASN1_SEQUENCE ) );
|
|
|
|
/*
|
|
* Subject ::= Name
|
|
*/
|
|
ASN1_CHK_ADD( len, x509_write_names( &c, tmp_buf, ctx->subject ) );
|
|
|
|
/*
|
|
* Version ::= INTEGER { v1(0), v2(1), v3(2) }
|
|
*/
|
|
ASN1_CHK_ADD( len, asn1_write_int( &c, tmp_buf, 0 ) );
|
|
|
|
ASN1_CHK_ADD( len, asn1_write_len( &c, tmp_buf, len ) );
|
|
ASN1_CHK_ADD( len, asn1_write_tag( &c, tmp_buf, ASN1_CONSTRUCTED | ASN1_SEQUENCE ) );
|
|
|
|
md( md_info_from_type( ctx->md_alg ), c, len, hash );
|
|
|
|
rsa_pkcs1_sign( ctx->rsa, NULL, NULL, RSA_PRIVATE, ctx->md_alg, 0, hash, sig );
|
|
|
|
// Generate correct OID
|
|
//
|
|
ret = oid_get_oid_by_sig_alg( POLARSSL_PK_RSA, ctx->md_alg, &sig_oid,
|
|
&sig_oid_len );
|
|
|
|
c2 = buf + size - 1;
|
|
ASN1_CHK_ADD( sig_len, x509_write_sig( &c2, buf, sig_oid, sig_oid_len,
|
|
sig, ctx->rsa->len ) );
|
|
|
|
c2 -= len;
|
|
memcpy( c2, c, len );
|
|
|
|
len += sig_len;
|
|
ASN1_CHK_ADD( len, asn1_write_len( &c2, buf, len ) );
|
|
ASN1_CHK_ADD( len, asn1_write_tag( &c2, buf, ASN1_CONSTRUCTED | ASN1_SEQUENCE ) );
|
|
|
|
return( len );
|
|
}
|
|
|
|
int x509write_crt_der( x509write_cert *ctx, unsigned char *buf, size_t size )
|
|
{
|
|
int ret;
|
|
const char *sig_oid;
|
|
size_t sig_oid_len = 0;
|
|
unsigned char *c, *c2;
|
|
unsigned char hash[64];
|
|
unsigned char sig[POLARSSL_MPI_MAX_SIZE];
|
|
unsigned char tmp_buf[2048];
|
|
size_t sub_len = 0, pub_len = 0, sig_len = 0;
|
|
size_t len = 0;
|
|
|
|
c = tmp_buf + 2048 - 1;
|
|
|
|
// Generate correct OID
|
|
//
|
|
ret = oid_get_oid_by_sig_alg( POLARSSL_PK_RSA, ctx->md_alg, &sig_oid,
|
|
&sig_oid_len );
|
|
if( ret != 0 )
|
|
return( ret );
|
|
|
|
/*
|
|
* Extensions ::= SEQUENCE SIZE (1..MAX) OF Extension
|
|
*/
|
|
ASN1_CHK_ADD( len, x509_write_extensions( &c, tmp_buf, ctx->extensions ) );
|
|
ASN1_CHK_ADD( len, asn1_write_len( &c, tmp_buf, len ) );
|
|
ASN1_CHK_ADD( len, asn1_write_tag( &c, tmp_buf, ASN1_CONSTRUCTED | ASN1_SEQUENCE ) );
|
|
ASN1_CHK_ADD( len, asn1_write_len( &c, tmp_buf, len ) );
|
|
ASN1_CHK_ADD( len, asn1_write_tag( &c, tmp_buf, ASN1_CONTEXT_SPECIFIC | ASN1_CONSTRUCTED | 3 ) );
|
|
|
|
/*
|
|
* SubjectPublicKeyInfo ::= SEQUENCE {
|
|
* algorithm AlgorithmIdentifier,
|
|
* subjectPublicKey BIT STRING }
|
|
*/
|
|
ASN1_CHK_ADD( pub_len, asn1_write_mpi( &c, tmp_buf, &ctx->subject_key->E ) );
|
|
ASN1_CHK_ADD( pub_len, asn1_write_mpi( &c, tmp_buf, &ctx->subject_key->N ) );
|
|
|
|
ASN1_CHK_ADD( pub_len, asn1_write_len( &c, tmp_buf, pub_len ) );
|
|
ASN1_CHK_ADD( pub_len, asn1_write_tag( &c, tmp_buf, ASN1_CONSTRUCTED | ASN1_SEQUENCE ) );
|
|
|
|
if( c - tmp_buf < 1 )
|
|
return( POLARSSL_ERR_ASN1_BUF_TOO_SMALL );
|
|
|
|
*--c = 0;
|
|
pub_len += 1;
|
|
|
|
ASN1_CHK_ADD( pub_len, asn1_write_len( &c, tmp_buf, pub_len ) );
|
|
ASN1_CHK_ADD( pub_len, asn1_write_tag( &c, tmp_buf, ASN1_BIT_STRING ) );
|
|
|
|
ASN1_CHK_ADD( pub_len, asn1_write_algorithm_identifier( &c, tmp_buf,
|
|
OID_PKCS1_RSA, OID_SIZE( OID_PKCS1_RSA ) ) );
|
|
|
|
len += pub_len;
|
|
ASN1_CHK_ADD( len, asn1_write_len( &c, tmp_buf, pub_len ) );
|
|
ASN1_CHK_ADD( len, asn1_write_tag( &c, tmp_buf, ASN1_CONSTRUCTED | ASN1_SEQUENCE ) );
|
|
|
|
/*
|
|
* Subject ::= Name
|
|
*/
|
|
ASN1_CHK_ADD( len, x509_write_names( &c, tmp_buf, ctx->subject ) );
|
|
|
|
/*
|
|
* Validity ::= SEQUENCE {
|
|
* notBefore Time,
|
|
* notAfter Time }
|
|
*/
|
|
sub_len = 0;
|
|
|
|
ASN1_CHK_ADD( sub_len, x509_write_time( &c, tmp_buf, ctx->not_after,
|
|
X509_RFC5280_UTC_TIME_LEN ) );
|
|
|
|
ASN1_CHK_ADD( sub_len, x509_write_time( &c, tmp_buf, ctx->not_before,
|
|
X509_RFC5280_UTC_TIME_LEN ) );
|
|
|
|
len += sub_len;
|
|
ASN1_CHK_ADD( len, asn1_write_len( &c, tmp_buf, sub_len ) );
|
|
ASN1_CHK_ADD( len, asn1_write_tag( &c, tmp_buf, ASN1_CONSTRUCTED | ASN1_SEQUENCE ) );
|
|
|
|
/*
|
|
* Issuer ::= Name
|
|
*/
|
|
ASN1_CHK_ADD( len, x509_write_names( &c, tmp_buf, ctx->issuer ) );
|
|
|
|
/*
|
|
* Signature ::= AlgorithmIdentifier
|
|
*/
|
|
ASN1_CHK_ADD( len, asn1_write_algorithm_identifier( &c, tmp_buf,
|
|
sig_oid, strlen( sig_oid ) ) );
|
|
|
|
/*
|
|
* Serial ::= INTEGER
|
|
*/
|
|
ASN1_CHK_ADD( len, asn1_write_mpi( &c, tmp_buf, &ctx->serial ) );
|
|
|
|
/*
|
|
* Version ::= INTEGER { v1(0), v2(1), v3(2) }
|
|
*/
|
|
sub_len = 0;
|
|
ASN1_CHK_ADD( sub_len, asn1_write_int( &c, tmp_buf, ctx->version ) );
|
|
len += sub_len;
|
|
ASN1_CHK_ADD( len, asn1_write_len( &c, tmp_buf, sub_len ) );
|
|
ASN1_CHK_ADD( len, asn1_write_tag( &c, tmp_buf, ASN1_CONTEXT_SPECIFIC | ASN1_CONSTRUCTED | 0 ) );
|
|
|
|
ASN1_CHK_ADD( len, asn1_write_len( &c, tmp_buf, len ) );
|
|
ASN1_CHK_ADD( len, asn1_write_tag( &c, tmp_buf, ASN1_CONSTRUCTED | ASN1_SEQUENCE ) );
|
|
|
|
md( md_info_from_type( ctx->md_alg ), c, len, hash );
|
|
|
|
rsa_pkcs1_sign( ctx->issuer_key, NULL, NULL, RSA_PRIVATE, ctx->md_alg, 0, hash, sig );
|
|
|
|
c2 = buf + size - 1;
|
|
ASN1_CHK_ADD( sig_len, x509_write_sig( &c2, buf, sig_oid, sig_oid_len,
|
|
sig, ctx->issuer_key->len ) );
|
|
|
|
c2 -= len;
|
|
memcpy( c2, c, len );
|
|
|
|
len += sig_len;
|
|
ASN1_CHK_ADD( len, asn1_write_len( &c2, buf, len ) );
|
|
ASN1_CHK_ADD( len, asn1_write_tag( &c2, buf, ASN1_CONSTRUCTED | ASN1_SEQUENCE ) );
|
|
|
|
return( len );
|
|
}
|
|
|
|
#define PEM_BEGIN_CRT "-----BEGIN CERTIFICATE-----\n"
|
|
#define PEM_END_CRT "-----END CERTIFICATE-----\n"
|
|
|
|
#define PEM_BEGIN_CSR "-----BEGIN CERTIFICATE REQUEST-----\n"
|
|
#define PEM_END_CSR "-----END CERTIFICATE REQUEST-----\n"
|
|
|
|
#define PEM_BEGIN_PUBLIC_KEY "-----BEGIN PUBLIC KEY-----\n"
|
|
#define PEM_END_PUBLIC_KEY "-----END PUBLIC KEY-----\n"
|
|
|
|
#define PEM_BEGIN_PRIVATE_KEY "-----BEGIN RSA PRIVATE KEY-----\n"
|
|
#define PEM_END_PRIVATE_KEY "-----END RSA PRIVATE KEY-----\n"
|
|
|
|
#if defined(POLARSSL_BASE64_C)
|
|
static int x509write_pemify( const char *begin_str, const char *end_str,
|
|
const unsigned char *der_data, size_t der_len,
|
|
unsigned char *buf, size_t size )
|
|
{
|
|
int ret;
|
|
unsigned char base_buf[4096];
|
|
unsigned char *c = base_buf, *p = buf;
|
|
size_t len = 0, olen = sizeof(base_buf);
|
|
|
|
if( ( ret = base64_encode( base_buf, &olen, der_data, der_len ) ) != 0 )
|
|
return( ret );
|
|
|
|
if( olen + strlen( begin_str ) + strlen( end_str ) +
|
|
olen / 64 > size )
|
|
{
|
|
return( POLARSSL_ERR_BASE64_BUFFER_TOO_SMALL );
|
|
}
|
|
|
|
memcpy( p, begin_str, strlen( begin_str ) );
|
|
p += strlen( begin_str );
|
|
|
|
while( olen )
|
|
{
|
|
len = ( olen > 64 ) ? 64 : olen;
|
|
memcpy( p, c, len );
|
|
olen -= len;
|
|
p += len;
|
|
c += len;
|
|
*p++ = '\n';
|
|
}
|
|
|
|
memcpy( p, end_str, strlen( end_str ) );
|
|
p += strlen( end_str );
|
|
|
|
*p = '\0';
|
|
|
|
return( 0 );
|
|
}
|
|
|
|
int x509write_crt_pem( x509write_cert *crt, unsigned char *buf, size_t size )
|
|
{
|
|
int ret;
|
|
unsigned char output_buf[4096];
|
|
|
|
if( ( ret = x509write_crt_der( crt, output_buf,
|
|
sizeof(output_buf) ) ) < 0 )
|
|
{
|
|
return( ret );
|
|
}
|
|
|
|
if( ( ret = x509write_pemify( PEM_BEGIN_CRT, PEM_END_CRT,
|
|
output_buf + sizeof(output_buf) - 1 - ret,
|
|
ret, buf, size ) ) != 0 )
|
|
{
|
|
return( ret );
|
|
}
|
|
|
|
return( 0 );
|
|
}
|
|
|
|
int x509write_pubkey_pem( rsa_context *rsa, unsigned char *buf, size_t size )
|
|
{
|
|
int ret;
|
|
unsigned char output_buf[4096];
|
|
|
|
if( ( ret = x509write_pubkey_der( rsa, output_buf,
|
|
sizeof(output_buf) ) ) < 0 )
|
|
{
|
|
return( ret );
|
|
}
|
|
|
|
if( ( ret = x509write_pemify( PEM_BEGIN_PUBLIC_KEY, PEM_END_PUBLIC_KEY,
|
|
output_buf + sizeof(output_buf) - 1 - ret,
|
|
ret, buf, size ) ) != 0 )
|
|
{
|
|
return( ret );
|
|
}
|
|
|
|
return( 0 );
|
|
}
|
|
|
|
int x509write_key_pem( rsa_context *rsa, unsigned char *buf, size_t size )
|
|
{
|
|
int ret;
|
|
unsigned char output_buf[4096];
|
|
|
|
if( ( ret = x509write_key_der( rsa, output_buf,
|
|
sizeof(output_buf) ) ) < 0 )
|
|
{
|
|
return( ret );
|
|
}
|
|
|
|
if( ( ret = x509write_pemify( PEM_BEGIN_PRIVATE_KEY, PEM_END_PRIVATE_KEY,
|
|
output_buf + sizeof(output_buf) - 1 - ret,
|
|
ret, buf, size ) ) != 0 )
|
|
{
|
|
return( ret );
|
|
}
|
|
|
|
return( 0 );
|
|
}
|
|
|
|
int x509write_csr_pem( x509write_csr *ctx, unsigned char *buf, size_t size )
|
|
{
|
|
int ret;
|
|
unsigned char output_buf[4096];
|
|
|
|
if( ( ret = x509write_csr_der( ctx, output_buf,
|
|
sizeof(output_buf) ) ) < 0 )
|
|
{
|
|
return( ret );
|
|
}
|
|
|
|
if( ( ret = x509write_pemify( PEM_BEGIN_CSR, PEM_END_CSR,
|
|
output_buf + sizeof(output_buf) - 1 - ret,
|
|
ret, buf, size ) ) != 0 )
|
|
{
|
|
return( ret );
|
|
}
|
|
|
|
return( 0 );
|
|
}
|
|
#endif /* POLARSSL_BASE64_C */
|
|
|
|
#endif
|