WebSVN – Kolibri OS – Diff – /programs/develop/libraries/libcrash/hash/sha3.asm

-;    libcrash -- cryptographic hash functions
+; libcrash -- cryptographic hash (and other) functions
+;
-;    Copyright (C) 2013,2016,2019 Ivan Baravy (dunkaist)
+; Copyright (C) <2013,2016,2019,2021> Ivan Baravy
+;
-;    This program is free software: you can redistribute it and/or modify
-;    it under the terms of the GNU General Public License as published by
-;    the Free Software Foundation, either version 3 of the License, or
-;    (at your option) any later version.
+; SPDX-License-Identifier: GPL-2.0-or-later
+;
-;    This program is distributed in the hope that it will be useful,
+; This program is free software: you can redistribute it and/or modify it under
-;    but WITHOUT ANY WARRANTY; without even the implied warranty of
+; the terms of the GNU General Public License as published by the Free Software
-;    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+; Foundation, either version 2 of the License, or (at your option) any later
-;    GNU General Public License for more details.
+; version.
+;
-;    You should have received a copy of the GNU General Public License
+; This program is distributed in the hope that it will be useful, but WITHOUT
+; ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
-;    along with this program.  If not, see .
+; FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details.
+;
-SHA3_224_HASH_SIZE       = 28
-SHA3_256_HASH_SIZE       = 32
-SHA3_384_HASH_SIZE       = 48
+; You should have received a copy of the GNU General Public License along with
-SHA3_512_HASH_SIZE       = 64
+; this program. If not, see .
-SHA3_224_BLOCK_SIZE      = 144
+SHA3_224_BLOCK_SIZE = 144
-SHA3_256_BLOCK_SIZE      = 136
+SHA3_256_BLOCK_SIZE = 136
-SHA3_384_BLOCK_SIZE      = 104
+SHA3_384_BLOCK_SIZE = 104
-SHA3_512_BLOCK_SIZE      = 72
+SHA3_512_BLOCK_SIZE = 72
-SHA3MAX_BLOCK_SIZE      = SHA3_224_BLOCK_SIZE
+SHA3_MAX_BLOCK_SIZE = SHA3_224_BLOCK_SIZE
 SHA3_INIT_SIZE          = 200
 SHA3_ALIGN              = 16
 SHA3_ALIGN_MASK         = SHA3_ALIGN-1
 struct ctx_sha3
         hash            rb SHA3_INIT_SIZE
                         rb SHA3_ALIGN - (SHA3_INIT_SIZE mod SHA3_ALIGN)
-        block           rb SHA3MAX_BLOCK_SIZE
+        block           rb SHA3_MAX_BLOCK_SIZE
-                        rb SHA3_ALIGN - (SHA3MAX_BLOCK_SIZE mod SHA3_ALIGN)
+                        rb SHA3_ALIGN - (SHA3_MAX_BLOCK_SIZE mod SHA3_ALIGN)
         index           rd 1
         block_size      rd 1
         rounds_cnt      rd 1
                         rd 1    ; align
         ; tmp vars
-        C               rq 5
-        D               rq 5
+        C               rq 5
-ends
         D               rq 5
-if defined sizeof.crash_ctx
+ends
   assert sizeof.crash_ctx >= sizeof.ctx_sha3
-end if
+assert sizeof.ctx_sha3 <= LIBCRASH_CTX_LEN
         ret
 endp
-proc sha3._.init _ctx
+proc sha3._.init uses edi
         mov     [ebx + ctx_sha3.block_size], eax
         shr     eax, 3
         mov     [ebx + ctx_sha3.index], eax
         ret
 endp
-proc sha3_224.init _ctx
+proc sha3_224.init uses ebx, _ctx
         mov     ebx, [_ctx]
         mov     eax, SHA3_224_BLOCK_SIZE
         stdcall sha3._.init
         ret
 endp
-proc sha3_256.init _ctx
+proc sha3_256.init uses ebx, _ctx
         mov     ebx, [_ctx]
         mov     eax, SHA3_256_BLOCK_SIZE
         stdcall sha3._.init
         ret
 endp
