Annotation of embedaddon/strongswan/src/libstrongswan/plugins/pkcs1/pkcs1_encoder.c, revision 1.1.1.1

1.1       misho       1: /*
                      2:  * Copyright (C) 2009 Martin Willi
                      3:  * HSR Hochschule fuer Technik Rapperswil
                      4:  *
                      5:  * This program is free software; you can redistribute it and/or modify it
                      6:  * under the terms of the GNU General Public License as published by the
                      7:  * Free Software Foundation; either version 2 of the License, or (at your
                      8:  * option) any later version.  See <http://www.fsf.org/copyleft/gpl.txt>.
                      9:  *
                     10:  * This program is distributed in the hope that it will be useful, but
                     11:  * WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
                     12:  * or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
                     13:  * for more details.
                     14:  */
                     15: 
                     16: #include "pkcs1_encoder.h"
                     17: 
                     18: #include <utils/debug.h>
                     19: #include <asn1/asn1.h>
                     20: #include <asn1/oid.h>
                     21: 
                     22: /**
                     23:  * Encode a public key in PKCS#1/ASN.1 DER
                     24:  */
                     25: static bool build_pub(chunk_t *encoding, va_list args)
                     26: {
                     27:        chunk_t n, e;
                     28: 
                     29:        if (cred_encoding_args(args, CRED_PART_RSA_MODULUS, &n,
                     30:                                                   CRED_PART_RSA_PUB_EXP, &e, CRED_PART_END))
                     31:        {
                     32:                *encoding = asn1_wrap(ASN1_SEQUENCE, "mm",
                     33:                                                asn1_integer("c", n),
                     34:                                                asn1_integer("c", e));
                     35:                return TRUE;
                     36:        }
                     37:        return FALSE;
                     38: }
                     39: 
                     40: /**
                     41:  * Encode a public key in PKCS#1/ASN.1 DER, contained in subjectPublicKeyInfo
                     42:  */
                     43: static bool build_pub_info(chunk_t *encoding, va_list args)
                     44: {
                     45:        chunk_t n, e;
                     46: 
                     47:        if (cred_encoding_args(args, CRED_PART_RSA_MODULUS, &n,
                     48:                                                   CRED_PART_RSA_PUB_EXP, &e, CRED_PART_END))
                     49:        {
                     50:                *encoding = asn1_wrap(ASN1_SEQUENCE, "mm",
                     51:                                                asn1_algorithmIdentifier(OID_RSA_ENCRYPTION),
                     52:                                                asn1_bitstring("m",
                     53:                                                        asn1_wrap(ASN1_SEQUENCE, "mm",
                     54:                                                                asn1_integer("c", n),
                     55:                                                                asn1_integer("c", e))));
                     56:                return TRUE;
                     57:        }
                     58:        return FALSE;
                     59: }
                     60: 
                     61: /**
                     62:  * Encode the RSA modulus of a public key only
                     63:  */
                     64: static bool build_pub_modulus(chunk_t *encoding, va_list args)
                     65: {
                     66:        chunk_t n;
                     67: 
                     68:        if (cred_encoding_args(args, CRED_PART_RSA_MODULUS, &n, CRED_PART_END))
                     69:        {
                     70:                /* remove preceding zero bytes */
                     71:                while (n.len > 0 && *n.ptr == 0x00)
                     72:                {
                     73:                        n.ptr++;
                     74:                        n.len--;
                     75:                }
                     76:                *encoding = chunk_clone(n);
                     77:                return TRUE;
                     78:        }
                     79:        return FALSE;
                     80: }
                     81: 
                     82: /**
                     83:  * Encode a private key in PKCS#1/ASN.1 DER
                     84:  */
                     85: static bool build_priv(chunk_t *encoding, va_list args)
                     86: {
                     87:        chunk_t n, e, d, p, q, exp1, exp2, coeff;
                     88: 
                     89:        if (cred_encoding_args(args, CRED_PART_RSA_MODULUS, &n,
                     90:                                        CRED_PART_RSA_PUB_EXP, &e, CRED_PART_RSA_PRIV_EXP, &d,
                     91:                                        CRED_PART_RSA_PRIME1, &p, CRED_PART_RSA_PRIME2, &q,
                     92:                                        CRED_PART_RSA_EXP1, &exp1, CRED_PART_RSA_EXP2, &exp2,
                     93:                                        CRED_PART_RSA_COEFF, &coeff, CRED_PART_END))
                     94:        {
                     95:                *encoding = asn1_wrap(ASN1_SEQUENCE, "cmmssssss",
                     96:                                                ASN1_INTEGER_0,
                     97:                                                asn1_integer("c", n),
                     98:                                                asn1_integer("c", e),
                     99:                                                asn1_integer("c", d),
                    100:                                                asn1_integer("c", p),
                    101:                                                asn1_integer("c", q),
                    102:                                                asn1_integer("c", exp1),
                    103:                                                asn1_integer("c", exp2),
                    104:                                                asn1_integer("c", coeff));
                    105:                return TRUE;
                    106:        }
                    107:        return FALSE;
                    108: }
                    109: 
                    110: /**
                    111:  * Build the SHA1 hash of pubkey(info) ASN.1 data
                    112:  */
                    113: static bool hash_pubkey(chunk_t pubkey, chunk_t *hash)
                    114: {
                    115:        hasher_t *hasher;
                    116: 
                    117:        hasher = lib->crypto->create_hasher(lib->crypto, HASH_SHA1);
                    118:        if (!hasher || !hasher->allocate_hash(hasher, pubkey, hash))
                    119:        {
                    120:                DESTROY_IF(hasher);
                    121:                chunk_free(&pubkey);
                    122:                DBG1(DBG_LIB, "SHA1 hash algorithm not supported, "
                    123:                         "fingerprinting failed");
                    124:                return FALSE;
                    125:        }
                    126:        hasher->destroy(hasher);
                    127:        chunk_free(&pubkey);
                    128:        return TRUE;
                    129: }
                    130: 
                    131: /**
                    132:  * build the fingerprint of the subjectPublicKeyInfo object
                    133:  */
                    134: static bool build_info_sha1(chunk_t *encoding, va_list args)
                    135: {
                    136:        chunk_t pubkey;
                    137: 
                    138:        if (build_pub_info(&pubkey, args))
                    139:        {
                    140:                return hash_pubkey(pubkey, encoding);
                    141:        }
                    142:        return FALSE;
                    143: }
                    144: 
                    145: /**
                    146:  * build the fingerprint of the subjectPublicKey object
                    147:  */
                    148: static bool build_sha1(chunk_t *encoding, va_list args)
                    149: {
                    150:        chunk_t pubkey;
                    151: 
                    152:        if (build_pub(&pubkey, args))
                    153:        {
                    154:                return hash_pubkey(pubkey, encoding);
                    155:        }
                    156:        return FALSE;
                    157: }
                    158: 
                    159: /**
                    160:  * See header.
                    161:  */
                    162: bool pkcs1_encoder_encode(cred_encoding_type_t type, chunk_t *encoding,
                    163:                                                  va_list args)
                    164: {
                    165:        switch (type)
                    166:        {
                    167:                case KEYID_PUBKEY_INFO_SHA1:
                    168:                        return build_info_sha1(encoding, args);
                    169:                case KEYID_PUBKEY_SHA1:
                    170:                        return build_sha1(encoding, args);
                    171:                case PUBKEY_ASN1_DER:
                    172:                        return build_pub(encoding, args);
                    173:                case PUBKEY_SPKI_ASN1_DER:
                    174:                        return build_pub_info(encoding, args);
                    175:                case PUBKEY_RSA_MODULUS:
                    176:                        return build_pub_modulus(encoding, args);
                    177:                case PRIVKEY_ASN1_DER:
                    178:                        return build_priv(encoding, args);
                    179:                default:
                    180:                        return FALSE;
                    181:        }
                    182: }
                    183: 
                    184: 

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>