1 /* ==================================================================== 2 * Copyright (c) 2004 The OpenSSL Project. All rights reserved. 3 * 4 * Redistribution and use in source and binary forms, with or without 5 * modification, are permitted provided that the following conditions 6 * are met: 7 * 8 * 1. Redistributions of source code must retain the above copyright 9 * notice, this list of conditions and the following disclaimer. 10 * 11 * 2. Redistributions in binary form must reproduce the above copyright 12 * notice, this list of conditions and the following disclaimer in 13 * the documentation and/or other materials provided with the 14 * distribution. 15 * 16 * 3. All advertising materials mentioning features or use of this 17 * software must display the following acknowledgment: 18 * "This product includes software developed by the OpenSSL Project 19 * for use in the OpenSSL Toolkit. (http://www.openssl.org/)" 20 * 21 * 4. The names "OpenSSL Toolkit" and "OpenSSL Project" must not be used to 22 * endorse or promote products derived from this software without 23 * prior written permission. For written permission, please contact 24 * openssl-core@openssl.org. 25 * 26 * 5. Products derived from this software may not be called "OpenSSL" 27 * nor may "OpenSSL" appear in their names without prior written 28 * permission of the OpenSSL Project. 29 * 30 * 6. Redistributions of any form whatsoever must retain the following 31 * acknowledgment: 32 * "This product includes software developed by the OpenSSL Project 33 * for use in the OpenSSL Toolkit (http://www.openssl.org/)" 34 * 35 * THIS SOFTWARE IS PROVIDED BY THE OpenSSL PROJECT ``AS IS'' AND ANY 36 * EXPRESSED OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 37 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR 38 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE OpenSSL PROJECT OR 39 * ITS CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, 40 * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT 41 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; 42 * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 43 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, 44 * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) 45 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED 46 * OF THE POSSIBILITY OF SUCH DAMAGE. 47 * 48 */ 49 50 #include <string.h> 51 52 #include "apps.h" 53 #include <openssl/bn.h> 54 55 56 #undef PROG 57 #define PROG prime_main 58 59 int MAIN(int argc, char **argv) 60 { 61 int hex=0; 62 int checks=20; 63 BIGNUM *bn=NULL; 64 BIO *bio_out=NULL; 65 66 apps_startup(); 67 68 if (bio_err == NULL) 69 if ((bio_err=BIO_new(BIO_s_file())) != NULL) 70 BIO_set_fp(bio_err,stderr,BIO_NOCLOSE|BIO_FP_TEXT); 71 72 if (bio_out == NULL) 73 if ((bio_out=BIO_new(BIO_s_file())) != NULL) 74 { 75 BIO_set_fp(bio_out,stdout,BIO_NOCLOSE); 76 #ifdef OPENSSL_SYS_VMS 77 { 78 BIO *tmpbio = BIO_new(BIO_f_linebuffer()); 79 bio_out = BIO_push(tmpbio, bio_out); 80 } 81 #endif 82 } 83 84 --argc; 85 ++argv; 86 while (argc >= 1 && **argv == '-') 87 { 88 if(!strcmp(*argv,"-hex")) 89 hex=1; 90 else if(!strcmp(*argv,"-checks")) 91 if(--argc < 1) 92 goto bad; 93 else 94 checks=atoi(*++argv); 95 else 96 { 97 BIO_printf(bio_err,"Unknown option '%s'\n",*argv); 98 bad: 99 BIO_printf(bio_err,"options are\n"); 100 BIO_printf(bio_err,"%-14s hex\n","-hex"); 101 BIO_printf(bio_err,"%-14s number of checks\n","-checks <n>"); 102 exit(1); 103 } 104 --argc; 105 ++argv; 106 } 107 108 if(hex) 109 BN_hex2bn(&bn,argv[0]); 110 else 111 BN_dec2bn(&bn,argv[0]); 112 113 BN_print(bio_out,bn); 114 BIO_printf(bio_out," is %sprime\n", 115 BN_is_prime(bn,checks,NULL,NULL,NULL) ? "" : "not "); 116 117 return 0; 118 } 119