test_mod_mul is useful, let's run it more often.
[openssl.git] / crypto / x509 / x509_obj.c
index c0576fd..6a3ba8e 100644 (file)
 
 #include <stdio.h>
 #include "cryptlib.h"
-#include "lhash.h"
-#include "objects.h"
-#include "x509.h"
-#include "buffer.h"
+#include <openssl/lhash.h>
+#include <openssl/objects.h>
+#include <openssl/x509.h>
+#include <openssl/buffer.h>
 
-char *X509_NAME_oneline(a,buf,len)
-X509_NAME *a;
-char *buf;
-int len;
+char *X509_NAME_oneline(X509_NAME *a, char *buf, int len)
        {
        X509_NAME_ENTRY *ne;
-       unsigned int i;
+int i;
        int n,lold,l,l1,l2,num,j,type;
-       char *s,*p;
+       const char *s;
+       char *p;
        unsigned char *q;
        BUF_MEM *b=NULL;
        static char hex[17]="0123456789ABCDEF";
        int gs_doit[4];
        char tmp_buf[80];
+#ifdef CHARSET_EBCDIC
+       char ebcdic_buf[1024];
+#endif
 
-       if (a == NULL) return("NO X509_NAME");
        if (buf == NULL)
                {
                if ((b=BUF_MEM_new()) == NULL) goto err;
@@ -86,12 +86,22 @@ int len;
                b->data[0]='\0';
                len=200;
                }
+       if (a == NULL)
+           {
+           if(b)
+               {
+               buf=b->data;
+               OPENSSL_free(b);
+               }
+           strncpy(buf,"NO X509_NAME",len);
+           return buf;
+           }
 
        len--; /* space for '\0' */
        l=0;
-       for (i=0; (int)i<sk_num(a->entries); i++)
+       for (i=0; i<sk_X509_NAME_ENTRY_num(a->entries); i++)
                {
-               ne=(X509_NAME_ENTRY *)sk_value(a->entries,i);
+               ne=sk_X509_NAME_ENTRY_value(a->entries,i);
                n=OBJ_obj2nid(ne->object);
                if ((n == NID_undef) || ((s=OBJ_nid2sn(n)) == NULL))
                        {
@@ -103,6 +113,19 @@ int len;
                type=ne->value->type;
                num=ne->value->length;
                q=ne->value->data;
+#ifdef CHARSET_EBCDIC
+                if (type == V_ASN1_GENERALSTRING ||
+                   type == V_ASN1_VISIBLESTRING ||
+                   type == V_ASN1_PRINTABLESTRING ||
+                   type == V_ASN1_TELETEXSTRING ||
+                   type == V_ASN1_VISIBLESTRING ||
+                   type == V_ASN1_IA5STRING) {
+                        ascii2ebcdic(ebcdic_buf, q,
+                                    (num > sizeof ebcdic_buf)
+                                    ? sizeof ebcdic_buf : num);
+                        q=ebcdic_buf;
+               }
+#endif
 
                if ((type == V_ASN1_GENERALSTRING) && ((num%4) == 0))
                        {
@@ -125,7 +148,12 @@ int len;
                        {
                        if (!gs_doit[j&3]) continue;
                        l2++;
+#ifndef CHARSET_EBCDIC
                        if ((q[j] < ' ') || (q[j] > '~')) l2+=3;
+#else
+                       if ((os_toascii[q[j]] < os_toascii[' ']) ||
+                           (os_toascii[q[j]] > os_toascii['~'])) l2+=3;
+#endif
                        }
 
                lold=l;
@@ -145,11 +173,14 @@ int len;
                memcpy(p,s,(unsigned int)l1); p+=l1;
                *(p++)='=';
 
+#ifndef CHARSET_EBCDIC /* q was assigned above already. */
                q=ne->value->data;
+#endif
 
                for (j=0; j<num; j++)
                        {
                        if (!gs_doit[j&3]) continue;
+#ifndef CHARSET_EBCDIC
                        n=q[j];
                        if ((n < ' ') || (n > '~'))
                                {
@@ -160,13 +191,26 @@ int len;
                                }
                        else
                                *(p++)=n;
+#else
+                       n=os_toascii[q[j]];
+                       if ((n < os_toascii[' ']) ||
+                           (n > os_toascii['~']))
+                               {
+                               *(p++)='\\';
+                               *(p++)='x';
+                               *(p++)=hex[(n>>4)&0x0f];
+                               *(p++)=hex[n&0x0f];
+                               }
+                       else
+                               *(p++)=q[j];
+#endif
                        }
                *p='\0';
                }
        if (b != NULL)
                {
                p=b->data;
-               Free((char *)b);
+               OPENSSL_free(b);
                }
        else
                p=buf;