]>
git.ipfire.org Git - thirdparty/openssl.git/blob - apps/nseq.c
2 /* Written by Dr Stephen N Henson (shenson@bigfoot.com) for the OpenSSL
5 /* ====================================================================
6 * Copyright (c) 1999 The OpenSSL Project. All rights reserved.
8 * Redistribution and use in source and binary forms, with or without
9 * modification, are permitted provided that the following conditions
12 * 1. Redistributions of source code must retain the above copyright
13 * notice, this list of conditions and the following disclaimer.
15 * 2. Redistributions in binary form must reproduce the above copyright
16 * notice, this list of conditions and the following disclaimer in
17 * the documentation and/or other materials provided with the
20 * 3. All advertising materials mentioning features or use of this
21 * software must display the following acknowledgment:
22 * "This product includes software developed by the OpenSSL Project
23 * for use in the OpenSSL Toolkit. (http://www.OpenSSL.org/)"
25 * 4. The names "OpenSSL Toolkit" and "OpenSSL Project" must not be used to
26 * endorse or promote products derived from this software without
27 * prior written permission. For written permission, please contact
28 * licensing@OpenSSL.org.
30 * 5. Products derived from this software may not be called "OpenSSL"
31 * nor may "OpenSSL" appear in their names without prior written
32 * permission of the OpenSSL Project.
34 * 6. Redistributions of any form whatsoever must retain the following
36 * "This product includes software developed by the OpenSSL Project
37 * for use in the OpenSSL Toolkit (http://www.OpenSSL.org/)"
39 * THIS SOFTWARE IS PROVIDED BY THE OpenSSL PROJECT ``AS IS'' AND ANY
40 * EXPRESSED OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
41 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
42 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE OpenSSL PROJECT OR
43 * ITS CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
44 * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
45 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
46 * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
47 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT,
48 * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
49 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED
50 * OF THE POSSIBILITY OF SUCH DAMAGE.
51 * ====================================================================
53 * This product includes cryptographic software written by Eric Young
54 * (eay@cryptsoft.com). This product includes software written by Tim
55 * Hudson (tjh@cryptsoft.com).
65 #define PROG nseq_main
68 static int dump_cert_text(BIO
*out
, X509
*x
);
70 static int dump_cert_text();
77 char **args
, *infile
= NULL
, *outfile
= NULL
;
78 BIO
*in
= NULL
, *out
= NULL
;
81 NETSCAPE_CERT_SEQUENCE
*seq
= NULL
;
84 if (bio_err
== NULL
) bio_err
= BIO_new_fp (stderr
, BIO_NOCLOSE
);
85 ERR_load_crypto_strings();
86 SSLeay_add_all_algorithms();
88 while (!badarg
&& *args
&& *args
[0] == '-') {
89 if (!strcmp (*args
, "-toseq")) toseq
= 1;
90 else if (!strcmp (*args
, "-in")) {
95 } else if (!strcmp (*args
, "-out")) {
105 BIO_printf (bio_err
, "Netscape certificate sequence utility\n");
106 BIO_printf (bio_err
, "Usage nseq [options]\n");
107 BIO_printf (bio_err
, "where options are\n");
108 BIO_printf (bio_err
, "-in file input file\n");
109 BIO_printf (bio_err
, "-out file output file\n");
110 BIO_printf (bio_err
, "-toseq output NS Sequence file\n");
115 if (!(in
= BIO_new_file (infile
, "r"))) {
117 "Can't open input file %s\n", infile
);
120 } else in
= BIO_new_fp(stdin
, BIO_NOCLOSE
);
123 if (!(out
= BIO_new_file (outfile
, "w"))) {
125 "Can't open output file %s\n", outfile
);
128 } else out
= BIO_new_fp(stdout
, BIO_NOCLOSE
);
131 seq
= NETSCAPE_CERT_SEQUENCE_new();
132 seq
->certs
= sk_new(NULL
);
133 while((x509
= PEM_read_bio_X509(in
, NULL
, NULL
)))
134 sk_push(seq
->certs
, (char *)x509
);
136 if(!sk_num(seq
->certs
))
138 BIO_printf (bio_err
, "Error reading certs file %s\n", infile
);
139 ERR_print_errors(bio_err
);
142 PEM_write_bio_NETSCAPE_CERT_SEQUENCE(out
, seq
);
147 if (!(seq
= PEM_read_bio_NETSCAPE_CERT_SEQUENCE(in
, NULL
, NULL
))) {
148 BIO_printf (bio_err
, "Error reading sequence file %s\n", infile
);
149 ERR_print_errors(bio_err
);
153 for(i
= 0; i
< sk_num(seq
->certs
); i
++) {
154 x509
= (X509
*) sk_value(seq
->certs
, i
);
155 dump_cert_text(out
, x509
);
156 PEM_write_bio_X509(out
, x509
);
162 NETSCAPE_CERT_SEQUENCE_free(seq
);
167 static int dump_cert_text(out
, x
)
172 X509_NAME_oneline(X509_get_subject_name(x
),buf
,256);
173 BIO_puts(out
,"subject=");
176 X509_NAME_oneline(X509_get_issuer_name(x
),buf
,256);
177 BIO_puts(out
,"\nissuer= ");