seed_locl.h revision 296465
1116491Sharti/*
2116491Sharti * Copyright (c) 2007 KISA(Korea Information Security Agency). All rights reserved.
3116491Sharti *
4116491Sharti * Redistribution and use in source and binary forms, with or without
5116491Sharti * modification, are permitted provided that the following conditions
6116491Sharti * are met:
7116491Sharti * 1. Redistributions of source code must retain the above copyright
8116491Sharti *    notice, this list of conditions and the following disclaimer.
9116491Sharti * 2. Neither the name of author nor the names of its contributors may
10116491Sharti *    be used to endorse or promote products derived from this software
11116491Sharti *    without specific prior written permission.
12116491Sharti *
13116491Sharti * THIS SOFTWARE IS PROVIDED BY AUTHOR AND CONTRIBUTORS ``AS IS'' AND
14116491Sharti * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
15116491Sharti * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
16116491Sharti * ARE DISCLAIMED.  IN NO EVENT SHALL AUTHOR OR CONTRIBUTORS BE LIABLE
17116491Sharti * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
18116491Sharti * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
19116491Sharti * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
20116491Sharti * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
21116491Sharti * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
22116491Sharti * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
23116491Sharti * SUCH DAMAGE.
24116491Sharti *
25116491Sharti */
26116491Sharti#ifndef HEADER_SEED_LOCL_H
27116491Sharti# define HEADER_SEED_LOCL_H
28116491Sharti
29116491Sharti# include "openssl/e_os2.h"
30116491Sharti# include <openssl/seed.h>
31116491Sharti
32116491Sharti# ifdef SEED_LONG               /* need 32-bit type */
33116491Shartitypedef unsigned long seed_word;
34116519Sharti# else
35116519Shartitypedef unsigned int seed_word;
36116519Sharti# endif
37116491Sharti
38116491Sharti
39116491Sharti#ifdef  __cplusplus
40116491Shartiextern "C" {
41116491Sharti#endif
42116491Sharti
43116491Sharti# define G_FUNC(v)       \
44116491Sharti        SS[0][(unsigned char)      (v) & 0xff] ^ SS[1][(unsigned char) ((v)>>8) & 0xff] ^ \
45116491Sharti        SS[2][(unsigned char)((v)>>16) & 0xff] ^ SS[3][(unsigned char)((v)>>24) & 0xff]
46116491Sharti
47116491Sharti# define char2word(c, i)  \
48116491Sharti        (i) = ((((seed_word)(c)[0]) << 24) | (((seed_word)(c)[1]) << 16) | (((seed_word)(c)[2]) << 8) | ((seed_word)(c)[3]))
49116491Sharti
50116491Sharti# define word2char(l, c)  \
51116491Sharti        *((c)+0) = (unsigned char)((l)>>24) & 0xff; \
52116491Sharti        *((c)+1) = (unsigned char)((l)>>16) & 0xff; \
53116491Sharti        *((c)+2) = (unsigned char)((l)>> 8) & 0xff; \
54116491Sharti        *((c)+3) = (unsigned char)((l))     & 0xff
55116491Sharti
56116491Sharti# define KEYSCHEDULE_UPDATE0(T0, T1, X1, X2, X3, X4, KC)  \
57116491Sharti        (T0) = (X3);                                     \
58116491Sharti        (X3) = (((X3)<<8) ^ ((X4)>>24)) & 0xffffffff;    \
59116491Sharti        (X4) = (((X4)<<8) ^ ((T0)>>24)) & 0xffffffff;    \
60116491Sharti        (T0) = ((X1) + (X3) - (KC))     & 0xffffffff;    \
61116491Sharti        (T1) = ((X2) + (KC) - (X4))     & 0xffffffff
62116491Sharti
63116491Sharti# define KEYSCHEDULE_UPDATE1(T0, T1, X1, X2, X3, X4, KC)  \
64116491Sharti        (T0) = (X1);                                     \
65116491Sharti        (X1) = (((X1)>>8) ^ ((X2)<<24)) & 0xffffffff;    \
66116491Sharti        (X2) = (((X2)>>8) ^ ((T0)<<24)) & 0xffffffff;    \
67116491Sharti        (T0) = ((X1) + (X3) - (KC))     & 0xffffffff;     \
68116491Sharti        (T1) = ((X2) + (KC) - (X4))     & 0xffffffff
69116491Sharti
70116491Sharti# define KEYUPDATE_TEMP(T0, T1, K)   \
71116491Sharti        (K)[0] = G_FUNC((T0));      \
72116491Sharti        (K)[1] = G_FUNC((T1))
73116491Sharti
74116491Sharti# define XOR_SEEDBLOCK(DST, SRC)      \
75116491Sharti        ((DST))[0] ^= ((SRC))[0];    \
76116491Sharti        ((DST))[1] ^= ((SRC))[1];    \
77116491Sharti        ((DST))[2] ^= ((SRC))[2];    \
78116491Sharti        ((DST))[3] ^= ((SRC))[3]
79116491Sharti
80116491Sharti# define MOV_SEEDBLOCK(DST, SRC)      \
81116491Sharti        ((DST))[0] = ((SRC))[0];     \
82116491Sharti        ((DST))[1] = ((SRC))[1];     \
83116491Sharti        ((DST))[2] = ((SRC))[2];     \
84116491Sharti        ((DST))[3] = ((SRC))[3]
85116491Sharti
86116491Sharti# define CHAR2WORD(C, I)              \
87116491Sharti        char2word((C),    (I)[0]);    \
88116491Sharti        char2word((C+4),  (I)[1]);    \
89116491Sharti        char2word((C+8),  (I)[2]);    \
90116491Sharti        char2word((C+12), (I)[3])
91116491Sharti
92116491Sharti# define WORD2CHAR(I, C)              \
93116491Sharti        word2char((I)[0], (C));       \
94116491Sharti        word2char((I)[1], (C+4));     \
95116491Sharti        word2char((I)[2], (C+8));     \
96116491Sharti        word2char((I)[3], (C+12))
97116491Sharti
98116491Sharti# define E_SEED(T0, T1, X1, X2, X3, X4, rbase)   \
99116491Sharti        (T0) = (X3) ^ (ks->data)[(rbase)];       \
100116491Sharti        (T1) = (X4) ^ (ks->data)[(rbase)+1];     \
101116491Sharti        (T1) ^= (T0);                            \
102116491Sharti        (T1) = G_FUNC((T1));                     \
103116491Sharti        (T0) = ((T0) + (T1)) & 0xffffffff;       \
104116491Sharti        (T0) = G_FUNC((T0));                     \
105116491Sharti        (T1) = ((T1) + (T0)) & 0xffffffff;       \
106116491Sharti        (T1) = G_FUNC((T1));                     \
107116491Sharti        (T0) = ((T0) + (T1)) & 0xffffffff;       \
108116491Sharti        (X1) ^= (T0);                            \
109116491Sharti        (X2) ^= (T1)
110116491Sharti
111116491Sharti#ifdef  __cplusplus
112116491Sharti}
113116491Sharti#endif
114116491Sharti
115116491Sharti#endif                          /* HEADER_SEED_LOCL_H */
116116491Sharti