Fix error handling in X509_REQ_print_ex
[openssl.git] / crypto / x509 / t_req.c
1 /*
2  * Copyright 1995-2016 The OpenSSL Project Authors. All Rights Reserved.
3  *
4  * Licensed under the OpenSSL license (the "License").  You may not use
5  * this file except in compliance with the License.  You can obtain a copy
6  * in the file LICENSE in the source distribution or at
7  * https://www.openssl.org/source/license.html
8  */
9
10 #include <stdio.h>
11 #include "internal/cryptlib.h"
12 #include <openssl/buffer.h>
13 #include <openssl/bn.h>
14 #include <openssl/objects.h>
15 #include <openssl/x509.h>
16 #include <openssl/x509v3.h>
17 #include <openssl/rsa.h>
18 #include <openssl/dsa.h>
19
20 #ifndef OPENSSL_NO_STDIO
21 int X509_REQ_print_fp(FILE *fp, X509_REQ *x)
22 {
23     BIO *b;
24     int ret;
25
26     if ((b = BIO_new(BIO_s_file())) == NULL) {
27         X509err(X509_F_X509_REQ_PRINT_FP, ERR_R_BUF_LIB);
28         return 0;
29     }
30     BIO_set_fp(b, fp, BIO_NOCLOSE);
31     ret = X509_REQ_print(b, x);
32     BIO_free(b);
33     return ret;
34 }
35 #endif
36
37 int X509_REQ_print_ex(BIO *bp, X509_REQ *x, unsigned long nmflags,
38                       unsigned long cflag)
39 {
40     long l;
41     int i;
42     EVP_PKEY *pkey;
43     STACK_OF(X509_EXTENSION) *exts;
44     char mlch = ' ';
45     int nmindent = 0;
46
47     if ((nmflags & XN_FLAG_SEP_MASK) == XN_FLAG_SEP_MULTILINE) {
48         mlch = '\n';
49         nmindent = 12;
50     }
51
52     if (nmflags == X509_FLAG_COMPAT)
53         nmindent = 16;
54
55     if (!(cflag & X509_FLAG_NO_HEADER)) {
56         if (BIO_write(bp, "Certificate Request:\n", 21) <= 0)
57             goto err;
58         if (BIO_write(bp, "    Data:\n", 10) <= 0)
59             goto err;
60     }
61     if (!(cflag & X509_FLAG_NO_VERSION)) {
62         l = X509_REQ_get_version(x);
63         if (l >= 0 && l <= 2) {
64             if (BIO_printf(bp, "%8sVersion: %ld (0x%lx)\n", "", l + 1, (unsigned long)l) <= 0)
65                 goto err;
66         } else {
67             if (BIO_printf(bp, "%8sVersion: Unknown (%ld)\n", "", l) <= 0)
68                 goto err;
69         }
70     }
71     if (!(cflag & X509_FLAG_NO_SUBJECT)) {
72         if (BIO_printf(bp, "        Subject:%c", mlch) <= 0)
73             goto err;
74         if (X509_NAME_print_ex(bp, X509_REQ_get_subject_name(x),
75             nmindent, nmflags) < 0)
76             goto err;
77         if (BIO_write(bp, "\n", 1) <= 0)
78             goto err;
79     }
80     if (!(cflag & X509_FLAG_NO_PUBKEY)) {
81         X509_PUBKEY *xpkey;
82         ASN1_OBJECT *koid;
83         if (BIO_write(bp, "        Subject Public Key Info:\n", 33) <= 0)
84             goto err;
85         if (BIO_printf(bp, "%12sPublic Key Algorithm: ", "") <= 0)
86             goto err;
87         xpkey = X509_REQ_get_X509_PUBKEY(x);
88         X509_PUBKEY_get0_param(&koid, NULL, NULL, NULL, xpkey);
89         if (i2a_ASN1_OBJECT(bp, koid) <= 0)
90             goto err;
91         if (BIO_puts(bp, "\n") <= 0)
92             goto err;
93
94         pkey = X509_REQ_get0_pubkey(x);
95         if (pkey == NULL) {
96             if (BIO_printf(bp, "%12sUnable to load Public Key\n", "") <= 0)
97                 goto err;
98             ERR_print_errors(bp);
99         } else {
100             if (EVP_PKEY_print_public(bp, pkey, 16, NULL) <= 0)
101                 goto err;
102         }
103     }
104
105     if (!(cflag & X509_FLAG_NO_ATTRIBUTES)) {
106         /* may not be */
107         if (BIO_printf(bp, "%8sAttributes:\n", "") <= 0)
108             goto err;
109
110         if (X509_REQ_get_attr_count(x) == 0) {
111             if (BIO_printf(bp, "%12sa0:00\n", "") <= 0)
112                 goto err;
113         } else {
114             for (i = 0; i < X509_REQ_get_attr_count(x); i++) {
115                 ASN1_TYPE *at;
116                 X509_ATTRIBUTE *a;
117                 ASN1_BIT_STRING *bs = NULL;
118                 ASN1_OBJECT *aobj;
119                 int j, type = 0, count = 1, ii = 0;
120
121                 a = X509_REQ_get_attr(x, i);
122                 aobj = X509_ATTRIBUTE_get0_object(a);
123                 if (X509_REQ_extension_nid(OBJ_obj2nid(aobj)))
124                     continue;
125                 if (BIO_printf(bp, "%12s", "") <= 0)
126                     goto err;
127                 if ((j = i2a_ASN1_OBJECT(bp, aobj)) > 0) {
128                     ii = 0;
129                     count = X509_ATTRIBUTE_count(a);
130  get_next:
131                     at = X509_ATTRIBUTE_get0_type(a, ii);
132                     type = at->type;
133                     bs = at->value.asn1_string;
134                 }
135                 for (j = 25 - j; j > 0; j--)
136                     if (BIO_write(bp, " ", 1) != 1)
137                         goto err;
138                 if (BIO_puts(bp, ":") <= 0)
139                     goto err;
140                 switch (type) {
141                 case V_ASN1_PRINTABLESTRING:
142                 case V_ASN1_T61STRING:
143                 case V_ASN1_UTF8STRING:
144                 case V_ASN1_IA5STRING:
145                     if (BIO_write(bp, (char *)bs->data, bs->length)
146                             != bs->length)
147                         goto err;
148                     if (BIO_puts(bp, "\n") <= 0)
149                         goto err;
150                     break;
151                 default:
152                     if (BIO_puts(bp, "unable to print attribute\n") <= 0)
153                         goto err;
154                     break;
155                 }
156                 if (++ii < count)
157                     goto get_next;
158             }
159         }
160     }
161     if (!(cflag & X509_FLAG_NO_EXTENSIONS)) {
162         exts = X509_REQ_get_extensions(x);
163         if (exts) {
164             if (BIO_printf(bp, "%8sRequested Extensions:\n", "") <= 0)
165                 goto err;
166             for (i = 0; i < sk_X509_EXTENSION_num(exts); i++) {
167                 ASN1_OBJECT *obj;
168                 X509_EXTENSION *ex;
169                 int critical;
170                 ex = sk_X509_EXTENSION_value(exts, i);
171                 if (BIO_printf(bp, "%12s", "") <= 0)
172                     goto err;
173                 obj = X509_EXTENSION_get_object(ex);
174                 if (i2a_ASN1_OBJECT(bp, obj) <= 0)
175                     goto err;
176                 critical = X509_EXTENSION_get_critical(ex);
177                 if (BIO_printf(bp, ": %s\n", critical ? "critical" : "") <= 0)
178                     goto err;
179                 if (!X509V3_EXT_print(bp, ex, cflag, 16)) {
180                     if (BIO_printf(bp, "%16s", "") <= 0
181                         || ASN1_STRING_print(bp,
182                                              X509_EXTENSION_get_data(ex)) <= 0)
183                         goto err;
184                 }
185                 if (BIO_write(bp, "\n", 1) <= 0)
186                     goto err;
187             }
188             sk_X509_EXTENSION_pop_free(exts, X509_EXTENSION_free);
189         }
190     }
191
192     if (!(cflag & X509_FLAG_NO_SIGDUMP)) {
193         const X509_ALGOR *sig_alg;
194         const ASN1_BIT_STRING *sig;
195         X509_REQ_get0_signature(x, &sig, &sig_alg);
196         if (!X509_signature_print(bp, sig_alg, sig))
197             goto err;
198     }
199
200     return 1;
201  err:
202     X509err(X509_F_X509_REQ_PRINT_EX, ERR_R_BUF_LIB);
203     return 0;
204 }
205
206 int X509_REQ_print(BIO *bp, X509_REQ *x)
207 {
208     return X509_REQ_print_ex(bp, x, XN_FLAG_COMPAT, X509_FLAG_COMPAT);
209 }