mirror of https://github.com/openssl/openssl.git
				
				
				
			
		
			
				
	
	
		
			484 lines
		
	
	
		
			11 KiB
		
	
	
	
		
			C
		
	
	
	
			
		
		
	
	
			484 lines
		
	
	
		
			11 KiB
		
	
	
	
		
			C
		
	
	
	
| /* Written by Dr Stephen N Henson (shenson@bigfoot.com) for the OpenSSL
 | |
|  * project 2006.
 | |
|  */
 | |
| /* ====================================================================
 | |
|  * Copyright (c) 2006 The OpenSSL Project.  All rights reserved.
 | |
|  *
 | |
|  * Redistribution and use in source and binary forms, with or without
 | |
|  * modification, are permitted provided that the following conditions
 | |
|  * are met:
 | |
|  *
 | |
|  * 1. Redistributions of source code must retain the above copyright
 | |
|  *    notice, this list of conditions and the following disclaimer. 
 | |
|  *
 | |
|  * 2. Redistributions in binary form must reproduce the above copyright
 | |
|  *    notice, this list of conditions and the following disclaimer in
 | |
|  *    the documentation and/or other materials provided with the
 | |
|  *    distribution.
 | |
|  *
 | |
|  * 3. All advertising materials mentioning features or use of this
 | |
|  *    software must display the following acknowledgment:
 | |
|  *    "This product includes software developed by the OpenSSL Project
 | |
|  *    for use in the OpenSSL Toolkit. (http://www.OpenSSL.org/)"
 | |
|  *
 | |
|  * 4. The names "OpenSSL Toolkit" and "OpenSSL Project" must not be used to
 | |
|  *    endorse or promote products derived from this software without
 | |
|  *    prior written permission. For written permission, please contact
 | |
|  *    licensing@OpenSSL.org.
 | |
|  *
 | |
|  * 5. Products derived from this software may not be called "OpenSSL"
 | |
|  *    nor may "OpenSSL" appear in their names without prior written
 | |
|  *    permission of the OpenSSL Project.
 | |
|  *
 | |
|  * 6. Redistributions of any form whatsoever must retain the following
 | |
|  *    acknowledgment:
 | |
|  *    "This product includes software developed by the OpenSSL Project
 | |
|  *    for use in the OpenSSL Toolkit (http://www.OpenSSL.org/)"
 | |
|  *
 | |
|  * THIS SOFTWARE IS PROVIDED BY THE OpenSSL PROJECT ``AS IS'' AND ANY
 | |
|  * EXPRESSED OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
 | |
|  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
 | |
|  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE OpenSSL PROJECT OR
 | |
|  * ITS CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
 | |
|  * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
 | |
|  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
 | |
|  * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
 | |
|  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT,
 | |
|  * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
 | |
|  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED
 | |
|  * OF THE POSSIBILITY OF SUCH DAMAGE.
 | |
|  * ====================================================================
 | |
|  *
 | |
|  * This product includes cryptographic software written by Eric Young
 | |
|  * (eay@cryptsoft.com).  This product includes software written by Tim
 | |
|  * Hudson (tjh@cryptsoft.com).
 | |
|  *
 | |
|  */
 | |
| 
 | |
| 
 | |
| #include "apps.h"
 | |
| #include <string.h>
 | |
| #include <openssl/err.h>
 | |
| #include <openssl/pem.h>
 | |
| #include <openssl/evp.h>
 | |
| 
 | |
| #define KEY_PRIVKEY	1
 | |
| #define KEY_PUBKEY	2
 | |
| #define KEY_CERT	3
 | |
| 
 | |
| static void usage(void);
 | |
| 
 | |
| #undef PROG
 | |
| 
 | |
| #define PROG pkeyutl_main
 | |
| 
 | |
| static EVP_PKEY_CTX *init_ctx(int *pkeysize,
 | |
| 				char *keyfile, int keyform, int key_type,
 | |
| 				char *passargin, int pkey_op, char *engine);
 | |
| 
 | |
| int MAIN(int argc, char **);
 | |
| 
 | |
| int MAIN(int argc, char **argv)
 | |
