]>
Commit | Line | Data |
---|---|---|
0f113f3e MC |
1 | /* |
2 | * Written by Dr Stephen N Henson (steve@openssl.org) for the OpenSSL project | |
3 | * 2006 | |
3e84b6e1 DSH |
4 | */ |
5 | /* ==================================================================== | |
6 | * Copyright (c) 2006 The OpenSSL Project. All rights reserved. | |
7 | * | |
8 | * Redistribution and use in source and binary forms, with or without | |
9 | * modification, are permitted provided that the following conditions | |
10 | * are met: | |
11 | * | |
12 | * 1. Redistributions of source code must retain the above copyright | |
0f113f3e | 13 | * notice, this list of conditions and the following disclaimer. |
3e84b6e1 DSH |
14 | * |
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 | |
18 | * distribution. | |
19 | * | |
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/)" | |
24 | * | |
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. | |
29 | * | |
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. | |
33 | * | |
34 | * 6. Redistributions of any form whatsoever must retain the following | |
35 | * acknowledgment: | |
36 | * "This product includes software developed by the OpenSSL Project | |
37 | * for use in the OpenSSL Toolkit (http://www.OpenSSL.org/)" | |
38 | * | |
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 | * ==================================================================== | |
52 | * | |
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). | |
56 | * | |
57 | */ | |
58 | #include <stdio.h> | |
59 | #include <string.h> | |
60 | #include "apps.h" | |
61 | #include <openssl/pem.h> | |
62 | #include <openssl/err.h> | |
63 | #include <openssl/evp.h> | |
64 | ||
7e1b7485 RS |
65 | typedef enum OPTION_choice { |
66 | OPT_ERR = -1, OPT_EOF = 0, OPT_HELP, | |
67 | OPT_INFORM, OPT_OUTFORM, OPT_PASSIN, OPT_PASSOUT, OPT_ENGINE, | |
68 | OPT_IN, OPT_OUT, OPT_PUBIN, OPT_PUBOUT, OPT_TEXT_PUB, | |
69 | OPT_TEXT, OPT_NOOUT, OPT_MD | |
70 | } OPTION_CHOICE; | |
71 | ||
72 | OPTIONS pkey_options[] = { | |
73 | {"help", OPT_HELP, '-', "Display this summary"}, | |
74 | {"inform", OPT_INFORM, 'F', "Input format (DER or PEM)"}, | |
75 | {"outform", OPT_OUTFORM, 'F', "Output format (DER or PEM)"}, | |
76 | {"passin", OPT_PASSIN, 's', "Input file pass phrase source"}, | |
77 | {"passout", OPT_PASSOUT, 's', "Output file pass phrase source"}, | |
78 | {"in", OPT_IN, '<', "Input file"}, | |
79 | {"out", OPT_OUT, '>', "Output file"}, | |
80 | {"pubin", OPT_PUBIN, '-', | |
81 | "Read public key from input (default is private key)"}, | |
82 | {"pubout", OPT_PUBOUT, '-', "Output public key, not private"}, | |
83 | {"text_pub", OPT_TEXT_PUB, '-', "Only output public key components"}, | |
84 | {"text", OPT_TEXT, '-', "Output in plaintext as well"}, | |
85 | {"noout", OPT_NOOUT, '-', "Don't output the key"}, | |
86 | {"", OPT_MD, '-', "Any supported cipher"}, | |
87 | #ifndef OPENSSL_NO_ENGINE | |
88 | {"engine", OPT_ENGINE, 's', "Use engine, possibly a hardware device"}, | |
89 | #endif | |
90 | {NULL} | |
91 | }; | |
3e84b6e1 | 92 | |
7e1b7485 | 93 | int pkey_main(int argc, char **argv) |
0f113f3e | 94 | { |
0f113f3e | 95 | BIO *in = NULL, *out = NULL; |
7e1b7485 | 96 | ENGINE *e = NULL; |
0f113f3e | 97 | EVP_PKEY *pkey = NULL; |
7e1b7485 RS |
98 | const EVP_CIPHER *cipher = NULL; |
99 | char *infile = NULL, *outfile = NULL, *passin = NULL, *passout = NULL; | |
333b070e | 100 | char *passinarg = NULL, *passoutarg = NULL, *prog; |
7e1b7485 RS |
101 | OPTION_CHOICE o; |
102 | int informat = FORMAT_PEM, outformat = FORMAT_PEM; | |
103 | int pubin = 0, pubout = 0, pubtext = 0, text = 0, noout = 0, ret = 1; | |
104 | ||
105 | prog = opt_init(argc, argv, pkey_options); | |
106 | while ((o = opt_next()) != OPT_EOF) { | |
107 | switch (o) { | |
108 | case OPT_EOF: | |
109 | case OPT_ERR: | |
110 | opthelp: | |
111 | BIO_printf(bio_err, "%s: Use -help for summary.\n", prog); | |
112 | goto end; | |
113 | case OPT_HELP: | |
114 | opt_help(pkey_options); | |
115 | ret = 0; | |
116 | goto end; | |
117 | case OPT_INFORM: | |
118 | if (!opt_format(opt_arg(), OPT_FMT_PEMDER, &informat)) | |
119 | goto opthelp; | |
120 | break; | |
121 | case OPT_OUTFORM: | |
122 | if (!opt_format(opt_arg(), OPT_FMT_PEMDER, &outformat)) | |
123 | goto opthelp; | |
124 | break; | |
125 | case OPT_PASSIN: | |
126 | passinarg = opt_arg(); | |
127 | break; | |
128 | case OPT_PASSOUT: | |
129 | passoutarg = opt_arg(); | |
130 | break; | |
131 | case OPT_ENGINE: | |
333b070e | 132 | e = setup_engine(opt_arg(), 0); |
7e1b7485 RS |
133 | break; |
134 | case OPT_IN: | |
135 | infile = opt_arg(); | |
136 | break; | |
137 | case OPT_OUT: | |
138 | outfile = opt_arg(); | |
139 | break; | |
140 | case OPT_PUBIN: | |
141 | pubin = pubout = pubtext = 1; | |
142 | break; | |
143 | case OPT_PUBOUT: | |
0f113f3e | 144 | pubout = 1; |
7e1b7485 RS |
145 | break; |
146 | case OPT_TEXT_PUB: | |
147 | pubtext = text = 1; | |
148 | break; | |
149 | case OPT_TEXT: | |
0f113f3e | 150 | text = 1; |
7e1b7485 RS |
151 | break; |
152 | case OPT_NOOUT: | |
0f113f3e | 153 | noout = 1; |
7e1b7485 RS |
154 | break; |
155 | case OPT_MD: | |
156 | if (!opt_cipher(opt_unknown(), &cipher)) | |
157 | goto opthelp; | |
0f113f3e | 158 | } |
0f113f3e | 159 | } |
7e1b7485 RS |
160 | argc = opt_num_rest(); |
161 | argv = opt_rest(); | |
0f113f3e | 162 | |
7e1b7485 | 163 | if (!app_passwd(passinarg, passoutarg, &passin, &passout)) { |
0f113f3e MC |
164 | BIO_printf(bio_err, "Error getting passwords\n"); |
165 | goto end; | |
166 | } | |
167 | ||
296f54ee RL |
168 | if (!app_load_modules(NULL)) |
169 | goto end; | |
170 | ||
7e1b7485 RS |
171 | out = bio_open_default(outfile, "wb"); |
172 | if (out == NULL) | |
173 | goto end; | |
0f113f3e MC |
174 | |
175 | if (pubin) | |
7e1b7485 | 176 | pkey = load_pubkey(infile, informat, 1, passin, e, "Public Key"); |
0f113f3e | 177 | else |
7e1b7485 | 178 | pkey = load_key(infile, informat, 1, passin, e, "key"); |
0f113f3e MC |
179 | if (!pkey) |
180 | goto end; | |
181 | ||
182 | if (!noout) { | |
183 | if (outformat == FORMAT_PEM) { | |
184 | if (pubout) | |
185 | PEM_write_bio_PUBKEY(out, pkey); | |
186 | else | |
187 | PEM_write_bio_PrivateKey(out, pkey, cipher, | |
188 | NULL, 0, NULL, passout); | |
189 | } else if (outformat == FORMAT_ASN1) { | |
190 | if (pubout) | |
191 | i2d_PUBKEY_bio(out, pkey); | |
192 | else | |
193 | i2d_PrivateKey_bio(out, pkey); | |
194 | } else { | |
195 | BIO_printf(bio_err, "Bad format specified for key\n"); | |
196 | goto end; | |
197 | } | |
198 | ||
199 | } | |
200 | ||
201 | if (text) { | |
202 | if (pubtext) | |
203 | EVP_PKEY_print_public(out, pkey, 0, NULL); | |
204 | else | |
205 | EVP_PKEY_print_private(out, pkey, 0, NULL); | |
206 | } | |
207 | ||
208 | ret = 0; | |
209 | ||
210 | end: | |
211 | EVP_PKEY_free(pkey); | |
212 | BIO_free_all(out); | |
213 | BIO_free(in); | |
b548a1f1 RS |
214 | OPENSSL_free(passin); |
215 | OPENSSL_free(passout); | |
0f113f3e MC |
216 | |
217 | return ret; | |
218 | } |