blob: e353a28b0b1762f2a06308f349e82b6c60ba5c69 [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)");
Linus Torvalds1da177e2005-04-16 15:20:36 -0700785 break;
786
787 case 8:
Jarod Wilson4e033a62009-05-27 15:10:21 +1000788 ret += tcrypt_test("ecb(twofish)");
789 ret += tcrypt_test("cbc(twofish)");
Linus Torvalds1da177e2005-04-16 15:20:36 -0700790 break;
Herbert Xuef2736f2005-06-22 13:26:03 -0700791
Linus Torvalds1da177e2005-04-16 15:20:36 -0700792 case 9:
Jarod Wilson4e033a62009-05-27 15:10:21 +1000793 ret += tcrypt_test("ecb(serpent)");
Linus Torvalds1da177e2005-04-16 15:20:36 -0700794 break;
795
796 case 10:
Jarod Wilson4e033a62009-05-27 15:10:21 +1000797 ret += tcrypt_test("ecb(aes)");
798 ret += tcrypt_test("cbc(aes)");
799 ret += tcrypt_test("lrw(aes)");
800 ret += tcrypt_test("xts(aes)");
801 ret += tcrypt_test("ctr(aes)");
802 ret += tcrypt_test("rfc3686(ctr(aes))");
Linus Torvalds1da177e2005-04-16 15:20:36 -0700803 break;
804
805 case 11:
Jarod Wilson4e033a62009-05-27 15:10:21 +1000806 ret += tcrypt_test("sha384");
Linus Torvalds1da177e2005-04-16 15:20:36 -0700807 break;
Herbert Xuef2736f2005-06-22 13:26:03 -0700808
Linus Torvalds1da177e2005-04-16 15:20:36 -0700809 case 12:
Jarod Wilson4e033a62009-05-27 15:10:21 +1000810 ret += tcrypt_test("sha512");
Linus Torvalds1da177e2005-04-16 15:20:36 -0700811 break;
812
813 case 13:
Jarod Wilson4e033a62009-05-27 15:10:21 +1000814 ret += tcrypt_test("deflate");
Linus Torvalds1da177e2005-04-16 15:20:36 -0700815 break;
816
817 case 14:
Jarod Wilson4e033a62009-05-27 15:10:21 +1000818 ret += tcrypt_test("ecb(cast5)");
Linus Torvalds1da177e2005-04-16 15:20:36 -0700819 break;
820
821 case 15:
Jarod Wilson4e033a62009-05-27 15:10:21 +1000822 ret += tcrypt_test("ecb(cast6)");
Linus Torvalds1da177e2005-04-16 15:20:36 -0700823 break;
824
825 case 16:
Jarod Wilson4e033a62009-05-27 15:10:21 +1000826 ret += tcrypt_test("ecb(arc4)");
Linus Torvalds1da177e2005-04-16 15:20:36 -0700827 break;
828
829 case 17:
Jarod Wilson4e033a62009-05-27 15:10:21 +1000830 ret += tcrypt_test("michael_mic");
Linus Torvalds1da177e2005-04-16 15:20:36 -0700831 break;
832
833 case 18:
Jarod Wilson4e033a62009-05-27 15:10:21 +1000834 ret += tcrypt_test("crc32c");
Linus Torvalds1da177e2005-04-16 15:20:36 -0700835 break;
836
837 case 19:
Jarod Wilson4e033a62009-05-27 15:10:21 +1000838 ret += tcrypt_test("ecb(tea)");
Linus Torvalds1da177e2005-04-16 15:20:36 -0700839 break;
840
841 case 20:
Jarod Wilson4e033a62009-05-27 15:10:21 +1000842 ret += tcrypt_test("ecb(xtea)");
Linus Torvalds1da177e2005-04-16 15:20:36 -0700843 break;
844
845 case 21:
Jarod Wilson4e033a62009-05-27 15:10:21 +1000846 ret += tcrypt_test("ecb(khazad)");
Linus Torvalds1da177e2005-04-16 15:20:36 -0700847 break;
848
849 case 22:
Jarod Wilson4e033a62009-05-27 15:10:21 +1000850 ret += tcrypt_test("wp512");
Linus Torvalds1da177e2005-04-16 15:20:36 -0700851 break;
852
853 case 23:
Jarod Wilson4e033a62009-05-27 15:10:21 +1000854 ret += tcrypt_test("wp384");
Linus Torvalds1da177e2005-04-16 15:20:36 -0700855 break;
856
857 case 24:
Jarod Wilson4e033a62009-05-27 15:10:21 +1000858 ret += tcrypt_test("wp256");
Linus Torvalds1da177e2005-04-16 15:20:36 -0700859 break;
860
861 case 25:
Jarod Wilson4e033a62009-05-27 15:10:21 +1000862 ret += tcrypt_test("ecb(tnepres)");
Linus Torvalds1da177e2005-04-16 15:20:36 -0700863 break;
864
865 case 26:
Jarod Wilson4e033a62009-05-27 15:10:21 +1000866 ret += tcrypt_test("ecb(anubis)");
867 ret += tcrypt_test("cbc(anubis)");
Linus Torvalds1da177e2005-04-16 15:20:36 -0700868 break;
869
870 case 27:
Jarod Wilson4e033a62009-05-27 15:10:21 +1000871 ret += tcrypt_test("tgr192");
Linus Torvalds1da177e2005-04-16 15:20:36 -0700872 break;
873
874 case 28:
875
Jarod Wilson4e033a62009-05-27 15:10:21 +1000876 ret += tcrypt_test("tgr160");
Linus Torvalds1da177e2005-04-16 15:20:36 -0700877 break;
878
879 case 29:
Jarod Wilson4e033a62009-05-27 15:10:21 +1000880 ret += tcrypt_test("tgr128");
Linus Torvalds1da177e2005-04-16 15:20:36 -0700881 break;
Adrian-Ken Rueegsegger2998db32008-05-09 21:29:35 +0800882
Aaron Grothefb4f10e2005-09-01 17:42:46 -0700883 case 30:
Jarod Wilson4e033a62009-05-27 15:10:21 +1000884 ret += tcrypt_test("ecb(xeta)");
Aaron Grothefb4f10e2005-09-01 17:42:46 -0700885 break;
Linus Torvalds1da177e2005-04-16 15:20:36 -0700886
David Howells90831632006-12-16 12:13:14 +1100887 case 31:
Jarod Wilson4e033a62009-05-27 15:10:21 +1000888 ret += tcrypt_test("pcbc(fcrypt)");
David Howells90831632006-12-16 12:13:14 +1100889 break;
890
Noriaki TAKAMIYA02ab5a72007-01-24 21:48:19 +1100891 case 32:
Jarod Wilson4e033a62009-05-27 15:10:21 +1000892 ret += tcrypt_test("ecb(camellia)");
893 ret += tcrypt_test("cbc(camellia)");
Noriaki TAKAMIYA02ab5a72007-01-24 21:48:19 +1100894 break;
Jonathan Lynchcd12fb92007-11-10 20:08:25 +0800895 case 33:
Jarod Wilson4e033a62009-05-27 15:10:21 +1000896 ret += tcrypt_test("sha224");
Jonathan Lynchcd12fb92007-11-10 20:08:25 +0800897 break;
Noriaki TAKAMIYA02ab5a72007-01-24 21:48:19 +1100898
Tan Swee Heng2407d602007-11-23 19:45:00 +0800899 case 34:
Jarod Wilson4e033a62009-05-27 15:10:21 +1000900 ret += tcrypt_test("salsa20");
Tan Swee Heng2407d602007-11-23 19:45:00 +0800901 break;
902
Herbert Xu8df213d2007-12-02 14:55:47 +1100903 case 35:
Jarod Wilson4e033a62009-05-27 15:10:21 +1000904 ret += tcrypt_test("gcm(aes)");
Herbert Xu8df213d2007-12-02 14:55:47 +1100905 break;
906
Zoltan Sogor0b77abb2007-12-07 16:53:23 +0800907 case 36:
Jarod Wilson4e033a62009-05-27 15:10:21 +1000908 ret += tcrypt_test("lzo");
Zoltan Sogor0b77abb2007-12-07 16:53:23 +0800909 break;
910
Joy Latten93cc74e2007-12-12 20:24:22 +0800911 case 37:
Jarod Wilson4e033a62009-05-27 15:10:21 +1000912 ret += tcrypt_test("ccm(aes)");
Joy Latten93cc74e2007-12-12 20:24:22 +0800913 break;
914
Kevin Coffman76cb9522008-03-24 21:26:16 +0800915 case 38:
Jarod Wilson4e033a62009-05-27 15:10:21 +1000916 ret += tcrypt_test("cts(cbc(aes))");
Kevin Coffman76cb9522008-03-24 21:26:16 +0800917 break;
918
Adrian-Ken Rueegseggerfd4adf12008-05-07 22:16:36 +0800919 case 39:
Jarod Wilson4e033a62009-05-27 15:10:21 +1000920 ret += tcrypt_test("rmd128");
Adrian-Ken Rueegseggerfd4adf12008-05-07 22:16:36 +0800921 break;
922
923 case 40:
Jarod Wilson4e033a62009-05-27 15:10:21 +1000924 ret += tcrypt_test("rmd160");
Adrian-Ken Rueegseggerfd4adf12008-05-07 22:16:36 +0800925 break;
926
Adrian-Ken Rueegsegger2998db32008-05-09 21:29:35 +0800927 case 41:
Jarod Wilson4e033a62009-05-27 15:10:21 +1000928 ret += tcrypt_test("rmd256");
Adrian-Ken Rueegsegger2998db32008-05-09 21:29:35 +0800929 break;
930
931 case 42:
Jarod Wilson4e033a62009-05-27 15:10:21 +1000932 ret += tcrypt_test("rmd320");
Herbert Xu01b32322008-07-31 15:41:55 +0800933 break;
934
935 case 43:
Jarod Wilson4e033a62009-05-27 15:10:21 +1000936 ret += tcrypt_test("ecb(seed)");
Adrian-Ken Rueegsegger2998db32008-05-09 21:29:35 +0800937 break;
938
Geert Uytterhoeven0c01aed2009-03-04 15:42:15 +0800939 case 44:
Jarod Wilson4e033a62009-05-27 15:10:21 +1000940 ret += tcrypt_test("zlib");
Geert Uytterhoeven0c01aed2009-03-04 15:42:15 +0800941 break;
942
Jarod Wilson5d667322009-05-04 19:23:40 +0800943 case 45:
Jarod Wilson4e033a62009-05-27 15:10:21 +1000944 ret += tcrypt_test("rfc4309(ccm(aes))");
Jarod Wilson5d667322009-05-04 19:23:40 +0800945 break;
946
Linus Torvalds1da177e2005-04-16 15:20:36 -0700947 case 100:
Jarod Wilson4e033a62009-05-27 15:10:21 +1000948 ret += tcrypt_test("hmac(md5)");
Linus Torvalds1da177e2005-04-16 15:20:36 -0700949 break;
Herbert Xuef2736f2005-06-22 13:26:03 -0700950
Linus Torvalds1da177e2005-04-16 15:20:36 -0700951 case 101:
Jarod Wilson4e033a62009-05-27 15:10:21 +1000952 ret += tcrypt_test("hmac(sha1)");
Linus Torvalds1da177e2005-04-16 15:20:36 -0700953 break;
Herbert Xuef2736f2005-06-22 13:26:03 -0700954
Linus Torvalds1da177e2005-04-16 15:20:36 -0700955 case 102:
Jarod Wilson4e033a62009-05-27 15:10:21 +1000956 ret += tcrypt_test("hmac(sha256)");
Linus Torvalds1da177e2005-04-16 15:20:36 -0700957 break;
958
Andrew Donofrioa28091a2006-12-10 12:10:20 +1100959 case 103:
Jarod Wilson4e033a62009-05-27 15:10:21 +1000960 ret += tcrypt_test("hmac(sha384)");
Andrew Donofrioa28091a2006-12-10 12:10:20 +1100961 break;
962
963 case 104:
Jarod Wilson4e033a62009-05-27 15:10:21 +1000964 ret += tcrypt_test("hmac(sha512)");
Andrew Donofrioa28091a2006-12-10 12:10:20 +1100965 break;
Herbert Xu38ed9ab2008-01-01 15:59:28 +1100966
Jonathan Lynchcd12fb92007-11-10 20:08:25 +0800967 case 105:
Jarod Wilson4e033a62009-05-27 15:10:21 +1000968 ret += tcrypt_test("hmac(sha224)");
Jonathan Lynchcd12fb92007-11-10 20:08:25 +0800969 break;
Linus Torvalds1da177e2005-04-16 15:20:36 -0700970
Herbert Xu38ed9ab2008-01-01 15:59:28 +1100971 case 106:
Jarod Wilson4e033a62009-05-27 15:10:21 +1000972 ret += tcrypt_test("xcbc(aes)");
Herbert Xu38ed9ab2008-01-01 15:59:28 +1100973 break;
974
Adrian-Ken Rueegseggerfd4adf12008-05-07 22:16:36 +0800975 case 107:
Jarod Wilson4e033a62009-05-27 15:10:21 +1000976 ret += tcrypt_test("hmac(rmd128)");
Adrian-Ken Rueegseggerfd4adf12008-05-07 22:16:36 +0800977 break;
978
979 case 108:
Jarod Wilson4e033a62009-05-27 15:10:21 +1000980 ret += tcrypt_test("hmac(rmd160)");
Adrian-Ken Rueegseggerfd4adf12008-05-07 22:16:36 +0800981 break;
982
Shane Wangf1939f72009-09-02 20:05:22 +1000983 case 109:
984 ret += tcrypt_test("vmac(aes)");
985 break;
986
Jarod Wilsone08ca2d2009-05-04 19:46:29 +0800987 case 150:
Jarod Wilson4e033a62009-05-27 15:10:21 +1000988 ret += tcrypt_test("ansi_cprng");
Jarod Wilsone08ca2d2009-05-04 19:46:29 +0800989 break;
990
Adrian Hoban69435b92010-11-04 15:02:04 -0400991 case 151:
992 ret += tcrypt_test("rfc4106(gcm(aes))");
993 break;
994
Harald Welteebfd9bc2005-06-22 13:27:23 -0700995 case 200:
Herbert Xucba83562006-08-13 08:26:09 +1000996 test_cipher_speed("ecb(aes)", ENCRYPT, sec, NULL, 0,
Sebastian Siewior477035c2008-03-11 21:24:26 +0800997 speed_template_16_24_32);
Herbert Xucba83562006-08-13 08:26:09 +1000998 test_cipher_speed("ecb(aes)", DECRYPT, 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("cbc(aes)", ENCRYPT, 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)", DECRYPT, sec, NULL, 0,
Sebastian Siewior477035c2008-03-11 21:24:26 +08001003 speed_template_16_24_32);
Rik Snelf3d10442006-11-29 19:01:41 +11001004 test_cipher_speed("lrw(aes)", ENCRYPT, sec, NULL, 0,
Sebastian Siewior477035c2008-03-11 21:24:26 +08001005 speed_template_32_40_48);
Rik Snelf3d10442006-11-29 19:01:41 +11001006 test_cipher_speed("lrw(aes)", DECRYPT, sec, NULL, 0,
Sebastian Siewior477035c2008-03-11 21:24:26 +08001007 speed_template_32_40_48);
Rik Snelf19f5112007-09-19 20:23:13 +08001008 test_cipher_speed("xts(aes)", ENCRYPT, sec, NULL, 0,
Sebastian Siewior477035c2008-03-11 21:24:26 +08001009 speed_template_32_48_64);
Rik Snelf19f5112007-09-19 20:23:13 +08001010 test_cipher_speed("xts(aes)", DECRYPT, sec, NULL, 0,
Sebastian Siewior477035c2008-03-11 21:24:26 +08001011 speed_template_32_48_64);
Jan Glauber9996e342011-04-26 16:34:01 +10001012 test_cipher_speed("ctr(aes)", ENCRYPT, sec, NULL, 0,
1013 speed_template_16_24_32);
1014 test_cipher_speed("ctr(aes)", DECRYPT, sec, NULL, 0,
1015 speed_template_16_24_32);
Harald Welteebfd9bc2005-06-22 13:27:23 -07001016 break;
1017
1018 case 201:
Herbert Xucba83562006-08-13 08:26:09 +10001019 test_cipher_speed("ecb(des3_ede)", ENCRYPT, sec,
Herbert Xuda7f0332008-07-31 17:08:25 +08001020 des3_speed_template, DES3_SPEED_VECTORS,
Sebastian Siewior477035c2008-03-11 21:24:26 +08001021 speed_template_24);
Herbert Xucba83562006-08-13 08:26:09 +10001022 test_cipher_speed("ecb(des3_ede)", DECRYPT, sec,
Herbert Xuda7f0332008-07-31 17:08:25 +08001023 des3_speed_template, DES3_SPEED_VECTORS,
Sebastian Siewior477035c2008-03-11 21:24:26 +08001024 speed_template_24);
Herbert Xucba83562006-08-13 08:26:09 +10001025 test_cipher_speed("cbc(des3_ede)", ENCRYPT, sec,
Herbert Xuda7f0332008-07-31 17:08:25 +08001026 des3_speed_template, DES3_SPEED_VECTORS,
Sebastian Siewior477035c2008-03-11 21:24:26 +08001027 speed_template_24);
Herbert Xucba83562006-08-13 08:26:09 +10001028 test_cipher_speed("cbc(des3_ede)", DECRYPT, sec,
Herbert Xuda7f0332008-07-31 17:08:25 +08001029 des3_speed_template, DES3_SPEED_VECTORS,
Sebastian Siewior477035c2008-03-11 21:24:26 +08001030 speed_template_24);
Harald Welteebfd9bc2005-06-22 13:27:23 -07001031 break;
1032
1033 case 202:
Herbert Xucba83562006-08-13 08:26:09 +10001034 test_cipher_speed("ecb(twofish)", ENCRYPT, sec, NULL, 0,
Sebastian Siewior477035c2008-03-11 21:24:26 +08001035 speed_template_16_24_32);
Herbert Xucba83562006-08-13 08:26:09 +10001036 test_cipher_speed("ecb(twofish)", DECRYPT, 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("cbc(twofish)", ENCRYPT, 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)", DECRYPT, sec, NULL, 0,
Sebastian Siewior477035c2008-03-11 21:24:26 +08001041 speed_template_16_24_32);
Harald Welteebfd9bc2005-06-22 13:27:23 -07001042 break;
1043
1044 case 203:
Herbert Xucba83562006-08-13 08:26:09 +10001045 test_cipher_speed("ecb(blowfish)", ENCRYPT, sec, NULL, 0,
Sebastian Siewior477035c2008-03-11 21:24:26 +08001046 speed_template_8_32);
Herbert Xucba83562006-08-13 08:26:09 +10001047 test_cipher_speed("ecb(blowfish)", DECRYPT, sec, NULL, 0,
Sebastian Siewior477035c2008-03-11 21:24:26 +08001048 speed_template_8_32);
Herbert Xucba83562006-08-13 08:26:09 +10001049 test_cipher_speed("cbc(blowfish)", ENCRYPT, sec, NULL, 0,
Sebastian Siewior477035c2008-03-11 21:24:26 +08001050 speed_template_8_32);
Herbert Xucba83562006-08-13 08:26:09 +10001051 test_cipher_speed("cbc(blowfish)", DECRYPT, sec, NULL, 0,
Sebastian Siewior477035c2008-03-11 21:24:26 +08001052 speed_template_8_32);
Jussi Kivilinna7d47b862011-09-02 01:45:17 +03001053 test_cipher_speed("ctr(blowfish)", ENCRYPT, sec, NULL, 0,
1054 speed_template_8_32);
1055 test_cipher_speed("ctr(blowfish)", DECRYPT, sec, NULL, 0,
1056 speed_template_8_32);
Harald Welteebfd9bc2005-06-22 13:27:23 -07001057 break;
1058
1059 case 204:
Herbert Xucba83562006-08-13 08:26:09 +10001060 test_cipher_speed("ecb(des)", ENCRYPT, sec, NULL, 0,
Sebastian Siewior477035c2008-03-11 21:24:26 +08001061 speed_template_8);
Herbert Xucba83562006-08-13 08:26:09 +10001062 test_cipher_speed("ecb(des)", DECRYPT, sec, NULL, 0,
Sebastian Siewior477035c2008-03-11 21:24:26 +08001063 speed_template_8);
Herbert Xucba83562006-08-13 08:26:09 +10001064 test_cipher_speed("cbc(des)", ENCRYPT, sec, NULL, 0,
Sebastian Siewior477035c2008-03-11 21:24:26 +08001065 speed_template_8);
Herbert Xucba83562006-08-13 08:26:09 +10001066 test_cipher_speed("cbc(des)", DECRYPT, sec, NULL, 0,
Sebastian Siewior477035c2008-03-11 21:24:26 +08001067 speed_template_8);
Harald Welteebfd9bc2005-06-22 13:27:23 -07001068 break;
1069
Noriaki TAKAMIYA02ab5a72007-01-24 21:48:19 +11001070 case 205:
1071 test_cipher_speed("ecb(camellia)", ENCRYPT, sec, NULL, 0,
Sebastian Siewior477035c2008-03-11 21:24:26 +08001072 speed_template_16_24_32);
Noriaki TAKAMIYA02ab5a72007-01-24 21:48:19 +11001073 test_cipher_speed("ecb(camellia)", DECRYPT, sec, NULL, 0,
Sebastian Siewior477035c2008-03-11 21:24:26 +08001074 speed_template_16_24_32);
Noriaki TAKAMIYA02ab5a72007-01-24 21:48:19 +11001075 test_cipher_speed("cbc(camellia)", ENCRYPT, sec, NULL, 0,
Sebastian Siewior477035c2008-03-11 21:24:26 +08001076 speed_template_16_24_32);
Noriaki TAKAMIYA02ab5a72007-01-24 21:48:19 +11001077 test_cipher_speed("cbc(camellia)", DECRYPT, sec, NULL, 0,
Sebastian Siewior477035c2008-03-11 21:24:26 +08001078 speed_template_16_24_32);
Noriaki TAKAMIYA02ab5a72007-01-24 21:48:19 +11001079 break;
1080
Tan Swee Heng5de8f1b2007-12-07 17:17:43 +08001081 case 206:
1082 test_cipher_speed("salsa20", ENCRYPT, sec, NULL, 0,
Sebastian Siewior477035c2008-03-11 21:24:26 +08001083 speed_template_16_32);
Tan Swee Heng5de8f1b2007-12-07 17:17:43 +08001084 break;
1085
Michal Ludvige8057922006-05-30 22:04:19 +10001086 case 300:
1087 /* fall through */
1088
1089 case 301:
Herbert Xue9d41162006-08-19 21:38:49 +10001090 test_hash_speed("md4", sec, generic_hash_speed_template);
Michal Ludvige8057922006-05-30 22:04:19 +10001091 if (mode > 300 && mode < 400) break;
1092
1093 case 302:
Herbert Xue9d41162006-08-19 21:38:49 +10001094 test_hash_speed("md5", sec, generic_hash_speed_template);
Michal Ludvige8057922006-05-30 22:04:19 +10001095 if (mode > 300 && mode < 400) break;
1096
1097 case 303:
Herbert Xue9d41162006-08-19 21:38:49 +10001098 test_hash_speed("sha1", sec, generic_hash_speed_template);
Michal Ludvige8057922006-05-30 22:04:19 +10001099 if (mode > 300 && mode < 400) break;
1100
1101 case 304:
Herbert Xue9d41162006-08-19 21:38:49 +10001102 test_hash_speed("sha256", sec, generic_hash_speed_template);
Michal Ludvige8057922006-05-30 22:04:19 +10001103 if (mode > 300 && mode < 400) break;
1104
1105 case 305:
Herbert Xue9d41162006-08-19 21:38:49 +10001106 test_hash_speed("sha384", sec, generic_hash_speed_template);
Michal Ludvige8057922006-05-30 22:04:19 +10001107 if (mode > 300 && mode < 400) break;
1108
1109 case 306:
Herbert Xue9d41162006-08-19 21:38:49 +10001110 test_hash_speed("sha512", sec, generic_hash_speed_template);
Michal Ludvige8057922006-05-30 22:04:19 +10001111 if (mode > 300 && mode < 400) break;
1112
1113 case 307:
Herbert Xue9d41162006-08-19 21:38:49 +10001114 test_hash_speed("wp256", sec, generic_hash_speed_template);
Michal Ludvige8057922006-05-30 22:04:19 +10001115 if (mode > 300 && mode < 400) break;
1116
1117 case 308:
Herbert Xue9d41162006-08-19 21:38:49 +10001118 test_hash_speed("wp384", sec, generic_hash_speed_template);
Michal Ludvige8057922006-05-30 22:04:19 +10001119 if (mode > 300 && mode < 400) break;
1120
1121 case 309:
Herbert Xue9d41162006-08-19 21:38:49 +10001122 test_hash_speed("wp512", sec, generic_hash_speed_template);
Michal Ludvige8057922006-05-30 22:04:19 +10001123 if (mode > 300 && mode < 400) break;
1124
1125 case 310:
Herbert Xue9d41162006-08-19 21:38:49 +10001126 test_hash_speed("tgr128", sec, generic_hash_speed_template);
Michal Ludvige8057922006-05-30 22:04:19 +10001127 if (mode > 300 && mode < 400) break;
1128
1129 case 311:
Herbert Xue9d41162006-08-19 21:38:49 +10001130 test_hash_speed("tgr160", sec, generic_hash_speed_template);
Michal Ludvige8057922006-05-30 22:04:19 +10001131 if (mode > 300 && mode < 400) break;
1132
1133 case 312:
Herbert Xue9d41162006-08-19 21:38:49 +10001134 test_hash_speed("tgr192", sec, generic_hash_speed_template);
Michal Ludvige8057922006-05-30 22:04:19 +10001135 if (mode > 300 && mode < 400) break;
1136
Jonathan Lynchcd12fb92007-11-10 20:08:25 +08001137 case 313:
1138 test_hash_speed("sha224", sec, generic_hash_speed_template);
1139 if (mode > 300 && mode < 400) break;
1140
Adrian-Ken Rueegseggerfd4adf12008-05-07 22:16:36 +08001141 case 314:
1142 test_hash_speed("rmd128", sec, generic_hash_speed_template);
1143 if (mode > 300 && mode < 400) break;
1144
1145 case 315:
1146 test_hash_speed("rmd160", sec, generic_hash_speed_template);
1147 if (mode > 300 && mode < 400) break;
1148
Adrian-Ken Rueegsegger2998db32008-05-09 21:29:35 +08001149 case 316:
1150 test_hash_speed("rmd256", sec, generic_hash_speed_template);
1151 if (mode > 300 && mode < 400) break;
1152
1153 case 317:
1154 test_hash_speed("rmd320", sec, generic_hash_speed_template);
1155 if (mode > 300 && mode < 400) break;
1156
Huang Ying18bcc912010-03-10 18:30:32 +08001157 case 318:
1158 test_hash_speed("ghash-generic", sec, hash_speed_template_16);
1159 if (mode > 300 && mode < 400) break;
1160
Michal Ludvige8057922006-05-30 22:04:19 +10001161 case 399:
1162 break;
1163
David S. Millerbeb63da2010-05-19 14:11:21 +10001164 case 400:
1165 /* fall through */
1166
1167 case 401:
1168 test_ahash_speed("md4", sec, generic_hash_speed_template);
1169 if (mode > 400 && mode < 500) break;
1170
1171 case 402:
1172 test_ahash_speed("md5", sec, generic_hash_speed_template);
1173 if (mode > 400 && mode < 500) break;
1174
1175 case 403:
1176 test_ahash_speed("sha1", sec, generic_hash_speed_template);
1177 if (mode > 400 && mode < 500) break;
1178
1179 case 404:
1180 test_ahash_speed("sha256", sec, generic_hash_speed_template);
1181 if (mode > 400 && mode < 500) break;
1182
1183 case 405:
1184 test_ahash_speed("sha384", sec, generic_hash_speed_template);
1185 if (mode > 400 && mode < 500) break;
1186
1187 case 406:
1188 test_ahash_speed("sha512", sec, generic_hash_speed_template);
1189 if (mode > 400 && mode < 500) break;
1190
1191 case 407:
1192 test_ahash_speed("wp256", sec, generic_hash_speed_template);
1193 if (mode > 400 && mode < 500) break;
1194
1195 case 408:
1196 test_ahash_speed("wp384", sec, generic_hash_speed_template);
1197 if (mode > 400 && mode < 500) break;
1198
1199 case 409:
1200 test_ahash_speed("wp512", sec, generic_hash_speed_template);
1201 if (mode > 400 && mode < 500) break;
1202
1203 case 410:
1204 test_ahash_speed("tgr128", sec, generic_hash_speed_template);
1205 if (mode > 400 && mode < 500) break;
1206
1207 case 411:
1208 test_ahash_speed("tgr160", sec, generic_hash_speed_template);
1209 if (mode > 400 && mode < 500) break;
1210
1211 case 412:
1212 test_ahash_speed("tgr192", sec, generic_hash_speed_template);
1213 if (mode > 400 && mode < 500) break;
1214
1215 case 413:
1216 test_ahash_speed("sha224", sec, generic_hash_speed_template);
1217 if (mode > 400 && mode < 500) break;
1218
1219 case 414:
1220 test_ahash_speed("rmd128", sec, generic_hash_speed_template);
1221 if (mode > 400 && mode < 500) break;
1222
1223 case 415:
1224 test_ahash_speed("rmd160", sec, generic_hash_speed_template);
1225 if (mode > 400 && mode < 500) break;
1226
1227 case 416:
1228 test_ahash_speed("rmd256", sec, generic_hash_speed_template);
1229 if (mode > 400 && mode < 500) break;
1230
1231 case 417:
1232 test_ahash_speed("rmd320", sec, generic_hash_speed_template);
1233 if (mode > 400 && mode < 500) break;
1234
1235 case 499:
1236 break;
1237
Linus Torvalds1da177e2005-04-16 15:20:36 -07001238 case 1000:
1239 test_available();
1240 break;
Linus Torvalds1da177e2005-04-16 15:20:36 -07001241 }
Jarod Wilson4e033a62009-05-27 15:10:21 +10001242
1243 return ret;
Linus Torvalds1da177e2005-04-16 15:20:36 -07001244}
1245
Herbert Xu7be380f2009-07-14 16:06:54 +08001246static int do_alg_test(const char *alg, u32 type, u32 mask)
Steffen Klasserta873a5f2009-06-19 19:46:53 +08001247{
Herbert Xu7be380f2009-07-14 16:06:54 +08001248 return crypto_has_alg(alg, type, mask ?: CRYPTO_ALG_TYPE_MASK) ?
1249 0 : -ENOENT;
Steffen Klasserta873a5f2009-06-19 19:46:53 +08001250}
1251
Kamalesh Babulal3af5b902008-04-05 21:00:57 +08001252static int __init tcrypt_mod_init(void)
Linus Torvalds1da177e2005-04-16 15:20:36 -07001253{
Mikko Herranene3a4ea42007-11-26 22:12:07 +08001254 int err = -ENOMEM;
Herbert Xuf139cfa2008-07-31 12:23:53 +08001255 int i;
Mikko Herranene3a4ea42007-11-26 22:12:07 +08001256
Herbert Xuf139cfa2008-07-31 12:23:53 +08001257 for (i = 0; i < TVMEMSIZE; i++) {
1258 tvmem[i] = (void *)__get_free_page(GFP_KERNEL);
1259 if (!tvmem[i])
1260 goto err_free_tv;
1261 }
Linus Torvalds1da177e2005-04-16 15:20:36 -07001262
Steffen Klasserta873a5f2009-06-19 19:46:53 +08001263 if (alg)
Herbert Xu7be380f2009-07-14 16:06:54 +08001264 err = do_alg_test(alg, type, mask);
Steffen Klasserta873a5f2009-06-19 19:46:53 +08001265 else
1266 err = do_test(mode);
1267
Jarod Wilson4e033a62009-05-27 15:10:21 +10001268 if (err) {
1269 printk(KERN_ERR "tcrypt: one or more tests failed!\n");
1270 goto err_free_tv;
1271 }
Linus Torvalds1da177e2005-04-16 15:20:36 -07001272
Jarod Wilson4e033a62009-05-27 15:10:21 +10001273 /* We intentionaly return -EAGAIN to prevent keeping the module,
1274 * unless we're running in fips mode. It does all its work from
1275 * init() and doesn't offer any runtime functionality, but in
1276 * the fips case, checking for a successful load is helpful.
Michal Ludvig14fdf472006-05-30 14:49:38 +10001277 * => we don't need it in the memory, do we?
1278 * -- mludvig
1279 */
Jarod Wilson4e033a62009-05-27 15:10:21 +10001280 if (!fips_enabled)
1281 err = -EAGAIN;
Mikko Herranene3a4ea42007-11-26 22:12:07 +08001282
Herbert Xuf139cfa2008-07-31 12:23:53 +08001283err_free_tv:
1284 for (i = 0; i < TVMEMSIZE && tvmem[i]; i++)
1285 free_page((unsigned long)tvmem[i]);
Mikko Herranene3a4ea42007-11-26 22:12:07 +08001286
1287 return err;
Linus Torvalds1da177e2005-04-16 15:20:36 -07001288}
1289
1290/*
1291 * If an init function is provided, an exit function must also be provided
1292 * to allow module unload.
1293 */
Kamalesh Babulal3af5b902008-04-05 21:00:57 +08001294static void __exit tcrypt_mod_fini(void) { }
Linus Torvalds1da177e2005-04-16 15:20:36 -07001295
Kamalesh Babulal3af5b902008-04-05 21:00:57 +08001296module_init(tcrypt_mod_init);
1297module_exit(tcrypt_mod_fini);
Linus Torvalds1da177e2005-04-16 15:20:36 -07001298
Steffen Klasserta873a5f2009-06-19 19:46:53 +08001299module_param(alg, charp, 0);
1300module_param(type, uint, 0);
Herbert Xu7be380f2009-07-14 16:06:54 +08001301module_param(mask, uint, 0);
Linus Torvalds1da177e2005-04-16 15:20:36 -07001302module_param(mode, int, 0);
Harald Welteebfd9bc2005-06-22 13:27:23 -07001303module_param(sec, uint, 0);
Herbert Xu6a179442005-06-22 13:29:03 -07001304MODULE_PARM_DESC(sec, "Length in seconds of speed tests "
1305 "(defaults to zero which uses CPU cycles instead)");
Linus Torvalds1da177e2005-04-16 15:20:36 -07001306
1307MODULE_LICENSE("GPL");
1308MODULE_DESCRIPTION("Quick & dirty crypto testing module");
1309MODULE_AUTHOR("James Morris <jmorris@intercode.com.au>");