1*0Sstevel@tonic-gate /* apps/dh.c */ 2*0Sstevel@tonic-gate /* obsoleted by dhparam.c */ 3*0Sstevel@tonic-gate /* Copyright (C) 1995-1998 Eric Young (eay@cryptsoft.com) 4*0Sstevel@tonic-gate * All rights reserved. 5*0Sstevel@tonic-gate * 6*0Sstevel@tonic-gate * This package is an SSL implementation written 7*0Sstevel@tonic-gate * by Eric Young (eay@cryptsoft.com). 8*0Sstevel@tonic-gate * The implementation was written so as to conform with Netscapes SSL. 9*0Sstevel@tonic-gate * 10*0Sstevel@tonic-gate * This library is free for commercial and non-commercial use as long as 11*0Sstevel@tonic-gate * the following conditions are aheared to. The following conditions 12*0Sstevel@tonic-gate * apply to all code found in this distribution, be it the RC4, RSA, 13*0Sstevel@tonic-gate * lhash, DES, etc., code; not just the SSL code. The SSL documentation 14*0Sstevel@tonic-gate * included with this distribution is covered by the same copyright terms 15*0Sstevel@tonic-gate * except that the holder is Tim Hudson (tjh@cryptsoft.com). 16*0Sstevel@tonic-gate * 17*0Sstevel@tonic-gate * Copyright remains Eric Young's, and as such any Copyright notices in 18*0Sstevel@tonic-gate * the code are not to be removed. 19*0Sstevel@tonic-gate * If this package is used in a product, Eric Young should be given attribution 20*0Sstevel@tonic-gate * as the author of the parts of the library used. 21*0Sstevel@tonic-gate * This can be in the form of a textual message at program startup or 22*0Sstevel@tonic-gate * in documentation (online or textual) provided with the package. 23*0Sstevel@tonic-gate * 24*0Sstevel@tonic-gate * Redistribution and use in source and binary forms, with or without 25*0Sstevel@tonic-gate * modification, are permitted provided that the following conditions 26*0Sstevel@tonic-gate * are met: 27*0Sstevel@tonic-gate * 1. Redistributions of source code must retain the copyright 28*0Sstevel@tonic-gate * notice, this list of conditions and the following disclaimer. 29*0Sstevel@tonic-gate * 2. Redistributions in binary form must reproduce the above copyright 30*0Sstevel@tonic-gate * notice, this list of conditions and the following disclaimer in the 31*0Sstevel@tonic-gate * documentation and/or other materials provided with the distribution. 32*0Sstevel@tonic-gate * 3. All advertising materials mentioning features or use of this software 33*0Sstevel@tonic-gate * must display the following acknowledgement: 34*0Sstevel@tonic-gate * "This product includes cryptographic software written by 35*0Sstevel@tonic-gate * Eric Young (eay@cryptsoft.com)" 36*0Sstevel@tonic-gate * The word 'cryptographic' can be left out if the rouines from the library 37*0Sstevel@tonic-gate * being used are not cryptographic related :-). 38*0Sstevel@tonic-gate * 4. If you include any Windows specific code (or a derivative thereof) from 39*0Sstevel@tonic-gate * the apps directory (application code) you must include an acknowledgement: 40*0Sstevel@tonic-gate * "This product includes software written by Tim Hudson (tjh@cryptsoft.com)" 41*0Sstevel@tonic-gate * 42*0Sstevel@tonic-gate * THIS SOFTWARE IS PROVIDED BY ERIC YOUNG ``AS IS'' AND 43*0Sstevel@tonic-gate * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 44*0Sstevel@tonic-gate * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 45*0Sstevel@tonic-gate * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE 46*0Sstevel@tonic-gate * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 47*0Sstevel@tonic-gate * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 48*0Sstevel@tonic-gate * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 49*0Sstevel@tonic-gate * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 50*0Sstevel@tonic-gate * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 51*0Sstevel@tonic-gate * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 52*0Sstevel@tonic-gate * SUCH DAMAGE. 53*0Sstevel@tonic-gate * 54*0Sstevel@tonic-gate * The licence and distribution terms for any publically available version or 55*0Sstevel@tonic-gate * derivative of this code cannot be changed. i.e. this code cannot simply be 56*0Sstevel@tonic-gate * copied and put under another distribution licence 57*0Sstevel@tonic-gate * [including the GNU Public Licence.] 58*0Sstevel@tonic-gate */ 59*0Sstevel@tonic-gate 60*0Sstevel@tonic-gate #ifndef OPENSSL_NO_DH 61*0Sstevel@tonic-gate #include <stdio.h> 62*0Sstevel@tonic-gate #include <stdlib.h> 63*0Sstevel@tonic-gate #include <time.h> 64*0Sstevel@tonic-gate #include <string.h> 65*0Sstevel@tonic-gate #include "apps.h" 66*0Sstevel@tonic-gate #include <openssl/bio.h> 67*0Sstevel@tonic-gate #include <openssl/err.h> 68*0Sstevel@tonic-gate #include <openssl/bn.h> 69*0Sstevel@tonic-gate #include <openssl/dh.h> 70*0Sstevel@tonic-gate #include <openssl/x509.h> 71*0Sstevel@tonic-gate #include <openssl/pem.h> 72*0Sstevel@tonic-gate 73*0Sstevel@tonic-gate #undef PROG 74*0Sstevel@tonic-gate #define PROG dh_main 75*0Sstevel@tonic-gate 76*0Sstevel@tonic-gate /* -inform arg - input format - default PEM (DER or PEM) 77*0Sstevel@tonic-gate * -outform arg - output format - default PEM 78*0Sstevel@tonic-gate * -in arg - input file - default stdin 79*0Sstevel@tonic-gate * -out arg - output file - default stdout 80*0Sstevel@tonic-gate * -check - check the parameters are ok 81*0Sstevel@tonic-gate * -noout 82*0Sstevel@tonic-gate * -text 83*0Sstevel@tonic-gate * -C 84*0Sstevel@tonic-gate */ 85*0Sstevel@tonic-gate 86*0Sstevel@tonic-gate int MAIN(int, char **); 87*0Sstevel@tonic-gate 88*0Sstevel@tonic-gate int MAIN(int argc, char **argv) 89*0Sstevel@tonic-gate { 90*0Sstevel@tonic-gate #ifndef OPENSSL_NO_ENGINE 91*0Sstevel@tonic-gate ENGINE *e = NULL; 92*0Sstevel@tonic-gate #endif 93*0Sstevel@tonic-gate DH *dh=NULL; 94*0Sstevel@tonic-gate int i,badops=0,text=0; 95*0Sstevel@tonic-gate BIO *in=NULL,*out=NULL; 96*0Sstevel@tonic-gate int informat,outformat,check=0,noout=0,C=0,ret=1; 97*0Sstevel@tonic-gate char *infile,*outfile,*prog; 98*0Sstevel@tonic-gate #ifndef OPENSSL_NO_ENGINE 99*0Sstevel@tonic-gate char *engine; 100*0Sstevel@tonic-gate #endif 101*0Sstevel@tonic-gate 102*0Sstevel@tonic-gate apps_startup(); 103*0Sstevel@tonic-gate 104*0Sstevel@tonic-gate if (bio_err == NULL) 105*0Sstevel@tonic-gate if ((bio_err=BIO_new(BIO_s_file())) != NULL) 106*0Sstevel@tonic-gate BIO_set_fp(bio_err,stderr,BIO_NOCLOSE|BIO_FP_TEXT); 107*0Sstevel@tonic-gate 108*0Sstevel@tonic-gate if (!load_config(bio_err, NULL)) 109*0Sstevel@tonic-gate goto end; 110*0Sstevel@tonic-gate 111*0Sstevel@tonic-gate #ifndef OPENSSL_NO_ENGINE 112*0Sstevel@tonic-gate engine=NULL; 113*0Sstevel@tonic-gate #endif 114*0Sstevel@tonic-gate infile=NULL; 115*0Sstevel@tonic-gate outfile=NULL; 116*0Sstevel@tonic-gate informat=FORMAT_PEM; 117*0Sstevel@tonic-gate outformat=FORMAT_PEM; 118*0Sstevel@tonic-gate 119*0Sstevel@tonic-gate prog=argv[0]; 120*0Sstevel@tonic-gate argc--; 121*0Sstevel@tonic-gate argv++; 122*0Sstevel@tonic-gate while (argc >= 1) 123*0Sstevel@tonic-gate { 124*0Sstevel@tonic-gate if (strcmp(*argv,"-inform") == 0) 125*0Sstevel@tonic-gate { 126*0Sstevel@tonic-gate if (--argc < 1) goto bad; 127*0Sstevel@tonic-gate informat=str2fmt(*(++argv)); 128*0Sstevel@tonic-gate } 129*0Sstevel@tonic-gate else if (strcmp(*argv,"-outform") == 0) 130*0Sstevel@tonic-gate { 131*0Sstevel@tonic-gate if (--argc < 1) goto bad; 132*0Sstevel@tonic-gate outformat=str2fmt(*(++argv)); 133*0Sstevel@tonic-gate } 134*0Sstevel@tonic-gate else if (strcmp(*argv,"-in") == 0) 135*0Sstevel@tonic-gate { 136*0Sstevel@tonic-gate if (--argc < 1) goto bad; 137*0Sstevel@tonic-gate infile= *(++argv); 138*0Sstevel@tonic-gate } 139*0Sstevel@tonic-gate else if (strcmp(*argv,"-out") == 0) 140*0Sstevel@tonic-gate { 141*0Sstevel@tonic-gate if (--argc < 1) goto bad; 142*0Sstevel@tonic-gate outfile= *(++argv); 143*0Sstevel@tonic-gate } 144*0Sstevel@tonic-gate #ifndef OPENSSL_NO_ENGINE 145*0Sstevel@tonic-gate else if (strcmp(*argv,"-engine") == 0) 146*0Sstevel@tonic-gate { 147*0Sstevel@tonic-gate if (--argc < 1) goto bad; 148*0Sstevel@tonic-gate engine= *(++argv); 149*0Sstevel@tonic-gate } 150*0Sstevel@tonic-gate #endif 151*0Sstevel@tonic-gate else if (strcmp(*argv,"-check") == 0) 152*0Sstevel@tonic-gate check=1; 153*0Sstevel@tonic-gate else if (strcmp(*argv,"-text") == 0) 154*0Sstevel@tonic-gate text=1; 155*0Sstevel@tonic-gate else if (strcmp(*argv,"-C") == 0) 156*0Sstevel@tonic-gate C=1; 157*0Sstevel@tonic-gate else if (strcmp(*argv,"-noout") == 0) 158*0Sstevel@tonic-gate noout=1; 159*0Sstevel@tonic-gate else 160*0Sstevel@tonic-gate { 161*0Sstevel@tonic-gate BIO_printf(bio_err,"unknown option %s\n",*argv); 162*0Sstevel@tonic-gate badops=1; 163*0Sstevel@tonic-gate break; 164*0Sstevel@tonic-gate } 165*0Sstevel@tonic-gate argc--; 166*0Sstevel@tonic-gate argv++; 167*0Sstevel@tonic-gate } 168*0Sstevel@tonic-gate 169*0Sstevel@tonic-gate if (badops) 170*0Sstevel@tonic-gate { 171*0Sstevel@tonic-gate bad: 172*0Sstevel@tonic-gate BIO_printf(bio_err,"%s [options] <infile >outfile\n",prog); 173*0Sstevel@tonic-gate BIO_printf(bio_err,"where options are\n"); 174*0Sstevel@tonic-gate BIO_printf(bio_err," -inform arg input format - one of DER PEM\n"); 175*0Sstevel@tonic-gate BIO_printf(bio_err," -outform arg output format - one of DER PEM\n"); 176*0Sstevel@tonic-gate BIO_printf(bio_err," -in arg input file\n"); 177*0Sstevel@tonic-gate BIO_printf(bio_err," -out arg output file\n"); 178*0Sstevel@tonic-gate BIO_printf(bio_err," -check check the DH parameters\n"); 179*0Sstevel@tonic-gate BIO_printf(bio_err," -text print a text form of the DH parameters\n"); 180*0Sstevel@tonic-gate BIO_printf(bio_err," -C Output C code\n"); 181*0Sstevel@tonic-gate BIO_printf(bio_err," -noout no output\n"); 182*0Sstevel@tonic-gate #ifndef OPENSSL_NO_ENGINE 183*0Sstevel@tonic-gate BIO_printf(bio_err," -engine e use engine e, possibly a hardware device.\n"); 184*0Sstevel@tonic-gate #endif 185*0Sstevel@tonic-gate goto end; 186*0Sstevel@tonic-gate } 187*0Sstevel@tonic-gate 188*0Sstevel@tonic-gate ERR_load_crypto_strings(); 189*0Sstevel@tonic-gate 190*0Sstevel@tonic-gate #ifndef OPENSSL_NO_ENGINE 191*0Sstevel@tonic-gate e = setup_engine(bio_err, engine, 0); 192*0Sstevel@tonic-gate #endif 193*0Sstevel@tonic-gate 194*0Sstevel@tonic-gate in=BIO_new(BIO_s_file()); 195*0Sstevel@tonic-gate out=BIO_new(BIO_s_file()); 196*0Sstevel@tonic-gate if ((in == NULL) || (out == NULL)) 197*0Sstevel@tonic-gate { 198*0Sstevel@tonic-gate ERR_print_errors(bio_err); 199*0Sstevel@tonic-gate goto end; 200*0Sstevel@tonic-gate } 201*0Sstevel@tonic-gate 202*0Sstevel@tonic-gate if (infile == NULL) 203*0Sstevel@tonic-gate BIO_set_fp(in,stdin,BIO_NOCLOSE); 204*0Sstevel@tonic-gate else 205*0Sstevel@tonic-gate { 206*0Sstevel@tonic-gate if (BIO_read_filename(in,infile) <= 0) 207*0Sstevel@tonic-gate { 208*0Sstevel@tonic-gate perror(infile); 209*0Sstevel@tonic-gate goto end; 210*0Sstevel@tonic-gate } 211*0Sstevel@tonic-gate } 212*0Sstevel@tonic-gate if (outfile == NULL) 213*0Sstevel@tonic-gate { 214*0Sstevel@tonic-gate BIO_set_fp(out,stdout,BIO_NOCLOSE); 215*0Sstevel@tonic-gate #ifdef OPENSSL_SYS_VMS 216*0Sstevel@tonic-gate { 217*0Sstevel@tonic-gate BIO *tmpbio = BIO_new(BIO_f_linebuffer()); 218*0Sstevel@tonic-gate out = BIO_push(tmpbio, out); 219*0Sstevel@tonic-gate } 220*0Sstevel@tonic-gate #endif 221*0Sstevel@tonic-gate } 222*0Sstevel@tonic-gate else 223*0Sstevel@tonic-gate { 224*0Sstevel@tonic-gate if (BIO_write_filename(out,outfile) <= 0) 225*0Sstevel@tonic-gate { 226*0Sstevel@tonic-gate perror(outfile); 227*0Sstevel@tonic-gate goto end; 228*0Sstevel@tonic-gate } 229*0Sstevel@tonic-gate } 230*0Sstevel@tonic-gate 231*0Sstevel@tonic-gate if (informat == FORMAT_ASN1) 232*0Sstevel@tonic-gate dh=d2i_DHparams_bio(in,NULL); 233*0Sstevel@tonic-gate else if (informat == FORMAT_PEM) 234*0Sstevel@tonic-gate dh=PEM_read_bio_DHparams(in,NULL,NULL,NULL); 235*0Sstevel@tonic-gate else 236*0Sstevel@tonic-gate { 237*0Sstevel@tonic-gate BIO_printf(bio_err,"bad input format specified\n"); 238*0Sstevel@tonic-gate goto end; 239*0Sstevel@tonic-gate } 240*0Sstevel@tonic-gate if (dh == NULL) 241*0Sstevel@tonic-gate { 242*0Sstevel@tonic-gate BIO_printf(bio_err,"unable to load DH parameters\n"); 243*0Sstevel@tonic-gate ERR_print_errors(bio_err); 244*0Sstevel@tonic-gate goto end; 245*0Sstevel@tonic-gate } 246*0Sstevel@tonic-gate 247*0Sstevel@tonic-gate 248*0Sstevel@tonic-gate 249*0Sstevel@tonic-gate if (text) 250*0Sstevel@tonic-gate { 251*0Sstevel@tonic-gate DHparams_print(out,dh); 252*0Sstevel@tonic-gate #ifdef undef 253*0Sstevel@tonic-gate printf("p="); 254*0Sstevel@tonic-gate BN_print(stdout,dh->p); 255*0Sstevel@tonic-gate printf("\ng="); 256*0Sstevel@tonic-gate BN_print(stdout,dh->g); 257*0Sstevel@tonic-gate printf("\n"); 258*0Sstevel@tonic-gate if (dh->length != 0) 259*0Sstevel@tonic-gate printf("recommended private length=%ld\n",dh->length); 260*0Sstevel@tonic-gate #endif 261*0Sstevel@tonic-gate } 262*0Sstevel@tonic-gate 263*0Sstevel@tonic-gate if (check) 264*0Sstevel@tonic-gate { 265*0Sstevel@tonic-gate if (!DH_check(dh,&i)) 266*0Sstevel@tonic-gate { 267*0Sstevel@tonic-gate ERR_print_errors(bio_err); 268*0Sstevel@tonic-gate goto end; 269*0Sstevel@tonic-gate } 270*0Sstevel@tonic-gate if (i & DH_CHECK_P_NOT_PRIME) 271*0Sstevel@tonic-gate printf("p value is not prime\n"); 272*0Sstevel@tonic-gate if (i & DH_CHECK_P_NOT_SAFE_PRIME) 273*0Sstevel@tonic-gate printf("p value is not a safe prime\n"); 274*0Sstevel@tonic-gate if (i & DH_UNABLE_TO_CHECK_GENERATOR) 275*0Sstevel@tonic-gate printf("unable to check the generator value\n"); 276*0Sstevel@tonic-gate if (i & DH_NOT_SUITABLE_GENERATOR) 277*0Sstevel@tonic-gate printf("the g value is not a generator\n"); 278*0Sstevel@tonic-gate if (i == 0) 279*0Sstevel@tonic-gate printf("DH parameters appear to be ok.\n"); 280*0Sstevel@tonic-gate } 281*0Sstevel@tonic-gate if (C) 282*0Sstevel@tonic-gate { 283*0Sstevel@tonic-gate unsigned char *data; 284*0Sstevel@tonic-gate int len,l,bits; 285*0Sstevel@tonic-gate 286*0Sstevel@tonic-gate len=BN_num_bytes(dh->p); 287*0Sstevel@tonic-gate bits=BN_num_bits(dh->p); 288*0Sstevel@tonic-gate data=(unsigned char *)OPENSSL_malloc(len); 289*0Sstevel@tonic-gate if (data == NULL) 290*0Sstevel@tonic-gate { 291*0Sstevel@tonic-gate perror("OPENSSL_malloc"); 292*0Sstevel@tonic-gate goto end; 293*0Sstevel@tonic-gate } 294*0Sstevel@tonic-gate l=BN_bn2bin(dh->p,data); 295*0Sstevel@tonic-gate printf("static unsigned char dh%d_p[]={",bits); 296*0Sstevel@tonic-gate for (i=0; i<l; i++) 297*0Sstevel@tonic-gate { 298*0Sstevel@tonic-gate if ((i%12) == 0) printf("\n\t"); 299*0Sstevel@tonic-gate printf("0x%02X,",data[i]); 300*0Sstevel@tonic-gate } 301*0Sstevel@tonic-gate printf("\n\t};\n"); 302*0Sstevel@tonic-gate 303*0Sstevel@tonic-gate l=BN_bn2bin(dh->g,data); 304*0Sstevel@tonic-gate printf("static unsigned char dh%d_g[]={",bits); 305*0Sstevel@tonic-gate for (i=0; i<l; i++) 306*0Sstevel@tonic-gate { 307*0Sstevel@tonic-gate if ((i%12) == 0) printf("\n\t"); 308*0Sstevel@tonic-gate printf("0x%02X,",data[i]); 309*0Sstevel@tonic-gate } 310*0Sstevel@tonic-gate printf("\n\t};\n\n"); 311*0Sstevel@tonic-gate 312*0Sstevel@tonic-gate printf("DH *get_dh%d()\n\t{\n",bits); 313*0Sstevel@tonic-gate printf("\tDH *dh;\n\n"); 314*0Sstevel@tonic-gate printf("\tif ((dh=DH_new()) == NULL) return(NULL);\n"); 315*0Sstevel@tonic-gate printf("\tdh->p=BN_bin2bn(dh%d_p,sizeof(dh%d_p),NULL);\n", 316*0Sstevel@tonic-gate bits,bits); 317*0Sstevel@tonic-gate printf("\tdh->g=BN_bin2bn(dh%d_g,sizeof(dh%d_g),NULL);\n", 318*0Sstevel@tonic-gate bits,bits); 319*0Sstevel@tonic-gate printf("\tif ((dh->p == NULL) || (dh->g == NULL))\n"); 320*0Sstevel@tonic-gate printf("\t\treturn(NULL);\n"); 321*0Sstevel@tonic-gate printf("\treturn(dh);\n\t}\n"); 322*0Sstevel@tonic-gate OPENSSL_free(data); 323*0Sstevel@tonic-gate } 324*0Sstevel@tonic-gate 325*0Sstevel@tonic-gate 326*0Sstevel@tonic-gate if (!noout) 327*0Sstevel@tonic-gate { 328*0Sstevel@tonic-gate if (outformat == FORMAT_ASN1) 329*0Sstevel@tonic-gate i=i2d_DHparams_bio(out,dh); 330*0Sstevel@tonic-gate else if (outformat == FORMAT_PEM) 331*0Sstevel@tonic-gate i=PEM_write_bio_DHparams(out,dh); 332*0Sstevel@tonic-gate else { 333*0Sstevel@tonic-gate BIO_printf(bio_err,"bad output format specified for outfile\n"); 334*0Sstevel@tonic-gate goto end; 335*0Sstevel@tonic-gate } 336*0Sstevel@tonic-gate if (!i) 337*0Sstevel@tonic-gate { 338*0Sstevel@tonic-gate BIO_printf(bio_err,"unable to write DH parameters\n"); 339*0Sstevel@tonic-gate ERR_print_errors(bio_err); 340*0Sstevel@tonic-gate goto end; 341*0Sstevel@tonic-gate } 342*0Sstevel@tonic-gate } 343*0Sstevel@tonic-gate ret=0; 344*0Sstevel@tonic-gate end: 345*0Sstevel@tonic-gate if (in != NULL) BIO_free(in); 346*0Sstevel@tonic-gate if (out != NULL) BIO_free_all(out); 347*0Sstevel@tonic-gate if (dh != NULL) DH_free(dh); 348*0Sstevel@tonic-gate apps_shutdown(); 349*0Sstevel@tonic-gate OPENSSL_EXIT(ret); 350*0Sstevel@tonic-gate } 351*0Sstevel@tonic-gate #endif 352