]>
Commit | Line | Data |
---|---|---|
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 "internal/asn1_int.h" | |
18 | ||
19 | #ifndef OPENSSL_NO_STDIO | |
20 | int X509_print_fp(FILE *fp, X509 *x) | |
21 | { | |
22 | return X509_print_ex_fp(fp, x, XN_FLAG_COMPAT, X509_FLAG_COMPAT); | |
23 | } | |
24 | ||
25 | int X509_print_ex_fp(FILE *fp, X509 *x, unsigned long nmflag, | |
26 | unsigned long cflag) | |
27 | { | |
28 | BIO *b; | |
29 | int ret; | |
30 | ||
31 | if ((b = BIO_new(BIO_s_file())) == NULL) { | |
32 | X509err(X509_F_X509_PRINT_EX_FP, ERR_R_BUF_LIB); | |
33 | return (0); | |
34 | } | |
35 | BIO_set_fp(b, fp, BIO_NOCLOSE); | |
36 | ret = X509_print_ex(b, x, nmflag, cflag); | |
37 | BIO_free(b); | |
38 | return (ret); | |
39 | } | |
40 | #endif | |
41 | ||
42 | int X509_print(BIO *bp, X509 *x) | |
43 | { | |
44 | return X509_print_ex(bp, x, XN_FLAG_COMPAT, X509_FLAG_COMPAT); | |
45 | } | |
46 | ||
47 | int X509_print_ex(BIO *bp, X509 *x, unsigned long nmflags, | |
48 | unsigned long cflag) | |
49 | { | |
50 | long l; | |
51 | int ret = 0, i; | |
52 | char *m = NULL, mlch = ' '; | |
53 | int nmindent = 0; | |
54 | ASN1_INTEGER *bs; | |
55 | EVP_PKEY *pkey = NULL; | |
56 | const char *neg; | |
57 | ||
58 | if ((nmflags & XN_FLAG_SEP_MASK) == XN_FLAG_SEP_MULTILINE) { | |
59 | mlch = '\n'; | |
60 | nmindent = 12; | |
61 | } | |
62 | ||
63 | if (nmflags == X509_FLAG_COMPAT) | |
64 | nmindent = 16; | |
65 | ||
66 | if (!(cflag & X509_FLAG_NO_HEADER)) { | |
67 | if (BIO_write(bp, "Certificate:\n", 13) <= 0) | |
68 | goto err; | |
69 | if (BIO_write(bp, " Data:\n", 10) <= 0) | |
70 | goto err; | |
71 | } | |
72 | if (!(cflag & X509_FLAG_NO_VERSION)) { | |
73 | l = X509_get_version(x); | |
74 | if (BIO_printf(bp, "%8sVersion: %lu (0x%lx)\n", "", l + 1, l) <= 0) | |
75 | goto err; | |
76 | } | |
77 | if (!(cflag & X509_FLAG_NO_SERIAL)) { | |
78 | ||
79 | if (BIO_write(bp, " Serial Number:", 22) <= 0) | |
80 | goto err; | |
81 | ||
82 | bs = X509_get_serialNumber(x); | |
83 | if (bs->length <= (int)sizeof(long)) { | |
84 | ERR_set_mark(); | |
85 | l = ASN1_INTEGER_get(bs); | |
86 | ERR_pop_to_mark(); | |
87 | } else { | |
88 | l = -1; | |
89 | } | |
90 | if (l != -1) { | |
91 | if (bs->type == V_ASN1_NEG_INTEGER) { | |
92 | l = -l; | |
93 | neg = "-"; | |
94 | } else | |
95 | neg = ""; | |
96 | if (BIO_printf(bp, " %s%lu (%s0x%lx)\n", neg, l, neg, l) <= 0) | |
97 | goto err; | |
98 | } else { | |
99 | neg = (bs->type == V_ASN1_NEG_INTEGER) ? " (Negative)" : ""; | |
100 | if (BIO_printf(bp, "\n%12s%s", "", neg) <= 0) | |
101 | goto err; | |
102 | ||
103 | for (i = 0; i < bs->length; i++) { | |
104 | if (BIO_printf(bp, "%02x%c", bs->data[i], | |
105 | ((i + 1 == bs->length) ? '\n' : ':')) <= 0) | |
106 | goto err; | |
107 | } | |
108 | } | |
109 | ||
110 | } | |
111 | ||
112 | if (!(cflag & X509_FLAG_NO_SIGNAME)) { | |
113 | X509_ALGOR *tsig_alg = X509_get0_tbs_sigalg(x); | |
114 | if (X509_signature_print(bp, tsig_alg, NULL) <= 0) | |
115 | goto err; | |
116 | } | |
117 | ||
118 | if (!(cflag & X509_FLAG_NO_ISSUER)) { | |
119 | if (BIO_printf(bp, " Issuer:%c", mlch) <= 0) | |
120 | goto err; | |
121 | if (X509_NAME_print_ex(bp, X509_get_issuer_name(x), nmindent, nmflags) | |
122 | < 0) | |
123 | goto err; | |
124 | if (BIO_write(bp, "\n", 1) <= 0) | |
125 | goto err; | |
126 | } | |
127 | if (!(cflag & X509_FLAG_NO_VALIDITY)) { | |
128 | if (BIO_write(bp, " Validity\n", 17) <= 0) | |
129 | goto err; | |
130 | if (BIO_write(bp, " Not Before: ", 24) <= 0) | |
131 | goto err; | |
132 | if (!ASN1_TIME_print(bp, X509_get_notBefore(x))) | |
133 | goto err; | |
134 | if (BIO_write(bp, "\n Not After : ", 25) <= 0) | |
135 | goto err; | |
136 | if (!ASN1_TIME_print(bp, X509_get_notAfter(x))) | |
137 | goto err; | |
138 | if (BIO_write(bp, "\n", 1) <= 0) | |
139 | goto err; | |
140 | } | |
141 | if (!(cflag & X509_FLAG_NO_SUBJECT)) { | |
142 | if (BIO_printf(bp, " Subject:%c", mlch) <= 0) | |
143 | goto err; | |
144 | if (X509_NAME_print_ex | |
145 | (bp, X509_get_subject_name(x), nmindent, nmflags) < 0) | |
146 | goto err; | |
147 | if (BIO_write(bp, "\n", 1) <= 0) | |
148 | goto err; | |
149 | } | |
150 | if (!(cflag & X509_FLAG_NO_PUBKEY)) { | |
151 | X509_PUBKEY *xpkey = X509_get_X509_PUBKEY(x); | |
152 | ASN1_OBJECT *xpoid; | |
153 | X509_PUBKEY_get0_param(&xpoid, NULL, NULL, NULL, xpkey); | |
154 | if (BIO_write(bp, " Subject Public Key Info:\n", 33) <= 0) | |
155 | goto err; | |
156 | if (BIO_printf(bp, "%12sPublic Key Algorithm: ", "") <= 0) | |
157 | goto err; | |
158 | if (i2a_ASN1_OBJECT(bp, xpoid) <= 0) | |
159 | goto err; | |
160 | if (BIO_puts(bp, "\n") <= 0) | |
161 | goto err; | |
162 | ||
163 | pkey = X509_get0_pubkey(x); | |
164 | if (pkey == NULL) { | |
165 | BIO_printf(bp, "%12sUnable to load Public Key\n", ""); | |
166 | ERR_print_errors(bp); | |
167 | } else { | |
168 | EVP_PKEY_print_public(bp, pkey, 16, NULL); | |
169 | } | |
170 | } | |
171 | ||
172 | if (!(cflag & X509_FLAG_NO_IDS)) { | |
173 | ASN1_BIT_STRING *iuid, *suid; | |
174 | X509_get0_uids(&iuid, &suid, x); | |
175 | if (iuid != NULL) { | |
176 | if (BIO_printf(bp, "%8sIssuer Unique ID: ", "") <= 0) | |
177 | goto err; | |
178 | if (!X509_signature_dump(bp, iuid, 12)) | |
179 | goto err; | |
180 | } | |
181 | if (suid != NULL) { | |
182 | if (BIO_printf(bp, "%8sSubject Unique ID: ", "") <= 0) | |
183 | goto err; | |
184 | if (!X509_signature_dump(bp, suid, 12)) | |
185 | goto err; | |
186 | } | |
187 | } | |
188 | ||
189 | if (!(cflag & X509_FLAG_NO_EXTENSIONS)) | |
190 | X509V3_extensions_print(bp, "X509v3 extensions", | |
191 | X509_get0_extensions(x), cflag, 8); | |
192 | ||
193 | if (!(cflag & X509_FLAG_NO_SIGDUMP)) { | |
194 | X509_ALGOR *sig_alg; | |
195 | ASN1_BIT_STRING *sig; | |
196 | X509_get0_signature(&sig, &sig_alg, x); | |
197 | if (X509_signature_print(bp, sig_alg, sig) <= 0) | |
198 | goto err; | |
199 | } | |
200 | if (!(cflag & X509_FLAG_NO_AUX)) { | |
201 | if (!X509_aux_print(bp, x, 0)) | |
202 | goto err; | |
203 | } | |
204 | ret = 1; | |
205 | err: | |
206 | OPENSSL_free(m); | |
207 | return (ret); | |
208 | } | |
209 | ||
210 | int X509_ocspid_print(BIO *bp, X509 *x) | |
211 | { | |
212 | unsigned char *der = NULL; | |
213 | unsigned char *dertmp; | |
214 | int derlen; | |
215 | int i; | |
216 | unsigned char SHA1md[SHA_DIGEST_LENGTH]; | |
217 | ASN1_BIT_STRING *keybstr; | |
218 | X509_NAME *subj; | |
219 | ||
220 | /* | |
221 | * display the hash of the subject as it would appear in OCSP requests | |
222 | */ | |
223 | if (BIO_printf(bp, " Subject OCSP hash: ") <= 0) | |
224 | goto err; | |
225 | subj = X509_get_subject_name(x); | |
226 | derlen = i2d_X509_NAME(subj, NULL); | |
227 | if ((der = dertmp = OPENSSL_malloc(derlen)) == NULL) | |
228 | goto err; | |
229 | i2d_X509_NAME(subj, &dertmp); | |
230 | ||
231 | if (!EVP_Digest(der, derlen, SHA1md, NULL, EVP_sha1(), NULL)) | |
232 | goto err; | |
233 | for (i = 0; i < SHA_DIGEST_LENGTH; i++) { | |
234 | if (BIO_printf(bp, "%02X", SHA1md[i]) <= 0) | |
235 | goto err; | |
236 | } | |
237 | OPENSSL_free(der); | |
238 | der = NULL; | |
239 | ||
240 | /* | |
241 | * display the hash of the public key as it would appear in OCSP requests | |
242 | */ | |
243 | if (BIO_printf(bp, "\n Public key OCSP hash: ") <= 0) | |
244 | goto err; | |
245 | ||
246 | keybstr = X509_get0_pubkey_bitstr(x); | |
247 | ||
248 | if (keybstr == NULL) | |
249 | goto err; | |
250 | ||
251 | if (!EVP_Digest(ASN1_STRING_get0_data(keybstr), | |
252 | ASN1_STRING_length(keybstr), SHA1md, NULL, EVP_sha1(), | |
253 | NULL)) | |
254 | goto err; | |
255 | for (i = 0; i < SHA_DIGEST_LENGTH; i++) { | |
256 | if (BIO_printf(bp, "%02X", SHA1md[i]) <= 0) | |
257 | goto err; | |
258 | } | |
259 | BIO_printf(bp, "\n"); | |
260 | ||
261 | return (1); | |
262 | err: | |
263 | OPENSSL_free(der); | |
264 | return (0); | |
265 | } | |
266 | ||
267 | int X509_signature_dump(BIO *bp, const ASN1_STRING *sig, int indent) | |
268 | { | |
269 | const unsigned char *s; | |
270 | int i, n; | |
271 | ||
272 | n = sig->length; | |
273 | s = sig->data; | |
274 | for (i = 0; i < n; i++) { | |
275 | if ((i % 18) == 0) { | |
276 | if (BIO_write(bp, "\n", 1) <= 0) | |
277 | return 0; | |
278 | if (BIO_indent(bp, indent, indent) <= 0) | |
279 | return 0; | |
280 | } | |
281 | if (BIO_printf(bp, "%02x%s", s[i], ((i + 1) == n) ? "" : ":") <= 0) | |
282 | return 0; | |
283 | } | |
284 | if (BIO_write(bp, "\n", 1) != 1) | |
285 | return 0; | |
286 | ||
287 | return 1; | |
288 | } | |
289 | ||
290 | int X509_signature_print(BIO *bp, const X509_ALGOR *sigalg, | |
291 | const ASN1_STRING *sig) | |
292 | { | |
293 | int sig_nid; | |
294 | if (BIO_puts(bp, " Signature Algorithm: ") <= 0) | |
295 | return 0; | |
296 | if (i2a_ASN1_OBJECT(bp, sigalg->algorithm) <= 0) | |
297 | return 0; | |
298 | ||
299 | sig_nid = OBJ_obj2nid(sigalg->algorithm); | |
300 | if (sig_nid != NID_undef) { | |
301 | int pkey_nid, dig_nid; | |
302 | const EVP_PKEY_ASN1_METHOD *ameth; | |
303 | if (OBJ_find_sigid_algs(sig_nid, &dig_nid, &pkey_nid)) { | |
304 | ameth = EVP_PKEY_asn1_find(NULL, pkey_nid); | |
305 | if (ameth && ameth->sig_print) | |
306 | return ameth->sig_print(bp, sigalg, sig, 9, 0); | |
307 | } | |
308 | } | |
309 | if (sig) | |
310 | return X509_signature_dump(bp, sig, 9); | |
311 | else if (BIO_puts(bp, "\n") <= 0) | |
312 | return 0; | |
313 | return 1; | |
314 | } | |
315 | ||
316 | int X509_aux_print(BIO *out, X509 *x, int indent) | |
317 | { | |
318 | char oidstr[80], first; | |
319 | STACK_OF(ASN1_OBJECT) *trust, *reject; | |
320 | const unsigned char *alias, *keyid; | |
321 | int keyidlen; | |
322 | int i; | |
323 | if (X509_trusted(x) == 0) | |
324 | return 1; | |
325 | trust = X509_get0_trust_objects(x); | |
326 | reject = X509_get0_reject_objects(x); | |
327 | if (trust) { | |
328 | first = 1; | |
329 | BIO_printf(out, "%*sTrusted Uses:\n%*s", indent, "", indent + 2, ""); | |
330 | for (i = 0; i < sk_ASN1_OBJECT_num(trust); i++) { | |
331 | if (!first) | |
332 | BIO_puts(out, ", "); | |
333 | else | |
334 | first = 0; | |
335 | OBJ_obj2txt(oidstr, sizeof oidstr, | |
336 | sk_ASN1_OBJECT_value(trust, i), 0); | |
337 | BIO_puts(out, oidstr); | |
338 | } | |
339 | BIO_puts(out, "\n"); | |
340 | } else | |
341 | BIO_printf(out, "%*sNo Trusted Uses.\n", indent, ""); | |
342 | if (reject) { | |
343 | first = 1; | |
344 | BIO_printf(out, "%*sRejected Uses:\n%*s", indent, "", indent + 2, ""); | |
345 | for (i = 0; i < sk_ASN1_OBJECT_num(reject); i++) { | |
346 | if (!first) | |
347 | BIO_puts(out, ", "); | |
348 | else | |
349 | first = 0; | |
350 | OBJ_obj2txt(oidstr, sizeof oidstr, | |
351 | sk_ASN1_OBJECT_value(reject, i), 0); | |
352 | BIO_puts(out, oidstr); | |
353 | } | |
354 | BIO_puts(out, "\n"); | |
355 | } else | |
356 | BIO_printf(out, "%*sNo Rejected Uses.\n", indent, ""); | |
357 | alias = X509_alias_get0(x, NULL); | |
358 | if (alias) | |
359 | BIO_printf(out, "%*sAlias: %s\n", indent, "", alias); | |
360 | keyid = X509_keyid_get0(x, &keyidlen); | |
361 | if (keyid) { | |
362 | BIO_printf(out, "%*sKey Id: ", indent, ""); | |
363 | for (i = 0; i < keyidlen; i++) | |
364 | BIO_printf(out, "%s%02X", i ? ":" : "", keyid[i]); | |
365 | BIO_write(out, "\n", 1); | |
366 | } | |
367 | return 1; | |
368 | } |