]>
Commit | Line | Data |
---|---|---|
d02b48c6 | 1 | /* apps/sess_id.c */ |
58964a49 | 2 | /* Copyright (C) 1995-1998 Eric Young (eay@cryptsoft.com) |
d02b48c6 RE |
3 | * All rights reserved. |
4 | * | |
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. | |
0f113f3e | 8 | * |
d02b48c6 RE |
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). | |
0f113f3e | 15 | * |
d02b48c6 RE |
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. | |
0f113f3e | 22 | * |
d02b48c6 RE |
23 | * Redistribution and use in source and binary forms, with or without |
24 | * modification, are permitted provided that the following conditions | |
25 | * are met: | |
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 :-). | |
0f113f3e | 37 | * 4. If you include any Windows specific code (or a derivative thereof) from |
d02b48c6 RE |
38 | * the apps directory (application code) you must include an acknowledgement: |
39 | * "This product includes software written by Tim Hudson (tjh@cryptsoft.com)" | |
0f113f3e | 40 | * |
d02b48c6 RE |
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 | |
51 | * SUCH DAMAGE. | |
0f113f3e | 52 | * |
d02b48c6 RE |
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.] | |
57 | */ | |
58 | ||
59 | #include <stdio.h> | |
60 | #include <stdlib.h> | |
61 | #include <string.h> | |
62 | #include "apps.h" | |
ec577822 BM |
63 | #include <openssl/bio.h> |
64 | #include <openssl/err.h> | |
65 | #include <openssl/x509.h> | |
66 | #include <openssl/pem.h> | |
67 | #include <openssl/ssl.h> | |
d02b48c6 RE |
68 | |
69 | #undef PROG | |
0f113f3e | 70 | #define PROG sess_id_main |
d02b48c6 | 71 | |
0f113f3e MC |
72 | static const char *sess_id_usage[] = { |
73 | "usage: sess_id args\n", | |
74 | "\n", | |
75 | " -inform arg - input format - default PEM (DER or PEM)\n", | |
76 | " -outform arg - output format - default PEM (PEM, DER or NSS)\n", | |
77 | " -in arg - input file - default stdin\n", | |
78 | " -out arg - output file - default stdout\n", | |
79 | " -text - print ssl session id details\n", | |
80 | " -cert - output certificate \n", | |
81 | " -noout - no output of encoded session info\n", | |
82 | " -context arg - set the session ID context\n", | |
83 | NULL | |
d02b48c6 RE |
84 | }; |
85 | ||
d02b48c6 | 86 | static SSL_SESSION *load_sess_id(char *file, int format); |
667ac4ec RE |
87 | |
88 | int MAIN(int, char **); | |
89 | ||
6b691a5c | 90 | int MAIN(int argc, char **argv) |
0f113f3e MC |
91 | { |
92 | SSL_SESSION *x = NULL; | |
93 | X509 *peer = NULL; | |
94 | int ret = 1, i, num, badops = 0; | |
95 | BIO *out = NULL; | |
96 | int informat, outformat; | |
97 | char *infile = NULL, *outfile = NULL, *context = NULL; | |
98 | int cert = 0, noout = 0, text = 0; | |
99 | const char **pp; | |
d02b48c6 | 100 | |
0f113f3e | 101 | apps_startup(); |
d02b48c6 | 102 | |
0f113f3e MC |
103 | if (bio_err == NULL) |
104 | if ((bio_err = BIO_new(BIO_s_file())) != NULL) | |
105 | BIO_set_fp(bio_err, stderr, BIO_NOCLOSE | BIO_FP_TEXT); | |
d02b48c6 | 106 | |
0f113f3e MC |
107 | informat = FORMAT_PEM; |
108 | outformat = FORMAT_PEM; | |
d02b48c6 | 109 | |
0f113f3e MC |
110 | argc--; |
111 | argv++; | |
112 | num = 0; | |
113 | while (argc >= 1) { | |
114 | if (strcmp(*argv, "-inform") == 0) { | |
115 | if (--argc < 1) | |
116 | goto bad; | |
117 | informat = str2fmt(*(++argv)); | |
118 | } else if (strcmp(*argv, "-outform") == 0) { | |
119 | if (--argc < 1) | |
120 | goto bad; | |
121 | outformat = str2fmt(*(++argv)); | |
122 | } else if (strcmp(*argv, "-in") == 0) { | |
123 | if (--argc < 1) | |
124 | goto bad; | |
125 | infile = *(++argv); | |
126 | } else if (strcmp(*argv, "-out") == 0) { | |
127 | if (--argc < 1) | |
128 | goto bad; | |
129 | outfile = *(++argv); | |
130 | } else if (strcmp(*argv, "-text") == 0) | |
131 | text = ++num; | |
132 | else if (strcmp(*argv, "-cert") == 0) | |
133 | cert = ++num; | |
134 | else if (strcmp(*argv, "-noout") == 0) | |
135 | noout = ++num; | |
136 | else if (strcmp(*argv, "-context") == 0) { | |
137 | if (--argc < 1) | |
138 | goto bad; | |
139 | context = *++argv; | |
140 | } else { | |
141 | BIO_printf(bio_err, "unknown option %s\n", *argv); | |
142 | badops = 1; | |
143 | break; | |
144 | } | |
145 | argc--; | |
146 | argv++; | |
147 | } | |
d02b48c6 | 148 | |
0f113f3e MC |
149 | if (badops) { |
150 | bad: | |
151 | for (pp = sess_id_usage; (*pp != NULL); pp++) | |
152 | BIO_printf(bio_err, "%s", *pp); | |
153 | goto end; | |
154 | } | |
d02b48c6 | 155 | |
0f113f3e MC |
156 | ERR_load_crypto_strings(); |
157 | x = load_sess_id(infile, informat); | |
158 | if (x == NULL) { | |
159 | goto end; | |
160 | } | |
161 | peer = SSL_SESSION_get0_peer(x); | |
b4cadc6e | 162 | |
0f113f3e MC |
163 | if (context) { |
164 | size_t ctx_len = strlen(context); | |
165 | if (ctx_len > SSL_MAX_SID_CTX_LENGTH) { | |
166 | BIO_printf(bio_err, "Context too long\n"); | |
167 | goto end; | |
168 | } | |
61986d32 | 169 | if (!SSL_SESSION_set1_id_context(x, (unsigned char *)context, ctx_len)) { |
ac59d705 MC |
170 | BIO_printf(bio_err, "Error setting id context\n"); |
171 | goto end; | |
172 | } | |
0f113f3e | 173 | } |
d02b48c6 | 174 | |
0f113f3e MC |
175 | if (!noout || text) { |
176 | out = BIO_new(BIO_s_file()); | |
177 | if (out == NULL) { | |
178 | ERR_print_errors(bio_err); | |
179 | goto end; | |
180 | } | |
d02b48c6 | 181 | |
0f113f3e MC |
182 | if (outfile == NULL) { |
183 | BIO_set_fp(out, stdout, BIO_NOCLOSE); | |
bc36ee62 | 184 | #ifdef OPENSSL_SYS_VMS |
0f113f3e MC |
185 | { |
186 | BIO *tmpbio = BIO_new(BIO_f_linebuffer()); | |
187 | out = BIO_push(tmpbio, out); | |
188 | } | |
645749ef | 189 | #endif |
0f113f3e MC |
190 | } else { |
191 | if (BIO_write_filename(out, outfile) <= 0) { | |
192 | perror(outfile); | |
193 | goto end; | |
194 | } | |
195 | } | |
196 | } | |
d02b48c6 | 197 | |
0f113f3e MC |
198 | if (text) { |
199 | SSL_SESSION_print(out, x); | |
d02b48c6 | 200 | |
0f113f3e MC |
201 | if (cert) { |
202 | if (peer == NULL) | |
203 | BIO_puts(out, "No certificate present\n"); | |
204 | else | |
205 | X509_print(out, peer); | |
206 | } | |
207 | } | |
d02b48c6 | 208 | |
0f113f3e MC |
209 | if (!noout && !cert) { |
210 | if (outformat == FORMAT_ASN1) | |
211 | i = i2d_SSL_SESSION_bio(out, x); | |
212 | else if (outformat == FORMAT_PEM) | |
213 | i = PEM_write_bio_SSL_SESSION(out, x); | |
214 | else if (outformat == FORMAT_NSS) | |
215 | i = SSL_SESSION_print_keylog(out, x); | |
216 | else { | |
217 | BIO_printf(bio_err, "bad output format specified for outfile\n"); | |
218 | goto end; | |
219 | } | |
220 | if (!i) { | |
221 | BIO_printf(bio_err, "unable to write SSL_SESSION\n"); | |
222 | goto end; | |
223 | } | |
224 | } else if (!noout && (peer != NULL)) { /* just print the certificate */ | |
225 | if (outformat == FORMAT_ASN1) | |
226 | i = (int)i2d_X509_bio(out, peer); | |
227 | else if (outformat == FORMAT_PEM) | |
228 | i = PEM_write_bio_X509(out, peer); | |
229 | else { | |
230 | BIO_printf(bio_err, "bad output format specified for outfile\n"); | |
231 | goto end; | |
232 | } | |
233 | if (!i) { | |
234 | BIO_printf(bio_err, "unable to write X509\n"); | |
235 | goto end; | |
236 | } | |
237 | } | |
238 | ret = 0; | |
239 | end: | |
ca3a82c3 | 240 | BIO_free_all(out); |
0f113f3e MC |
241 | if (x != NULL) |
242 | SSL_SESSION_free(x); | |
243 | apps_shutdown(); | |
244 | OPENSSL_EXIT(ret); | |
245 | } | |
d02b48c6 | 246 | |
6b691a5c | 247 | static SSL_SESSION *load_sess_id(char *infile, int format) |
0f113f3e MC |
248 | { |
249 | SSL_SESSION *x = NULL; | |
250 | BIO *in = NULL; | |
d02b48c6 | 251 | |
0f113f3e MC |
252 | in = BIO_new(BIO_s_file()); |
253 | if (in == NULL) { | |
254 | ERR_print_errors(bio_err); | |
255 | goto end; | |
256 | } | |
d02b48c6 | 257 | |
0f113f3e MC |
258 | if (infile == NULL) |
259 | BIO_set_fp(in, stdin, BIO_NOCLOSE); | |
260 | else { | |
261 | if (BIO_read_filename(in, infile) <= 0) { | |
262 | perror(infile); | |
263 | goto end; | |
264 | } | |
265 | } | |
266 | if (format == FORMAT_ASN1) | |
267 | x = d2i_SSL_SESSION_bio(in, NULL); | |
268 | else if (format == FORMAT_PEM) | |
269 | x = PEM_read_bio_SSL_SESSION(in, NULL, NULL, NULL); | |
270 | else { | |
271 | BIO_printf(bio_err, "bad input format specified for input crl\n"); | |
272 | goto end; | |
273 | } | |
274 | if (x == NULL) { | |
275 | BIO_printf(bio_err, "unable to load SSL_SESSION\n"); | |
276 | ERR_print_errors(bio_err); | |
277 | goto end; | |
278 | } | |
d02b48c6 | 279 | |
0f113f3e | 280 | end: |
ca3a82c3 | 281 | BIO_free(in); |
0f113f3e MC |
282 | return (x); |
283 | } |