{

static unsigned char perm_challenge[] = {1,3,0,7,5, 2,9,6,4,8};

unsigned char scratch[10];

int i;

for (i = 9; i >= 0; --i) {

scratch[i] = challenge[perm_challenge[i]];

}

CSSengine(varient, scratch, key);

{

static unsigned char perm_challenge[] = {6,1,9,3,8, 5,7,4,0,2};

static unsigned char perm_varient[] = {

0x0a, 0x08, 0x0e, 0x0c, 0x0b, 0x09, 0x0f, 0x0d,

0x1a, 0x18, 0x1e, 0x1c, 0x1b, 0x19, 0x1f, 0x1d,

0x02, 0x00, 0x06, 0x04, 0x03, 0x01, 0x07, 0x05,

0x12, 0x10, 0x16, 0x14, 0x13, 0x11, 0x17, 0x15

};

unsigned char scratch[10];

int i;

for (i = 9; i >= 0; --i) {

scratch[i] = challenge[perm_challenge[i]];

}

CSSengine(perm_varient[varient], scratch, key);

{

static unsigned char perm_challenge[] = {4,0,3,5,7, 2,8,6,1,9};

static unsigned char perm_varient[] = {

0x12, 0x1a, 0x16, 0x1e, 0x02, 0x0a, 0x06, 0x0e,

0x10, 0x18, 0x14, 0x1c, 0x00, 0x08, 0x04, 0x0c,

0x13, 0x1b, 0x17, 0x1f, 0x03, 0x0b, 0x07, 0x0f,

0x11, 0x19, 0x15, 0x1d, 0x01, 0x09, 0x05, 0x0d

};

unsigned char scratch[10];

int i;

for (i = 9; i >= 0; --i) {

scratch[i] = challenge[perm_challenge[i]];

}

CSSengine(perm_varient[varient], scratch, key);

{

unsigned long lfsr0, lfsr1;

unsigned char b1_combined; /* Save the old value of bit 1 for feedback */

/* In order to ensure that the LFSR works we need to ensure that the

lfsr0 = (s[0] << 17) | (s[1] << 9) | ((s[2] & ~7) << 1) | 8 | (s[2] & 7);

lfsr1 = (s[3] << 9) | 0x100 | s[4];

++output;

b1_combined = 0;

do {

int bit;

unsigned char val;

for (bit = 0, val = 0; bit < 8; ++bit) {

unsigned char o_lfsr0, o_lfsr1; /* Actually only 1 bit each */

unsigned char combined;

o_lfsr0 = ((lfsr0 >> 24) ^ (lfsr0 >> 21) ^ (lfsr0 >> 20) ^ (lfsr0 >> 12)) & 1;

lfsr0 = (lfsr0 << 1) | o_lfsr0;

o_lfsr1 = ((lfsr1 >> 16) ^ (lfsr1 >> 2)) & 1;

lfsr1 = (lfsr1 << 1) | o_lfsr1;

#define BIT0(x) ((x) & 1)

#define BIT1(x) (((x) >> 1) & 1)

combined = !o_lfsr1 + b1_combined + !o_lfsr0;

b1_combined = BIT1(combined);

val |= BIT0(combined) << bit;

}

*--output = val;

} while (--len > 0);

{

unsigned char cse, term, index;

unsigned char temp1[5];

unsigned char temp2[5];

unsigned char bits[30];

int i;

/* Feed the CSSsecret into the input values such that

for (i = 5; --i >= 0; ) {

temp1[i] = input[5 + i] ^ CSSsecret[i] ^ CSStable2[i];

}

CSSgenbits(&bits[29], sizeof bits, temp1);

/* This term is used throughout the following to

cse = CSSvarients[varient] ^ CSStable2[varient];

/* Now the actual blocks doing the encryption. Each

for (i = 5, term = 0; --i >= 0; term = input[i]) {

index = bits[25 + i] ^ input[i];

index = CSStable1[index] ^ ~CSStable2[index] ^ cse;

temp1[i] = CSStable2[index] ^ CSStable3[index] ^ term;

}

temp1[4] ^= temp1[0];

for (i = 5, term = 0; --i >= 0; term = temp1[i]) {

index = bits[20 + i] ^ temp1[i];

index = CSStable1[index] ^ ~CSStable2[index] ^ cse;

temp2[i] = CSStable2[index] ^ CSStable3[index] ^ term;

}

temp2[4] ^= temp2[0];

for (i = 5, term = 0; --i >= 0; term = temp2[i]) {

index = bits[15 + i] ^ temp2[i];

index = CSStable1[index] ^ ~CSStable2[index] ^ cse;

index = CSStable2[index] ^ CSStable3[index] ^ term;

temp1[i] = CSStable0[index] ^ CSStable2[index];

}

temp1[4] ^= temp1[0];

for (i = 5, term = 0; --i >= 0; term = temp1[i]) {

index = bits[10 + i] ^ temp1[i];

index = CSStable1[index] ^ ~CSStable2[index] ^ cse;

index = CSStable2[index] ^ CSStable3[index] ^ term;

temp2[i] = CSStable0[index] ^ CSStable2[index];

}

temp2[4] ^= temp2[0];

for (i = 5, term = 0; --i >= 0; term = temp2[i]) {

index = bits[5 + i] ^ temp2[i];

index = CSStable1[index] ^ ~CSStable2[index] ^ cse;

temp1[i] = CSStable2[index] ^ CSStable3[index] ^ term;

}

temp1[4] ^= temp1[0];

for (i = 5, term = 0; --i >= 0; term = temp1[i]) {

index = bits[i] ^ temp1[i];

index = CSStable1[index] ^ ~CSStable2[index] ^ cse;

output[i] = CSStable2[index] ^ CSStable3[index] ^ term;

}