| OLD | NEW |
| (Empty) |
| 1 /* crypto/dsa/dsatest.c */ | |
| 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 <string.h> | |
| 60 #include <openssl/crypto.h> | |
| 61 #include <openssl/dsa.h> | |
| 62 #include <openssl/fips.h> | |
| 63 #include <openssl/err.h> | |
| 64 #include <openssl/evp.h> | |
| 65 #include <openssl/bn.h> | |
| 66 | |
| 67 #ifdef OPENSSL_FIPS | |
| 68 | |
| 69 /* seed, out_p, out_q, out_g are taken the NIST test vectors */ | |
| 70 | |
| 71 static unsigned char seed[20] = { | |
| 72 0x77, 0x8f, 0x40, 0x74, 0x6f, 0x66, 0xbe, 0x33, 0xce, 0xbe, 0x99, 0x34, | |
| 73 0x4c, 0xfc, 0xf3, 0x28, 0xaa, 0x70, 0x2d, 0x3a | |
| 74 }; | |
| 75 | |
| 76 static unsigned char out_p[] = { | |
| 77 0xf7, 0x7c, 0x1b, 0x83, 0xd8, 0xe8, 0x5c, 0x7f, 0x85, 0x30, 0x17, 0x57, | |
| 78 0x21, 0x95, 0xfe, 0x26, 0x04, 0xeb, 0x47, 0x4c, 0x3a, 0x4a, 0x81, 0x4b, | |
| 79 0x71, 0x2e, 0xed, 0x6e, 0x4f, 0x3d, 0x11, 0x0f, 0x7c, 0xfe, 0x36, 0x43, | |
| 80 0x51, 0xd9, 0x81, 0x39, 0x17, 0xdf, 0x62, 0xf6, 0x9c, 0x01, 0xa8, 0x69, | |
| 81 0x71, 0xdd, 0x29, 0x7f, 0x47, 0xe6, 0x65, 0xa6, 0x22, 0xe8, 0x6a, 0x12, | |
| 82 0x2b, 0xc2, 0x81, 0xff, 0x32, 0x70, 0x2f, 0x9e, 0xca, 0x53, 0x26, 0x47, | |
| 83 0x0f, 0x59, 0xd7, 0x9e, 0x2c, 0xa5, 0x07, 0xc4, 0x49, 0x52, 0xa3, 0xe4, | |
| 84 0x6b, 0x04, 0x00, 0x25, 0x49, 0xe2, 0xe6, 0x7f, 0x28, 0x78, 0x97, 0xb8, | |
| 85 0x3a, 0x32, 0x14, 0x38, 0xa2, 0x51, 0x33, 0x22, 0x44, 0x7e, 0xd7, 0xef, | |
| 86 0x45, 0xdb, 0x06, 0x4a, 0xd2, 0x82, 0x4a, 0x82, 0x2c, 0xb1, 0xd7, 0xd8, | |
| 87 0xb6, 0x73, 0x00, 0x4d, 0x94, 0x77, 0x94, 0xef | |
| 88 }; | |
| 89 | |
| 90 static unsigned char out_q[] = { | |
| 91 0xd4, 0x0a, 0xac, 0x9f, 0xbd, 0x8c, 0x80, 0xc2, 0x38, 0x7e, 0x2e, 0x0c, | |
| 92 0x52, 0x5c, 0xea, 0x34, 0xa1, 0x83, 0x32, 0xf3 | |
| 93 }; | |
| 94 | |
| 95 static unsigned char out_g[] = { | |
| 96 0x34, 0x73, 0x8b, 0x57, 0x84, 0x8e, 0x55, 0xbf, 0x57, 0xcc, 0x41, 0xbb, | |
| 97 0x5e, 0x2b, 0xd5, 0x42, 0xdd, 0x24, 0x22, 0x2a, 0x09, 0xea, 0x26, 0x1e, | |
| 98 0x17, 0x65, 0xcb, 0x1a, 0xb3, 0x12, 0x44, 0xa3, 0x9e, 0x99, 0xe9, 0x63, | |
| 99 0xeb, 0x30, 0xb1, 0x78, 0x7b, 0x09, 0x40, 0x30, 0xfa, 0x83, 0xc2, 0x35, | |
| 100 0xe1, 0xc4, 0x2d, 0x74, 0x1a, 0xb1, 0x83, 0x54, 0xd8, 0x29, 0xf4, 0xcf, | |
| 101 0x7f, 0x6f, 0x67, 0x1c, 0x36, 0x49, 0xee, 0x6c, 0xa2, 0x3c, 0x2d, 0x6a, | |
| 102 0xe9, 0xd3, 0x9a, 0xf6, 0x57, 0x78, 0x6f, 0xfd, 0x33, 0xcd, 0x3c, 0xed, | |
| 103 0xfd, 0xd4, 0x41, 0xe6, 0x5c, 0x8b, 0xe0, 0x68, 0x31, 0x47, 0x47, 0xaf, | |
| 104 0x12, 0xa7, 0xf9, 0x32, 0x0d, 0x94, 0x15, 0x48, 0xd0, 0x54, 0x85, 0xb2, | |
| 105 0x04, 0xb5, 0x4d, 0xd4, 0x9d, 0x05, 0x22, 0x25, 0xd9, 0xfd, 0x6c, 0x36, | |
| 106 0xef, 0xbe, 0x69, 0x6c, 0x55, 0xf4, 0xee, 0xec | |
| 107 }; | |
| 108 | |
| 109 static const unsigned char str1[]="12345678901234567890"; | |
| 110 | |
| 111 void FIPS_corrupt_dsa() | |
| 112 { | |
| 113 ++seed[0]; | |
| 114 } | |
| 115 | |
| 116 int FIPS_selftest_dsa() | |
| 117 { | |
| 118 DSA *dsa=NULL; | |
| 119 int counter,i,j, ret = 0; | |
| 120 unsigned int slen; | |
| 121 unsigned char buf[256]; | |
| 122 unsigned long h; | |
| 123 EVP_MD_CTX mctx; | |
| 124 EVP_PKEY pk; | |
| 125 | |
| 126 EVP_MD_CTX_init(&mctx); | |
| 127 | |
| 128 dsa = FIPS_dsa_new(); | |
| 129 | |
| 130 if(dsa == NULL) | |
| 131 goto err; | |
| 132 if(!DSA_generate_parameters_ex(dsa, 1024,seed,20,&counter,&h,NULL)) | |
| 133 goto err; | |
| 134 if (counter != 378) | |
| 135 goto err; | |
| 136 if (h != 2) | |
| 137 goto err; | |
| 138 i=BN_bn2bin(dsa->q,buf); | |
| 139 j=sizeof(out_q); | |
| 140 if (i != j || memcmp(buf,out_q,i) != 0) | |
| 141 goto err; | |
| 142 | |
| 143 i=BN_bn2bin(dsa->p,buf); | |
| 144 j=sizeof(out_p); | |
| 145 if (i != j || memcmp(buf,out_p,i) != 0) | |
| 146 goto err; | |
| 147 | |
| 148 i=BN_bn2bin(dsa->g,buf); | |
| 149 j=sizeof(out_g); | |
| 150 if (i != j || memcmp(buf,out_g,i) != 0) | |
| 151 goto err; | |
| 152 DSA_generate_key(dsa); | |
| 153 pk.type = EVP_PKEY_DSA; | |
| 154 pk.pkey.dsa = dsa; | |
| 155 | |
| 156 if (!EVP_SignInit_ex(&mctx, EVP_dss1(), NULL)) | |
| 157 goto err; | |
| 158 if (!EVP_SignUpdate(&mctx, str1, 20)) | |
| 159 goto err; | |
| 160 if (!EVP_SignFinal(&mctx, buf, &slen, &pk)) | |
| 161 goto err; | |
| 162 | |
| 163 if (!EVP_VerifyInit_ex(&mctx, EVP_dss1(), NULL)) | |
| 164 goto err; | |
| 165 if (!EVP_VerifyUpdate(&mctx, str1, 20)) | |
| 166 goto err; | |
| 167 if (EVP_VerifyFinal(&mctx, buf, slen, &pk) != 1) | |
| 168 goto err; | |
| 169 | |
| 170 ret = 1; | |
| 171 | |
| 172 err: | |
| 173 EVP_MD_CTX_cleanup(&mctx); | |
| 174 if (dsa) | |
| 175 FIPS_dsa_free(dsa); | |
| 176 if (ret == 0) | |
| 177 FIPSerr(FIPS_F_FIPS_SELFTEST_DSA,FIPS_R_SELFTEST_FAILED); | |
| 178 return ret; | |
| 179 } | |
| 180 #endif | |
| OLD | NEW |