Merge branch 'for-linus' of git://git.kernel.org/pub/scm/linux/kernel/git/roland...
[linux-block.git] / crypto / tcrypt.c
... / ...
CommitLineData
1/*
2 * Quick & dirty crypto testing module.
3 *
4 * This will only exist until we have a better testing mechanism
5 * (e.g. a char device).
6 *
7 * Copyright (c) 2002 James Morris <jmorris@intercode.com.au>
8 * Copyright (c) 2002 Jean-Francois Dive <jef@linuxbe.org>
9 * Copyright (c) 2007 Nokia Siemens Networks
10 *
11 * This program is free software; you can redistribute it and/or modify it
12 * under the terms of the GNU General Public License as published by the Free
13 * Software Foundation; either version 2 of the License, or (at your option)
14 * any later version.
15 *
16 */
17
18#include <crypto/hash.h>
19#include <linux/err.h>
20#include <linux/init.h>
21#include <linux/module.h>
22#include <linux/slab.h>
23#include <linux/scatterlist.h>
24#include <linux/string.h>
25#include <linux/moduleparam.h>
26#include <linux/jiffies.h>
27#include <linux/timex.h>
28#include <linux/interrupt.h>
29#include "tcrypt.h"
30#include "internal.h"
31
32/*
33 * Need slab memory for testing (size in number of pages).
34 */
35#define TVMEMSIZE 4
36
37/*
38* Used by test_cipher_speed()
39*/
40#define ENCRYPT 1
41#define DECRYPT 0
42
43/*
44 * Used by test_cipher_speed()
45 */
46static unsigned int sec;
47
48static char *alg = NULL;
49static u32 type;
50static u32 mask;
51static int mode;
52static char *tvmem[TVMEMSIZE];
53
54static char *check[] = {
55 "des", "md5", "des3_ede", "rot13", "sha1", "sha224", "sha256",
56 "blowfish", "twofish", "serpent", "sha384", "sha512", "md4", "aes",
57 "cast6", "arc4", "michael_mic", "deflate", "crc32c", "tea", "xtea",
58 "khazad", "wp512", "wp384", "wp256", "tnepres", "xeta", "fcrypt",
59 "camellia", "seed", "salsa20", "rmd128", "rmd160", "rmd256", "rmd320",
60 "lzo", "cts", "zlib", NULL
61};
62
63static int test_cipher_jiffies(struct blkcipher_desc *desc, int enc,
64 struct scatterlist *sg, int blen, int sec)
65{
66 unsigned long start, end;
67 int bcount;
68 int ret;
69
70 for (start = jiffies, end = start + sec * HZ, bcount = 0;
71 time_before(jiffies, end); bcount++) {
72 if (enc)
73 ret = crypto_blkcipher_encrypt(desc, sg, sg, blen);
74 else
75 ret = crypto_blkcipher_decrypt(desc, sg, sg, blen);
76
77 if (ret)
78 return ret;
79 }
80
81 printk("%d operations in %d seconds (%ld bytes)\n",
82 bcount, sec, (long)bcount * blen);
83 return 0;
84}
85
86static int test_cipher_cycles(struct blkcipher_desc *desc, int enc,
87 struct scatterlist *sg, int blen)
88{
89 unsigned long cycles = 0;
90 int ret = 0;
91 int i;
92
93 local_bh_disable();
94 local_irq_disable();
95
96 /* Warm-up run. */
97 for (i = 0; i < 4; i++) {
98 if (enc)
99 ret = crypto_blkcipher_encrypt(desc, sg, sg, blen);
100 else
101 ret = crypto_blkcipher_decrypt(desc, sg, sg, blen);
102
103 if (ret)
104 goto out;
105 }
106
107 /* The real thing. */
108 for (i = 0; i < 8; i++) {
109 cycles_t start, end;
110
111 start = get_cycles();
112 if (enc)
113 ret = crypto_blkcipher_encrypt(desc, sg, sg, blen);
114 else
115 ret = crypto_blkcipher_decrypt(desc, sg, sg, blen);
116 end = get_cycles();
117
118 if (ret)
119 goto out;
120
121 cycles += end - start;
122 }
123
124out:
125 local_irq_enable();
126 local_bh_enable();
127
128 if (ret == 0)
129 printk("1 operation in %lu cycles (%d bytes)\n",
130 (cycles + 4) / 8, blen);
131
132 return ret;
133}
134
135static u32 block_sizes[] = { 16, 64, 256, 1024, 8192, 0 };
136
137static void test_cipher_speed(const char *algo, int enc, unsigned int sec,
138 struct cipher_speed_template *template,
139 unsigned int tcount, u8 *keysize)
140{
141 unsigned int ret, i, j, iv_len;
142 const char *key, iv[128];
143 struct crypto_blkcipher *tfm;
144 struct blkcipher_desc desc;
145 const char *e;
146 u32 *b_size;
147
148 if (enc == ENCRYPT)
149 e = "encryption";
150 else
151 e = "decryption";
152
153 printk("\ntesting speed of %s %s\n", algo, e);
154
155 tfm = crypto_alloc_blkcipher(algo, 0, CRYPTO_ALG_ASYNC);
156
157 if (IS_ERR(tfm)) {
158 printk("failed to load transform for %s: %ld\n", algo,
159 PTR_ERR(tfm));
160 return;
161 }
162 desc.tfm = tfm;
163 desc.flags = 0;
164
165 i = 0;
166 do {
167
168 b_size = block_sizes;
169 do {
170 struct scatterlist sg[TVMEMSIZE];
171
172 if ((*keysize + *b_size) > TVMEMSIZE * PAGE_SIZE) {
173 printk("template (%u) too big for "
174 "tvmem (%lu)\n", *keysize + *b_size,
175 TVMEMSIZE * PAGE_SIZE);
176 goto out;
177 }
178
179 printk("test %u (%d bit key, %d byte blocks): ", i,
180 *keysize * 8, *b_size);
181
182 memset(tvmem[0], 0xff, PAGE_SIZE);
183
184 /* set key, plain text and IV */
185 key = tvmem[0];
186 for (j = 0; j < tcount; j++) {
187 if (template[j].klen == *keysize) {
188 key = template[j].key;
189 break;
190 }
191 }
192
193 ret = crypto_blkcipher_setkey(tfm, key, *keysize);
194 if (ret) {
195 printk("setkey() failed flags=%x\n",
196 crypto_blkcipher_get_flags(tfm));
197 goto out;
198 }
199
200 sg_init_table(sg, TVMEMSIZE);
201 sg_set_buf(sg, tvmem[0] + *keysize,
202 PAGE_SIZE - *keysize);
203 for (j = 1; j < TVMEMSIZE; j++) {
204 sg_set_buf(sg + j, tvmem[j], PAGE_SIZE);
205 memset (tvmem[j], 0xff, PAGE_SIZE);
206 }
207
208 iv_len = crypto_blkcipher_ivsize(tfm);
209 if (iv_len) {
210 memset(&iv, 0xff, iv_len);
211 crypto_blkcipher_set_iv(tfm, iv, iv_len);
212 }
213
214 if (sec)
215 ret = test_cipher_jiffies(&desc, enc, sg,
216 *b_size, sec);
217 else
218 ret = test_cipher_cycles(&desc, enc, sg,
219 *b_size);
220
221 if (ret) {
222 printk("%s() failed flags=%x\n", e, desc.flags);
223 break;
224 }
225 b_size++;
226 i++;
227 } while (*b_size);
228 keysize++;
229 } while (*keysize);
230
231out:
232 crypto_free_blkcipher(tfm);
233}
234
235static int test_hash_jiffies_digest(struct hash_desc *desc,
236 struct scatterlist *sg, int blen,
237 char *out, int sec)
238{
239 unsigned long start, end;
240 int bcount;
241 int ret;
242
243 for (start = jiffies, end = start + sec * HZ, bcount = 0;
244 time_before(jiffies, end); bcount++) {
245 ret = crypto_hash_digest(desc, sg, blen, out);
246 if (ret)
247 return ret;
248 }
249
250 printk("%6u opers/sec, %9lu bytes/sec\n",
251 bcount / sec, ((long)bcount * blen) / sec);
252
253 return 0;
254}
255
256static int test_hash_jiffies(struct hash_desc *desc, struct scatterlist *sg,
257 int blen, int plen, char *out, int sec)
258{
259 unsigned long start, end;
260 int bcount, pcount;
261 int ret;
262
263 if (plen == blen)
264 return test_hash_jiffies_digest(desc, sg, blen, out, sec);
265
266 for (start = jiffies, end = start + sec * HZ, bcount = 0;
267 time_before(jiffies, end); bcount++) {
268 ret = crypto_hash_init(desc);
269 if (ret)
270 return ret;
271 for (pcount = 0; pcount < blen; pcount += plen) {
272 ret = crypto_hash_update(desc, sg, plen);
273 if (ret)
274 return ret;
275 }
276 /* we assume there is enough space in 'out' for the result */
277 ret = crypto_hash_final(desc, out);
278 if (ret)
279 return ret;
280 }
281
282 printk("%6u opers/sec, %9lu bytes/sec\n",
283 bcount / sec, ((long)bcount * blen) / sec);
284
285 return 0;
286}
287
288static int test_hash_cycles_digest(struct hash_desc *desc,
289 struct scatterlist *sg, int blen, char *out)
290{
291 unsigned long cycles = 0;
292 int i;
293 int ret;
294
295 local_bh_disable();
296 local_irq_disable();
297
298 /* Warm-up run. */
299 for (i = 0; i < 4; i++) {
300 ret = crypto_hash_digest(desc, sg, blen, out);
301 if (ret)
302 goto out;
303 }
304
305 /* The real thing. */
306 for (i = 0; i < 8; i++) {
307 cycles_t start, end;
308
309 start = get_cycles();
310
311 ret = crypto_hash_digest(desc, sg, blen, out);
312 if (ret)
313 goto out;
314
315 end = get_cycles();
316
317 cycles += end - start;
318 }
319
320out:
321 local_irq_enable();
322 local_bh_enable();
323
324 if (ret)
325 return ret;
326
327 printk("%6lu cycles/operation, %4lu cycles/byte\n",
328 cycles / 8, cycles / (8 * blen));
329
330 return 0;
331}
332
333static int test_hash_cycles(struct hash_desc *desc, struct scatterlist *sg,
334 int blen, int plen, char *out)
335{
336 unsigned long cycles = 0;
337 int i, pcount;
338 int ret;
339
340 if (plen == blen)
341 return test_hash_cycles_digest(desc, sg, blen, out);
342
343 local_bh_disable();
344 local_irq_disable();
345
346 /* Warm-up run. */
347 for (i = 0; i < 4; i++) {
348 ret = crypto_hash_init(desc);
349 if (ret)
350 goto out;
351 for (pcount = 0; pcount < blen; pcount += plen) {
352 ret = crypto_hash_update(desc, sg, plen);
353 if (ret)
354 goto out;
355 }
356 ret = crypto_hash_final(desc, out);
357 if (ret)
358 goto out;
359 }
360
361 /* The real thing. */
362 for (i = 0; i < 8; i++) {
363 cycles_t start, end;
364
365 start = get_cycles();
366
367 ret = crypto_hash_init(desc);
368 if (ret)
369 goto out;
370 for (pcount = 0; pcount < blen; pcount += plen) {
371 ret = crypto_hash_update(desc, sg, plen);
372 if (ret)
373 goto out;
374 }
375 ret = crypto_hash_final(desc, out);
376 if (ret)
377 goto out;
378
379 end = get_cycles();
380
381 cycles += end - start;
382 }
383
384out:
385 local_irq_enable();
386 local_bh_enable();
387
388 if (ret)
389 return ret;
390
391 printk("%6lu cycles/operation, %4lu cycles/byte\n",
392 cycles / 8, cycles / (8 * blen));
393
394 return 0;
395}
396
397static void test_hash_speed(const char *algo, unsigned int sec,
398 struct hash_speed *speed)
399{
400 struct scatterlist sg[TVMEMSIZE];
401 struct crypto_hash *tfm;
402 struct hash_desc desc;
403 static char output[1024];
404 int i;
405 int ret;
406
407 printk(KERN_INFO "\ntesting speed of %s\n", algo);
408
409 tfm = crypto_alloc_hash(algo, 0, CRYPTO_ALG_ASYNC);
410
411 if (IS_ERR(tfm)) {
412 printk(KERN_ERR "failed to load transform for %s: %ld\n", algo,
413 PTR_ERR(tfm));
414 return;
415 }
416
417 desc.tfm = tfm;
418 desc.flags = 0;
419
420 if (crypto_hash_digestsize(tfm) > sizeof(output)) {
421 printk(KERN_ERR "digestsize(%u) > outputbuffer(%zu)\n",
422 crypto_hash_digestsize(tfm), sizeof(output));
423 goto out;
424 }
425
426 sg_init_table(sg, TVMEMSIZE);
427 for (i = 0; i < TVMEMSIZE; i++) {
428 sg_set_buf(sg + i, tvmem[i], PAGE_SIZE);
429 memset(tvmem[i], 0xff, PAGE_SIZE);
430 }
431
432 for (i = 0; speed[i].blen != 0; i++) {
433 if (speed[i].blen > TVMEMSIZE * PAGE_SIZE) {
434 printk(KERN_ERR
435 "template (%u) too big for tvmem (%lu)\n",
436 speed[i].blen, TVMEMSIZE * PAGE_SIZE);
437 goto out;
438 }
439
440 printk(KERN_INFO "test%3u "
441 "(%5u byte blocks,%5u bytes per update,%4u updates): ",
442 i, speed[i].blen, speed[i].plen, speed[i].blen / speed[i].plen);
443
444 if (sec)
445 ret = test_hash_jiffies(&desc, sg, speed[i].blen,
446 speed[i].plen, output, sec);
447 else
448 ret = test_hash_cycles(&desc, sg, speed[i].blen,
449 speed[i].plen, output);
450
451 if (ret) {
452 printk(KERN_ERR "hashing failed ret=%d\n", ret);
453 break;
454 }
455 }
456
457out:
458 crypto_free_hash(tfm);
459}
460
461static void test_available(void)
462{
463 char **name = check;
464
465 while (*name) {
466 printk("alg %s ", *name);
467 printk(crypto_has_alg(*name, 0, 0) ?
468 "found\n" : "not found\n");
469 name++;
470 }
471}
472
473static inline int tcrypt_test(const char *alg)
474{
475 int ret;
476
477 ret = alg_test(alg, alg, 0, 0);
478 /* non-fips algs return -EINVAL in fips mode */
479 if (fips_enabled && ret == -EINVAL)
480 ret = 0;
481 return ret;
482}
483
484static int do_test(int m)
485{
486 int i;
487 int ret = 0;
488
489 switch (m) {
490 case 0:
491 for (i = 1; i < 200; i++)
492 ret += do_test(i);
493 break;
494
495 case 1:
496 ret += tcrypt_test("md5");
497 break;
498
499 case 2:
500 ret += tcrypt_test("sha1");
501 break;
502
503 case 3:
504 ret += tcrypt_test("ecb(des)");
505 ret += tcrypt_test("cbc(des)");
506 break;
507
508 case 4:
509 ret += tcrypt_test("ecb(des3_ede)");
510 ret += tcrypt_test("cbc(des3_ede)");
511 break;
512
513 case 5:
514 ret += tcrypt_test("md4");
515 break;
516
517 case 6:
518 ret += tcrypt_test("sha256");
519 break;
520
521 case 7:
522 ret += tcrypt_test("ecb(blowfish)");
523 ret += tcrypt_test("cbc(blowfish)");
524 break;
525
526 case 8:
527 ret += tcrypt_test("ecb(twofish)");
528 ret += tcrypt_test("cbc(twofish)");
529 break;
530
531 case 9:
532 ret += tcrypt_test("ecb(serpent)");
533 break;
534
535 case 10:
536 ret += tcrypt_test("ecb(aes)");
537 ret += tcrypt_test("cbc(aes)");
538 ret += tcrypt_test("lrw(aes)");
539 ret += tcrypt_test("xts(aes)");
540 ret += tcrypt_test("ctr(aes)");
541 ret += tcrypt_test("rfc3686(ctr(aes))");
542 break;
543
544 case 11:
545 ret += tcrypt_test("sha384");
546 break;
547
548 case 12:
549 ret += tcrypt_test("sha512");
550 break;
551
552 case 13:
553 ret += tcrypt_test("deflate");
554 break;
555
556 case 14:
557 ret += tcrypt_test("ecb(cast5)");
558 break;
559
560 case 15:
561 ret += tcrypt_test("ecb(cast6)");
562 break;
563
564 case 16:
565 ret += tcrypt_test("ecb(arc4)");
566 break;
567
568 case 17:
569 ret += tcrypt_test("michael_mic");
570 break;
571
572 case 18:
573 ret += tcrypt_test("crc32c");
574 break;
575
576 case 19:
577 ret += tcrypt_test("ecb(tea)");
578 break;
579
580 case 20:
581 ret += tcrypt_test("ecb(xtea)");
582 break;
583
584 case 21:
585 ret += tcrypt_test("ecb(khazad)");
586 break;
587
588 case 22:
589 ret += tcrypt_test("wp512");
590 break;
591
592 case 23:
593 ret += tcrypt_test("wp384");
594 break;
595
596 case 24:
597 ret += tcrypt_test("wp256");
598 break;
599
600 case 25:
601 ret += tcrypt_test("ecb(tnepres)");
602 break;
603
604 case 26:
605 ret += tcrypt_test("ecb(anubis)");
606 ret += tcrypt_test("cbc(anubis)");
607 break;
608
609 case 27:
610 ret += tcrypt_test("tgr192");
611 break;
612
613 case 28:
614
615 ret += tcrypt_test("tgr160");
616 break;
617
618 case 29:
619 ret += tcrypt_test("tgr128");
620 break;
621
622 case 30:
623 ret += tcrypt_test("ecb(xeta)");
624 break;
625
626 case 31:
627 ret += tcrypt_test("pcbc(fcrypt)");
628 break;
629
630 case 32:
631 ret += tcrypt_test("ecb(camellia)");
632 ret += tcrypt_test("cbc(camellia)");
633 break;
634 case 33:
635 ret += tcrypt_test("sha224");
636 break;
637
638 case 34:
639 ret += tcrypt_test("salsa20");
640 break;
641
642 case 35:
643 ret += tcrypt_test("gcm(aes)");
644 break;
645
646 case 36:
647 ret += tcrypt_test("lzo");
648 break;
649
650 case 37:
651 ret += tcrypt_test("ccm(aes)");
652 break;
653
654 case 38:
655 ret += tcrypt_test("cts(cbc(aes))");
656 break;
657
658 case 39:
659 ret += tcrypt_test("rmd128");
660 break;
661
662 case 40:
663 ret += tcrypt_test("rmd160");
664 break;
665
666 case 41:
667 ret += tcrypt_test("rmd256");
668 break;
669
670 case 42:
671 ret += tcrypt_test("rmd320");
672 break;
673
674 case 43:
675 ret += tcrypt_test("ecb(seed)");
676 break;
677
678 case 44:
679 ret += tcrypt_test("zlib");
680 break;
681
682 case 45:
683 ret += tcrypt_test("rfc4309(ccm(aes))");
684 break;
685
686 case 100:
687 ret += tcrypt_test("hmac(md5)");
688 break;
689
690 case 101:
691 ret += tcrypt_test("hmac(sha1)");
692 break;
693
694 case 102:
695 ret += tcrypt_test("hmac(sha256)");
696 break;
697
698 case 103:
699 ret += tcrypt_test("hmac(sha384)");
700 break;
701
702 case 104:
703 ret += tcrypt_test("hmac(sha512)");
704 break;
705
706 case 105:
707 ret += tcrypt_test("hmac(sha224)");
708 break;
709
710 case 106:
711 ret += tcrypt_test("xcbc(aes)");
712 break;
713
714 case 107:
715 ret += tcrypt_test("hmac(rmd128)");
716 break;
717
718 case 108:
719 ret += tcrypt_test("hmac(rmd160)");
720 break;
721
722 case 109:
723 ret += tcrypt_test("vmac(aes)");
724 break;
725
726 case 150:
727 ret += tcrypt_test("ansi_cprng");
728 break;
729
730 case 200:
731 test_cipher_speed("ecb(aes)", ENCRYPT, sec, NULL, 0,
732 speed_template_16_24_32);
733 test_cipher_speed("ecb(aes)", DECRYPT, sec, NULL, 0,
734 speed_template_16_24_32);
735 test_cipher_speed("cbc(aes)", ENCRYPT, sec, NULL, 0,
736 speed_template_16_24_32);
737 test_cipher_speed("cbc(aes)", DECRYPT, sec, NULL, 0,
738 speed_template_16_24_32);
739 test_cipher_speed("lrw(aes)", ENCRYPT, sec, NULL, 0,
740 speed_template_32_40_48);
741 test_cipher_speed("lrw(aes)", DECRYPT, sec, NULL, 0,
742 speed_template_32_40_48);
743 test_cipher_speed("xts(aes)", ENCRYPT, sec, NULL, 0,
744 speed_template_32_48_64);
745 test_cipher_speed("xts(aes)", DECRYPT, sec, NULL, 0,
746 speed_template_32_48_64);
747 break;
748
749 case 201:
750 test_cipher_speed("ecb(des3_ede)", ENCRYPT, sec,
751 des3_speed_template, DES3_SPEED_VECTORS,
752 speed_template_24);
753 test_cipher_speed("ecb(des3_ede)", DECRYPT, sec,
754 des3_speed_template, DES3_SPEED_VECTORS,
755 speed_template_24);
756 test_cipher_speed("cbc(des3_ede)", ENCRYPT, sec,
757 des3_speed_template, DES3_SPEED_VECTORS,
758 speed_template_24);
759 test_cipher_speed("cbc(des3_ede)", DECRYPT, sec,
760 des3_speed_template, DES3_SPEED_VECTORS,
761 speed_template_24);
762 break;
763
764 case 202:
765 test_cipher_speed("ecb(twofish)", ENCRYPT, sec, NULL, 0,
766 speed_template_16_24_32);
767 test_cipher_speed("ecb(twofish)", DECRYPT, sec, NULL, 0,
768 speed_template_16_24_32);
769 test_cipher_speed("cbc(twofish)", ENCRYPT, sec, NULL, 0,
770 speed_template_16_24_32);
771 test_cipher_speed("cbc(twofish)", DECRYPT, sec, NULL, 0,
772 speed_template_16_24_32);
773 break;
774
775 case 203:
776 test_cipher_speed("ecb(blowfish)", ENCRYPT, sec, NULL, 0,
777 speed_template_8_32);
778 test_cipher_speed("ecb(blowfish)", DECRYPT, sec, NULL, 0,
779 speed_template_8_32);
780 test_cipher_speed("cbc(blowfish)", ENCRYPT, sec, NULL, 0,
781 speed_template_8_32);
782 test_cipher_speed("cbc(blowfish)", DECRYPT, sec, NULL, 0,
783 speed_template_8_32);
784 break;
785
786 case 204:
787 test_cipher_speed("ecb(des)", ENCRYPT, sec, NULL, 0,
788 speed_template_8);
789 test_cipher_speed("ecb(des)", DECRYPT, sec, NULL, 0,
790 speed_template_8);
791 test_cipher_speed("cbc(des)", ENCRYPT, sec, NULL, 0,
792 speed_template_8);
793 test_cipher_speed("cbc(des)", DECRYPT, sec, NULL, 0,
794 speed_template_8);
795 break;
796
797 case 205:
798 test_cipher_speed("ecb(camellia)", ENCRYPT, sec, NULL, 0,
799 speed_template_16_24_32);
800 test_cipher_speed("ecb(camellia)", DECRYPT, sec, NULL, 0,
801 speed_template_16_24_32);
802 test_cipher_speed("cbc(camellia)", ENCRYPT, sec, NULL, 0,
803 speed_template_16_24_32);
804 test_cipher_speed("cbc(camellia)", DECRYPT, sec, NULL, 0,
805 speed_template_16_24_32);
806 break;
807
808 case 206:
809 test_cipher_speed("salsa20", ENCRYPT, sec, NULL, 0,
810 speed_template_16_32);
811 break;
812
813 case 300:
814 /* fall through */
815
816 case 301:
817 test_hash_speed("md4", sec, generic_hash_speed_template);
818 if (mode > 300 && mode < 400) break;
819
820 case 302:
821 test_hash_speed("md5", sec, generic_hash_speed_template);
822 if (mode > 300 && mode < 400) break;
823
824 case 303:
825 test_hash_speed("sha1", sec, generic_hash_speed_template);
826 if (mode > 300 && mode < 400) break;
827
828 case 304:
829 test_hash_speed("sha256", sec, generic_hash_speed_template);
830 if (mode > 300 && mode < 400) break;
831
832 case 305:
833 test_hash_speed("sha384", sec, generic_hash_speed_template);
834 if (mode > 300 && mode < 400) break;
835
836 case 306:
837 test_hash_speed("sha512", sec, generic_hash_speed_template);
838 if (mode > 300 && mode < 400) break;
839
840 case 307:
841 test_hash_speed("wp256", sec, generic_hash_speed_template);
842 if (mode > 300 && mode < 400) break;
843
844 case 308:
845 test_hash_speed("wp384", sec, generic_hash_speed_template);
846 if (mode > 300 && mode < 400) break;
847
848 case 309:
849 test_hash_speed("wp512", sec, generic_hash_speed_template);
850 if (mode > 300 && mode < 400) break;
851
852 case 310:
853 test_hash_speed("tgr128", sec, generic_hash_speed_template);
854 if (mode > 300 && mode < 400) break;
855
856 case 311:
857 test_hash_speed("tgr160", sec, generic_hash_speed_template);
858 if (mode > 300 && mode < 400) break;
859
860 case 312:
861 test_hash_speed("tgr192", sec, generic_hash_speed_template);
862 if (mode > 300 && mode < 400) break;
863
864 case 313:
865 test_hash_speed("sha224", sec, generic_hash_speed_template);
866 if (mode > 300 && mode < 400) break;
867
868 case 314:
869 test_hash_speed("rmd128", sec, generic_hash_speed_template);
870 if (mode > 300 && mode < 400) break;
871
872 case 315:
873 test_hash_speed("rmd160", sec, generic_hash_speed_template);
874 if (mode > 300 && mode < 400) break;
875
876 case 316:
877 test_hash_speed("rmd256", sec, generic_hash_speed_template);
878 if (mode > 300 && mode < 400) break;
879
880 case 317:
881 test_hash_speed("rmd320", sec, generic_hash_speed_template);
882 if (mode > 300 && mode < 400) break;
883
884 case 399:
885 break;
886
887 case 1000:
888 test_available();
889 break;
890 }
891
892 return ret;
893}
894
895static int do_alg_test(const char *alg, u32 type, u32 mask)
896{
897 return crypto_has_alg(alg, type, mask ?: CRYPTO_ALG_TYPE_MASK) ?
898 0 : -ENOENT;
899}
900
901static int __init tcrypt_mod_init(void)
902{
903 int err = -ENOMEM;
904 int i;
905
906 for (i = 0; i < TVMEMSIZE; i++) {
907 tvmem[i] = (void *)__get_free_page(GFP_KERNEL);
908 if (!tvmem[i])
909 goto err_free_tv;
910 }
911
912 if (alg)
913 err = do_alg_test(alg, type, mask);
914 else
915 err = do_test(mode);
916
917 if (err) {
918 printk(KERN_ERR "tcrypt: one or more tests failed!\n");
919 goto err_free_tv;
920 }
921
922 /* We intentionaly return -EAGAIN to prevent keeping the module,
923 * unless we're running in fips mode. It does all its work from
924 * init() and doesn't offer any runtime functionality, but in
925 * the fips case, checking for a successful load is helpful.
926 * => we don't need it in the memory, do we?
927 * -- mludvig
928 */
929 if (!fips_enabled)
930 err = -EAGAIN;
931
932err_free_tv:
933 for (i = 0; i < TVMEMSIZE && tvmem[i]; i++)
934 free_page((unsigned long)tvmem[i]);
935
936 return err;
937}
938
939/*
940 * If an init function is provided, an exit function must also be provided
941 * to allow module unload.
942 */
943static void __exit tcrypt_mod_fini(void) { }
944
945module_init(tcrypt_mod_init);
946module_exit(tcrypt_mod_fini);
947
948module_param(alg, charp, 0);
949module_param(type, uint, 0);
950module_param(mask, uint, 0);
951module_param(mode, int, 0);
952module_param(sec, uint, 0);
953MODULE_PARM_DESC(sec, "Length in seconds of speed tests "
954 "(defaults to zero which uses CPU cycles instead)");
955
956MODULE_LICENSE("GPL");
957MODULE_DESCRIPTION("Quick & dirty crypto testing module");
958MODULE_AUTHOR("James Morris <jmorris@intercode.com.au>");