]>
git.ipfire.org Git - thirdparty/openssl.git/blob - crypto/asn1/t_x509.c
1 /* crypto/asn1/t_x509.c */
2 /* Copyright (C) 1995-1997 Eric Young (eay@cryptsoft.com)
5 * This package is an SSL implementation written
6 * by Eric Young (eay@cryptsoft.com).
7 * The implementation was written so as to conform with Netscapes SSL.
9 * This library is free for commercial and non-commercial use as long as
10 * the following conditions are aheared to. The following conditions
11 * apply to all code found in this distribution, be it the RC4, RSA,
12 * lhash, DES, etc., code; not just the SSL code. The SSL documentation
13 * included with this distribution is covered by the same copyright terms
14 * except that the holder is Tim Hudson (tjh@cryptsoft.com).
16 * Copyright remains Eric Young's, and as such any Copyright notices in
17 * the code are not to be removed.
18 * If this package is used in a product, Eric Young should be given attribution
19 * as the author of the parts of the library used.
20 * This can be in the form of a textual message at program startup or
21 * in documentation (online or textual) provided with the package.
23 * Redistribution and use in source and binary forms, with or without
24 * modification, are permitted provided that the following conditions
26 * 1. Redistributions of source code must retain the copyright
27 * notice, this list of conditions and the following disclaimer.
28 * 2. Redistributions in binary form must reproduce the above copyright
29 * notice, this list of conditions and the following disclaimer in the
30 * documentation and/or other materials provided with the distribution.
31 * 3. All advertising materials mentioning features or use of this software
32 * must display the following acknowledgement:
33 * "This product includes cryptographic software written by
34 * Eric Young (eay@cryptsoft.com)"
35 * The word 'cryptographic' can be left out if the rouines from the library
36 * being used are not cryptographic related :-).
37 * 4. If you include any Windows specific code (or a derivative thereof) from
38 * the apps directory (application code) you must include an acknowledgement:
39 * "This product includes software written by Tim Hudson (tjh@cryptsoft.com)"
41 * THIS SOFTWARE IS PROVIDED BY ERIC YOUNG ``AS IS'' AND
42 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
43 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
44 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
45 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
46 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
47 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
48 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
49 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
50 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
53 * The licence and distribution terms for any publically available version or
54 * derivative of this code cannot be changed. i.e. this code cannot simply be
55 * copied and put under another distribution licence
56 * [including the GNU Public Licence.]
73 int X509_print_fp(fp
,x
)
80 if ((b
=BIO_new(BIO_s_file())) == NULL
)
82 X509err(X509_F_X509_PRINT_FP
,ERR_R_BUF_LIB
);
85 BIO_set_fp(b
,fp
,BIO_NOCLOSE
);
104 ASN1_STRING
*str
=NULL
;
107 if (BIO_write(bp
,"Certificate:\n",13) <= 0) goto err
;
108 if (BIO_write(bp
," Data:\n",10) <= 0) goto err
;
109 l
=X509_get_version(x
);
110 if (BIO_printf(bp
,"%8sVersion: %lu (0x%lx)\n","",l
+1,l
) <= 0) goto err
;
111 if (BIO_write(bp
," Serial Number:",22) <= 0) goto err
;
113 bs
=X509_get_serialNumber(x
);
116 l
=ASN1_INTEGER_get(bs
);
124 if (BIO_printf(bp
," %s%lu (%s0x%lx)\n",neg
,l
,neg
,l
) <= 0)
129 neg
=(bs
->type
== V_ASN1_NEG_INTEGER
)?" (Negative)":"";
130 if (BIO_printf(bp
,"\n%12s%s","",neg
) <= 0) goto err
;
132 for (i
=0; i
<bs
->length
; i
++)
134 if (BIO_printf(bp
,"%02x%c",bs
->data
[i
],
135 ((i
+1 == bs
->length
)?'\n':':')) <= 0)
140 i
=OBJ_obj2nid(ci
->signature
->algorithm
);
141 if (BIO_printf(bp
,"%8sSignature Algorithm: %s\n","",
142 (i
== NID_undef
)?"UNKNOWN":OBJ_nid2ln(i
)) <= 0)
145 if (BIO_write(bp
," Issuer: ",16) <= 0) goto err
;
146 if (!X509_NAME_print(bp
,X509_get_issuer_name(x
),16)) goto err
;
147 if (BIO_write(bp
,"\n Validity\n",18) <= 0) goto err
;
148 if (BIO_write(bp
," Not Before: ",24) <= 0) goto err
;
149 if (!ASN1_UTCTIME_print(bp
,X509_get_notBefore(x
))) goto err
;
150 if (BIO_write(bp
,"\n Not After : ",25) <= 0) goto err
;
151 if (!ASN1_UTCTIME_print(bp
,X509_get_notAfter(x
))) goto err
;
152 if (BIO_write(bp
,"\n Subject: ",18) <= 0) goto err
;
153 if (!X509_NAME_print(bp
,X509_get_subject_name(x
),16)) goto err
;
154 if (BIO_write(bp
,"\n Subject Public Key Info:\n",34) <= 0)
156 i
=OBJ_obj2nid(ci
->key
->algor
->algorithm
);
157 if (BIO_printf(bp
,"%12sPublic Key Algorithm: %s\n","",
158 (i
== NID_undef
)?"UNKNOWN":OBJ_nid2ln(i
)) <= 0) goto err
;
160 pkey
=X509_get_pubkey(x
);
162 if (pkey
->type
== EVP_PKEY_RSA
)
164 BIO_printf(bp
,"%12sRSA Public Key: (%d bit)\n","",
165 BN_num_bits(pkey
->pkey
.rsa
->n
));
166 RSA_print(bp
,pkey
->pkey
.rsa
,16);
171 if (pkey
->type
== EVP_PKEY_DSA
)
173 BIO_printf(bp
,"%12sDSA Public Key:\n","");
174 DSA_print(bp
,pkey
->pkey
.dsa
,16);
178 BIO_printf(bp
,"%12sDSA Public Key:\n","");
180 n
=X509_get_ext_count(x
);
183 BIO_printf(bp
,"%8sX509v3 extensions:\n","");
186 int data_type
,pack_type
;
189 ex
=X509_get_ext(x
,i
);
190 if (BIO_printf(bp
,"%12s","") <= 0) goto err
;
191 obj
=X509_EXTENSION_get_object(ex
);
192 i2a_ASN1_OBJECT(bp
,obj
);
193 j
=X509_EXTENSION_get_critical(ex
);
194 if (BIO_printf(bp
,": %s\n%16s",j
?"critical":"","") <= 0)
197 pack_type
=X509v3_pack_type_by_OBJ(obj
);
198 data_type
=X509v3_data_type_by_OBJ(obj
);
200 if (pack_type
== X509_EXT_PACK_STRING
)
202 if (X509v3_unpack_string(
204 X509_EXTENSION_get_data(ex
)) == NULL
)
209 if ( (data_type
== V_ASN1_IA5STRING
) ||
210 (data_type
== V_ASN1_PRINTABLESTRING
) ||
211 (data_type
== V_ASN1_T61STRING
))
213 if (BIO_write(bp
,(char *)str
->data
,
217 else if (data_type
== V_ASN1_BIT_STRING
)
220 for (j
=0; j
<str
->length
; j
++)
222 BIO_printf(bp
,"%02X",
229 ASN1_OCTET_STRING_print(bp
,ex
->value
);
231 if (BIO_write(bp
,"\n",1) <= 0) goto err
;
235 i
=OBJ_obj2nid(x
->sig_alg
->algorithm
);
236 if (BIO_printf(bp
,"%4sSignature Algorithm: %s","",
237 (i
== NID_undef
)?"UNKNOWN":OBJ_nid2ln(i
)) <= 0) goto err
;
239 n
=x
->signature
->length
;
240 s
=(char *)x
->signature
->data
;
244 if (BIO_write(bp
,"\n ",9) <= 0) goto err
;
245 if (BIO_printf(bp
,"%02x%s",(unsigned char)s
[i
],
246 ((i
+1) == n
)?"":":") <= 0) goto err
;
248 if (BIO_write(bp
,"\n",1) != 1) goto err
;
251 if (str
!= NULL
) ASN1_STRING_free(str
);
252 if (m
!= NULL
) Free((char *)m
);
256 int ASN1_STRING_print(bp
,v
)
263 if (v
== NULL
) return(0);
266 for (i
=0; i
<v
->length
; i
++)
268 if ((p
[i
] > '~') || ((p
[i
] < ' ') &&
269 (p
[i
] != '\n') && (p
[i
] != '\r')))
276 if (BIO_write(bp
,buf
,n
) <= 0)
282 if (BIO_write(bp
,buf
,n
) <= 0)
287 int ASN1_UTCTIME_print(bp
,tm
)
293 static char *mon
[12]={
294 "Jan","Feb","Mar","Apr","May","Jun",
295 "Jul","Aug","Sep","Oct","Nov","Dec"};
297 int y
=0,M
=0,d
=0,h
=0,m
=0,s
=0;
302 if (i
< 10) goto err
;
303 if (v
[i
-1] == 'Z') gmt
=1;
305 if ((v
[i
] > '9') || (v
[i
] < '0')) goto err
;
306 y
= (v
[0]-'0')*10+(v
[1]-'0');
308 M
= (v
[2]-'0')*10+(v
[3]-'0');
309 if ((M
> 12) || (M
< 1)) goto err
;
310 d
= (v
[4]-'0')*10+(v
[5]-'0');
311 h
= (v
[6]-'0')*10+(v
[7]-'0');
312 m
= (v
[8]-'0')*10+(v
[9]-'0');
313 if ( (v
[10] >= '0') && (v
[10] <= '9') &&
314 (v
[11] >= '0') && (v
[11] <= '9'))
315 s
= (v
[10]-'0')*10+(v
[11]-'0');
317 if (BIO_printf(bp
,"%s %2d %02d:%02d:%02d %d%s",
318 mon
[M
-1],d
,h
,m
,s
,y
+1900,(gmt
)?" GMT":"") <= 0)
323 BIO_write(bp
,"Bad time value",14);
327 int X509_NAME_print(bp
,name
,obase
)
333 int ret
=0,l
,ll
,i
,first
=1;
338 s
=X509_NAME_oneline(name
,buf
,256);
339 s
++; /* skip the first slash */
346 ((s
[1] >= 'A') && (s
[1] <= 'Z') && (
348 ((s
[2] >= 'A') && (s
[2] <= 'Z') &&
353 if ((l
<= 0) && !first
)
356 if (BIO_write(bp
,"\n",1) != 1) goto err
;
357 for (i
=0; i
<obase
; i
++)
359 if (BIO_write(bp
," ",1) != 1) goto err
;
364 if (BIO_write(bp
,c
,i
) != i
) goto err
;
369 if (BIO_write(bp
,", ",2) != 2) goto err
;
373 if (*s
== '\0') break;
382 X509err(X509_F_X509_NAME_PRINT
,ERR_R_BUF_LIB
);