]> git.ipfire.org Git - thirdparty/openssl.git/blame - apps/req.c
projects / thirdparty / openssl.git / blame
? search:
summary | shortlog | log | commit | commitdiff | tree
blob | blame (incremental) | history | HEAD
Document my latest changes.
[thirdparty/openssl.git] / apps / req.c
CommitLineData
d02b48c6 1/* apps/req.c */
58964a49 2/* Copyright (C) 1995-1998 Eric Young (eay@cryptsoft.com)
d02b48c6
RE		 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 <stdio.h>
60#include <stdlib.h>
61#include <time.h>
62#include <string.h>
58964a49 63#ifdef NO_STDIO
d02b48c6
RE		 64#define APPS_WIN16
65#endif
66#include "apps.h"
ec577822
BM		 67#include <openssl/bio.h>
68#include <openssl/evp.h>
ec577822
BM		 69#include <openssl/conf.h>
70#include <openssl/err.h>
71#include <openssl/asn1.h>
72#include <openssl/x509.h>
73#include <openssl/x509v3.h>
74#include <openssl/objects.h>
75#include <openssl/pem.h>
d02b48c6
RE		 76
77#define SECTION "req"
78
79#define BITS "default_bits"
80#define KEYFILE "default_keyfile"
b38f9f66 81#define PROMPT "prompt"
d02b48c6
RE		 82#define DISTINGUISHED_NAME "distinguished_name"
83#define ATTRIBUTES "attributes"
f317aa4c 84#define V3_EXTENSIONS "x509_extensions"
c79b16e1 85#define REQ_EXTENSIONS "req_extensions"
b38f9f66 86#define STRING_MASK "string_mask"
d02b48c6
RE		 87
88#define DEFAULT_KEY_LENGTH 512
89#define MIN_KEY_LENGTH 384
90
91#undef PROG
92#define PROG req_main
93
25f923dd 94/* -inform arg - input format - default PEM (DER or PEM)
d02b48c6
RE		 95 * -outform arg - output format - default PEM
96 * -in arg - input file - default stdin
97 * -out arg - output file - default stdout
98 * -verify - check request signature
99 * -noout - don't print stuff out.
100 * -text - print out human readable text.
101 * -nodes - no des encryption
102 * -config file - Load configuration file.
103 * -key file - make a request using key in file (or use it for verification).
104 * -keyform - key file format.
2a98f417 105 * -rand file(s) - load the file(s) into the PRNG.
20d242b0 106 * -egd file - load PRNG seed from EGD named socket.
d02b48c6
RE		 107 * -newkey - make a key and a request.
108 * -modulus - print RSA modulus.
109 * -x509 - output a self signed X509 structure instead.
110 * -asn1-kludge - output new certificate request in a format that some CA's
111 * require. This format is wrong
112 */
113
d02b48c6 114static int make_REQ(X509_REQ *req,EVP_PKEY *pkey,int attribs);
b38f9f66
DSH		 115static int prompt_info(X509_REQ *req,
116 STACK_OF(CONF_VALUE) *dn_sk, char *dn_sect,
117 STACK_OF(CONF_VALUE) *attr_sk, char *attr_sect, int attribs);
118static int auto_info(X509_REQ *req, STACK_OF(CONF_VALUE) *sk,
119 STACK_OF(CONF_VALUE) *attr, int attribs);
6e6bc352 120static int add_attribute_object(X509_REQ *req, char *text,
d500de16
BL		 121 char *def, char *value, int nid, int min,
122 int max);
d02b48c6
RE		 123static int add_DN_object(X509_NAME *n, char *text, char *def, char *value,
124 int nid,int min,int max);
752d706a 125#ifndef NO_RSA
b4f76582 126static void MS_CALLBACK req_cb(int p,int n,void *arg);
752d706a 127#endif
6e6bc352 128static int req_check_len(int len,int min,int max);
a43aa73e 129static int check_end(char *str, char *end);
d02b48c6
RE		 130#ifndef MONOLITH
131static char *default_config_file=NULL;
132static LHASH *config=NULL;
133#endif
134static LHASH *req_conf=NULL;
135
136#define TYPE_RSA 1
137#define TYPE_DSA 2
138#define TYPE_DH 3
139
667ac4ec
RE		 140int MAIN(int, char **);
141
6b691a5c 142int MAIN(int argc, char **argv)
d02b48c6 143 {
58964a49 144#ifndef NO_DSA
d02b48c6 145 DSA *dsa_params=NULL;
58964a49 146#endif
d02b48c6
RE		 147 int ex=1,x509=0,days=30;
148 X509 *x509ss=NULL;
149 X509_REQ *req=NULL;
150 EVP_PKEY *pkey=NULL;
151 int i,badops=0,newreq=0,newkey= -1,pkey_type=0;
152 BIO *in=NULL,*out=NULL;
153 int informat,outformat,verify=0,noout=0,text=0,keyform=FORMAT_PEM;
8a208cba 154 int nodes=0,kludge=0,newhdr=0;
d02b48c6 155 char *infile,*outfile,*prog,*keyfile=NULL,*template=NULL,*keyout=NULL;
f317aa4c 156 char *extensions = NULL;
c79b16e1 157 char *req_exts = NULL;
d02b48c6
RE		 158 EVP_CIPHER *cipher=NULL;
159 int modulus=0;
20d242b0 160 char *inrand=NULL,*inegd=NULL;
a3fe382e 161 char *passargin = NULL, *passargout = NULL;
36217a94 162 char *passin = NULL, *passout = NULL;
d02b48c6 163 char *p;
e778802f 164 const EVP_MD *md_alg=NULL,*digest=EVP_md5();
d02b48c6
RE		 165#ifndef MONOLITH
166 MS_STATIC char config_name[256];
167#endif
168
b74ba295 169 req_conf = NULL;
d02b48c6
RE		 170#ifndef NO_DES
171 cipher=EVP_des_ede3_cbc();
172#endif
173 apps_startup();
174
175 if (bio_err == NULL)
176 if ((bio_err=BIO_new(BIO_s_file())) != NULL)
58964a49 177 BIO_set_fp(bio_err,stderr,BIO_NOCLOSE|BIO_FP_TEXT);
d02b48c6
RE		 178
179 infile=NULL;
180 outfile=NULL;
181 informat=FORMAT_PEM;
182 outformat=FORMAT_PEM;
183
184 prog=argv[0];
185 argc--;
186 argv++;
187 while (argc >= 1)
188 {
189 if (strcmp(*argv,"-inform") == 0)
190 {
191 if (--argc < 1) goto bad;
192 informat=str2fmt(*(++argv));
193 }
194 else if (strcmp(*argv,"-outform") == 0)
195 {
196 if (--argc < 1) goto bad;
197 outformat=str2fmt(*(++argv));
198 }
199 else if (strcmp(*argv,"-key") == 0)
200 {
201 if (--argc < 1) goto bad;
202 keyfile= *(++argv);
203 }
204 else if (strcmp(*argv,"-new") == 0)
205 {
206 pkey_type=TYPE_RSA;
207 newreq=1;
208 }
209 else if (strcmp(*argv,"-config") == 0)
210 {
211 if (--argc < 1) goto bad;
212 template= *(++argv);
213 }
214 else if (strcmp(*argv,"-keyform") == 0)
215 {
216 if (--argc < 1) goto bad;
217 keyform=str2fmt(*(++argv));
218 }
219 else if (strcmp(*argv,"-in") == 0)
220 {
221 if (--argc < 1) goto bad;
222 infile= *(++argv);
223 }
224 else if (strcmp(*argv,"-out") == 0)
225 {
226 if (--argc < 1) goto bad;
227 outfile= *(++argv);
228 }
229 else if (strcmp(*argv,"-keyout") == 0)
230 {
231 if (--argc < 1) goto bad;
232 keyout= *(++argv);
233 }
36217a94
DSH		 234 else if (strcmp(*argv,"-passin") == 0)
235 {
236 if (--argc < 1) goto bad;
a3fe382e 237 passargin= *(++argv);
36217a94
DSH		 238 }
239 else if (strcmp(*argv,"-passout") == 0)
240 {
241 if (--argc < 1) goto bad;
a3fe382e 242 passargout= *(++argv);
36217a94 243 }
ac57d15b
RL		 244 else if (strcmp(*argv,"-rand") == 0)
245 {
246 if (--argc < 1) goto bad;
247 inrand= *(++argv);
248 }
20d242b0
RL		 249 else if (strcmp(*argv,"-egd") == 0)
250 {
251 if (--argc < 1) goto bad;
252 inegd= *(++argv);
253 }
d02b48c6
RE		 254 else if (strcmp(*argv,"-newkey") == 0)
255 {
bc4deee0
BL		 256 int is_numeric;
257
d02b48c6
RE		 258 if (--argc < 1) goto bad;
259 p= *(++argv);
bc4deee0
BL		 260 is_numeric = p[0] >= '0' && p[0] <= '9';
261 if (strncmp("rsa:",p,4) == 0 || is_numeric)
d02b48c6
RE		 262 {
263 pkey_type=TYPE_RSA;
bc4deee0
BL		 264 if(!is_numeric)
265 p+=4;
d02b48c6
RE		 266 newkey= atoi(p);
267 }
58964a49
RE		 268 else
269#ifndef NO_DSA
270 if (strncmp("dsa:",p,4) == 0)
d02b48c6
RE		 271 {
272 X509 *xtmp=NULL;
273 EVP_PKEY *dtmp;
274
275 pkey_type=TYPE_DSA;
276 p+=4;
277 if ((in=BIO_new_file(p,"r")) == NULL)
278 {
279 perror(p);
280 goto end;
281 }
74678cc2 282 if ((dsa_params=PEM_read_bio_DSAparams(in,NULL,NULL,NULL)) == NULL)
d02b48c6
RE		 283 {
284 ERR_clear_error();
d58d092b 285 (void)BIO_reset(in);
74678cc2 286 if ((xtmp=PEM_read_bio_X509(in,NULL,NULL,NULL)) == NULL)
d02b48c6
RE		 287 {
288 BIO_printf(bio_err,"unable to load DSA parameters from file\n");
289 goto end;
290 }
58964a49 291
d02b48c6
RE		 292 dtmp=X509_get_pubkey(xtmp);
293 if (dtmp->type == EVP_PKEY_DSA)
294 dsa_params=DSAparams_dup(dtmp->pkey.dsa);
1756d405 295 EVP_PKEY_free(dtmp);
d02b48c6
RE		 296 X509_free(xtmp);
297 if (dsa_params == NULL)
298 {
299 BIO_printf(bio_err,"Certificate does not contain DSA parameters\n");
300 goto end;
301 }
d02b48c6
RE		 302 }
303 BIO_free(in);
304 newkey=BN_num_bits(dsa_params->p);
305 in=NULL;
306 }
58964a49
RE		 307 else
308#endif
309#ifndef NO_DH
310 if (strncmp("dh:",p,4) == 0)
d02b48c6
RE		 311 {
312 pkey_type=TYPE_DH;
313 p+=3;
314 }
315 else
58964a49 316#endif
d02b48c6
RE		 317 pkey_type=TYPE_RSA;
318
319 newreq=1;
320 }
8a208cba
DSH		 321 else if (strcmp(*argv,"-newhdr") == 0)
322 newhdr=1;
d02b48c6
RE		 323 else if (strcmp(*argv,"-modulus") == 0)
324 modulus=1;
325 else if (strcmp(*argv,"-verify") == 0)
326 verify=1;
327 else if (strcmp(*argv,"-nodes") == 0)
328 nodes=1;
329 else if (strcmp(*argv,"-noout") == 0)
330 noout=1;
331 else if (strcmp(*argv,"-text") == 0)
332 text=1;
333 else if (strcmp(*argv,"-x509") == 0)
334 x509=1;
335 else if (strcmp(*argv,"-asn1-kludge") == 0)
336 kludge=1;
337 else if (strcmp(*argv,"-no-asn1-kludge") == 0)
338 kludge=0;
339 else if (strcmp(*argv,"-days") == 0)
340 {
341 if (--argc < 1) goto bad;
342 days= atoi(*(++argv));
343 if (days == 0) days=30;
344 }
345 else if ((md_alg=EVP_get_digestbyname(&((*argv)[1]))) != NULL)
346 {
347 /* ok */
348 digest=md_alg;
349 }
87a25f90
DSH		 350 else if (strcmp(*argv,"-extensions") == 0)
351 {
352 if (--argc < 1) goto bad;
353 extensions = *(++argv);
354 }
355 else if (strcmp(*argv,"-reqexts") == 0)
356 {
357 if (--argc < 1) goto bad;
358 req_exts = *(++argv);
359 }
d02b48c6 360 else
d02b48c6
RE		 361 {
362 BIO_printf(bio_err,"unknown option %s\n",*argv);
363 badops=1;
364 break;
365 }
366 argc--;
367 argv++;
368 }
369
370 if (badops)
371 {
372bad:
373 BIO_printf(bio_err,"%s [options] <infile >outfile\n",prog);
374 BIO_printf(bio_err,"where options are\n");
25f923dd
DSH		 375 BIO_printf(bio_err," -inform arg input format - DER or PEM\n");
376 BIO_printf(bio_err," -outform arg output format - DER or PEM\n");
9fe84296 377 BIO_printf(bio_err," -in arg input file\n");
d02b48c6
RE		 378 BIO_printf(bio_err," -out arg output file\n");
379 BIO_printf(bio_err," -text text form of request\n");
380 BIO_printf(bio_err," -noout do not output REQ\n");
381 BIO_printf(bio_err," -verify verify signature on REQ\n");
382 BIO_printf(bio_err," -modulus RSA modulus\n");
383 BIO_printf(bio_err," -nodes don't encrypt the output key\n");
384 BIO_printf(bio_err," -key file use the private key contained in file\n");
385 BIO_printf(bio_err," -keyform arg key file format\n");
386 BIO_printf(bio_err," -keyout arg file to send the key to\n");
2a98f417
RL		 387 BIO_printf(bio_err," -rand file%cfile%c...\n", LIST_SEPARATOR_CHAR, LIST_SEPARATOR_CHAR);
388 BIO_printf(bio_err," load the file (or the files in the directory) into\n");
389 BIO_printf(bio_err," the random number generator\n");
20d242b0 390 BIO_printf(bio_err," -egd file load random seed from EGD socket\n");
d02b48c6
RE		 391 BIO_printf(bio_err," -newkey rsa:bits generate a new RSA key of 'bits' in size\n");
392 BIO_printf(bio_err," -newkey dsa:file generate a new DSA key, parameters taken from CA in 'file'\n");
393
394 BIO_printf(bio_err," -[digest] Digest to sign with (md5, sha1, md2, mdc2)\n");
d1f4c83c 395 BIO_printf(bio_err," -config file request template file.\n");
d02b48c6
RE		 396 BIO_printf(bio_err," -new new request.\n");
397 BIO_printf(bio_err," -x509 output a x509 structure instead of a cert. req.\n");
398 BIO_printf(bio_err," -days number of days a x509 generated by -x509 is valid for.\n");
8a208cba 399 BIO_printf(bio_err," -newhdr output \"NEW\" in the header lines\n");
d02b48c6
RE		 400 BIO_printf(bio_err," -asn1-kludge Output the 'request' in a format that is wrong but some CA's\n");
401 BIO_printf(bio_err," have been reported as requiring\n");
87a25f90
DSH		 402 BIO_printf(bio_err," -extensions .. specify certificate extension section (override value in config file)\n");
403 BIO_printf(bio_err," -reqexts .. specify request extension section (override value in config file)\n");
d02b48c6
RE		 404 goto end;
405 }
406
407 ERR_load_crypto_strings();
a3fe382e
DSH		 408 if(!app_passwd(bio_err, passargin, passargout, &passin, &passout)) {
409 BIO_printf(bio_err, "Error getting passwords\n");
410 goto end;
411 }
d02b48c6 412
3db1f2d5 413#ifndef MONOLITH /* else this has happened in openssl.c (global `config') */
d02b48c6 414 /* Lets load up our environment a little */
06d5b162
RE		 415 p=getenv("OPENSSL_CONF");
416 if (p == NULL)
417 p=getenv("SSLEAY_CONF");
d02b48c6
RE		 418 if (p == NULL)
419 {
420 strcpy(config_name,X509_get_default_cert_area());
7d7d2cbc 421#ifndef VMS
7af62c3c 422 strcat(config_name,"/");
7d7d2cbc 423#endif
06d5b162 424 strcat(config_name,OPENSSL_CONF);
d02b48c6
RE		 425 p=config_name;
426 }
3db1f2d5 427 default_config_file=p;
d02b48c6
RE		 428 config=CONF_load(config,p,NULL);
429#endif
430
431 if (template != NULL)
432 {
433 long errline;
434
435 BIO_printf(bio_err,"Using configuration from %s\n",template);
436 req_conf=CONF_load(NULL,template,&errline);
437 if (req_conf == NULL)
438 {
439 BIO_printf(bio_err,"error on line %ld of %s\n",errline,template);
440 goto end;
441 }
442 }
443 else
444 {
445 req_conf=config;
446 BIO_printf(bio_err,"Using configuration from %s\n",
447 default_config_file);
448 if (req_conf == NULL)
449 {
450 BIO_printf(bio_err,"Unable to load config info\n");
451 }
452 }
453
dfeab068
RE		 454 if (req_conf != NULL)
455 {
456 p=CONF_get_string(req_conf,NULL,"oid_file");
457 if (p != NULL)
458 {
459 BIO *oid_bio;
460
461 oid_bio=BIO_new_file(p,"r");
462 if (oid_bio == NULL)
463 {
464 /*
465 BIO_printf(bio_err,"problems opening %s for extra oid's\n",p);
466 ERR_print_errors(bio_err);
467 */
468 }
469 else
470 {
471 OBJ_create_objects(oid_bio);
472 BIO_free(oid_bio);
473 }
474 }
475 }
431b0cce 476 if(!add_oid_section(bio_err, req_conf)) goto end;
dfeab068 477
d02b48c6
RE		 478 if ((md_alg == NULL) &&
479 ((p=CONF_get_string(req_conf,SECTION,"default_md")) != NULL))
480 {
481 if ((md_alg=EVP_get_digestbyname(p)) != NULL)
482 digest=md_alg;
483 }
484
87a25f90
DSH		 485 if(!extensions)
486 extensions = CONF_get_string(req_conf, SECTION, V3_EXTENSIONS);
1756d405
DSH		 487 if(extensions) {
488 /* Check syntax of file */
41b731f2
DSH		 489 X509V3_CTX ctx;
490 X509V3_set_ctx_test(&ctx);
491 X509V3_set_conf_lhash(&ctx, req_conf);
492 if(!X509V3_EXT_add_conf(req_conf, &ctx, extensions, NULL)) {
1756d405
DSH		 493 BIO_printf(bio_err,
494 "Error Loading extension section %s\n", extensions);
495 goto end;
496 }
497 }
f317aa4c 498
36217a94
DSH		 499 if(!passin)
500 passin = CONF_get_string(req_conf, SECTION, "input_password");
501
502 if(!passout)
503 passout = CONF_get_string(req_conf, SECTION, "output_password");
504
b38f9f66 505 p = CONF_get_string(req_conf, SECTION, STRING_MASK);
74400f73
DSH		 506
507 if(p && !ASN1_STRING_set_default_mask_asc(p)) {
d2b6c3f3 508 BIO_printf(bio_err, "Invalid global string mask setting %s\n", p);
74400f73
DSH		 509 goto end;
510 }
511
87a25f90
DSH		 512 if(!req_exts)
513 req_exts = CONF_get_string(req_conf, SECTION, REQ_EXTENSIONS);
c79b16e1
DSH		 514 if(req_exts) {
515 /* Check syntax of file */
516 X509V3_CTX ctx;
517 X509V3_set_ctx_test(&ctx);
518 X509V3_set_conf_lhash(&ctx, req_conf);
519 if(!X509V3_EXT_add_conf(req_conf, &ctx, req_exts, NULL)) {
520 BIO_printf(bio_err,
521 "Error Loading request extension section %s\n",
522 req_exts);
523 goto end;
524 }
525 }
526
d02b48c6
RE		 527 in=BIO_new(BIO_s_file());
528 out=BIO_new(BIO_s_file());
529 if ((in == NULL) || (out == NULL))
530 goto end;
531
532 if (keyfile != NULL)
533 {
534 if (BIO_read_filename(in,keyfile) <= 0)
535 {
536 perror(keyfile);
537 goto end;
538 }
539
20432eae
DSH		 540 if (keyform == FORMAT_ASN1)
541 pkey=d2i_PrivateKey_bio(in,NULL);
542 else if (keyform == FORMAT_PEM)
36217a94 543 {
a3fe382e 544 pkey=PEM_read_bio_PrivateKey(in,NULL,NULL,passin);
36217a94 545 }
d02b48c6
RE		 546 else
547 {
548 BIO_printf(bio_err,"bad input format specified for X509 request\n");
549 goto end;
550 }
551
552 if (pkey == NULL)
553 {
554 BIO_printf(bio_err,"unable to load Private key\n");
555 goto end;
556 }
557 }
558
559 if (newreq && (pkey == NULL))
560 {
ff4e9d91 561 char *randfile = CONF_get_string(req_conf,SECTION,"RANDFILE");
a31011e8 562 app_RAND_load_file(randfile, bio_err, 0);
ff4e9d91
RL		 563 if (inrand)
564 app_RAND_load_files(inrand);
20d242b0
RL		 565 if (inegd)
566 RAND_egd(inegd);
567
d02b48c6
RE		 568 if (newkey <= 0)
569 {
570 newkey=(int)CONF_get_number(req_conf,SECTION,BITS);
571 if (newkey <= 0)
572 newkey=DEFAULT_KEY_LENGTH;
573 }
574
575 if (newkey < MIN_KEY_LENGTH)
576 {
577 BIO_printf(bio_err,"private key length is too short,\n");
578 BIO_printf(bio_err,"it needs to be at least %d bits, not %d\n",MIN_KEY_LENGTH,newkey);
579 goto end;
580 }
581 BIO_printf(bio_err,"Generating a %d bit %s private key\n",
582 newkey,(pkey_type == TYPE_RSA)?"RSA":"DSA");
583
584 if ((pkey=EVP_PKEY_new()) == NULL) goto end;
585
586#ifndef NO_RSA
587 if (pkey_type == TYPE_RSA)
588 {
589 if (!EVP_PKEY_assign_RSA(pkey,
58964a49 590 RSA_generate_key(newkey,0x10001,
b4f76582 591 req_cb,bio_err)))
d02b48c6
RE		 592 goto end;
593 }
594 else
595#endif
596#ifndef NO_DSA
597 if (pkey_type == TYPE_DSA)
598 {
599 if (!DSA_generate_key(dsa_params)) goto end;
600 if (!EVP_PKEY_assign_DSA(pkey,dsa_params)) goto end;
601 dsa_params=NULL;
602 }
603#endif
604
a31011e8 605 app_RAND_write_file(randfile, bio_err);
d02b48c6
RE		 606
607 if (pkey == NULL) goto end;
608
609 if (keyout == NULL)
610 keyout=CONF_get_string(req_conf,SECTION,KEYFILE);
611
612 if (keyout == NULL)
613 {
614 BIO_printf(bio_err,"writing new private key to stdout\n");
615 BIO_set_fp(out,stdout,BIO_NOCLOSE);
616 }
617 else
618 {
619 BIO_printf(bio_err,"writing new private key to '%s'\n",keyout);
620 if (BIO_write_filename(out,keyout) <= 0)
621 {
622 perror(keyout);
623 goto end;
624 }
625 }
626
627 p=CONF_get_string(req_conf,SECTION,"encrypt_rsa_key");
628 if (p == NULL)
629 p=CONF_get_string(req_conf,SECTION,"encrypt_key");
630 if ((p != NULL) && (strcmp(p,"no") == 0))
631 cipher=NULL;
632 if (nodes) cipher=NULL;
633
634 i=0;
635loop:
636 if (!PEM_write_bio_PrivateKey(out,pkey,cipher,
a3fe382e 637 NULL,0,NULL,passout))
d02b48c6
RE		 638 {
639 if ((ERR_GET_REASON(ERR_peek_error()) ==
640 PEM_R_PROBLEMS_GETTING_PASSWORD) && (i < 3))
641 {
642 ERR_clear_error();
643 i++;
644 goto loop;
645 }
646 goto end;
647 }
648 BIO_printf(bio_err,"-----\n");
649 }
650
651 if (!newreq)
652 {
653 /* Since we are using a pre-existing certificate
654 * request, the kludge 'format' info should not be
655 * changed. */
656 kludge= -1;
657 if (infile == NULL)
658 BIO_set_fp(in,stdin,BIO_NOCLOSE);
659 else
660 {
661 if (BIO_read_filename(in,infile) <= 0)
662 {
663 perror(infile);
664 goto end;
665 }
666 }
667
668 if (informat == FORMAT_ASN1)
669 req=d2i_X509_REQ_bio(in,NULL);
670 else if (informat == FORMAT_PEM)
74678cc2 671 req=PEM_read_bio_X509_REQ(in,NULL,NULL,NULL);
d02b48c6
RE		 672 else
673 {
674 BIO_printf(bio_err,"bad input format specified for X509 request\n");
675 goto end;
676 }
677 if (req == NULL)
678 {
679 BIO_printf(bio_err,"unable to load X509 request\n");
680 goto end;
681 }
682 }
683
684 if (newreq || x509)
685 {
58964a49 686#ifndef NO_DSA
d02b48c6
RE		 687 if (pkey->type == EVP_PKEY_DSA)
688 digest=EVP_dss1();
58964a49 689#endif
d02b48c6
RE		 690
691 if (pkey == NULL)
692 {
693 BIO_printf(bio_err,"you need to specify a private key\n");
694 goto end;
695 }
696 if (req == NULL)
697 {
698 req=X509_REQ_new();
699 if (req == NULL)
700 {
701 goto end;
702 }
703
704 i=make_REQ(req,pkey,!x509);
705 if (kludge >= 0)
706 req->req_info->req_kludge=kludge;
707 if (!i)
708 {
709 BIO_printf(bio_err,"problems making Certificate Request\n");
710 goto end;
711 }
712 }
713 if (x509)
714 {
10061c7c 715 EVP_PKEY *tmppkey;
f317aa4c 716 X509V3_CTX ext_ctx;
d02b48c6
RE		 717 if ((x509ss=X509_new()) == NULL) goto end;
718
f317aa4c
DSH		 719 /* Set version to V3 */
720 if(!X509_set_version(x509ss, 2)) goto end;
d02b48c6
RE		 721 ASN1_INTEGER_set(X509_get_serialNumber(x509ss),0L);
722
723 X509_set_issuer_name(x509ss,
724 X509_REQ_get_subject_name(req));
725 X509_gmtime_adj(X509_get_notBefore(x509ss),0);
726 X509_gmtime_adj(X509_get_notAfter(x509ss),
727 (long)60*60*24*days);
728 X509_set_subject_name(x509ss,
729 X509_REQ_get_subject_name(req));
10061c7c
DSH		 730 tmppkey = X509_REQ_get_pubkey(req);
731 X509_set_pubkey(x509ss,tmppkey);
732 EVP_PKEY_free(tmppkey);
d02b48c6 733
f317aa4c
DSH		 734 /* Set up V3 context struct */
735
1d48dd00
DSH		 736 X509V3_set_ctx(&ext_ctx, x509ss, x509ss, NULL, NULL, 0);
737 X509V3_set_conf_lhash(&ext_ctx, req_conf);
f317aa4c
DSH		 738
739 /* Add extensions */
740 if(extensions && !X509V3_EXT_add_conf(req_conf,
9f7646da
BL		 741 &ext_ctx, extensions, x509ss))
742 {
743 BIO_printf(bio_err,
744 "Error Loading extension section %s\n",
745 extensions);
746 goto end;
747 }
f317aa4c 748
d02b48c6
RE		 749 if (!(i=X509_sign(x509ss,pkey,digest)))
750 goto end;
751 }
752 else
753 {
c79b16e1
DSH		 754 X509V3_CTX ext_ctx;
755
756 /* Set up V3 context struct */
757
758 X509V3_set_ctx(&ext_ctx, NULL, NULL, req, NULL, 0);
759 X509V3_set_conf_lhash(&ext_ctx, req_conf);
760
761 /* Add extensions */
762 if(req_exts && !X509V3_EXT_REQ_add_conf(req_conf,
763 &ext_ctx, req_exts, req))
764 {
765 BIO_printf(bio_err,
766 "Error Loading extension section %s\n",
767 req_exts);
768 goto end;
769 }
d02b48c6
RE		 770 if (!(i=X509_REQ_sign(req,pkey,digest)))
771 goto end;
772 }
773 }
774
775 if (verify && !x509)
776 {
777 int tmp=0;
778
779 if (pkey == NULL)
780 {
781 pkey=X509_REQ_get_pubkey(req);
782 tmp=1;
783 if (pkey == NULL) goto end;
784 }
785
786 i=X509_REQ_verify(req,pkey);
cfcf6453
DSH		 787 if (tmp) {
788 EVP_PKEY_free(pkey);
789 pkey=NULL;
790 }
d02b48c6
RE		 791
792 if (i < 0)
793 {
794 goto end;
795 }
796 else if (i == 0)
797 {
798 BIO_printf(bio_err,"verify failure\n");
799 }
800 else /* if (i > 0) */
801 BIO_printf(bio_err,"verify OK\n");
802 }
803
804 if (noout && !text && !modulus)
805 {
806 ex=0;
807 goto end;
808 }
809
810 if (outfile == NULL)
811 BIO_set_fp(out,stdout,BIO_NOCLOSE);
812 else
813 {
814 if ((keyout != NULL) && (strcmp(outfile,keyout) == 0))
815 i=(int)BIO_append_filename(out,outfile);
816 else
817 i=(int)BIO_write_filename(out,outfile);
818 if (!i)
819 {
820 perror(outfile);
821 goto end;
822 }
823 }
824
825 if (text)
826 {
827 if (x509)
828 X509_print(out,x509ss);
829 else
830 X509_REQ_print(out,req);
831 }
832
833 if (modulus)
834 {
835 EVP_PKEY *pubkey;
836
837 if (x509)
838 pubkey=X509_get_pubkey(x509ss);
839 else
840 pubkey=X509_REQ_get_pubkey(req);
841 if (pubkey == NULL)
842 {
843 fprintf(stdout,"Modulus=unavailable\n");
844 goto end;
845 }
846 fprintf(stdout,"Modulus=");
13e91dd3 847#ifndef NO_RSA
d02b48c6
RE		 848 if (pubkey->type == EVP_PKEY_RSA)
849 BN_print(out,pubkey->pkey.rsa->n);
850 else
13e91dd3 851#endif
d02b48c6
RE		 852 fprintf(stdout,"Wrong Algorithm type");
853 fprintf(stdout,"\n");
854 }
855
856 if (!noout && !x509)
857 {
858 if (outformat == FORMAT_ASN1)
859 i=i2d_X509_REQ_bio(out,req);
8a208cba
DSH		 860 else if (outformat == FORMAT_PEM) {
861 if(newhdr) i=PEM_write_bio_X509_REQ_NEW(out,req);
862 else i=PEM_write_bio_X509_REQ(out,req);
863 } else {
d02b48c6
RE		 864 BIO_printf(bio_err,"bad output format specified for outfile\n");
865 goto end;
866 }
867 if (!i)
868 {
869 BIO_printf(bio_err,"unable to write X509 request\n");
870 goto end;
871 }
872 }
873 if (!noout && x509 && (x509ss != NULL))
874 {
875 if (outformat == FORMAT_ASN1)
876 i=i2d_X509_bio(out,x509ss);
877 else if (outformat == FORMAT_PEM)
878 i=PEM_write_bio_X509(out,x509ss);
879 else {
880 BIO_printf(bio_err,"bad output format specified for outfile\n");
881 goto end;
882 }
883 if (!i)
884 {
885 BIO_printf(bio_err,"unable to write X509 certificate\n");
886 goto end;
887 }
888 }
889 ex=0;
890end:
891 if (ex)
892 {
893 ERR_print_errors(bio_err);
894 }
895 if ((req_conf != NULL) && (req_conf != config)) CONF_free(req_conf);
a43aa73e
DSH		 896 BIO_free(in);
897 BIO_free(out);
898 EVP_PKEY_free(pkey);
899 X509_REQ_free(req);
900 X509_free(x509ss);
26a3a48d
RL		 901 if(passargin && passin) OPENSSL_free(passin);
902 if(passargout && passout) OPENSSL_free(passout);
a43aa73e 903 OBJ_cleanup();
58964a49 904#ifndef NO_DSA
d02b48c6 905 if (dsa_params != NULL) DSA_free(dsa_params);
58964a49 906#endif
d02b48c6
RE		 907 EXIT(ex);
908 }
909
6b691a5c 910static int make_REQ(X509_REQ *req, EVP_PKEY *pkey, int attribs)
d02b48c6 911 {
a43aa73e 912 int ret=0,i;
b38f9f66
DSH		 913 char no_prompt = 0;
914 STACK_OF(CONF_VALUE) *dn_sk, *attr_sk = NULL;
915 char *tmp, *dn_sect,*attr_sect;
916
917 tmp=CONF_get_string(req_conf,SECTION,PROMPT);
918 if((tmp != NULL) && !strcmp(tmp, "no")) no_prompt = 1;
919
920 dn_sect=CONF_get_string(req_conf,SECTION,DISTINGUISHED_NAME);
921 if (dn_sect == NULL)
d02b48c6
RE		 922 {
923 BIO_printf(bio_err,"unable to find '%s' in config\n",
924 DISTINGUISHED_NAME);
925 goto err;
926 }
b38f9f66
DSH		 927 dn_sk=CONF_get_section(req_conf,dn_sect);
928 if (dn_sk == NULL)
d02b48c6 929 {
b38f9f66 930 BIO_printf(bio_err,"unable to get '%s' section\n",dn_sect);
d02b48c6
RE		 931 goto err;
932 }
933
b38f9f66
DSH		 934 attr_sect=CONF_get_string(req_conf,SECTION,ATTRIBUTES);
935 if (attr_sect == NULL)
936 attr_sk=NULL;
d02b48c6
RE		 937 else
938 {
b38f9f66
DSH		 939 attr_sk=CONF_get_section(req_conf,attr_sect);
940 if (attr_sk == NULL)
d02b48c6 941 {
b38f9f66 942 BIO_printf(bio_err,"unable to get '%s' section\n",attr_sect);
d02b48c6
RE		 943 goto err;
944 }
945 }
946
74400f73 947 /* setup version number */
b38f9f66 948 if (!X509_REQ_set_version(req,0L)) goto err; /* version 1 */
74400f73 949
b38f9f66
DSH		 950 if(no_prompt) i = auto_info(req, dn_sk, attr_sk, attribs);
951 else i = prompt_info(req, dn_sk, dn_sect, attr_sk, attr_sect, attribs);
952 if(!i) goto err;
d02b48c6 953
d02b48c6
RE		 954 X509_REQ_set_pubkey(req,pkey);
955
956 ret=1;
957err:
958 return(ret);
959 }
960
b38f9f66
DSH		 961
962static int prompt_info(X509_REQ *req,
963 STACK_OF(CONF_VALUE) *dn_sk, char *dn_sect,
964 STACK_OF(CONF_VALUE) *attr_sk, char *attr_sect, int attribs)
965 {
966 int i;
967 char *p,*q;
968 char buf[100];
969 int nid,min,max;
970 char *type,*def,*value;
971 CONF_VALUE *v;
972 X509_NAME *subj;
973 subj = X509_REQ_get_subject_name(req);
974 BIO_printf(bio_err,"You are about to be asked to enter information that will be incorporated\n");
975 BIO_printf(bio_err,"into your certificate request.\n");
976 BIO_printf(bio_err,"What you are about to enter is what is called a Distinguished Name or a DN.\n");
977 BIO_printf(bio_err,"There are quite a few fields but you can leave some blank\n");
978 BIO_printf(bio_err,"For some fields there will be a default value,\n");
979 BIO_printf(bio_err,"If you enter '.', the field will be left blank.\n");
980 BIO_printf(bio_err,"-----\n");
981
982
983 if (sk_CONF_VALUE_num(dn_sk))
984 {
985 i= -1;
986start: for (;;)
987 {
988 i++;
989 if (sk_CONF_VALUE_num(dn_sk) <= i) break;
990
991 v=sk_CONF_VALUE_value(dn_sk,i);
992 p=q=NULL;
993 type=v->name;
994 if(!check_end(type,"_min") || !check_end(type,"_max") ||
995 !check_end(type,"_default") ||
996 !check_end(type,"_value")) continue;
997 /* Skip past any leading X. X: X, etc to allow for
998 * multiple instances
999 */
1000 for(p = v->name; *p ; p++)
1001 if ((*p == ':') || (*p == ',') ||
1002 (*p == '.')) {
1003 p++;
1004 if(*p) type = p;
1005 break;
1006 }
1007 /* If OBJ not recognised ignore it */
1008 if ((nid=OBJ_txt2nid(type)) == NID_undef) goto start;
1009 sprintf(buf,"%s_default",v->name);
1010 if ((def=CONF_get_string(req_conf,dn_sect,buf)) == NULL)
1011 def="";
1012
1013 sprintf(buf,"%s_value",v->name);
1014 if ((value=CONF_get_string(req_conf,dn_sect,buf)) == NULL)
1015 value=NULL;
1016
1017 sprintf(buf,"%s_min",v->name);
1018 min=(int)CONF_get_number(req_conf,dn_sect,buf);
1019
1020 sprintf(buf,"%s_max",v->name);
1021 max=(int)CONF_get_number(req_conf,dn_sect,buf);
1022
1023 if (!add_DN_object(subj,v->value,def,value,nid,
1024 min,max))
1025 return 0;
1026 }
1027 if (X509_NAME_entry_count(subj) == 0)
1028 {
1029 BIO_printf(bio_err,"error, no objects specified in config file\n");
1030 return 0;
1031 }
1032
1033 if (attribs)
1034 {
1035 if ((attr_sk != NULL) && (sk_CONF_VALUE_num(attr_sk) > 0))
1036 {
1037 BIO_printf(bio_err,"\nPlease enter the following 'extra' attributes\n");
1038 BIO_printf(bio_err,"to be sent with your certificate request\n");
1039 }
1040
1041 i= -1;
1042start2: for (;;)
1043 {
1044 i++;
1045 if ((attr_sk == NULL) ||
1046 (sk_CONF_VALUE_num(attr_sk) <= i))
1047 break;
1048
1049 v=sk_CONF_VALUE_value(attr_sk,i);
1050 type=v->name;
1051 if ((nid=OBJ_txt2nid(type)) == NID_undef)
1052 goto start2;
1053
1054 sprintf(buf,"%s_default",type);
1055 if ((def=CONF_get_string(req_conf,attr_sect,buf))
1056 == NULL)
1057 def="";
1058
1059 sprintf(buf,"%s_value",type);
1060 if ((value=CONF_get_string(req_conf,attr_sect,buf))
1061 == NULL)
1062 value=NULL;
1063
1064 sprintf(buf,"%s_min",type);
1065 min=(int)CONF_get_number(req_conf,attr_sect,buf);
1066
1067 sprintf(buf,"%s_max",type);
1068 max=(int)CONF_get_number(req_conf,attr_sect,buf);
1069
6e6bc352 1070 if (!add_attribute_object(req,
b38f9f66
DSH		 1071 v->value,def,value,nid,min,max))
1072 return 0;
1073 }
1074 }
1075 }
1076 else
1077 {
1078 BIO_printf(bio_err,"No template, please set one up.\n");
1079 return 0;
1080 }
1081
1082 return 1;
1083
1084 }
1085
1086static int auto_info(X509_REQ *req, STACK_OF(CONF_VALUE) *dn_sk,
1087 STACK_OF(CONF_VALUE) *attr_sk, int attribs)
1088 {
1089 int i;
1090 char *p,*q;
1091 char *type;
1092 CONF_VALUE *v;
1093 X509_NAME *subj;
1094
1095 subj = X509_REQ_get_subject_name(req);
1096
1097 for (i = 0; i < sk_CONF_VALUE_num(dn_sk); i++)
1098 {
1099 v=sk_CONF_VALUE_value(dn_sk,i);
1100 p=q=NULL;
1101 type=v->name;
1102 /* Skip past any leading X. X: X, etc to allow for
1103 * multiple instances
1104 */
1105 for(p = v->name; *p ; p++)
1106 if ((*p == ':') || (*p == ',') || (*p == '.')) {
1107 p++;
1108 if(*p) type = p;
1109 break;
1110 }
1111 if (!X509_NAME_add_entry_by_txt(subj,type, MBSTRING_ASC,
1112 (unsigned char *) v->value,-1,-1,0)) return 0;
1113
1114 }
1115
1116 if (!X509_NAME_entry_count(subj))
1117 {
1118 BIO_printf(bio_err,"error, no objects specified in config file\n");
1119 return 0;
1120 }
b38f9f66
DSH		 1121 if (attribs)
1122 {
6e6bc352 1123 for (i = 0; i < sk_CONF_VALUE_num(attr_sk); i++)
b38f9f66 1124 {
b38f9f66 1125 v=sk_CONF_VALUE_value(attr_sk,i);
c7cb16a8 1126 if(!X509_REQ_add1_attr_by_txt(req, v->name, MBSTRING_ASC,
6e6bc352 1127 (unsigned char *)v->value, -1)) return 0;
b38f9f66
DSH		 1128 }
1129 }
b38f9f66
DSH		 1130 return 1;
1131 }
1132
1133
6b691a5c
UM		 1134static int add_DN_object(X509_NAME *n, char *text, char *def, char *value,
1135 int nid, int min, int max)
d02b48c6 1136 {
74400f73 1137 int i,ret=0;
d02b48c6 1138 MS_STATIC char buf[1024];
6e6bc352 1139start:
d02b48c6 1140 BIO_printf(bio_err,"%s [%s]:",text,def);
d58d092b 1141 (void)BIO_flush(bio_err);
d02b48c6
RE		 1142 if (value != NULL)
1143 {
1144 strcpy(buf,value);
1145 strcat(buf,"\n");
1146 BIO_printf(bio_err,"%s\n",value);
1147 }
1148 else
1149 {
1150 buf[0]='\0';
1151 fgets(buf,1024,stdin);
1152 }
1153
1154 if (buf[0] == '\0') return(0);
1155 else if (buf[0] == '\n')
1156 {
1157 if ((def == NULL) || (def[0] == '\0'))
1158 return(1);
1159 strcpy(buf,def);
1160 strcat(buf,"\n");
1161 }
1162 else if ((buf[0] == '.') && (buf[1] == '\n')) return(1);
1163
1164 i=strlen(buf);
1165 if (buf[i-1] != '\n')
1166 {
1167 BIO_printf(bio_err,"weird input :-(\n");
1168 return(0);
1169 }
1170 buf[--i]='\0';
1171
a53955d8
UM		 1172#ifdef CHARSET_EBCDIC
1173 ebcdic2ascii(buf, buf, i);
1174#endif
6e6bc352 1175 if(!req_check_len(i, min, max)) goto start;
74400f73
DSH		 1176 if (!X509_NAME_add_entry_by_NID(n,nid, MBSTRING_ASC,
1177 (unsigned char *) buf, -1,-1,0)) goto err;
d02b48c6
RE		 1178 ret=1;
1179err:
d02b48c6
RE		 1180 return(ret);
1181 }
1182
6e6bc352 1183static int add_attribute_object(X509_REQ *req, char *text,
d500de16
BL		 1184 char *def, char *value, int nid, int min,
1185 int max)
d02b48c6 1186 {
6e6bc352 1187 int i;
d02b48c6 1188 static char buf[1024];
d02b48c6
RE		 1189
1190start:
1191 BIO_printf(bio_err,"%s [%s]:",text,def);
d58d092b 1192 (void)BIO_flush(bio_err);
d02b48c6
RE		 1193 if (value != NULL)
1194 {
1195 strcpy(buf,value);
1196 strcat(buf,"\n");
1197 BIO_printf(bio_err,"%s\n",value);
1198 }
1199 else
1200 {
1201 buf[0]='\0';
1202 fgets(buf,1024,stdin);
1203 }
1204
1205 if (buf[0] == '\0') return(0);
1206 else if (buf[0] == '\n')
1207 {
1208 if ((def == NULL) || (def[0] == '\0'))
1209 return(1);
1210 strcpy(buf,def);
1211 strcat(buf,"\n");
1212 }
1213 else if ((buf[0] == '.') && (buf[1] == '\n')) return(1);
1214
1215 i=strlen(buf);
1216 if (buf[i-1] != '\n')
1217 {
1218 BIO_printf(bio_err,"weird input :-(\n");
1219 return(0);
1220 }
1221 buf[--i]='\0';
6e6bc352 1222 if(!req_check_len(i, min, max)) goto start;
d02b48c6 1223
c7cb16a8 1224 if(!X509_REQ_add1_attr_by_NID(req, nid, MBSTRING_ASC,
6e6bc352
DSH		 1225 (unsigned char *)buf, -1)) {
1226 BIO_printf(bio_err, "Error adding attribute\n");
1227 ERR_print_errors(bio_err);
d02b48c6 1228 goto err;
6e6bc352 1229 }
d02b48c6 1230
d02b48c6
RE		 1231 return(1);
1232err:
d02b48c6
RE		 1233 return(0);
1234 }
1235
752d706a 1236#ifndef NO_RSA
b4f76582 1237static void MS_CALLBACK req_cb(int p, int n, void *arg)
d02b48c6
RE		 1238 {
1239 char c='*';
1240
1241 if (p == 0) c='.';
1242 if (p == 1) c='+';
1243 if (p == 2) c='*';
1244 if (p == 3) c='\n';
58964a49 1245 BIO_write((BIO *)arg,&c,1);
d58d092b 1246 (void)BIO_flush((BIO *)arg);
d02b48c6
RE		 1247#ifdef LINT
1248 p=n;
1249#endif
1250 }
752d706a 1251#endif
d02b48c6 1252
6e6bc352 1253static int req_check_len(int len, int min, int max)
d02b48c6 1254 {
d02b48c6
RE		 1255 if (len < min)
1256 {
1257 BIO_printf(bio_err,"string is too short, it needs to be at least %d bytes long\n",min);
1258 return(0);
1259 }
1260 if ((max != 0) && (len > max))
1261 {
1262 BIO_printf(bio_err,"string is too long, it needs to be less than %d bytes long\n",max);
1263 return(0);
1264 }
1265 return(1);
1266 }
a43aa73e
DSH		 1267
1268/* Check if the end of a string matches 'end' */
6b691a5c 1269static int check_end(char *str, char *end)
a43aa73e
DSH		 1270{
1271 int elen, slen;
1272 char *tmp;
1273 elen = strlen(end);
1274 slen = strlen(str);
1275 if(elen > slen) return 1;
1276 tmp = str + slen - elen;
a43aa73e
DSH		 1277 return strcmp(tmp, end);
1278}
A mirror of the official openssl repository