3 This file is part of the AVR-Crypto-Lib.
4 Copyright (C) 2009 Daniel Otte (daniel.otte@rub.de)
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 3 of the License, or
9 (at your option) any later version.
11 This program is distributed in the hope that it will be useful,
12 but WITHOUT ANY WARRANTY; without even the implied warranty of
13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14 GNU General Public License for more details.
16 You should have received a copy of the GNU General Public License
17 along with this program. If not, see <http://www.gnu.org/licenses/>.
22 * \email daniel.otte@rub.de
24 * \license GPLv3 or later
30 #include <avr/pgmspace.h>
33 const uint32_t shabal256_iv[] PROGMEM = {
35 0x52F84552, 0xE54B7999, 0x2D8EE3EC, 0xB9645191,
36 0xE0078B86, 0xBB7C44C9, 0xD2B5C1CA, 0xB0D2EB8C,
37 0x14CE5A45, 0x22AF50DC, 0xEFFDBC6B, 0xEB21B74A,
39 0xB555C6EE, 0x3E710596, 0xA72A652F, 0x9301515F,
40 0xDA28C1FA, 0x696FD868, 0x9CB6BF72, 0x0AFE4002,
41 0xA6E03615, 0x5138C1D4, 0xBE216306, 0xB38B8890,
42 0x3EA8B96B, 0x3299ACE4, 0x30924DD4, 0x55CB34A5,
44 0xB405F031, 0xC4233EBA, 0xB3733979, 0xC0DD9D55,
45 0xC51C28AE, 0xA327B8E1, 0x56C56167, 0xED614433,
46 0x88B59D60, 0x60E2CEBA, 0x758B4B8B, 0x83E82A7F,
47 0xBC968828, 0xE6E00BF7, 0xBA839E55, 0x9B491C60
50 void shabal256_init(shabal_ctx_t* ctx){
52 ctx->b = ctx->b_buffer;
53 ctx->c = ctx->c_buffer;
55 for(i=0;i<SHABAL_R;++i){
56 ctx->a[i] = pgm_read_dword(&(shabal256_iv[i]));
59 ctx->b[i] = pgm_read_dword(&(shabal256_iv[SHABAL_R+i]));
62 ctx->c[i] = pgm_read_dword(&(shabal256_iv[SHABAL_R+16+i]));
66 void shabal256_ctx2hash(void* dest, const shabal_ctx_t* ctx){
67 shabal_ctx2hash(dest, ctx, 256);
70 void shabal256(void* dest, void* msg, uint32_t length_b){
73 while(length_b>=SHABAL_BLOCKSIZE){
74 shabal_nextBlock(&ctx, msg);
75 msg = (uint8_t*)msg+SHABAL_BLOCKSIZE_B;
76 length_b -= SHABAL_BLOCKSIZE;
78 shabal_lastBlock(&ctx, msg, length_b);
79 shabal256_ctx2hash(dest, &ctx);