linux-imx

/*

 * Cryptographic API.

 *

 * Serpent Cipher Algorithm.

 *

 * 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

 *              Based on code by hvr

 *

 * This program is free software; you can redistribute it and/or modify

 * it under the terms of the GNU General Public License as published by

 * the Free Software Foundation; either version 2 of the License, or

 * (at your option) any later version.

 */

​

#include <linux/init.h>

#include <linux/module.h>

#include <linux/errno.h>

#include <asm/byteorder.h>

#include <linux/crypto.h>

#include <linux/types.h>

#include <crypto/serpent.h>

​

/* Key is padded to the maximum of 256 bits before round key generation.

 * Any key length <= 256 bits (32 bytes) is allowed by the algorithm.

 */

​

#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; })

​

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

    ({ 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; })

​

#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];  \

    })

​

#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;                  \

    x1 = rol32(x1, 1);  x3 ^= x4;                  \

    x3 = rol32(x3, 7);  x4  = x1;                  \

    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];                \

    })

​

#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); \

    })

​

#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;                   \

    })

​

#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;           \

    })

​

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