1 files changed, 58 insertions, 14 deletions

diff --git a/src/lib/libcrypto/x509/x509_obj.c b/src/lib/libcrypto/x509/x509_obj.c
index c0576fd6f6..691b71f031 100644
--- a/src/lib/libcrypto/x509/x509_obj.c
+++ b/src/lib/libcrypto/x509/x509_obj.c
@@ -58,27 +58,27 @@
 
 #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;
+                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);
+                Free(b);
                 }
         else
                 p=buf;