| {
 | |
| 	BIO *in = NULL, *out = NULL;
 | |
| 	char *infile = NULL, *outfile = NULL, *sigfile = NULL;
 | |
| 	char *engine = NULL;
 | |
| 	int pkey_op = EVP_PKEY_OP_SIGN, key_type = KEY_PRIVKEY;
 | |
| 	int keyform = FORMAT_PEM;
 | |
| 	char badarg = 0, rev = 0;
 | |
| 	char hexdump = 0, asn1parse = 0;
 | |
| 	EVP_PKEY_CTX *ctx = NULL;
 | |
| 	char *passargin = NULL;
 | |
| 	int keysize = -1;
 | |
| 
 | |
| 	unsigned char *buf_in = NULL, *buf_out = NULL, *sig = NULL;
 | |
| 	int buf_inlen, buf_outlen, siglen = -1;
 | |
| 
 | |
| 	int ret = 1, rv = -1;
 | |
| 
 | |
| 	argc--;
 | |
| 	argv++;
 | |
| 
 | |
| 	if(!bio_err) bio_err = BIO_new_fp(stderr, BIO_NOCLOSE);
 | |
| 
 | |
| 	if (!load_config(bio_err, NULL))
 | |
| 		goto end;
 | |
| 	ERR_load_crypto_strings();
 | |
| 	OpenSSL_add_all_algorithms();
 | |
| 	
 | |
| 	while(argc >= 1)
 | |
| 		{
 | |
| 		if (!strcmp(*argv,"-in"))
 | |
| 			{
 | |
| 			if (--argc < 1) badarg = 1;
 | |
|                         infile= *(++argv);
 | |
| 			}
 | |
| 		else if (!strcmp(*argv,"-out"))
 | |
| 			{
 | |
| 			if (--argc < 1) badarg = 1;
 | |
| 			outfile= *(++argv);
 | |
| 			}
 | |
| 		else if (!strcmp(*argv,"-sigfile"))
 | |
| 			{
 | |
| 			if (--argc < 1) badarg = 1;
 | |
| 			sigfile= *(++argv);
 | |
| 			}
 | |
| 		else if(!strcmp(*argv, "-inkey"))
 | |
| 			{
 | |
| 			if (--argc < 1)
 | |
| 				badarg = 1;
 | |
| 			else
 | |
| 				{
 | |
| 				ctx = init_ctx(&keysize,
 | |
| 						*(++argv), keyform, key_type,
 | |
| 						passargin, pkey_op, engine);
 | |
| 				if (!ctx)
 | |
| 					{
 | |
| 					BIO_puts(bio_err,
 | |
| 						"Error initializing context\n");
 | |
| 					ERR_print_errors(bio_err);
 | |
| 					badarg = 1;
 | |
| 					}
 | |
| 				}
 | |
| 			}
 | |
| 		else if (!strcmp(*argv,"-passin"))
 | |
| 			{
 | |
| 			if (--argc < 1) badarg = 1;
 | |
| 			passargin= *(++argv);
 | |
| 			}
 | |
| 		else if (strcmp(*argv,"-keyform") == 0)
 | |
| 			{
 | |
| 			if (--argc < 1) badarg = 1;
 | |
| 			keyform=str2fmt(*(++argv));
 | |
| 			}
 | |
| #ifndef OPENSSL_NO_ENGINE
 | |
| 		else if(!strcmp(*argv, "-engine"))
 | |
| 			{
 | |
| 			if (--argc < 1)
 | |
| 				badarg = 1;
 | |
| 			else
 | |
| 				engine = *(++argv);
 | |
| 			}
 | |
| #endif
 | |
| 		else if(!strcmp(*argv, "-pubin"))
 | |
| 			key_type = KEY_PUBKEY;
 | |
| 		else if(!strcmp(*argv, "-certin"))
 | |
| 			key_type = KEY_CERT;
 | |
| 		else if(!strcmp(*argv, "-asn1parse"))
 | |
| 			asn1parse = 1;
 | |
| 		else if(!strcmp(*argv, "-hexdump"))
 | |
| 			hexdump = 1;
 | |
| 		else if(!strcmp(*argv, "-sign"))
 | |
| 			pkey_op = EVP_PKEY_OP_SIGN;
 | |
| 		else if(!strcmp(*argv, "-verify"))
 | |
| 			pkey_op = EVP_PKEY_OP_VERIFY;
 | |
| 		else if(!strcmp(*argv, "-verifyrecover"))
 | |
| 			pkey_op = EVP_PKEY_OP_VERIFYRECOVER;
 | |
| 		else if(!strcmp(*argv, "-rev"))
 | |
| 			rev = 1;
 | |
| 		else if(!strcmp(*argv, "-encrypt"))
 | |
| 			pkey_op = EVP_PKEY_OP_ENCRYPT;
 | |
| 		else if(!strcmp(*argv, "-decrypt"))
 | |
| 			pkey_op = EVP_PKEY_OP_DECRYPT;
 | |
| 		else if (strcmp(*argv,"-pkeyopt") == 0)
 | |
| 			{
 | |
| 			if (--argc < 1)
 | |
| 				badarg = 1;
 | |
| 			if (!ctx)
 | |
| 				{
 | |
| 				BIO_puts(bio_err,
 | |
| 					"-param command before -inkey\n");
 | |
| 				badarg = 1;
 | |
| 				}
 | |
| 			else if (pkey_ctrl_string(ctx, *(++argv)) <= 0)
 | |
| 				{
 | |
| 				BIO_puts(bio_err, "parameter setting error\n");
 | |
| 				ERR_print_errors(bio_err);
 | |
| 				goto end;
 | |
| 				}
 | |
| 			}
 | |
| 		else badarg = 1;
 | |
| 		if(badarg)
 | |
| 			{
 | |
| 			usage();
 | |
| 			goto end;
 | |
| 			}
 | |
| 		argc--;
 | |
| 		argv++;
 | |
| 		}
 | |
| 
 | |
| 	if (!ctx)
 | |
| 		{
 | |
| 		usage();
 | |
| 		goto end;
 | |
| 		}
 | |
| 
 | |
| 	if (sigfile && (pkey_op != EVP_PKEY_OP_VERIFY))
 | |
| 		{
 | |
| 		BIO_puts(bio_err, "Signature file specified for non verify\n");
 | |
| 		goto end;
 | |
| 		}
 | |
| 
 | |
| 	if (!sigfile && (pkey_op == EVP_PKEY_OP_VERIFY))
 | |
| 		{
 | |
| 		BIO_puts(bio_err, "No signature file specified for verify\n");
 | |
| 		goto end;
 | |
| 		}
 | |
| 
 | |
| /* FIXME: seed PRNG only if needed */
 | |
| 	app_RAND_load_file(NULL, bio_err, 0);
 | |
| 
 | |
| 	if(infile)
 | |
| 		{
 | |
| 		if(!(in = BIO_new_file(infile, "rb")))
 | |
| 			{
 | |
| 			BIO_printf(bio_err, "Error Reading Input File\n");
 | |
| 			ERR_print_errors(bio_err);	
 | |
| 			goto end;
 | |
| 			}
 | |
| 		}
 | |
| 	else
 | |
| 		in = BIO_new_fp(stdin, BIO_NOCLOSE);
 | |
| 
 | |
| 	if(outfile)
 | |
| 		{
 | |
| 		if(!(out = BIO_new_file(outfile, "wb")))
 | |
| 			{
 | |
| 			BIO_printf(bio_err, "Error Creating Output File\n");
 | |
| 			ERR_print_errors(bio_err);	
 | |
| 			goto end;
 | |
| 			}
 | |
| 		}
 | |
| 	else
 | |
| 		{
 | |
| 		out = BIO_new_fp(stdout, BIO_NOCLOSE);
 | |
| #ifdef OPENSSL_SYS_VMS
 | |
| 		{
 | |
| 		    BIO *tmpbio = BIO_new(BIO_f_linebuffer());
 | |
| 		    out = BIO_push(tmpbio, out);
 | |
| 		}
 | |
| #endif
 | |
| 	}
 | |
| 
 | |
| 	if (sigfile)
 | |
| 		{
 | |
| 		BIO *sigbio = BIO_new_file(sigfile, "rb");
 | |
| 		if (!sigbio)
 | |
| 			{
 | |
| 			BIO_printf(bio_err, "Can't open signature file %s\n",
 | |
| 								sigfile);
 | |
| 			goto end;
 | |
| 			}
 | |
| 		siglen = bio_to_mem(&sig, keysize * 10, sigbio);
 | |
| 		BIO_free(sigbio);
 | |
| 		if (siglen <= 0)
 | |
| 			{
 | |
| 			BIO_printf(bio_err, "Error reading signature data\n");
 | |
| 			goto end;
 | |
| 			}
 | |
| 		}
 | |
| 	
 | |
| 	buf_out = OPENSSL_malloc(keysize);
 | |
| 
 | |
| 	/* Read the input data */
 | |
| 	buf_inlen = bio_to_mem(&buf_in, keysize * 10, in);
 | |
| 	if(buf_inlen <= 0)
 | |
| 		{
 | |
| 		BIO_printf(bio_err, "Error reading input Data\n");
 | |
| 		exit(1);
 | |
| 		}
 | |
| 	if(rev)
 | |
| 		{
 | |
| 		int i;
 | |
| 		unsigned char ctmp;
 | |
| 		for(i = 0; i < buf_inlen/2; i++)
 | |
| 			{
 | |
| 			ctmp = buf_in[i];
 | |
| 			buf_in[i] = buf_in[buf_inlen - 1 - i];
 | |
| 			buf_in[buf_inlen - 1 - i] = ctmp;
 | |
| 			}
 | |
| 		}
 | |
| 	switch(pkey_op)
 | |
| 		{
 | |
| 		case EVP_PKEY_OP_VERIFYRECOVER:
 | |
| 		rv  = EVP_PKEY_verify_recover(ctx, buf_out, &buf_outlen,
 | |
| 							buf_in, buf_inlen);
 | |
| 		break;
 | |
| 
 | |
| 		case EVP_PKEY_OP_SIGN:
 | |
| 		rv  = EVP_PKEY_sign(ctx, buf_out, &buf_outlen,
 | |
| 							buf_in, buf_inlen);
 | |
| 		break;
 | |
| 
 | |
| 		case EVP_PKEY_OP_ENCRYPT:
 | |
| 		rv  = EVP_PKEY_encrypt(ctx, buf_out, &buf_outlen,
 | |
| 							buf_in, buf_inlen);
 | |
| 		break;
 | |
| 
 | |
| 		case EVP_PKEY_OP_DECRYPT:
 | |
| 		rv  = EVP_PKEY_decrypt(ctx, buf_out, &buf_outlen,
 | |
| 							buf_in, buf_inlen);
 | |
| 		break; 
 | |
| 
 | |
| 		case EVP_PKEY_OP_VERIFY:
 | |
| 		rv  = EVP_PKEY_verify(ctx, sig, siglen, buf_in, buf_inlen);
 | |
| 		if (rv == 0)
 | |
| 			BIO_puts(out, "Signature Verification Failure\n");
 | |
| 		else if (rv == 1)
 | |
| 			BIO_puts(out, "Signature Verified Successfully\n");
 | |
| 		if (rv >= 0)
 | |
| 			goto end;
 | |
| 		break; 
 | |
| 
 | |
| 		}
 | |
| 
 | |
| 	if(rv <= 0)
 | |
| 		{
 | |
| 		BIO_printf(bio_err, "Public Key operation error\n");
 | |
| 		ERR_print_errors(bio_err);
 | |
| 		goto end;
 | |
| 		}
 | |
| 	ret = 0;
 | |
| 	if(asn1parse)
 | |
| 		{
 | |
| 		if(!ASN1_parse_dump(out, buf_out, buf_outlen, 1, -1))
 | |
| 			ERR_print_errors(bio_err);
 | |
| 		}
 | |
| 	else if(hexdump)
 | |
| 		BIO_dump(out, (char *)buf_out, buf_outlen);
 | |
| 	else
 | |
| 		BIO_write(out, buf_out, buf_outlen);
 | |
| 
 | |
| 	end:
 | |
| 	if (ctx)
 | |
| 		EVP_PKEY_CTX_free(ctx);
 | |
| 	BIO_free(in);
 | |
| 	BIO_free_all(out);
 | |
| 	if (buf_in)
 | |
| 		OPENSSL_free(buf_in);
 | |
| 	if (buf_out)
 | |
| 		OPENSSL_free(buf_out);
 | |
| 	if (sig)
 | |
| 		OPENSSL_free(sig);
 | |
| 	return ret;
 | |
| }
 | |
