Donate to e Foundation | Murena handsets with /e/OS | Own a part of Murena! Learn more

Commit 7f4e3e3f authored by Jussi Kivilinna's avatar Jussi Kivilinna Committed by Herbert Xu
Browse files

crypto: serpent - cleanup checkpatch errors and warnings 



Do checkpatch fixes before rename to keep rename patch simple and clean.

Signed-off-by: default avatarJussi Kivilinna <jussi.kivilinna@mbnet.fi>
Signed-off-by: default avatarHerbert Xu <herbert@gondor.apana.org.au>
parent 8b4d43a4

crypto/serpent.c

+344 −259
Original line number Diff line number Diff line
@@ -6,7 +6,8 @@ 
 * Copyright (C) 2002 Dag Arne Osvik <osvik@ii.uib.no>

 *               2003 Herbert Valerio Riedel <hvr@gnu.org>

 *

 * Added tnepres support: Ruben Jesus Garcia Hernandez <ruben@ugr.es>, 18.10.2004

 * Added tnepres support:

 *		Ruben Jesus Garcia Hernandez <ruben@ugr.es>, 18.10.2004

 *              Based on code by hvr

 *

 * This program is free software; you can redistribute it and/or modify
@@ -30,19 +31,23 @@ 
#define PHI 0x9e3779b9UL



#define keyiter(a, b, c, d, i, j) \

        b ^= d; b ^= c; b ^= a; b ^= PHI ^ i; b = rol32(b,11); k[j] = b;

	({ b ^= d; b ^= c; b ^= a; b ^= PHI ^ i; b = rol32(b, 11); k[j] = b; })



#define loadkeys(x0, x1, x2, x3, i) \

	x0=k[i]; x1=k[i+1]; x2=k[i+2]; x3=k[i+3];

	({ x0 = k[i]; x1 = k[i+1]; x2 = k[i+2]; x3 = k[i+3]; })



#define storekeys(x0, x1, x2, x3, i) \

	k[i]=x0; k[i+1]=x1; k[i+2]=x2; k[i+3]=x3;

	({ k[i] = x0; k[i+1] = x1; k[i+2] = x2; k[i+3] = x3; })



#define K(x0,x1,x2,x3,i)				\

#define store_and_load_keys(x0, x1, x2, x3, s, l) \

	({ storekeys(x0, x1, x2, x3, s); loadkeys(x0, x1, x2, x3, l); })



#define K(x0, x1, x2, x3, i) ({				\

	x3 ^= k[4*(i)+3];        x2 ^= k[4*(i)+2];	\

	x1 ^= k[4*(i)+1];        x0 ^= k[4*(i)+0];

	x1 ^= k[4*(i)+1];        x0 ^= k[4*(i)+0];	\

	})



#define LK(x0,x1,x2,x3,x4,i)				\

#define LK(x0, x1, x2, x3, x4, i) ({					   \

							x0 = rol32(x0, 13);\

	x2 = rol32(x2, 3);	x1 ^= x0;		x4  = x0 << 3;	   \

	x3 ^= x2;		x1 ^= x2;				   \
@@ -51,54 +56,60 @@ 
	x0 ^= x1;		x4 <<= 7;		x2 ^= x3;	   \

	x0 ^= x3;		x2 ^= x4;		x3 ^= k[4*i+3];	   \

	x1 ^= k[4*i+1];		x0 = rol32(x0, 5);	x2 = rol32(x2, 22);\

	x0 ^= k[4*i+0];	x2 ^= k[4*i+2];

	x0 ^= k[4*i+0];		x2 ^= k[4*i+2];				   \

	})



#define KL(x0,x1,x2,x3,x4,i)				\

#define KL(x0, x1, x2, x3, x4, i) ({					   \

	x0 ^= k[4*i+0];		x1 ^= k[4*i+1];		x2 ^= k[4*i+2];	   \

	x3 ^= k[4*i+3];		x0 = ror32(x0, 5);	x2 = ror32(x2, 22);\

	x4 =  x1;		x2 ^= x3;		x0 ^= x3;	   \

	x4 <<= 7;		x0 ^= x1;		x1 = ror32(x1, 1); \

	x2 ^= x4;		x3 = ror32(x3, 7);	x4 = x0 << 3;	   \

	x1 ^= x0;		x3 ^= x4;		x0 = ror32(x0, 13);\

	x1 ^= x2;	x3 ^= x2;	x2=ror32(x2,3);

	x1 ^= x2;		x3 ^= x2;		x2 = ror32(x2, 3); \

	})



#define S0(x0,x1,x2,x3,x4)				\

#define S0(x0, x1, x2, x3, x4) ({			\

					x4  = x3;	\

	x3 |= x0;	x0 ^= x4;	x4 ^= x2;	\

	x4 = ~x4;	x3 ^= x1;	x1 &= x0;	\

	x1 ^= x4;	x2 ^= x0;	x0 ^= x3;	\

	x4 |= x0;	x0 ^= x2;	x2 &= x1;	\

	x3 ^= x2;	x1 = ~x1;	x2 ^= x4;	\

	x1 ^= x2;

	x1 ^= x2;					\

	})



