| /* |
| * sha1-ce-core.S - SHA-1 secure hash using ARMv8 Crypto Extensions |
| * |
| * Copyright (C) 2014 Linaro Ltd <ard.biesheuvel@linaro.org> |
| * |
| * This program is free software; you can redistribute it and/or modify |
| * it under the terms of the GNU General Public License version 2 as |
| * published by the Free Software Foundation. |
| */ |
| |
| #include <linux/linkage.h> |
| #include <asm/assembler.h> |
| |
| .text |
| .arch armv8-a+crypto |
| |
| k0 .req v0 |
| k1 .req v1 |
| k2 .req v2 |
| k3 .req v3 |
| |
| t0 .req v4 |
| t1 .req v5 |
| |
| dga .req q6 |
| dgav .req v6 |
| dgb .req s7 |
| dgbv .req v7 |
| |
| dg0q .req q12 |
| dg0s .req s12 |
| dg0v .req v12 |
| dg1s .req s13 |
| dg1v .req v13 |
| dg2s .req s14 |
| |
| .macro add_only, op, ev, rc, s0, dg1 |
| .ifc \ev, ev |
| add t1.4s, v\s0\().4s, \rc\().4s |
| sha1h dg2s, dg0s |
| .ifnb \dg1 |
| sha1\op dg0q, \dg1, t0.4s |
| .else |
| sha1\op dg0q, dg1s, t0.4s |
| .endif |
| .else |
| .ifnb \s0 |
| add t0.4s, v\s0\().4s, \rc\().4s |
| .endif |
| sha1h dg1s, dg0s |
| sha1\op dg0q, dg2s, t1.4s |
| .endif |
| .endm |
| |
| .macro add_update, op, ev, rc, s0, s1, s2, s3, dg1 |
| sha1su0 v\s0\().4s, v\s1\().4s, v\s2\().4s |
| add_only \op, \ev, \rc, \s1, \dg1 |
| sha1su1 v\s0\().4s, v\s3\().4s |
| .endm |
| |
| /* |
| * The SHA1 round constants |
| */ |
| .align 4 |
| .Lsha1_rcon: |
| .word 0x5a827999, 0x6ed9eba1, 0x8f1bbcdc, 0xca62c1d6 |
| |
| /* |
| * void sha1_ce_transform(int blocks, u8 const *src, u32 *state, |
| * u8 *head, long bytes) |
| */ |
| ENTRY(sha1_ce_transform) |
| /* load round constants */ |
| adr x6, .Lsha1_rcon |
| ld1r {k0.4s}, [x6], #4 |
| ld1r {k1.4s}, [x6], #4 |
| ld1r {k2.4s}, [x6], #4 |
| ld1r {k3.4s}, [x6] |
| |
| /* load state */ |
| ldr dga, [x2] |
| ldr dgb, [x2, #16] |
| |
| /* load partial state (if supplied) */ |
| cbz x3, 0f |
| ld1 {v8.4s-v11.4s}, [x3] |
| b 1f |
| |
| /* load input */ |
| 0: ld1 {v8.4s-v11.4s}, [x1], #64 |
| sub w0, w0, #1 |
| |
| 1: |
| CPU_LE( rev32 v8.16b, v8.16b ) |
| CPU_LE( rev32 v9.16b, v9.16b ) |
| CPU_LE( rev32 v10.16b, v10.16b ) |
| CPU_LE( rev32 v11.16b, v11.16b ) |
| |
| 2: add t0.4s, v8.4s, k0.4s |
| mov dg0v.16b, dgav.16b |
| |
| add_update c, ev, k0, 8, 9, 10, 11, dgb |
| add_update c, od, k0, 9, 10, 11, 8 |
| add_update c, ev, k0, 10, 11, 8, 9 |
| add_update c, od, k0, 11, 8, 9, 10 |
| add_update c, ev, k1, 8, 9, 10, 11 |
| |
| add_update p, od, k1, 9, 10, 11, 8 |
| add_update p, ev, k1, 10, 11, 8, 9 |
| add_update p, od, k1, 11, 8, 9, 10 |
| add_update p, ev, k1, 8, 9, 10, 11 |
| add_update p, od, k2, 9, 10, 11, 8 |
| |
| add_update m, ev, k2, 10, 11, 8, 9 |
| add_update m, od, k2, 11, 8, 9, 10 |
| add_update m, ev, k2, 8, 9, 10, 11 |
| add_update m, od, k2, 9, 10, 11, 8 |
| add_update m, ev, k3, 10, 11, 8, 9 |
| |
| add_update p, od, k3, 11, 8, 9, 10 |
| add_only p, ev, k3, 9 |
| add_only p, od, k3, 10 |
| add_only p, ev, k3, 11 |
| add_only p, od |
| |
| /* update state */ |
| add dgbv.2s, dgbv.2s, dg1v.2s |
| add dgav.4s, dgav.4s, dg0v.4s |
| |
| cbnz w0, 0b |
| |
| /* |
| * Final block: add padding and total bit count. |
| * Skip if we have no total byte count in x4. In that case, the input |
| * size was not a round multiple of the block size, and the padding is |
| * handled by the C code. |
| */ |
| cbz x4, 3f |
| movi v9.2d, #0 |
| mov x8, #0x80000000 |
| movi v10.2d, #0 |
| ror x7, x4, #29 // ror(lsl(x4, 3), 32) |
| fmov d8, x8 |
| mov x4, #0 |
| mov v11.d[0], xzr |
| mov v11.d[1], x7 |
| b 2b |
| |
| /* store new state */ |
| 3: str dga, [x2] |
| str dgb, [x2, #16] |
| ret |
| ENDPROC(sha1_ce_transform) |
