dh.c revision 111147
1/* apps/dh.c */ 2/* obsoleted by dhparam.c */ 3/* Copyright (C) 1995-1998 Eric Young (eay@cryptsoft.com) 4 * All rights reserved. 5 * 6 * This package is an SSL implementation written 7 * by Eric Young (eay@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@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@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@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#ifndef OPENSSL_NO_DH 61#include <stdio.h> 62#include <stdlib.h> 63#include <time.h> 64#include <string.h> 65#include "apps.h" 66#include <openssl/bio.h> 67#include <openssl/err.h> 68#include <openssl/bn.h> 69#include <openssl/dh.h> 70#include <openssl/x509.h> 71#include <openssl/pem.h> 72 73#undef PROG 74#define PROG dh_main 75 76/* -inform arg - input format - default PEM (DER or PEM) 77 * -outform arg - output format - default PEM 78 * -in arg - input file - default stdin 79 * -out arg - output file - default stdout 80 * -check - check the parameters are ok 81 * -noout 82 * -text 83 * -C 84 */ 85 86int MAIN(int, char **); 87 88int MAIN(int argc, char **argv) 89 { 90#ifndef OPENSSL_NO_ENGINE 91 ENGINE *e = NULL; 92#endif 93 DH *dh=NULL; 94 int i,badops=0,text=0; 95 BIO *in=NULL,*out=NULL; 96 int informat,outformat,check=0,noout=0,C=0,ret=1; 97 char *infile,*outfile,*prog; 98#ifndef OPENSSL_NO_ENGINE 99 char *engine; 100#endif 101 102 apps_startup(); 103 104 if (bio_err == NULL) 105 if ((bio_err=BIO_new(BIO_s_file())) != NULL) 106 BIO_set_fp(bio_err,stderr,BIO_NOCLOSE|BIO_FP_TEXT); 107 108 if (!load_config(bio_err, NULL)) 109 goto end; 110 111#ifndef OPENSSL_NO_ENGINE 112 engine=NULL; 113#endif 114 infile=NULL; 115 outfile=NULL; 116 informat=FORMAT_PEM; 117 outformat=FORMAT_PEM; 118 119 prog=argv[0]; 120 argc--; 121 argv++; 122 while (argc >= 1) 123 { 124 if (strcmp(*argv,"-inform") == 0) 125 { 126 if (--argc < 1) goto bad; 127 informat=str2fmt(*(++argv)); 128 } 129 else if (strcmp(*argv,"-outform") == 0) 130 { 131 if (--argc < 1) goto bad; 132 outformat=str2fmt(*(++argv)); 133 } 134 else if (strcmp(*argv,"-in") == 0) 135 { 136 if (--argc < 1) goto bad; 137 infile= *(++argv); 138 } 139 else if (strcmp(*argv,"-out") == 0) 140 { 141 if (--argc < 1) goto bad; 142 outfile= *(++argv); 143 } 144#ifndef OPENSSL_NO_ENGINE 145 else if (strcmp(*argv,"-engine") == 0) 146 { 147 if (--argc < 1) goto bad; 148 engine= *(++argv); 149 } 150#endif 151 else if (strcmp(*argv,"-check") == 0) 152 check=1; 153 else if (strcmp(*argv,"-text") == 0) 154 text=1; 155 else if (strcmp(*argv,"-C") == 0) 156 C=1; 157 else if (strcmp(*argv,"-noout") == 0) 158 noout=1; 159 else 160 { 161 BIO_printf(bio_err,"unknown option %s\n",*argv); 162 badops=1; 163 break; 164 } 165 argc--; 166 argv++; 167 } 168 169 if (badops) 170 { 171bad: 172 BIO_printf(bio_err,"%s [options] <infile >outfile\n",prog); 173 BIO_printf(bio_err,"where options are\n"); 174 BIO_printf(bio_err," -inform arg input format - one of DER PEM\n"); 175 BIO_printf(bio_err," -outform arg output format - one of DER PEM\n"); 176 BIO_printf(bio_err," -in arg input file\n"); 177 BIO_printf(bio_err," -out arg output file\n"); 178 BIO_printf(bio_err," -check check the DH parameters\n"); 179 BIO_printf(bio_err," -text print a text form of the DH parameters\n"); 180 BIO_printf(bio_err," -C Output C code\n"); 181 BIO_printf(bio_err," -noout no output\n"); 182#ifndef OPENSSL_NO_ENGINE 183 BIO_printf(bio_err," -engine e use engine e, possibly a hardware device.\n"); 184#endif 185 goto end; 186 } 187 188 ERR_load_crypto_strings(); 189 190#ifndef OPENSSL_NO_ENGINE 191 e = setup_engine(bio_err, engine, 0); 192#endif 193 194 in=BIO_new(BIO_s_file()); 195 out=BIO_new(BIO_s_file()); 196 if ((in == NULL) || (out == NULL)) 197 { 198 ERR_print_errors(bio_err); 199 goto end; 200 } 201 202 if (infile == NULL) 203 BIO_set_fp(in,stdin,BIO_NOCLOSE); 204 else 205 { 206 if (BIO_read_filename(in,infile) <= 0) 207 { 208 perror(infile); 209 goto end; 210 } 211 } 212 if (outfile == NULL) 213 { 214 BIO_set_fp(out,stdout,BIO_NOCLOSE); 215#ifdef OPENSSL_SYS_VMS 216 { 217 BIO *tmpbio = BIO_new(BIO_f_linebuffer()); 218 out = BIO_push(tmpbio, out); 219 } 220#endif 221 } 222 else 223 { 224 if (BIO_write_filename(out,outfile) <= 0) 225 { 226 perror(outfile); 227 goto end; 228 } 229 } 230 231 if (informat == FORMAT_ASN1) 232 dh=d2i_DHparams_bio(in,NULL); 233 else if (informat == FORMAT_PEM) 234 dh=PEM_read_bio_DHparams(in,NULL,NULL,NULL); 235 else 236 { 237 BIO_printf(bio_err,"bad input format specified\n"); 238 goto end; 239 } 240 if (dh == NULL) 241 { 242 BIO_printf(bio_err,"unable to load DH parameters\n"); 243 ERR_print_errors(bio_err); 244 goto end; 245 } 246 247 248 249 if (text) 250 { 251 DHparams_print(out,dh); 252#ifdef undef 253 printf("p="); 254 BN_print(stdout,dh->p); 255 printf("\ng="); 256 BN_print(stdout,dh->g); 257 printf("\n"); 258 if (dh->length != 0) 259 printf("recommended private length=%ld\n",dh->length); 260#endif 261 } 262 263 if (check) 264 { 265 if (!DH_check(dh,&i)) 266 { 267 ERR_print_errors(bio_err); 268 goto end; 269 } 270 if (i & DH_CHECK_P_NOT_PRIME) 271 printf("p value is not prime\n"); 272 if (i & DH_CHECK_P_NOT_SAFE_PRIME) 273 printf("p value is not a safe prime\n"); 274 if (i & DH_UNABLE_TO_CHECK_GENERATOR) 275 printf("unable to check the generator value\n"); 276 if (i & DH_NOT_SUITABLE_GENERATOR) 277 printf("the g value is not a generator\n"); 278 if (i == 0) 279 printf("DH parameters appear to be ok.\n"); 280 } 281 if (C) 282 { 283 unsigned char *data; 284 int len,l,bits; 285 286 len=BN_num_bytes(dh->p); 287 bits=BN_num_bits(dh->p); 288 data=(unsigned char *)OPENSSL_malloc(len); 289 if (data == NULL) 290 { 291 perror("OPENSSL_malloc"); 292 goto end; 293 } 294 l=BN_bn2bin(dh->p,data); 295 printf("static unsigned char dh%d_p[]={",bits); 296 for (i=0; i<l; i++) 297 { 298 if ((i%12) == 0) printf("\n\t"); 299 printf("0x%02X,",data[i]); 300 } 301 printf("\n\t};\n"); 302 303 l=BN_bn2bin(dh->g,data); 304 printf("static unsigned char dh%d_g[]={",bits); 305 for (i=0; i<l; i++) 306 { 307 if ((i%12) == 0) printf("\n\t"); 308 printf("0x%02X,",data[i]); 309 } 310 printf("\n\t};\n\n"); 311 312 printf("DH *get_dh%d()\n\t{\n",bits); 313 printf("\tDH *dh;\n\n"); 314 printf("\tif ((dh=DH_new()) == NULL) return(NULL);\n"); 315 printf("\tdh->p=BN_bin2bn(dh%d_p,sizeof(dh%d_p),NULL);\n", 316 bits,bits); 317 printf("\tdh->g=BN_bin2bn(dh%d_g,sizeof(dh%d_g),NULL);\n", 318 bits,bits); 319 printf("\tif ((dh->p == NULL) || (dh->g == NULL))\n"); 320 printf("\t\treturn(NULL);\n"); 321 printf("\treturn(dh);\n\t}\n"); 322 OPENSSL_free(data); 323 } 324 325 326 if (!noout) 327 { 328 if (outformat == FORMAT_ASN1) 329 i=i2d_DHparams_bio(out,dh); 330 else if (outformat == FORMAT_PEM) 331 i=PEM_write_bio_DHparams(out,dh); 332 else { 333 BIO_printf(bio_err,"bad output format specified for outfile\n"); 334 goto end; 335 } 336 if (!i) 337 { 338 BIO_printf(bio_err,"unable to write DH parameters\n"); 339 ERR_print_errors(bio_err); 340 goto end; 341 } 342 } 343 ret=0; 344end: 345 if (in != NULL) BIO_free(in); 346 if (out != NULL) BIO_free_all(out); 347 if (dh != NULL) DH_free(dh); 348 apps_shutdown(); 349 OPENSSL_EXIT(ret); 350 } 351#endif 352