2 * Written by Dr Stephen N Henson (steve@openssl.org) for the OpenSSL project
5 /* ====================================================================
6 * Copyright (c) 2006 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).
61 #include <openssl/err.h>
62 #include <openssl/pem.h>
63 #include <openssl/evp.h>
69 static void usage(void);
73 #define PROG pkeyutl_main
75 static EVP_PKEY_CTX
*init_ctx(int *pkeysize
,
76 char *keyfile
, int keyform
, int key_type
,
77 char *passargin
, int pkey_op
, ENGINE
*e
,
80 static int setup_peer(BIO
*err
, EVP_PKEY_CTX
*ctx
, int peerform
,
81 const char *file
, ENGINE
* e
);
83 static int do_keyop(EVP_PKEY_CTX
*ctx
, int pkey_op
,
84 unsigned char *out
, size_t *poutlen
,
85 unsigned char *in
, size_t inlen
);
87 int MAIN(int argc
, char **);
89 int MAIN(int argc
, char **argv
)
91 BIO
*in
= NULL
, *out
= NULL
;
92 char *infile
= NULL
, *outfile
= NULL
, *sigfile
= NULL
;
94 int pkey_op
= EVP_PKEY_OP_SIGN
, key_type
= KEY_PRIVKEY
;
95 int keyform
= FORMAT_PEM
, peerform
= FORMAT_PEM
;
96 char badarg
= 0, rev
= 0;
97 char hexdump
= 0, asn1parse
= 0;
98 EVP_PKEY_CTX
*ctx
= NULL
;
99 char *passargin
= NULL
;
103 unsigned char *buf_in
= NULL
, *buf_out
= NULL
, *sig
= NULL
;
105 int buf_inlen
= 0, siglen
= -1;
107 int ret
= 1, rv
= -1;
113 bio_err
= BIO_new_fp(stderr
, BIO_NOCLOSE
);
115 if (!load_config(bio_err
, NULL
))
117 ERR_load_crypto_strings();
118 OpenSSL_add_all_algorithms();
121 if (!strcmp(*argv
, "-in")) {
126 } else if (!strcmp(*argv
, "-out")) {
131 } else if (!strcmp(*argv
, "-sigfile")) {
136 } else if (!strcmp(*argv
, "-inkey")) {
140 ctx
= init_ctx(&keysize
,
141 *(++argv
), keyform
, key_type
,
142 passargin
, pkey_op
, e
, engine_impl
);
144 BIO_puts(bio_err
, "Error initializing context\n");
145 ERR_print_errors(bio_err
);
149 } else if (!strcmp(*argv
, "-peerkey")) {
152 else if (!setup_peer(bio_err
, ctx
, peerform
, *(++argv
), e
))
154 } else if (!strcmp(*argv
, "-passin")) {
158 passargin
= *(++argv
);
159 } else if (strcmp(*argv
, "-peerform") == 0) {
163 peerform
= str2fmt(*(++argv
));
164 } else if (strcmp(*argv
, "-keyform") == 0) {
168 keyform
= str2fmt(*(++argv
));
170 #ifndef OPENSSL_NO_ENGINE
171 else if (!strcmp(*argv
, "-engine")) {
175 e
= setup_engine(bio_err
, *(++argv
), 0);
176 } else if (!strcmp(*argv
, "-engine_impl")) {
180 else if (!strcmp(*argv
, "-pubin"))
181 key_type
= KEY_PUBKEY
;
182 else if (!strcmp(*argv
, "-certin"))
184 else if (!strcmp(*argv
, "-asn1parse"))
186 else if (!strcmp(*argv
, "-hexdump"))
188 else if (!strcmp(*argv
, "-sign"))
189 pkey_op
= EVP_PKEY_OP_SIGN
;
190 else if (!strcmp(*argv
, "-verify"))
191 pkey_op
= EVP_PKEY_OP_VERIFY
;
192 else if (!strcmp(*argv
, "-verifyrecover"))
193 pkey_op
= EVP_PKEY_OP_VERIFYRECOVER
;
194 else if (!strcmp(*argv
, "-rev"))
196 else if (!strcmp(*argv
, "-encrypt"))
197 pkey_op
= EVP_PKEY_OP_ENCRYPT
;
198 else if (!strcmp(*argv
, "-decrypt"))
199 pkey_op
= EVP_PKEY_OP_DECRYPT
;
200 else if (!strcmp(*argv
, "-derive"))
201 pkey_op
= EVP_PKEY_OP_DERIVE
;
202 else if (strcmp(*argv
, "-pkeyopt") == 0) {
206 BIO_puts(bio_err
, "-pkeyopt command before -inkey\n");
208 } else if (pkey_ctrl_string(ctx
, *(++argv
)) <= 0) {
209 BIO_puts(bio_err
, "parameter setting error\n");
210 ERR_print_errors(bio_err
);
228 if (sigfile
&& (pkey_op
!= EVP_PKEY_OP_VERIFY
)) {
229 BIO_puts(bio_err
, "Signature file specified for non verify\n");
233 if (!sigfile
&& (pkey_op
== EVP_PKEY_OP_VERIFY
)) {
234 BIO_puts(bio_err
, "No signature file specified for verify\n");
238 /* FIXME: seed PRNG only if needed */
239 app_RAND_load_file(NULL
, bio_err
, 0);
241 if (pkey_op
!= EVP_PKEY_OP_DERIVE
) {
243 if (!(in
= BIO_new_file(infile
, "rb"))) {
244 BIO_puts(bio_err
, "Error Opening Input File\n");
245 ERR_print_errors(bio_err
);
249 in
= BIO_new_fp(stdin
, BIO_NOCLOSE
);
253 if (!(out
= BIO_new_file(outfile
, "wb"))) {
254 BIO_printf(bio_err
, "Error Creating Output File\n");
255 ERR_print_errors(bio_err
);
259 out
= BIO_new_fp(stdout
, BIO_NOCLOSE
);
260 #ifdef OPENSSL_SYS_VMS
262 BIO
*tmpbio
= BIO_new(BIO_f_linebuffer());
263 out
= BIO_push(tmpbio
, out
);
269 BIO
*sigbio
= BIO_new_file(sigfile
, "rb");
271 BIO_printf(bio_err
, "Can't open signature file %s\n", sigfile
);
274 siglen
= bio_to_mem(&sig
, keysize
* 10, sigbio
);
277 BIO_printf(bio_err
, "Error reading signature data\n");
283 /* Read the input data */
284 buf_inlen
= bio_to_mem(&buf_in
, keysize
* 10, in
);
285 if (buf_inlen
<= 0) {
286 BIO_printf(bio_err
, "Error reading input Data\n");
292 size_t l
= (size_t)buf_inlen
;
293 for (i
= 0; i
< l
/ 2; i
++) {
295 buf_in
[i
] = buf_in
[l
- 1 - i
];
296 buf_in
[l
- 1 - i
] = ctmp
;
301 if (pkey_op
== EVP_PKEY_OP_VERIFY
) {
302 rv
= EVP_PKEY_verify(ctx
, sig
, (size_t)siglen
,
303 buf_in
, (size_t)buf_inlen
);
305 BIO_puts(out
, "Signature Verification Failure\n");
307 BIO_puts(out
, "Signature Verified Successfully\n");
311 rv
= do_keyop(ctx
, pkey_op
, NULL
, (size_t *)&buf_outlen
,
312 buf_in
, (size_t)buf_inlen
);
314 buf_out
= OPENSSL_malloc(buf_outlen
);
318 rv
= do_keyop(ctx
, pkey_op
,
319 buf_out
, (size_t *)&buf_outlen
,
320 buf_in
, (size_t)buf_inlen
);
325 BIO_printf(bio_err
, "Public Key operation error\n");
326 ERR_print_errors(bio_err
);
331 if (!ASN1_parse_dump(out
, buf_out
, buf_outlen
, 1, -1))
332 ERR_print_errors(bio_err
);
334 BIO_dump(out
, (char *)buf_out
, buf_outlen
);
336 BIO_write(out
, buf_out
, buf_outlen
);
340 EVP_PKEY_CTX_free(ctx
);
344 OPENSSL_free(buf_in
);
346 OPENSSL_free(buf_out
);
354 BIO_printf(bio_err
, "Usage: pkeyutl [options]\n");
355 BIO_printf(bio_err
, "-in file input file\n");
356 BIO_printf(bio_err
, "-out file output file\n");
358 "-sigfile file signature file (verify operation only)\n");
359 BIO_printf(bio_err
, "-inkey file input key\n");
360 BIO_printf(bio_err
, "-keyform arg private key format - default PEM\n");
361 BIO_printf(bio_err
, "-pubin input is a public key\n");
363 "-certin input is a certificate carrying a public key\n");
364 BIO_printf(bio_err
, "-pkeyopt X:Y public key options\n");
365 BIO_printf(bio_err
, "-sign sign with private key\n");
366 BIO_printf(bio_err
, "-verify verify with public key\n");
368 "-verifyrecover verify with public key, recover original data\n");
369 BIO_printf(bio_err
, "-encrypt encrypt with public key\n");
370 BIO_printf(bio_err
, "-decrypt decrypt with private key\n");
371 BIO_printf(bio_err
, "-derive derive shared secret\n");
372 BIO_printf(bio_err
, "-hexdump hex dump output\n");
373 #ifndef OPENSSL_NO_ENGINE
375 "-engine e use engine e, maybe a hardware device, for loading keys.\n");
376 BIO_printf(bio_err
, "-engine_impl also use engine given by -engine for crypto operations\n");
378 BIO_printf(bio_err
, "-passin arg pass phrase source\n");
382 static EVP_PKEY_CTX
*init_ctx(int *pkeysize
,
383 char *keyfile
, int keyform
, int key_type
,
384 char *passargin
, int pkey_op
, ENGINE
*e
,
387 EVP_PKEY
*pkey
= NULL
;
388 EVP_PKEY_CTX
*ctx
= NULL
;
393 if (((pkey_op
== EVP_PKEY_OP_SIGN
) || (pkey_op
== EVP_PKEY_OP_DECRYPT
)
394 || (pkey_op
== EVP_PKEY_OP_DERIVE
))
395 && (key_type
!= KEY_PRIVKEY
)) {
396 BIO_printf(bio_err
, "A private key is needed for this operation\n");
399 if (!app_passwd(bio_err
, passargin
, NULL
, &passin
, NULL
)) {
400 BIO_printf(bio_err
, "Error getting password\n");
405 pkey
= load_key(bio_err
, keyfile
, keyform
, 0,
406 passin
, e
, "Private Key");
410 pkey
= load_pubkey(bio_err
, keyfile
, keyform
, 0,
411 NULL
, e
, "Public Key");
415 x
= load_cert(bio_err
, keyfile
, keyform
, NULL
, e
, "Certificate");
417 pkey
= X509_get_pubkey(x
);
424 *pkeysize
= EVP_PKEY_size(pkey
);
429 #ifndef OPENSSL_NO_ENGINE
434 ctx
= EVP_PKEY_CTX_new(pkey
, impl
);
442 case EVP_PKEY_OP_SIGN
:
443 rv
= EVP_PKEY_sign_init(ctx
);
446 case EVP_PKEY_OP_VERIFY
:
447 rv
= EVP_PKEY_verify_init(ctx
);
450 case EVP_PKEY_OP_VERIFYRECOVER
:
451 rv
= EVP_PKEY_verify_recover_init(ctx
);
454 case EVP_PKEY_OP_ENCRYPT
:
455 rv
= EVP_PKEY_encrypt_init(ctx
);
458 case EVP_PKEY_OP_DECRYPT
:
459 rv
= EVP_PKEY_decrypt_init(ctx
);
462 case EVP_PKEY_OP_DERIVE
:
463 rv
= EVP_PKEY_derive_init(ctx
);
468 EVP_PKEY_CTX_free(ctx
);
475 OPENSSL_free(passin
);
481 static int setup_peer(BIO
*err
, EVP_PKEY_CTX
*ctx
, int peerform
,
482 const char *file
, ENGINE
* e
)
484 EVP_PKEY
*peer
= NULL
;
485 ENGINE
* engine
= NULL
;
488 BIO_puts(err
, "-peerkey command before -inkey\n");
492 if (peerform
== FORMAT_ENGINE
)
495 peer
= load_pubkey(bio_err
, file
, peerform
, 0, NULL
, engine
, "Peer Key");
498 BIO_printf(bio_err
, "Error reading peer key %s\n", file
);
499 ERR_print_errors(err
);
503 ret
= EVP_PKEY_derive_set_peer(ctx
, peer
);
507 ERR_print_errors(err
);
511 static int do_keyop(EVP_PKEY_CTX
*ctx
, int pkey_op
,
512 unsigned char *out
, size_t *poutlen
,
513 unsigned char *in
, size_t inlen
)
517 case EVP_PKEY_OP_VERIFYRECOVER
:
518 rv
= EVP_PKEY_verify_recover(ctx
, out
, poutlen
, in
, inlen
);
521 case EVP_PKEY_OP_SIGN
:
522 rv
= EVP_PKEY_sign(ctx
, out
, poutlen
, in
, inlen
);
525 case EVP_PKEY_OP_ENCRYPT
:
526 rv
= EVP_PKEY_encrypt(ctx
, out
, poutlen
, in
, inlen
);
529 case EVP_PKEY_OP_DECRYPT
:
530 rv
= EVP_PKEY_decrypt(ctx
, out
, poutlen
, in
, inlen
);
533 case EVP_PKEY_OP_DERIVE
:
534 rv
= EVP_PKEY_derive(ctx
, out
, poutlen
);