tcrypt.c 36.5 KB
Newer Older
1
/*
L
Linus Torvalds 已提交
2 3 4 5 6 7 8 9 10 11
 * Quick & dirty crypto testing module.
 *
 * This will only exist until we have a better testing mechanism
 * (e.g. a char device).
 *
 * Copyright (c) 2002 James Morris <jmorris@intercode.com.au>
 * Copyright (c) 2002 Jean-Francois Dive <jef@linuxbe.org>
 *
 * This program is free software; you can redistribute it and/or modify it
 * under the terms of the GNU General Public License as published by the Free
12
 * Software Foundation; either version 2 of the License, or (at your option)
L
Linus Torvalds 已提交
13 14
 * any later version.
 *
15
 * 2006-12-07 Added SHA384 HMAC and SHA512 HMAC tests
H
Harald Welte 已提交
16 17 18
 * 2004-08-09 Added cipher speed tests (Reyk Floeter <reyk@vantronix.net>)
 * 2003-09-14 Rewritten by Kartikey Mahendra Bhatt
 *
L
Linus Torvalds 已提交
19 20
 */

21
#include <linux/err.h>
L
Linus Torvalds 已提交
22 23 24 25
#include <linux/init.h>
#include <linux/module.h>
#include <linux/mm.h>
#include <linux/slab.h>
26
#include <linux/scatterlist.h>
L
Linus Torvalds 已提交
27 28 29 30
#include <linux/string.h>
#include <linux/crypto.h>
#include <linux/highmem.h>
#include <linux/moduleparam.h>
H
Harald Welte 已提交
31
#include <linux/jiffies.h>
32 33
#include <linux/timex.h>
#include <linux/interrupt.h>
L
Linus Torvalds 已提交
34 35 36 37 38
#include "tcrypt.h"

/*
 * Need to kmalloc() memory for testing kmap().
 */
H
Harald Welte 已提交
39
#define TVMEMSIZE	16384
L
Linus Torvalds 已提交
40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59
#define XBUFSIZE	32768

/*
 * Indexes into the xbuf to simulate cross-page access.
 */
#define IDX1		37
#define IDX2		32400
#define IDX3		1
#define IDX4		8193
#define IDX5		22222
#define IDX6		17101
#define IDX7		27333
#define IDX8		3000

/*
* Used by test_cipher()
*/
#define ENCRYPT 1
#define DECRYPT 0

60 61 62 63 64
struct tcrypt_result {
	struct completion completion;
	int err;
};

L
Linus Torvalds 已提交
65 66
static unsigned int IDX[8] = { IDX1, IDX2, IDX3, IDX4, IDX5, IDX6, IDX7, IDX8 };

H
Harald Welte 已提交
67 68 69
/*
 * Used by test_cipher_speed()
 */
70
static unsigned int sec;
H
Harald Welte 已提交
71

L
Linus Torvalds 已提交
72 73 74 75 76 77
static int mode;
static char *xbuf;
static char *tvmem;

static char *check[] = {
	"des", "md5", "des3_ede", "rot13", "sha1", "sha256", "blowfish",
78 79
	"twofish", "serpent", "sha384", "sha512", "md4", "aes", "cast6",
	"arc4", "michael_mic", "deflate", "crc32c", "tea", "xtea",
80
	"khazad", "wp512", "wp384", "wp256", "tnepres", "xeta",  "fcrypt",
81
	"camellia", "seed", NULL
L
Linus Torvalds 已提交
82 83
};

84
static void hexdump(unsigned char *buf, unsigned int len)
L
Linus Torvalds 已提交
85 86 87 88 89 90 91
{
	while (len--)
		printk("%02x", *buf++);

	printk("\n");
}

92 93 94 95 96 97 98 99 100 101 102
static void tcrypt_complete(struct crypto_async_request *req, int err)
{
	struct tcrypt_result *res = req->data;

	if (err == -EINPROGRESS)
		return;

	res->err = err;
	complete(&res->completion);
}

103 104
static void test_hash(char *algo, struct hash_testvec *template,
		      unsigned int tcount)
L
Linus Torvalds 已提交
105
{
106 107 108
	unsigned int i, j, k, temp;
	struct scatterlist sg[8];
	char result[64];
109 110
	struct crypto_hash *tfm;
	struct hash_desc desc;
111 112
	struct hash_testvec *hash_tv;
	unsigned int tsize;
113
	int ret;
114 115 116 117

	printk("\ntesting %s\n", algo);

	tsize = sizeof(struct hash_testvec);
L
Linus Torvalds 已提交
118
	tsize *= tcount;
119

L
Linus Torvalds 已提交
120 121 122 123 124 125
	if (tsize > TVMEMSIZE) {
		printk("template (%u) too big for tvmem (%u)\n", tsize, TVMEMSIZE);
		return;
	}

	memcpy(tvmem, template, tsize);
126
	hash_tv = (void *)tvmem;
127 128 129 130 131

	tfm = crypto_alloc_hash(algo, 0, CRYPTO_ALG_ASYNC);
	if (IS_ERR(tfm)) {
		printk("failed to load transform for %s: %ld\n", algo,
		       PTR_ERR(tfm));
L
Linus Torvalds 已提交
132 133 134
		return;
	}

135 136 137
	desc.tfm = tfm;
	desc.flags = 0;

L
Linus Torvalds 已提交
138
	for (i = 0; i < tcount; i++) {
139 140
		printk("test %u:\n", i + 1);
		memset(result, 0, 64);
L
Linus Torvalds 已提交
141

142
		sg_set_buf(&sg[0], hash_tv[i].plaintext, hash_tv[i].psize);
L
Linus Torvalds 已提交
143

144 145 146 147 148 149 150 151 152 153 154 155 156 157
		if (hash_tv[i].ksize) {
			ret = crypto_hash_setkey(tfm, hash_tv[i].key,
						 hash_tv[i].ksize);
			if (ret) {
				printk("setkey() failed ret=%d\n", ret);
				goto out;
			}
		}

		ret = crypto_hash_digest(&desc, sg, hash_tv[i].psize, result);
		if (ret) {
			printk("digest () failed ret=%d\n", ret);
			goto out;
		}
L
Linus Torvalds 已提交
158

159
		hexdump(result, crypto_hash_digestsize(tfm));
L
Linus Torvalds 已提交
160
		printk("%s\n",
161
		       memcmp(result, hash_tv[i].digest,
162
			      crypto_hash_digestsize(tfm)) ?
163
		       "fail" : "pass");
L
Linus Torvalds 已提交
164 165
	}

166
	printk("testing %s across pages\n", algo);
L
Linus Torvalds 已提交
167 168

	/* setup the dummy buffer first */
169
	memset(xbuf, 0, XBUFSIZE);
L
Linus Torvalds 已提交
170 171 172 173 174

	j = 0;
	for (i = 0; i < tcount; i++) {
		if (hash_tv[i].np) {
			j++;
175 176
			printk("test %u:\n", j);
			memset(result, 0, 64);
L
Linus Torvalds 已提交
177 178 179

			temp = 0;
			for (k = 0; k < hash_tv[i].np; k++) {
180 181 182
				memcpy(&xbuf[IDX[k]],
				       hash_tv[i].plaintext + temp,
				       hash_tv[i].tap[k]);
L
Linus Torvalds 已提交
183
				temp += hash_tv[i].tap[k];
184 185
				sg_set_buf(&sg[k], &xbuf[IDX[k]],
					    hash_tv[i].tap[k]);
L
Linus Torvalds 已提交
186 187
			}

188 189 190
			if (hash_tv[i].ksize) {
				ret = crypto_hash_setkey(tfm, hash_tv[i].key,
							 hash_tv[i].ksize);
191

192 193 194 195
				if (ret) {
					printk("setkey() failed ret=%d\n", ret);
					goto out;
				}
L
Linus Torvalds 已提交
196 197
			}

198 199 200 201 202 203
			ret = crypto_hash_digest(&desc, sg, hash_tv[i].psize,
						 result);
			if (ret) {
				printk("digest () failed ret=%d\n", ret);
				goto out;
			}
204

205
			hexdump(result, crypto_hash_digestsize(tfm));
L
Linus Torvalds 已提交
206
			printk("%s\n",
207 208
			       memcmp(result, hash_tv[i].digest,
				      crypto_hash_digestsize(tfm)) ?
209
			       "fail" : "pass");
L
Linus Torvalds 已提交
210 211
		}
	}
212

L
Linus Torvalds 已提交
213
out:
214
	crypto_free_hash(tfm);
L
Linus Torvalds 已提交
215 216
}