-proc sha3_384.init _ctx
+proc sha3_384.init uses ebx, _ctx
         mov     ebx, [_ctx]
         mov     eax, SHA3_384_BLOCK_SIZE
         stdcall sha3._.init
         ret
 endp
 sha3_224.update = sha3.update
 sha3_256.update = sha3.update
 sha3_384.update = sha3.update
 sha3_512.update = sha3.update
-proc sha3.update _ctx, _msg, _size
+proc sha3.update uses ebx esi edi, _ctx, _msg, _size
-  .next_block:
+.next_block:
         mov     ebx, [_ctx]
         mov     esi, [_msg]
         mov     eax, [ebx + ctx_sha3.index]
-  .quit:
+.quit:
         ret
 endp
-sha3_224.final = sha3.final
+sha3_224.finish = sha3.finish
-sha3_256.final = sha3.final
+sha3_256.finish = sha3.finish
-sha3_384.final = sha3.final
+sha3_384.finish = sha3.finish
-sha3_512.final = sha3.final
-proc sha3.final _ctx
+sha3_512.finish = sha3.finish
-        pushad
+proc sha3.finish uses ebx esi edi, _ctx
-        mov     ebx, [_ctx]
-        mov     eax, [ebx + ctx_sha3.index]
+        mov     ebx, [_ctx]
-        xor     edx, edx
-        mov     ecx, [ebx + ctx_sha3.block_size]
+        mov     eax, [ebx + ctx_sha3.index]
-        div     ecx
-        sub     ecx, edx
-        ja      @f
-        add     ecx, [ebx + ctx_sha3.block_size]
-    @@:
+        mov     ecx, [ebx + ctx_sha3.block_size]
-        add     [ebx + ctx_sha3.index], ecx
-        mov     eax, [ebx + ctx_sha3.block_size]
+        sub     ecx, eax
-        cmp     [ebx + ctx_sha3.index], eax
-        jb      @f
-        sub     [ebx + ctx_sha3.index], eax
-    @@:
+        lea     edi, [ebx+ctx_sha3.block]
         add     edi, eax
         mov     byte[edi], 0x06
         inc     edi
         dec     ecx
         stdcall sha3._.block, eax
         mov     ebx, [_ctx]
         lea     eax, [ebx + ctx_sha3.hash]
-        stdcall sha3._.postprocess, ebx, eax
-        popad
+        stdcall sha3._.postprocess, ebx, eax
         ret
 endp
 proc sha3_224.oneshot _ctx, _data, _len
-	stdcall	sha3_224.init, [_ctx]
+        stdcall sha3_224.init, [_ctx]
-	stdcall	sha3.update, [_ctx], [_data], [_len]
+        stdcall sha3.update, [_ctx], [_data], [_len]
-	stdcall	sha3.final, [_ctx]
+        stdcall sha3.finish, [_ctx]
-	ret
+        ret
 endp
 proc sha3_256.oneshot _ctx, _data, _len
-	stdcall	sha3_256.init, [_ctx]
+        stdcall sha3_256.init, [_ctx]
-	stdcall	sha3.update, [_ctx], [_data], [_len]
+        stdcall sha3.update, [_ctx], [_data], [_len]
-	stdcall	sha3.final, [_ctx]
+        stdcall sha3.finish, [_ctx]
-	ret
+        ret
 endp
 proc sha3_384.oneshot _ctx, _data, _len
-	stdcall	sha3_384.init, [_ctx]
+        stdcall sha3_384.init, [_ctx]
-	stdcall	sha3.update, [_ctx], [_data], [_len]
+        stdcall sha3.update, [_ctx], [_data], [_len]
-	stdcall	sha3.final, [_ctx]
+        stdcall sha3.finish, [_ctx]
-	ret
+        ret
 endp

Subversion Repositories Kolibri OS

(root)/programs/develop/libraries/libcrash/hash/sha3.asm – Rev 7698 → 9216