16f9291ceSJung-uk Kim /*
29a3ae0cdSJung-uk Kim * Copyright 2000-2021 The OpenSSL Project Authors. All Rights Reserved.
3ddd58736SKris Kennaway *
4b077aed3SPierre Pronchery * Licensed under the Apache License 2.0 (the "License"). You may not use
5e71b7053SJung-uk Kim * this file except in compliance with the License. You can obtain a copy
6e71b7053SJung-uk Kim * in the file LICENSE in the source distribution or at
7e71b7053SJung-uk Kim * https://www.openssl.org/source/license.html
8ddd58736SKris Kennaway */
9ddd58736SKris Kennaway
10ddd58736SKris Kennaway #include <stdio.h>
11ddd58736SKris Kennaway #include <string.h>
12e71b7053SJung-uk Kim #include "internal/cryptlib.h"
1317f01e99SJung-uk Kim #include "crypto/asn1.h"
14ddd58736SKris Kennaway #include <openssl/crypto.h>
15ddd58736SKris Kennaway #include <openssl/x509.h>
16ddd58736SKris Kennaway #include <openssl/asn1.h>
17ddd58736SKris Kennaway
18ddd58736SKris Kennaway #include "charmap.h"
19ddd58736SKris Kennaway
206f9291ceSJung-uk Kim /*
216f9291ceSJung-uk Kim * ASN1_STRING_print_ex() and X509_NAME_print_ex(). Enhanced string and name
226f9291ceSJung-uk Kim * printing routines handling multibyte characters, RFC2253 and a host of
236f9291ceSJung-uk Kim * other options.
24ddd58736SKris Kennaway */
25ddd58736SKris Kennaway
26ddd58736SKris Kennaway #define CHARTYPE_BS_ESC (ASN1_STRFLGS_ESC_2253 | CHARTYPE_FIRST_ESC_2253 | CHARTYPE_LAST_ESC_2253)
27ddd58736SKris Kennaway
2812de4ed2SJung-uk Kim #define ESC_FLAGS (ASN1_STRFLGS_ESC_2253 | \
29e71b7053SJung-uk Kim ASN1_STRFLGS_ESC_2254 | \
3012de4ed2SJung-uk Kim ASN1_STRFLGS_ESC_QUOTE | \
3112de4ed2SJung-uk Kim ASN1_STRFLGS_ESC_CTRL | \
3212de4ed2SJung-uk Kim ASN1_STRFLGS_ESC_MSB)
3312de4ed2SJung-uk Kim
346f9291ceSJung-uk Kim /*
35b077aed3SPierre Pronchery * Three IO functions for sending data to memory, a BIO and a FILE
366f9291ceSJung-uk Kim * pointer.
37ddd58736SKris Kennaway */
send_bio_chars(void * arg,const void * buf,int len)385c87c606SMark Murray static int send_bio_chars(void *arg, const void *buf, int len)
39ddd58736SKris Kennaway {
406f9291ceSJung-uk Kim if (!arg)
416f9291ceSJung-uk Kim return 1;
426f9291ceSJung-uk Kim if (BIO_write(arg, buf, len) != len)
436f9291ceSJung-uk Kim return 0;
44ddd58736SKris Kennaway return 1;
45ddd58736SKris Kennaway }
46ddd58736SKris Kennaway
47e71b7053SJung-uk Kim #ifndef OPENSSL_NO_STDIO
send_fp_chars(void * arg,const void * buf,int len)485c87c606SMark Murray static int send_fp_chars(void *arg, const void *buf, int len)
49ddd58736SKris Kennaway {
506f9291ceSJung-uk Kim if (!arg)
516f9291ceSJung-uk Kim return 1;
526f9291ceSJung-uk Kim if (fwrite(buf, 1, len, arg) != (unsigned int)len)
536f9291ceSJung-uk Kim return 0;
54ddd58736SKris Kennaway return 1;
55ddd58736SKris Kennaway }
56e71b7053SJung-uk Kim #endif
57ddd58736SKris Kennaway
58ddd58736SKris Kennaway typedef int char_io (void *arg, const void *buf, int len);
59ddd58736SKris Kennaway
606f9291ceSJung-uk Kim /*
616f9291ceSJung-uk Kim * This function handles display of strings, one character at a time. It is
626f9291ceSJung-uk Kim * passed an unsigned long for each character because it could come from 2 or
636f9291ceSJung-uk Kim * even 4 byte forms.
64ddd58736SKris Kennaway */
65ddd58736SKris Kennaway
do_esc_char(unsigned long c,unsigned short flags,char * do_quotes,char_io * io_ch,void * arg)66e71b7053SJung-uk Kim static int do_esc_char(unsigned long c, unsigned short flags, char *do_quotes,
676f9291ceSJung-uk Kim char_io *io_ch, void *arg)
68ddd58736SKris Kennaway {
69e71b7053SJung-uk Kim unsigned short chflgs;
70e71b7053SJung-uk Kim unsigned char chtmp;
715c87c606SMark Murray char tmphex[HEX_SIZE(long) + 3];
725c87c606SMark Murray
735c87c606SMark Murray if (c > 0xffffffffL)
745c87c606SMark Murray return -1;
75ddd58736SKris Kennaway if (c > 0xffff) {
76dee36b4fSJung-uk Kim BIO_snprintf(tmphex, sizeof(tmphex), "\\W%08lX", c);
776f9291ceSJung-uk Kim if (!io_ch(arg, tmphex, 10))
786f9291ceSJung-uk Kim return -1;
79ddd58736SKris Kennaway return 10;
80ddd58736SKris Kennaway }
81ddd58736SKris Kennaway if (c > 0xff) {
82dee36b4fSJung-uk Kim BIO_snprintf(tmphex, sizeof(tmphex), "\\U%04lX", c);
836f9291ceSJung-uk Kim if (!io_ch(arg, tmphex, 6))
846f9291ceSJung-uk Kim return -1;
85ddd58736SKris Kennaway return 6;
86ddd58736SKris Kennaway }
87ddd58736SKris Kennaway chtmp = (unsigned char)c;
886f9291ceSJung-uk Kim if (chtmp > 0x7f)
896f9291ceSJung-uk Kim chflgs = flags & ASN1_STRFLGS_ESC_MSB;
906f9291ceSJung-uk Kim else
916f9291ceSJung-uk Kim chflgs = char_type[chtmp] & flags;
92ddd58736SKris Kennaway if (chflgs & CHARTYPE_BS_ESC) {
93ddd58736SKris Kennaway /* If we don't escape with quotes, signal we need quotes */
94ddd58736SKris Kennaway if (chflgs & ASN1_STRFLGS_ESC_QUOTE) {
956f9291ceSJung-uk Kim if (do_quotes)
966f9291ceSJung-uk Kim *do_quotes = 1;
976f9291ceSJung-uk Kim if (!io_ch(arg, &chtmp, 1))
986f9291ceSJung-uk Kim return -1;
99ddd58736SKris Kennaway return 1;
100ddd58736SKris Kennaway }
1016f9291ceSJung-uk Kim if (!io_ch(arg, "\\", 1))
1026f9291ceSJung-uk Kim return -1;
1036f9291ceSJung-uk Kim if (!io_ch(arg, &chtmp, 1))
1046f9291ceSJung-uk Kim return -1;
105ddd58736SKris Kennaway return 2;
106ddd58736SKris Kennaway }
107e71b7053SJung-uk Kim if (chflgs & (ASN1_STRFLGS_ESC_CTRL
108e71b7053SJung-uk Kim | ASN1_STRFLGS_ESC_MSB
109e71b7053SJung-uk Kim | ASN1_STRFLGS_ESC_2254)) {
110ddd58736SKris Kennaway BIO_snprintf(tmphex, 11, "\\%02X", chtmp);
1116f9291ceSJung-uk Kim if (!io_ch(arg, tmphex, 3))
1126f9291ceSJung-uk Kim return -1;
113ddd58736SKris Kennaway return 3;
114ddd58736SKris Kennaway }
1156f9291ceSJung-uk Kim /*
1166f9291ceSJung-uk Kim * If we get this far and do any escaping at all must escape the escape
1176f9291ceSJung-uk Kim * character itself: backslash.
11812de4ed2SJung-uk Kim */
119e71b7053SJung-uk Kim if (chtmp == '\\' && (flags & ESC_FLAGS)) {
1206f9291ceSJung-uk Kim if (!io_ch(arg, "\\\\", 2))
1216f9291ceSJung-uk Kim return -1;
12212de4ed2SJung-uk Kim return 2;
12312de4ed2SJung-uk Kim }
1246f9291ceSJung-uk Kim if (!io_ch(arg, &chtmp, 1))
1256f9291ceSJung-uk Kim return -1;
126ddd58736SKris Kennaway return 1;
127ddd58736SKris Kennaway }
128ddd58736SKris Kennaway
129ddd58736SKris Kennaway #define BUF_TYPE_WIDTH_MASK 0x7
130ddd58736SKris Kennaway #define BUF_TYPE_CONVUTF8 0x8
131ddd58736SKris Kennaway
1326f9291ceSJung-uk Kim /*
1336f9291ceSJung-uk Kim * This function sends each character in a buffer to do_esc_char(). It
1346f9291ceSJung-uk Kim * interprets the content formats and converts to or from UTF8 as
1356f9291ceSJung-uk Kim * appropriate.
136ddd58736SKris Kennaway */
137ddd58736SKris Kennaway
do_buf(unsigned char * buf,int buflen,int type,unsigned short flags,char * quotes,char_io * io_ch,void * arg)138ddd58736SKris Kennaway static int do_buf(unsigned char *buf, int buflen,
139e71b7053SJung-uk Kim int type, unsigned short flags, char *quotes, char_io *io_ch,
1406f9291ceSJung-uk Kim void *arg)
141ddd58736SKris Kennaway {
142dea77ea6SJung-uk Kim int i, outlen, len, charwidth;
143e71b7053SJung-uk Kim unsigned short orflags;
144e71b7053SJung-uk Kim unsigned char *p, *q;
145ddd58736SKris Kennaway unsigned long c;
146e71b7053SJung-uk Kim
147ddd58736SKris Kennaway p = buf;
148ddd58736SKris Kennaway q = buf + buflen;
149ddd58736SKris Kennaway outlen = 0;
150dea77ea6SJung-uk Kim charwidth = type & BUF_TYPE_WIDTH_MASK;
151dea77ea6SJung-uk Kim
152dea77ea6SJung-uk Kim switch (charwidth) {
153dea77ea6SJung-uk Kim case 4:
154dea77ea6SJung-uk Kim if (buflen & 3) {
155b077aed3SPierre Pronchery ERR_raise(ERR_LIB_ASN1, ASN1_R_INVALID_UNIVERSALSTRING_LENGTH);
156dea77ea6SJung-uk Kim return -1;
157dea77ea6SJung-uk Kim }
158dea77ea6SJung-uk Kim break;
159dea77ea6SJung-uk Kim case 2:
160dea77ea6SJung-uk Kim if (buflen & 1) {
161b077aed3SPierre Pronchery ERR_raise(ERR_LIB_ASN1, ASN1_R_INVALID_BMPSTRING_LENGTH);
162dea77ea6SJung-uk Kim return -1;
163dea77ea6SJung-uk Kim }
164dea77ea6SJung-uk Kim break;
165dea77ea6SJung-uk Kim default:
166dea77ea6SJung-uk Kim break;
167dea77ea6SJung-uk Kim }
168dea77ea6SJung-uk Kim
169ddd58736SKris Kennaway while (p != q) {
1706f9291ceSJung-uk Kim if (p == buf && flags & ASN1_STRFLGS_ESC_2253)
1716f9291ceSJung-uk Kim orflags = CHARTYPE_FIRST_ESC_2253;
1726f9291ceSJung-uk Kim else
1736f9291ceSJung-uk Kim orflags = 0;
174dea77ea6SJung-uk Kim
175dea77ea6SJung-uk Kim switch (charwidth) {
176ddd58736SKris Kennaway case 4:
177ddd58736SKris Kennaway c = ((unsigned long)*p++) << 24;
178ddd58736SKris Kennaway c |= ((unsigned long)*p++) << 16;
179ddd58736SKris Kennaway c |= ((unsigned long)*p++) << 8;
180ddd58736SKris Kennaway c |= *p++;
181ddd58736SKris Kennaway break;
182ddd58736SKris Kennaway
183ddd58736SKris Kennaway case 2:
184ddd58736SKris Kennaway c = ((unsigned long)*p++) << 8;
185ddd58736SKris Kennaway c |= *p++;
186ddd58736SKris Kennaway break;
187ddd58736SKris Kennaway
188ddd58736SKris Kennaway case 1:
189ddd58736SKris Kennaway c = *p++;
190ddd58736SKris Kennaway break;
191ddd58736SKris Kennaway
192ddd58736SKris Kennaway case 0:
193ddd58736SKris Kennaway i = UTF8_getc(p, buflen, &c);
1946f9291ceSJung-uk Kim if (i < 0)
1956f9291ceSJung-uk Kim return -1; /* Invalid UTF8String */
196dea77ea6SJung-uk Kim buflen -= i;
197ddd58736SKris Kennaway p += i;
198ddd58736SKris Kennaway break;
1993b4e3dcbSSimon L. B. Nielsen default:
2003b4e3dcbSSimon L. B. Nielsen return -1; /* invalid width */
201ddd58736SKris Kennaway }
2026f9291ceSJung-uk Kim if (p == q && flags & ASN1_STRFLGS_ESC_2253)
2036f9291ceSJung-uk Kim orflags = CHARTYPE_LAST_ESC_2253;
204ddd58736SKris Kennaway if (type & BUF_TYPE_CONVUTF8) {
205ddd58736SKris Kennaway unsigned char utfbuf[6];
206ddd58736SKris Kennaway int utflen;
207dee36b4fSJung-uk Kim utflen = UTF8_putc(utfbuf, sizeof(utfbuf), c);
208ddd58736SKris Kennaway for (i = 0; i < utflen; i++) {
2096f9291ceSJung-uk Kim /*
2106f9291ceSJung-uk Kim * We don't need to worry about setting orflags correctly
211ddd58736SKris Kennaway * because if utflen==1 its value will be correct anyway
212ddd58736SKris Kennaway * otherwise each character will be > 0x7f and so the
213ddd58736SKris Kennaway * character will never be escaped on first and last.
214ddd58736SKris Kennaway */
215e71b7053SJung-uk Kim len = do_esc_char(utfbuf[i], flags | orflags, quotes,
216e71b7053SJung-uk Kim io_ch, arg);
2176f9291ceSJung-uk Kim if (len < 0)
2186f9291ceSJung-uk Kim return -1;
219ddd58736SKris Kennaway outlen += len;
220ddd58736SKris Kennaway }
221ddd58736SKris Kennaway } else {
222e71b7053SJung-uk Kim len = do_esc_char(c, flags | orflags, quotes,
2236f9291ceSJung-uk Kim io_ch, arg);
2246f9291ceSJung-uk Kim if (len < 0)
2256f9291ceSJung-uk Kim return -1;
226ddd58736SKris Kennaway outlen += len;
227ddd58736SKris Kennaway }
228ddd58736SKris Kennaway }
229ddd58736SKris Kennaway return outlen;
230ddd58736SKris Kennaway }
231ddd58736SKris Kennaway
232ddd58736SKris Kennaway /* This function hex dumps a buffer of characters */
233ddd58736SKris Kennaway
do_hex_dump(char_io * io_ch,void * arg,unsigned char * buf,int buflen)2346f9291ceSJung-uk Kim static int do_hex_dump(char_io *io_ch, void *arg, unsigned char *buf,
2356f9291ceSJung-uk Kim int buflen)
236ddd58736SKris Kennaway {
2373b4e3dcbSSimon L. B. Nielsen static const char hexdig[] = "0123456789ABCDEF";
238ddd58736SKris Kennaway unsigned char *p, *q;
239ddd58736SKris Kennaway char hextmp[2];
240ddd58736SKris Kennaway if (arg) {
241ddd58736SKris Kennaway p = buf;
242ddd58736SKris Kennaway q = buf + buflen;
243ddd58736SKris Kennaway while (p != q) {
244ddd58736SKris Kennaway hextmp[0] = hexdig[*p >> 4];
245ddd58736SKris Kennaway hextmp[1] = hexdig[*p & 0xf];
2466f9291ceSJung-uk Kim if (!io_ch(arg, hextmp, 2))
2476f9291ceSJung-uk Kim return -1;
248ddd58736SKris Kennaway p++;
249ddd58736SKris Kennaway }
250ddd58736SKris Kennaway }
251ddd58736SKris Kennaway return buflen << 1;
252ddd58736SKris Kennaway }
253ddd58736SKris Kennaway
2546f9291ceSJung-uk Kim /*
2556f9291ceSJung-uk Kim * "dump" a string. This is done when the type is unknown, or the flags
2566f9291ceSJung-uk Kim * request it. We can either dump the content octets or the entire DER
2576f9291ceSJung-uk Kim * encoding. This uses the RFC2253 #01234 format.
258ddd58736SKris Kennaway */
259ddd58736SKris Kennaway
do_dump(unsigned long lflags,char_io * io_ch,void * arg,const ASN1_STRING * str)2606f9291ceSJung-uk Kim static int do_dump(unsigned long lflags, char_io *io_ch, void *arg,
261e71b7053SJung-uk Kim const ASN1_STRING *str)
262ddd58736SKris Kennaway {
2636f9291ceSJung-uk Kim /*
2646f9291ceSJung-uk Kim * Placing the ASN1_STRING in a temp ASN1_TYPE allows the DER encoding to
2656f9291ceSJung-uk Kim * readily obtained
266ddd58736SKris Kennaway */
267ddd58736SKris Kennaway ASN1_TYPE t;
268ddd58736SKris Kennaway unsigned char *der_buf, *p;
269ddd58736SKris Kennaway int outlen, der_len;
270ddd58736SKris Kennaway
2716f9291ceSJung-uk Kim if (!io_ch(arg, "#", 1))
2726f9291ceSJung-uk Kim return -1;
273ddd58736SKris Kennaway /* If we don't dump DER encoding just dump content octets */
274ddd58736SKris Kennaway if (!(lflags & ASN1_STRFLGS_DUMP_DER)) {
275ddd58736SKris Kennaway outlen = do_hex_dump(io_ch, arg, str->data, str->length);
2766f9291ceSJung-uk Kim if (outlen < 0)
2776f9291ceSJung-uk Kim return -1;
278ddd58736SKris Kennaway return outlen + 1;
279ddd58736SKris Kennaway }
280ddd58736SKris Kennaway t.type = str->type;
281ddd58736SKris Kennaway t.value.ptr = (char *)str;
282ddd58736SKris Kennaway der_len = i2d_ASN1_TYPE(&t, NULL);
2839a3ae0cdSJung-uk Kim if (der_len <= 0)
2849a3ae0cdSJung-uk Kim return -1;
285e71b7053SJung-uk Kim if ((der_buf = OPENSSL_malloc(der_len)) == NULL) {
286b077aed3SPierre Pronchery ERR_raise(ERR_LIB_ASN1, ERR_R_MALLOC_FAILURE);
2876f9291ceSJung-uk Kim return -1;
288e71b7053SJung-uk Kim }
289ddd58736SKris Kennaway p = der_buf;
290ddd58736SKris Kennaway i2d_ASN1_TYPE(&t, &p);
291ddd58736SKris Kennaway outlen = do_hex_dump(io_ch, arg, der_buf, der_len);
292ddd58736SKris Kennaway OPENSSL_free(der_buf);
2936f9291ceSJung-uk Kim if (outlen < 0)
2946f9291ceSJung-uk Kim return -1;
295ddd58736SKris Kennaway return outlen + 1;
296ddd58736SKris Kennaway }
297ddd58736SKris Kennaway
2986f9291ceSJung-uk Kim /*
2996f9291ceSJung-uk Kim * Lookup table to convert tags to character widths, 0 = UTF8 encoded, -1 is
3006f9291ceSJung-uk Kim * used for non string types otherwise it is the number of bytes per
3016f9291ceSJung-uk Kim * character
302ddd58736SKris Kennaway */
303ddd58736SKris Kennaway
3043b4e3dcbSSimon L. B. Nielsen static const signed char tag2nbyte[] = {
305ddd58736SKris Kennaway -1, -1, -1, -1, -1, /* 0-4 */
306ddd58736SKris Kennaway -1, -1, -1, -1, -1, /* 5-9 */
307e71b7053SJung-uk Kim -1, -1, /* 10-11 */
308e71b7053SJung-uk Kim 0, /* 12 V_ASN1_UTF8STRING */
309e71b7053SJung-uk Kim -1, -1, -1, -1, -1, /* 13-17 */
310e71b7053SJung-uk Kim 1, /* 18 V_ASN1_NUMERICSTRING */
311e71b7053SJung-uk Kim 1, /* 19 V_ASN1_PRINTABLESTRING */
312e71b7053SJung-uk Kim 1, /* 20 V_ASN1_T61STRING */
313e71b7053SJung-uk Kim -1, /* 21 */
314e71b7053SJung-uk Kim 1, /* 22 V_ASN1_IA5STRING */
315e71b7053SJung-uk Kim 1, /* 23 V_ASN1_UTCTIME */
316e71b7053SJung-uk Kim 1, /* 24 V_ASN1_GENERALIZEDTIME */
317e71b7053SJung-uk Kim -1, /* 25 */
318e71b7053SJung-uk Kim 1, /* 26 V_ASN1_ISO64STRING */
319e71b7053SJung-uk Kim -1, /* 27 */
320e71b7053SJung-uk Kim 4, /* 28 V_ASN1_UNIVERSALSTRING */
321e71b7053SJung-uk Kim -1, /* 29 */
322e71b7053SJung-uk Kim 2 /* 30 V_ASN1_BMPSTRING */
323ddd58736SKris Kennaway };
324ddd58736SKris Kennaway
3256f9291ceSJung-uk Kim /*
3266f9291ceSJung-uk Kim * This is the main function, print out an ASN1_STRING taking note of various
3276f9291ceSJung-uk Kim * escape and display options. Returns number of characters written or -1 if
3286f9291ceSJung-uk Kim * an error occurred.
329ddd58736SKris Kennaway */
330ddd58736SKris Kennaway
do_print_ex(char_io * io_ch,void * arg,unsigned long lflags,const ASN1_STRING * str)3316f9291ceSJung-uk Kim static int do_print_ex(char_io *io_ch, void *arg, unsigned long lflags,
332e71b7053SJung-uk Kim const ASN1_STRING *str)
333ddd58736SKris Kennaway {
334ddd58736SKris Kennaway int outlen, len;
335ddd58736SKris Kennaway int type;
336ddd58736SKris Kennaway char quotes;
337e71b7053SJung-uk Kim unsigned short flags;
338ddd58736SKris Kennaway quotes = 0;
339ddd58736SKris Kennaway /* Keep a copy of escape flags */
340e71b7053SJung-uk Kim flags = (unsigned short)(lflags & ESC_FLAGS);
341ddd58736SKris Kennaway
342ddd58736SKris Kennaway type = str->type;
343ddd58736SKris Kennaway
344ddd58736SKris Kennaway outlen = 0;
345ddd58736SKris Kennaway
346ddd58736SKris Kennaway if (lflags & ASN1_STRFLGS_SHOW_TYPE) {
347ddd58736SKris Kennaway const char *tagname;
348ddd58736SKris Kennaway tagname = ASN1_tag2str(type);
349ddd58736SKris Kennaway outlen += strlen(tagname);
3506f9291ceSJung-uk Kim if (!io_ch(arg, tagname, outlen) || !io_ch(arg, ":", 1))
3516f9291ceSJung-uk Kim return -1;
352ddd58736SKris Kennaway outlen++;
353ddd58736SKris Kennaway }
354ddd58736SKris Kennaway
355ddd58736SKris Kennaway /* Decide what to do with type, either dump content or display it */
356ddd58736SKris Kennaway
357ddd58736SKris Kennaway /* Dump everything */
3586f9291ceSJung-uk Kim if (lflags & ASN1_STRFLGS_DUMP_ALL)
3596f9291ceSJung-uk Kim type = -1;
360ddd58736SKris Kennaway /* Ignore the string type */
3616f9291ceSJung-uk Kim else if (lflags & ASN1_STRFLGS_IGNORE_TYPE)
3626f9291ceSJung-uk Kim type = 1;
363ddd58736SKris Kennaway else {
364ddd58736SKris Kennaway /* Else determine width based on type */
3656f9291ceSJung-uk Kim if ((type > 0) && (type < 31))
3666f9291ceSJung-uk Kim type = tag2nbyte[type];
3676f9291ceSJung-uk Kim else
3686f9291ceSJung-uk Kim type = -1;
3696f9291ceSJung-uk Kim if ((type == -1) && !(lflags & ASN1_STRFLGS_DUMP_UNKNOWN))
3706f9291ceSJung-uk Kim type = 1;
371ddd58736SKris Kennaway }
372ddd58736SKris Kennaway
373ddd58736SKris Kennaway if (type == -1) {
374ddd58736SKris Kennaway len = do_dump(lflags, io_ch, arg, str);
3756f9291ceSJung-uk Kim if (len < 0)
3766f9291ceSJung-uk Kim return -1;
377ddd58736SKris Kennaway outlen += len;
378ddd58736SKris Kennaway return outlen;
379ddd58736SKris Kennaway }
380ddd58736SKris Kennaway
381ddd58736SKris Kennaway if (lflags & ASN1_STRFLGS_UTF8_CONVERT) {
3826f9291ceSJung-uk Kim /*
3836f9291ceSJung-uk Kim * Note: if string is UTF8 and we want to convert to UTF8 then we
3846f9291ceSJung-uk Kim * just interpret it as 1 byte per character to avoid converting
385ddd58736SKris Kennaway * twice.
386ddd58736SKris Kennaway */
3876f9291ceSJung-uk Kim if (!type)
3886f9291ceSJung-uk Kim type = 1;
3896f9291ceSJung-uk Kim else
3906f9291ceSJung-uk Kim type |= BUF_TYPE_CONVUTF8;
391ddd58736SKris Kennaway }
392ddd58736SKris Kennaway
393ddd58736SKris Kennaway len = do_buf(str->data, str->length, type, flags, "es, io_ch, NULL);
3946f9291ceSJung-uk Kim if (len < 0)
3956f9291ceSJung-uk Kim return -1;
396ddd58736SKris Kennaway outlen += len;
3976f9291ceSJung-uk Kim if (quotes)
3986f9291ceSJung-uk Kim outlen += 2;
3996f9291ceSJung-uk Kim if (!arg)
4006f9291ceSJung-uk Kim return outlen;
4016f9291ceSJung-uk Kim if (quotes && !io_ch(arg, "\"", 1))
4026f9291ceSJung-uk Kim return -1;
4033b4e3dcbSSimon L. B. Nielsen if (do_buf(str->data, str->length, type, flags, NULL, io_ch, arg) < 0)
4043b4e3dcbSSimon L. B. Nielsen return -1;
4056f9291ceSJung-uk Kim if (quotes && !io_ch(arg, "\"", 1))
4066f9291ceSJung-uk Kim return -1;
407ddd58736SKris Kennaway return outlen;
408ddd58736SKris Kennaway }
409ddd58736SKris Kennaway
410ddd58736SKris Kennaway /* Used for line indenting: print 'indent' spaces */
411ddd58736SKris Kennaway
do_indent(char_io * io_ch,void * arg,int indent)412ddd58736SKris Kennaway static int do_indent(char_io *io_ch, void *arg, int indent)
413ddd58736SKris Kennaway {
414ddd58736SKris Kennaway int i;
415ddd58736SKris Kennaway for (i = 0; i < indent; i++)
4166f9291ceSJung-uk Kim if (!io_ch(arg, " ", 1))
4176f9291ceSJung-uk Kim return 0;
418ddd58736SKris Kennaway return 1;
419ddd58736SKris Kennaway }
420ddd58736SKris Kennaway
4215c87c606SMark Murray #define FN_WIDTH_LN 25
4225c87c606SMark Murray #define FN_WIDTH_SN 10
423ddd58736SKris Kennaway
do_name_ex(char_io * io_ch,void * arg,const X509_NAME * n,int indent,unsigned long flags)424e71b7053SJung-uk Kim static int do_name_ex(char_io *io_ch, void *arg, const X509_NAME *n,
425ddd58736SKris Kennaway int indent, unsigned long flags)
426ddd58736SKris Kennaway {
427ddd58736SKris Kennaway int i, prev = -1, orflags, cnt;
428ddd58736SKris Kennaway int fn_opt, fn_nid;
429ddd58736SKris Kennaway ASN1_OBJECT *fn;
430e71b7053SJung-uk Kim const ASN1_STRING *val;
431e71b7053SJung-uk Kim const X509_NAME_ENTRY *ent;
432ddd58736SKris Kennaway char objtmp[80];
433ddd58736SKris Kennaway const char *objbuf;
434ddd58736SKris Kennaway int outlen, len;
435ddd58736SKris Kennaway char *sep_dn, *sep_mv, *sep_eq;
436ddd58736SKris Kennaway int sep_dn_len, sep_mv_len, sep_eq_len;
4376f9291ceSJung-uk Kim if (indent < 0)
4386f9291ceSJung-uk Kim indent = 0;
439ddd58736SKris Kennaway outlen = indent;
4406f9291ceSJung-uk Kim if (!do_indent(io_ch, arg, indent))
4416f9291ceSJung-uk Kim return -1;
4426f9291ceSJung-uk Kim switch (flags & XN_FLAG_SEP_MASK) {
443ddd58736SKris Kennaway case XN_FLAG_SEP_MULTILINE:
444ddd58736SKris Kennaway sep_dn = "\n";
445ddd58736SKris Kennaway sep_dn_len = 1;
446ddd58736SKris Kennaway sep_mv = " + ";
447ddd58736SKris Kennaway sep_mv_len = 3;
448ddd58736SKris Kennaway break;
449ddd58736SKris Kennaway
450ddd58736SKris Kennaway case XN_FLAG_SEP_COMMA_PLUS:
451ddd58736SKris Kennaway sep_dn = ",";
452ddd58736SKris Kennaway sep_dn_len = 1;
453ddd58736SKris Kennaway sep_mv = "+";
454ddd58736SKris Kennaway sep_mv_len = 1;
455ddd58736SKris Kennaway indent = 0;
456ddd58736SKris Kennaway break;
457ddd58736SKris Kennaway
458ddd58736SKris Kennaway case XN_FLAG_SEP_CPLUS_SPC:
459ddd58736SKris Kennaway sep_dn = ", ";
460ddd58736SKris Kennaway sep_dn_len = 2;
461ddd58736SKris Kennaway sep_mv = " + ";
462ddd58736SKris Kennaway sep_mv_len = 3;
463ddd58736SKris Kennaway indent = 0;
464ddd58736SKris Kennaway break;
465ddd58736SKris Kennaway
466ddd58736SKris Kennaway case XN_FLAG_SEP_SPLUS_SPC:
467ddd58736SKris Kennaway sep_dn = "; ";
468ddd58736SKris Kennaway sep_dn_len = 2;
469ddd58736SKris Kennaway sep_mv = " + ";
470ddd58736SKris Kennaway sep_mv_len = 3;
471ddd58736SKris Kennaway indent = 0;
472ddd58736SKris Kennaway break;
473ddd58736SKris Kennaway
474ddd58736SKris Kennaway default:
475ddd58736SKris Kennaway return -1;
476ddd58736SKris Kennaway }
477ddd58736SKris Kennaway
478ddd58736SKris Kennaway if (flags & XN_FLAG_SPC_EQ) {
479ddd58736SKris Kennaway sep_eq = " = ";
480ddd58736SKris Kennaway sep_eq_len = 3;
481ddd58736SKris Kennaway } else {
482ddd58736SKris Kennaway sep_eq = "=";
483ddd58736SKris Kennaway sep_eq_len = 1;
484ddd58736SKris Kennaway }
485ddd58736SKris Kennaway
486ddd58736SKris Kennaway fn_opt = flags & XN_FLAG_FN_MASK;
487ddd58736SKris Kennaway
488ddd58736SKris Kennaway cnt = X509_NAME_entry_count(n);
489ddd58736SKris Kennaway for (i = 0; i < cnt; i++) {
490ddd58736SKris Kennaway if (flags & XN_FLAG_DN_REV)
491ddd58736SKris Kennaway ent = X509_NAME_get_entry(n, cnt - i - 1);
4926f9291ceSJung-uk Kim else
4936f9291ceSJung-uk Kim ent = X509_NAME_get_entry(n, i);
494ddd58736SKris Kennaway if (prev != -1) {
495e71b7053SJung-uk Kim if (prev == X509_NAME_ENTRY_set(ent)) {
4966f9291ceSJung-uk Kim if (!io_ch(arg, sep_mv, sep_mv_len))
4976f9291ceSJung-uk Kim return -1;
498ddd58736SKris Kennaway outlen += sep_mv_len;
499ddd58736SKris Kennaway } else {
5006f9291ceSJung-uk Kim if (!io_ch(arg, sep_dn, sep_dn_len))
5016f9291ceSJung-uk Kim return -1;
502ddd58736SKris Kennaway outlen += sep_dn_len;
5036f9291ceSJung-uk Kim if (!do_indent(io_ch, arg, indent))
5046f9291ceSJung-uk Kim return -1;
505ddd58736SKris Kennaway outlen += indent;
506ddd58736SKris Kennaway }
507ddd58736SKris Kennaway }
508e71b7053SJung-uk Kim prev = X509_NAME_ENTRY_set(ent);
509ddd58736SKris Kennaway fn = X509_NAME_ENTRY_get_object(ent);
510ddd58736SKris Kennaway val = X509_NAME_ENTRY_get_data(ent);
511ddd58736SKris Kennaway fn_nid = OBJ_obj2nid(fn);
512ddd58736SKris Kennaway if (fn_opt != XN_FLAG_FN_NONE) {
5135c87c606SMark Murray int objlen, fld_len;
514ddd58736SKris Kennaway if ((fn_opt == XN_FLAG_FN_OID) || (fn_nid == NID_undef)) {
515dee36b4fSJung-uk Kim OBJ_obj2txt(objtmp, sizeof(objtmp), fn, 1);
5165c87c606SMark Murray fld_len = 0; /* XXX: what should this be? */
517ddd58736SKris Kennaway objbuf = objtmp;
518ddd58736SKris Kennaway } else {
5195c87c606SMark Murray if (fn_opt == XN_FLAG_FN_SN) {
5205c87c606SMark Murray fld_len = FN_WIDTH_SN;
521ddd58736SKris Kennaway objbuf = OBJ_nid2sn(fn_nid);
5225c87c606SMark Murray } else if (fn_opt == XN_FLAG_FN_LN) {
5235c87c606SMark Murray fld_len = FN_WIDTH_LN;
524ddd58736SKris Kennaway objbuf = OBJ_nid2ln(fn_nid);
5255c87c606SMark Murray } else {
5265c87c606SMark Murray fld_len = 0; /* XXX: what should this be? */
5275c87c606SMark Murray objbuf = "";
5285c87c606SMark Murray }
529ddd58736SKris Kennaway }
530ddd58736SKris Kennaway objlen = strlen(objbuf);
5316f9291ceSJung-uk Kim if (!io_ch(arg, objbuf, objlen))
5326f9291ceSJung-uk Kim return -1;
5335c87c606SMark Murray if ((objlen < fld_len) && (flags & XN_FLAG_FN_ALIGN)) {
5346f9291ceSJung-uk Kim if (!do_indent(io_ch, arg, fld_len - objlen))
5356f9291ceSJung-uk Kim return -1;
5365c87c606SMark Murray outlen += fld_len - objlen;
5375c87c606SMark Murray }
5386f9291ceSJung-uk Kim if (!io_ch(arg, sep_eq, sep_eq_len))
5396f9291ceSJung-uk Kim return -1;
540ddd58736SKris Kennaway outlen += objlen + sep_eq_len;
541ddd58736SKris Kennaway }
5426f9291ceSJung-uk Kim /*
5436f9291ceSJung-uk Kim * If the field name is unknown then fix up the DER dump flag. We
5446f9291ceSJung-uk Kim * might want to limit this further so it will DER dump on anything
5456f9291ceSJung-uk Kim * other than a few 'standard' fields.
546ddd58736SKris Kennaway */
547ddd58736SKris Kennaway if ((fn_nid == NID_undef) && (flags & XN_FLAG_DUMP_UNKNOWN_FIELDS))
548ddd58736SKris Kennaway orflags = ASN1_STRFLGS_DUMP_ALL;
5496f9291ceSJung-uk Kim else
5506f9291ceSJung-uk Kim orflags = 0;
551ddd58736SKris Kennaway
552ddd58736SKris Kennaway len = do_print_ex(io_ch, arg, flags | orflags, val);
5536f9291ceSJung-uk Kim if (len < 0)
5546f9291ceSJung-uk Kim return -1;
555ddd58736SKris Kennaway outlen += len;
556ddd58736SKris Kennaway }
557ddd58736SKris Kennaway return outlen;
558ddd58736SKris Kennaway }
559ddd58736SKris Kennaway
560ddd58736SKris Kennaway /* Wrappers round the main functions */
561ddd58736SKris Kennaway
X509_NAME_print_ex(BIO * out,const X509_NAME * nm,int indent,unsigned long flags)562e71b7053SJung-uk Kim int X509_NAME_print_ex(BIO *out, const X509_NAME *nm, int indent,
5636f9291ceSJung-uk Kim unsigned long flags)
564ddd58736SKris Kennaway {
5655c87c606SMark Murray if (flags == XN_FLAG_COMPAT)
5665c87c606SMark Murray return X509_NAME_print(out, nm, indent);
567ddd58736SKris Kennaway return do_name_ex(send_bio_chars, out, nm, indent, flags);
568ddd58736SKris Kennaway }
569ddd58736SKris Kennaway
570e71b7053SJung-uk Kim #ifndef OPENSSL_NO_STDIO
X509_NAME_print_ex_fp(FILE * fp,const X509_NAME * nm,int indent,unsigned long flags)571e71b7053SJung-uk Kim int X509_NAME_print_ex_fp(FILE *fp, const X509_NAME *nm, int indent,
5726f9291ceSJung-uk Kim unsigned long flags)
573ddd58736SKris Kennaway {
5746f9291ceSJung-uk Kim if (flags == XN_FLAG_COMPAT) {
5755c87c606SMark Murray BIO *btmp;
5765c87c606SMark Murray int ret;
5775c87c606SMark Murray btmp = BIO_new_fp(fp, BIO_NOCLOSE);
5786f9291ceSJung-uk Kim if (!btmp)
5796f9291ceSJung-uk Kim return -1;
5805c87c606SMark Murray ret = X509_NAME_print(btmp, nm, indent);
5815c87c606SMark Murray BIO_free(btmp);
5825c87c606SMark Murray return ret;
5835c87c606SMark Murray }
584ddd58736SKris Kennaway return do_name_ex(send_fp_chars, fp, nm, indent, flags);
585ddd58736SKris Kennaway }
5863b4e3dcbSSimon L. B. Nielsen #endif
587ddd58736SKris Kennaway
ASN1_STRING_print_ex(BIO * out,const ASN1_STRING * str,unsigned long flags)588e71b7053SJung-uk Kim int ASN1_STRING_print_ex(BIO *out, const ASN1_STRING *str, unsigned long flags)
589ddd58736SKris Kennaway {
590ddd58736SKris Kennaway return do_print_ex(send_bio_chars, out, flags, str);
591ddd58736SKris Kennaway }
592ddd58736SKris Kennaway
593e71b7053SJung-uk Kim #ifndef OPENSSL_NO_STDIO
ASN1_STRING_print_ex_fp(FILE * fp,const ASN1_STRING * str,unsigned long flags)594e71b7053SJung-uk Kim int ASN1_STRING_print_ex_fp(FILE *fp, const ASN1_STRING *str, unsigned long flags)
595ddd58736SKris Kennaway {
596ddd58736SKris Kennaway return do_print_ex(send_fp_chars, fp, flags, str);
597ddd58736SKris Kennaway }
5983b4e3dcbSSimon L. B. Nielsen #endif
599ddd58736SKris Kennaway
6006f9291ceSJung-uk Kim /*
6016f9291ceSJung-uk Kim * Utility function: convert any string type to UTF8, returns number of bytes
602ddd58736SKris Kennaway * in output string or a negative error code
603ddd58736SKris Kennaway */
604ddd58736SKris Kennaway
ASN1_STRING_to_UTF8(unsigned char ** out,const ASN1_STRING * in)605e71b7053SJung-uk Kim int ASN1_STRING_to_UTF8(unsigned char **out, const ASN1_STRING *in)
606ddd58736SKris Kennaway {
607ddd58736SKris Kennaway ASN1_STRING stmp, *str = &stmp;
608ddd58736SKris Kennaway int mbflag, type, ret;
6096f9291ceSJung-uk Kim if (!in)
6106f9291ceSJung-uk Kim return -1;
611ddd58736SKris Kennaway type = in->type;
6126f9291ceSJung-uk Kim if ((type < 0) || (type > 30))
6136f9291ceSJung-uk Kim return -1;
614ddd58736SKris Kennaway mbflag = tag2nbyte[type];
6156f9291ceSJung-uk Kim if (mbflag == -1)
6166f9291ceSJung-uk Kim return -1;
617ddd58736SKris Kennaway mbflag |= MBSTRING_FLAG;
618ddd58736SKris Kennaway stmp.data = NULL;
61909286989SJung-uk Kim stmp.length = 0;
620fa5fddf1SJung-uk Kim stmp.flags = 0;
6216f9291ceSJung-uk Kim ret =
6226f9291ceSJung-uk Kim ASN1_mbstring_copy(&str, in->data, in->length, mbflag,
6236f9291ceSJung-uk Kim B_ASN1_UTF8STRING);
6246f9291ceSJung-uk Kim if (ret < 0)
6256f9291ceSJung-uk Kim return ret;
6265c87c606SMark Murray *out = stmp.data;
627ddd58736SKris Kennaway return stmp.length;
628ddd58736SKris Kennaway }
629