217
static void test_cipher(char *algo, int enc,
218
			struct cipher_testvec *template, unsigned int tcount)
L
Linus Torvalds 已提交
219 220 221
{
	unsigned int ret, i, j, k, temp;
	unsigned int tsize;
222
	char *q;
223
	struct crypto_ablkcipher *tfm;
L
Linus Torvalds 已提交
224 225
	char *key;
	struct cipher_testvec *cipher_tv;
226
	struct ablkcipher_request *req;
L
Linus Torvalds 已提交
227
	struct scatterlist sg[8];
228
	const char *e;
229
	struct tcrypt_result result;
L
Linus Torvalds 已提交
230 231

	if (enc == ENCRYPT)
232
	        e = "encryption";
L
Linus Torvalds 已提交
233
	else
234
		e = "decryption";
L
Linus Torvalds 已提交
235

236
	printk("\ntesting %s %s\n", algo, e);
L
Linus Torvalds 已提交
237

238
	tsize = sizeof (struct cipher_testvec);
L
Linus Torvalds 已提交
239
	tsize *= tcount;
240

L
Linus Torvalds 已提交
241 242 243 244 245 246 247
	if (tsize > TVMEMSIZE) {
		printk("template (%u) too big for tvmem (%u)\n", tsize,
		       TVMEMSIZE);
		return;
	}

	memcpy(tvmem, template, tsize);
248 249
	cipher_tv = (void *)tvmem;

250 251 252
	init_completion(&result.completion);

	tfm = crypto_alloc_ablkcipher(algo, 0, 0);
L
Linus Torvalds 已提交
253

254 255 256
	if (IS_ERR(tfm)) {
		printk("failed to load transform for %s: %ld\n", algo,
		       PTR_ERR(tfm));
L
Linus Torvalds 已提交
257 258
		return;
	}
259 260 261 262 263 264 265 266 267

	req = ablkcipher_request_alloc(tfm, GFP_KERNEL);
	if (!req) {
		printk("failed to allocate request for %s\n", algo);
		goto out;
	}

	ablkcipher_request_set_callback(req, CRYPTO_TFM_REQ_MAY_BACKLOG,
					tcrypt_complete, &result);
268

L
Linus Torvalds 已提交
269 270 271
	j = 0;
	for (i = 0; i < tcount; i++) {
		if (!(cipher_tv[i].np)) {
272
			j++;
L
Linus Torvalds 已提交
273 274 275
			printk("test %u (%d bit key):\n",
			j, cipher_tv[i].klen * 8);

276
			crypto_ablkcipher_clear_flags(tfm, ~0);
277
			if (cipher_tv[i].wk)
278
				crypto_ablkcipher_set_flags(
279
					tfm, CRYPTO_TFM_REQ_WEAK_KEY);
L
Linus Torvalds 已提交
280
			key = cipher_tv[i].key;
281

282 283
			ret = crypto_ablkcipher_setkey(tfm, key,
						       cipher_tv[i].klen);
L
Linus Torvalds 已提交
284
			if (ret) {
285
				printk("setkey() failed flags=%x\n",
286
				       crypto_ablkcipher_get_flags(tfm));
287

L
Linus Torvalds 已提交
288 289
				if (!cipher_tv[i].fail)
					goto out;
290
			}
L
Linus Torvalds 已提交
291

292 293
			sg_set_buf(&sg[0], cipher_tv[i].input,
				   cipher_tv[i].ilen);
294

295 296 297
			ablkcipher_request_set_crypt(req, sg, sg,
						     cipher_tv[i].ilen,
						     cipher_tv[i].iv);
298

299
			ret = enc ?
300 301
				crypto_ablkcipher_encrypt(req) :
				crypto_ablkcipher_decrypt(req);
302

303 304 305 306 307 308 309 310 311 312 313 314 315 316
			switch (ret) {
			case 0:
				break;
			case -EINPROGRESS:
			case -EBUSY:
				ret = wait_for_completion_interruptible(
					&result.completion);
				if (!ret && !((ret = result.err))) {
					INIT_COMPLETION(result.completion);
					break;
				}
				/* fall through */
			default:
				printk("%s () failed err=%d\n", e, -ret);
L
Linus Torvalds 已提交
317
				goto out;
318 319
			}

L
Linus Torvalds 已提交
320 321
			q = kmap(sg[0].page) + sg[0].offset;
			hexdump(q, cipher_tv[i].rlen);
322 323 324 325

			printk("%s\n",
			       memcmp(q, cipher_tv[i].result,
				      cipher_tv[i].rlen) ? "fail" : "pass");
L
Linus Torvalds 已提交
326 327
		}
	}
328

329
	printk("\ntesting %s %s across pages (chunking)\n", algo, e);
L
Linus Torvalds 已提交
330
	memset(xbuf, 0, XBUFSIZE);
331

L
Linus Torvalds 已提交
332 333 334
	j = 0;
	for (i = 0; i < tcount; i++) {
		if (cipher_tv[i].np) {
335
			j++;
L
Linus Torvalds 已提交
336 337 338
			printk("test %u (%d bit key):\n",
			j, cipher_tv[i].klen * 8);

339
			crypto_ablkcipher_clear_flags(tfm, ~0);
340
			if (cipher_tv[i].wk)
341
				crypto_ablkcipher_set_flags(
342
					tfm, CRYPTO_TFM_REQ_WEAK_KEY);
L
Linus Torvalds 已提交
343
			key = cipher_tv[i].key;
344

345 346
			ret = crypto_ablkcipher_setkey(tfm, key,
						       cipher_tv[i].klen);
L
Linus Torvalds 已提交
347
			if (ret) {
348
				printk("setkey() failed flags=%x\n",
349
				       crypto_ablkcipher_get_flags(tfm));
350

L
Linus Torvalds 已提交
351 352 353 354 355 356
				if (!cipher_tv[i].fail)
					goto out;
			}

			temp = 0;
			for (k = 0; k < cipher_tv[i].np; k++) {
357 358 359
				memcpy(&xbuf[IDX[k]],
				       cipher_tv[i].input + temp,
				       cipher_tv[i].tap[k]);
L
Linus Torvalds 已提交
360
				temp += cipher_tv[i].tap[k];
361 362
				sg_set_buf(&sg[k], &xbuf[IDX[k]],
					   cipher_tv[i].tap[k]);
L
Linus Torvalds 已提交
363
			}
364

365 366 367
			ablkcipher_request_set_crypt(req, sg, sg,
						     cipher_tv[i].ilen,
						     cipher_tv[i].iv);
368

369
			ret = enc ?
370 371
				crypto_ablkcipher_encrypt(req) :
				crypto_ablkcipher_decrypt(req);
372

373 374 375 376 377 378 379 380 381 382 383 384 385 386
			switch (ret) {
			case 0:
				break;
			case -EINPROGRESS:
			case -EBUSY:
				ret = wait_for_completion_interruptible(
					&result.completion);
				if (!ret && !((ret = result.err))) {
					INIT_COMPLETION(result.completion);
					break;
				}
				/* fall through */
			default:
				printk("%s () failed err=%d\n", e, -ret);
L
Linus Torvalds 已提交
387 388 389 390 391 392 393 394
				goto out;
			}

			temp = 0;
			for (k = 0; k < cipher_tv[i].np; k++) {
				printk("page %u\n", k);
				q = kmap(sg[k].page) + sg[k].offset;
				hexdump(q, cipher_tv[i].tap[k]);
395 396 397
				printk("%s\n",
					memcmp(q, cipher_tv[i].result + temp,
						cipher_tv[i].tap[k]) ? "fail" :
L
Linus Torvalds 已提交
398 399 400 401 402 403 404
					"pass");
				temp += cipher_tv[i].tap[k];
			}
		}
	}

out:
405 406
	crypto_free_ablkcipher(tfm);
	ablkcipher_request_free(req);
L
Linus Torvalds 已提交
407 408
}

