1 /* jh_simple_speed.c */
3 This file is part of the AVR-Crypto-Lib.
4 Copyright (C) 2006-2010 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/>.
21 #include <avr/pgmspace.h>
25 #include "jh_simple.h"
26 #include "jh_tables.h"
35 void jh_round(uint8_t* a, uint8_t roundno){
39 pr = jh_round_const + 32*roundno;
42 r = pgm_read_byte(pr++);
44 b[i]=pgm_read_byte(&(jh_lutbox[((r&0xC0)<<2)|a[i]]));
48 u = pgm_read_byte(jh_permutation_table+2*i);
49 v = pgm_read_byte(jh_permutation_table+2*i+1);
67 uint8_t jh_l_inv(uint8_t a){
71 v ^= ((w<<1)^(w>>3)^((w>>2)&2))&0xf;
72 w ^= ((v<<1)^(v>>3)^((v>>2)&2))&0xf;
77 void group(uint8_t *a){
81 x = (((a[i/8+ 0])>>4)&0x8)
82 | (((a[i/8+ 32])>>5)&0x4)
83 | (((a[i/8+ 64])>>6)&0x2)
84 | (((a[i/8+ 96])>>7)&0x1);
85 a[i/8] <<= 1; a[i/8+32]<<=1; a[i/8+64]<<=1; a[i/8+96]<<=1;
86 y = (((a[i/8+ 16])>>4)&0x8)
87 | (((a[i/8+ 48])>>5)&0x4)
88 | (((a[i/8+ 80])>>6)&0x2)
89 | (((a[i/8+112])>>7)&0x1);
90 a[i/8+16] <<= 1; a[i/8+48]<<=1; a[i/8+80]<<=1; a[i/8+112]<<=1;
97 void degroup(uint8_t *a){
102 b[j+ 0]<<=1; b[j+ 0] |= ((a[i])>>7)&1;
103 b[j+ 32]<<=1; b[j+ 32] |= ((a[i])>>6)&1;
104 b[j+ 64]<<=1; b[j+ 64] |= ((a[i])>>5)&1;
105 b[j+ 96]<<=1; b[j+ 96] |= ((a[i])>>4)&1;
106 b[j+ 16]<<=1; b[j+ 16] |= ((a[i])>>3)&1;
107 b[j+ 48]<<=1; b[j+ 48] |= ((a[i])>>2)&1;
108 b[j+ 80]<<=1; b[j+ 80] |= ((a[i])>>1)&1;
109 b[j+112]<<=1; b[j+112] |= ((a[i])>>0)&1;
114 void jh_encrypt(uint8_t* a){
118 cli_putstr_P(PSTR("\r\n== pre group ==\r\n"));
119 cli_hexdump_block(a, 128, 4, 16);
128 cli_putstr_P(PSTR("\r\n== pre degroup ==\r\n"));
129 cli_hexdump_block(a, 128, 4, 16);
133 cli_putstr_P(PSTR("\r\n== post degroup ==\r\n"));
134 cli_hexdump_block(a, 128, 4, 16);