comparison src/pk/rsa/rsa_export.c @ 380:d5faf4814ddb libtomcrypt-orig libtomcrypt-1.16

Update to LibTomCrypt 1.16
author Matt Johnston <matt@ucc.asn.au>
date Thu, 11 Jan 2007 02:22:00 +0000
parents 59400faa4b44
children
comparison
equal deleted inserted replaced
280:59400faa4b44 380:d5faf4814ddb
4 * algorithms in a highly modular and flexible manner. 4 * algorithms in a highly modular and flexible manner.
5 * 5 *
6 * The library is free for all purposes without any express 6 * The library is free for all purposes without any express
7 * guarantee it works. 7 * guarantee it works.
8 * 8 *
9 * Tom St Denis, [email protected], http://libtomcrypt.org 9 * Tom St Denis, [email protected], http://libtomcrypt.com
10 */ 10 */
11 #include "tomcrypt.h" 11 #include "tomcrypt.h"
12 12
13 /** 13 /**
14 @file rsa_export.c 14 @file rsa_export.c
25 @param key The RSA key to export 25 @param key The RSA key to export
26 @return CRYPT_OK if successful 26 @return CRYPT_OK if successful
27 */ 27 */
28 int rsa_export(unsigned char *out, unsigned long *outlen, int type, rsa_key *key) 28 int rsa_export(unsigned char *out, unsigned long *outlen, int type, rsa_key *key)
29 { 29 {
30 int err;
31 unsigned long zero=0; 30 unsigned long zero=0;
32
33 LTC_ARGCHK(out != NULL); 31 LTC_ARGCHK(out != NULL);
34 LTC_ARGCHK(outlen != NULL); 32 LTC_ARGCHK(outlen != NULL);
35 LTC_ARGCHK(key != NULL); 33 LTC_ARGCHK(key != NULL);
36 34
37 /* type valid? */ 35 /* type valid? */
42 if (type == PK_PRIVATE) { 40 if (type == PK_PRIVATE) {
43 /* private key */ 41 /* private key */
44 /* output is 42 /* output is
45 Version, n, e, d, p, q, d mod (p-1), d mod (q - 1), 1/q mod p 43 Version, n, e, d, p, q, d mod (p-1), d mod (q - 1), 1/q mod p
46 */ 44 */
47 if ((err = der_encode_sequence_multi(out, outlen, 45 return der_encode_sequence_multi(out, outlen,
48 LTC_ASN1_SHORT_INTEGER, 1UL, &zero, 46 LTC_ASN1_SHORT_INTEGER, 1UL, &zero,
49 LTC_ASN1_INTEGER, 1UL, &key->N, 47 LTC_ASN1_INTEGER, 1UL, key->N,
50 LTC_ASN1_INTEGER, 1UL, &key->e, 48 LTC_ASN1_INTEGER, 1UL, key->e,
51 LTC_ASN1_INTEGER, 1UL, &key->d, 49 LTC_ASN1_INTEGER, 1UL, key->d,
52 LTC_ASN1_INTEGER, 1UL, &key->p, 50 LTC_ASN1_INTEGER, 1UL, key->p,
53 LTC_ASN1_INTEGER, 1UL, &key->q, 51 LTC_ASN1_INTEGER, 1UL, key->q,
54 LTC_ASN1_INTEGER, 1UL, &key->dP, 52 LTC_ASN1_INTEGER, 1UL, key->dP,
55 LTC_ASN1_INTEGER, 1UL, &key->dQ, 53 LTC_ASN1_INTEGER, 1UL, key->dQ,
56 LTC_ASN1_INTEGER, 1UL, &key->qP, 54 LTC_ASN1_INTEGER, 1UL, key->qP,
57 LTC_ASN1_EOL, 0UL, NULL)) != CRYPT_OK) { 55 LTC_ASN1_EOL, 0UL, NULL);
58 return err;
59 }
60
61 /* clear zero and return */
62 return CRYPT_OK;
63 } else { 56 } else {
64 /* public key */ 57 /* public key */
65 return der_encode_sequence_multi(out, outlen, 58 return der_encode_sequence_multi(out, outlen,
66 LTC_ASN1_INTEGER, 1UL, &key->N, 59 LTC_ASN1_INTEGER, 1UL, key->N,
67 LTC_ASN1_INTEGER, 1UL, &key->e, 60 LTC_ASN1_INTEGER, 1UL, key->e,
68 LTC_ASN1_EOL, 0UL, NULL); 61 LTC_ASN1_EOL, 0UL, NULL);
69 } 62 }
70 } 63 }
71 64
72 #endif /* MRSA */ 65 #endif /* MRSA */
73 66
74 /* $Source: /cvs/libtom/libtomcrypt/src/pk/rsa/rsa_export.c,v $ */ 67 /* $Source: /cvs/libtom/libtomcrypt/src/pk/rsa/rsa_export.c,v $ */
75 /* $Revision: 1.11 $ */ 68 /* $Revision: 1.15 $ */
76 /* $Date: 2005/06/04 01:42:48 $ */ 69 /* $Date: 2006/03/31 14:15:35 $ */