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