409
static int test_cipher_jiffies(struct blkcipher_desc *desc, int enc, char *p,
410 411
			       int blen, int sec)
{
412
	struct scatterlist sg[1];
413 414 415 416
	unsigned long start, end;
	int bcount;
	int ret;

417
	sg_set_buf(sg, p, blen);
418 419 420 421

	for (start = jiffies, end = start + sec * HZ, bcount = 0;
	     time_before(jiffies, end); bcount++) {
		if (enc)
422
			ret = crypto_blkcipher_encrypt(desc, sg, sg, blen);
423
		else
424
			ret = crypto_blkcipher_decrypt(desc, sg, sg, blen);
425 426 427 428 429 430 431 432 433 434

		if (ret)
			return ret;
	}

	printk("%d operations in %d seconds (%ld bytes)\n",
	       bcount, sec, (long)bcount * blen);
	return 0;
}

435
static int test_cipher_cycles(struct blkcipher_desc *desc, int enc, char *p,
436 437
			      int blen)
{
438
	struct scatterlist sg[1];
439 440 441 442
	unsigned long cycles = 0;
	int ret = 0;
	int i;

443
	sg_set_buf(sg, p, blen);
444 445 446 447 448 449 450

	local_bh_disable();
	local_irq_disable();

	/* Warm-up run. */
	for (i = 0; i < 4; i++) {
		if (enc)
451
			ret = crypto_blkcipher_encrypt(desc, sg, sg, blen);
452
		else
453
			ret = crypto_blkcipher_decrypt(desc, sg, sg, blen);
454 455 456 457 458 459 460 461 462 463 464

		if (ret)
			goto out;
	}

	/* The real thing. */
	for (i = 0; i < 8; i++) {
		cycles_t start, end;

		start = get_cycles();
		if (enc)
465
			ret = crypto_blkcipher_encrypt(desc, sg, sg, blen);
466
		else
467
			ret = crypto_blkcipher_decrypt(desc, sg, sg, blen);
468 469 470 471 472 473 474 475 476 477 478 479 480 481 482 483 484 485 486
		end = get_cycles();

		if (ret)
			goto out;

		cycles += end - start;
	}

out:
	local_irq_enable();
	local_bh_enable();

	if (ret == 0)
		printk("1 operation in %lu cycles (%d bytes)\n",
		       (cycles + 4) / 8, blen);

	return ret;
}

487
static void test_cipher_speed(char *algo, int enc, unsigned int sec,
488 489
			      struct cipher_testvec *template,
			      unsigned int tcount, struct cipher_speed *speed)
H
Harald Welte 已提交
490
{
491
	unsigned int ret, i, j, iv_len;
H
Harald Welte 已提交
492
	unsigned char *key, *p, iv[128];
493 494 495
	struct crypto_blkcipher *tfm;
	struct blkcipher_desc desc;
	const char *e;
H
Harald Welte 已提交
496 497 498 499 500 501

	if (enc == ENCRYPT)
	        e = "encryption";
	else
		e = "decryption";

502
	printk("\ntesting speed of %s %s\n", algo, e);
H
Harald Welte 已提交
503

504
	tfm = crypto_alloc_blkcipher(algo, 0, CRYPTO_ALG_ASYNC);
H
Harald Welte 已提交
505

506 507 508
	if (IS_ERR(tfm)) {
		printk("failed to load transform for %s: %ld\n", algo,
		       PTR_ERR(tfm));
H
Harald Welte 已提交
509 510
		return;
	}
511 512
	desc.tfm = tfm;
	desc.flags = 0;
H
Harald Welte 已提交
513 514 515 516 517 518 519 520 521 522 523 524 525 526 527

	for (i = 0; speed[i].klen != 0; i++) {
		if ((speed[i].blen + speed[i].klen) > TVMEMSIZE) {
			printk("template (%u) too big for tvmem (%u)\n",
			       speed[i].blen + speed[i].klen, TVMEMSIZE);
			goto out;
		}

		printk("test %u (%d bit key, %d byte blocks): ", i,
		       speed[i].klen * 8, speed[i].blen);

		memset(tvmem, 0xff, speed[i].klen + speed[i].blen);

		/* set key, plain text and IV */
		key = (unsigned char *)tvmem;
528 529 530 531 532 533
		for (j = 0; j < tcount; j++) {
			if (template[j].klen == speed[i].klen) {
				key = template[j].key;
				break;
			}
		}
H
Harald Welte 已提交
534 535
		p = (unsigned char *)tvmem + speed[i].klen;

536
		ret = crypto_blkcipher_setkey(tfm, key, speed[i].klen);
H
Harald Welte 已提交
537
		if (ret) {
538 539
			printk("setkey() failed flags=%x\n",
			       crypto_blkcipher_get_flags(tfm));
H
Harald Welte 已提交
540 541 542
			goto out;
		}

543 544
		iv_len = crypto_blkcipher_ivsize(tfm);
		if (iv_len) {
H
Harald Welte 已提交
545
			memset(&iv, 0xff, iv_len);
546
			crypto_blkcipher_set_iv(tfm, iv, iv_len);
H
Harald Welte 已提交
547 548
		}

549
		if (sec)
550
			ret = test_cipher_jiffies(&desc, enc, p, speed[i].blen,
551 552
						  sec);
		else
553
			ret = test_cipher_cycles(&desc, enc, p, speed[i].blen);
H
Harald Welte 已提交
554

555
		if (ret) {
556
			printk("%s() failed flags=%x\n", e, desc.flags);
557
			break;
H
Harald Welte 已提交
558 559 560 561
		}
	}

out:
562
	crypto_free_blkcipher(tfm);
H
Harald Welte 已提交
563 564
}

565 566 567 568 569 570 571 572 573 574 575 576 577 578 579 580 581 582 583 584 585 586 587 588
static int test_hash_jiffies_digest(struct hash_desc *desc, char *p, int blen,
				    char *out, int sec)
{
	struct scatterlist sg[1];
	unsigned long start, end;
	int bcount;
	int ret;

	for (start = jiffies, end = start + sec * HZ, bcount = 0;
	     time_before(jiffies, end); bcount++) {
		sg_set_buf(sg, p, blen);
		ret = crypto_hash_digest(desc, sg, blen, out);
		if (ret)
			return ret;
	}

	printk("%6u opers/sec, %9lu bytes/sec\n",
	       bcount / sec, ((long)bcount * blen) / sec);

	return 0;
}

static int test_hash_jiffies(struct hash_desc *desc, char *p, int blen,
			     int plen, char *out, int sec)
589 590 591 592
{
	struct scatterlist sg[1];
	unsigned long start, end;
	int bcount, pcount;
593 594 595 596
	int ret;

	if (plen == blen)
		return test_hash_jiffies_digest(desc, p, blen, out, sec);
597 598 599

	for (start = jiffies, end = start + sec * HZ, bcount = 0;
	     time_before(jiffies, end); bcount++) {
600 601 602
		ret = crypto_hash_init(desc);
		if (ret)
			return ret;
603 604
		for (pcount = 0; pcount < blen; pcount += plen) {
			sg_set_buf(sg, p + pcount, plen);
605 606 607
			ret = crypto_hash_update(desc, sg, plen);
			if (ret)
				return ret;
608 609
		}
		/* we assume there is enough space in 'out' for the result */
610 611 612
		ret = crypto_hash_final(desc, out);
		if (ret)
			return ret;
613 614 615 616 617
	}

	printk("%6u opers/sec, %9lu bytes/sec\n",
	       bcount / sec, ((long)bcount * blen) / sec);

618 619 620 621 622 623 624 625 626 627 628 629 630 631 632 633 634 635 636 637 638 639 640 641 642 643 644 645 646 647 648 649 650 651 652 653 654 655 656 657 658 659 660 661 662 663 664 665 666
	return 0;
}

static int test_hash_cycles_digest(struct hash_desc *desc, char *p, int blen,
				   char *out)
{
	struct scatterlist sg[1];
	unsigned long cycles = 0;
	int i;
	int ret;

	local_bh_disable();
	local_irq_disable();

	/* Warm-up run. */
	for (i = 0; i < 4; i++) {
		sg_set_buf(sg, p, blen);
		ret = crypto_hash_digest(desc, sg, blen, out);
		if (ret)
			goto out;
	}

	/* The real thing. */
	for (i = 0; i < 8; i++) {
		cycles_t start, end;

		start = get_cycles();

		sg_set_buf(sg, p, blen);
		ret = crypto_hash_digest(desc, sg, blen, out);
		if (ret)
			goto out;

		end = get_cycles();

		cycles += end - start;
	}

out:
	local_irq_enable();
	local_bh_enable();

	if (ret)
		return ret;

	printk("%6lu cycles/operation, %4lu cycles/byte\n",
	       cycles / 8, cycles / (8 * blen));

	return 0;
667 668
}

