comparison libtomcrypt/src/pk/dsa/dsa_export.c @ 399:a707e6148060

merge of '5fdf69ca60d1683cdd9f4c2595134bed26394834' and '6b61c50f4cf888bea302ac8fcf5dbb573b443251'
author Matt Johnston <matt@ucc.asn.au>
date Sat, 03 Feb 2007 08:20:34 +0000
parents 0cbe8f6dbf9e
children f849a5ca2efc
comparison
equal deleted inserted replaced
394:17d097fc111c 399:a707e6148060
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, [email protected], http://libtomcrypt.com
10 */
11 #include "tomcrypt.h"
12
13 /**
14 @file dsa_export.c
15 DSA implementation, export key, Tom St Denis
16 */
17
18 #ifdef MDSA
19
20 /**
21 Export a DSA key to a binary packet
22 @param out [out] Where to store the packet
23 @param outlen [in/out] The max size and resulting size of the packet
24 @param type The type of key to export (PK_PRIVATE or PK_PUBLIC)
25 @param key The key to export
26 @return CRYPT_OK if successful
27 */
28 int dsa_export(unsigned char *out, unsigned long *outlen, int type, dsa_key *key)
29 {
30 unsigned char flags[1];
31
32 LTC_ARGCHK(out != NULL);
33 LTC_ARGCHK(outlen != NULL);
34 LTC_ARGCHK(key != NULL);
35
36 /* can we store the static header? */
37 if (type == PK_PRIVATE && key->type != PK_PRIVATE) {
38 return CRYPT_PK_TYPE_MISMATCH;
39 }
40
41 if (type != PK_PUBLIC && type != PK_PRIVATE) {
42 return CRYPT_INVALID_ARG;
43 }
44
45 flags[0] = (type != PK_PUBLIC) ? 1 : 0;
46
47 if (type == PK_PRIVATE) {
48 return der_encode_sequence_multi(out, outlen,
49 LTC_ASN1_BIT_STRING, 1UL, flags,
50 LTC_ASN1_INTEGER, 1UL, key->g,
51 LTC_ASN1_INTEGER, 1UL, key->p,
52 LTC_ASN1_INTEGER, 1UL, key->q,
53 LTC_ASN1_INTEGER, 1UL, key->y,
54 LTC_ASN1_INTEGER, 1UL, key->x,
55 LTC_ASN1_EOL, 0UL, NULL);
56 } else {
57 return der_encode_sequence_multi(out, outlen,
58 LTC_ASN1_BIT_STRING, 1UL, flags,
59 LTC_ASN1_INTEGER, 1UL, key->g,
60 LTC_ASN1_INTEGER, 1UL, key->p,
61 LTC_ASN1_INTEGER, 1UL, key->q,
62 LTC_ASN1_INTEGER, 1UL, key->y,
63 LTC_ASN1_EOL, 0UL, NULL);
64 }
65 }
66
67 #endif
68
69
70 /* $Source: /cvs/libtom/libtomcrypt/src/pk/dsa/dsa_export.c,v $ */
71 /* $Revision: 1.8 $ */
72 /* $Date: 2006/03/31 14:15:35 $ */