#define S1(x0,x1,x2,x3,x4)				\

#define S1(x0, x1, x2, x3, x4) ({			\

					x4  = x1;	\

	x1 ^= x0;	x0 ^= x3;	x3 = ~x3;	\

	x4 &= x1;	x0 |= x1;	x3 ^= x2;	\

	x0 ^= x3;	x1 ^= x3;	x3 ^= x4;	\

	x1 |= x4;	x4 ^= x2;	x2 &= x0;	\

	x2 ^= x1;	x1 |= x0;	x0 = ~x0;	\

	x0 ^= x2;	x4 ^= x1;

	x0 ^= x2;	x4 ^= x1;			\

	})



#define S2(x0,x1,x2,x3,x4)				\

#define S2(x0, x1, x2, x3, x4) ({			\

					x3 = ~x3;	\

	x1 ^= x0;	x4  = x0;	x0 &= x2;	\

	x0 ^= x3;	x3 |= x4;	x2 ^= x1;	\

	x3 ^= x1;	x1 &= x0;	x0 ^= x2;	\

	x2 &= x3;	x3 |= x1;	x0 = ~x0;	\

	x3 ^= x0;	x4 ^= x0;	x0 ^= x2;	\

	x1 |= x2;

	x1 |= x2;					\

	})



#define S3(x0,x1,x2,x3,x4)				\

#define S3(x0, x1, x2, x3, x4) ({			\

					x4  = x1;	\

	x1 ^= x3;	x3 |= x0;	x4 &= x0;	\

	x0 ^= x2;	x2 ^= x1;	x1 &= x3;	\

	x2 ^= x3;	x0 |= x4;	x4 ^= x3;	\

	x1 ^= x0;	x0 &= x3;	x3 &= x4;	\

	x3 ^= x2;	x4 |= x1;	x2 &= x1;	\

	x4 ^= x3;	x0 ^= x3;	x3 ^= x2;

	x4 ^= x3;	x0 ^= x3;	x3 ^= x2;	\

	})



#define S4(x0,x1,x2,x3,x4)				\

#define S4(x0, x1, x2, x3, x4) ({			\

					x4  = x3;	\

	x3 &= x0;	x0 ^= x4;			\

	x3 ^= x2;	x2 |= x4;	x0 ^= x1;	\
@@ -106,27 +117,30 @@ 
	x2 ^= x1;	x1 &= x0;			\

	x1 ^= x4;	x4 &= x2;	x2 ^= x3;	\

	x4 ^= x0;	x3 |= x1;	x1 = ~x1;	\

	x3 ^= x0;

	x3 ^= x0;					\

	})



#define S5(x0,x1,x2,x3,x4)				\

#define S5(x0, x1, x2, x3, x4) ({			\

	x4  = x1;	x1 |= x0;			\

	x2 ^= x1;	x3 = ~x3;	x4 ^= x0;	\

	x0 ^= x2;	x1 &= x4;	x4 |= x3;	\

	x4 ^= x0;	x0 &= x3;	x1 ^= x3;	\

	x3 ^= x2;	x0 ^= x1;	x2 &= x4;	\

	x1 ^= x2;	x2 &= x0;			\

	x3 ^= x2;

	x3 ^= x2;					\

	})



#define S6(x0,x1,x2,x3,x4)				\

#define S6(x0, x1, x2, x3, x4) ({			\

					x4  = x1;	\

	x3 ^= x0;	x1 ^= x2;	x2 ^= x0;	\

	x0 &= x3;	x1 |= x3;	x4 = ~x4;	\

	x0 ^= x1;	x1 ^= x2;			\

	x3 ^= x4;	x4 ^= x0;	x2 &= x0;	\

	x4 ^= x1;	x2 ^= x3;	x3 &= x1;	\

	x3 ^= x0;	x1 ^= x2;

	x3 ^= x0;	x1 ^= x2;			\

	})



#define S7(x0,x1,x2,x3,x4)				\

#define S7(x0, x1, x2, x3, x4) ({			\

					x1 = ~x1;	\

	x4  = x1;	x0 = ~x0;	x1 &= x2;	\

	x1 ^= x3;	x3 |= x4;	x4 ^= x2;	\
@@ -134,77 +148,86 @@ 
	x2 &= x0;	x0 ^= x4;	x4 ^= x3;	\

	x3 &= x0;	x4 ^= x1;			\

	x2 ^= x4;	x3 ^= x1;	x4 |= x0;	\

	x4 ^= x1;

	x4 ^= x1;					\

	})



#define SI0(x0,x1,x2,x3,x4)				\

#define SI0(x0, x1, x2, x3, x4) ({			\

			x4  = x3;	x1 ^= x0;	\

	x3 |= x1;	x4 ^= x1;	x0 = ~x0;	\

	x2 ^= x3;	x3 ^= x0;	x0 &= x1;	\

	x0 ^= x2;	x2 &= x3;	x3 ^= x4;	\

	x2 ^= x3;	x1 ^= x3;	x3 &= x0;	\

	x1 ^= x0;	x0 ^= x2;	x4 ^= x3;

	x1 ^= x0;	x0 ^= x2;	x4 ^= x3;	\

	})



