arch/x86/crypto/poly1305_glue.c

   1 /*
   2  * Poly1305 authenticator algorithm, RFC7539, SIMD glue code
   3  *
   4  * Copyright (C) 2015 Martin Willi
   5  *
   6  * This program is free software; you can redistribute it and/or modify
   7  * it under the terms of the GNU General Public License as published by
   8  * the Free Software Foundation; either version 2 of the License, or
   9  * (at your option) any later version.
  10  */
  11
  12 #include <crypto/algapi.h>
  13 #include <crypto/internal/hash.h>
  14 #include <crypto/internal/simd.h>
  15 #include <crypto/poly1305.h>
  16 #include <linux/crypto.h>
  17 #include <linux/kernel.h>
  18 #include <linux/module.h>
  19 #include <asm/simd.h>
  20
  21 struct poly1305_simd_desc_ctx {
  22         struct poly1305_desc_ctx base;
  23         /* derived key u set? */
  24         bool uset;
  25 #ifdef CONFIG_AS_AVX2
  26         /* derived keys r^3, r^4 set? */
  27         bool wset;
  28 #endif
  29         /* derived Poly1305 key r^2 */
  30         u32 u[5];
  31         /* ... silently appended r^3 and r^4 when using AVX2 */
  32 };
  33
  34 asmlinkage void poly1305_block_sse2(u32 *h, const u8 *src,
  35                                     const u32 *r, unsigned int blocks);
  36 asmlinkage void poly1305_2block_sse2(u32 *h, const u8 *src, const u32 *r,
  37                                      unsigned int blocks, const u32 *u);
  38 #ifdef CONFIG_AS_AVX2
  39 asmlinkage void poly1305_4block_avx2(u32 *h, const u8 *src, const u32 *r,
  40                                      unsigned int blocks, const u32 *u);
  41 static bool poly1305_use_avx2;
  42 #endif
  43
  44 static int poly1305_simd_init(struct shash_desc *desc)
  45 {
  46         struct poly1305_simd_desc_ctx *sctx = shash_desc_ctx(desc);
  47
  48         sctx->uset = false;
  49 #ifdef CONFIG_AS_AVX2
  50         sctx->wset = false;
  51 #endif
  52
  53         return crypto_poly1305_init(desc);
  54 }
  55
  56 static void poly1305_simd_mult(u32 *a, const u32 *b)
  57 {
  58         u8 m[POLY1305_BLOCK_SIZE];
  59
  60         memset(m, 0, sizeof(m));
  61         /* The poly1305 block function adds a hi-bit to the accumulator which
  62          * we don't need for key multiplication; compensate for it. */
  63         a[4] -= 1 << 24;
  64         poly1305_block_sse2(a, m, b, 1);
  65 }
  66
  67 static unsigned int poly1305_simd_blocks(struct poly1305_desc_ctx *dctx,
  68                                          const u8 *src, unsigned int srclen)
  69 {
  70         struct poly1305_simd_desc_ctx *sctx;
  71         unsigned int blocks, datalen;
  72
  73         BUILD_BUG_ON(offsetof(struct poly1305_simd_desc_ctx, base));
  74         sctx = container_of(dctx, struct poly1305_simd_desc_ctx, base);
  75
  76         if (unlikely(!dctx->sset)) {
  77                 datalen = crypto_poly1305_setdesckey(dctx, src, srclen);
  78                 src += srclen - datalen;
  79                 srclen = datalen;
  80         }
  81
  82 #ifdef CONFIG_AS_AVX2
  83         if (poly1305_use_avx2 && srclen >= POLY1305_BLOCK_SIZE * 4) {
  84                 if (unlikely(!sctx->wset)) {
  85                         if (!sctx->uset) {
  86                                 memcpy(sctx->u, dctx->r.r, sizeof(sctx->u));
  87                                 poly1305_simd_mult(sctx->u, dctx->r.r);
  88                                 sctx->uset = true;
  89                         }
  90                         memcpy(sctx->u + 5, sctx->u, sizeof(sctx->u));
  91                         poly1305_simd_mult(sctx->u + 5, dctx->r.r);
  92                         memcpy(sctx->u + 10, sctx->u + 5, sizeof(sctx->u));
  93                         poly1305_simd_mult(sctx->u + 10, dctx->r.r);
  94                         sctx->wset = true;
  95                 }
  96                 blocks = srclen / (POLY1305_BLOCK_SIZE * 4);
  97                 poly1305_4block_avx2(dctx->h.h, src, dctx->r.r, blocks,
  98                                      sctx->u);
  99                 src += POLY1305_BLOCK_SIZE * 4 * blocks;
 100                 srclen -= POLY1305_BLOCK_SIZE * 4 * blocks;
 101         }
 102 #endif
 103         if (likely(srclen >= POLY1305_BLOCK_SIZE * 2)) {
 104                 if (unlikely(!sctx->uset)) {
 105                         memcpy(sctx->u, dctx->r.r, sizeof(sctx->u));
 106                         poly1305_simd_mult(sctx->u, dctx->r.r);
 107                         sctx->uset = true;
 108                 }
 109                 blocks = srclen / (POLY1305_BLOCK_SIZE * 2);
 110                 poly1305_2block_sse2(dctx->h.h, src, dctx->r.r, blocks,
 111                                      sctx->u);
 112                 src += POLY1305_BLOCK_SIZE * 2 * blocks;
 113                 srclen -= POLY1305_BLOCK_SIZE * 2 * blocks;
 114         }
 115         if (srclen >= POLY1305_BLOCK_SIZE) {
 116                 poly1305_block_sse2(dctx->h.h, src, dctx->r.r, 1);
 117                 srclen -= POLY1305_BLOCK_SIZE;
 118         }
 119         return srclen;
 120 }
 121
 122 static int poly1305_simd_update(struct shash_desc *desc,
 123                                 const u8 *src, unsigned int srclen)
 124 {
 125         struct poly1305_desc_ctx *dctx = shash_desc_ctx(desc);
 126         unsigned int bytes;
 127
 128         /* kernel_fpu_begin/end is costly, use fallback for small updates */
 129         if (srclen <= 288 || !crypto_simd_usable())
 130                 return crypto_poly1305_update(desc, src, srclen);
 131
 132         kernel_fpu_begin();
 133
 134         if (unlikely(dctx->buflen)) {
 135                 bytes = min(srclen, POLY1305_BLOCK_SIZE - dctx->buflen);
 136                 memcpy(dctx->buf + dctx->buflen, src, bytes);
 137                 src += bytes;
 138                 srclen -= bytes;
 139                 dctx->buflen += bytes;
 140
 141                 if (dctx->buflen == POLY1305_BLOCK_SIZE) {
 142                         poly1305_simd_blocks(dctx, dctx->buf,
 143                                              POLY1305_BLOCK_SIZE);
 144                         dctx->buflen = 0;
 145                 }
 146         }
 147
 148         if (likely(srclen >= POLY1305_BLOCK_SIZE)) {
 149                 bytes = poly1305_simd_blocks(dctx, src, srclen);
 150                 src += srclen - bytes;
 151                 srclen = bytes;
 152         }
 153
 154         kernel_fpu_end();
 155
 156         if (unlikely(srclen)) {
 157                 dctx->buflen = srclen;
 158                 memcpy(dctx->buf, src, srclen);
 159         }
 160
 161         return 0;
 162 }
 163
 164 static struct shash_alg alg = {
 165         .digestsize     = POLY1305_DIGEST_SIZE,
 166         .init           = poly1305_simd_init,
 167         .update         = poly1305_simd_update,
 168         .final          = crypto_poly1305_final,
 169         .descsize       = sizeof(struct poly1305_simd_desc_ctx),
 170         .base           = {
 171                 .cra_name               = "poly1305",
 172                 .cra_driver_name        = "poly1305-simd",
 173                 .cra_priority           = 300,
 174                 .cra_blocksize          = POLY1305_BLOCK_SIZE,
 175                 .cra_module             = THIS_MODULE,
 176         },
 177 };
 178
 179 static int __init poly1305_simd_mod_init(void)
 180 {
 181         if (!boot_cpu_has(X86_FEATURE_XMM2))
 182                 return -ENODEV;
 183
 184 #ifdef CONFIG_AS_AVX2
 185         poly1305_use_avx2 = boot_cpu_has(X86_FEATURE_AVX) &&
 186                             boot_cpu_has(X86_FEATURE_AVX2) &&
 187                             cpu_has_xfeatures(XFEATURE_MASK_SSE | XFEATURE_MASK_YMM, NULL);
 188         alg.descsize = sizeof(struct poly1305_simd_desc_ctx);
 189         if (poly1305_use_avx2)
 190                 alg.descsize += 10 * sizeof(u32);
 191 #endif
 192         return crypto_register_shash(&alg);
 193 }
 194
 195 static void __exit poly1305_simd_mod_exit(void)
 196 {
 197         crypto_unregister_shash(&alg);
 198 }
 199
 200 module_init(poly1305_simd_mod_init);
 201 module_exit(poly1305_simd_mod_exit);
 202
 203 MODULE_LICENSE("GPL");
 204 MODULE_AUTHOR("Martin Willi <martin@strongswan.org>");
 205 MODULE_DESCRIPTION("Poly1305 authenticator");
 206 MODULE_ALIAS_CRYPTO("poly1305");
 207 MODULE_ALIAS_CRYPTO("poly1305-simd");