669 670
static int test_hash_cycles(struct hash_desc *desc, char *p, int blen,
			    int plen, char *out)
671 672 673 674
{
	struct scatterlist sg[1];
	unsigned long cycles = 0;
	int i, pcount;
675 676 677 678
	int ret;

	if (plen == blen)
		return test_hash_cycles_digest(desc, p, blen, out);
679 680 681 682 683 684

	local_bh_disable();
	local_irq_disable();

	/* Warm-up run. */
	for (i = 0; i < 4; i++) {
685 686 687
		ret = crypto_hash_init(desc);
		if (ret)
			goto out;
688 689
		for (pcount = 0; pcount < blen; pcount += plen) {
			sg_set_buf(sg, p + pcount, plen);
690 691 692
			ret = crypto_hash_update(desc, sg, plen);
			if (ret)
				goto out;
693
		}
694
		ret = crypto_hash_final(desc, out);
695 696
		if (ret)
			goto out;
697 698 699 700 701 702 703 704
	}

	/* The real thing. */
	for (i = 0; i < 8; i++) {
		cycles_t start, end;

		start = get_cycles();

705 706 707
		ret = crypto_hash_init(desc);
		if (ret)
			goto out;
708 709
		for (pcount = 0; pcount < blen; pcount += plen) {
			sg_set_buf(sg, p + pcount, plen);
710 711 712
			ret = crypto_hash_update(desc, sg, plen);
			if (ret)
				goto out;
713
		}
714 715 716
		ret = crypto_hash_final(desc, out);
		if (ret)
			goto out;
717 718 719 720 721 722

		end = get_cycles();

		cycles += end - start;
	}

723
out:
724 725 726
	local_irq_enable();
	local_bh_enable();

727 728 729
	if (ret)
		return ret;

730 731 732
	printk("%6lu cycles/operation, %4lu cycles/byte\n",
	       cycles / 8, cycles / (8 * blen));

733
	return 0;
734 735
}

736 737
static void test_hash_speed(char *algo, unsigned int sec,
			      struct hash_speed *speed)
738
{
739 740
	struct crypto_hash *tfm;
	struct hash_desc desc;
741 742
	char output[1024];
	int i;
743
	int ret;
744 745 746

	printk("\ntesting speed of %s\n", algo);

747
	tfm = crypto_alloc_hash(algo, 0, CRYPTO_ALG_ASYNC);
748

749 750 751
	if (IS_ERR(tfm)) {
		printk("failed to load transform for %s: %ld\n", algo,
		       PTR_ERR(tfm));
752 753 754
		return;
	}

755 756 757 758
	desc.tfm = tfm;
	desc.flags = 0;

	if (crypto_hash_digestsize(tfm) > sizeof(output)) {
759
		printk("digestsize(%u) > outputbuffer(%zu)\n",
760
		       crypto_hash_digestsize(tfm), sizeof(output));
761 762 763 764 765 766 767 768 769 770 771 772 773 774 775 776
		goto out;
	}

	for (i = 0; speed[i].blen != 0; i++) {
		if (speed[i].blen > TVMEMSIZE) {
			printk("template (%u) too big for tvmem (%u)\n",
			       speed[i].blen, TVMEMSIZE);
			goto out;
		}

		printk("test%3u (%5u byte blocks,%5u bytes per update,%4u updates): ",
		       i, speed[i].blen, speed[i].plen, speed[i].blen / speed[i].plen);

		memset(tvmem, 0xff, speed[i].blen);

		if (sec)
777 778
			ret = test_hash_jiffies(&desc, tvmem, speed[i].blen,
						speed[i].plen, output, sec);
779
		else
780 781 782 783 784 785 786
			ret = test_hash_cycles(&desc, tvmem, speed[i].blen,
					       speed[i].plen, output);

		if (ret) {
			printk("hashing failed ret=%d\n", ret);
			break;
		}
787 788 789
	}

out:
790
	crypto_free_hash(tfm);
791 792
}

793
static void test_deflate(void)
L
Linus Torvalds 已提交
794 795 796
{
	unsigned int i;
	char result[COMP_BUF_SIZE];
797
	struct crypto_comp *tfm;
L
Linus Torvalds 已提交
798 799 800 801 802 803 804 805 806 807 808 809 810
	struct comp_testvec *tv;
	unsigned int tsize;

	printk("\ntesting deflate compression\n");

	tsize = sizeof (deflate_comp_tv_template);
	if (tsize > TVMEMSIZE) {
		printk("template (%u) too big for tvmem (%u)\n", tsize,
		       TVMEMSIZE);
		return;
	}

	memcpy(tvmem, deflate_comp_tv_template, tsize);
811
	tv = (void *)tvmem;
L
Linus Torvalds 已提交
812

813
	tfm = crypto_alloc_comp("deflate", 0, CRYPTO_ALG_ASYNC);
814
	if (IS_ERR(tfm)) {
L
Linus Torvalds 已提交
815 816 817 818 819 820
		printk("failed to load transform for deflate\n");
		return;
	}

	for (i = 0; i < DEFLATE_COMP_TEST_VECTORS; i++) {
		int ilen, ret, dlen = COMP_BUF_SIZE;
821

L
Linus Torvalds 已提交
822 823 824 825 826 827 828 829 830 831 832 833 834 835 836 837 838 839 840 841 842 843 844 845 846 847
		printk("test %u:\n", i + 1);
		memset(result, 0, sizeof (result));

		ilen = tv[i].inlen;
		ret = crypto_comp_compress(tfm, tv[i].input,
		                           ilen, result, &dlen);
		if (ret) {
			printk("fail: ret=%d\n", ret);
			continue;
		}
		hexdump(result, dlen);
		printk("%s (ratio %d:%d)\n",
		       memcmp(result, tv[i].output, dlen) ? "fail" : "pass",
		       ilen, dlen);
	}

	printk("\ntesting deflate decompression\n");

	tsize = sizeof (deflate_decomp_tv_template);
	if (tsize > TVMEMSIZE) {
		printk("template (%u) too big for tvmem (%u)\n", tsize,
		       TVMEMSIZE);
		goto out;
	}

	memcpy(tvmem, deflate_decomp_tv_template, tsize);
848
	tv = (void *)tvmem;
L
Linus Torvalds 已提交
849 850 851

	for (i = 0; i < DEFLATE_DECOMP_TEST_VECTORS; i++) {
		int ilen, ret, dlen = COMP_BUF_SIZE;
852

L
Linus Torvalds 已提交
853 854 855 856 857 858 859 860 861 862 863 864 865 866 867 868
		printk("test %u:\n", i + 1);
		memset(result, 0, sizeof (result));

		ilen = tv[i].inlen;
		ret = crypto_comp_decompress(tfm, tv[i].input,
		                             ilen, result, &dlen);
		if (ret) {
			printk("fail: ret=%d\n", ret);
			continue;
		}
		hexdump(result, dlen);
		printk("%s (ratio %d:%d)\n",
		       memcmp(result, tv[i].output, dlen) ? "fail" : "pass",
		       ilen, dlen);
	}
out:
869
	crypto_free_comp(tfm);
L
Linus Torvalds 已提交
870 871
}

872
static void test_available(void)
L
Linus Torvalds 已提交
873 874
{
	char **name = check;
875

L
Linus Torvalds 已提交
876 877
	while (*name) {
		printk("alg %s ", *name);
878
		printk(crypto_has_alg(*name, 0, 0) ?
879
		       "found\n" : "not found\n");
L
Linus Torvalds 已提交
880
		name++;
881
	}
L
Linus Torvalds 已提交
882 883
}

