crypto/dsa/dsa_asn1.c

   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
   9 DSA_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
  24 void DSA_SIG_free(r)
  25 DSA_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
  33 int i2d_DSA_SIG(v,pp)
  34 DSA_SIG *v;
  35 unsigned 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
  75 DSA_SIG *d2i_DSA_SIG(a,pp,length)
  76 DSA_SIG **a;
  77 unsigned char **pp;
  78 long 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
  95 err_bn:
  96         i=ERR_R_BN_LIB;
  97 err:
  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 }