| 
 | |
| static void usage()
 | |
| {
 | |
| 	BIO_printf(bio_err, "Usage: pkeyutl [options]\n");
 | |
| 	BIO_printf(bio_err, "-in file        input file\n");
 | |
| 	BIO_printf(bio_err, "-out file       output file\n");
 | |
| 	BIO_printf(bio_err, "-inkey file     input key\n");
 | |
| 	BIO_printf(bio_err, "-keyform arg    private key format - default PEM\n");
 | |
| 	BIO_printf(bio_err, "-pubin          input is an RSA public\n");
 | |
| 	BIO_printf(bio_err, "-certin         input is a certificate carrying an RSA public key\n");
 | |
| 	BIO_printf(bio_err, "-ctrl X:Y       control parameters\n");
 | |
| 	BIO_printf(bio_err, "-sign           sign with private key\n");
 | |
| 	BIO_printf(bio_err, "-verify         verify with public key\n");
 | |
| 	BIO_printf(bio_err, "-encrypt        encrypt with public key\n");
 | |
| 	BIO_printf(bio_err, "-decrypt        decrypt with private key\n");
 | |
| 	BIO_printf(bio_err, "-hexdump        hex dump output\n");
 | |
| #ifndef OPENSSL_NO_ENGINE
 | |
| 	BIO_printf(bio_err, "-engine e       use engine e, possibly a hardware device.\n");
 | |
| 	BIO_printf(bio_err, "-passin arg     pass phrase source\n");
 | |
| #endif
 | |
| 
 | |
| }
 | |