884
static void do_test(void)
L
Linus Torvalds 已提交
885 886 887 888 889
{
	switch (mode) {

	case 0:
		test_hash("md5", md5_tv_template, MD5_TEST_VECTORS);
890

L
Linus Torvalds 已提交
891
		test_hash("sha1", sha1_tv_template, SHA1_TEST_VECTORS);
892

L
Linus Torvalds 已提交
893
		//DES
894 895 896 897 898 899 900 901
		test_cipher("ecb(des)", ENCRYPT, des_enc_tv_template,
			    DES_ENC_TEST_VECTORS);
		test_cipher("ecb(des)", DECRYPT, des_dec_tv_template,
			    DES_DEC_TEST_VECTORS);
		test_cipher("cbc(des)", ENCRYPT, des_cbc_enc_tv_template,
			    DES_CBC_ENC_TEST_VECTORS);
		test_cipher("cbc(des)", DECRYPT, des_cbc_dec_tv_template,
			    DES_CBC_DEC_TEST_VECTORS);
902

L
Linus Torvalds 已提交
903
		//DES3_EDE
904 905 906 907
		test_cipher("ecb(des3_ede)", ENCRYPT, des3_ede_enc_tv_template,
			    DES3_EDE_ENC_TEST_VECTORS);
		test_cipher("ecb(des3_ede)", DECRYPT, des3_ede_dec_tv_template,
			    DES3_EDE_DEC_TEST_VECTORS);
908

L
Linus Torvalds 已提交
909
		test_hash("md4", md4_tv_template, MD4_TEST_VECTORS);
910

L
Linus Torvalds 已提交
911
		test_hash("sha256", sha256_tv_template, SHA256_TEST_VECTORS);
912

L
Linus Torvalds 已提交
913
		//BLOWFISH
914 915 916 917 918 919 920 921
		test_cipher("ecb(blowfish)", ENCRYPT, bf_enc_tv_template,
			    BF_ENC_TEST_VECTORS);
		test_cipher("ecb(blowfish)", DECRYPT, bf_dec_tv_template,
			    BF_DEC_TEST_VECTORS);
		test_cipher("cbc(blowfish)", ENCRYPT, bf_cbc_enc_tv_template,
			    BF_CBC_ENC_TEST_VECTORS);
		test_cipher("cbc(blowfish)", DECRYPT, bf_cbc_dec_tv_template,
			    BF_CBC_DEC_TEST_VECTORS);
922

L
Linus Torvalds 已提交
923
		//TWOFISH
924 925 926 927 928 929 930 931
		test_cipher("ecb(twofish)", ENCRYPT, tf_enc_tv_template,
			    TF_ENC_TEST_VECTORS);
		test_cipher("ecb(twofish)", DECRYPT, tf_dec_tv_template,
			    TF_DEC_TEST_VECTORS);
		test_cipher("cbc(twofish)", ENCRYPT, tf_cbc_enc_tv_template,
			    TF_CBC_ENC_TEST_VECTORS);
		test_cipher("cbc(twofish)", DECRYPT, tf_cbc_dec_tv_template,
			    TF_CBC_DEC_TEST_VECTORS);
932

L
Linus Torvalds 已提交
933
		//SERPENT
934 935 936 937
		test_cipher("ecb(serpent)", ENCRYPT, serpent_enc_tv_template,
			    SERPENT_ENC_TEST_VECTORS);
		test_cipher("ecb(serpent)", DECRYPT, serpent_dec_tv_template,
			    SERPENT_DEC_TEST_VECTORS);
938

L
Linus Torvalds 已提交
939
		//TNEPRES
940 941 942 943
		test_cipher("ecb(tnepres)", ENCRYPT, tnepres_enc_tv_template,
			    TNEPRES_ENC_TEST_VECTORS);
		test_cipher("ecb(tnepres)", DECRYPT, tnepres_dec_tv_template,
			    TNEPRES_DEC_TEST_VECTORS);
L
Linus Torvalds 已提交
944 945

		//AES
946 947 948 949 950 951 952 953
		test_cipher("ecb(aes)", ENCRYPT, aes_enc_tv_template,
			    AES_ENC_TEST_VECTORS);
		test_cipher("ecb(aes)", DECRYPT, aes_dec_tv_template,
			    AES_DEC_TEST_VECTORS);
		test_cipher("cbc(aes)", ENCRYPT, aes_cbc_enc_tv_template,
			    AES_CBC_ENC_TEST_VECTORS);
		test_cipher("cbc(aes)", DECRYPT, aes_cbc_dec_tv_template,
			    AES_CBC_DEC_TEST_VECTORS);
R
Rik Snel 已提交
954 955 956 957
		test_cipher("lrw(aes)", ENCRYPT, aes_lrw_enc_tv_template,
			    AES_LRW_ENC_TEST_VECTORS);
		test_cipher("lrw(aes)", DECRYPT, aes_lrw_dec_tv_template,
			    AES_LRW_DEC_TEST_VECTORS);
L
Linus Torvalds 已提交
958 959

		//CAST5
960 961 962 963
		test_cipher("ecb(cast5)", ENCRYPT, cast5_enc_tv_template,
			    CAST5_ENC_TEST_VECTORS);
		test_cipher("ecb(cast5)", DECRYPT, cast5_dec_tv_template,
			    CAST5_DEC_TEST_VECTORS);
964

L
Linus Torvalds 已提交
965
		//CAST6
966 967 968 969
		test_cipher("ecb(cast6)", ENCRYPT, cast6_enc_tv_template,
			    CAST6_ENC_TEST_VECTORS);
		test_cipher("ecb(cast6)", DECRYPT, cast6_dec_tv_template,
			    CAST6_DEC_TEST_VECTORS);
L
Linus Torvalds 已提交
970 971

		//ARC4
972 973 974 975
		test_cipher("ecb(arc4)", ENCRYPT, arc4_enc_tv_template,
			    ARC4_ENC_TEST_VECTORS);
		test_cipher("ecb(arc4)", DECRYPT, arc4_dec_tv_template,
			    ARC4_DEC_TEST_VECTORS);
L
Linus Torvalds 已提交
976 977

		//TEA
978 979 980 981
		test_cipher("ecb(tea)", ENCRYPT, tea_enc_tv_template,
			    TEA_ENC_TEST_VECTORS);
		test_cipher("ecb(tea)", DECRYPT, tea_dec_tv_template,
			    TEA_DEC_TEST_VECTORS);
L
Linus Torvalds 已提交
982 983 984


		//XTEA
985 986 987 988
		test_cipher("ecb(xtea)", ENCRYPT, xtea_enc_tv_template,
			    XTEA_ENC_TEST_VECTORS);
		test_cipher("ecb(xtea)", DECRYPT, xtea_dec_tv_template,
			    XTEA_DEC_TEST_VECTORS);
L
Linus Torvalds 已提交
989 990

		//KHAZAD
991 992 993 994
		test_cipher("ecb(khazad)", ENCRYPT, khazad_enc_tv_template,
			    KHAZAD_ENC_TEST_VECTORS);
		test_cipher("ecb(khazad)", DECRYPT, khazad_dec_tv_template,
			    KHAZAD_DEC_TEST_VECTORS);
L
Linus Torvalds 已提交
995 996

		//ANUBIS
997 998 999 1000 1001 1002 1003 1004
		test_cipher("ecb(anubis)", ENCRYPT, anubis_enc_tv_template,
			    ANUBIS_ENC_TEST_VECTORS);
		test_cipher("ecb(anubis)", DECRYPT, anubis_dec_tv_template,
			    ANUBIS_DEC_TEST_VECTORS);
		test_cipher("cbc(anubis)", ENCRYPT, anubis_cbc_enc_tv_template,
			    ANUBIS_CBC_ENC_TEST_VECTORS);
		test_cipher("cbc(anubis)", DECRYPT, anubis_cbc_dec_tv_template,
			    ANUBIS_CBC_ENC_TEST_VECTORS);
L
Linus Torvalds 已提交
1005

A
Aaron Grothe 已提交
1006
		//XETA
1007 1008 1009 1010
		test_cipher("ecb(xeta)", ENCRYPT, xeta_enc_tv_template,
			    XETA_ENC_TEST_VECTORS);
		test_cipher("ecb(xeta)", DECRYPT, xeta_dec_tv_template,
			    XETA_DEC_TEST_VECTORS);
A
Aaron Grothe 已提交
1011

1012 1013 1014 1015 1016 1017
		//FCrypt
		test_cipher("pcbc(fcrypt)", ENCRYPT, fcrypt_pcbc_enc_tv_template,
			    FCRYPT_ENC_TEST_VECTORS);
		test_cipher("pcbc(fcrypt)", DECRYPT, fcrypt_pcbc_dec_tv_template,
			    FCRYPT_DEC_TEST_VECTORS);

1018 1019 1020 1021 1022 1023 1024 1025 1026 1027 1028 1029 1030 1031
		//CAMELLIA
		test_cipher("ecb(camellia)", ENCRYPT,
			    camellia_enc_tv_template,
			    CAMELLIA_ENC_TEST_VECTORS);
		test_cipher("ecb(camellia)", DECRYPT,
			    camellia_dec_tv_template,
			    CAMELLIA_DEC_TEST_VECTORS);
		test_cipher("cbc(camellia)", ENCRYPT,
			    camellia_cbc_enc_tv_template,
			    CAMELLIA_CBC_ENC_TEST_VECTORS);
		test_cipher("cbc(camellia)", DECRYPT,
			    camellia_cbc_dec_tv_template,
			    CAMELLIA_CBC_DEC_TEST_VECTORS);

1032 1033 1034 1035 1036 1037
		//SEED
		test_cipher("ecb(seed)", ENCRYPT, seed_enc_tv_template,
			    SEED_ENC_TEST_VECTORS);
		test_cipher("ecb(seed)", DECRYPT, seed_dec_tv_template,
			    SEED_DEC_TEST_VECTORS);

L
Linus Torvalds 已提交
1038 1039 1040 1041 1042 1043 1044 1045 1046
		test_hash("sha384", sha384_tv_template, SHA384_TEST_VECTORS);
		test_hash("sha512", sha512_tv_template, SHA512_TEST_VECTORS);
		test_hash("wp512", wp512_tv_template, WP512_TEST_VECTORS);
		test_hash("wp384", wp384_tv_template, WP384_TEST_VECTORS);
		test_hash("wp256", wp256_tv_template, WP256_TEST_VECTORS);
		test_hash("tgr192", tgr192_tv_template, TGR192_TEST_VECTORS);
		test_hash("tgr160", tgr160_tv_template, TGR160_TEST_VECTORS);
		test_hash("tgr128", tgr128_tv_template, TGR128_TEST_VECTORS);
		test_deflate();
1047
		test_hash("crc32c", crc32c_tv_template, CRC32C_TEST_VECTORS);
1048 1049 1050 1051 1052 1053
		test_hash("hmac(md5)", hmac_md5_tv_template,
			  HMAC_MD5_TEST_VECTORS);
		test_hash("hmac(sha1)", hmac_sha1_tv_template,
			  HMAC_SHA1_TEST_VECTORS);
		test_hash("hmac(sha256)", hmac_sha256_tv_template,
			  HMAC_SHA256_TEST_VECTORS);
1054 1055 1056 1057
		test_hash("hmac(sha384)", hmac_sha384_tv_template,
			  HMAC_SHA384_TEST_VECTORS);
		test_hash("hmac(sha512)", hmac_sha512_tv_template,
			  HMAC_SHA512_TEST_VECTORS);
L
Linus Torvalds 已提交
1058

1059 1060 1061
		test_hash("xcbc(aes)", aes_xcbc128_tv_template,
			  XCBC_AES_TEST_VECTORS);

L
Linus Torvalds 已提交
1062 1063 1064 1065 1066 1067 1068 1069 1070 1071 1072 1073
		test_hash("michael_mic", michael_mic_tv_template, MICHAEL_MIC_TEST_VECTORS);
		break;

	case 1:
		test_hash("md5", md5_tv_template, MD5_TEST_VECTORS);
		break;

	case 2:
		test_hash("sha1", sha1_tv_template, SHA1_TEST_VECTORS);
		break;

	case 3:
1074 1075 1076 1077 1078 1079 1080 1081
		test_cipher("ecb(des)", ENCRYPT, des_enc_tv_template,
			    DES_ENC_TEST_VECTORS);
		test_cipher("ecb(des)", DECRYPT, des_dec_tv_template,
			    DES_DEC_TEST_VECTORS);
		test_cipher("cbc(des)", ENCRYPT, des_cbc_enc_tv_template,
			    DES_CBC_ENC_TEST_VECTORS);
		test_cipher("cbc(des)", DECRYPT, des_cbc_dec_tv_template,
			    DES_CBC_DEC_TEST_VECTORS);
L
Linus Torvalds 已提交
1082 1083 1084
		break;

	case 4:
1085 1086 1087 1088
		test_cipher("ecb(des3_ede)", ENCRYPT, des3_ede_enc_tv_template,
			    DES3_EDE_ENC_TEST_VECTORS);
		test_cipher("ecb(des3_ede)", DECRYPT, des3_ede_dec_tv_template,
			    DES3_EDE_DEC_TEST_VECTORS);
L
Linus Torvalds 已提交
1089 1090 1091 1092 1093
		break;

	case 5:
		test_hash("md4", md4_tv_template, MD4_TEST_VECTORS);
		break;
1094

L
Linus Torvalds 已提交
1095 1096 1097
	case 6:
		test_hash("sha256", sha256_tv_template, SHA256_TEST_VECTORS);
		break;
1098

L
Linus Torvalds 已提交
1099
	case 7:
1100 1101 1102 1103 1104 1105 1106 1107
		test_cipher("ecb(blowfish)", ENCRYPT, bf_enc_tv_template,
			    BF_ENC_TEST_VECTORS);
		test_cipher("ecb(blowfish)", DECRYPT, bf_dec_tv_template,
			    BF_DEC_TEST_VECTORS);
		test_cipher("cbc(blowfish)", ENCRYPT, bf_cbc_enc_tv_template,
			    BF_CBC_ENC_TEST_VECTORS);
		test_cipher("cbc(blowfish)", DECRYPT, bf_cbc_dec_tv_template,
			    BF_CBC_DEC_TEST_VECTORS);
L
Linus Torvalds 已提交
1108 1109 1110
		break;

	case 8:
1111 1112 1113 1114 1115 1116 1117 1118
		test_cipher("ecb(twofish)", ENCRYPT, tf_enc_tv_template,
			    TF_ENC_TEST_VECTORS);
		test_cipher("ecb(twofish)", DECRYPT, tf_dec_tv_template,
			    TF_DEC_TEST_VECTORS);
		test_cipher("cbc(twofish)", ENCRYPT, tf_cbc_enc_tv_template,
			    TF_CBC_ENC_TEST_VECTORS);
		test_cipher("cbc(twofish)", DECRYPT, tf_cbc_dec_tv_template,
			    TF_CBC_DEC_TEST_VECTORS);
L
Linus Torvalds 已提交
1119
		break;
1120

L
Linus Torvalds 已提交
1121
	case 9:
1122 1123 1124 1125
		test_cipher("ecb(serpent)", ENCRYPT, serpent_enc_tv_template,
			    SERPENT_ENC_TEST_VECTORS);
		test_cipher("ecb(serpent)", DECRYPT, serpent_dec_tv_template,
			    SERPENT_DEC_TEST_VECTORS);
L
Linus Torvalds 已提交
1126 1127 1128
		break;

	case 10:
1129 1130 1131 1132 1133 1134 1135 1136
		test_cipher("ecb(aes)", ENCRYPT, aes_enc_tv_template,
			    AES_ENC_TEST_VECTORS);
		test_cipher("ecb(aes)", DECRYPT, aes_dec_tv_template,
			    AES_DEC_TEST_VECTORS);
		test_cipher("cbc(aes)", ENCRYPT, aes_cbc_enc_tv_template,
			    AES_CBC_ENC_TEST_VECTORS);
		test_cipher("cbc(aes)", DECRYPT, aes_cbc_dec_tv_template,
			    AES_CBC_DEC_TEST_VECTORS);
R
Rik Snel 已提交
1137 1138 1139 1140
		test_cipher("lrw(aes)", ENCRYPT, aes_lrw_enc_tv_template,
			    AES_LRW_ENC_TEST_VECTORS);
		test_cipher("lrw(aes)", DECRYPT, aes_lrw_dec_tv_template,
			    AES_LRW_DEC_TEST_VECTORS);
L
Linus Torvalds 已提交
1141 1142 1143 1144 1145
		break;

	case 11:
		test_hash("sha384", sha384_tv_template, SHA384_TEST_VECTORS);
		break;
1146

L
Linus Torvalds 已提交
1147 1148 1149 1150 1151 1152 1153 1154 1155
	case 12:
		test_hash("sha512", sha512_tv_template, SHA512_TEST_VECTORS);
		break;

	case 13:
		test_deflate();
		break;

	case 14:
1156 1157 1158 1159
		test_cipher("ecb(cast5)", ENCRYPT, cast5_enc_tv_template,
			    CAST5_ENC_TEST_VECTORS);
		test_cipher("ecb(cast5)", DECRYPT, cast5_dec_tv_template,
			    CAST5_DEC_TEST_VECTORS);
L
Linus Torvalds 已提交
1160 1161 1162
		break;

	case 15:
1163 1164 1165 1166
		test_cipher("ecb(cast6)", ENCRYPT, cast6_enc_tv_template,
			    CAST6_ENC_TEST_VECTORS);
		test_cipher("ecb(cast6)", DECRYPT, cast6_dec_tv_template,
			    CAST6_DEC_TEST_VECTORS);
L
Linus Torvalds 已提交
1167 1168 1169
		break;

	case 16:
1170 1171 1172 1173
		test_cipher("ecb(arc4)", ENCRYPT, arc4_enc_tv_template,
			    ARC4_ENC_TEST_VECTORS);
		test_cipher("ecb(arc4)", DECRYPT, arc4_dec_tv_template,
			    ARC4_DEC_TEST_VECTORS);
L
Linus Torvalds 已提交
1174 1175 1176 1177 1178 1179 1180
		break;

	case 17:
		test_hash("michael_mic", michael_mic_tv_template, MICHAEL_MIC_TEST_VECTORS);
		break;

	case 18:
1181
		test_hash("crc32c", crc32c_tv_template, CRC32C_TEST_VECTORS);
L
Linus Torvalds 已提交
1182 1183 1184
		break;

	case 19:
1185 1186 1187 1188
		test_cipher("ecb(tea)", ENCRYPT, tea_enc_tv_template,
			    TEA_ENC_TEST_VECTORS);
		test_cipher("ecb(tea)", DECRYPT, tea_dec_tv_template,
			    TEA_DEC_TEST_VECTORS);
L
Linus Torvalds 已提交
1189 1190 1191
		break;

	case 20:
1192 1193 1194 1195
		test_cipher("ecb(xtea)", ENCRYPT, xtea_enc_tv_template,
			    XTEA_ENC_TEST_VECTORS);
		test_cipher("ecb(xtea)", DECRYPT, xtea_dec_tv_template,
			    XTEA_DEC_TEST_VECTORS);
L
Linus Torvalds 已提交
1196 1197 1198
		break;

	case 21:
1199 1200 1201 1202
		test_cipher("ecb(khazad)", ENCRYPT, khazad_enc_tv_template,
			    KHAZAD_ENC_TEST_VECTORS);
		test_cipher("ecb(khazad)", DECRYPT, khazad_dec_tv_template,
			    KHAZAD_DEC_TEST_VECTORS);
L
Linus Torvalds 已提交
1203 1204 1205 1206 1207 1208 1209 1210 1211 1212 1213 1214 1215 1216 1217
		break;

	case 22:
		test_hash("wp512", wp512_tv_template, WP512_TEST_VECTORS);
		break;

	case 23:
		test_hash("wp384", wp384_tv_template, WP384_TEST_VECTORS);
		break;

	case 24:
		test_hash("wp256", wp256_tv_template, WP256_TEST_VECTORS);
		break;

	case 25:
1218 1219 1220 1221
		test_cipher("ecb(tnepres)", ENCRYPT, tnepres_enc_tv_template,
			    TNEPRES_ENC_TEST_VECTORS);
		test_cipher("ecb(tnepres)", DECRYPT, tnepres_dec_tv_template,
			    TNEPRES_DEC_TEST_VECTORS);
L
Linus Torvalds 已提交
1222 1223 1224
		break;

	case 26:
1225 1226 1227 1228 1229 1230 1231 1232
		test_cipher("ecb(anubis)", ENCRYPT, anubis_enc_tv_template,
			    ANUBIS_ENC_TEST_VECTORS);
		test_cipher("ecb(anubis)", DECRYPT, anubis_dec_tv_template,
			    ANUBIS_DEC_TEST_VECTORS);
		test_cipher("cbc(anubis)", ENCRYPT, anubis_cbc_enc_tv_template,
			    ANUBIS_CBC_ENC_TEST_VECTORS);
		test_cipher("cbc(anubis)", DECRYPT, anubis_cbc_dec_tv_template,
			    ANUBIS_CBC_ENC_TEST_VECTORS);
L
Linus Torvalds 已提交
1233 1234 1235 1236 1237 1238 1239 1240 1241 1242 1243 1244 1245 1246
		break;

	case 27:
		test_hash("tgr192", tgr192_tv_template, TGR192_TEST_VECTORS);
		break;

	case 28:

		test_hash("tgr160", tgr160_tv_template, TGR160_TEST_VECTORS);
		break;

	case 29:
		test_hash("tgr128", tgr128_tv_template, TGR128_TEST_VECTORS);
		break;
A
Aaron Grothe 已提交
1247 1248
		
	case 30:
1249 1250 1251 1252
		test_cipher("ecb(xeta)", ENCRYPT, xeta_enc_tv_template,
			    XETA_ENC_TEST_VECTORS);
		test_cipher("ecb(xeta)", DECRYPT, xeta_dec_tv_template,
			    XETA_DEC_TEST_VECTORS);
A
Aaron Grothe 已提交
1253
		break;
L
Linus Torvalds 已提交
1254

1255 1256 1257 1258 1259 1260 1261
	case 31:
		test_cipher("pcbc(fcrypt)", ENCRYPT, fcrypt_pcbc_enc_tv_template,
			    FCRYPT_ENC_TEST_VECTORS);
		test_cipher("pcbc(fcrypt)", DECRYPT, fcrypt_pcbc_dec_tv_template,
			    FCRYPT_DEC_TEST_VECTORS);
		break;

1262 1263 1264 1265 1266 1267 1268 1269 1270 1271 1272 1273 1274 1275 1276
	case 32:
		test_cipher("ecb(camellia)", ENCRYPT,
			    camellia_enc_tv_template,
			    CAMELLIA_ENC_TEST_VECTORS);
		test_cipher("ecb(camellia)", DECRYPT,
			    camellia_dec_tv_template,
			    CAMELLIA_DEC_TEST_VECTORS);
		test_cipher("cbc(camellia)", ENCRYPT,
			    camellia_cbc_enc_tv_template,
			    CAMELLIA_CBC_ENC_TEST_VECTORS);
		test_cipher("cbc(camellia)", DECRYPT,
			    camellia_cbc_dec_tv_template,
			    CAMELLIA_CBC_DEC_TEST_VECTORS);
		break;

L
Linus Torvalds 已提交
1277
	case 100:
1278 1279
		test_hash("hmac(md5)", hmac_md5_tv_template,
			  HMAC_MD5_TEST_VECTORS);
L
Linus Torvalds 已提交
1280
		break;
1281

L
Linus Torvalds 已提交
1282
	case 101:
1283 1284
		test_hash("hmac(sha1)", hmac_sha1_tv_template,
			  HMAC_SHA1_TEST_VECTORS);
L
Linus Torvalds 已提交
1285
		break;
1286

L
Linus Torvalds 已提交
1287
	case 102:
1288 1289
		test_hash("hmac(sha256)", hmac_sha256_tv_template,
			  HMAC_SHA256_TEST_VECTORS);
L
Linus Torvalds 已提交
1290 1291
		break;

1292 1293 1294 1295 1296 1297 1298 1299 1300 1301
	case 103:
		test_hash("hmac(sha384)", hmac_sha384_tv_template,
			  HMAC_SHA384_TEST_VECTORS);
		break;

	case 104:
		test_hash("hmac(sha512)", hmac_sha512_tv_template,
			  HMAC_SHA512_TEST_VECTORS);
		break;

L
Linus Torvalds 已提交
1302

H
Harald Welte 已提交
1303
	case 200:
1304
		test_cipher_speed("ecb(aes)", ENCRYPT, sec, NULL, 0,
1305
				  aes_speed_template);
1306
		test_cipher_speed("ecb(aes)", DECRYPT, sec, NULL, 0,
1307
				  aes_speed_template);
1308
		test_cipher_speed("cbc(aes)", ENCRYPT, sec, NULL, 0,
1309
				  aes_speed_template);
1310
		test_cipher_speed("cbc(aes)", DECRYPT, sec, NULL, 0,
1311
				  aes_speed_template);
R
Rik Snel 已提交
1312 1313 1314 1315
		test_cipher_speed("lrw(aes)", ENCRYPT, sec, NULL, 0,
				  aes_lrw_speed_template);
		test_cipher_speed("lrw(aes)", DECRYPT, sec, NULL, 0,
				  aes_lrw_speed_template);
H
Harald Welte 已提交
1316 1317 1318
		break;

	case 201:
1319
		test_cipher_speed("ecb(des3_ede)", ENCRYPT, sec,
1320 1321 1322
				  des3_ede_enc_tv_template,
				  DES3_EDE_ENC_TEST_VECTORS,
				  des3_ede_speed_template);
1323
		test_cipher_speed("ecb(des3_ede)", DECRYPT, sec,
1324 1325 1326
				  des3_ede_dec_tv_template,
				  DES3_EDE_DEC_TEST_VECTORS,
				  des3_ede_speed_template);
1327
		test_cipher_speed("cbc(des3_ede)", ENCRYPT, sec,
1328 1329 1330
				  des3_ede_enc_tv_template,
				  DES3_EDE_ENC_TEST_VECTORS,
				  des3_ede_speed_template);
1331
		test_cipher_speed("cbc(des3_ede)", DECRYPT, sec,
1332 1333 1334
				  des3_ede_dec_tv_template,
				  DES3_EDE_DEC_TEST_VECTORS,
				  des3_ede_speed_template);
H
Harald Welte 已提交
1335 1336 1337
		break;

	case 202:
1338
		test_cipher_speed("ecb(twofish)", ENCRYPT, sec, NULL, 0,
1339
				  twofish_speed_template);
1340
		test_cipher_speed("ecb(twofish)", DECRYPT, sec, NULL, 0,
1341
				  twofish_speed_template);
1342
		test_cipher_speed("cbc(twofish)", ENCRYPT, sec, NULL, 0,
1343
				  twofish_speed_template);
1344
		test_cipher_speed("cbc(twofish)", DECRYPT, sec, NULL, 0,
1345
				  twofish_speed_template);
H
Harald Welte 已提交
1346 1347 1348
		break;

	case 203:
1349
		test_cipher_speed("ecb(blowfish)", ENCRYPT, sec, NULL, 0,
1350
				  blowfish_speed_template);
1351
		test_cipher_speed("ecb(blowfish)", DECRYPT, sec, NULL, 0,
1352
				  blowfish_speed_template);
1353
		test_cipher_speed("cbc(blowfish)", ENCRYPT, sec, NULL, 0,
1354
				  blowfish_speed_template);
1355
		test_cipher_speed("cbc(blowfish)", DECRYPT, sec, NULL, 0,
1356
				  blowfish_speed_template);
H
Harald Welte 已提交
1357 1358 1359
		break;

	case 204:
1360
		test_cipher_speed("ecb(des)", ENCRYPT, sec, NULL, 0,
1361
				  des_speed_template);
1362
		test_cipher_speed("ecb(des)", DECRYPT, sec, NULL, 0,
1363
				  des_speed_template);
1364
		test_cipher_speed("cbc(des)", ENCRYPT, sec, NULL, 0,
1365
				  des_speed_template);
1366
		test_cipher_speed("cbc(des)", DECRYPT, sec, NULL, 0,
1367
				  des_speed_template);
H
Harald Welte 已提交
1368 1369
		break;

1370 1371 1372 1373 1374 1375 1376 1377 1378 1379 1380
	case 205:
		test_cipher_speed("ecb(camellia)", ENCRYPT, sec, NULL, 0,
				camellia_speed_template);
		test_cipher_speed("ecb(camellia)", DECRYPT, sec, NULL, 0,
				camellia_speed_template);
		test_cipher_speed("cbc(camellia)", ENCRYPT, sec, NULL, 0,
				camellia_speed_template);
		test_cipher_speed("cbc(camellia)", DECRYPT, sec, NULL, 0,
				camellia_speed_template);
		break;

1381 1382 1383 1384
	case 300:
		/* fall through */

	case 301:
1385
		test_hash_speed("md4", sec, generic_hash_speed_template);
1386 1387 1388
		if (mode > 300 && mode < 400) break;

	case 302:
1389
		test_hash_speed("md5", sec, generic_hash_speed_template);
1390 1391 1392
		if (mode > 300 && mode < 400) break;

	case 303:
1393
		test_hash_speed("sha1", sec, generic_hash_speed_template);
1394 1395 1396
		if (mode > 300 && mode < 400) break;

	case 304:
1397
		test_hash_speed("sha256", sec, generic_hash_speed_template);
1398 1399 1400
		if (mode > 300 && mode < 400) break;

	case 305:
1401
		test_hash_speed("sha384", sec, generic_hash_speed_template);
1402 1403 1404
		if (mode > 300 && mode < 400) break;

	case 306:
1405
		test_hash_speed("sha512", sec, generic_hash_speed_template);
1406 1407 1408
		if (mode > 300 && mode < 400) break;

	case 307:
1409
		test_hash_speed("wp256", sec, generic_hash_speed_template);
1410 1411 1412
		if (mode > 300 && mode < 400) break;

	case 308:
1413
		test_hash_speed("wp384", sec, generic_hash_speed_template);
1414 1415 1416
		if (mode > 300 && mode < 400) break;

	case 309:
1417
		test_hash_speed("wp512", sec, generic_hash_speed_template);
1418 1419 1420
		if (mode > 300 && mode < 400) break;

	case 310:
1421
		test_hash_speed("tgr128", sec, generic_hash_speed_template);
1422 1423 1424
		if (mode > 300 && mode < 400) break;

	case 311:
1425
		test_hash_speed("tgr160", sec, generic_hash_speed_template);
1426 1427 1428
		if (mode > 300 && mode < 400) break;

	case 312:
1429
		test_hash_speed("tgr192", sec, generic_hash_speed_template);
1430 1431 1432 1433 1434
		if (mode > 300 && mode < 400) break;

	case 399:
		break;

L
Linus Torvalds 已提交
1435 1436 1437
	case 1000:
		test_available();
		break;
1438

L
Linus Torvalds 已提交
1439 1440 1441 1442 1443 1444 1445
	default:
		/* useful for debugging */
		printk("not testing anything\n");
		break;
	}
}

