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