libs/libtomcrypt/pk/rsa/rsa_export.c

   1 /* LibTomCrypt, modular cryptographic library -- Tom St Denis
   2  *
   3  * LibTomCrypt is a library that provides various cryptographic
   4  * algorithms in a highly modular and flexible manner.
   5  *
   6  * The library is free for all purposes without any express
   7  * guarantee it works.
   8  *
   9  * Tom St Denis, tomstdenis@gmail.com, http://libtomcrypt.com
  10  */
  11 #include "tomcrypt.h"
  12
  13 /**
  14   @file rsa_export.c
  15   Export RSA PKCS keys, Tom St Denis
  16 */
  17
  18 #ifdef MRSA
  19
  20 /**
  21     This will export either an RSAPublicKey or RSAPrivateKey [defined in PKCS #1 v2.1]
  22     @param out       [out] Destination of the packet
  23     @param outlen    [in/out] The max size and resulting size of the packet
  24     @param type      The type of exported key (PK_PRIVATE or PK_PUBLIC)
  25     @param key       The RSA key to export
  26     @return CRYPT_OK if successful
  27 */
  28 int rsa_export(unsigned char *out, unsigned long *outlen, int type, rsa_key *key)
  29 {
  30    unsigned long zero=0;
  31    LTC_ARGCHK(out    != NULL);
  32    LTC_ARGCHK(outlen != NULL);
  33    LTC_ARGCHK(key    != NULL);
  34
  35    /* type valid? */
  36    if (!(key->type == PK_PRIVATE) && (type == PK_PRIVATE)) {
  37       return CRYPT_PK_INVALID_TYPE;
  38    }
  39
  40    if (type == PK_PRIVATE) {
  41       /* private key */
  42       /* output is
  43             Version, n, e, d, p, q, d mod (p-1), d mod (q - 1), 1/q mod p
  44        */
  45       return der_encode_sequence_multi(out, outlen,
  46                           LTC_ASN1_SHORT_INTEGER, 1UL, &zero,
  47                           LTC_ASN1_INTEGER, 1UL,  key->N,
  48                           LTC_ASN1_INTEGER, 1UL,  key->e,
  49                           LTC_ASN1_INTEGER, 1UL,  key->d,
  50                           LTC_ASN1_INTEGER, 1UL,  key->p,
  51                           LTC_ASN1_INTEGER, 1UL,  key->q,
  52                           LTC_ASN1_INTEGER, 1UL,  key->dP,
  53                           LTC_ASN1_INTEGER, 1UL,  key->dQ,
  54                           LTC_ASN1_INTEGER, 1UL,  key->qP,
  55                           LTC_ASN1_EOL,     0UL, NULL);
  56    } else {
  57       /* public key */
  58       return der_encode_sequence_multi(out, outlen,
  59                                  LTC_ASN1_INTEGER, 1UL,  key->N,
  60                                  LTC_ASN1_INTEGER, 1UL,  key->e,
  61                                  LTC_ASN1_EOL,     0UL, NULL);
  62    }
  63 }
  64
  65 #endif /* MRSA */
  66
  67 /* $Source: /cvs/libtom/libtomcrypt/src/pk/rsa/rsa_export.c,v $ */
  68 /* $Revision: 1.15 $ */
  69 /* $Date: 2006/03/31 14:15:35 $ */