1*0Sstevel@tonic-gate /* apps/ciphers.c */ 2*0Sstevel@tonic-gate /* Copyright (C) 1995-1998 Eric Young (eay@cryptsoft.com) 3*0Sstevel@tonic-gate * All rights reserved. 4*0Sstevel@tonic-gate * 5*0Sstevel@tonic-gate * This package is an SSL implementation written 6*0Sstevel@tonic-gate * by Eric Young (eay@cryptsoft.com). 7*0Sstevel@tonic-gate * The implementation was written so as to conform with Netscapes SSL. 8*0Sstevel@tonic-gate * 9*0Sstevel@tonic-gate * This library is free for commercial and non-commercial use as long as 10*0Sstevel@tonic-gate * the following conditions are aheared to. The following conditions 11*0Sstevel@tonic-gate * apply to all code found in this distribution, be it the RC4, RSA, 12*0Sstevel@tonic-gate * lhash, DES, etc., code; not just the SSL code. The SSL documentation 13*0Sstevel@tonic-gate * included with this distribution is covered by the same copyright terms 14*0Sstevel@tonic-gate * except that the holder is Tim Hudson (tjh@cryptsoft.com). 15*0Sstevel@tonic-gate * 16*0Sstevel@tonic-gate * Copyright remains Eric Young's, and as such any Copyright notices in 17*0Sstevel@tonic-gate * the code are not to be removed. 18*0Sstevel@tonic-gate * If this package is used in a product, Eric Young should be given attribution 19*0Sstevel@tonic-gate * as the author of the parts of the library used. 20*0Sstevel@tonic-gate * This can be in the form of a textual message at program startup or 21*0Sstevel@tonic-gate * in documentation (online or textual) provided with the package. 22*0Sstevel@tonic-gate * 23*0Sstevel@tonic-gate * Redistribution and use in source and binary forms, with or without 24*0Sstevel@tonic-gate * modification, are permitted provided that the following conditions 25*0Sstevel@tonic-gate * are met: 26*0Sstevel@tonic-gate * 1. Redistributions of source code must retain the copyright 27*0Sstevel@tonic-gate * notice, this list of conditions and the following disclaimer. 28*0Sstevel@tonic-gate * 2. Redistributions in binary form must reproduce the above copyright 29*0Sstevel@tonic-gate * notice, this list of conditions and the following disclaimer in the 30*0Sstevel@tonic-gate * documentation and/or other materials provided with the distribution. 31*0Sstevel@tonic-gate * 3. All advertising materials mentioning features or use of this software 32*0Sstevel@tonic-gate * must display the following acknowledgement: 33*0Sstevel@tonic-gate * "This product includes cryptographic software written by 34*0Sstevel@tonic-gate * Eric Young (eay@cryptsoft.com)" 35*0Sstevel@tonic-gate * The word 'cryptographic' can be left out if the rouines from the library 36*0Sstevel@tonic-gate * being used are not cryptographic related :-). 37*0Sstevel@tonic-gate * 4. If you include any Windows specific code (or a derivative thereof) from 38*0Sstevel@tonic-gate * the apps directory (application code) you must include an acknowledgement: 39*0Sstevel@tonic-gate * "This product includes software written by Tim Hudson (tjh@cryptsoft.com)" 40*0Sstevel@tonic-gate * 41*0Sstevel@tonic-gate * THIS SOFTWARE IS PROVIDED BY ERIC YOUNG ``AS IS'' AND 42*0Sstevel@tonic-gate * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 43*0Sstevel@tonic-gate * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 44*0Sstevel@tonic-gate * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE 45*0Sstevel@tonic-gate * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 46*0Sstevel@tonic-gate * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 47*0Sstevel@tonic-gate * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 48*0Sstevel@tonic-gate * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 49*0Sstevel@tonic-gate * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 50*0Sstevel@tonic-gate * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 51*0Sstevel@tonic-gate * SUCH DAMAGE. 52*0Sstevel@tonic-gate * 53*0Sstevel@tonic-gate * The licence and distribution terms for any publically available version or 54*0Sstevel@tonic-gate * derivative of this code cannot be changed. i.e. this code cannot simply be 55*0Sstevel@tonic-gate * copied and put under another distribution licence 56*0Sstevel@tonic-gate * [including the GNU Public Licence.] 57*0Sstevel@tonic-gate */ 58*0Sstevel@tonic-gate 59*0Sstevel@tonic-gate #include <stdio.h> 60*0Sstevel@tonic-gate #include <stdlib.h> 61*0Sstevel@tonic-gate #include <string.h> 62*0Sstevel@tonic-gate #ifdef OPENSSL_NO_STDIO 63*0Sstevel@tonic-gate #define APPS_WIN16 64*0Sstevel@tonic-gate #endif 65*0Sstevel@tonic-gate #include "apps.h" 66*0Sstevel@tonic-gate #include <openssl/err.h> 67*0Sstevel@tonic-gate #include <openssl/ssl.h> 68*0Sstevel@tonic-gate 69*0Sstevel@tonic-gate #undef PROG 70*0Sstevel@tonic-gate #define PROG ciphers_main 71*0Sstevel@tonic-gate 72*0Sstevel@tonic-gate static char *ciphers_usage[]={ 73*0Sstevel@tonic-gate "usage: ciphers args\n", 74*0Sstevel@tonic-gate " -v - verbose mode, a textual listing of the ciphers in SSLeay\n", 75*0Sstevel@tonic-gate " -ssl2 - SSL2 mode\n", 76*0Sstevel@tonic-gate " -ssl3 - SSL3 mode\n", 77*0Sstevel@tonic-gate " -tls1 - TLS1 mode\n", 78*0Sstevel@tonic-gate NULL 79*0Sstevel@tonic-gate }; 80*0Sstevel@tonic-gate 81*0Sstevel@tonic-gate int MAIN(int, char **); 82*0Sstevel@tonic-gate 83*0Sstevel@tonic-gate int MAIN(int argc, char **argv) 84*0Sstevel@tonic-gate { 85*0Sstevel@tonic-gate int ret=1,i; 86*0Sstevel@tonic-gate int verbose=0; 87*0Sstevel@tonic-gate char **pp; 88*0Sstevel@tonic-gate const char *p; 89*0Sstevel@tonic-gate int badops=0; 90*0Sstevel@tonic-gate SSL_CTX *ctx=NULL; 91*0Sstevel@tonic-gate SSL *ssl=NULL; 92*0Sstevel@tonic-gate char *ciphers=NULL; 93*0Sstevel@tonic-gate SSL_METHOD *meth=NULL; 94*0Sstevel@tonic-gate STACK_OF(SSL_CIPHER) *sk; 95*0Sstevel@tonic-gate char buf[512]; 96*0Sstevel@tonic-gate BIO *STDout=NULL; 97*0Sstevel@tonic-gate 98*0Sstevel@tonic-gate #if !defined(OPENSSL_NO_SSL2) && !defined(OPENSSL_NO_SSL3) 99*0Sstevel@tonic-gate meth=SSLv23_server_method(); 100*0Sstevel@tonic-gate #elif !defined(OPENSSL_NO_SSL3) 101*0Sstevel@tonic-gate meth=SSLv3_server_method(); 102*0Sstevel@tonic-gate #elif !defined(OPENSSL_NO_SSL2) 103*0Sstevel@tonic-gate meth=SSLv2_server_method(); 104*0Sstevel@tonic-gate #endif 105*0Sstevel@tonic-gate 106*0Sstevel@tonic-gate apps_startup(); 107*0Sstevel@tonic-gate 108*0Sstevel@tonic-gate if (bio_err == NULL) 109*0Sstevel@tonic-gate bio_err=BIO_new_fp(stderr,BIO_NOCLOSE); 110*0Sstevel@tonic-gate STDout=BIO_new_fp(stdout,BIO_NOCLOSE); 111*0Sstevel@tonic-gate #ifdef OPENSSL_SYS_VMS 112*0Sstevel@tonic-gate { 113*0Sstevel@tonic-gate BIO *tmpbio = BIO_new(BIO_f_linebuffer()); 114*0Sstevel@tonic-gate STDout = BIO_push(tmpbio, STDout); 115*0Sstevel@tonic-gate } 116*0Sstevel@tonic-gate #endif 117*0Sstevel@tonic-gate 118*0Sstevel@tonic-gate argc--; 119*0Sstevel@tonic-gate argv++; 120*0Sstevel@tonic-gate while (argc >= 1) 121*0Sstevel@tonic-gate { 122*0Sstevel@tonic-gate if (strcmp(*argv,"-v") == 0) 123*0Sstevel@tonic-gate verbose=1; 124*0Sstevel@tonic-gate #ifndef OPENSSL_NO_SSL2 125*0Sstevel@tonic-gate else if (strcmp(*argv,"-ssl2") == 0) 126*0Sstevel@tonic-gate meth=SSLv2_client_method(); 127*0Sstevel@tonic-gate #endif 128*0Sstevel@tonic-gate #ifndef OPENSSL_NO_SSL3 129*0Sstevel@tonic-gate else if (strcmp(*argv,"-ssl3") == 0) 130*0Sstevel@tonic-gate meth=SSLv3_client_method(); 131*0Sstevel@tonic-gate #endif 132*0Sstevel@tonic-gate #ifndef OPENSSL_NO_TLS1 133*0Sstevel@tonic-gate else if (strcmp(*argv,"-tls1") == 0) 134*0Sstevel@tonic-gate meth=TLSv1_client_method(); 135*0Sstevel@tonic-gate #endif 136*0Sstevel@tonic-gate else if ((strncmp(*argv,"-h",2) == 0) || 137*0Sstevel@tonic-gate (strcmp(*argv,"-?") == 0)) 138*0Sstevel@tonic-gate { 139*0Sstevel@tonic-gate badops=1; 140*0Sstevel@tonic-gate break; 141*0Sstevel@tonic-gate } 142*0Sstevel@tonic-gate else 143*0Sstevel@tonic-gate { 144*0Sstevel@tonic-gate ciphers= *argv; 145*0Sstevel@tonic-gate } 146*0Sstevel@tonic-gate argc--; 147*0Sstevel@tonic-gate argv++; 148*0Sstevel@tonic-gate } 149*0Sstevel@tonic-gate 150*0Sstevel@tonic-gate if (badops) 151*0Sstevel@tonic-gate { 152*0Sstevel@tonic-gate for (pp=ciphers_usage; (*pp != NULL); pp++) 153*0Sstevel@tonic-gate BIO_printf(bio_err,"%s",*pp); 154*0Sstevel@tonic-gate goto end; 155*0Sstevel@tonic-gate } 156*0Sstevel@tonic-gate 157*0Sstevel@tonic-gate OpenSSL_add_ssl_algorithms(); 158*0Sstevel@tonic-gate 159*0Sstevel@tonic-gate ctx=SSL_CTX_new(meth); 160*0Sstevel@tonic-gate if (ctx == NULL) goto err; 161*0Sstevel@tonic-gate if (ciphers != NULL) { 162*0Sstevel@tonic-gate if(!SSL_CTX_set_cipher_list(ctx,ciphers)) { 163*0Sstevel@tonic-gate BIO_printf(bio_err, "Error in cipher list\n"); 164*0Sstevel@tonic-gate goto err; 165*0Sstevel@tonic-gate } 166*0Sstevel@tonic-gate } 167*0Sstevel@tonic-gate ssl=SSL_new(ctx); 168*0Sstevel@tonic-gate if (ssl == NULL) goto err; 169*0Sstevel@tonic-gate 170*0Sstevel@tonic-gate 171*0Sstevel@tonic-gate if (!verbose) 172*0Sstevel@tonic-gate { 173*0Sstevel@tonic-gate for (i=0; ; i++) 174*0Sstevel@tonic-gate { 175*0Sstevel@tonic-gate p=SSL_get_cipher_list(ssl,i); 176*0Sstevel@tonic-gate if (p == NULL) break; 177*0Sstevel@tonic-gate if (i != 0) BIO_printf(STDout,":"); 178*0Sstevel@tonic-gate BIO_printf(STDout,"%s",p); 179*0Sstevel@tonic-gate } 180*0Sstevel@tonic-gate BIO_printf(STDout,"\n"); 181*0Sstevel@tonic-gate } 182*0Sstevel@tonic-gate else 183*0Sstevel@tonic-gate { 184*0Sstevel@tonic-gate sk=SSL_get_ciphers(ssl); 185*0Sstevel@tonic-gate 186*0Sstevel@tonic-gate for (i=0; i<sk_SSL_CIPHER_num(sk); i++) 187*0Sstevel@tonic-gate { 188*0Sstevel@tonic-gate BIO_puts(STDout,SSL_CIPHER_description( 189*0Sstevel@tonic-gate sk_SSL_CIPHER_value(sk,i), 190*0Sstevel@tonic-gate buf,sizeof buf)); 191*0Sstevel@tonic-gate } 192*0Sstevel@tonic-gate } 193*0Sstevel@tonic-gate 194*0Sstevel@tonic-gate ret=0; 195*0Sstevel@tonic-gate if (0) 196*0Sstevel@tonic-gate { 197*0Sstevel@tonic-gate err: 198*0Sstevel@tonic-gate SSL_load_error_strings(); 199*0Sstevel@tonic-gate ERR_print_errors(bio_err); 200*0Sstevel@tonic-gate } 201*0Sstevel@tonic-gate end: 202*0Sstevel@tonic-gate if (ctx != NULL) SSL_CTX_free(ctx); 203*0Sstevel@tonic-gate if (ssl != NULL) SSL_free(ssl); 204*0Sstevel@tonic-gate if (STDout != NULL) BIO_free_all(STDout); 205*0Sstevel@tonic-gate apps_shutdown(); 206*0Sstevel@tonic-gate OPENSSL_EXIT(ret); 207*0Sstevel@tonic-gate } 208*0Sstevel@tonic-gate 209