]> git.ipfire.org Git - thirdparty/openssl.git/blame - crypto/dsa/dsa_asn1.c
Separate DSA functionality from ASN.1 encoding.
[thirdparty/openssl.git] / crypto / dsa / dsa_asn1.c
CommitLineData
a8da8918
UM
1/* crypto/dsa/dsa_asn1.c */
2
3#include <stdio.h>
4#include "cryptlib.h"
5#include "dsa.h"
6#include "asn1.h"
7#include "asn1_mac.h"
8
9DSA_SIG *DSA_SIG_new(void)
10{
11 DSA_SIG *ret;
12
13 ret = Malloc(sizeof(DSA_SIG));
14 if (ret == NULL)
15 {
16 DSAerr(DSA_F_DSA_SIG_NEW,ERR_R_MALLOC_FAILURE);
17 return(NULL);
18 }
19 ret->r = NULL;
20 ret->s = NULL;
21 return(ret);
22}
23
24void DSA_SIG_free(r)
25DSA_SIG *r;
26{
27 if (r == NULL) return;
28 if (r->r) BN_clear_free(r->r);
29 if (r->s) BN_clear_free(r->s);
30 Free(r);
31}
32
33int i2d_DSA_SIG(v,pp)
34DSA_SIG *v;
35unsigned char **pp;
36{
37 int t=0,len;
38 ASN1_INTEGER rbs,sbs;
39 unsigned char *p;
40
41 rbs.data=Malloc(BN_num_bits(v->r)/8+1);
42 if (rbs.data == NULL)
43 {
44 DSAerr(DSA_F_I2D_DSA_SIG, ERR_R_MALLOC_FAILURE);
45 return(0);
46 }
47 rbs.type=V_ASN1_INTEGER;
48 rbs.length=BN_bn2bin(v->r,rbs.data);
49 sbs.data=Malloc(BN_num_bits(v->s)/8+1);
50 if (sbs.data == NULL)
51 {
52 Free(rbs.data);
53 DSAerr(DSA_F_I2D_DSA_SIG, ERR_R_MALLOC_FAILURE);
54 return(0);
55 }
56 sbs.type=V_ASN1_INTEGER;
57 sbs.length=BN_bn2bin(v->s,sbs.data);
58
59 len=i2d_ASN1_INTEGER(&rbs,NULL);
60 len+=i2d_ASN1_INTEGER(&sbs,NULL);
61
62 if (pp)
63 {
64 p=*pp;
65 ASN1_put_object(&p,1,len,V_ASN1_SEQUENCE,V_ASN1_UNIVERSAL);
66 i2d_ASN1_INTEGER(&rbs,&p);
67 i2d_ASN1_INTEGER(&sbs,&p);
68 }
69 t=ASN1_object_size(1,len,V_ASN1_SEQUENCE);
70 Free(rbs.data);
71 Free(sbs.data);
72 return(t);
73}
74
75DSA_SIG *d2i_DSA_SIG(a,pp,length)
76DSA_SIG **a;
77unsigned char **pp;
78long length;
79{
80 int i=ERR_R_NESTED_ASN1_ERROR;
81 ASN1_INTEGER *bs=NULL;
82 M_ASN1_D2I_vars(a,DSA_SIG *,DSA_SIG_new);
83
84 M_ASN1_D2I_Init();
85 M_ASN1_D2I_start_sequence();
86 M_ASN1_D2I_get(bs,d2i_ASN1_INTEGER);
87 if ((ret->r=BN_bin2bn(bs->data,bs->length,ret->r)) == NULL)
88 goto err_bn;
89 M_ASN1_D2I_get(bs,d2i_ASN1_INTEGER);
90 if ((ret->s=BN_bin2bn(bs->data,bs->length,ret->s)) == NULL)
91 goto err_bn;
92 ASN1_BIT_STRING_free(bs);
93 M_ASN1_D2I_Finish_2(a);
94
95err_bn:
96 i=ERR_R_BN_LIB;
97err:
98 DSAerr(DSA_F_D2I_DSA_SIG,i);
99 if ((ret != NULL) && ((a == NULL) || (*a != ret))) DSA_SIG_free(ret);
100 if (bs != NULL) ASN1_BIT_STRING_free(bs);
101 return(NULL);
102}