1446
static int __init init(void)
L
Linus Torvalds 已提交
1447 1448 1449 1450 1451 1452 1453 1454 1455 1456 1457 1458 1459 1460 1461
{
	tvmem = kmalloc(TVMEMSIZE, GFP_KERNEL);
	if (tvmem == NULL)
		return -ENOMEM;

	xbuf = kmalloc(XBUFSIZE, GFP_KERNEL);
	if (xbuf == NULL) {
		kfree(tvmem);
		return -ENOMEM;
	}

	do_test();

	kfree(xbuf);
	kfree(tvmem);
1462 1463 1464 1465 1466 1467 1468 1469

	/* We intentionaly return -EAGAIN to prevent keeping
	 * the module. It does all its work from init()
	 * and doesn't offer any runtime functionality 
	 * => we don't need it in the memory, do we?
	 *                                        -- mludvig
	 */
	return -EAGAIN;
L
Linus Torvalds 已提交
1470 1471 1472 1473 1474 1475 1476 1477 1478 1479 1480 1481
}

/*
 * If an init function is provided, an exit function must also be provided
 * to allow module unload.
 */
static void __exit fini(void) { }

module_init(init);
module_exit(fini);

module_param(mode, int, 0);
H
Harald Welte 已提交
1482
module_param(sec, uint, 0);
1483 1484
MODULE_PARM_DESC(sec, "Length in seconds of speed tests "
		      "(defaults to zero which uses CPU cycles instead)");
L
Linus Torvalds 已提交
1485 1486 1487 1488

MODULE_LICENSE("GPL");
MODULE_DESCRIPTION("Quick & dirty crypto testing module");
MODULE_AUTHOR("James Morris <jmorris@intercode.com.au>");