ssl/tsrc/crypto_test/src/rsa_test.c
changeset 31 ce057bb09d0b
parent 0 e4d67989cc36
equal deleted inserted replaced
30:e20de85af2ee 31:ce057bb09d0b
       
     1 /* test vectors from p1ovect1.txt */
       
     2 /*
       
     3  © Portions copyright (c) 2006 Nokia Corporation.  All rights reserved.
       
     4  */
       
     5 #include <stdio.h>
       
     6 #include <string.h>
       
     7 #ifndef SYMBIAN
       
     8 #include "../e_os.h"
       
     9 #else
       
    10 #include "e_os.h"
       
    11 #endif
       
    12 
       
    13 
       
    14 #include <openssl/crypto.h>
       
    15 #include <openssl/err.h>
       
    16 #include <openssl/rand.h>
       
    17 #include <openssl/bn.h>
       
    18 #ifdef SYMBIAN
       
    19 #ifdef stdin
       
    20 #undef stdin
       
    21 #endif
       
    22 #ifdef stdout
       
    23 #undef stdout
       
    24 #endif
       
    25 #ifdef stderr
       
    26 #undef stderr
       
    27 #endif
       
    28 
       
    29 #define stdin fp_stdin
       
    30 #define stdout fp_stdout
       
    31 #define stderr fp_stderr
       
    32 
       
    33 extern FILE *fp_stdout;
       
    34 extern FILE *fp_stderr;
       
    35 #endif
       
    36 #ifdef OPENSSL_NO_RSA
       
    37 int main(int argc, char *argv[])
       
    38 {
       
    39     fprintf(stdout,"No RSA support\n");
       
    40     return(0);
       
    41 }
       
    42 #else
       
    43 #include <openssl/rsa.h>
       
    44 
       
    45 
       
    46 #define SetKey \
       
    47   key->n = BN_bin2bn(n, sizeof(n)-1, key->n); \
       
    48   key->e = BN_bin2bn(e, sizeof(e)-1, key->e); \
       
    49   key->d = BN_bin2bn(d, sizeof(d)-1, key->d); \
       
    50   key->p = BN_bin2bn(p, sizeof(p)-1, key->p); \
       
    51   key->q = BN_bin2bn(q, sizeof(q)-1, key->q); \
       
    52   key->dmp1 = BN_bin2bn(dmp1, sizeof(dmp1)-1, key->dmp1); \
       
    53   key->dmq1 = BN_bin2bn(dmq1, sizeof(dmq1)-1, key->dmq1); \
       
    54   key->iqmp = BN_bin2bn(iqmp, sizeof(iqmp)-1, key->iqmp); \
       
    55   memcpy(c, ctext_ex, sizeof(ctext_ex) - 1); \
       
    56   return (sizeof(ctext_ex) - 1);
       
    57 
       
    58 static int key1(RSA *key, unsigned char *c)
       
    59     {
       
    60     static unsigned char n[] =
       
    61 "\x00\xAA\x36\xAB\xCE\x88\xAC\xFD\xFF\x55\x52\x3C\x7F\xC4\x52\x3F"
       
    62 "\x90\xEF\xA0\x0D\xF3\x77\x4A\x25\x9F\x2E\x62\xB4\xC5\xD9\x9C\xB5"
       
    63 "\xAD\xB3\x00\xA0\x28\x5E\x53\x01\x93\x0E\x0C\x70\xFB\x68\x76\x93"
       
    64 "\x9C\xE6\x16\xCE\x62\x4A\x11\xE0\x08\x6D\x34\x1E\xBC\xAC\xA0\xA1"
       
    65 "\xF5";
       
    66 
       
    67     static unsigned char e[] = "\x11";
       
    68 
       
    69     static unsigned char d[] =
       
    70 "\x0A\x03\x37\x48\x62\x64\x87\x69\x5F\x5F\x30\xBC\x38\xB9\x8B\x44"
       
    71 "\xC2\xCD\x2D\xFF\x43\x40\x98\xCD\x20\xD8\xA1\x38\xD0\x90\xBF\x64"
       
    72 "\x79\x7C\x3F\xA7\xA2\xCD\xCB\x3C\xD1\xE0\xBD\xBA\x26\x54\xB4\xF9"
       
    73 "\xDF\x8E\x8A\xE5\x9D\x73\x3D\x9F\x33\xB3\x01\x62\x4A\xFD\x1D\x51";
       
    74 
       
    75     static unsigned char p[] =
       
    76 "\x00\xD8\x40\xB4\x16\x66\xB4\x2E\x92\xEA\x0D\xA3\xB4\x32\x04\xB5"
       
    77 "\xCF\xCE\x33\x52\x52\x4D\x04\x16\xA5\xA4\x41\xE7\x00\xAF\x46\x12"
       
    78 "\x0D";
       
    79     
       
    80     static unsigned char q[] =
       
    81 "\x00\xC9\x7F\xB1\xF0\x27\xF4\x53\xF6\x34\x12\x33\xEA\xAA\xD1\xD9"
       
    82 "\x35\x3F\x6C\x42\xD0\x88\x66\xB1\xD0\x5A\x0F\x20\x35\x02\x8B\x9D"
       
    83 "\x89";
       
    84 
       
    85     static unsigned char dmp1[] =
       
    86 "\x59\x0B\x95\x72\xA2\xC2\xA9\xC4\x06\x05\x9D\xC2\xAB\x2F\x1D\xAF"
       
    87 "\xEB\x7E\x8B\x4F\x10\xA7\x54\x9E\x8E\xED\xF5\xB4\xFC\xE0\x9E\x05";
       
    88 
       
    89     static unsigned char dmq1[] =
       
    90 "\x00\x8E\x3C\x05\x21\xFE\x15\xE0\xEA\x06\xA3\x6F\xF0\xF1\x0C\x99"
       
    91 "\x52\xC3\x5B\x7A\x75\x14\xFD\x32\x38\xB8\x0A\xAD\x52\x98\x62\x8D"
       
    92 "\x51";
       
    93 
       
    94     static unsigned char iqmp[] =
       
    95 "\x36\x3F\xF7\x18\x9D\xA8\xE9\x0B\x1D\x34\x1F\x71\xD0\x9B\x76\xA8"
       
    96 "\xA9\x43\xE1\x1D\x10\xB2\x4D\x24\x9F\x2D\xEA\xFE\xF8\x0C\x18\x26";
       
    97 
       
    98     static unsigned char ctext_ex[] =
       
    99 "\x1b\x8f\x05\xf9\xca\x1a\x79\x52\x6e\x53\xf3\xcc\x51\x4f\xdb\x89"
       
   100 "\x2b\xfb\x91\x93\x23\x1e\x78\xb9\x92\xe6\x8d\x50\xa4\x80\xcb\x52"
       
   101 "\x33\x89\x5c\x74\x95\x8d\x5d\x02\xab\x8c\x0f\xd0\x40\xeb\x58\x44"
       
   102 "\xb0\x05\xc3\x9e\xd8\x27\x4a\x9d\xbf\xa8\x06\x71\x40\x94\x39\xd2";
       
   103 
       
   104     SetKey;
       
   105     }
       
   106 
       
   107 static int key2(RSA *key, unsigned char *c)
       
   108     {
       
   109     static unsigned char n[] =
       
   110 "\x00\xA3\x07\x9A\x90\xDF\x0D\xFD\x72\xAC\x09\x0C\xCC\x2A\x78\xB8"
       
   111 "\x74\x13\x13\x3E\x40\x75\x9C\x98\xFA\xF8\x20\x4F\x35\x8A\x0B\x26"
       
   112 "\x3C\x67\x70\xE7\x83\xA9\x3B\x69\x71\xB7\x37\x79\xD2\x71\x7B\xE8"
       
   113 "\x34\x77\xCF";
       
   114 
       
   115     static unsigned char e[] = "\x3";
       
   116 
       
   117     static unsigned char d[] =
       
   118 "\x6C\xAF\xBC\x60\x94\xB3\xFE\x4C\x72\xB0\xB3\x32\xC6\xFB\x25\xA2"
       
   119 "\xB7\x62\x29\x80\x4E\x68\x65\xFC\xA4\x5A\x74\xDF\x0F\x8F\xB8\x41"
       
   120 "\x3B\x52\xC0\xD0\xE5\x3D\x9B\x59\x0F\xF1\x9B\xE7\x9F\x49\xDD\x21"
       
   121 "\xE5\xEB";
       
   122 
       
   123     static unsigned char p[] =
       
   124 "\x00\xCF\x20\x35\x02\x8B\x9D\x86\x98\x40\xB4\x16\x66\xB4\x2E\x92"
       
   125 "\xEA\x0D\xA3\xB4\x32\x04\xB5\xCF\xCE\x91";
       
   126 
       
   127     static unsigned char q[] =
       
   128 "\x00\xC9\x7F\xB1\xF0\x27\xF4\x53\xF6\x34\x12\x33\xEA\xAA\xD1\xD9"
       
   129 "\x35\x3F\x6C\x42\xD0\x88\x66\xB1\xD0\x5F";
       
   130     
       
   131     static unsigned char dmp1[] =
       
   132 "\x00\x8A\x15\x78\xAC\x5D\x13\xAF\x10\x2B\x22\xB9\x99\xCD\x74\x61"
       
   133 "\xF1\x5E\x6D\x22\xCC\x03\x23\xDF\xDF\x0B";
       
   134 
       
   135     static unsigned char dmq1[] =
       
   136 "\x00\x86\x55\x21\x4A\xC5\x4D\x8D\x4E\xCD\x61\x77\xF1\xC7\x36\x90"
       
   137 "\xCE\x2A\x48\x2C\x8B\x05\x99\xCB\xE0\x3F";
       
   138 
       
   139     static unsigned char iqmp[] =
       
   140 "\x00\x83\xEF\xEF\xB8\xA9\xA4\x0D\x1D\xB6\xED\x98\xAD\x84\xED\x13"
       
   141 "\x35\xDC\xC1\x08\xF3\x22\xD0\x57\xCF\x8D";
       
   142 
       
   143     static unsigned char ctext_ex[] =
       
   144 "\x14\xbd\xdd\x28\xc9\x83\x35\x19\x23\x80\xe8\xe5\x49\xb1\x58\x2a"
       
   145 "\x8b\x40\xb4\x48\x6d\x03\xa6\xa5\x31\x1f\x1f\xd5\xf0\xa1\x80\xe4"
       
   146 "\x17\x53\x03\x29\xa9\x34\x90\x74\xb1\x52\x13\x54\x29\x08\x24\x52"
       
   147 "\x62\x51";
       
   148 
       
   149     SetKey;
       
   150     }
       
   151 
       
   152 static int key3(RSA *key, unsigned char *c)
       
   153     {
       
   154     static unsigned char n[] =
       
   155 "\x00\xBB\xF8\x2F\x09\x06\x82\xCE\x9C\x23\x38\xAC\x2B\x9D\xA8\x71"
       
   156 "\xF7\x36\x8D\x07\xEE\xD4\x10\x43\xA4\x40\xD6\xB6\xF0\x74\x54\xF5"
       
   157 "\x1F\xB8\xDF\xBA\xAF\x03\x5C\x02\xAB\x61\xEA\x48\xCE\xEB\x6F\xCD"
       
   158 "\x48\x76\xED\x52\x0D\x60\xE1\xEC\x46\x19\x71\x9D\x8A\x5B\x8B\x80"
       
   159 "\x7F\xAF\xB8\xE0\xA3\xDF\xC7\x37\x72\x3E\xE6\xB4\xB7\xD9\x3A\x25"
       
   160 "\x84\xEE\x6A\x64\x9D\x06\x09\x53\x74\x88\x34\xB2\x45\x45\x98\x39"
       
   161 "\x4E\xE0\xAA\xB1\x2D\x7B\x61\xA5\x1F\x52\x7A\x9A\x41\xF6\xC1\x68"
       
   162 "\x7F\xE2\x53\x72\x98\xCA\x2A\x8F\x59\x46\xF8\xE5\xFD\x09\x1D\xBD"
       
   163 "\xCB";
       
   164 
       
   165     static unsigned char e[] = "\x11";
       
   166 
       
   167     static unsigned char d[] =
       
   168 "\x00\xA5\xDA\xFC\x53\x41\xFA\xF2\x89\xC4\xB9\x88\xDB\x30\xC1\xCD"
       
   169 "\xF8\x3F\x31\x25\x1E\x06\x68\xB4\x27\x84\x81\x38\x01\x57\x96\x41"
       
   170 "\xB2\x94\x10\xB3\xC7\x99\x8D\x6B\xC4\x65\x74\x5E\x5C\x39\x26\x69"
       
   171 "\xD6\x87\x0D\xA2\xC0\x82\xA9\x39\xE3\x7F\xDC\xB8\x2E\xC9\x3E\xDA"
       
   172 "\xC9\x7F\xF3\xAD\x59\x50\xAC\xCF\xBC\x11\x1C\x76\xF1\xA9\x52\x94"
       
   173 "\x44\xE5\x6A\xAF\x68\xC5\x6C\x09\x2C\xD3\x8D\xC3\xBE\xF5\xD2\x0A"
       
   174 "\x93\x99\x26\xED\x4F\x74\xA1\x3E\xDD\xFB\xE1\xA1\xCE\xCC\x48\x94"
       
   175 "\xAF\x94\x28\xC2\xB7\xB8\x88\x3F\xE4\x46\x3A\x4B\xC8\x5B\x1C\xB3"
       
   176 "\xC1";
       
   177 
       
   178     static unsigned char p[] =
       
   179 "\x00\xEE\xCF\xAE\x81\xB1\xB9\xB3\xC9\x08\x81\x0B\x10\xA1\xB5\x60"
       
   180 "\x01\x99\xEB\x9F\x44\xAE\xF4\xFD\xA4\x93\xB8\x1A\x9E\x3D\x84\xF6"
       
   181 "\x32\x12\x4E\xF0\x23\x6E\x5D\x1E\x3B\x7E\x28\xFA\xE7\xAA\x04\x0A"
       
   182 "\x2D\x5B\x25\x21\x76\x45\x9D\x1F\x39\x75\x41\xBA\x2A\x58\xFB\x65"
       
   183 "\x99";
       
   184 
       
   185     static unsigned char q[] =
       
   186 "\x00\xC9\x7F\xB1\xF0\x27\xF4\x53\xF6\x34\x12\x33\xEA\xAA\xD1\xD9"
       
   187 "\x35\x3F\x6C\x42\xD0\x88\x66\xB1\xD0\x5A\x0F\x20\x35\x02\x8B\x9D"
       
   188 "\x86\x98\x40\xB4\x16\x66\xB4\x2E\x92\xEA\x0D\xA3\xB4\x32\x04\xB5"
       
   189 "\xCF\xCE\x33\x52\x52\x4D\x04\x16\xA5\xA4\x41\xE7\x00\xAF\x46\x15"
       
   190 "\x03";
       
   191 
       
   192     static unsigned char dmp1[] =
       
   193 "\x54\x49\x4C\xA6\x3E\xBA\x03\x37\xE4\xE2\x40\x23\xFC\xD6\x9A\x5A"
       
   194 "\xEB\x07\xDD\xDC\x01\x83\xA4\xD0\xAC\x9B\x54\xB0\x51\xF2\xB1\x3E"
       
   195 "\xD9\x49\x09\x75\xEA\xB7\x74\x14\xFF\x59\xC1\xF7\x69\x2E\x9A\x2E"
       
   196 "\x20\x2B\x38\xFC\x91\x0A\x47\x41\x74\xAD\xC9\x3C\x1F\x67\xC9\x81";
       
   197 
       
   198     static unsigned char dmq1[] =
       
   199 "\x47\x1E\x02\x90\xFF\x0A\xF0\x75\x03\x51\xB7\xF8\x78\x86\x4C\xA9"
       
   200 "\x61\xAD\xBD\x3A\x8A\x7E\x99\x1C\x5C\x05\x56\xA9\x4C\x31\x46\xA7"
       
   201 "\xF9\x80\x3F\x8F\x6F\x8A\xE3\x42\xE9\x31\xFD\x8A\xE4\x7A\x22\x0D"
       
   202 "\x1B\x99\xA4\x95\x84\x98\x07\xFE\x39\xF9\x24\x5A\x98\x36\xDA\x3D";
       
   203     
       
   204     static unsigned char iqmp[] =
       
   205 "\x00\xB0\x6C\x4F\xDA\xBB\x63\x01\x19\x8D\x26\x5B\xDB\xAE\x94\x23"
       
   206 "\xB3\x80\xF2\x71\xF7\x34\x53\x88\x50\x93\x07\x7F\xCD\x39\xE2\x11"
       
   207 "\x9F\xC9\x86\x32\x15\x4F\x58\x83\xB1\x67\xA9\x67\xBF\x40\x2B\x4E"
       
   208 "\x9E\x2E\x0F\x96\x56\xE6\x98\xEA\x36\x66\xED\xFB\x25\x79\x80\x39"
       
   209 "\xF7";
       
   210 
       
   211     static unsigned char ctext_ex[] =
       
   212 "\xb8\x24\x6b\x56\xa6\xed\x58\x81\xae\xb5\x85\xd9\xa2\x5b\x2a\xd7"
       
   213 "\x90\xc4\x17\xe0\x80\x68\x1b\xf1\xac\x2b\xc3\xde\xb6\x9d\x8b\xce"
       
   214 "\xf0\xc4\x36\x6f\xec\x40\x0a\xf0\x52\xa7\x2e\x9b\x0e\xff\xb5\xb3"
       
   215 "\xf2\xf1\x92\xdb\xea\xca\x03\xc1\x27\x40\x05\x71\x13\xbf\x1f\x06"
       
   216 "\x69\xac\x22\xe9\xf3\xa7\x85\x2e\x3c\x15\xd9\x13\xca\xb0\xb8\x86"
       
   217 "\x3a\x95\xc9\x92\x94\xce\x86\x74\x21\x49\x54\x61\x03\x46\xf4\xd4"
       
   218 "\x74\xb2\x6f\x7c\x48\xb4\x2e\xe6\x8e\x1f\x57\x2a\x1f\xc4\x02\x6a"
       
   219 "\xc4\x56\xb4\xf5\x9f\x7b\x62\x1e\xa1\xb9\xd8\x8f\x64\x20\x2f\xb1";
       
   220 
       
   221     SetKey;
       
   222     }
       
   223 
       
   224 static int pad_unknown(void)
       
   225 {
       
   226     unsigned long l;
       
   227     while ((l = ERR_get_error()) != 0)
       
   228       if (ERR_GET_REASON(l) == RSA_R_UNKNOWN_PADDING_TYPE)
       
   229 	return(1);
       
   230     return(0);
       
   231 }
       
   232 
       
   233 static const char rnd_seed[] = "string to make the random number generator think it has entropy";
       
   234 #ifndef SYMBIAN
       
   235 int main(int argc, char *argv[])
       
   236 #else
       
   237 int rsa_main(int argc, char *argv[])
       
   238 #endif
       
   239     {
       
   240     int err=0;
       
   241     int v;
       
   242     RSA *key;
       
   243     unsigned char ptext[256];
       
   244     unsigned char ctext[256];
       
   245     static unsigned char ptext_ex[] = "\x54\x85\x9b\x34\x2c\x49\xea\x2a";
       
   246     unsigned char ctext_ex[256];
       
   247     int plen;
       
   248     int clen = 0;
       
   249     int num;
       
   250     int n;
       
   251 
       
   252     /*CRYPTO_malloc_debug_init();
       
   253     if(errno==ENOMEM)
       
   254     {
       
   255 	    return 1;
       
   256 	  }  
       
   257 
       
   258     CRYPTO_dbg_set_options(V_CRYPTO_MDEBUG_ALL);
       
   259     if(errno==ENOMEM)
       
   260     {
       
   261 	    return 1;
       
   262 	  }  
       
   263     
       
   264     CRYPTO_mem_ctrl(CRYPTO_MEM_CHECK_ON);
       
   265     if(errno==ENOMEM)
       
   266     {
       
   267 	    return 1;
       
   268 	  }  
       
   269 */
       
   270     RAND_seed(rnd_seed, sizeof rnd_seed); /* or OAEP may fail */
       
   271         if(errno==ENOMEM)
       
   272     {
       
   273 	    return 1;
       
   274 	  }  
       
   275 
       
   276     plen = sizeof(ptext_ex) - 1;
       
   277 
       
   278     for (v = 0; v < 6; v++)
       
   279 	{
       
   280 	key = RSA_new();
       
   281    if(errno==ENOMEM)
       
   282     {
       
   283 	    return 1;
       
   284 	  }  
       
   285 
       
   286 	switch (v%3) {
       
   287     case 0:
       
   288 	clen = key1(key, ctext_ex);
       
   289  if(errno==ENOMEM)
       
   290     {
       
   291 	    return 1;
       
   292 	  }  	
       
   293 	break;
       
   294     case 1:
       
   295 	clen = key2(key, ctext_ex);
       
   296 	 if(errno==ENOMEM)
       
   297     {
       
   298 	    return 1;
       
   299 	  }  
       
   300 	break;
       
   301     case 2:
       
   302 	clen = key3(key, ctext_ex);
       
   303 	 if(errno==ENOMEM)
       
   304     {
       
   305 	    return 1;
       
   306 	  }  
       
   307 	break;
       
   308 	}
       
   309 	if (v/3 >= 1) key->flags |= RSA_FLAG_NO_CONSTTIME;
       
   310 
       
   311 	num = RSA_public_encrypt(plen, ptext_ex, ctext, key,
       
   312 				 RSA_PKCS1_PADDING);
       
   313  if(errno==ENOMEM)
       
   314     {
       
   315 	    return 1;
       
   316 	  }  				 
       
   317 	if (num != clen)
       
   318 	    {
       
   319 	    fprintf(stdout,"PKCS#1 v1.5 encryption failed!\n");
       
   320 	    err=1;
       
   321 	    goto oaep;
       
   322 	    }
       
   323   
       
   324 	num = RSA_private_decrypt(num, ctext, ptext, key,
       
   325 				  RSA_PKCS1_PADDING);
       
   326    if(errno==ENOMEM)
       
   327     {
       
   328 	    return 1;
       
   329 	  }  				  
       
   330 	if (num != plen || memcmp(ptext, ptext_ex, num) != 0)
       
   331 	    {
       
   332 	    fprintf(stdout,"PKCS#1 v1.5 decryption failed!\n");
       
   333 	    err=1;
       
   334 	    }
       
   335 	else
       
   336 	    fprintf(stdout,"PKCS #1 v1.5 encryption/decryption ok\n");
       
   337 
       
   338     oaep:
       
   339 	ERR_clear_error();
       
   340 	 if(errno==ENOMEM)
       
   341     {
       
   342 	    return 1;
       
   343 	  }  
       
   344 	num = RSA_public_encrypt(plen, ptext_ex, ctext, key,
       
   345 				 RSA_PKCS1_OAEP_PADDING);
       
   346  if(errno==ENOMEM)
       
   347     {
       
   348 	    return 1;
       
   349 	  }  				 
       
   350 	if (num == -1 && pad_unknown())
       
   351 	    {
       
   352 	    printf("No OAEP support\n");
       
   353 	    goto next;
       
   354 	    }
       
   355 	if (num != clen)
       
   356 	    {
       
   357 	    fprintf(stdout,"OAEP encryption failed!\n");
       
   358 	    err=1;
       
   359 	    goto next;
       
   360 	    }
       
   361   
       
   362 	num = RSA_private_decrypt(num, ctext, ptext, key,
       
   363 				  RSA_PKCS1_OAEP_PADDING);
       
   364  if(errno==ENOMEM)
       
   365     {
       
   366 	    return 1;
       
   367 	  }  				  
       
   368 	if (num != plen || memcmp(ptext, ptext_ex, num) != 0)
       
   369 	    {
       
   370 	    fprintf(stdout,"OAEP decryption (encrypted data) failed!\n");
       
   371 	    err=1;
       
   372 	    }
       
   373 	else if (memcmp(ctext, ctext_ex, num) == 0)
       
   374 	    fprintf(stdout,"OAEP test vector %d passed!\n", v);
       
   375     
       
   376 	/* Different ciphertexts (rsa_oaep.c without -DPKCS_TESTVECT).
       
   377 	   Try decrypting ctext_ex */
       
   378 
       
   379 	num = RSA_private_decrypt(clen, ctext_ex, ptext, key,
       
   380 				  RSA_PKCS1_OAEP_PADDING);
       
   381  if(errno==ENOMEM)
       
   382     {
       
   383 	    return 1;
       
   384 	  }  
       
   385 	if (num != plen || memcmp(ptext, ptext_ex, num) != 0)
       
   386 	    {
       
   387 	    fprintf(stdout,"OAEP decryption (test vector data) failed!\n");
       
   388 	    err=1;
       
   389 	    }
       
   390 	else
       
   391 	    fprintf(stdout,"OAEP encryption/decryption ok\n");
       
   392 	/* Try decrypting corrupted ciphertexts */
       
   393 	for(n = 0 ; n < clen ; ++n)
       
   394 	    {
       
   395 	    int b;
       
   396 	    unsigned char saved = ctext[n];
       
   397 	    for(b = 0 ; b < 256 ; ++b)
       
   398 		{
       
   399 		if(b == saved)
       
   400 		    continue;
       
   401 		ctext[n] = b;
       
   402 		num = RSA_private_decrypt(num, ctext, ptext, key,
       
   403 					  RSA_PKCS1_OAEP_PADDING);
       
   404 		if(num > 0)
       
   405 		    {
       
   406 		    fprintf(stdout, "Corrupt data decrypted!\n");
       
   407 		    err = 1;
       
   408 		    }
       
   409 		}
       
   410 	    }
       
   411 
       
   412     next:
       
   413 	RSA_free(key);
       
   414 	 if(errno==ENOMEM)
       
   415     {
       
   416 	    return 1;
       
   417 	  }  
       
   418 	}
       
   419 
       
   420     CRYPTO_cleanup_all_ex_data();
       
   421     if(errno==ENOMEM)
       
   422     {
       
   423 	    return 1;
       
   424 	  }      
       
   425     ERR_remove_state(0);
       
   426     if(errno==ENOMEM)
       
   427     {
       
   428 	    return 1;
       
   429 	  }  
       
   430     CRYPTO_mem_leaks_fp(stderr);
       
   431      if(errno==ENOMEM)
       
   432     {
       
   433 	    return 1;
       
   434 	  }  
       
   435     
       
   436 #ifdef OPENSSL_SYS_NETWARE
       
   437     if (err) fprintf(stdout,"ERROR: %d\n", err);
       
   438 #endif
       
   439     fprintf(stdout,"Test case Passed\n");    
       
   440     return err;
       
   441     }
       
   442 #endif