1 /* $OpenBSD: gendsa.c,v 1.14 2019/07/24 14:23:25 inoguchi Exp $ */ 2 /* Copyright (C) 1995-1998 Eric Young (eay@cryptsoft.com) 3 * All rights reserved. 4 * 5 * This package is an SSL implementation written 6 * by Eric Young (eay@cryptsoft.com). 7 * The implementation was written so as to conform with Netscapes SSL. 8 * 9 * This library is free for commercial and non-commercial use as long as 10 * the following conditions are aheared to. The following conditions 11 * apply to all code found in this distribution, be it the RC4, RSA, 12 * lhash, DES, etc., code; not just the SSL code. The SSL documentation 13 * included with this distribution is covered by the same copyright terms 14 * except that the holder is Tim Hudson (tjh@cryptsoft.com). 15 * 16 * Copyright remains Eric Young's, and as such any Copyright notices in 17 * the code are not to be removed. 18 * If this package is used in a product, Eric Young should be given attribution 19 * as the author of the parts of the library used. 20 * This can be in the form of a textual message at program startup or 21 * in documentation (online or textual) provided with the package. 22 * 23 * Redistribution and use in source and binary forms, with or without 24 * modification, are permitted provided that the following conditions 25 * are met: 26 * 1. Redistributions of source code must retain the copyright 27 * notice, this list of conditions and the following disclaimer. 28 * 2. Redistributions in binary form must reproduce the above copyright 29 * notice, this list of conditions and the following disclaimer in the 30 * documentation and/or other materials provided with the distribution. 31 * 3. All advertising materials mentioning features or use of this software 32 * must display the following acknowledgement: 33 * "This product includes cryptographic software written by 34 * Eric Young (eay@cryptsoft.com)" 35 * The word 'cryptographic' can be left out if the rouines from the library 36 * being used are not cryptographic related :-). 37 * 4. If you include any Windows specific code (or a derivative thereof) from 38 * the apps directory (application code) you must include an acknowledgement: 39 * "This product includes software written by Tim Hudson (tjh@cryptsoft.com)" 40 * 41 * THIS SOFTWARE IS PROVIDED BY ERIC YOUNG ``AS IS'' AND 42 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 43 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 44 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE 45 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 46 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 47 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 48 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 49 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 50 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 51 * SUCH DAMAGE. 52 * 53 * The licence and distribution terms for any publically available version or 54 * derivative of this code cannot be changed. i.e. this code cannot simply be 55 * copied and put under another distribution licence 56 * [including the GNU Public Licence.] 57 */ 58 59 #include <openssl/opensslconf.h> /* for OPENSSL_NO_DSA */ 60 61 62 #include <sys/types.h> 63 #include <sys/stat.h> 64 65 #include <stdio.h> 66 #include <string.h> 67 68 #include "apps.h" 69 70 #include <openssl/bio.h> 71 #include <openssl/bn.h> 72 #include <openssl/dsa.h> 73 #include <openssl/err.h> 74 #include <openssl/pem.h> 75 #include <openssl/x509.h> 76 77 static struct { 78 const EVP_CIPHER *enc; 79 char *outfile; 80 char *passargout; 81 } gendsa_config; 82 83 static const EVP_CIPHER *get_cipher_by_name(char *name) 84 { 85 if (name == NULL || strcmp(name, "") == 0) 86 return (NULL); 87 #ifndef OPENSSL_NO_AES 88 else if (strcmp(name, "aes128") == 0) 89 return EVP_aes_128_cbc(); 90 else if (strcmp(name, "aes192") == 0) 91 return EVP_aes_192_cbc(); 92 else if (strcmp(name, "aes256") == 0) 93 return EVP_aes_256_cbc(); 94 #endif 95 #ifndef OPENSSL_NO_CAMELLIA 96 else if (strcmp(name, "camellia128") == 0) 97 return EVP_camellia_128_cbc(); 98 else if (strcmp(name, "camellia192") == 0) 99 return EVP_camellia_192_cbc(); 100 else if (strcmp(name, "camellia256") == 0) 101 return EVP_camellia_256_cbc(); 102 #endif 103 #ifndef OPENSSL_NO_DES 104 else if (strcmp(name, "des") == 0) 105 return EVP_des_cbc(); 106 else if (strcmp(name, "des3") == 0) 107 return EVP_des_ede3_cbc(); 108 #endif 109 #ifndef OPENSSL_NO_IDEA 110 else if (strcmp(name, "idea") == 0) 111 return EVP_idea_cbc(); 112 #endif 113 else 114 return (NULL); 115 } 116 117 static int 118 set_enc(int argc, char **argv, int *argsused) 119 { 120 char *name = argv[0]; 121 122 if (*name++ != '-') 123 return (1); 124 125 if ((gendsa_config.enc = get_cipher_by_name(name)) == NULL) 126 return (1); 127 128 *argsused = 1; 129 return (0); 130 } 131 132 static const struct option gendsa_options[] = { 133 #ifndef OPENSSL_NO_AES 134 { 135 .name = "aes128", 136 .desc = "Encrypt PEM output with CBC AES", 137 .type = OPTION_ARGV_FUNC, 138 .opt.argvfunc = set_enc, 139 }, 140 { 141 .name = "aes192", 142 .desc = "Encrypt PEM output with CBC AES", 143 .type = OPTION_ARGV_FUNC, 144 .opt.argvfunc = set_enc, 145 }, 146 { 147 .name = "aes256", 148 .desc = "Encrypt PEM output with CBC AES", 149 .type = OPTION_ARGV_FUNC, 150 .opt.argvfunc = set_enc, 151 }, 152 #endif 153 #ifndef OPENSSL_NO_CAMELLIA 154 { 155 .name = "camellia128", 156 .desc = "Encrypt PEM output with CBC Camellia", 157 .type = OPTION_ARGV_FUNC, 158 .opt.argvfunc = set_enc, 159 }, 160 { 161 .name = "camellia192", 162 .desc = "Encrypt PEM output with CBC Camellia", 163 .type = OPTION_ARGV_FUNC, 164 .opt.argvfunc = set_enc, 165 }, 166 { 167 .name = "camellia256", 168 .desc = "Encrypt PEM output with CBC Camellia", 169 .type = OPTION_ARGV_FUNC, 170 .opt.argvfunc = set_enc, 171 }, 172 #endif 173 #ifndef OPENSSL_NO_DES 174 { 175 .name = "des", 176 .desc = "Encrypt the generated key with DES in CBC mode", 177 .type = OPTION_ARGV_FUNC, 178 .opt.argvfunc = set_enc, 179 }, 180 { 181 .name = "des3", 182 .desc = "Encrypt the generated key with DES in EDE CBC mode (168 bit key)", 183 .type = OPTION_ARGV_FUNC, 184 .opt.argvfunc = set_enc, 185 }, 186 #endif 187 #ifndef OPENSSL_NO_IDEA 188 { 189 .name = "idea", 190 .desc = "Encrypt the generated key with IDEA in CBC mode", 191 .type = OPTION_ARGV_FUNC, 192 .opt.argvfunc = set_enc, 193 }, 194 #endif 195 { 196 .name = "out", 197 .argname = "file", 198 .desc = "Output the key to 'file'", 199 .type = OPTION_ARG, 200 .opt.arg = &gendsa_config.outfile, 201 }, 202 { 203 .name = "passout", 204 .argname = "src", 205 .desc = "Output file passphrase source", 206 .type = OPTION_ARG, 207 .opt.arg = &gendsa_config.passargout, 208 }, 209 { NULL }, 210 }; 211 212 static void 213 gendsa_usage(void) 214 { 215 fprintf(stderr, "usage: gendsa [-aes128 | -aes192 | -aes256 |\n"); 216 fprintf(stderr, " -camellia128 | -camellia192 | -camellia256 |\n"); 217 fprintf(stderr, " -des | -des3 | -idea] [-out file] [-passout src]"); 218 fprintf(stderr, " paramfile\n\n"); 219 options_usage(gendsa_options); 220 fprintf(stderr, "\n"); 221 } 222 223 int 224 gendsa_main(int argc, char **argv) 225 { 226 DSA *dsa = NULL; 227 int ret = 1; 228 char *dsaparams = NULL; 229 char *passout = NULL; 230 BIO *out = NULL, *in = NULL; 231 232 if (single_execution) { 233 if (pledge("stdio cpath wpath rpath tty", NULL) == -1) { 234 perror("pledge"); 235 exit(1); 236 } 237 } 238 239 memset(&gendsa_config, 0, sizeof(gendsa_config)); 240 241 if (options_parse(argc, argv, gendsa_options, &dsaparams, NULL) != 0) { 242 gendsa_usage(); 243 goto end; 244 } 245 246 if (dsaparams == NULL) { 247 gendsa_usage(); 248 goto end; 249 } 250 if (!app_passwd(bio_err, NULL, gendsa_config.passargout, NULL, 251 &passout)) { 252 BIO_printf(bio_err, "Error getting password\n"); 253 goto end; 254 } 255 in = BIO_new(BIO_s_file()); 256 if (!(BIO_read_filename(in, dsaparams))) { 257 perror(dsaparams); 258 goto end; 259 } 260 if ((dsa = PEM_read_bio_DSAparams(in, NULL, NULL, NULL)) == NULL) { 261 BIO_printf(bio_err, "unable to load DSA parameter file\n"); 262 goto end; 263 } 264 BIO_free(in); 265 in = NULL; 266 267 out = BIO_new(BIO_s_file()); 268 if (out == NULL) 269 goto end; 270 271 if (gendsa_config.outfile == NULL) { 272 BIO_set_fp(out, stdout, BIO_NOCLOSE); 273 } else { 274 if (BIO_write_filename(out, gendsa_config.outfile) <= 0) { 275 perror(gendsa_config.outfile); 276 goto end; 277 } 278 } 279 280 BIO_printf(bio_err, "Generating DSA key, %d bits\n", 281 BN_num_bits(dsa->p)); 282 if (!DSA_generate_key(dsa)) 283 goto end; 284 285 if (!PEM_write_bio_DSAPrivateKey(out, dsa, gendsa_config.enc, NULL, 0, 286 NULL, passout)) 287 goto end; 288 ret = 0; 289 end: 290 if (ret != 0) 291 ERR_print_errors(bio_err); 292 BIO_free(in); 293 BIO_free_all(out); 294 DSA_free(dsa); 295 free(passout); 296 297 return (ret); 298 } 299