| 
 | |
| static EVP_PKEY_CTX *init_ctx(int *pkeysize,
 | |
| 				char *keyfile, int keyform, int key_type,
 | |
| 				char *passargin, int pkey_op, char *engine)
 | |
| 	{
 | |
| 	ENGINE *e = NULL;
 | |
| 	EVP_PKEY *pkey = NULL;
 | |
| 	EVP_PKEY_CTX *ctx = NULL;
 | |
| 	char *passin = NULL;
 | |
| 	int rv = -1;
 | |
| 	X509 *x;
 | |
| 	if(((pkey_op == EVP_PKEY_OP_SIGN) || (pkey_op == EVP_PKEY_OP_DECRYPT))
 | |
| 		&& (key_type != KEY_PRIVKEY))
 | |
| 		{
 | |
| 		BIO_printf(bio_err, "A private key is needed for this operation\n");
 | |
| 		goto end;
 | |
| 		}
 | |
| 	if(!app_passwd(bio_err, passargin, NULL, &passin, NULL))
 | |
| 		{
 | |
| 		BIO_printf(bio_err, "Error getting password\n");
 | |
| 		goto end;
 | |
| 		}
 | |
| 	switch(key_type)
 | |
| 		{
 | |
| 		case KEY_PRIVKEY:
 | |
| 		pkey = load_key(bio_err, keyfile, keyform, 0,
 | |
| 			passin, e, "Private Key");
 | |
| 		break;
 | |
| 
 | |
| 		case KEY_PUBKEY:
 | |
| 		pkey = load_pubkey(bio_err, keyfile, keyform, 0,
 | |
| 			NULL, e, "Public Key");
 | |
| 		break;
 | |
| 
 | |
| 		case KEY_CERT:
 | |
| 		x = load_cert(bio_err, keyfile, keyform,
 | |
| 			NULL, e, "Certificate");
 | |
| 		if(x)
 | |
| 			{
 | |
| 			pkey = X509_get_pubkey(x);
 | |
| 			X509_free(x);
 | |
| 			}
 | |
| 		break;
 | |
| 
 | |
| 		}
 | |
| 
 | |
| 	*pkeysize = EVP_PKEY_size(pkey);
 | |
| 
 | |
| 	if (!pkey)
 | |
| 		goto end;
 | |
| 
 | |
| 	ctx = EVP_PKEY_CTX_new(pkey, NULL);
 | |
| 
 | |
| 	EVP_PKEY_free(pkey);
 | |
| 
 | |
| 	if (!ctx)
 | |
| 		goto end;
 | |
| 
 | |
| 	switch(pkey_op)
 | |
| 		{
 | |
| 		case EVP_PKEY_OP_SIGN:
 | |
| 		rv = EVP_PKEY_sign_init(ctx);
 | |
| 		break;
 | |
| 
 | |
| 		case EVP_PKEY_OP_VERIFY:
 | |
| 		rv = EVP_PKEY_verify_init(ctx);
 | |
| 		break;
 | |
| 
 | |
| 		case EVP_PKEY_OP_VERIFYRECOVER:
 | |
| 		rv = EVP_PKEY_verify_recover_init(ctx);
 | |
| 		break;
 | |
| 
 | |
| 		case EVP_PKEY_OP_ENCRYPT:
 | |
| 		rv = EVP_PKEY_encrypt_init(ctx);
 | |
| 		break;
 | |
| 
 | |
| 		case EVP_PKEY_OP_DECRYPT:
 | |
| 		rv = EVP_PKEY_decrypt_init(ctx);
 | |
| 		break;
 | |
| 		}
 | |
| 
 | |
| 	if (rv <= 0)
 | |
| 		{
 | |
| 		EVP_PKEY_CTX_free(ctx);
 | |
| 		ctx = NULL;
 | |
| 		}
 | |
| 
 | |
| 	end:
 | |
| 
 | |
| 	if (passin)
 | |
| 		OPENSSL_free(passin);
 | |
| 
 | |
| 	return ctx;
 | |
| 
 | |
| 
 | |
| 	}
 | |
| 
 |