blob: 0c4e80f34651bd01dabaed7632a42922fa3dca7e [file] [log] [blame]
Herbert Xuef2736f2005-06-22 13:26:03 -07001/*
Linus Torvalds1da177e2005-04-16 15:20:36 -07002 * 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>
Mikko Herranene3a4ea42007-11-26 22:12:07 +08009 * Copyright (c) 2007 Nokia Siemens Networks
Linus Torvalds1da177e2005-04-16 15:20:36 -070010 *
Adrian Hoban69435b92010-11-04 15:02:04 -040011 * Updated RFC4106 AES-GCM testing.
12 * Authors: Aidan O'Mahony (aidan.o.mahony@intel.com)
13 * Adrian Hoban <adrian.hoban@intel.com>
14 * Gabriele Paoloni <gabriele.paoloni@intel.com>
15 * Tadeusz Struk (tadeusz.struk@intel.com)
16 * Copyright (c) 2010, Intel Corporation.
17 *
Linus Torvalds1da177e2005-04-16 15:20:36 -070018 * This program is free software; you can redistribute it and/or modify it
19 * under the terms of the GNU General Public License as published by the Free
Herbert Xuef2736f2005-06-22 13:26:03 -070020 * Software Foundation; either version 2 of the License, or (at your option)
Linus Torvalds1da177e2005-04-16 15:20:36 -070021 * any later version.
22 *
Linus Torvalds1da177e2005-04-16 15:20:36 -070023 */
24
Herbert Xu18e33e62008-07-10 16:01:22 +080025#include <crypto/hash.h>
Herbert Xucba83562006-08-13 08:26:09 +100026#include <linux/err.h>
Linus Torvalds1da177e2005-04-16 15:20:36 -070027#include <linux/init.h>
Tejun Heo5a0e3ad2010-03-24 17:04:11 +090028#include <linux/gfp.h>
Linus Torvalds1da177e2005-04-16 15:20:36 -070029#include <linux/module.h>
David Hardeman378f0582005-09-17 17:55:31 +100030#include <linux/scatterlist.h>
Linus Torvalds1da177e2005-04-16 15:20:36 -070031#include <linux/string.h>
Linus Torvalds1da177e2005-04-16 15:20:36 -070032#include <linux/moduleparam.h>
Harald Welteebfd9bc2005-06-22 13:27:23 -070033#include <linux/jiffies.h>
Herbert Xu6a179442005-06-22 13:29:03 -070034#include <linux/timex.h>
35#include <linux/interrupt.h>
Linus Torvalds1da177e2005-04-16 15:20:36 -070036#include "tcrypt.h"
Jarod Wilson4e033a62009-05-27 15:10:21 +100037#include "internal.h"
Linus Torvalds1da177e2005-04-16 15:20:36 -070038
39/*
Herbert Xuf139cfa2008-07-31 12:23:53 +080040 * Need slab memory for testing (size in number of pages).
Linus Torvalds1da177e2005-04-16 15:20:36 -070041 */
Herbert Xuf139cfa2008-07-31 12:23:53 +080042#define TVMEMSIZE 4
Linus Torvalds1da177e2005-04-16 15:20:36 -070043
44/*
Herbert Xuda7f0332008-07-31 17:08:25 +080045* Used by test_cipher_speed()
Linus Torvalds1da177e2005-04-16 15:20:36 -070046*/
47#define ENCRYPT 1
48#define DECRYPT 0
Linus Torvalds1da177e2005-04-16 15:20:36 -070049
Harald Welteebfd9bc2005-06-22 13:27:23 -070050/*
51 * Used by test_cipher_speed()
52 */
Herbert Xu6a179442005-06-22 13:29:03 -070053static unsigned int sec;
Harald Welteebfd9bc2005-06-22 13:27:23 -070054
Steffen Klasserta873a5f2009-06-19 19:46:53 +080055static char *alg = NULL;
56static u32 type;
Herbert Xu7be380f2009-07-14 16:06:54 +080057static u32 mask;
Linus Torvalds1da177e2005-04-16 15:20:36 -070058static int mode;
Herbert Xuf139cfa2008-07-31 12:23:53 +080059static char *tvmem[TVMEMSIZE];
Linus Torvalds1da177e2005-04-16 15:20:36 -070060
61static char *check[] = {
Jonathan Lynchcd12fb92007-11-10 20:08:25 +080062 "des", "md5", "des3_ede", "rot13", "sha1", "sha224", "sha256",
63 "blowfish", "twofish", "serpent", "sha384", "sha512", "md4", "aes",
64 "cast6", "arc4", "michael_mic", "deflate", "crc32c", "tea", "xtea",
David Howells90831632006-12-16 12:13:14 +110065 "khazad", "wp512", "wp384", "wp256", "tnepres", "xeta", "fcrypt",
Adrian-Ken Rueegsegger2998db32008-05-09 21:29:35 +080066 "camellia", "seed", "salsa20", "rmd128", "rmd160", "rmd256", "rmd320",
Geert Uytterhoeven0c01aed2009-03-04 15:42:15 +080067 "lzo", "cts", "zlib", NULL
Linus Torvalds1da177e2005-04-16 15:20:36 -070068};
69
Herbert Xuf139cfa2008-07-31 12:23:53 +080070static int test_cipher_jiffies(struct blkcipher_desc *desc, int enc,
71 struct scatterlist *sg, int blen, int sec)
Herbert Xu6a179442005-06-22 13:29:03 -070072{
Herbert Xu6a179442005-06-22 13:29:03 -070073 unsigned long start, end;
74 int bcount;
75 int ret;
76
Herbert Xu6a179442005-06-22 13:29:03 -070077 for (start = jiffies, end = start + sec * HZ, bcount = 0;
78 time_before(jiffies, end); bcount++) {
79 if (enc)
Herbert Xucba83562006-08-13 08:26:09 +100080 ret = crypto_blkcipher_encrypt(desc, sg, sg, blen);
Herbert Xu6a179442005-06-22 13:29:03 -070081 else
Herbert Xucba83562006-08-13 08:26:09 +100082 ret = crypto_blkcipher_decrypt(desc, sg, sg, blen);
Herbert Xu6a179442005-06-22 13:29:03 -070083
84 if (ret)
85 return ret;
86 }
87
88 printk("%d operations in %d seconds (%ld bytes)\n",
89 bcount, sec, (long)bcount * blen);
90 return 0;
91}
92
Herbert Xuf139cfa2008-07-31 12:23:53 +080093static int test_cipher_cycles(struct blkcipher_desc *desc, int enc,
94 struct scatterlist *sg, int blen)
Herbert Xu6a179442005-06-22 13:29:03 -070095{
Herbert Xu6a179442005-06-22 13:29:03 -070096 unsigned long cycles = 0;
97 int ret = 0;
98 int i;
99
Herbert Xu6a179442005-06-22 13:29:03 -0700100 local_bh_disable();
101 local_irq_disable();
102
103 /* Warm-up run. */
104 for (i = 0; i < 4; i++) {
105 if (enc)
Herbert Xucba83562006-08-13 08:26:09 +1000106 ret = crypto_blkcipher_encrypt(desc, sg, sg, blen);
Herbert Xu6a179442005-06-22 13:29:03 -0700107 else
Herbert Xucba83562006-08-13 08:26:09 +1000108 ret = crypto_blkcipher_decrypt(desc, sg, sg, blen);
Herbert Xu6a179442005-06-22 13:29:03 -0700109
110 if (ret)
111 goto out;
112 }
113
114 /* The real thing. */
115 for (i = 0; i < 8; i++) {
116 cycles_t start, end;
117
118 start = get_cycles();
119 if (enc)
Herbert Xucba83562006-08-13 08:26:09 +1000120 ret = crypto_blkcipher_encrypt(desc, sg, sg, blen);
Herbert Xu6a179442005-06-22 13:29:03 -0700121 else
Herbert Xucba83562006-08-13 08:26:09 +1000122 ret = crypto_blkcipher_decrypt(desc, sg, sg, blen);
Herbert Xu6a179442005-06-22 13:29:03 -0700123 end = get_cycles();
124
125 if (ret)
126 goto out;
127
128 cycles += end - start;
129 }
130
131out:
132 local_irq_enable();
133 local_bh_enable();
134
135 if (ret == 0)
136 printk("1 operation in %lu cycles (%d bytes)\n",
137 (cycles + 4) / 8, blen);
138
139 return ret;
140}
141
Sebastian Siewiord5dc3922008-03-11 21:27:11 +0800142static u32 block_sizes[] = { 16, 64, 256, 1024, 8192, 0 };
143
Herbert Xu01b32322008-07-31 15:41:55 +0800144static void test_cipher_speed(const char *algo, int enc, unsigned int sec,
Herbert Xuda7f0332008-07-31 17:08:25 +0800145 struct cipher_speed_template *template,
Sebastian Siewiord5dc3922008-03-11 21:27:11 +0800146 unsigned int tcount, u8 *keysize)
Harald Welteebfd9bc2005-06-22 13:27:23 -0700147{
Herbert Xudce907c2005-06-22 13:27:51 -0700148 unsigned int ret, i, j, iv_len;
David Sterbaf07ef1d2011-03-04 15:28:52 +0800149 const char *key;
150 char iv[128];
Herbert Xucba83562006-08-13 08:26:09 +1000151 struct crypto_blkcipher *tfm;
152 struct blkcipher_desc desc;
153 const char *e;
Sebastian Siewiord5dc3922008-03-11 21:27:11 +0800154 u32 *b_size;
Harald Welteebfd9bc2005-06-22 13:27:23 -0700155
156 if (enc == ENCRYPT)
157 e = "encryption";
158 else
159 e = "decryption";
Harald Welteebfd9bc2005-06-22 13:27:23 -0700160
Herbert Xucba83562006-08-13 08:26:09 +1000161 printk("\ntesting speed of %s %s\n", algo, e);
Harald Welteebfd9bc2005-06-22 13:27:23 -0700162
Herbert Xucba83562006-08-13 08:26:09 +1000163 tfm = crypto_alloc_blkcipher(algo, 0, CRYPTO_ALG_ASYNC);
Harald Welteebfd9bc2005-06-22 13:27:23 -0700164
Herbert Xucba83562006-08-13 08:26:09 +1000165 if (IS_ERR(tfm)) {
166 printk("failed to load transform for %s: %ld\n", algo,
167 PTR_ERR(tfm));
Harald Welteebfd9bc2005-06-22 13:27:23 -0700168 return;
169 }
Herbert Xucba83562006-08-13 08:26:09 +1000170 desc.tfm = tfm;
171 desc.flags = 0;
Harald Welteebfd9bc2005-06-22 13:27:23 -0700172
Sebastian Siewiord5dc3922008-03-11 21:27:11 +0800173 i = 0;
174 do {
Harald Welteebfd9bc2005-06-22 13:27:23 -0700175
Sebastian Siewiord5dc3922008-03-11 21:27:11 +0800176 b_size = block_sizes;
177 do {
Herbert Xuf139cfa2008-07-31 12:23:53 +0800178 struct scatterlist sg[TVMEMSIZE];
Harald Welteebfd9bc2005-06-22 13:27:23 -0700179
Herbert Xuf139cfa2008-07-31 12:23:53 +0800180 if ((*keysize + *b_size) > TVMEMSIZE * PAGE_SIZE) {
181 printk("template (%u) too big for "
182 "tvmem (%lu)\n", *keysize + *b_size,
183 TVMEMSIZE * PAGE_SIZE);
Sebastian Siewiord5dc3922008-03-11 21:27:11 +0800184 goto out;
185 }
Harald Welteebfd9bc2005-06-22 13:27:23 -0700186
Sebastian Siewiord5dc3922008-03-11 21:27:11 +0800187 printk("test %u (%d bit key, %d byte blocks): ", i,
188 *keysize * 8, *b_size);
189
Herbert Xuf139cfa2008-07-31 12:23:53 +0800190 memset(tvmem[0], 0xff, PAGE_SIZE);
Sebastian Siewiord5dc3922008-03-11 21:27:11 +0800191
192 /* set key, plain text and IV */
Herbert Xuda7f0332008-07-31 17:08:25 +0800193 key = tvmem[0];
Sebastian Siewiord5dc3922008-03-11 21:27:11 +0800194 for (j = 0; j < tcount; j++) {
195 if (template[j].klen == *keysize) {
196 key = template[j].key;
197 break;
198 }
199 }
Sebastian Siewiord5dc3922008-03-11 21:27:11 +0800200
201 ret = crypto_blkcipher_setkey(tfm, key, *keysize);
202 if (ret) {
203 printk("setkey() failed flags=%x\n",
204 crypto_blkcipher_get_flags(tfm));
205 goto out;
206 }
207
Herbert Xuf139cfa2008-07-31 12:23:53 +0800208 sg_init_table(sg, TVMEMSIZE);
209 sg_set_buf(sg, tvmem[0] + *keysize,
210 PAGE_SIZE - *keysize);
211 for (j = 1; j < TVMEMSIZE; j++) {
212 sg_set_buf(sg + j, tvmem[j], PAGE_SIZE);
213 memset (tvmem[j], 0xff, PAGE_SIZE);
214 }
215
Sebastian Siewiord5dc3922008-03-11 21:27:11 +0800216 iv_len = crypto_blkcipher_ivsize(tfm);
217 if (iv_len) {
218 memset(&iv, 0xff, iv_len);
219 crypto_blkcipher_set_iv(tfm, iv, iv_len);
220 }
221
222 if (sec)
Herbert Xuf139cfa2008-07-31 12:23:53 +0800223 ret = test_cipher_jiffies(&desc, enc, sg,
224 *b_size, sec);
Sebastian Siewiord5dc3922008-03-11 21:27:11 +0800225 else
Herbert Xuf139cfa2008-07-31 12:23:53 +0800226 ret = test_cipher_cycles(&desc, enc, sg,
227 *b_size);
Sebastian Siewiord5dc3922008-03-11 21:27:11 +0800228
229 if (ret) {
230 printk("%s() failed flags=%x\n", e, desc.flags);
Herbert Xudce907c2005-06-22 13:27:51 -0700231 break;
232 }
Sebastian Siewiord5dc3922008-03-11 21:27:11 +0800233 b_size++;
234 i++;
235 } while (*b_size);
236 keysize++;
237 } while (*keysize);
Harald Welteebfd9bc2005-06-22 13:27:23 -0700238
239out:
Herbert Xucba83562006-08-13 08:26:09 +1000240 crypto_free_blkcipher(tfm);
Harald Welteebfd9bc2005-06-22 13:27:23 -0700241}
242
Herbert Xuf139cfa2008-07-31 12:23:53 +0800243static int test_hash_jiffies_digest(struct hash_desc *desc,
244 struct scatterlist *sg, int blen,
Herbert Xue9d41162006-08-19 21:38:49 +1000245 char *out, int sec)
Michal Ludvige8057922006-05-30 22:04:19 +1000246{
Michal Ludvige8057922006-05-30 22:04:19 +1000247 unsigned long start, end;
Herbert Xue9d41162006-08-19 21:38:49 +1000248 int bcount;
249 int ret;
Michal Ludvige8057922006-05-30 22:04:19 +1000250
251 for (start = jiffies, end = start + sec * HZ, bcount = 0;
252 time_before(jiffies, end); bcount++) {
Herbert Xue9d41162006-08-19 21:38:49 +1000253 ret = crypto_hash_digest(desc, sg, blen, out);
254 if (ret)
255 return ret;
Michal Ludvige8057922006-05-30 22:04:19 +1000256 }
257
258 printk("%6u opers/sec, %9lu bytes/sec\n",
259 bcount / sec, ((long)bcount * blen) / sec);
260
Herbert Xue9d41162006-08-19 21:38:49 +1000261 return 0;
Michal Ludvige8057922006-05-30 22:04:19 +1000262}
263
Herbert Xuf139cfa2008-07-31 12:23:53 +0800264static int test_hash_jiffies(struct hash_desc *desc, struct scatterlist *sg,
265 int blen, int plen, char *out, int sec)
Herbert Xue9d41162006-08-19 21:38:49 +1000266{
Herbert Xue9d41162006-08-19 21:38:49 +1000267 unsigned long start, end;
268 int bcount, pcount;
269 int ret;
270
271 if (plen == blen)
Herbert Xuf139cfa2008-07-31 12:23:53 +0800272 return test_hash_jiffies_digest(desc, sg, blen, out, sec);
Herbert Xua5a613a2007-10-27 00:51:21 -0700273
Herbert Xue9d41162006-08-19 21:38:49 +1000274 for (start = jiffies, end = start + sec * HZ, bcount = 0;
275 time_before(jiffies, end); bcount++) {
276 ret = crypto_hash_init(desc);
277 if (ret)
278 return ret;
279 for (pcount = 0; pcount < blen; pcount += plen) {
Herbert Xue9d41162006-08-19 21:38:49 +1000280 ret = crypto_hash_update(desc, sg, plen);
281 if (ret)
282 return ret;
283 }
284 /* we assume there is enough space in 'out' for the result */
285 ret = crypto_hash_final(desc, out);
286 if (ret)
287 return ret;
288 }
289
290 printk("%6u opers/sec, %9lu bytes/sec\n",
291 bcount / sec, ((long)bcount * blen) / sec);
292
293 return 0;
294}
295
Herbert Xuf139cfa2008-07-31 12:23:53 +0800296static int test_hash_cycles_digest(struct hash_desc *desc,
297 struct scatterlist *sg, int blen, char *out)
Michal Ludvige8057922006-05-30 22:04:19 +1000298{
Michal Ludvige8057922006-05-30 22:04:19 +1000299 unsigned long cycles = 0;
Herbert Xue9d41162006-08-19 21:38:49 +1000300 int i;
301 int ret;
Michal Ludvige8057922006-05-30 22:04:19 +1000302
303 local_bh_disable();
304 local_irq_disable();
305
306 /* Warm-up run. */
307 for (i = 0; i < 4; i++) {
Herbert Xue9d41162006-08-19 21:38:49 +1000308 ret = crypto_hash_digest(desc, sg, blen, out);
309 if (ret)
310 goto out;
Michal Ludvige8057922006-05-30 22:04:19 +1000311 }
312
313 /* The real thing. */
314 for (i = 0; i < 8; i++) {
315 cycles_t start, end;
316
Michal Ludvige8057922006-05-30 22:04:19 +1000317 start = get_cycles();
318
Herbert Xue9d41162006-08-19 21:38:49 +1000319 ret = crypto_hash_digest(desc, sg, blen, out);
320 if (ret)
321 goto out;
Michal Ludvige8057922006-05-30 22:04:19 +1000322
323 end = get_cycles();
324
325 cycles += end - start;
326 }
327
Herbert Xue9d41162006-08-19 21:38:49 +1000328out:
Michal Ludvige8057922006-05-30 22:04:19 +1000329 local_irq_enable();
330 local_bh_enable();
331
Herbert Xue9d41162006-08-19 21:38:49 +1000332 if (ret)
333 return ret;
334
Michal Ludvige8057922006-05-30 22:04:19 +1000335 printk("%6lu cycles/operation, %4lu cycles/byte\n",
336 cycles / 8, cycles / (8 * blen));
337
Herbert Xue9d41162006-08-19 21:38:49 +1000338 return 0;
Michal Ludvige8057922006-05-30 22:04:19 +1000339}
340
Herbert Xuf139cfa2008-07-31 12:23:53 +0800341static int test_hash_cycles(struct hash_desc *desc, struct scatterlist *sg,
342 int blen, int plen, char *out)
Michal Ludvige8057922006-05-30 22:04:19 +1000343{
Herbert Xue9d41162006-08-19 21:38:49 +1000344 unsigned long cycles = 0;
345 int i, pcount;
346 int ret;
347
348 if (plen == blen)
Herbert Xuf139cfa2008-07-31 12:23:53 +0800349 return test_hash_cycles_digest(desc, sg, blen, out);
Herbert Xua5a613a2007-10-27 00:51:21 -0700350
Herbert Xue9d41162006-08-19 21:38:49 +1000351 local_bh_disable();
352 local_irq_disable();
353
354 /* Warm-up run. */
355 for (i = 0; i < 4; i++) {
356 ret = crypto_hash_init(desc);
357 if (ret)
358 goto out;
359 for (pcount = 0; pcount < blen; pcount += plen) {
Herbert Xue9d41162006-08-19 21:38:49 +1000360 ret = crypto_hash_update(desc, sg, plen);
361 if (ret)
362 goto out;
363 }
Herbert Xu29059d12007-05-18 16:25:19 +1000364 ret = crypto_hash_final(desc, out);
Herbert Xue9d41162006-08-19 21:38:49 +1000365 if (ret)
366 goto out;
367 }
368
369 /* The real thing. */
370 for (i = 0; i < 8; i++) {
371 cycles_t start, end;
372
373 start = get_cycles();
374
375 ret = crypto_hash_init(desc);
376 if (ret)
377 goto out;
378 for (pcount = 0; pcount < blen; pcount += plen) {
Herbert Xue9d41162006-08-19 21:38:49 +1000379 ret = crypto_hash_update(desc, sg, plen);
380 if (ret)
381 goto out;
382 }
383 ret = crypto_hash_final(desc, out);
384 if (ret)
385 goto out;
386
387 end = get_cycles();
388
389 cycles += end - start;
390 }
391
392out:
393 local_irq_enable();
394 local_bh_enable();
395
396 if (ret)
397 return ret;
398
399 printk("%6lu cycles/operation, %4lu cycles/byte\n",
400 cycles / 8, cycles / (8 * blen));
401
402 return 0;
403}
404
David S. Millerbeb63da2010-05-19 14:11:21 +1000405static void test_hash_sg_init(struct scatterlist *sg)
406{
407 int i;
408
409 sg_init_table(sg, TVMEMSIZE);
410 for (i = 0; i < TVMEMSIZE; i++) {
411 sg_set_buf(sg + i, tvmem[i], PAGE_SIZE);
412 memset(tvmem[i], 0xff, PAGE_SIZE);
413 }
414}
415
Herbert Xu01b32322008-07-31 15:41:55 +0800416static void test_hash_speed(const char *algo, unsigned int sec,
417 struct hash_speed *speed)
Herbert Xue9d41162006-08-19 21:38:49 +1000418{
Herbert Xuf139cfa2008-07-31 12:23:53 +0800419 struct scatterlist sg[TVMEMSIZE];
Herbert Xue9d41162006-08-19 21:38:49 +1000420 struct crypto_hash *tfm;
421 struct hash_desc desc;
Frank Seidel376bacb2009-03-29 15:18:39 +0800422 static char output[1024];
Michal Ludvige8057922006-05-30 22:04:19 +1000423 int i;
Herbert Xue9d41162006-08-19 21:38:49 +1000424 int ret;
Michal Ludvige8057922006-05-30 22:04:19 +1000425
Frank Seidel376bacb2009-03-29 15:18:39 +0800426 printk(KERN_INFO "\ntesting speed of %s\n", algo);
Michal Ludvige8057922006-05-30 22:04:19 +1000427
Herbert Xue9d41162006-08-19 21:38:49 +1000428 tfm = crypto_alloc_hash(algo, 0, CRYPTO_ALG_ASYNC);
Michal Ludvige8057922006-05-30 22:04:19 +1000429
Herbert Xue9d41162006-08-19 21:38:49 +1000430 if (IS_ERR(tfm)) {
Frank Seidel376bacb2009-03-29 15:18:39 +0800431 printk(KERN_ERR "failed to load transform for %s: %ld\n", algo,
Herbert Xue9d41162006-08-19 21:38:49 +1000432 PTR_ERR(tfm));
Michal Ludvige8057922006-05-30 22:04:19 +1000433 return;
434 }
435
Herbert Xue9d41162006-08-19 21:38:49 +1000436 desc.tfm = tfm;
437 desc.flags = 0;
438
439 if (crypto_hash_digestsize(tfm) > sizeof(output)) {
Frank Seidel376bacb2009-03-29 15:18:39 +0800440 printk(KERN_ERR "digestsize(%u) > outputbuffer(%zu)\n",
Herbert Xue9d41162006-08-19 21:38:49 +1000441 crypto_hash_digestsize(tfm), sizeof(output));
Michal Ludvige8057922006-05-30 22:04:19 +1000442 goto out;
443 }
444
David S. Millerbeb63da2010-05-19 14:11:21 +1000445 test_hash_sg_init(sg);
Michal Ludvige8057922006-05-30 22:04:19 +1000446 for (i = 0; speed[i].blen != 0; i++) {
Herbert Xuf139cfa2008-07-31 12:23:53 +0800447 if (speed[i].blen > TVMEMSIZE * PAGE_SIZE) {
Frank Seidel376bacb2009-03-29 15:18:39 +0800448 printk(KERN_ERR
449 "template (%u) too big for tvmem (%lu)\n",
Herbert Xuf139cfa2008-07-31 12:23:53 +0800450 speed[i].blen, TVMEMSIZE * PAGE_SIZE);
Michal Ludvige8057922006-05-30 22:04:19 +1000451 goto out;
452 }
453
Huang Ying18bcc912010-03-10 18:30:32 +0800454 if (speed[i].klen)
455 crypto_hash_setkey(tfm, tvmem[0], speed[i].klen);
456
Frank Seidel376bacb2009-03-29 15:18:39 +0800457 printk(KERN_INFO "test%3u "
458 "(%5u byte blocks,%5u bytes per update,%4u updates): ",
Michal Ludvige8057922006-05-30 22:04:19 +1000459 i, speed[i].blen, speed[i].plen, speed[i].blen / speed[i].plen);
460
Michal Ludvige8057922006-05-30 22:04:19 +1000461 if (sec)
Herbert Xuf139cfa2008-07-31 12:23:53 +0800462 ret = test_hash_jiffies(&desc, sg, speed[i].blen,
Herbert Xue9d41162006-08-19 21:38:49 +1000463 speed[i].plen, output, sec);
Michal Ludvige8057922006-05-30 22:04:19 +1000464 else
Herbert Xuf139cfa2008-07-31 12:23:53 +0800465 ret = test_hash_cycles(&desc, sg, speed[i].blen,
Herbert Xue9d41162006-08-19 21:38:49 +1000466 speed[i].plen, output);
467
468 if (ret) {
Frank Seidel376bacb2009-03-29 15:18:39 +0800469 printk(KERN_ERR "hashing failed ret=%d\n", ret);
Herbert Xue9d41162006-08-19 21:38:49 +1000470 break;
471 }
Michal Ludvige8057922006-05-30 22:04:19 +1000472 }
473
474out:
Herbert Xue9d41162006-08-19 21:38:49 +1000475 crypto_free_hash(tfm);
Michal Ludvige8057922006-05-30 22:04:19 +1000476}
477
David S. Millerbeb63da2010-05-19 14:11:21 +1000478struct tcrypt_result {
479 struct completion completion;
480 int err;
481};
482
483static void tcrypt_complete(struct crypto_async_request *req, int err)
484{
485 struct tcrypt_result *res = req->data;
486
487 if (err == -EINPROGRESS)
488 return;
489
490 res->err = err;
491 complete(&res->completion);
492}
493
494static inline int do_one_ahash_op(struct ahash_request *req, int ret)
495{
496 if (ret == -EINPROGRESS || ret == -EBUSY) {
497 struct tcrypt_result *tr = req->base.data;
498
499 ret = wait_for_completion_interruptible(&tr->completion);
500 if (!ret)
501 ret = tr->err;
502 INIT_COMPLETION(tr->completion);
503 }
504 return ret;
505}
506
507static int test_ahash_jiffies_digest(struct ahash_request *req, int blen,
508 char *out, int sec)
509{
510 unsigned long start, end;
511 int bcount;
512 int ret;
513
514 for (start = jiffies, end = start + sec * HZ, bcount = 0;
515 time_before(jiffies, end); bcount++) {
516 ret = do_one_ahash_op(req, crypto_ahash_digest(req));
517 if (ret)
518 return ret;
519 }
520
521 printk("%6u opers/sec, %9lu bytes/sec\n",
522 bcount / sec, ((long)bcount * blen) / sec);
523
524 return 0;
525}
526
527static int test_ahash_jiffies(struct ahash_request *req, int blen,
528 int plen, char *out, int sec)
529{
530 unsigned long start, end;
531 int bcount, pcount;
532 int ret;
533
534 if (plen == blen)
535 return test_ahash_jiffies_digest(req, blen, out, sec);
536
537 for (start = jiffies, end = start + sec * HZ, bcount = 0;
538 time_before(jiffies, end); bcount++) {
539 ret = crypto_ahash_init(req);
540 if (ret)
541 return ret;
542 for (pcount = 0; pcount < blen; pcount += plen) {
543 ret = do_one_ahash_op(req, crypto_ahash_update(req));
544 if (ret)
545 return ret;
546 }
547 /* we assume there is enough space in 'out' for the result */
548 ret = do_one_ahash_op(req, crypto_ahash_final(req));
549 if (ret)
550 return ret;
551 }
552
553 pr_cont("%6u opers/sec, %9lu bytes/sec\n",
554 bcount / sec, ((long)bcount * blen) / sec);
555
556 return 0;
557}
558
559static int test_ahash_cycles_digest(struct ahash_request *req, int blen,
560 char *out)
561{
562 unsigned long cycles = 0;
563 int ret, i;
564
565 /* Warm-up run. */
566 for (i = 0; i < 4; i++) {
567 ret = do_one_ahash_op(req, crypto_ahash_digest(req));
568 if (ret)
569 goto out;
570 }
571
572 /* The real thing. */
573 for (i = 0; i < 8; i++) {
574 cycles_t start, end;
575
576 start = get_cycles();
577
578 ret = do_one_ahash_op(req, crypto_ahash_digest(req));
579 if (ret)
580 goto out;
581
582 end = get_cycles();
583
584 cycles += end - start;
585 }
586
587out:
588 if (ret)
589 return ret;
590
591 pr_cont("%6lu cycles/operation, %4lu cycles/byte\n",
592 cycles / 8, cycles / (8 * blen));
593
594 return 0;
595}
596
597static int test_ahash_cycles(struct ahash_request *req, int blen,
598 int plen, char *out)
599{
600 unsigned long cycles = 0;
601 int i, pcount, ret;
602
603 if (plen == blen)
604 return test_ahash_cycles_digest(req, blen, out);
605
606 /* Warm-up run. */
607 for (i = 0; i < 4; i++) {
608 ret = crypto_ahash_init(req);
609 if (ret)
610 goto out;
611 for (pcount = 0; pcount < blen; pcount += plen) {
612 ret = do_one_ahash_op(req, crypto_ahash_update(req));
613 if (ret)
614 goto out;
615 }
616 ret = do_one_ahash_op(req, crypto_ahash_final(req));
617 if (ret)
618 goto out;
619 }
620
621 /* The real thing. */
622 for (i = 0; i < 8; i++) {
623 cycles_t start, end;
624
625 start = get_cycles();
626
627 ret = crypto_ahash_init(req);
628 if (ret)
629 goto out;
630 for (pcount = 0; pcount < blen; pcount += plen) {
631 ret = do_one_ahash_op(req, crypto_ahash_update(req));
632 if (ret)
633 goto out;
634 }
635 ret = do_one_ahash_op(req, crypto_ahash_final(req));
636 if (ret)
637 goto out;
638
639 end = get_cycles();
640
641 cycles += end - start;
642 }
643
644out:
645 if (ret)
646 return ret;
647
648 pr_cont("%6lu cycles/operation, %4lu cycles/byte\n",
649 cycles / 8, cycles / (8 * blen));
650
651 return 0;
652}
653
654static void test_ahash_speed(const char *algo, unsigned int sec,
655 struct hash_speed *speed)
656{
657 struct scatterlist sg[TVMEMSIZE];
658 struct tcrypt_result tresult;
659 struct ahash_request *req;
660 struct crypto_ahash *tfm;
661 static char output[1024];
662 int i, ret;
663
664 printk(KERN_INFO "\ntesting speed of async %s\n", algo);
665
666 tfm = crypto_alloc_ahash(algo, 0, 0);
667 if (IS_ERR(tfm)) {
668 pr_err("failed to load transform for %s: %ld\n",
669 algo, PTR_ERR(tfm));
670 return;
671 }
672
673 if (crypto_ahash_digestsize(tfm) > sizeof(output)) {
674 pr_err("digestsize(%u) > outputbuffer(%zu)\n",
675 crypto_ahash_digestsize(tfm), sizeof(output));
676 goto out;
677 }
678
679 test_hash_sg_init(sg);
680 req = ahash_request_alloc(tfm, GFP_KERNEL);
681 if (!req) {
682 pr_err("ahash request allocation failure\n");
683 goto out;
684 }
685
686 init_completion(&tresult.completion);
687 ahash_request_set_callback(req, CRYPTO_TFM_REQ_MAY_BACKLOG,
688 tcrypt_complete, &tresult);
689
690 for (i = 0; speed[i].blen != 0; i++) {
691 if (speed[i].blen > TVMEMSIZE * PAGE_SIZE) {
692 pr_err("template (%u) too big for tvmem (%lu)\n",
693 speed[i].blen, TVMEMSIZE * PAGE_SIZE);
694 break;
695 }
696
697 pr_info("test%3u "
698 "(%5u byte blocks,%5u bytes per update,%4u updates): ",
699 i, speed[i].blen, speed[i].plen, speed[i].blen / speed[i].plen);
700
701 ahash_request_set_crypt(req, sg, output, speed[i].plen);
702
703 if (sec)
704 ret = test_ahash_jiffies(req, speed[i].blen,
705 speed[i].plen, output, sec);
706 else
707 ret = test_ahash_cycles(req, speed[i].blen,
708 speed[i].plen, output);
709
710 if (ret) {
711 pr_err("hashing failed ret=%d\n", ret);
712 break;
713 }
714 }
715
716 ahash_request_free(req);
717
718out:
719 crypto_free_ahash(tfm);
720}
721
Herbert Xuef2736f2005-06-22 13:26:03 -0700722static void test_available(void)
Linus Torvalds1da177e2005-04-16 15:20:36 -0700723{
724 char **name = check;
Herbert Xuef2736f2005-06-22 13:26:03 -0700725
Linus Torvalds1da177e2005-04-16 15:20:36 -0700726 while (*name) {
727 printk("alg %s ", *name);
Herbert Xu6158efc2007-04-04 17:41:07 +1000728 printk(crypto_has_alg(*name, 0, 0) ?
Herbert Xue4d5b792006-08-26 18:12:40 +1000729 "found\n" : "not found\n");
Linus Torvalds1da177e2005-04-16 15:20:36 -0700730 name++;
Herbert Xuef2736f2005-06-22 13:26:03 -0700731 }
Linus Torvalds1da177e2005-04-16 15:20:36 -0700732}
733
Herbert Xu01b32322008-07-31 15:41:55 +0800734static inline int tcrypt_test(const char *alg)
735{
Jarod Wilson4e033a62009-05-27 15:10:21 +1000736 int ret;
737
738 ret = alg_test(alg, alg, 0, 0);
739 /* non-fips algs return -EINVAL in fips mode */
740 if (fips_enabled && ret == -EINVAL)
741 ret = 0;
742 return ret;
Herbert Xu01b32322008-07-31 15:41:55 +0800743}
744
Jarod Wilson4e033a62009-05-27 15:10:21 +1000745static int do_test(int m)
Herbert Xu01b32322008-07-31 15:41:55 +0800746{
747 int i;
Jarod Wilson4e033a62009-05-27 15:10:21 +1000748 int ret = 0;
Herbert Xu01b32322008-07-31 15:41:55 +0800749
750 switch (m) {
Linus Torvalds1da177e2005-04-16 15:20:36 -0700751 case 0:
Herbert Xu01b32322008-07-31 15:41:55 +0800752 for (i = 1; i < 200; i++)
Jarod Wilson4e033a62009-05-27 15:10:21 +1000753 ret += do_test(i);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700754 break;
755
756 case 1:
Jarod Wilson4e033a62009-05-27 15:10:21 +1000757 ret += tcrypt_test("md5");
Linus Torvalds1da177e2005-04-16 15:20:36 -0700758 break;
759
760 case 2:
Jarod Wilson4e033a62009-05-27 15:10:21 +1000761 ret += tcrypt_test("sha1");
Linus Torvalds1da177e2005-04-16 15:20:36 -0700762 break;
763
764 case 3:
Jarod Wilson4e033a62009-05-27 15:10:21 +1000765 ret += tcrypt_test("ecb(des)");
766 ret += tcrypt_test("cbc(des)");
Linus Torvalds1da177e2005-04-16 15:20:36 -0700767 break;
768
769 case 4:
Jarod Wilson4e033a62009-05-27 15:10:21 +1000770 ret += tcrypt_test("ecb(des3_ede)");
771 ret += tcrypt_test("cbc(des3_ede)");
Linus Torvalds1da177e2005-04-16 15:20:36 -0700772 break;
773
774 case 5:
Jarod Wilson4e033a62009-05-27 15:10:21 +1000775 ret += tcrypt_test("md4");
Linus Torvalds1da177e2005-04-16 15:20:36 -0700776 break;
Herbert Xuef2736f2005-06-22 13:26:03 -0700777
Linus Torvalds1da177e2005-04-16 15:20:36 -0700778 case 6:
Jarod Wilson4e033a62009-05-27 15:10:21 +1000779 ret += tcrypt_test("sha256");
Linus Torvalds1da177e2005-04-16 15:20:36 -0700780 break;
Herbert Xuef2736f2005-06-22 13:26:03 -0700781
Linus Torvalds1da177e2005-04-16 15:20:36 -0700782 case 7:
Jarod Wilson4e033a62009-05-27 15:10:21 +1000783 ret += tcrypt_test("ecb(blowfish)");
784 ret += tcrypt_test("cbc(blowfish)");
Jussi Kivilinna85b63e32011-10-10 23:03:03 +0300785 ret += tcrypt_test("ctr(blowfish)");
Linus Torvalds1da177e2005-04-16 15:20:36 -0700786 break;
787
788 case 8:
Jarod Wilson4e033a62009-05-27 15:10:21 +1000789 ret += tcrypt_test("ecb(twofish)");
790 ret += tcrypt_test("cbc(twofish)");
Jussi Kivilinna573da622011-10-10 23:03:12 +0300791 ret += tcrypt_test("ctr(twofish)");
Linus Torvalds1da177e2005-04-16 15:20:36 -0700792 break;
Herbert Xuef2736f2005-06-22 13:26:03 -0700793
Linus Torvalds1da177e2005-04-16 15:20:36 -0700794 case 9:
Jarod Wilson4e033a62009-05-27 15:10:21 +1000795 ret += tcrypt_test("ecb(serpent)");
Linus Torvalds1da177e2005-04-16 15:20:36 -0700796 break;
797
798 case 10:
Jarod Wilson4e033a62009-05-27 15:10:21 +1000799 ret += tcrypt_test("ecb(aes)");
800 ret += tcrypt_test("cbc(aes)");
801 ret += tcrypt_test("lrw(aes)");
802 ret += tcrypt_test("xts(aes)");
803 ret += tcrypt_test("ctr(aes)");
804 ret += tcrypt_test("rfc3686(ctr(aes))");
Linus Torvalds1da177e2005-04-16 15:20:36 -0700805 break;
806
807 case 11:
Jarod Wilson4e033a62009-05-27 15:10:21 +1000808 ret += tcrypt_test("sha384");
Linus Torvalds1da177e2005-04-16 15:20:36 -0700809 break;
Herbert Xuef2736f2005-06-22 13:26:03 -0700810
Linus Torvalds1da177e2005-04-16 15:20:36 -0700811 case 12:
Jarod Wilson4e033a62009-05-27 15:10:21 +1000812 ret += tcrypt_test("sha512");
Linus Torvalds1da177e2005-04-16 15:20:36 -0700813 break;
814
815 case 13:
Jarod Wilson4e033a62009-05-27 15:10:21 +1000816 ret += tcrypt_test("deflate");
Linus Torvalds1da177e2005-04-16 15:20:36 -0700817 break;
818
819 case 14:
Jarod Wilson4e033a62009-05-27 15:10:21 +1000820 ret += tcrypt_test("ecb(cast5)");
Linus Torvalds1da177e2005-04-16 15:20:36 -0700821 break;
822
823 case 15:
Jarod Wilson4e033a62009-05-27 15:10:21 +1000824 ret += tcrypt_test("ecb(cast6)");
Linus Torvalds1da177e2005-04-16 15:20:36 -0700825 break;
826
827 case 16:
Jarod Wilson4e033a62009-05-27 15:10:21 +1000828 ret += tcrypt_test("ecb(arc4)");
Linus Torvalds1da177e2005-04-16 15:20:36 -0700829 break;
830
831 case 17:
Jarod Wilson4e033a62009-05-27 15:10:21 +1000832 ret += tcrypt_test("michael_mic");
Linus Torvalds1da177e2005-04-16 15:20:36 -0700833 break;
834
835 case 18:
Jarod Wilson4e033a62009-05-27 15:10:21 +1000836 ret += tcrypt_test("crc32c");
Linus Torvalds1da177e2005-04-16 15:20:36 -0700837 break;
838
839 case 19:
Jarod Wilson4e033a62009-05-27 15:10:21 +1000840 ret += tcrypt_test("ecb(tea)");
Linus Torvalds1da177e2005-04-16 15:20:36 -0700841 break;
842
843 case 20:
Jarod Wilson4e033a62009-05-27 15:10:21 +1000844 ret += tcrypt_test("ecb(xtea)");
Linus Torvalds1da177e2005-04-16 15:20:36 -0700845 break;
846
847 case 21:
Jarod Wilson4e033a62009-05-27 15:10:21 +1000848 ret += tcrypt_test("ecb(khazad)");
Linus Torvalds1da177e2005-04-16 15:20:36 -0700849 break;
850
851 case 22:
Jarod Wilson4e033a62009-05-27 15:10:21 +1000852 ret += tcrypt_test("wp512");
Linus Torvalds1da177e2005-04-16 15:20:36 -0700853 break;
854
855 case 23:
Jarod Wilson4e033a62009-05-27 15:10:21 +1000856 ret += tcrypt_test("wp384");
Linus Torvalds1da177e2005-04-16 15:20:36 -0700857 break;
858
859 case 24:
Jarod Wilson4e033a62009-05-27 15:10:21 +1000860 ret += tcrypt_test("wp256");
Linus Torvalds1da177e2005-04-16 15:20:36 -0700861 break;
862
863 case 25:
Jarod Wilson4e033a62009-05-27 15:10:21 +1000864 ret += tcrypt_test("ecb(tnepres)");
Linus Torvalds1da177e2005-04-16 15:20:36 -0700865 break;
866
867 case 26:
Jarod Wilson4e033a62009-05-27 15:10:21 +1000868 ret += tcrypt_test("ecb(anubis)");
869 ret += tcrypt_test("cbc(anubis)");
Linus Torvalds1da177e2005-04-16 15:20:36 -0700870 break;
871
872 case 27:
Jarod Wilson4e033a62009-05-27 15:10:21 +1000873 ret += tcrypt_test("tgr192");
Linus Torvalds1da177e2005-04-16 15:20:36 -0700874 break;
875
876 case 28:
877
Jarod Wilson4e033a62009-05-27 15:10:21 +1000878 ret += tcrypt_test("tgr160");
Linus Torvalds1da177e2005-04-16 15:20:36 -0700879 break;
880
881 case 29:
Jarod Wilson4e033a62009-05-27 15:10:21 +1000882 ret += tcrypt_test("tgr128");
Linus Torvalds1da177e2005-04-16 15:20:36 -0700883 break;
Adrian-Ken Rueegsegger2998db32008-05-09 21:29:35 +0800884
Aaron Grothefb4f10e2005-09-01 17:42:46 -0700885 case 30:
Jarod Wilson4e033a62009-05-27 15:10:21 +1000886 ret += tcrypt_test("ecb(xeta)");
Aaron Grothefb4f10e2005-09-01 17:42:46 -0700887 break;
Linus Torvalds1da177e2005-04-16 15:20:36 -0700888
David Howells90831632006-12-16 12:13:14 +1100889 case 31:
Jarod Wilson4e033a62009-05-27 15:10:21 +1000890 ret += tcrypt_test("pcbc(fcrypt)");
David Howells90831632006-12-16 12:13:14 +1100891 break;
892
Noriaki TAKAMIYA02ab5a72007-01-24 21:48:19 +1100893 case 32:
Jarod Wilson4e033a62009-05-27 15:10:21 +1000894 ret += tcrypt_test("ecb(camellia)");
895 ret += tcrypt_test("cbc(camellia)");
Noriaki TAKAMIYA02ab5a72007-01-24 21:48:19 +1100896 break;
Jonathan Lynchcd12fb92007-11-10 20:08:25 +0800897 case 33:
Jarod Wilson4e033a62009-05-27 15:10:21 +1000898 ret += tcrypt_test("sha224");
Jonathan Lynchcd12fb92007-11-10 20:08:25 +0800899 break;
Noriaki TAKAMIYA02ab5a72007-01-24 21:48:19 +1100900
Tan Swee Heng2407d602007-11-23 19:45:00 +0800901 case 34:
Jarod Wilson4e033a62009-05-27 15:10:21 +1000902 ret += tcrypt_test("salsa20");
Tan Swee Heng2407d602007-11-23 19:45:00 +0800903 break;
904
Herbert Xu8df213d2007-12-02 14:55:47 +1100905 case 35:
Jarod Wilson4e033a62009-05-27 15:10:21 +1000906 ret += tcrypt_test("gcm(aes)");
Herbert Xu8df213d2007-12-02 14:55:47 +1100907 break;
908
Zoltan Sogor0b77abb2007-12-07 16:53:23 +0800909 case 36:
Jarod Wilson4e033a62009-05-27 15:10:21 +1000910 ret += tcrypt_test("lzo");
Zoltan Sogor0b77abb2007-12-07 16:53:23 +0800911 break;
912
Joy Latten93cc74e2007-12-12 20:24:22 +0800913 case 37:
Jarod Wilson4e033a62009-05-27 15:10:21 +1000914 ret += tcrypt_test("ccm(aes)");
Joy Latten93cc74e2007-12-12 20:24:22 +0800915 break;
916
Kevin Coffman76cb9522008-03-24 21:26:16 +0800917 case 38:
Jarod Wilson4e033a62009-05-27 15:10:21 +1000918 ret += tcrypt_test("cts(cbc(aes))");
Kevin Coffman76cb9522008-03-24 21:26:16 +0800919 break;
920
Adrian-Ken Rueegseggerfd4adf12008-05-07 22:16:36 +0800921 case 39:
Jarod Wilson4e033a62009-05-27 15:10:21 +1000922 ret += tcrypt_test("rmd128");
Adrian-Ken Rueegseggerfd4adf12008-05-07 22:16:36 +0800923 break;
924
925 case 40:
Jarod Wilson4e033a62009-05-27 15:10:21 +1000926 ret += tcrypt_test("rmd160");
Adrian-Ken Rueegseggerfd4adf12008-05-07 22:16:36 +0800927 break;
928
Adrian-Ken Rueegsegger2998db32008-05-09 21:29:35 +0800929 case 41:
Jarod Wilson4e033a62009-05-27 15:10:21 +1000930 ret += tcrypt_test("rmd256");
Adrian-Ken Rueegsegger2998db32008-05-09 21:29:35 +0800931 break;
932
933 case 42:
Jarod Wilson4e033a62009-05-27 15:10:21 +1000934 ret += tcrypt_test("rmd320");
Herbert Xu01b32322008-07-31 15:41:55 +0800935 break;
936
937 case 43:
Jarod Wilson4e033a62009-05-27 15:10:21 +1000938 ret += tcrypt_test("ecb(seed)");
Adrian-Ken Rueegsegger2998db32008-05-09 21:29:35 +0800939 break;
940
Geert Uytterhoeven0c01aed2009-03-04 15:42:15 +0800941 case 44:
Jarod Wilson4e033a62009-05-27 15:10:21 +1000942 ret += tcrypt_test("zlib");
Geert Uytterhoeven0c01aed2009-03-04 15:42:15 +0800943 break;
944
Jarod Wilson5d667322009-05-04 19:23:40 +0800945 case 45:
Jarod Wilson4e033a62009-05-27 15:10:21 +1000946 ret += tcrypt_test("rfc4309(ccm(aes))");
Jarod Wilson5d667322009-05-04 19:23:40 +0800947 break;
948
Linus Torvalds1da177e2005-04-16 15:20:36 -0700949 case 100:
Jarod Wilson4e033a62009-05-27 15:10:21 +1000950 ret += tcrypt_test("hmac(md5)");
Linus Torvalds1da177e2005-04-16 15:20:36 -0700951 break;
Herbert Xuef2736f2005-06-22 13:26:03 -0700952
Linus Torvalds1da177e2005-04-16 15:20:36 -0700953 case 101:
Jarod Wilson4e033a62009-05-27 15:10:21 +1000954 ret += tcrypt_test("hmac(sha1)");
Linus Torvalds1da177e2005-04-16 15:20:36 -0700955 break;
Herbert Xuef2736f2005-06-22 13:26:03 -0700956
Linus Torvalds1da177e2005-04-16 15:20:36 -0700957 case 102:
Jarod Wilson4e033a62009-05-27 15:10:21 +1000958 ret += tcrypt_test("hmac(sha256)");
Linus Torvalds1da177e2005-04-16 15:20:36 -0700959 break;
960
Andrew Donofrioa28091a2006-12-10 12:10:20 +1100961 case 103:
Jarod Wilson4e033a62009-05-27 15:10:21 +1000962 ret += tcrypt_test("hmac(sha384)");
Andrew Donofrioa28091a2006-12-10 12:10:20 +1100963 break;
964
965 case 104:
Jarod Wilson4e033a62009-05-27 15:10:21 +1000966 ret += tcrypt_test("hmac(sha512)");
Andrew Donofrioa28091a2006-12-10 12:10:20 +1100967 break;
Herbert Xu38ed9ab2008-01-01 15:59:28 +1100968
Jonathan Lynchcd12fb92007-11-10 20:08:25 +0800969 case 105:
Jarod Wilson4e033a62009-05-27 15:10:21 +1000970 ret += tcrypt_test("hmac(sha224)");
Jonathan Lynchcd12fb92007-11-10 20:08:25 +0800971 break;
Linus Torvalds1da177e2005-04-16 15:20:36 -0700972
Herbert Xu38ed9ab2008-01-01 15:59:28 +1100973 case 106:
Jarod Wilson4e033a62009-05-27 15:10:21 +1000974 ret += tcrypt_test("xcbc(aes)");
Herbert Xu38ed9ab2008-01-01 15:59:28 +1100975 break;
976
Adrian-Ken Rueegseggerfd4adf12008-05-07 22:16:36 +0800977 case 107:
Jarod Wilson4e033a62009-05-27 15:10:21 +1000978 ret += tcrypt_test("hmac(rmd128)");
Adrian-Ken Rueegseggerfd4adf12008-05-07 22:16:36 +0800979 break;
980
981 case 108:
Jarod Wilson4e033a62009-05-27 15:10:21 +1000982 ret += tcrypt_test("hmac(rmd160)");
Adrian-Ken Rueegseggerfd4adf12008-05-07 22:16:36 +0800983 break;
984
Shane Wangf1939f72009-09-02 20:05:22 +1000985 case 109:
986 ret += tcrypt_test("vmac(aes)");
987 break;
988
Jarod Wilsone08ca2d2009-05-04 19:46:29 +0800989 case 150:
Jarod Wilson4e033a62009-05-27 15:10:21 +1000990 ret += tcrypt_test("ansi_cprng");
Jarod Wilsone08ca2d2009-05-04 19:46:29 +0800991 break;
992
Adrian Hoban69435b92010-11-04 15:02:04 -0400993 case 151:
994 ret += tcrypt_test("rfc4106(gcm(aes))");
995 break;
996
Harald Welteebfd9bc2005-06-22 13:27:23 -0700997 case 200:
Herbert Xucba83562006-08-13 08:26:09 +1000998 test_cipher_speed("ecb(aes)", ENCRYPT, sec, NULL, 0,
Sebastian Siewior477035c2008-03-11 21:24:26 +0800999 speed_template_16_24_32);
Herbert Xucba83562006-08-13 08:26:09 +10001000 test_cipher_speed("ecb(aes)", DECRYPT, sec, NULL, 0,
Sebastian Siewior477035c2008-03-11 21:24:26 +08001001 speed_template_16_24_32);
Herbert Xucba83562006-08-13 08:26:09 +10001002 test_cipher_speed("cbc(aes)", ENCRYPT, sec, NULL, 0,
Sebastian Siewior477035c2008-03-11 21:24:26 +08001003 speed_template_16_24_32);
Herbert Xucba83562006-08-13 08:26:09 +10001004 test_cipher_speed("cbc(aes)", DECRYPT, sec, NULL, 0,
Sebastian Siewior477035c2008-03-11 21:24:26 +08001005 speed_template_16_24_32);
Rik Snelf3d10442006-11-29 19:01:41 +11001006 test_cipher_speed("lrw(aes)", ENCRYPT, sec, NULL, 0,
Sebastian Siewior477035c2008-03-11 21:24:26 +08001007 speed_template_32_40_48);
Rik Snelf3d10442006-11-29 19:01:41 +11001008 test_cipher_speed("lrw(aes)", DECRYPT, sec, NULL, 0,
Sebastian Siewior477035c2008-03-11 21:24:26 +08001009 speed_template_32_40_48);
Rik Snelf19f5112007-09-19 20:23:13 +08001010 test_cipher_speed("xts(aes)", ENCRYPT, sec, NULL, 0,
Sebastian Siewior477035c2008-03-11 21:24:26 +08001011 speed_template_32_48_64);
Rik Snelf19f5112007-09-19 20:23:13 +08001012 test_cipher_speed("xts(aes)", DECRYPT, sec, NULL, 0,
Sebastian Siewior477035c2008-03-11 21:24:26 +08001013 speed_template_32_48_64);
Jan Glauber9996e342011-04-26 16:34:01 +10001014 test_cipher_speed("ctr(aes)", ENCRYPT, sec, NULL, 0,
1015 speed_template_16_24_32);
1016 test_cipher_speed("ctr(aes)", DECRYPT, sec, NULL, 0,
1017 speed_template_16_24_32);
Harald Welteebfd9bc2005-06-22 13:27:23 -07001018 break;
1019
1020 case 201:
Herbert Xucba83562006-08-13 08:26:09 +10001021 test_cipher_speed("ecb(des3_ede)", ENCRYPT, sec,
Herbert Xuda7f0332008-07-31 17:08:25 +08001022 des3_speed_template, DES3_SPEED_VECTORS,
Sebastian Siewior477035c2008-03-11 21:24:26 +08001023 speed_template_24);
Herbert Xucba83562006-08-13 08:26:09 +10001024 test_cipher_speed("ecb(des3_ede)", DECRYPT, sec,
Herbert Xuda7f0332008-07-31 17:08:25 +08001025 des3_speed_template, DES3_SPEED_VECTORS,
Sebastian Siewior477035c2008-03-11 21:24:26 +08001026 speed_template_24);
Herbert Xucba83562006-08-13 08:26:09 +10001027 test_cipher_speed("cbc(des3_ede)", ENCRYPT, sec,
Herbert Xuda7f0332008-07-31 17:08:25 +08001028 des3_speed_template, DES3_SPEED_VECTORS,
Sebastian Siewior477035c2008-03-11 21:24:26 +08001029 speed_template_24);
Herbert Xucba83562006-08-13 08:26:09 +10001030 test_cipher_speed("cbc(des3_ede)", DECRYPT, sec,
Herbert Xuda7f0332008-07-31 17:08:25 +08001031 des3_speed_template, DES3_SPEED_VECTORS,
Sebastian Siewior477035c2008-03-11 21:24:26 +08001032 speed_template_24);
Harald Welteebfd9bc2005-06-22 13:27:23 -07001033 break;
1034
1035 case 202:
Herbert Xucba83562006-08-13 08:26:09 +10001036 test_cipher_speed("ecb(twofish)", ENCRYPT, sec, NULL, 0,
Sebastian Siewior477035c2008-03-11 21:24:26 +08001037 speed_template_16_24_32);
Herbert Xucba83562006-08-13 08:26:09 +10001038 test_cipher_speed("ecb(twofish)", DECRYPT, sec, NULL, 0,
Sebastian Siewior477035c2008-03-11 21:24:26 +08001039 speed_template_16_24_32);
Herbert Xucba83562006-08-13 08:26:09 +10001040 test_cipher_speed("cbc(twofish)", ENCRYPT, sec, NULL, 0,
Sebastian Siewior477035c2008-03-11 21:24:26 +08001041 speed_template_16_24_32);
Herbert Xucba83562006-08-13 08:26:09 +10001042 test_cipher_speed("cbc(twofish)", DECRYPT, sec, NULL, 0,
Sebastian Siewior477035c2008-03-11 21:24:26 +08001043 speed_template_16_24_32);
Jussi Kivilinnaee5002a2011-09-26 16:47:15 +03001044 test_cipher_speed("ctr(twofish)", ENCRYPT, sec, NULL, 0,
1045 speed_template_16_24_32);
1046 test_cipher_speed("ctr(twofish)", DECRYPT, sec, NULL, 0,
1047 speed_template_16_24_32);
Harald Welteebfd9bc2005-06-22 13:27:23 -07001048 break;
1049
1050 case 203:
Herbert Xucba83562006-08-13 08:26:09 +10001051 test_cipher_speed("ecb(blowfish)", ENCRYPT, sec, NULL, 0,
Sebastian Siewior477035c2008-03-11 21:24:26 +08001052 speed_template_8_32);
Herbert Xucba83562006-08-13 08:26:09 +10001053 test_cipher_speed("ecb(blowfish)", DECRYPT, sec, NULL, 0,
Sebastian Siewior477035c2008-03-11 21:24:26 +08001054 speed_template_8_32);
Herbert Xucba83562006-08-13 08:26:09 +10001055 test_cipher_speed("cbc(blowfish)", ENCRYPT, sec, NULL, 0,
Sebastian Siewior477035c2008-03-11 21:24:26 +08001056 speed_template_8_32);
Herbert Xucba83562006-08-13 08:26:09 +10001057 test_cipher_speed("cbc(blowfish)", DECRYPT, sec, NULL, 0,
Sebastian Siewior477035c2008-03-11 21:24:26 +08001058 speed_template_8_32);
Jussi Kivilinna7d47b862011-09-02 01:45:17 +03001059 test_cipher_speed("ctr(blowfish)", ENCRYPT, sec, NULL, 0,
1060 speed_template_8_32);
1061 test_cipher_speed("ctr(blowfish)", DECRYPT, sec, NULL, 0,
1062 speed_template_8_32);
Harald Welteebfd9bc2005-06-22 13:27:23 -07001063 break;
1064
1065 case 204:
Herbert Xucba83562006-08-13 08:26:09 +10001066 test_cipher_speed("ecb(des)", ENCRYPT, sec, NULL, 0,
Sebastian Siewior477035c2008-03-11 21:24:26 +08001067 speed_template_8);
Herbert Xucba83562006-08-13 08:26:09 +10001068 test_cipher_speed("ecb(des)", DECRYPT, sec, NULL, 0,
Sebastian Siewior477035c2008-03-11 21:24:26 +08001069 speed_template_8);
Herbert Xucba83562006-08-13 08:26:09 +10001070 test_cipher_speed("cbc(des)", ENCRYPT, sec, NULL, 0,
Sebastian Siewior477035c2008-03-11 21:24:26 +08001071 speed_template_8);
Herbert Xucba83562006-08-13 08:26:09 +10001072 test_cipher_speed("cbc(des)", DECRYPT, sec, NULL, 0,
Sebastian Siewior477035c2008-03-11 21:24:26 +08001073 speed_template_8);
Harald Welteebfd9bc2005-06-22 13:27:23 -07001074 break;
1075
Noriaki TAKAMIYA02ab5a72007-01-24 21:48:19 +11001076 case 205:
1077 test_cipher_speed("ecb(camellia)", ENCRYPT, sec, NULL, 0,
Sebastian Siewior477035c2008-03-11 21:24:26 +08001078 speed_template_16_24_32);
Noriaki TAKAMIYA02ab5a72007-01-24 21:48:19 +11001079 test_cipher_speed("ecb(camellia)", DECRYPT, sec, NULL, 0,
Sebastian Siewior477035c2008-03-11 21:24:26 +08001080 speed_template_16_24_32);
Noriaki TAKAMIYA02ab5a72007-01-24 21:48:19 +11001081 test_cipher_speed("cbc(camellia)", ENCRYPT, sec, NULL, 0,
Sebastian Siewior477035c2008-03-11 21:24:26 +08001082 speed_template_16_24_32);
Noriaki TAKAMIYA02ab5a72007-01-24 21:48:19 +11001083 test_cipher_speed("cbc(camellia)", DECRYPT, sec, NULL, 0,
Sebastian Siewior477035c2008-03-11 21:24:26 +08001084 speed_template_16_24_32);
Noriaki TAKAMIYA02ab5a72007-01-24 21:48:19 +11001085 break;
1086
Tan Swee Heng5de8f1b2007-12-07 17:17:43 +08001087 case 206:
1088 test_cipher_speed("salsa20", ENCRYPT, sec, NULL, 0,
Sebastian Siewior477035c2008-03-11 21:24:26 +08001089 speed_template_16_32);
Tan Swee Heng5de8f1b2007-12-07 17:17:43 +08001090 break;
1091
Michal Ludvige8057922006-05-30 22:04:19 +10001092 case 300:
1093 /* fall through */
1094
1095 case 301:
Herbert Xue9d41162006-08-19 21:38:49 +10001096 test_hash_speed("md4", sec, generic_hash_speed_template);
Michal Ludvige8057922006-05-30 22:04:19 +10001097 if (mode > 300 && mode < 400) break;
1098
1099 case 302:
Herbert Xue9d41162006-08-19 21:38:49 +10001100 test_hash_speed("md5", sec, generic_hash_speed_template);
Michal Ludvige8057922006-05-30 22:04:19 +10001101 if (mode > 300 && mode < 400) break;
1102
1103 case 303:
Herbert Xue9d41162006-08-19 21:38:49 +10001104 test_hash_speed("sha1", sec, generic_hash_speed_template);
Michal Ludvige8057922006-05-30 22:04:19 +10001105 if (mode > 300 && mode < 400) break;
1106
1107 case 304:
Herbert Xue9d41162006-08-19 21:38:49 +10001108 test_hash_speed("sha256", sec, generic_hash_speed_template);
Michal Ludvige8057922006-05-30 22:04:19 +10001109 if (mode > 300 && mode < 400) break;
1110
1111 case 305:
Herbert Xue9d41162006-08-19 21:38:49 +10001112 test_hash_speed("sha384", sec, generic_hash_speed_template);
Michal Ludvige8057922006-05-30 22:04:19 +10001113 if (mode > 300 && mode < 400) break;
1114
1115 case 306:
Herbert Xue9d41162006-08-19 21:38:49 +10001116 test_hash_speed("sha512", sec, generic_hash_speed_template);
Michal Ludvige8057922006-05-30 22:04:19 +10001117 if (mode > 300 && mode < 400) break;
1118
1119 case 307:
Herbert Xue9d41162006-08-19 21:38:49 +10001120 test_hash_speed("wp256", sec, generic_hash_speed_template);
Michal Ludvige8057922006-05-30 22:04:19 +10001121 if (mode > 300 && mode < 400) break;
1122
1123 case 308:
Herbert Xue9d41162006-08-19 21:38:49 +10001124 test_hash_speed("wp384", sec, generic_hash_speed_template);
Michal Ludvige8057922006-05-30 22:04:19 +10001125 if (mode > 300 && mode < 400) break;
1126
1127 case 309:
Herbert Xue9d41162006-08-19 21:38:49 +10001128 test_hash_speed("wp512", sec, generic_hash_speed_template);
Michal Ludvige8057922006-05-30 22:04:19 +10001129 if (mode > 300 && mode < 400) break;
1130
1131 case 310:
Herbert Xue9d41162006-08-19 21:38:49 +10001132 test_hash_speed("tgr128", sec, generic_hash_speed_template);
Michal Ludvige8057922006-05-30 22:04:19 +10001133 if (mode > 300 && mode < 400) break;
1134
1135 case 311:
Herbert Xue9d41162006-08-19 21:38:49 +10001136 test_hash_speed("tgr160", sec, generic_hash_speed_template);
Michal Ludvige8057922006-05-30 22:04:19 +10001137 if (mode > 300 && mode < 400) break;
1138
1139 case 312:
Herbert Xue9d41162006-08-19 21:38:49 +10001140 test_hash_speed("tgr192", sec, generic_hash_speed_template);
Michal Ludvige8057922006-05-30 22:04:19 +10001141 if (mode > 300 && mode < 400) break;
1142
Jonathan Lynchcd12fb92007-11-10 20:08:25 +08001143 case 313:
1144 test_hash_speed("sha224", sec, generic_hash_speed_template);
1145 if (mode > 300 && mode < 400) break;
1146
Adrian-Ken Rueegseggerfd4adf12008-05-07 22:16:36 +08001147 case 314:
1148 test_hash_speed("rmd128", sec, generic_hash_speed_template);
1149 if (mode > 300 && mode < 400) break;
1150
1151 case 315:
1152 test_hash_speed("rmd160", sec, generic_hash_speed_template);
1153 if (mode > 300 && mode < 400) break;
1154
Adrian-Ken Rueegsegger2998db32008-05-09 21:29:35 +08001155 case 316:
1156 test_hash_speed("rmd256", sec, generic_hash_speed_template);
1157 if (mode > 300 && mode < 400) break;
1158
1159 case 317:
1160 test_hash_speed("rmd320", sec, generic_hash_speed_template);
1161 if (mode > 300 && mode < 400) break;
1162
Huang Ying18bcc912010-03-10 18:30:32 +08001163 case 318:
1164 test_hash_speed("ghash-generic", sec, hash_speed_template_16);
1165 if (mode > 300 && mode < 400) break;
1166
Michal Ludvige8057922006-05-30 22:04:19 +10001167 case 399:
1168 break;
1169
David S. Millerbeb63da2010-05-19 14:11:21 +10001170 case 400:
1171 /* fall through */
1172
1173 case 401:
1174 test_ahash_speed("md4", sec, generic_hash_speed_template);
1175 if (mode > 400 && mode < 500) break;
1176
1177 case 402:
1178 test_ahash_speed("md5", sec, generic_hash_speed_template);
1179 if (mode > 400 && mode < 500) break;
1180
1181 case 403:
1182 test_ahash_speed("sha1", sec, generic_hash_speed_template);
1183 if (mode > 400 && mode < 500) break;
1184
1185 case 404:
1186 test_ahash_speed("sha256", sec, generic_hash_speed_template);
1187 if (mode > 400 && mode < 500) break;
1188
1189 case 405:
1190 test_ahash_speed("sha384", sec, generic_hash_speed_template);
1191 if (mode > 400 && mode < 500) break;
1192
1193 case 406:
1194 test_ahash_speed("sha512", sec, generic_hash_speed_template);
1195 if (mode > 400 && mode < 500) break;
1196
1197 case 407:
1198 test_ahash_speed("wp256", sec, generic_hash_speed_template);
1199 if (mode > 400 && mode < 500) break;
1200
1201 case 408:
1202 test_ahash_speed("wp384", sec, generic_hash_speed_template);
1203 if (mode > 400 && mode < 500) break;
1204
1205 case 409:
1206 test_ahash_speed("wp512", sec, generic_hash_speed_template);
1207 if (mode > 400 && mode < 500) break;
1208
1209 case 410:
1210 test_ahash_speed("tgr128", sec, generic_hash_speed_template);
1211 if (mode > 400 && mode < 500) break;
1212
1213 case 411:
1214 test_ahash_speed("tgr160", sec, generic_hash_speed_template);
1215 if (mode > 400 && mode < 500) break;
1216
1217 case 412:
1218 test_ahash_speed("tgr192", sec, generic_hash_speed_template);
1219 if (mode > 400 && mode < 500) break;
1220
1221 case 413:
1222 test_ahash_speed("sha224", sec, generic_hash_speed_template);
1223 if (mode > 400 && mode < 500) break;
1224
1225 case 414:
1226 test_ahash_speed("rmd128", sec, generic_hash_speed_template);
1227 if (mode > 400 && mode < 500) break;
1228
1229 case 415:
1230 test_ahash_speed("rmd160", sec, generic_hash_speed_template);
1231 if (mode > 400 && mode < 500) break;
1232
1233 case 416:
1234 test_ahash_speed("rmd256", sec, generic_hash_speed_template);
1235 if (mode > 400 && mode < 500) break;
1236
1237 case 417:
1238 test_ahash_speed("rmd320", sec, generic_hash_speed_template);
1239 if (mode > 400 && mode < 500) break;
1240
1241 case 499:
1242 break;
1243
Linus Torvalds1da177e2005-04-16 15:20:36 -07001244 case 1000:
1245 test_available();
1246 break;
Linus Torvalds1da177e2005-04-16 15:20:36 -07001247 }
Jarod Wilson4e033a62009-05-27 15:10:21 +10001248
1249 return ret;
Linus Torvalds1da177e2005-04-16 15:20:36 -07001250}
1251
Herbert Xu7be380f2009-07-14 16:06:54 +08001252static int do_alg_test(const char *alg, u32 type, u32 mask)
Steffen Klasserta873a5f2009-06-19 19:46:53 +08001253{
Herbert Xu7be380f2009-07-14 16:06:54 +08001254 return crypto_has_alg(alg, type, mask ?: CRYPTO_ALG_TYPE_MASK) ?
1255 0 : -ENOENT;
Steffen Klasserta873a5f2009-06-19 19:46:53 +08001256}
1257
Kamalesh Babulal3af5b902008-04-05 21:00:57 +08001258static int __init tcrypt_mod_init(void)
Linus Torvalds1da177e2005-04-16 15:20:36 -07001259{
Mikko Herranene3a4ea42007-11-26 22:12:07 +08001260 int err = -ENOMEM;
Herbert Xuf139cfa2008-07-31 12:23:53 +08001261 int i;
Mikko Herranene3a4ea42007-11-26 22:12:07 +08001262
Herbert Xuf139cfa2008-07-31 12:23:53 +08001263 for (i = 0; i < TVMEMSIZE; i++) {
1264 tvmem[i] = (void *)__get_free_page(GFP_KERNEL);
1265 if (!tvmem[i])
1266 goto err_free_tv;
1267 }
Linus Torvalds1da177e2005-04-16 15:20:36 -07001268
Steffen Klasserta873a5f2009-06-19 19:46:53 +08001269 if (alg)
Herbert Xu7be380f2009-07-14 16:06:54 +08001270 err = do_alg_test(alg, type, mask);
Steffen Klasserta873a5f2009-06-19 19:46:53 +08001271 else
1272 err = do_test(mode);
1273
Jarod Wilson4e033a62009-05-27 15:10:21 +10001274 if (err) {
1275 printk(KERN_ERR "tcrypt: one or more tests failed!\n");
1276 goto err_free_tv;
1277 }
Linus Torvalds1da177e2005-04-16 15:20:36 -07001278
Jarod Wilson4e033a62009-05-27 15:10:21 +10001279 /* We intentionaly return -EAGAIN to prevent keeping the module,
1280 * unless we're running in fips mode. It does all its work from
1281 * init() and doesn't offer any runtime functionality, but in
1282 * the fips case, checking for a successful load is helpful.
Michal Ludvig14fdf472006-05-30 14:49:38 +10001283 * => we don't need it in the memory, do we?
1284 * -- mludvig
1285 */
Jarod Wilson4e033a62009-05-27 15:10:21 +10001286 if (!fips_enabled)
1287 err = -EAGAIN;
Mikko Herranene3a4ea42007-11-26 22:12:07 +08001288
Herbert Xuf139cfa2008-07-31 12:23:53 +08001289err_free_tv:
1290 for (i = 0; i < TVMEMSIZE && tvmem[i]; i++)
1291 free_page((unsigned long)tvmem[i]);
Mikko Herranene3a4ea42007-11-26 22:12:07 +08001292
1293 return err;
Linus Torvalds1da177e2005-04-16 15:20:36 -07001294}
1295
1296/*
1297 * If an init function is provided, an exit function must also be provided
1298 * to allow module unload.
1299 */
Kamalesh Babulal3af5b902008-04-05 21:00:57 +08001300static void __exit tcrypt_mod_fini(void) { }
Linus Torvalds1da177e2005-04-16 15:20:36 -07001301
Kamalesh Babulal3af5b902008-04-05 21:00:57 +08001302module_init(tcrypt_mod_init);
1303module_exit(tcrypt_mod_fini);
Linus Torvalds1da177e2005-04-16 15:20:36 -07001304
Steffen Klasserta873a5f2009-06-19 19:46:53 +08001305module_param(alg, charp, 0);
1306module_param(type, uint, 0);
Herbert Xu7be380f2009-07-14 16:06:54 +08001307module_param(mask, uint, 0);
Linus Torvalds1da177e2005-04-16 15:20:36 -07001308module_param(mode, int, 0);
Harald Welteebfd9bc2005-06-22 13:27:23 -07001309module_param(sec, uint, 0);
Herbert Xu6a179442005-06-22 13:29:03 -07001310MODULE_PARM_DESC(sec, "Length in seconds of speed tests "
1311 "(defaults to zero which uses CPU cycles instead)");
Linus Torvalds1da177e2005-04-16 15:20:36 -07001312
1313MODULE_LICENSE("GPL");
1314MODULE_DESCRIPTION("Quick & dirty crypto testing module");
1315MODULE_AUTHOR("James Morris <jmorris@intercode.com.au>");