#define SI1(x0,x1,x2,x3,x4)				\

#define SI1(x0, x1, x2, x3, x4) ({			\

	x1 ^= x3;	x4  = x0;			\

	x0 ^= x2;	x2 = ~x2;	x4 |= x1;	\

	x4 ^= x3;	x3 &= x1;	x1 ^= x2;	\

	x2 &= x4;	x4 ^= x1;	x1 |= x3;	\

	x3 ^= x0;	x2 ^= x0;	x0 |= x4;	\

	x2 ^= x4;	x1 ^= x0;			\

	x4 ^= x1;

	x4 ^= x1;					\

	})



#define SI2(x0,x1,x2,x3,x4)				\

#define SI2(x0, x1, x2, x3, x4) ({			\

	x2 ^= x1;	x4  = x3;	x3 = ~x3;	\

	x3 |= x2;	x2 ^= x4;	x4 ^= x0;	\

	x3 ^= x1;	x1 |= x2;	x2 ^= x0;	\

	x1 ^= x4;	x4 |= x3;	x2 ^= x3;	\

	x4 ^= x2;	x2 &= x1;			\

	x2 ^= x3;	x3 ^= x4;	x4 ^= x0;

	x2 ^= x3;	x3 ^= x4;	x4 ^= x0;	\

	})



#define SI3(x0,x1,x2,x3,x4)				\

#define SI3(x0, x1, x2, x3, x4) ({			\

					x2 ^= x1;	\

	x4  = x1;	x1 &= x2;			\

	x1 ^= x0;	x0 |= x4;	x4 ^= x3;	\

	x0 ^= x3;	x3 |= x1;	x1 ^= x2;	\

	x1 ^= x3;	x0 ^= x2;	x2 ^= x3;	\

	x3 &= x1;	x1 ^= x0;	x0 &= x2;	\

	x4 ^= x3;	x3 ^= x0;	x0 ^= x1;

	x4 ^= x3;	x3 ^= x0;	x0 ^= x1;	\

	})



#define SI4(x0,x1,x2,x3,x4)				\

#define SI4(x0, x1, x2, x3, x4) ({			\

	x2 ^= x3;	x4  = x0;	x0 &= x1;	\

	x0 ^= x2;	x2 |= x3;	x4 = ~x4;	\

	x1 ^= x0;	x0 ^= x2;	x2 &= x4;	\

	x2 ^= x0;	x0 |= x4;			\

	x0 ^= x3;	x3 &= x2;			\

	x4 ^= x3;	x3 ^= x1;	x1 &= x0;	\

	x4 ^= x1;	x0 ^= x3;

	x4 ^= x1;	x0 ^= x3;			\

	})



#define SI5(x0,x1,x2,x3,x4)				\

#define SI5(x0, x1, x2, x3, x4) ({			\

			x4  = x1;	x1 |= x2;	\

	x2 ^= x4;	x1 ^= x3;	x3 &= x4;	\

	x2 ^= x3;	x3 |= x0;	x0 = ~x0;	\

	x3 ^= x2;	x2 |= x0;	x4 ^= x1;	\

	x2 ^= x4;	x4 &= x0;	x0 ^= x1;	\

	x1 ^= x3;	x0 &= x2;	x2 ^= x3;	\

	x0 ^= x2;	x2 ^= x4;	x4 ^= x3;

	x0 ^= x2;	x2 ^= x4;	x4 ^= x3;	\

	})



#define SI6(x0,x1,x2,x3,x4)				\

#define SI6(x0, x1, x2, x3, x4) ({			\

			x0 ^= x2;			\

	x4  = x0;	x0 &= x3;	x2 ^= x3;	\

	x0 ^= x2;	x3 ^= x1;	x2 |= x4;	\

	x2 ^= x3;	x3 &= x0;	x0 = ~x0;	\

	x3 ^= x1;	x1 &= x2;	x4 ^= x0;	\

	x3 ^= x4;	x4 ^= x2;	x0 ^= x1;	\

	x2 ^= x0;

	x2 ^= x0;					\

	})



#define SI7(x0,x1,x2,x3,x4)				\

#define SI7(x0, x1, x2, x3, x4) ({			\

	x4  = x3;	x3 &= x0;	x0 ^= x2;	\

	x2 |= x4;	x4 ^= x1;	x0 = ~x0;	\

	x1 |= x3;	x4 ^= x0;	x0 &= x2;	\

	x0 ^= x1;	x1 &= x2;	x3 ^= x2;	\

	x4 ^= x3;	x2 &= x3;	x3 |= x0;	\

	x1 ^= x4;	x3 ^= x4;	x4 &= x0;	\

	x4 ^= x2;

	x4 ^= x2;					\

	})



int __serpent_setkey(struct serpent_ctx *ctx, const u8 *key,

		     unsigned int keylen)
