Don't use *from++ in tolower as this is implemented as a macro on some
[openssl.git] / crypto / asn1 / x_name.c
index 68fa34a207aa101b7eceaae9cefc39dd2f5eaa4e..063bf7c16bfbe0490aa6c9d6aaf7a180be6b8173 100644 (file)
@@ -63,6 +63,9 @@
 #include <openssl/x509.h>
 #include "asn1_locl.h"
 
+typedef STACK_OF(X509_NAME_ENTRY) STACK_OF_X509_NAME_ENTRY;
+DECLARE_STACK_OF(STACK_OF_X509_NAME_ENTRY)
+
 static int x509_name_ex_d2i(ASN1_VALUE **val,
                                const unsigned char **in, long len,
                                const ASN1_ITEM *it,
@@ -76,7 +79,8 @@ static void x509_name_ex_free(ASN1_VALUE **val, const ASN1_ITEM *it);
 static int x509_name_encode(X509_NAME *a);
 static int x509_name_canon(X509_NAME *a);
 static int asn1_string_canon(ASN1_STRING *out, ASN1_STRING *in);
-static int i2d_name_canon(STACK *intname, unsigned char **in);
+static int i2d_name_canon(STACK_OF(STACK_OF_X509_NAME_ENTRY) *intname,
+                         unsigned char **in);
 
 
 static int x509_name_ex_print(BIO *out, ASN1_VALUE **pval,
@@ -165,63 +169,49 @@ static void x509_name_ex_free(ASN1_VALUE **pval, const ASN1_ITEM *it)
        *pval = NULL;
 }
 
-/* Used with sk_pop_free() to free up the internal representation.
- * NB: we only free the STACK and not its contents because it is
- * already present in the X509_NAME structure.
- */
-
-static void sk_internal_free(void *a)
-{
-       sk_free(a);
-}
-
-static void canon_free(void *a)
-{
-       sk_X509_NAME_ENTRY_pop_free(a, X509_NAME_ENTRY_free);
-}
-
 static int x509_name_ex_d2i(ASN1_VALUE **val,
                        const unsigned char **in, long len, const ASN1_ITEM *it,
                                int tag, int aclass, char opt, ASN1_TLC *ctx)
 {
        const unsigned char *p = *in, *q;
-       STACK *intname = NULL, **intname_pp = &intname;
+       union { STACK_OF(STACK_OF_X509_NAME_ENTRY) *s;
+               ASN1_VALUE *a; } intname = {NULL};
+       union { X509_NAME *x; ASN1_VALUE *a; } nm = {NULL};
        int i, j, ret;
-       X509_NAME *nm = NULL, **nm_pp = &nm;
        STACK_OF(X509_NAME_ENTRY) *entries;
        X509_NAME_ENTRY *entry;
        q = p;
 
        /* Get internal representation of Name */
-       ret = ASN1_item_ex_d2i((ASN1_VALUE **)intname_pp,
+       ret = ASN1_item_ex_d2i(&intname.a,
                               &p, len, ASN1_ITEM_rptr(X509_NAME_INTERNAL),
                               tag, aclass, opt, ctx);
        
        if(ret <= 0) return ret;
 
        if(*val) x509_name_ex_free(val, NULL);
-       if(!x509_name_ex_new((ASN1_VALUE **)nm_pp, NULL)) goto err;
+       if(!x509_name_ex_new(&nm.a, NULL)) goto err;
        /* We've decoded it: now cache encoding */
-       if(!BUF_MEM_grow(nm->bytes, p - q)) goto err;
-       memcpy(nm->bytes->data, q, p - q);
+       if(!BUF_MEM_grow(nm.x->bytes, p - q)) goto err;
+       memcpy(nm.x->bytes->data, q, p - q);
 
        /* Convert internal representation to X509_NAME structure */
-       for(i = 0; i < sk_num(intname); i++) {
-               entries = (STACK_OF(X509_NAME_ENTRY) *)sk_value(intname, i);
+       for(i = 0; i < sk_STACK_OF_X509_NAME_ENTRY_num(intname.s); i++) {
+               entries = sk_STACK_OF_X509_NAME_ENTRY_value(intname.s, i);
                for(j = 0; j < sk_X509_NAME_ENTRY_num(entries); j++) {
                        entry = sk_X509_NAME_ENTRY_value(entries, j);
                        entry->set = i;
-                       if(!sk_X509_NAME_ENTRY_push(nm->entries, entry))
+                       if(!sk_X509_NAME_ENTRY_push(nm.x->entries, entry))
                                goto err;
                }
                sk_X509_NAME_ENTRY_free(entries);
        }
-       sk_free(intname);
-       ret = x509_name_canon(nm);
+       sk_STACK_OF_X509_NAME_ENTRY_free(intname.s);
+       ret = x509_name_canon(nm.x);
        if (!ret)
                goto err;
-       nm->modified = 0;
-       *val = (ASN1_VALUE *)nm;
+       nm.x->modified = 0;
+       *val = nm.a;
        *in = p;
        return ret;
        err:
@@ -249,37 +239,52 @@ static int x509_name_ex_i2d(ASN1_VALUE **val, unsigned char **out, const ASN1_IT
        return ret;
 }
 
+static void local_sk_X509_NAME_ENTRY_free(STACK_OF(X509_NAME_ENTRY) *ne)
+       {
+       sk_X509_NAME_ENTRY_free(ne);
+       }
+
+static void local_sk_X509_NAME_ENTRY_pop_free(STACK_OF(X509_NAME_ENTRY) *ne)
+       {
+       sk_X509_NAME_ENTRY_pop_free(ne, X509_NAME_ENTRY_free);
+       }
+
 static int x509_name_encode(X509_NAME *a)
 {
-       STACK *intname = NULL, **intname_pp = &intname;
+       union { STACK_OF(STACK_OF_X509_NAME_ENTRY) *s;
+               ASN1_VALUE *a; } intname = {NULL};
        int len;
        unsigned char *p;
        STACK_OF(X509_NAME_ENTRY) *entries = NULL;
        X509_NAME_ENTRY *entry;
        int i, set = -1;
-       intname = sk_new_null();
-       if(!intname) goto memerr;
+       intname.s = sk_STACK_OF_X509_NAME_ENTRY_new_null();
+       if(!intname.s) goto memerr;
        for(i = 0; i < sk_X509_NAME_ENTRY_num(a->entries); i++) {
                entry = sk_X509_NAME_ENTRY_value(a->entries, i);
                if(entry->set != set) {
                        entries = sk_X509_NAME_ENTRY_new_null();
                        if(!entries) goto memerr;
-                       if(!sk_push(intname, (char *)entries)) goto memerr;
+                       if(!sk_STACK_OF_X509_NAME_ENTRY_push(intname.s,
+                                                            entries))
+                               goto memerr;
                        set = entry->set;
                }
                if(!sk_X509_NAME_ENTRY_push(entries, entry)) goto memerr;
        }
-       len = ASN1_item_ex_i2d((ASN1_VALUE **)intname_pp, NULL,
+       len = ASN1_item_ex_i2d(&intname.a, NULL,
                               ASN1_ITEM_rptr(X509_NAME_INTERNAL), -1, -1);
        if (!BUF_MEM_grow(a->bytes,len)) goto memerr;
        p=(unsigned char *)a->bytes->data;
-       ASN1_item_ex_i2d((ASN1_VALUE **)intname_pp,
+       ASN1_item_ex_i2d(&intname.a,
                         &p, ASN1_ITEM_rptr(X509_NAME_INTERNAL), -1, -1);
-       sk_pop_free(intname, sk_internal_free);
+       sk_STACK_OF_X509_NAME_ENTRY_pop_free(intname.s,
+                                            local_sk_X509_NAME_ENTRY_free);
        a->modified = 0;
        return len;
-       memerr:
-       sk_pop_free(intname, sk_internal_free);
+memerr:
+       sk_STACK_OF_X509_NAME_ENTRY_pop_free(intname.s,
+                                            local_sk_X509_NAME_ENTRY_free);
        ASN1err(ASN1_F_X509_NAME_ENCODE, ERR_R_MALLOC_FAILURE);
        return -1;
 }
@@ -311,16 +316,23 @@ static int x509_name_ex_print(BIO *out, ASN1_VALUE **pval,
 static int x509_name_canon(X509_NAME *a)
        {
        unsigned char *p;
-       STACK *intname = NULL;
+       STACK_OF(STACK_OF_X509_NAME_ENTRY) *intname = NULL;
        STACK_OF(X509_NAME_ENTRY) *entries = NULL;
-       X509_NAME_ENTRY *entry, *tmpentry;
+       X509_NAME_ENTRY *entry, *tmpentry = NULL;
        int i, set = -1, ret = 0;
+
        if (a->canon_enc)
                {
                OPENSSL_free(a->canon_enc);
                a->canon_enc = NULL;
                }
-       intname = sk_new_null();
+       /* Special case: empty X509_NAME => null encoding */
+       if (sk_X509_NAME_ENTRY_num(a->entries) == 0)
+               {
+               a->canon_enclen = 0;
+               return 1;
+               }
+       intname = sk_STACK_OF_X509_NAME_ENTRY_new_null();
        if(!intname)
                goto err;
        for(i = 0; i < sk_X509_NAME_ENTRY_num(a->entries); i++)
@@ -331,7 +343,7 @@ static int x509_name_canon(X509_NAME *a)
                        entries = sk_X509_NAME_ENTRY_new_null();
                        if(!entries)
                                goto err;
-                       if(!sk_push(intname, (char *)entries))
+                       if(!sk_STACK_OF_X509_NAME_ENTRY_push(intname, entries))
                                goto err;
                        set = entry->set;
                        }
@@ -364,7 +376,8 @@ static int x509_name_canon(X509_NAME *a)
        if (tmpentry)
                X509_NAME_ENTRY_free(tmpentry);
        if (intname)
-               sk_pop_free(intname, canon_free);
+               sk_STACK_OF_X509_NAME_ENTRY_pop_free(intname,
+                                       local_sk_X509_NAME_ENTRY_pop_free);
        return ret;
        }
 
@@ -387,6 +400,7 @@ static int asn1_string_canon(ASN1_STRING *out, ASN1_STRING *in)
                out->type = in->type;
                if (!ASN1_STRING_set(out, in->data, in->length))
                        return 0;
+               return 1;
                }
 
        out->type = V_ASN1_UTF8STRING;
@@ -428,7 +442,10 @@ static int asn1_string_canon(ASN1_STRING *out, ASN1_STRING *in)
                {
                /* If MSB set just copy across */
                if (*from & 0x80)
+                       {
                        *to++ = *from++;
+                       i++;
+                       }
                /* Collapse multiple spaces */
                else if (isspace(*from))
                        {
@@ -447,7 +464,8 @@ static int asn1_string_canon(ASN1_STRING *out, ASN1_STRING *in)
                        }
                else
                        {
-                       *to++ = tolower(*from++);
+                       *to++ = tolower(*from);
+                       from++;
                        i++;
                        }
                }
@@ -458,14 +476,17 @@ static int asn1_string_canon(ASN1_STRING *out, ASN1_STRING *in)
 
        }
 
-static int i2d_name_canon(STACK *intname, unsigned char **in)
+static int i2d_name_canon(STACK_OF(STACK_OF_X509_NAME_ENTRY) *_intname,
+                         unsigned char **in)
        {
        int i, len, ltmp;
        ASN1_VALUE *v;
+       STACK_OF(ASN1_VALUE) *intname = (STACK_OF(ASN1_VALUE) *)_intname;
+
        len = 0;
-       for (i = 0; i < sk_num(intname); i++)
+       for (i = 0; i < sk_ASN1_VALUE_num(intname); i++)
                {
-               v = (ASN1_VALUE *)sk_value(intname, i);
+               v = sk_ASN1_VALUE_value(intname, i);
                ltmp = ASN1_item_ex_i2d(&v, in,
                        ASN1_ITEM_rptr(X509_NAME_ENTRIES), -1, -1);
                if (ltmp < 0)