Linux-libre 4.9.135-gnu
[librecmc/linux-libre.git] / drivers / crypto / qce / sha.c
1 /*
2  * Copyright (c) 2010-2014, The Linux Foundation. All rights reserved.
3  *
4  * This program is free software; you can redistribute it and/or modify
5  * it under the terms of the GNU General Public License version 2 and
6  * only version 2 as published by the Free Software Foundation.
7  *
8  * This program is distributed in the hope that it will be useful,
9  * but WITHOUT ANY WARRANTY; without even the implied warranty of
10  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
11  * GNU General Public License for more details.
12  */
13
14 #include <linux/device.h>
15 #include <linux/interrupt.h>
16 #include <crypto/internal/hash.h>
17
18 #include "common.h"
19 #include "core.h"
20 #include "sha.h"
21
22 /* crypto hw padding constant for first operation */
23 #define SHA_PADDING             64
24 #define SHA_PADDING_MASK        (SHA_PADDING - 1)
25
26 static LIST_HEAD(ahash_algs);
27
28 static const u32 std_iv_sha1[SHA256_DIGEST_SIZE / sizeof(u32)] = {
29         SHA1_H0, SHA1_H1, SHA1_H2, SHA1_H3, SHA1_H4, 0, 0, 0
30 };
31
32 static const u32 std_iv_sha256[SHA256_DIGEST_SIZE / sizeof(u32)] = {
33         SHA256_H0, SHA256_H1, SHA256_H2, SHA256_H3,
34         SHA256_H4, SHA256_H5, SHA256_H6, SHA256_H7
35 };
36
37 static void qce_ahash_done(void *data)
38 {
39         struct crypto_async_request *async_req = data;
40         struct ahash_request *req = ahash_request_cast(async_req);
41         struct crypto_ahash *ahash = crypto_ahash_reqtfm(req);
42         struct qce_sha_reqctx *rctx = ahash_request_ctx(req);
43         struct qce_alg_template *tmpl = to_ahash_tmpl(async_req->tfm);
44         struct qce_device *qce = tmpl->qce;
45         struct qce_result_dump *result = qce->dma.result_buf;
46         unsigned int digestsize = crypto_ahash_digestsize(ahash);
47         int error;
48         u32 status;
49
50         error = qce_dma_terminate_all(&qce->dma);
51         if (error)
52                 dev_dbg(qce->dev, "ahash dma termination error (%d)\n", error);
53
54         dma_unmap_sg(qce->dev, req->src, rctx->src_nents, DMA_TO_DEVICE);
55         dma_unmap_sg(qce->dev, &rctx->result_sg, 1, DMA_FROM_DEVICE);
56
57         memcpy(rctx->digest, result->auth_iv, digestsize);
58         if (req->result)
59                 memcpy(req->result, result->auth_iv, digestsize);
60
61         rctx->byte_count[0] = cpu_to_be32(result->auth_byte_count[0]);
62         rctx->byte_count[1] = cpu_to_be32(result->auth_byte_count[1]);
63
64         error = qce_check_status(qce, &status);
65         if (error < 0)
66                 dev_dbg(qce->dev, "ahash operation error (%x)\n", status);
67
68         req->src = rctx->src_orig;
69         req->nbytes = rctx->nbytes_orig;
70         rctx->last_blk = false;
71         rctx->first_blk = false;
72
73         qce->async_req_done(tmpl->qce, error);
74 }
75
76 static int qce_ahash_async_req_handle(struct crypto_async_request *async_req)
77 {
78         struct ahash_request *req = ahash_request_cast(async_req);
79         struct qce_sha_reqctx *rctx = ahash_request_ctx(req);
80         struct qce_sha_ctx *ctx = crypto_tfm_ctx(async_req->tfm);
81         struct qce_alg_template *tmpl = to_ahash_tmpl(async_req->tfm);
82         struct qce_device *qce = tmpl->qce;
83         unsigned long flags = rctx->flags;
84         int ret;
85
86         if (IS_SHA_HMAC(flags)) {
87                 rctx->authkey = ctx->authkey;
88                 rctx->authklen = QCE_SHA_HMAC_KEY_SIZE;
89         } else if (IS_CMAC(flags)) {
90                 rctx->authkey = ctx->authkey;
91                 rctx->authklen = AES_KEYSIZE_128;
92         }
93
94         rctx->src_nents = sg_nents_for_len(req->src, req->nbytes);
95         if (rctx->src_nents < 0) {
96                 dev_err(qce->dev, "Invalid numbers of src SG.\n");
97                 return rctx->src_nents;
98         }
99
100         ret = dma_map_sg(qce->dev, req->src, rctx->src_nents, DMA_TO_DEVICE);
101         if (ret < 0)
102                 return ret;
103
104         sg_init_one(&rctx->result_sg, qce->dma.result_buf, QCE_RESULT_BUF_SZ);
105
106         ret = dma_map_sg(qce->dev, &rctx->result_sg, 1, DMA_FROM_DEVICE);
107         if (ret < 0)
108                 goto error_unmap_src;
109
110         ret = qce_dma_prep_sgs(&qce->dma, req->src, rctx->src_nents,
111                                &rctx->result_sg, 1, qce_ahash_done, async_req);
112         if (ret)
113                 goto error_unmap_dst;
114
115         qce_dma_issue_pending(&qce->dma);
116
117         ret = qce_start(async_req, tmpl->crypto_alg_type, 0, 0);
118         if (ret)
119                 goto error_terminate;
120
121         return 0;
122
123 error_terminate:
124         qce_dma_terminate_all(&qce->dma);
125 error_unmap_dst:
126         dma_unmap_sg(qce->dev, &rctx->result_sg, 1, DMA_FROM_DEVICE);
127 error_unmap_src:
128         dma_unmap_sg(qce->dev, req->src, rctx->src_nents, DMA_TO_DEVICE);
129         return ret;
130 }
131
132 static int qce_ahash_init(struct ahash_request *req)
133 {
134         struct qce_sha_reqctx *rctx = ahash_request_ctx(req);
135         struct qce_alg_template *tmpl = to_ahash_tmpl(req->base.tfm);
136         const u32 *std_iv = tmpl->std_iv;
137
138         memset(rctx, 0, sizeof(*rctx));
139         rctx->first_blk = true;
140         rctx->last_blk = false;
141         rctx->flags = tmpl->alg_flags;
142         memcpy(rctx->digest, std_iv, sizeof(rctx->digest));
143
144         return 0;
145 }
146
147 static int qce_ahash_export(struct ahash_request *req, void *out)
148 {
149         struct crypto_ahash *ahash = crypto_ahash_reqtfm(req);
150         struct qce_sha_reqctx *rctx = ahash_request_ctx(req);
151         unsigned long flags = rctx->flags;
152         unsigned int digestsize = crypto_ahash_digestsize(ahash);
153         unsigned int blocksize =
154                         crypto_tfm_alg_blocksize(crypto_ahash_tfm(ahash));
155
156         if (IS_SHA1(flags) || IS_SHA1_HMAC(flags)) {
157                 struct sha1_state *out_state = out;
158
159                 out_state->count = rctx->count;
160                 qce_cpu_to_be32p_array((__be32 *)out_state->state,
161                                        rctx->digest, digestsize);
162                 memcpy(out_state->buffer, rctx->buf, blocksize);
163         } else if (IS_SHA256(flags) || IS_SHA256_HMAC(flags)) {
164                 struct sha256_state *out_state = out;
165
166                 out_state->count = rctx->count;
167                 qce_cpu_to_be32p_array((__be32 *)out_state->state,
168                                        rctx->digest, digestsize);
169                 memcpy(out_state->buf, rctx->buf, blocksize);
170         } else {
171                 return -EINVAL;
172         }
173
174         return 0;
175 }
176
177 static int qce_import_common(struct ahash_request *req, u64 in_count,
178                              const u32 *state, const u8 *buffer, bool hmac)
179 {
180         struct crypto_ahash *ahash = crypto_ahash_reqtfm(req);
181         struct qce_sha_reqctx *rctx = ahash_request_ctx(req);
182         unsigned int digestsize = crypto_ahash_digestsize(ahash);
183         unsigned int blocksize;
184         u64 count = in_count;
185
186         blocksize = crypto_tfm_alg_blocksize(crypto_ahash_tfm(ahash));
187         rctx->count = in_count;
188         memcpy(rctx->buf, buffer, blocksize);
189
190         if (in_count <= blocksize) {
191                 rctx->first_blk = 1;
192         } else {
193                 rctx->first_blk = 0;
194                 /*
195                  * For HMAC, there is a hardware padding done when first block
196                  * is set. Therefore the byte_count must be incremened by 64
197                  * after the first block operation.
198                  */
199                 if (hmac)
200                         count += SHA_PADDING;
201         }
202
203         rctx->byte_count[0] = (__force __be32)(count & ~SHA_PADDING_MASK);
204         rctx->byte_count[1] = (__force __be32)(count >> 32);
205         qce_cpu_to_be32p_array((__be32 *)rctx->digest, (const u8 *)state,
206                                digestsize);
207         rctx->buflen = (unsigned int)(in_count & (blocksize - 1));
208
209         return 0;
210 }
211
212 static int qce_ahash_import(struct ahash_request *req, const void *in)
213 {
214         struct qce_sha_reqctx *rctx = ahash_request_ctx(req);
215         unsigned long flags = rctx->flags;
216         bool hmac = IS_SHA_HMAC(flags);
217         int ret = -EINVAL;
218
219         if (IS_SHA1(flags) || IS_SHA1_HMAC(flags)) {
220                 const struct sha1_state *state = in;
221
222                 ret = qce_import_common(req, state->count, state->state,
223                                         state->buffer, hmac);
224         } else if (IS_SHA256(flags) || IS_SHA256_HMAC(flags)) {
225                 const struct sha256_state *state = in;
226
227                 ret = qce_import_common(req, state->count, state->state,
228                                         state->buf, hmac);
229         }
230
231         return ret;
232 }
233
234 static int qce_ahash_update(struct ahash_request *req)
235 {
236         struct crypto_ahash *tfm = crypto_ahash_reqtfm(req);
237         struct qce_sha_reqctx *rctx = ahash_request_ctx(req);
238         struct qce_alg_template *tmpl = to_ahash_tmpl(req->base.tfm);
239         struct qce_device *qce = tmpl->qce;
240         struct scatterlist *sg_last, *sg;
241         unsigned int total, len;
242         unsigned int hash_later;
243         unsigned int nbytes;
244         unsigned int blocksize;
245
246         blocksize = crypto_tfm_alg_blocksize(crypto_ahash_tfm(tfm));
247         rctx->count += req->nbytes;
248
249         /* check for buffer from previous updates and append it */
250         total = req->nbytes + rctx->buflen;
251
252         if (total <= blocksize) {
253                 scatterwalk_map_and_copy(rctx->buf + rctx->buflen, req->src,
254                                          0, req->nbytes, 0);
255                 rctx->buflen += req->nbytes;
256                 return 0;
257         }
258
259         /* save the original req structure fields */
260         rctx->src_orig = req->src;
261         rctx->nbytes_orig = req->nbytes;
262
263         /*
264          * if we have data from previous update copy them on buffer. The old
265          * data will be combined with current request bytes.
266          */
267         if (rctx->buflen)
268                 memcpy(rctx->tmpbuf, rctx->buf, rctx->buflen);
269
270         /* calculate how many bytes will be hashed later */
271         hash_later = total % blocksize;
272         if (hash_later) {
273                 unsigned int src_offset = req->nbytes - hash_later;
274                 scatterwalk_map_and_copy(rctx->buf, req->src, src_offset,
275                                          hash_later, 0);
276         }
277
278         /* here nbytes is multiple of blocksize */
279         nbytes = total - hash_later;
280
281         len = rctx->buflen;
282         sg = sg_last = req->src;
283
284         while (len < nbytes && sg) {
285                 if (len + sg_dma_len(sg) > nbytes)
286                         break;
287                 len += sg_dma_len(sg);
288                 sg_last = sg;
289                 sg = sg_next(sg);
290         }
291
292         if (!sg_last)
293                 return -EINVAL;
294
295         sg_mark_end(sg_last);
296
297         if (rctx->buflen) {
298                 sg_init_table(rctx->sg, 2);
299                 sg_set_buf(rctx->sg, rctx->tmpbuf, rctx->buflen);
300                 sg_chain(rctx->sg, 2, req->src);
301                 req->src = rctx->sg;
302         }
303
304         req->nbytes = nbytes;
305         rctx->buflen = hash_later;
306
307         return qce->async_req_enqueue(tmpl->qce, &req->base);
308 }
309
310 static int qce_ahash_final(struct ahash_request *req)
311 {
312         struct qce_sha_reqctx *rctx = ahash_request_ctx(req);
313         struct qce_alg_template *tmpl = to_ahash_tmpl(req->base.tfm);
314         struct qce_device *qce = tmpl->qce;
315
316         if (!rctx->buflen)
317                 return 0;
318
319         rctx->last_blk = true;
320
321         rctx->src_orig = req->src;
322         rctx->nbytes_orig = req->nbytes;
323
324         memcpy(rctx->tmpbuf, rctx->buf, rctx->buflen);
325         sg_init_one(rctx->sg, rctx->tmpbuf, rctx->buflen);
326
327         req->src = rctx->sg;
328         req->nbytes = rctx->buflen;
329
330         return qce->async_req_enqueue(tmpl->qce, &req->base);
331 }
332
333 static int qce_ahash_digest(struct ahash_request *req)
334 {
335         struct qce_sha_reqctx *rctx = ahash_request_ctx(req);
336         struct qce_alg_template *tmpl = to_ahash_tmpl(req->base.tfm);
337         struct qce_device *qce = tmpl->qce;
338         int ret;
339
340         ret = qce_ahash_init(req);
341         if (ret)
342                 return ret;
343
344         rctx->src_orig = req->src;
345         rctx->nbytes_orig = req->nbytes;
346         rctx->first_blk = true;
347         rctx->last_blk = true;
348
349         return qce->async_req_enqueue(tmpl->qce, &req->base);
350 }
351
352 struct qce_ahash_result {
353         struct completion completion;
354         int error;
355 };
356
357 static void qce_digest_complete(struct crypto_async_request *req, int error)
358 {
359         struct qce_ahash_result *result = req->data;
360
361         if (error == -EINPROGRESS)
362                 return;
363
364         result->error = error;
365         complete(&result->completion);
366 }
367
368 static int qce_ahash_hmac_setkey(struct crypto_ahash *tfm, const u8 *key,
369                                  unsigned int keylen)
370 {
371         unsigned int digestsize = crypto_ahash_digestsize(tfm);
372         struct qce_sha_ctx *ctx = crypto_tfm_ctx(&tfm->base);
373         struct qce_ahash_result result;
374         struct ahash_request *req;
375         struct scatterlist sg;
376         unsigned int blocksize;
377         struct crypto_ahash *ahash_tfm;
378         u8 *buf;
379         int ret;
380         const char *alg_name;
381
382         blocksize = crypto_tfm_alg_blocksize(crypto_ahash_tfm(tfm));
383         memset(ctx->authkey, 0, sizeof(ctx->authkey));
384
385         if (keylen <= blocksize) {
386                 memcpy(ctx->authkey, key, keylen);
387                 return 0;
388         }
389
390         if (digestsize == SHA1_DIGEST_SIZE)
391                 alg_name = "sha1-qce";
392         else if (digestsize == SHA256_DIGEST_SIZE)
393                 alg_name = "sha256-qce";
394         else
395                 return -EINVAL;
396
397         ahash_tfm = crypto_alloc_ahash(alg_name, CRYPTO_ALG_TYPE_AHASH,
398                                        CRYPTO_ALG_TYPE_AHASH_MASK);
399         if (IS_ERR(ahash_tfm))
400                 return PTR_ERR(ahash_tfm);
401
402         req = ahash_request_alloc(ahash_tfm, GFP_KERNEL);
403         if (!req) {
404                 ret = -ENOMEM;
405                 goto err_free_ahash;
406         }
407
408         init_completion(&result.completion);
409         ahash_request_set_callback(req, CRYPTO_TFM_REQ_MAY_BACKLOG,
410                                    qce_digest_complete, &result);
411         crypto_ahash_clear_flags(ahash_tfm, ~0);
412
413         buf = kzalloc(keylen + QCE_MAX_ALIGN_SIZE, GFP_KERNEL);
414         if (!buf) {
415                 ret = -ENOMEM;
416                 goto err_free_req;
417         }
418
419         memcpy(buf, key, keylen);
420         sg_init_one(&sg, buf, keylen);
421         ahash_request_set_crypt(req, &sg, ctx->authkey, keylen);
422
423         ret = crypto_ahash_digest(req);
424         if (ret == -EINPROGRESS || ret == -EBUSY) {
425                 ret = wait_for_completion_interruptible(&result.completion);
426                 if (!ret)
427                         ret = result.error;
428         }
429
430         if (ret)
431                 crypto_ahash_set_flags(tfm, CRYPTO_TFM_RES_BAD_KEY_LEN);
432
433         kfree(buf);
434 err_free_req:
435         ahash_request_free(req);
436 err_free_ahash:
437         crypto_free_ahash(ahash_tfm);
438         return ret;
439 }
440
441 static int qce_ahash_cra_init(struct crypto_tfm *tfm)
442 {
443         struct crypto_ahash *ahash = __crypto_ahash_cast(tfm);
444         struct qce_sha_ctx *ctx = crypto_tfm_ctx(tfm);
445
446         crypto_ahash_set_reqsize(ahash, sizeof(struct qce_sha_reqctx));
447         memset(ctx, 0, sizeof(*ctx));
448         return 0;
449 }
450
451 struct qce_ahash_def {
452         unsigned long flags;
453         const char *name;
454         const char *drv_name;
455         unsigned int digestsize;
456         unsigned int blocksize;
457         unsigned int statesize;
458         const u32 *std_iv;
459 };
460
461 static const struct qce_ahash_def ahash_def[] = {
462         {
463                 .flags          = QCE_HASH_SHA1,
464                 .name           = "sha1",
465                 .drv_name       = "sha1-qce",
466                 .digestsize     = SHA1_DIGEST_SIZE,
467                 .blocksize      = SHA1_BLOCK_SIZE,
468                 .statesize      = sizeof(struct sha1_state),
469                 .std_iv         = std_iv_sha1,
470         },
471         {
472                 .flags          = QCE_HASH_SHA256,
473                 .name           = "sha256",
474                 .drv_name       = "sha256-qce",
475                 .digestsize     = SHA256_DIGEST_SIZE,
476                 .blocksize      = SHA256_BLOCK_SIZE,
477                 .statesize      = sizeof(struct sha256_state),
478                 .std_iv         = std_iv_sha256,
479         },
480         {
481                 .flags          = QCE_HASH_SHA1_HMAC,
482                 .name           = "hmac(sha1)",
483                 .drv_name       = "hmac-sha1-qce",
484                 .digestsize     = SHA1_DIGEST_SIZE,
485                 .blocksize      = SHA1_BLOCK_SIZE,
486                 .statesize      = sizeof(struct sha1_state),
487                 .std_iv         = std_iv_sha1,
488         },
489         {
490                 .flags          = QCE_HASH_SHA256_HMAC,
491                 .name           = "hmac(sha256)",
492                 .drv_name       = "hmac-sha256-qce",
493                 .digestsize     = SHA256_DIGEST_SIZE,
494                 .blocksize      = SHA256_BLOCK_SIZE,
495                 .statesize      = sizeof(struct sha256_state),
496                 .std_iv         = std_iv_sha256,
497         },
498 };
499
500 static int qce_ahash_register_one(const struct qce_ahash_def *def,
501                                   struct qce_device *qce)
502 {
503         struct qce_alg_template *tmpl;
504         struct ahash_alg *alg;
505         struct crypto_alg *base;
506         int ret;
507
508         tmpl = kzalloc(sizeof(*tmpl), GFP_KERNEL);
509         if (!tmpl)
510                 return -ENOMEM;
511
512         tmpl->std_iv = def->std_iv;
513
514         alg = &tmpl->alg.ahash;
515         alg->init = qce_ahash_init;
516         alg->update = qce_ahash_update;
517         alg->final = qce_ahash_final;
518         alg->digest = qce_ahash_digest;
519         alg->export = qce_ahash_export;
520         alg->import = qce_ahash_import;
521         if (IS_SHA_HMAC(def->flags))
522                 alg->setkey = qce_ahash_hmac_setkey;
523         alg->halg.digestsize = def->digestsize;
524         alg->halg.statesize = def->statesize;
525
526         base = &alg->halg.base;
527         base->cra_blocksize = def->blocksize;
528         base->cra_priority = 300;
529         base->cra_flags = CRYPTO_ALG_ASYNC;
530         base->cra_ctxsize = sizeof(struct qce_sha_ctx);
531         base->cra_alignmask = 0;
532         base->cra_module = THIS_MODULE;
533         base->cra_init = qce_ahash_cra_init;
534         INIT_LIST_HEAD(&base->cra_list);
535
536         snprintf(base->cra_name, CRYPTO_MAX_ALG_NAME, "%s", def->name);
537         snprintf(base->cra_driver_name, CRYPTO_MAX_ALG_NAME, "%s",
538                  def->drv_name);
539
540         INIT_LIST_HEAD(&tmpl->entry);
541         tmpl->crypto_alg_type = CRYPTO_ALG_TYPE_AHASH;
542         tmpl->alg_flags = def->flags;
543         tmpl->qce = qce;
544
545         ret = crypto_register_ahash(alg);
546         if (ret) {
547                 kfree(tmpl);
548                 dev_err(qce->dev, "%s registration failed\n", base->cra_name);
549                 return ret;
550         }
551
552         list_add_tail(&tmpl->entry, &ahash_algs);
553         dev_dbg(qce->dev, "%s is registered\n", base->cra_name);
554         return 0;
555 }
556
557 static void qce_ahash_unregister(struct qce_device *qce)
558 {
559         struct qce_alg_template *tmpl, *n;
560
561         list_for_each_entry_safe(tmpl, n, &ahash_algs, entry) {
562                 crypto_unregister_ahash(&tmpl->alg.ahash);
563                 list_del(&tmpl->entry);
564                 kfree(tmpl);
565         }
566 }
567
568 static int qce_ahash_register(struct qce_device *qce)
569 {
570         int ret, i;
571
572         for (i = 0; i < ARRAY_SIZE(ahash_def); i++) {
573                 ret = qce_ahash_register_one(&ahash_def[i], qce);
574                 if (ret)
575                         goto err;
576         }
577
578         return 0;
579 err:
580         qce_ahash_unregister(qce);
581         return ret;
582 }
583
584 const struct qce_algo_ops ahash_ops = {
585         .type = CRYPTO_ALG_TYPE_AHASH,
586         .register_algs = qce_ahash_register,
587         .unregister_algs = qce_ahash_unregister,
588         .async_req_handle = qce_ahash_async_req_handle,
589 };