@@ -240,111 +263,173 @@ int __serpent_setkey(struct serpent_ctx *ctx, const u8 *key, 
	keyiter(le32_to_cpu(k[6]), r1, r0, r3, 6, 6);

	keyiter(le32_to_cpu(k[7]), r2, r1, r4, 7, 7);



	keyiter(k[  0],r3,r2,r0,  8,  8); keyiter(k[  1],r4,r3,r1,  9,  9);

	keyiter(k[  2],r0,r4,r2, 10, 10); keyiter(k[  3],r1,r0,r3, 11, 11);

	keyiter(k[  4],r2,r1,r4, 12, 12); keyiter(k[  5],r3,r2,r0, 13, 13);

	keyiter(k[  6],r4,r3,r1, 14, 14); keyiter(k[  7],r0,r4,r2, 15, 15);

	keyiter(k[  8],r1,r0,r3, 16, 16); keyiter(k[  9],r2,r1,r4, 17, 17);

	keyiter(k[ 10],r3,r2,r0, 18, 18); keyiter(k[ 11],r4,r3,r1, 19, 19);

	keyiter(k[ 12],r0,r4,r2, 20, 20); keyiter(k[ 13],r1,r0,r3, 21, 21);

	keyiter(k[ 14],r2,r1,r4, 22, 22); keyiter(k[ 15],r3,r2,r0, 23, 23);

	keyiter(k[ 16],r4,r3,r1, 24, 24); keyiter(k[ 17],r0,r4,r2, 25, 25);

	keyiter(k[ 18],r1,r0,r3, 26, 26); keyiter(k[ 19],r2,r1,r4, 27, 27);

	keyiter(k[ 20],r3,r2,r0, 28, 28); keyiter(k[ 21],r4,r3,r1, 29, 29);

	keyiter(k[ 22],r0,r4,r2, 30, 30); keyiter(k[ 23],r1,r0,r3, 31, 31);

	keyiter(k[0], r3, r2, r0, 8, 8);

	keyiter(k[1], r4, r3, r1, 9, 9);

	keyiter(k[2], r0, r4, r2, 10, 10);

	keyiter(k[3], r1, r0, r3, 11, 11);

	keyiter(k[4], r2, r1, r4, 12, 12);

	keyiter(k[5], r3, r2, r0, 13, 13);

	keyiter(k[6], r4, r3, r1, 14, 14);

	keyiter(k[7], r0, r4, r2, 15, 15);

	keyiter(k[8], r1, r0, r3, 16, 16);

	keyiter(k[9], r2, r1, r4, 17, 17);

	keyiter(k[10], r3, r2, r0, 18, 18);

	keyiter(k[11], r4, r3, r1, 19, 19);

	keyiter(k[12], r0, r4, r2, 20, 20);

	keyiter(k[13], r1, r0, r3, 21, 21);

	keyiter(k[14], r2, r1, r4, 22, 22);

	keyiter(k[15], r3, r2, r0, 23, 23);

	keyiter(k[16], r4, r3, r1, 24, 24);

	keyiter(k[17], r0, r4, r2, 25, 25);

	keyiter(k[18], r1, r0, r3, 26, 26);

	keyiter(k[19], r2, r1, r4, 27, 27);

	keyiter(k[20], r3, r2, r0, 28, 28);

	keyiter(k[21], r4, r3, r1, 29, 29);

	keyiter(k[22], r0, r4, r2, 30, 30);

	keyiter(k[23], r1, r0, r3, 31, 31);



	k += 50;



	keyiter(k[-26],r2,r1,r4, 32,-18); keyiter(k[-25],r3,r2,r0, 33,-17);

	keyiter(k[-24],r4,r3,r1, 34,-16); keyiter(k[-23],r0,r4,r2, 35,-15);

	keyiter(k[-22],r1,r0,r3, 36,-14); keyiter(k[-21],r2,r1,r4, 37,-13);

	keyiter(k[-20],r3,r2,r0, 38,-12); keyiter(k[-19],r4,r3,r1, 39,-11);

	keyiter(k[-18],r0,r4,r2, 40,-10); keyiter(k[-17],r1,r0,r3, 41, -9);

	keyiter(k[-16],r2,r1,r4, 42, -8); keyiter(k[-15],r3,r2,r0, 43, -7);

	keyiter(k[-14],r4,r3,r1, 44, -6); keyiter(k[-13],r0,r4,r2, 45, -5);

	keyiter(k[-12],r1,r0,r3, 46, -4); keyiter(k[-11],r2,r1,r4, 47, -3);

	keyiter(k[-10],r3,r2,r0, 48, -2); keyiter(k[ -9],r4,r3,r1, 49, -1);

	keyiter(k[ -8],r0,r4,r2, 50,  0); keyiter(k[ -7],r1,r0,r3, 51,  1);

	keyiter(k[ -6],r2,r1,r4, 52,  2); keyiter(k[ -5],r3,r2,r0, 53,  3);

	keyiter(k[ -4],r4,r3,r1, 54,  4); keyiter(k[ -3],r0,r4,r2, 55,  5);

	keyiter(k[ -2],r1,r0,r3, 56,  6); keyiter(k[ -1],r2,r1,r4, 57,  7);

	keyiter(k[  0],r3,r2,r0, 58,  8); keyiter(k[  1],r4,r3,r1, 59,  9);

	keyiter(k[  2],r0,r4,r2, 60, 10); keyiter(k[  3],r1,r0,r3, 61, 11);

	keyiter(k[  4],r2,r1,r4, 62, 12); keyiter(k[  5],r3,r2,r0, 63, 13);

	keyiter(k[  6],r4,r3,r1, 64, 14); keyiter(k[  7],r0,r4,r2, 65, 15);

	keyiter(k[  8],r1,r0,r3, 66, 16); keyiter(k[  9],r2,r1,r4, 67, 17);

	keyiter(k[ 10],r3,r2,r0, 68, 18); keyiter(k[ 11],r4,r3,r1, 69, 19);

	keyiter(k[ 12],r0,r4,r2, 70, 20); keyiter(k[ 13],r1,r0,r3, 71, 21);

	keyiter(k[ 14],r2,r1,r4, 72, 22); keyiter(k[ 15],r3,r2,r0, 73, 23);

	keyiter(k[ 16],r4,r3,r1, 74, 24); keyiter(k[ 17],r0,r4,r2, 75, 25);

	keyiter(k[ 18],r1,r0,r3, 76, 26); keyiter(k[ 19],r2,r1,r4, 77, 27);

	keyiter(k[ 20],r3,r2,r0, 78, 28); keyiter(k[ 21],r4,r3,r1, 79, 29);

	keyiter(k[ 22],r0,r4,r2, 80, 30); keyiter(k[ 23],r1,r0,r3, 81, 31);

	keyiter(k[-26], r2, r1, r4, 32, -18);

	keyiter(k[-25], r3, r2, r0, 33, -17);

	keyiter(k[-24], r4, r3, r1, 34, -16);

	keyiter(k[-23], r0, r4, r2, 35, -15);

	keyiter(k[-22], r1, r0, r3, 36, -14);

	keyiter(k[-21], r2, r1, r4, 37, -13);

	keyiter(k[-20], r3, r2, r0, 38, -12);

	keyiter(k[-19], r4, r3, r1, 39, -11);

	keyiter(k[-18], r0, r4, r2, 40, -10);

	keyiter(k[-17], r1, r0, r3, 41, -9);

	keyiter(k[-16], r2, r1, r4, 42, -8);

	keyiter(k[-15], r3, r2, r0, 43, -7);

	keyiter(k[-14], r4, r3, r1, 44, -6);

	keyiter(k[-13], r0, r4, r2, 45, -5);

	keyiter(k[-12], r1, r0, r3, 46, -4);

	keyiter(k[-11], r2, r1, r4, 47, -3);

	keyiter(k[-10], r3, r2, r0, 48, -2);

	keyiter(k[-9], r4, r3, r1, 49, -1);

	keyiter(k[-8], r0, r4, r2, 50, 0);

	keyiter(k[-7], r1, r0, r3, 51, 1);

	keyiter(k[-6], r2, r1, r4, 52, 2);

	keyiter(k[-5], r3, r2, r0, 53, 3);

	keyiter(k[-4], r4, r3, r1, 54, 4);

	keyiter(k[-3], r0, r4, r2, 55, 5);

	keyiter(k[-2], r1, r0, r3, 56, 6);

	keyiter(k[-1], r2, r1, r4, 57, 7);

	keyiter(k[0], r3, r2, r0, 58, 8);

	keyiter(k[1], r4, r3, r1, 59, 9);

	keyiter(k[2], r0, r4, r2, 60, 10);

	keyiter(k[3], r1, r0, r3, 61, 11);

	keyiter(k[4], r2, r1, r4, 62, 12);

	keyiter(k[5], r3, r2, r0, 63, 13);

	keyiter(k[6], r4, r3, r1, 64, 14);

	keyiter(k[7], r0, r4, r2, 65, 15);

	keyiter(k[8], r1, r0, r3, 66, 16);

	keyiter(k[9], r2, r1, r4, 67, 17);

	keyiter(k[10], r3, r2, r0, 68, 18);

	keyiter(k[11], r4, r3, r1, 69, 19);

	keyiter(k[12], r0, r4, r2, 70, 20);

	keyiter(k[13], r1, r0, r3, 71, 21);

	keyiter(k[14], r2, r1, r4, 72, 22);

	keyiter(k[15], r3, r2, r0, 73, 23);

	keyiter(k[16], r4, r3, r1, 74, 24);

	keyiter(k[17], r0, r4, r2, 75, 25);

	keyiter(k[18], r1, r0, r3, 76, 26);

	keyiter(k[19], r2, r1, r4, 77, 27);

	keyiter(k[20], r3, r2, r0, 78, 28);

	keyiter(k[21], r4, r3, r1, 79, 29);

	keyiter(k[22], r0, r4, r2, 80, 30);

	keyiter(k[23], r1, r0, r3, 81, 31);



	k += 50;



	keyiter(k[-26],r2,r1,r4, 82,-18); keyiter(k[-25],r3,r2,r0, 83,-17);

	keyiter(k[-24],r4,r3,r1, 84,-16); keyiter(k[-23],r0,r4,r2, 85,-15);

	keyiter(k[-22],r1,r0,r3, 86,-14); keyiter(k[-21],r2,r1,r4, 87,-13);

	keyiter(k[-20],r3,r2,r0, 88,-12); keyiter(k[-19],r4,r3,r1, 89,-11);

	keyiter(k[-18],r0,r4,r2, 90,-10); keyiter(k[-17],r1,r0,r3, 91, -9);

	keyiter(k[-16],r2,r1,r4, 92, -8); keyiter(k[-15],r3,r2,r0, 93, -7);

	keyiter(k[-14],r4,r3,r1, 94, -6); keyiter(k[-13],r0,r4,r2, 95, -5);

	keyiter(k[-12],r1,r0,r3, 96, -4); keyiter(k[-11],r2,r1,r4, 97, -3);

	keyiter(k[-10],r3,r2,r0, 98, -2); keyiter(k[ -9],r4,r3,r1, 99, -1);

	keyiter(k[ -8],r0,r4,r2,100,  0); keyiter(k[ -7],r1,r0,r3,101,  1);

	keyiter(k[ -6],r2,r1,r4,102,  2); keyiter(k[ -5],r3,r2,r0,103,  3);

	keyiter(k[ -4],r4,r3,r1,104,  4); keyiter(k[ -3],r0,r4,r2,105,  5);

	keyiter(k[ -2],r1,r0,r3,106,  6); keyiter(k[ -1],r2,r1,r4,107,  7);

	keyiter(k[  0],r3,r2,r0,108,  8); keyiter(k[  1],r4,r3,r1,109,  9);

	keyiter(k[  2],r0,r4,r2,110, 10); keyiter(k[  3],r1,r0,r3,111, 11);

	keyiter(k[  4],r2,r1,r4,112, 12); keyiter(k[  5],r3,r2,r0,113, 13);

	keyiter(k[  6],r4,r3,r1,114, 14); keyiter(k[  7],r0,r4,r2,115, 15);

	keyiter(k[  8],r1,r0,r3,116, 16); keyiter(k[  9],r2,r1,r4,117, 17);

	keyiter(k[ 10],r3,r2,r0,118, 18); keyiter(k[ 11],r4,r3,r1,119, 19);

	keyiter(k[ 12],r0,r4,r2,120, 20); keyiter(k[ 13],r1,r0,r3,121, 21);

	keyiter(k[ 14],r2,r1,r4,122, 22); keyiter(k[ 15],r3,r2,r0,123, 23);

	keyiter(k[ 16],r4,r3,r1,124, 24); keyiter(k[ 17],r0,r4,r2,125, 25);

	keyiter(k[ 18],r1,r0,r3,126, 26); keyiter(k[ 19],r2,r1,r4,127, 27);

	keyiter(k[ 20],r3,r2,r0,128, 28); keyiter(k[ 21],r4,r3,r1,129, 29);

	keyiter(k[ 22],r0,r4,r2,130, 30); keyiter(k[ 23],r1,r0,r3,131, 31);

	keyiter(k[-26], r2, r1, r4, 82, -18);

	keyiter(k[-25], r3, r2, r0, 83, -17);

	keyiter(k[-24], r4, r3, r1, 84, -16);

	keyiter(k[-23], r0, r4, r2, 85, -15);

	keyiter(k[-22], r1, r0, r3, 86, -14);

	keyiter(k[-21], r2, r1, r4, 87, -13);

	keyiter(k[-20], r3, r2, r0, 88, -12);

	keyiter(k[-19], r4, r3, r1, 89, -11);

	keyiter(k[-18], r0, r4, r2, 90, -10);

	keyiter(k[-17], r1, r0, r3, 91, -9);

	keyiter(k[-16], r2, r1, r4, 92, -8);

	keyiter(k[-15], r3, r2, r0, 93, -7);

	keyiter(k[-14], r4, r3, r1, 94, -6);

	keyiter(k[-13], r0, r4, r2, 95, -5);

	keyiter(k[-12], r1, r0, r3, 96, -4);

	keyiter(k[-11], r2, r1, r4, 97, -3);

	keyiter(k[-10], r3, r2, r0, 98, -2);

	keyiter(k[-9], r4, r3, r1, 99, -1);

	keyiter(k[-8], r0, r4, r2, 100, 0);

	keyiter(k[-7], r1, r0, r3, 101, 1);

	keyiter(k[-6], r2, r1, r4, 102, 2);

	keyiter(k[-5], r3, r2, r0, 103, 3);

	keyiter(k[-4], r4, r3, r1, 104, 4);

	keyiter(k[-3], r0, r4, r2, 105, 5);

	keyiter(k[-2], r1, r0, r3, 106, 6);

	keyiter(k[-1], r2, r1, r4, 107, 7);

	keyiter(k[0], r3, r2, r0, 108, 8);

	keyiter(k[1], r4, r3, r1, 109, 9);

	keyiter(k[2], r0, r4, r2, 110, 10);

	keyiter(k[3], r1, r0, r3, 111, 11);

	keyiter(k[4], r2, r1, r4, 112, 12);

	keyiter(k[5], r3, r2, r0, 113, 13);

	keyiter(k[6], r4, r3, r1, 114, 14);

	keyiter(k[7], r0, r4, r2, 115, 15);

	keyiter(k[8], r1, r0, r3, 116, 16);

	keyiter(k[9], r2, r1, r4, 117, 17);

	keyiter(k[10], r3, r2, r0, 118, 18);

	keyiter(k[11], r4, r3, r1, 119, 19);

	keyiter(k[12], r0, r4, r2, 120, 20);

	keyiter(k[13], r1, r0, r3, 121, 21);

	keyiter(k[14], r2, r1, r4, 122, 22);

	keyiter(k[15], r3, r2, r0, 123, 23);

	keyiter(k[16], r4, r3, r1, 124, 24);

	keyiter(k[17], r0, r4, r2, 125, 25);

	keyiter(k[18], r1, r0, r3, 126, 26);

	keyiter(k[19], r2, r1, r4, 127, 27);

	keyiter(k[20], r3, r2, r0, 128, 28);

	keyiter(k[21], r4, r3, r1, 129, 29);

	keyiter(k[22], r0, r4, r2, 130, 30);

	keyiter(k[23], r1, r0, r3, 131, 31);



	/* Apply S-boxes */



	S3(r3,r4,r0,r1,r2); storekeys(r1,r2,r4,r3, 28); loadkeys(r1,r2,r4,r3, 24);

	S4(r1,r2,r4,r3,r0); storekeys(r2,r4,r3,r0, 24); loadkeys(r2,r4,r3,r0, 20);

	S5(r2,r4,r3,r0,r1); storekeys(r1,r2,r4,r0, 20); loadkeys(r1,r2,r4,r0, 16);

	S6(r1,r2,r4,r0,r3); storekeys(r4,r3,r2,r0, 16); loadkeys(r4,r3,r2,r0, 12);

	S7(r4,r3,r2,r0,r1); storekeys(r1,r2,r0,r4, 12); loadkeys(r1,r2,r0,r4,  8);

	S0(r1,r2,r0,r4,r3); storekeys(r0,r2,r4,r1,  8); loadkeys(r0,r2,r4,r1,  4);

	S1(r0,r2,r4,r1,r3); storekeys(r3,r4,r1,r0,  4); loadkeys(r3,r4,r1,r0,  0);

	S2(r3,r4,r1,r0,r2); storekeys(r2,r4,r3,r0,  0); loadkeys(r2,r4,r3,r0, -4);

	S3(r2,r4,r3,r0,r1); storekeys(r0,r1,r4,r2, -4); loadkeys(r0,r1,r4,r2, -8);

	S4(r0,r1,r4,r2,r3); storekeys(r1,r4,r2,r3, -8); loadkeys(r1,r4,r2,r3,-12);

	S5(r1,r4,r2,r3,r0); storekeys(r0,r1,r4,r3,-12); loadkeys(r0,r1,r4,r3,-16);

	S6(r0,r1,r4,r3,r2); storekeys(r4,r2,r1,r3,-16); loadkeys(r4,r2,r1,r3,-20);

	S7(r4,r2,r1,r3,r0); storekeys(r0,r1,r3,r4,-20); loadkeys(r0,r1,r3,r4,-24);

	S0(r0,r1,r3,r4,r2); storekeys(r3,r1,r4,r0,-24); loadkeys(r3,r1,r4,r0,-28);

	S3(r3, r4, r0, r1, r2); store_and_load_keys(r1, r2, r4, r3, 28, 24);

	S4(r1, r2, r4, r3, r0); store_and_load_keys(r2, r4, r3, r0, 24, 20);

	S5(r2, r4, r3, r0, r1); store_and_load_keys(r1, r2, r4, r0, 20, 16);

	S6(r1, r2, r4, r0, r3); store_and_load_keys(r4, r3, r2, r0, 16, 12);

	S7(r4, r3, r2, r0, r1); store_and_load_keys(r1, r2, r0, r4, 12, 8);

	S0(r1, r2, r0, r4, r3); store_and_load_keys(r0, r2, r4, r1, 8, 4);

	S1(r0, r2, r4, r1, r3); store_and_load_keys(r3, r4, r1, r0, 4, 0);

	S2(r3, r4, r1, r0, r2); store_and_load_keys(r2, r4, r3, r0, 0, -4);

	S3(r2, r4, r3, r0, r1); store_and_load_keys(r0, r1, r4, r2, -4, -8);

	S4(r0, r1, r4, r2, r3); store_and_load_keys(r1, r4, r2, r3, -8, -12);

	S5(r1, r4, r2, r3, r0); store_and_load_keys(r0, r1, r4, r3, -12, -16);

	S6(r0, r1, r4, r3, r2); store_and_load_keys(r4, r2, r1, r3, -16, -20);

	S7(r4, r2, r1, r3, r0); store_and_load_keys(r0, r1, r3, r4, -20, -24);

	S0(r0, r1, r3, r4, r2); store_and_load_keys(r3, r1, r4, r0, -24, -28);

	k -= 50;

	S1(r3,r1,r4,r0,r2); storekeys(r2,r4,r0,r3, 22); loadkeys(r2,r4,r0,r3, 18);

	S2(r2,r4,r0,r3,r1); storekeys(r1,r4,r2,r3, 18); loadkeys(r1,r4,r2,r3, 14);

	S3(r1,r4,r2,r3,r0); storekeys(r3,r0,r4,r1, 14); loadkeys(r3,r0,r4,r1, 10);

	S4(r3,r0,r4,r1,r2); storekeys(r0,r4,r1,r2, 10); loadkeys(r0,r4,r1,r2,  6);

	S5(r0,r4,r1,r2,r3); storekeys(r3,r0,r4,r2,  6); loadkeys(r3,r0,r4,r2,  2);

	S6(r3,r0,r4,r2,r1); storekeys(r4,r1,r0,r2,  2); loadkeys(r4,r1,r0,r2, -2);

	S7(r4,r1,r0,r2,r3); storekeys(r3,r0,r2,r4, -2); loadkeys(r3,r0,r2,r4, -6);

	S0(r3,r0,r2,r4,r1); storekeys(r2,r0,r4,r3, -6); loadkeys(r2,r0,r4,r3,-10);

	S1(r2,r0,r4,r3,r1); storekeys(r1,r4,r3,r2,-10); loadkeys(r1,r4,r3,r2,-14);

	S2(r1,r4,r3,r2,r0); storekeys(r0,r4,r1,r2,-14); loadkeys(r0,r4,r1,r2,-18);

	S3(r0,r4,r1,r2,r3); storekeys(r2,r3,r4,r0,-18); loadkeys(r2,r3,r4,r0,-22);

	S1(r3, r1, r4, r0, r2); store_and_load_keys(r2, r4, r0, r3, 22, 18);

	S2(r2, r4, r0, r3, r1); store_and_load_keys(r1, r4, r2, r3, 18, 14);

	S3(r1, r4, r2, r3, r0); store_and_load_keys(r3, r0, r4, r1, 14, 10);

	S4(r3, r0, r4, r1, r2); store_and_load_keys(r0, r4, r1, r2, 10, 6);

	S5(r0, r4, r1, r2, r3); store_and_load_keys(r3, r0, r4, r2, 6, 2);

	S6(r3, r0, r4, r2, r1); store_and_load_keys(r4, r1, r0, r2, 2, -2);

	S7(r4, r1, r0, r2, r3); store_and_load_keys(r3, r0, r2, r4, -2, -6);

	S0(r3, r0, r2, r4, r1); store_and_load_keys(r2, r0, r4, r3, -6, -10);

	S1(r2, r0, r4, r3, r1); store_and_load_keys(r1, r4, r3, r2, -10, -14);

	S2(r1, r4, r3, r2, r0); store_and_load_keys(r0, r4, r1, r2, -14, -18);

	S3(r0, r4, r1, r2, r3); store_and_load_keys(r2, r3, r4, r0, -18, -22);

	k -= 50;

	S4(r2,r3,r4,r0,r1); storekeys(r3,r4,r0,r1, 28); loadkeys(r3,r4,r0,r1, 24);

	S5(r3,r4,r0,r1,r2); storekeys(r2,r3,r4,r1, 24); loadkeys(r2,r3,r4,r1, 20);

	S6(r2,r3,r4,r1,r0); storekeys(r4,r0,r3,r1, 20); loadkeys(r4,r0,r3,r1, 16);

	S7(r4,r0,r3,r1,r2); storekeys(r2,r3,r1,r4, 16); loadkeys(r2,r3,r1,r4, 12);

	S0(r2,r3,r1,r4,r0); storekeys(r1,r3,r4,r2, 12); loadkeys(r1,r3,r4,r2,  8);

	S1(r1,r3,r4,r2,r0); storekeys(r0,r4,r2,r1,  8); loadkeys(r0,r4,r2,r1,  4);

	S2(r0,r4,r2,r1,r3); storekeys(r3,r4,r0,r1,  4); loadkeys(r3,r4,r0,r1,  0);

	S4(r2, r3, r4, r0, r1); store_and_load_keys(r3, r4, r0, r1, 28, 24);

	S5(r3, r4, r0, r1, r2); store_and_load_keys(r2, r3, r4, r1, 24, 20);

	S6(r2, r3, r4, r1, r0); store_and_load_keys(r4, r0, r3, r1, 20, 16);

	S7(r4, r0, r3, r1, r2); store_and_load_keys(r2, r3, r1, r4, 16, 12);

	S0(r2, r3, r1, r4, r0); store_and_load_keys(r1, r3, r4, r2, 12, 8);

	S1(r1, r3, r4, r2, r0); store_and_load_keys(r0, r4, r2, r1, 8, 4);

	S2(r0, r4, r2, r1, r3); store_and_load_keys(r3, r4, r0, r1, 4, 0);

	S3(r3, r4, r0, r1, r2); storekeys(r1, r2, r4, r3, 0);



	return 0;