2
0

prime.c 4.3 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160
  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. #include <string.h>
  50. #include "apps.h"
  51. #include <openssl/bn.h>
  52. #undef PROG
  53. #define PROG prime_main
  54. int MAIN(int, char **);
  55. int MAIN(int argc, char **argv)
  56. {
  57. int hex=0;
  58. int checks=20;
  59. int generate=0;
  60. int bits=0;
  61. int safe=0;
  62. BIGNUM *bn=NULL;
  63. BIO *bio_out;
  64. apps_startup();
  65. if (bio_err == NULL)
  66. if ((bio_err=BIO_new(BIO_s_file())) != NULL)
  67. BIO_set_fp(bio_err,stderr,BIO_NOCLOSE|BIO_FP_TEXT);
  68. --argc;
  69. ++argv;
  70. while (argc >= 1 && **argv == '-')
  71. {
  72. if(!strcmp(*argv,"-hex"))
  73. hex=1;
  74. else if(!strcmp(*argv,"-generate"))
  75. generate=1;
  76. else if(!strcmp(*argv,"-bits"))
  77. if(--argc < 1)
  78. goto bad;
  79. else
  80. bits=atoi(*++argv);
  81. else if(!strcmp(*argv,"-safe"))
  82. safe=1;
  83. else if(!strcmp(*argv,"-checks"))
  84. if(--argc < 1)
  85. goto bad;
  86. else
  87. checks=atoi(*++argv);
  88. else
  89. {
  90. BIO_printf(bio_err,"Unknown option '%s'\n",*argv);
  91. goto bad;
  92. }
  93. --argc;
  94. ++argv;
  95. }
  96. if (argv[0] == NULL && !generate)
  97. {
  98. BIO_printf(bio_err,"No prime specified\n");
  99. goto bad;
  100. }
  101. if ((bio_out=BIO_new(BIO_s_file())) != NULL)
  102. {
  103. BIO_set_fp(bio_out,stdout,BIO_NOCLOSE);
  104. #ifdef OPENSSL_SYS_VMS
  105. {
  106. BIO *tmpbio = BIO_new(BIO_f_linebuffer());
  107. bio_out = BIO_push(tmpbio, bio_out);
  108. }
  109. #endif
  110. }
  111. if(generate)
  112. {
  113. char *s;
  114. if(!bits)
  115. {
  116. BIO_printf(bio_err,"Specifiy the number of bits.\n");
  117. return 1;
  118. }
  119. bn=BN_new();
  120. BN_generate_prime_ex(bn,bits,safe,NULL,NULL,NULL);
  121. s=hex ? BN_bn2hex(bn) : BN_bn2dec(bn);
  122. BIO_printf(bio_out,"%s\n",s);
  123. OPENSSL_free(s);
  124. }
  125. else
  126. {
  127. if(hex)
  128. BN_hex2bn(&bn,argv[0]);
  129. else
  130. BN_dec2bn(&bn,argv[0]);
  131. BN_print(bio_out,bn);
  132. BIO_printf(bio_out," is %sprime\n",
  133. BN_is_prime_ex(bn,checks,NULL,NULL) ? "" : "not ");
  134. }
  135. BN_free(bn);
  136. BIO_free_all(bio_out);
  137. return 0;
  138. bad:
  139. BIO_printf(bio_err,"options are\n");
  140. BIO_printf(bio_err,"%-14s hex\n","-hex");
  141. BIO_printf(bio_err,"%-14s number of checks\n","-checks <n>");
  142. return 1;
  143. }