-#if F0_HACK==2
-/* to understand this implementation take a look at f0-opt-table.txt */
-static uint16_t hack_table[5] = { 0x0311, 0xDDB3, 0x2A79, 0x07AA, 0x51C2 };
-static uint8_t offset_table[5] = { 4+16, 6+16, 9+16, 12+16, 13+16 };
-
-
-static
-void bmw_large_f0(uint64_t* q, const uint64_t* h, const void* m){
- uint16_t hack_reg;
- uint8_t i,j,c;
- uint64_t(*s[])(uint64_t)={ bmw_large_s0, bmw_large_s1, bmw_large_s2,
- bmw_large_s3, bmw_large_s4 };
- for(i=0; i<16; ++i){
- ((uint64_t*)h)[i] ^= ((uint64_t*)m)[i];
- }
- dump_x(h, 16, 'T');
- memset(q, 0, 8*16);
- c=4;
- do{
- i=15;
- j = offset_table[c];
- hack_reg = hack_table[c];
- do{
- if(hack_reg&1){
- q[i]-= h[j&15];
- }else{
- q[i]+= h[j&15];
- }
- --j;
- hack_reg>>= 1;
- }while(i--!=0);
- }while(c--!=0);
- dump_x(q, 16, 'W');
- for(i=0; i<16; ++i){
- q[i] = s[i%5](q[i]);
- }
-#if TWEAK
- for(i=0; i<16; ++i){
- ((uint64_t*)h)[i] ^= ((uint64_t*)m)[i];
- }
- for(i=0; i<16; ++i){
- q[i] += h[(i+1)&0xf];
- }
-#endif /* TWEAK */
-}
-#endif /* F0_HACK==2 */
-
-#if F0_HACK==1
-static
-uint8_t f0_lut[] PROGMEM ={
- 5<<1, ( 7<<1)+1, (10<<1)+0, (13<<1)+0, (14<<1)+0,
- 6<<1, ( 8<<1)+1, (11<<1)+0, (14<<1)+0, (15<<1)+1,
- 0<<1, ( 7<<1)+0, ( 9<<1)+0, (12<<1)+1, (15<<1)+0,
- 0<<1, ( 1<<1)+1, ( 8<<1)+0, (10<<1)+1, (13<<1)+0,
- 1<<1, ( 2<<1)+0, ( 9<<1)+0, (11<<1)+1, (14<<1)+1,
- 3<<1, ( 2<<1)+1, (10<<1)+0, (12<<1)+1, (15<<1)+0,
- 4<<1, ( 0<<1)+1, ( 3<<1)+1, (11<<1)+1, (13<<1)+0,
- 1<<1, ( 4<<1)+1, ( 5<<1)+1, (12<<1)+1, (14<<1)+1,
- 2<<1, ( 5<<1)+1, ( 6<<1)+1, (13<<1)+0, (15<<1)+1,
- 0<<1, ( 3<<1)+1, ( 6<<1)+0, ( 7<<1)+1, (14<<1)+0,
- 8<<1, ( 1<<1)+1, ( 4<<1)+1, ( 7<<1)+1, (15<<1)+0,
- 8<<1, ( 0<<1)+1, ( 2<<1)+1, ( 5<<1)+1, ( 9<<1)+0,
- 1<<1, ( 3<<1)+0, ( 6<<1)+1, ( 9<<1)+1, (10<<1)+0,
- 2<<1, ( 4<<1)+0, ( 7<<1)+0, (10<<1)+0, (11<<1)+0,
- 3<<1, ( 5<<1)+1, ( 8<<1)+0, (11<<1)+1, (12<<1)+1,
- 12<<1, ( 4<<1)+1, ( 6<<1)+1, ( 9<<1)+1, (13<<1)+0
-};
-
-static
-void bmw_large_f0(uint64_t* q, const uint64_t* h, const void* m){
- uint8_t i,j=-1,v,sign,l=0;
- uint64_t(*s[])(uint64_t)={ bmw_large_s0, bmw_large_s1, bmw_large_s2,
- bmw_large_s3, bmw_large_s4 };
- for(i=0; i<16; ++i){
- ((uint64_t*)h)[i] ^= ((uint64_t*)m)[i];
- }
- dump_x(h, 16, 'T');
-// memset(q, 0, 4*16);
- for(i=0; i<5*16; ++i){
- v = pgm_read_byte(f0_lut+i);
- sign = v&1;
- v >>=1;
- if(i==l){
- j++;
- l+=5;
- q[j] = h[v];
- continue;
- }
- if(sign){
- q[j] -= h[v];
- }else{
- q[j] += h[v];
- }
- }
- dump_x(q, 16, 'W');
- for(i=0; i<16; ++i){
- q[i] = s[i%5](q[i]);
- }
-#if TWEAK
- for(i=0; i<16; ++i){
- ((uint64_t*)h)[i] ^= ((uint64_t*)m)[i];
- }
- for(i=0; i<16; ++i){
- q[i] += h[(i+1)&0xf];
- }
-#endif /* TWEAK */
-}
-#endif /* F0_HACK==1 */
-
-#if F0_HACK==0