Rewrite RT3513.
[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             BIO_printf(bp, "%12sUnable to load Public Key\n", "");
97             ERR_print_errors(bp);
98         } else {
99             EVP_PKEY_print_public(bp, pkey, 16, NULL);
100         }
101     }
102
103     if (!(cflag & X509_FLAG_NO_ATTRIBUTES)) {
104         /* may not be */
105         if (BIO_printf(bp, "%8sAttributes:\n", "") <= 0)
106             goto err;
107
108         if (X509_REQ_get_attr_count(x) == 0) {
109             if (BIO_printf(bp, "%12sa0:00\n", "") <= 0)
110                 goto err;
111         } else {
112             for (i = 0; i < X509_REQ_get_attr_count(x); i++) {
113                 ASN1_TYPE *at;
114                 X509_ATTRIBUTE *a;
115                 ASN1_BIT_STRING *bs = NULL;
116                 ASN1_OBJECT *aobj;
117                 int j, type = 0, count = 1, ii = 0;
118
119                 a = X509_REQ_get_attr(x, i);
120                 aobj = X509_ATTRIBUTE_get0_object(a);
121                 if (X509_REQ_extension_nid(OBJ_obj2nid(aobj)))
122                     continue;
123                 if (BIO_printf(bp, "%12s", "") <= 0)
124                     goto err;
125                 if ((j = i2a_ASN1_OBJECT(bp, aobj)) > 0) {
126                     ii = 0;
127                     count = X509_ATTRIBUTE_count(a);
128  get_next:
129                     at = X509_ATTRIBUTE_get0_type(a, ii);
130                     type = at->type;
131                     bs = at->value.asn1_string;
132                 }
133                 for (j = 25 - j; j > 0; j--)
134                     if (BIO_write(bp, " ", 1) != 1)
135                         goto err;
136                 if (BIO_puts(bp, ":") <= 0)
137                     goto err;
138                 switch (type) {
139                 case V_ASN1_PRINTABLESTRING:
140                 case V_ASN1_T61STRING:
141                 case V_ASN1_UTF8STRING:
142                 case V_ASN1_IA5STRING:
143                     if (BIO_write(bp, (char *)bs->data, bs->length)
144                             != bs->length)
145                         goto err;
146                     BIO_puts(bp, "\n");
147                     break;
148                 default:
149                     BIO_puts(bp, "unable to print attribute\n");
150                     break;
151                 }
152                 if (++ii < count)
153                     goto get_next;
154             }
155         }
156     }
157     if (!(cflag & X509_FLAG_NO_EXTENSIONS)) {
158         exts = X509_REQ_get_extensions(x);
159         if (exts) {
160             BIO_printf(bp, "%8sRequested Extensions:\n", "");
161             for (i = 0; i < sk_X509_EXTENSION_num(exts); i++) {
162                 ASN1_OBJECT *obj;
163                 X509_EXTENSION *ex;
164                 int critical;
165                 ex = sk_X509_EXTENSION_value(exts, i);
166                 if (BIO_printf(bp, "%12s", "") <= 0)
167                     goto err;
168                 obj = X509_EXTENSION_get_object(ex);
169                 i2a_ASN1_OBJECT(bp, obj);
170                 critical = X509_EXTENSION_get_critical(ex);
171                 if (BIO_printf(bp, ": %s\n", critical ? "critical" : "") <= 0)
172                     goto err;
173                 if (!X509V3_EXT_print(bp, ex, cflag, 16)) {
174                     BIO_printf(bp, "%16s", "");
175                     ASN1_STRING_print(bp, X509_EXTENSION_get_data(ex));
176                 }
177                 if (BIO_write(bp, "\n", 1) <= 0)
178                     goto err;
179             }
180             sk_X509_EXTENSION_pop_free(exts, X509_EXTENSION_free);
181         }
182     }
183
184     if (!(cflag & X509_FLAG_NO_SIGDUMP)) {
185         const X509_ALGOR *sig_alg;
186         const ASN1_BIT_STRING *sig;
187         X509_REQ_get0_signature(x, &sig, &sig_alg);
188         if (!X509_signature_print(bp, sig_alg, sig))
189             goto err;
190     }
191
192     return 1;
193  err:
194     X509err(X509_F_X509_REQ_PRINT_EX, ERR_R_BUF_LIB);
195     return 0;
196 }
197
198 int X509_REQ_print(BIO *bp, X509_REQ *x)
199 {
200     return X509_REQ_print_ex(bp, x, XN_FLAG_COMPAT, X509_FLAG_COMPAT);
201 }