xref: /onnv-gate/usr/src/common/openssl/apps/ciphers.c (revision 2139:6243c3338933)
10Sstevel@tonic-gate /* apps/ciphers.c */
20Sstevel@tonic-gate /* Copyright (C) 1995-1998 Eric Young (eay@cryptsoft.com)
30Sstevel@tonic-gate  * All rights reserved.
40Sstevel@tonic-gate  *
50Sstevel@tonic-gate  * This package is an SSL implementation written
60Sstevel@tonic-gate  * by Eric Young (eay@cryptsoft.com).
70Sstevel@tonic-gate  * The implementation was written so as to conform with Netscapes SSL.
80Sstevel@tonic-gate  *
90Sstevel@tonic-gate  * This library is free for commercial and non-commercial use as long as
100Sstevel@tonic-gate  * the following conditions are aheared to.  The following conditions
110Sstevel@tonic-gate  * apply to all code found in this distribution, be it the RC4, RSA,
120Sstevel@tonic-gate  * lhash, DES, etc., code; not just the SSL code.  The SSL documentation
130Sstevel@tonic-gate  * included with this distribution is covered by the same copyright terms
140Sstevel@tonic-gate  * except that the holder is Tim Hudson (tjh@cryptsoft.com).
150Sstevel@tonic-gate  *
160Sstevel@tonic-gate  * Copyright remains Eric Young's, and as such any Copyright notices in
170Sstevel@tonic-gate  * the code are not to be removed.
180Sstevel@tonic-gate  * If this package is used in a product, Eric Young should be given attribution
190Sstevel@tonic-gate  * as the author of the parts of the library used.
200Sstevel@tonic-gate  * This can be in the form of a textual message at program startup or
210Sstevel@tonic-gate  * in documentation (online or textual) provided with the package.
220Sstevel@tonic-gate  *
230Sstevel@tonic-gate  * Redistribution and use in source and binary forms, with or without
240Sstevel@tonic-gate  * modification, are permitted provided that the following conditions
250Sstevel@tonic-gate  * are met:
260Sstevel@tonic-gate  * 1. Redistributions of source code must retain the copyright
270Sstevel@tonic-gate  *    notice, this list of conditions and the following disclaimer.
280Sstevel@tonic-gate  * 2. Redistributions in binary form must reproduce the above copyright
290Sstevel@tonic-gate  *    notice, this list of conditions and the following disclaimer in the
300Sstevel@tonic-gate  *    documentation and/or other materials provided with the distribution.
310Sstevel@tonic-gate  * 3. All advertising materials mentioning features or use of this software
320Sstevel@tonic-gate  *    must display the following acknowledgement:
330Sstevel@tonic-gate  *    "This product includes cryptographic software written by
340Sstevel@tonic-gate  *     Eric Young (eay@cryptsoft.com)"
350Sstevel@tonic-gate  *    The word 'cryptographic' can be left out if the rouines from the library
360Sstevel@tonic-gate  *    being used are not cryptographic related :-).
370Sstevel@tonic-gate  * 4. If you include any Windows specific code (or a derivative thereof) from
380Sstevel@tonic-gate  *    the apps directory (application code) you must include an acknowledgement:
390Sstevel@tonic-gate  *    "This product includes software written by Tim Hudson (tjh@cryptsoft.com)"
400Sstevel@tonic-gate  *
410Sstevel@tonic-gate  * THIS SOFTWARE IS PROVIDED BY ERIC YOUNG ``AS IS'' AND
420Sstevel@tonic-gate  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
430Sstevel@tonic-gate  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
440Sstevel@tonic-gate  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
450Sstevel@tonic-gate  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
460Sstevel@tonic-gate  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
470Sstevel@tonic-gate  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
480Sstevel@tonic-gate  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
490Sstevel@tonic-gate  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
500Sstevel@tonic-gate  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
510Sstevel@tonic-gate  * SUCH DAMAGE.
520Sstevel@tonic-gate  *
530Sstevel@tonic-gate  * The licence and distribution terms for any publically available version or
540Sstevel@tonic-gate  * derivative of this code cannot be changed.  i.e. this code cannot simply be
550Sstevel@tonic-gate  * copied and put under another distribution licence
560Sstevel@tonic-gate  * [including the GNU Public Licence.]
570Sstevel@tonic-gate  */
580Sstevel@tonic-gate 
590Sstevel@tonic-gate #include <stdio.h>
600Sstevel@tonic-gate #include <stdlib.h>
610Sstevel@tonic-gate #include <string.h>
620Sstevel@tonic-gate #ifdef OPENSSL_NO_STDIO
630Sstevel@tonic-gate #define APPS_WIN16
640Sstevel@tonic-gate #endif
650Sstevel@tonic-gate #include "apps.h"
660Sstevel@tonic-gate #include <openssl/err.h>
670Sstevel@tonic-gate #include <openssl/ssl.h>
680Sstevel@tonic-gate 
690Sstevel@tonic-gate #undef PROG
700Sstevel@tonic-gate #define PROG	ciphers_main
710Sstevel@tonic-gate 
72*2139Sjp161948 static const char *ciphers_usage[]={
730Sstevel@tonic-gate "usage: ciphers args\n",
740Sstevel@tonic-gate " -v          - verbose mode, a textual listing of the ciphers in SSLeay\n",
750Sstevel@tonic-gate " -ssl2       - SSL2 mode\n",
760Sstevel@tonic-gate " -ssl3       - SSL3 mode\n",
770Sstevel@tonic-gate " -tls1       - TLS1 mode\n",
780Sstevel@tonic-gate NULL
790Sstevel@tonic-gate };
800Sstevel@tonic-gate 
810Sstevel@tonic-gate int MAIN(int, char **);
820Sstevel@tonic-gate 
MAIN(int argc,char ** argv)830Sstevel@tonic-gate int MAIN(int argc, char **argv)
840Sstevel@tonic-gate 	{
850Sstevel@tonic-gate 	int ret=1,i;
860Sstevel@tonic-gate 	int verbose=0;
87*2139Sjp161948 	const char **pp;
880Sstevel@tonic-gate 	const char *p;
890Sstevel@tonic-gate 	int badops=0;
900Sstevel@tonic-gate 	SSL_CTX *ctx=NULL;
910Sstevel@tonic-gate 	SSL *ssl=NULL;
920Sstevel@tonic-gate 	char *ciphers=NULL;
930Sstevel@tonic-gate 	SSL_METHOD *meth=NULL;
940Sstevel@tonic-gate 	STACK_OF(SSL_CIPHER) *sk;
950Sstevel@tonic-gate 	char buf[512];
960Sstevel@tonic-gate 	BIO *STDout=NULL;
970Sstevel@tonic-gate 
980Sstevel@tonic-gate #if !defined(OPENSSL_NO_SSL2) && !defined(OPENSSL_NO_SSL3)
990Sstevel@tonic-gate 	meth=SSLv23_server_method();
1000Sstevel@tonic-gate #elif !defined(OPENSSL_NO_SSL3)
1010Sstevel@tonic-gate 	meth=SSLv3_server_method();
1020Sstevel@tonic-gate #elif !defined(OPENSSL_NO_SSL2)
1030Sstevel@tonic-gate 	meth=SSLv2_server_method();
1040Sstevel@tonic-gate #endif
1050Sstevel@tonic-gate 
1060Sstevel@tonic-gate 	apps_startup();
1070Sstevel@tonic-gate 
1080Sstevel@tonic-gate 	if (bio_err == NULL)
1090Sstevel@tonic-gate 		bio_err=BIO_new_fp(stderr,BIO_NOCLOSE);
1100Sstevel@tonic-gate 	STDout=BIO_new_fp(stdout,BIO_NOCLOSE);
1110Sstevel@tonic-gate #ifdef OPENSSL_SYS_VMS
1120Sstevel@tonic-gate 	{
1130Sstevel@tonic-gate 	BIO *tmpbio = BIO_new(BIO_f_linebuffer());
1140Sstevel@tonic-gate 	STDout = BIO_push(tmpbio, STDout);
1150Sstevel@tonic-gate 	}
1160Sstevel@tonic-gate #endif
1170Sstevel@tonic-gate 
1180Sstevel@tonic-gate 	argc--;
1190Sstevel@tonic-gate 	argv++;
1200Sstevel@tonic-gate 	while (argc >= 1)
1210Sstevel@tonic-gate 		{
1220Sstevel@tonic-gate 		if (strcmp(*argv,"-v") == 0)
1230Sstevel@tonic-gate 			verbose=1;
1240Sstevel@tonic-gate #ifndef OPENSSL_NO_SSL2
1250Sstevel@tonic-gate 		else if (strcmp(*argv,"-ssl2") == 0)
1260Sstevel@tonic-gate 			meth=SSLv2_client_method();
1270Sstevel@tonic-gate #endif
1280Sstevel@tonic-gate #ifndef OPENSSL_NO_SSL3
1290Sstevel@tonic-gate 		else if (strcmp(*argv,"-ssl3") == 0)
1300Sstevel@tonic-gate 			meth=SSLv3_client_method();
1310Sstevel@tonic-gate #endif
1320Sstevel@tonic-gate #ifndef OPENSSL_NO_TLS1
1330Sstevel@tonic-gate 		else if (strcmp(*argv,"-tls1") == 0)
1340Sstevel@tonic-gate 			meth=TLSv1_client_method();
1350Sstevel@tonic-gate #endif
1360Sstevel@tonic-gate 		else if ((strncmp(*argv,"-h",2) == 0) ||
1370Sstevel@tonic-gate 			 (strcmp(*argv,"-?") == 0))
1380Sstevel@tonic-gate 			{
1390Sstevel@tonic-gate 			badops=1;
1400Sstevel@tonic-gate 			break;
1410Sstevel@tonic-gate 			}
1420Sstevel@tonic-gate 		else
1430Sstevel@tonic-gate 			{
1440Sstevel@tonic-gate 			ciphers= *argv;
1450Sstevel@tonic-gate 			}
1460Sstevel@tonic-gate 		argc--;
1470Sstevel@tonic-gate 		argv++;
1480Sstevel@tonic-gate 		}
1490Sstevel@tonic-gate 
1500Sstevel@tonic-gate 	if (badops)
1510Sstevel@tonic-gate 		{
1520Sstevel@tonic-gate 		for (pp=ciphers_usage; (*pp != NULL); pp++)
1530Sstevel@tonic-gate 			BIO_printf(bio_err,"%s",*pp);
1540Sstevel@tonic-gate 		goto end;
1550Sstevel@tonic-gate 		}
1560Sstevel@tonic-gate 
1570Sstevel@tonic-gate 	OpenSSL_add_ssl_algorithms();
1580Sstevel@tonic-gate 
1590Sstevel@tonic-gate 	ctx=SSL_CTX_new(meth);
1600Sstevel@tonic-gate 	if (ctx == NULL) goto err;
1610Sstevel@tonic-gate 	if (ciphers != NULL) {
1620Sstevel@tonic-gate 		if(!SSL_CTX_set_cipher_list(ctx,ciphers)) {
1630Sstevel@tonic-gate 			BIO_printf(bio_err, "Error in cipher list\n");
1640Sstevel@tonic-gate 			goto err;
1650Sstevel@tonic-gate 		}
1660Sstevel@tonic-gate 	}
1670Sstevel@tonic-gate 	ssl=SSL_new(ctx);
1680Sstevel@tonic-gate 	if (ssl == NULL) goto err;
1690Sstevel@tonic-gate 
1700Sstevel@tonic-gate 
1710Sstevel@tonic-gate 	if (!verbose)
1720Sstevel@tonic-gate 		{
1730Sstevel@tonic-gate 		for (i=0; ; i++)
1740Sstevel@tonic-gate 			{
1750Sstevel@tonic-gate 			p=SSL_get_cipher_list(ssl,i);
1760Sstevel@tonic-gate 			if (p == NULL) break;
1770Sstevel@tonic-gate 			if (i != 0) BIO_printf(STDout,":");
1780Sstevel@tonic-gate 			BIO_printf(STDout,"%s",p);
1790Sstevel@tonic-gate 			}
1800Sstevel@tonic-gate 		BIO_printf(STDout,"\n");
1810Sstevel@tonic-gate 		}
1820Sstevel@tonic-gate 	else
1830Sstevel@tonic-gate 		{
1840Sstevel@tonic-gate 		sk=SSL_get_ciphers(ssl);
1850Sstevel@tonic-gate 
1860Sstevel@tonic-gate 		for (i=0; i<sk_SSL_CIPHER_num(sk); i++)
1870Sstevel@tonic-gate 			{
1880Sstevel@tonic-gate 			BIO_puts(STDout,SSL_CIPHER_description(
1890Sstevel@tonic-gate 				sk_SSL_CIPHER_value(sk,i),
1900Sstevel@tonic-gate 				buf,sizeof buf));
1910Sstevel@tonic-gate 			}
1920Sstevel@tonic-gate 		}
1930Sstevel@tonic-gate 
1940Sstevel@tonic-gate 	ret=0;
1950Sstevel@tonic-gate 	if (0)
1960Sstevel@tonic-gate 		{
1970Sstevel@tonic-gate err:
1980Sstevel@tonic-gate 		SSL_load_error_strings();
1990Sstevel@tonic-gate 		ERR_print_errors(bio_err);
2000Sstevel@tonic-gate 		}
2010Sstevel@tonic-gate end:
2020Sstevel@tonic-gate 	if (ctx != NULL) SSL_CTX_free(ctx);
2030Sstevel@tonic-gate 	if (ssl != NULL) SSL_free(ssl);
2040Sstevel@tonic-gate 	if (STDout != NULL) BIO_free_all(STDout);
2050Sstevel@tonic-gate 	apps_shutdown();
2060Sstevel@tonic-gate 	OPENSSL_EXIT(ret);
2070Sstevel@tonic-gate 	}
2080Sstevel@tonic-gate 
209