blowfish.c revision 1.3.2.2 1 1.3.2.2 jmc /* $NetBSD: blowfish.c,v 1.3.2.2 2004/03/26 23:02:45 jmc Exp $ */
2 1.3.2.2 jmc /* $OpenBSD: blowfish.c,v 1.16 2002/02/19 19:39:36 millert Exp $ */
3 1.3.2.2 jmc /*
4 1.3.2.2 jmc * Blowfish block cipher for OpenBSD
5 1.3.2.2 jmc * Copyright 1997 Niels Provos <provos (at) physnet.uni-hamburg.de>
6 1.3.2.2 jmc * All rights reserved.
7 1.3.2.2 jmc *
8 1.3.2.2 jmc * Implementation advice by David Mazieres <dm (at) lcs.mit.edu>.
9 1.3.2.2 jmc *
10 1.3.2.2 jmc * Redistribution and use in source and binary forms, with or without
11 1.3.2.2 jmc * modification, are permitted provided that the following conditions
12 1.3.2.2 jmc * are met:
13 1.3.2.2 jmc * 1. Redistributions of source code must retain the above copyright
14 1.3.2.2 jmc * notice, this list of conditions and the following disclaimer.
15 1.3.2.2 jmc * 2. Redistributions in binary form must reproduce the above copyright
16 1.3.2.2 jmc * notice, this list of conditions and the following disclaimer in the
17 1.3.2.2 jmc * documentation and/or other materials provided with the distribution.
18 1.3.2.2 jmc * 3. All advertising materials mentioning features or use of this software
19 1.3.2.2 jmc * must display the following acknowledgement:
20 1.3.2.2 jmc * This product includes software developed by Niels Provos.
21 1.3.2.2 jmc * 4. The name of the author may not be used to endorse or promote products
22 1.3.2.2 jmc * derived from this software without specific prior written permission.
23 1.3.2.2 jmc *
24 1.3.2.2 jmc * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
25 1.3.2.2 jmc * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
26 1.3.2.2 jmc * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
27 1.3.2.2 jmc * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
28 1.3.2.2 jmc * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
29 1.3.2.2 jmc * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
30 1.3.2.2 jmc * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
31 1.3.2.2 jmc * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
32 1.3.2.2 jmc * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
33 1.3.2.2 jmc * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
34 1.3.2.2 jmc */
35 1.3.2.2 jmc
36 1.3.2.2 jmc /*
37 1.3.2.2 jmc * This code is derived from section 14.3 and the given source
38 1.3.2.2 jmc * in section V of Applied Cryptography, second edition.
39 1.3.2.2 jmc * Blowfish is an unpatented fast block cipher designed by
40 1.3.2.2 jmc * Bruce Schneier.
41 1.3.2.2 jmc */
42 1.3.2.2 jmc
43 1.3.2.2 jmc /*
44 1.3.2.2 jmc * Note: This has been trimmed down to only what is needed by
45 1.3.2.2 jmc * __bcrypt(). Also note that this file is actually included
46 1.3.2.2 jmc * directly by bcrypt.c, not built separately.
47 1.3.2.2 jmc */
48 1.3.2.2 jmc
49 1.3.2.2 jmc __RCSID("$NetBSD: blowfish.c,v 1.3.2.2 2004/03/26 23:02:45 jmc Exp $");
50 1.3.2.2 jmc
51 1.3.2.2 jmc #include <sys/types.h>
52 1.3.2.2 jmc
53 1.3.2.2 jmc /* Schneier specifies a maximum key length of 56 bytes.
54 1.3.2.2 jmc * This ensures that every key bit affects every cipher
55 1.3.2.2 jmc * bit. However, the subkeys can hold up to 72 bytes.
56 1.3.2.2 jmc * Warning: For normal blowfish encryption only 56 bytes
57 1.3.2.2 jmc * of the key affect all cipherbits.
58 1.3.2.2 jmc */
59 1.3.2.2 jmc
60 1.3.2.2 jmc #define BLF_N 16 /* Number of Subkeys */
61 1.3.2.2 jmc #define BLF_MAXKEYLEN ((BLF_N-2)*4) /* 448 bits */
62 1.3.2.2 jmc
63 1.3.2.2 jmc /* Blowfish context */
64 1.3.2.2 jmc typedef struct BlowfishContext {
65 1.3.2.2 jmc u_int32_t S[4][256]; /* S-Boxes */
66 1.3.2.2 jmc u_int32_t P[BLF_N + 2]; /* Subkeys */
67 1.3.2.2 jmc } blf_ctx;
68 1.3.2.2 jmc
69 1.3.2.2 jmc #undef inline
70 1.3.2.2 jmc #ifdef __GNUC__
71 1.3.2.2 jmc #define inline __inline
72 1.3.2.2 jmc #else /* !__GNUC__ */
73 1.3.2.2 jmc #define inline
74 1.3.2.2 jmc #endif /* !__GNUC__ */
75 1.3.2.2 jmc
76 1.3.2.2 jmc /* Function for Feistel Networks */
77 1.3.2.2 jmc
78 1.3.2.2 jmc #define F(s, x) ((((s)[ (((x)>>24)&0xFF)] \
79 1.3.2.2 jmc + (s)[0x100 + (((x)>>16)&0xFF)]) \
80 1.3.2.2 jmc ^ (s)[0x200 + (((x)>> 8)&0xFF)]) \
81 1.3.2.2 jmc + (s)[0x300 + ( (x) &0xFF)])
82 1.3.2.2 jmc
83 1.3.2.2 jmc #define BLFRND(s,p,i,j,n) (i ^= F(s,j) ^ (p)[n])
84 1.3.2.2 jmc
85 1.3.2.2 jmc static void
86 1.3.2.2 jmc Blowfish_encipher(blf_ctx *c, u_int32_t *xl, u_int32_t *xr)
87 1.3.2.2 jmc {
88 1.3.2.2 jmc u_int32_t Xl;
89 1.3.2.2 jmc u_int32_t Xr;
90 1.3.2.2 jmc u_int32_t *s = c->S[0];
91 1.3.2.2 jmc u_int32_t *p = c->P;
92 1.3.2.2 jmc
93 1.3.2.2 jmc Xl = *xl;
94 1.3.2.2 jmc Xr = *xr;
95 1.3.2.2 jmc
96 1.3.2.2 jmc Xl ^= p[0];
97 1.3.2.2 jmc BLFRND(s, p, Xr, Xl, 1); BLFRND(s, p, Xl, Xr, 2);
98 1.3.2.2 jmc BLFRND(s, p, Xr, Xl, 3); BLFRND(s, p, Xl, Xr, 4);
99 1.3.2.2 jmc BLFRND(s, p, Xr, Xl, 5); BLFRND(s, p, Xl, Xr, 6);
100 1.3.2.2 jmc BLFRND(s, p, Xr, Xl, 7); BLFRND(s, p, Xl, Xr, 8);
101 1.3.2.2 jmc BLFRND(s, p, Xr, Xl, 9); BLFRND(s, p, Xl, Xr, 10);
102 1.3.2.2 jmc BLFRND(s, p, Xr, Xl, 11); BLFRND(s, p, Xl, Xr, 12);
103 1.3.2.2 jmc BLFRND(s, p, Xr, Xl, 13); BLFRND(s, p, Xl, Xr, 14);
104 1.3.2.2 jmc BLFRND(s, p, Xr, Xl, 15); BLFRND(s, p, Xl, Xr, 16);
105 1.3.2.2 jmc
106 1.3.2.2 jmc *xl = Xr ^ p[17];
107 1.3.2.2 jmc *xr = Xl;
108 1.3.2.2 jmc }
109 1.3.2.2 jmc
110 1.3.2.2 jmc static void
111 1.3.2.2 jmc Blowfish_initstate(blf_ctx *c)
112 1.3.2.2 jmc {
113 1.3.2.2 jmc
114 1.3.2.2 jmc /* P-box and S-box tables initialized with digits of Pi */
115 1.3.2.2 jmc
116 1.3.2.2 jmc static const blf_ctx init_state =
117 1.3.2.2 jmc
118 1.3.2.2 jmc { {
119 1.3.2.2 jmc {
120 1.3.2.2 jmc 0xd1310ba6, 0x98dfb5ac, 0x2ffd72db, 0xd01adfb7,
121 1.3.2.2 jmc 0xb8e1afed, 0x6a267e96, 0xba7c9045, 0xf12c7f99,
122 1.3.2.2 jmc 0x24a19947, 0xb3916cf7, 0x0801f2e2, 0x858efc16,
123 1.3.2.2 jmc 0x636920d8, 0x71574e69, 0xa458fea3, 0xf4933d7e,
124 1.3.2.2 jmc 0x0d95748f, 0x728eb658, 0x718bcd58, 0x82154aee,
125 1.3.2.2 jmc 0x7b54a41d, 0xc25a59b5, 0x9c30d539, 0x2af26013,
126 1.3.2.2 jmc 0xc5d1b023, 0x286085f0, 0xca417918, 0xb8db38ef,
127 1.3.2.2 jmc 0x8e79dcb0, 0x603a180e, 0x6c9e0e8b, 0xb01e8a3e,
128 1.3.2.2 jmc 0xd71577c1, 0xbd314b27, 0x78af2fda, 0x55605c60,
129 1.3.2.2 jmc 0xe65525f3, 0xaa55ab94, 0x57489862, 0x63e81440,
130 1.3.2.2 jmc 0x55ca396a, 0x2aab10b6, 0xb4cc5c34, 0x1141e8ce,
131 1.3.2.2 jmc 0xa15486af, 0x7c72e993, 0xb3ee1411, 0x636fbc2a,
132 1.3.2.2 jmc 0x2ba9c55d, 0x741831f6, 0xce5c3e16, 0x9b87931e,
133 1.3.2.2 jmc 0xafd6ba33, 0x6c24cf5c, 0x7a325381, 0x28958677,
134 1.3.2.2 jmc 0x3b8f4898, 0x6b4bb9af, 0xc4bfe81b, 0x66282193,
135 1.3.2.2 jmc 0x61d809cc, 0xfb21a991, 0x487cac60, 0x5dec8032,
136 1.3.2.2 jmc 0xef845d5d, 0xe98575b1, 0xdc262302, 0xeb651b88,
137 1.3.2.2 jmc 0x23893e81, 0xd396acc5, 0x0f6d6ff3, 0x83f44239,
138 1.3.2.2 jmc 0x2e0b4482, 0xa4842004, 0x69c8f04a, 0x9e1f9b5e,
139 1.3.2.2 jmc 0x21c66842, 0xf6e96c9a, 0x670c9c61, 0xabd388f0,
140 1.3.2.2 jmc 0x6a51a0d2, 0xd8542f68, 0x960fa728, 0xab5133a3,
141 1.3.2.2 jmc 0x6eef0b6c, 0x137a3be4, 0xba3bf050, 0x7efb2a98,
142 1.3.2.2 jmc 0xa1f1651d, 0x39af0176, 0x66ca593e, 0x82430e88,
143 1.3.2.2 jmc 0x8cee8619, 0x456f9fb4, 0x7d84a5c3, 0x3b8b5ebe,
144 1.3.2.2 jmc 0xe06f75d8, 0x85c12073, 0x401a449f, 0x56c16aa6,
145 1.3.2.2 jmc 0x4ed3aa62, 0x363f7706, 0x1bfedf72, 0x429b023d,
146 1.3.2.2 jmc 0x37d0d724, 0xd00a1248, 0xdb0fead3, 0x49f1c09b,
147 1.3.2.2 jmc 0x075372c9, 0x80991b7b, 0x25d479d8, 0xf6e8def7,
148 1.3.2.2 jmc 0xe3fe501a, 0xb6794c3b, 0x976ce0bd, 0x04c006ba,
149 1.3.2.2 jmc 0xc1a94fb6, 0x409f60c4, 0x5e5c9ec2, 0x196a2463,
150 1.3.2.2 jmc 0x68fb6faf, 0x3e6c53b5, 0x1339b2eb, 0x3b52ec6f,
151 1.3.2.2 jmc 0x6dfc511f, 0x9b30952c, 0xcc814544, 0xaf5ebd09,
152 1.3.2.2 jmc 0xbee3d004, 0xde334afd, 0x660f2807, 0x192e4bb3,
153 1.3.2.2 jmc 0xc0cba857, 0x45c8740f, 0xd20b5f39, 0xb9d3fbdb,
154 1.3.2.2 jmc 0x5579c0bd, 0x1a60320a, 0xd6a100c6, 0x402c7279,
155 1.3.2.2 jmc 0x679f25fe, 0xfb1fa3cc, 0x8ea5e9f8, 0xdb3222f8,
156 1.3.2.2 jmc 0x3c7516df, 0xfd616b15, 0x2f501ec8, 0xad0552ab,
157 1.3.2.2 jmc 0x323db5fa, 0xfd238760, 0x53317b48, 0x3e00df82,
158 1.3.2.2 jmc 0x9e5c57bb, 0xca6f8ca0, 0x1a87562e, 0xdf1769db,
159 1.3.2.2 jmc 0xd542a8f6, 0x287effc3, 0xac6732c6, 0x8c4f5573,
160 1.3.2.2 jmc 0x695b27b0, 0xbbca58c8, 0xe1ffa35d, 0xb8f011a0,
161 1.3.2.2 jmc 0x10fa3d98, 0xfd2183b8, 0x4afcb56c, 0x2dd1d35b,
162 1.3.2.2 jmc 0x9a53e479, 0xb6f84565, 0xd28e49bc, 0x4bfb9790,
163 1.3.2.2 jmc 0xe1ddf2da, 0xa4cb7e33, 0x62fb1341, 0xcee4c6e8,
164 1.3.2.2 jmc 0xef20cada, 0x36774c01, 0xd07e9efe, 0x2bf11fb4,
165 1.3.2.2 jmc 0x95dbda4d, 0xae909198, 0xeaad8e71, 0x6b93d5a0,
166 1.3.2.2 jmc 0xd08ed1d0, 0xafc725e0, 0x8e3c5b2f, 0x8e7594b7,
167 1.3.2.2 jmc 0x8ff6e2fb, 0xf2122b64, 0x8888b812, 0x900df01c,
168 1.3.2.2 jmc 0x4fad5ea0, 0x688fc31c, 0xd1cff191, 0xb3a8c1ad,
169 1.3.2.2 jmc 0x2f2f2218, 0xbe0e1777, 0xea752dfe, 0x8b021fa1,
170 1.3.2.2 jmc 0xe5a0cc0f, 0xb56f74e8, 0x18acf3d6, 0xce89e299,
171 1.3.2.2 jmc 0xb4a84fe0, 0xfd13e0b7, 0x7cc43b81, 0xd2ada8d9,
172 1.3.2.2 jmc 0x165fa266, 0x80957705, 0x93cc7314, 0x211a1477,
173 1.3.2.2 jmc 0xe6ad2065, 0x77b5fa86, 0xc75442f5, 0xfb9d35cf,
174 1.3.2.2 jmc 0xebcdaf0c, 0x7b3e89a0, 0xd6411bd3, 0xae1e7e49,
175 1.3.2.2 jmc 0x00250e2d, 0x2071b35e, 0x226800bb, 0x57b8e0af,
176 1.3.2.2 jmc 0x2464369b, 0xf009b91e, 0x5563911d, 0x59dfa6aa,
177 1.3.2.2 jmc 0x78c14389, 0xd95a537f, 0x207d5ba2, 0x02e5b9c5,
178 1.3.2.2 jmc 0x83260376, 0x6295cfa9, 0x11c81968, 0x4e734a41,
179 1.3.2.2 jmc 0xb3472dca, 0x7b14a94a, 0x1b510052, 0x9a532915,
180 1.3.2.2 jmc 0xd60f573f, 0xbc9bc6e4, 0x2b60a476, 0x81e67400,
181 1.3.2.2 jmc 0x08ba6fb5, 0x571be91f, 0xf296ec6b, 0x2a0dd915,
182 1.3.2.2 jmc 0xb6636521, 0xe7b9f9b6, 0xff34052e, 0xc5855664,
183 1.3.2.2 jmc 0x53b02d5d, 0xa99f8fa1, 0x08ba4799, 0x6e85076a},
184 1.3.2.2 jmc {
185 1.3.2.2 jmc 0x4b7a70e9, 0xb5b32944, 0xdb75092e, 0xc4192623,
186 1.3.2.2 jmc 0xad6ea6b0, 0x49a7df7d, 0x9cee60b8, 0x8fedb266,
187 1.3.2.2 jmc 0xecaa8c71, 0x699a17ff, 0x5664526c, 0xc2b19ee1,
188 1.3.2.2 jmc 0x193602a5, 0x75094c29, 0xa0591340, 0xe4183a3e,
189 1.3.2.2 jmc 0x3f54989a, 0x5b429d65, 0x6b8fe4d6, 0x99f73fd6,
190 1.3.2.2 jmc 0xa1d29c07, 0xefe830f5, 0x4d2d38e6, 0xf0255dc1,
191 1.3.2.2 jmc 0x4cdd2086, 0x8470eb26, 0x6382e9c6, 0x021ecc5e,
192 1.3.2.2 jmc 0x09686b3f, 0x3ebaefc9, 0x3c971814, 0x6b6a70a1,
193 1.3.2.2 jmc 0x687f3584, 0x52a0e286, 0xb79c5305, 0xaa500737,
194 1.3.2.2 jmc 0x3e07841c, 0x7fdeae5c, 0x8e7d44ec, 0x5716f2b8,
195 1.3.2.2 jmc 0xb03ada37, 0xf0500c0d, 0xf01c1f04, 0x0200b3ff,
196 1.3.2.2 jmc 0xae0cf51a, 0x3cb574b2, 0x25837a58, 0xdc0921bd,
197 1.3.2.2 jmc 0xd19113f9, 0x7ca92ff6, 0x94324773, 0x22f54701,
198 1.3.2.2 jmc 0x3ae5e581, 0x37c2dadc, 0xc8b57634, 0x9af3dda7,
199 1.3.2.2 jmc 0xa9446146, 0x0fd0030e, 0xecc8c73e, 0xa4751e41,
200 1.3.2.2 jmc 0xe238cd99, 0x3bea0e2f, 0x3280bba1, 0x183eb331,
201 1.3.2.2 jmc 0x4e548b38, 0x4f6db908, 0x6f420d03, 0xf60a04bf,
202 1.3.2.2 jmc 0x2cb81290, 0x24977c79, 0x5679b072, 0xbcaf89af,
203 1.3.2.2 jmc 0xde9a771f, 0xd9930810, 0xb38bae12, 0xdccf3f2e,
204 1.3.2.2 jmc 0x5512721f, 0x2e6b7124, 0x501adde6, 0x9f84cd87,
205 1.3.2.2 jmc 0x7a584718, 0x7408da17, 0xbc9f9abc, 0xe94b7d8c,
206 1.3.2.2 jmc 0xec7aec3a, 0xdb851dfa, 0x63094366, 0xc464c3d2,
207 1.3.2.2 jmc 0xef1c1847, 0x3215d908, 0xdd433b37, 0x24c2ba16,
208 1.3.2.2 jmc 0x12a14d43, 0x2a65c451, 0x50940002, 0x133ae4dd,
209 1.3.2.2 jmc 0x71dff89e, 0x10314e55, 0x81ac77d6, 0x5f11199b,
210 1.3.2.2 jmc 0x043556f1, 0xd7a3c76b, 0x3c11183b, 0x5924a509,
211 1.3.2.2 jmc 0xf28fe6ed, 0x97f1fbfa, 0x9ebabf2c, 0x1e153c6e,
212 1.3.2.2 jmc 0x86e34570, 0xeae96fb1, 0x860e5e0a, 0x5a3e2ab3,
213 1.3.2.2 jmc 0x771fe71c, 0x4e3d06fa, 0x2965dcb9, 0x99e71d0f,
214 1.3.2.2 jmc 0x803e89d6, 0x5266c825, 0x2e4cc978, 0x9c10b36a,
215 1.3.2.2 jmc 0xc6150eba, 0x94e2ea78, 0xa5fc3c53, 0x1e0a2df4,
216 1.3.2.2 jmc 0xf2f74ea7, 0x361d2b3d, 0x1939260f, 0x19c27960,
217 1.3.2.2 jmc 0x5223a708, 0xf71312b6, 0xebadfe6e, 0xeac31f66,
218 1.3.2.2 jmc 0xe3bc4595, 0xa67bc883, 0xb17f37d1, 0x018cff28,
219 1.3.2.2 jmc 0xc332ddef, 0xbe6c5aa5, 0x65582185, 0x68ab9802,
220 1.3.2.2 jmc 0xeecea50f, 0xdb2f953b, 0x2aef7dad, 0x5b6e2f84,
221 1.3.2.2 jmc 0x1521b628, 0x29076170, 0xecdd4775, 0x619f1510,
222 1.3.2.2 jmc 0x13cca830, 0xeb61bd96, 0x0334fe1e, 0xaa0363cf,
223 1.3.2.2 jmc 0xb5735c90, 0x4c70a239, 0xd59e9e0b, 0xcbaade14,
224 1.3.2.2 jmc 0xeecc86bc, 0x60622ca7, 0x9cab5cab, 0xb2f3846e,
225 1.3.2.2 jmc 0x648b1eaf, 0x19bdf0ca, 0xa02369b9, 0x655abb50,
226 1.3.2.2 jmc 0x40685a32, 0x3c2ab4b3, 0x319ee9d5, 0xc021b8f7,
227 1.3.2.2 jmc 0x9b540b19, 0x875fa099, 0x95f7997e, 0x623d7da8,
228 1.3.2.2 jmc 0xf837889a, 0x97e32d77, 0x11ed935f, 0x16681281,
229 1.3.2.2 jmc 0x0e358829, 0xc7e61fd6, 0x96dedfa1, 0x7858ba99,
230 1.3.2.2 jmc 0x57f584a5, 0x1b227263, 0x9b83c3ff, 0x1ac24696,
231 1.3.2.2 jmc 0xcdb30aeb, 0x532e3054, 0x8fd948e4, 0x6dbc3128,
232 1.3.2.2 jmc 0x58ebf2ef, 0x34c6ffea, 0xfe28ed61, 0xee7c3c73,
233 1.3.2.2 jmc 0x5d4a14d9, 0xe864b7e3, 0x42105d14, 0x203e13e0,
234 1.3.2.2 jmc 0x45eee2b6, 0xa3aaabea, 0xdb6c4f15, 0xfacb4fd0,
235 1.3.2.2 jmc 0xc742f442, 0xef6abbb5, 0x654f3b1d, 0x41cd2105,
236 1.3.2.2 jmc 0xd81e799e, 0x86854dc7, 0xe44b476a, 0x3d816250,
237 1.3.2.2 jmc 0xcf62a1f2, 0x5b8d2646, 0xfc8883a0, 0xc1c7b6a3,
238 1.3.2.2 jmc 0x7f1524c3, 0x69cb7492, 0x47848a0b, 0x5692b285,
239 1.3.2.2 jmc 0x095bbf00, 0xad19489d, 0x1462b174, 0x23820e00,
240 1.3.2.2 jmc 0x58428d2a, 0x0c55f5ea, 0x1dadf43e, 0x233f7061,
241 1.3.2.2 jmc 0x3372f092, 0x8d937e41, 0xd65fecf1, 0x6c223bdb,
242 1.3.2.2 jmc 0x7cde3759, 0xcbee7460, 0x4085f2a7, 0xce77326e,
243 1.3.2.2 jmc 0xa6078084, 0x19f8509e, 0xe8efd855, 0x61d99735,
244 1.3.2.2 jmc 0xa969a7aa, 0xc50c06c2, 0x5a04abfc, 0x800bcadc,
245 1.3.2.2 jmc 0x9e447a2e, 0xc3453484, 0xfdd56705, 0x0e1e9ec9,
246 1.3.2.2 jmc 0xdb73dbd3, 0x105588cd, 0x675fda79, 0xe3674340,
247 1.3.2.2 jmc 0xc5c43465, 0x713e38d8, 0x3d28f89e, 0xf16dff20,
248 1.3.2.2 jmc 0x153e21e7, 0x8fb03d4a, 0xe6e39f2b, 0xdb83adf7},
249 1.3.2.2 jmc {
250 1.3.2.2 jmc 0xe93d5a68, 0x948140f7, 0xf64c261c, 0x94692934,
251 1.3.2.2 jmc 0x411520f7, 0x7602d4f7, 0xbcf46b2e, 0xd4a20068,
252 1.3.2.2 jmc 0xd4082471, 0x3320f46a, 0x43b7d4b7, 0x500061af,
253 1.3.2.2 jmc 0x1e39f62e, 0x97244546, 0x14214f74, 0xbf8b8840,
254 1.3.2.2 jmc 0x4d95fc1d, 0x96b591af, 0x70f4ddd3, 0x66a02f45,
255 1.3.2.2 jmc 0xbfbc09ec, 0x03bd9785, 0x7fac6dd0, 0x31cb8504,
256 1.3.2.2 jmc 0x96eb27b3, 0x55fd3941, 0xda2547e6, 0xabca0a9a,
257 1.3.2.2 jmc 0x28507825, 0x530429f4, 0x0a2c86da, 0xe9b66dfb,
258 1.3.2.2 jmc 0x68dc1462, 0xd7486900, 0x680ec0a4, 0x27a18dee,
259 1.3.2.2 jmc 0x4f3ffea2, 0xe887ad8c, 0xb58ce006, 0x7af4d6b6,
260 1.3.2.2 jmc 0xaace1e7c, 0xd3375fec, 0xce78a399, 0x406b2a42,
261 1.3.2.2 jmc 0x20fe9e35, 0xd9f385b9, 0xee39d7ab, 0x3b124e8b,
262 1.3.2.2 jmc 0x1dc9faf7, 0x4b6d1856, 0x26a36631, 0xeae397b2,
263 1.3.2.2 jmc 0x3a6efa74, 0xdd5b4332, 0x6841e7f7, 0xca7820fb,
264 1.3.2.2 jmc 0xfb0af54e, 0xd8feb397, 0x454056ac, 0xba489527,
265 1.3.2.2 jmc 0x55533a3a, 0x20838d87, 0xfe6ba9b7, 0xd096954b,
266 1.3.2.2 jmc 0x55a867bc, 0xa1159a58, 0xcca92963, 0x99e1db33,
267 1.3.2.2 jmc 0xa62a4a56, 0x3f3125f9, 0x5ef47e1c, 0x9029317c,
268 1.3.2.2 jmc 0xfdf8e802, 0x04272f70, 0x80bb155c, 0x05282ce3,
269 1.3.2.2 jmc 0x95c11548, 0xe4c66d22, 0x48c1133f, 0xc70f86dc,
270 1.3.2.2 jmc 0x07f9c9ee, 0x41041f0f, 0x404779a4, 0x5d886e17,
271 1.3.2.2 jmc 0x325f51eb, 0xd59bc0d1, 0xf2bcc18f, 0x41113564,
272 1.3.2.2 jmc 0x257b7834, 0x602a9c60, 0xdff8e8a3, 0x1f636c1b,
273 1.3.2.2 jmc 0x0e12b4c2, 0x02e1329e, 0xaf664fd1, 0xcad18115,
274 1.3.2.2 jmc 0x6b2395e0, 0x333e92e1, 0x3b240b62, 0xeebeb922,
275 1.3.2.2 jmc 0x85b2a20e, 0xe6ba0d99, 0xde720c8c, 0x2da2f728,
276 1.3.2.2 jmc 0xd0127845, 0x95b794fd, 0x647d0862, 0xe7ccf5f0,
277 1.3.2.2 jmc 0x5449a36f, 0x877d48fa, 0xc39dfd27, 0xf33e8d1e,
278 1.3.2.2 jmc 0x0a476341, 0x992eff74, 0x3a6f6eab, 0xf4f8fd37,
279 1.3.2.2 jmc 0xa812dc60, 0xa1ebddf8, 0x991be14c, 0xdb6e6b0d,
280 1.3.2.2 jmc 0xc67b5510, 0x6d672c37, 0x2765d43b, 0xdcd0e804,
281 1.3.2.2 jmc 0xf1290dc7, 0xcc00ffa3, 0xb5390f92, 0x690fed0b,
282 1.3.2.2 jmc 0x667b9ffb, 0xcedb7d9c, 0xa091cf0b, 0xd9155ea3,
283 1.3.2.2 jmc 0xbb132f88, 0x515bad24, 0x7b9479bf, 0x763bd6eb,
284 1.3.2.2 jmc 0x37392eb3, 0xcc115979, 0x8026e297, 0xf42e312d,
285 1.3.2.2 jmc 0x6842ada7, 0xc66a2b3b, 0x12754ccc, 0x782ef11c,
286 1.3.2.2 jmc 0x6a124237, 0xb79251e7, 0x06a1bbe6, 0x4bfb6350,
287 1.3.2.2 jmc 0x1a6b1018, 0x11caedfa, 0x3d25bdd8, 0xe2e1c3c9,
288 1.3.2.2 jmc 0x44421659, 0x0a121386, 0xd90cec6e, 0xd5abea2a,
289 1.3.2.2 jmc 0x64af674e, 0xda86a85f, 0xbebfe988, 0x64e4c3fe,
290 1.3.2.2 jmc 0x9dbc8057, 0xf0f7c086, 0x60787bf8, 0x6003604d,
291 1.3.2.2 jmc 0xd1fd8346, 0xf6381fb0, 0x7745ae04, 0xd736fccc,
292 1.3.2.2 jmc 0x83426b33, 0xf01eab71, 0xb0804187, 0x3c005e5f,
293 1.3.2.2 jmc 0x77a057be, 0xbde8ae24, 0x55464299, 0xbf582e61,
294 1.3.2.2 jmc 0x4e58f48f, 0xf2ddfda2, 0xf474ef38, 0x8789bdc2,
295 1.3.2.2 jmc 0x5366f9c3, 0xc8b38e74, 0xb475f255, 0x46fcd9b9,
296 1.3.2.2 jmc 0x7aeb2661, 0x8b1ddf84, 0x846a0e79, 0x915f95e2,
297 1.3.2.2 jmc 0x466e598e, 0x20b45770, 0x8cd55591, 0xc902de4c,
298 1.3.2.2 jmc 0xb90bace1, 0xbb8205d0, 0x11a86248, 0x7574a99e,
299 1.3.2.2 jmc 0xb77f19b6, 0xe0a9dc09, 0x662d09a1, 0xc4324633,
300 1.3.2.2 jmc 0xe85a1f02, 0x09f0be8c, 0x4a99a025, 0x1d6efe10,
301 1.3.2.2 jmc 0x1ab93d1d, 0x0ba5a4df, 0xa186f20f, 0x2868f169,
302 1.3.2.2 jmc 0xdcb7da83, 0x573906fe, 0xa1e2ce9b, 0x4fcd7f52,
303 1.3.2.2 jmc 0x50115e01, 0xa70683fa, 0xa002b5c4, 0x0de6d027,
304 1.3.2.2 jmc 0x9af88c27, 0x773f8641, 0xc3604c06, 0x61a806b5,
305 1.3.2.2 jmc 0xf0177a28, 0xc0f586e0, 0x006058aa, 0x30dc7d62,
306 1.3.2.2 jmc 0x11e69ed7, 0x2338ea63, 0x53c2dd94, 0xc2c21634,
307 1.3.2.2 jmc 0xbbcbee56, 0x90bcb6de, 0xebfc7da1, 0xce591d76,
308 1.3.2.2 jmc 0x6f05e409, 0x4b7c0188, 0x39720a3d, 0x7c927c24,
309 1.3.2.2 jmc 0x86e3725f, 0x724d9db9, 0x1ac15bb4, 0xd39eb8fc,
310 1.3.2.2 jmc 0xed545578, 0x08fca5b5, 0xd83d7cd3, 0x4dad0fc4,
311 1.3.2.2 jmc 0x1e50ef5e, 0xb161e6f8, 0xa28514d9, 0x6c51133c,
312 1.3.2.2 jmc 0x6fd5c7e7, 0x56e14ec4, 0x362abfce, 0xddc6c837,
313 1.3.2.2 jmc 0xd79a3234, 0x92638212, 0x670efa8e, 0x406000e0},
314 1.3.2.2 jmc {
315 1.3.2.2 jmc 0x3a39ce37, 0xd3faf5cf, 0xabc27737, 0x5ac52d1b,
316 1.3.2.2 jmc 0x5cb0679e, 0x4fa33742, 0xd3822740, 0x99bc9bbe,
317 1.3.2.2 jmc 0xd5118e9d, 0xbf0f7315, 0xd62d1c7e, 0xc700c47b,
318 1.3.2.2 jmc 0xb78c1b6b, 0x21a19045, 0xb26eb1be, 0x6a366eb4,
319 1.3.2.2 jmc 0x5748ab2f, 0xbc946e79, 0xc6a376d2, 0x6549c2c8,
320 1.3.2.2 jmc 0x530ff8ee, 0x468dde7d, 0xd5730a1d, 0x4cd04dc6,
321 1.3.2.2 jmc 0x2939bbdb, 0xa9ba4650, 0xac9526e8, 0xbe5ee304,
322 1.3.2.2 jmc 0xa1fad5f0, 0x6a2d519a, 0x63ef8ce2, 0x9a86ee22,
323 1.3.2.2 jmc 0xc089c2b8, 0x43242ef6, 0xa51e03aa, 0x9cf2d0a4,
324 1.3.2.2 jmc 0x83c061ba, 0x9be96a4d, 0x8fe51550, 0xba645bd6,
325 1.3.2.2 jmc 0x2826a2f9, 0xa73a3ae1, 0x4ba99586, 0xef5562e9,
326 1.3.2.2 jmc 0xc72fefd3, 0xf752f7da, 0x3f046f69, 0x77fa0a59,
327 1.3.2.2 jmc 0x80e4a915, 0x87b08601, 0x9b09e6ad, 0x3b3ee593,
328 1.3.2.2 jmc 0xe990fd5a, 0x9e34d797, 0x2cf0b7d9, 0x022b8b51,
329 1.3.2.2 jmc 0x96d5ac3a, 0x017da67d, 0xd1cf3ed6, 0x7c7d2d28,
330 1.3.2.2 jmc 0x1f9f25cf, 0xadf2b89b, 0x5ad6b472, 0x5a88f54c,
331 1.3.2.2 jmc 0xe029ac71, 0xe019a5e6, 0x47b0acfd, 0xed93fa9b,
332 1.3.2.2 jmc 0xe8d3c48d, 0x283b57cc, 0xf8d56629, 0x79132e28,
333 1.3.2.2 jmc 0x785f0191, 0xed756055, 0xf7960e44, 0xe3d35e8c,
334 1.3.2.2 jmc 0x15056dd4, 0x88f46dba, 0x03a16125, 0x0564f0bd,
335 1.3.2.2 jmc 0xc3eb9e15, 0x3c9057a2, 0x97271aec, 0xa93a072a,
336 1.3.2.2 jmc 0x1b3f6d9b, 0x1e6321f5, 0xf59c66fb, 0x26dcf319,
337 1.3.2.2 jmc 0x7533d928, 0xb155fdf5, 0x03563482, 0x8aba3cbb,
338 1.3.2.2 jmc 0x28517711, 0xc20ad9f8, 0xabcc5167, 0xccad925f,
339 1.3.2.2 jmc 0x4de81751, 0x3830dc8e, 0x379d5862, 0x9320f991,
340 1.3.2.2 jmc 0xea7a90c2, 0xfb3e7bce, 0x5121ce64, 0x774fbe32,
341 1.3.2.2 jmc 0xa8b6e37e, 0xc3293d46, 0x48de5369, 0x6413e680,
342 1.3.2.2 jmc 0xa2ae0810, 0xdd6db224, 0x69852dfd, 0x09072166,
343 1.3.2.2 jmc 0xb39a460a, 0x6445c0dd, 0x586cdecf, 0x1c20c8ae,
344 1.3.2.2 jmc 0x5bbef7dd, 0x1b588d40, 0xccd2017f, 0x6bb4e3bb,
345 1.3.2.2 jmc 0xdda26a7e, 0x3a59ff45, 0x3e350a44, 0xbcb4cdd5,
346 1.3.2.2 jmc 0x72eacea8, 0xfa6484bb, 0x8d6612ae, 0xbf3c6f47,
347 1.3.2.2 jmc 0xd29be463, 0x542f5d9e, 0xaec2771b, 0xf64e6370,
348 1.3.2.2 jmc 0x740e0d8d, 0xe75b1357, 0xf8721671, 0xaf537d5d,
349 1.3.2.2 jmc 0x4040cb08, 0x4eb4e2cc, 0x34d2466a, 0x0115af84,
350 1.3.2.2 jmc 0xe1b00428, 0x95983a1d, 0x06b89fb4, 0xce6ea048,
351 1.3.2.2 jmc 0x6f3f3b82, 0x3520ab82, 0x011a1d4b, 0x277227f8,
352 1.3.2.2 jmc 0x611560b1, 0xe7933fdc, 0xbb3a792b, 0x344525bd,
353 1.3.2.2 jmc 0xa08839e1, 0x51ce794b, 0x2f32c9b7, 0xa01fbac9,
354 1.3.2.2 jmc 0xe01cc87e, 0xbcc7d1f6, 0xcf0111c3, 0xa1e8aac7,
355 1.3.2.2 jmc 0x1a908749, 0xd44fbd9a, 0xd0dadecb, 0xd50ada38,
356 1.3.2.2 jmc 0x0339c32a, 0xc6913667, 0x8df9317c, 0xe0b12b4f,
357 1.3.2.2 jmc 0xf79e59b7, 0x43f5bb3a, 0xf2d519ff, 0x27d9459c,
358 1.3.2.2 jmc 0xbf97222c, 0x15e6fc2a, 0x0f91fc71, 0x9b941525,
359 1.3.2.2 jmc 0xfae59361, 0xceb69ceb, 0xc2a86459, 0x12baa8d1,
360 1.3.2.2 jmc 0xb6c1075e, 0xe3056a0c, 0x10d25065, 0xcb03a442,
361 1.3.2.2 jmc 0xe0ec6e0e, 0x1698db3b, 0x4c98a0be, 0x3278e964,
362 1.3.2.2 jmc 0x9f1f9532, 0xe0d392df, 0xd3a0342b, 0x8971f21e,
363 1.3.2.2 jmc 0x1b0a7441, 0x4ba3348c, 0xc5be7120, 0xc37632d8,
364 1.3.2.2 jmc 0xdf359f8d, 0x9b992f2e, 0xe60b6f47, 0x0fe3f11d,
365 1.3.2.2 jmc 0xe54cda54, 0x1edad891, 0xce6279cf, 0xcd3e7e6f,
366 1.3.2.2 jmc 0x1618b166, 0xfd2c1d05, 0x848fd2c5, 0xf6fb2299,
367 1.3.2.2 jmc 0xf523f357, 0xa6327623, 0x93a83531, 0x56cccd02,
368 1.3.2.2 jmc 0xacf08162, 0x5a75ebb5, 0x6e163697, 0x88d273cc,
369 1.3.2.2 jmc 0xde966292, 0x81b949d0, 0x4c50901b, 0x71c65614,
370 1.3.2.2 jmc 0xe6c6c7bd, 0x327a140a, 0x45e1d006, 0xc3f27b9a,
371 1.3.2.2 jmc 0xc9aa53fd, 0x62a80f00, 0xbb25bfe2, 0x35bdd2f6,
372 1.3.2.2 jmc 0x71126905, 0xb2040222, 0xb6cbcf7c, 0xcd769c2b,
373 1.3.2.2 jmc 0x53113ec0, 0x1640e3d3, 0x38abbd60, 0x2547adf0,
374 1.3.2.2 jmc 0xba38209c, 0xf746ce76, 0x77afa1c5, 0x20756060,
375 1.3.2.2 jmc 0x85cbfe4e, 0x8ae88dd8, 0x7aaaf9b0, 0x4cf9aa7e,
376 1.3.2.2 jmc 0x1948c25c, 0x02fb8a8c, 0x01c36ae4, 0xd6ebe1f9,
377 1.3.2.2 jmc 0x90d4f869, 0xa65cdea0, 0x3f09252d, 0xc208e69f,
378 1.3.2.2 jmc 0xb74e6132, 0xce77e25b, 0x578fdfe3, 0x3ac372e6}
379 1.3.2.2 jmc },
380 1.3.2.2 jmc {
381 1.3.2.2 jmc 0x243f6a88, 0x85a308d3, 0x13198a2e, 0x03707344,
382 1.3.2.2 jmc 0xa4093822, 0x299f31d0, 0x082efa98, 0xec4e6c89,
383 1.3.2.2 jmc 0x452821e6, 0x38d01377, 0xbe5466cf, 0x34e90c6c,
384 1.3.2.2 jmc 0xc0ac29b7, 0xc97c50dd, 0x3f84d5b5, 0xb5470917,
385 1.3.2.2 jmc 0x9216d5d9, 0x8979fb1b
386 1.3.2.2 jmc } };
387 1.3.2.2 jmc
388 1.3.2.2 jmc *c = init_state;
389 1.3.2.2 jmc
390 1.3.2.2 jmc }
391 1.3.2.2 jmc
392 1.3.2.2 jmc static u_int32_t
393 1.3.2.2 jmc Blowfish_stream2word(const u_int8_t *data, u_int16_t databytes, u_int16_t *current)
394 1.3.2.2 jmc {
395 1.3.2.2 jmc u_int8_t i;
396 1.3.2.2 jmc u_int16_t j;
397 1.3.2.2 jmc u_int32_t temp;
398 1.3.2.2 jmc
399 1.3.2.2 jmc temp = 0x00000000;
400 1.3.2.2 jmc j = *current;
401 1.3.2.2 jmc
402 1.3.2.2 jmc for (i = 0; i < 4; i++, j++) {
403 1.3.2.2 jmc if (j >= databytes)
404 1.3.2.2 jmc j = 0;
405 1.3.2.2 jmc temp = (temp << 8) | data[j];
406 1.3.2.2 jmc }
407 1.3.2.2 jmc
408 1.3.2.2 jmc *current = j;
409 1.3.2.2 jmc return temp;
410 1.3.2.2 jmc }
411 1.3.2.2 jmc
412 1.3.2.2 jmc static void
413 1.3.2.2 jmc Blowfish_expand0state(blf_ctx *c, const u_int8_t *key, u_int16_t keybytes)
414 1.3.2.2 jmc {
415 1.3.2.2 jmc u_int16_t i;
416 1.3.2.2 jmc u_int16_t j;
417 1.3.2.2 jmc u_int16_t k;
418 1.3.2.2 jmc u_int32_t temp;
419 1.3.2.2 jmc u_int32_t datal;
420 1.3.2.2 jmc u_int32_t datar;
421 1.3.2.2 jmc
422 1.3.2.2 jmc j = 0;
423 1.3.2.2 jmc for (i = 0; i < BLF_N + 2; i++) {
424 1.3.2.2 jmc /* Extract 4 int8 to 1 int32 from keystream */
425 1.3.2.2 jmc temp = Blowfish_stream2word(key, keybytes, &j);
426 1.3.2.2 jmc c->P[i] = c->P[i] ^ temp;
427 1.3.2.2 jmc }
428 1.3.2.2 jmc
429 1.3.2.2 jmc j = 0;
430 1.3.2.2 jmc datal = 0x00000000;
431 1.3.2.2 jmc datar = 0x00000000;
432 1.3.2.2 jmc for (i = 0; i < BLF_N + 2; i += 2) {
433 1.3.2.2 jmc Blowfish_encipher(c, &datal, &datar);
434 1.3.2.2 jmc
435 1.3.2.2 jmc c->P[i] = datal;
436 1.3.2.2 jmc c->P[i + 1] = datar;
437 1.3.2.2 jmc }
438 1.3.2.2 jmc
439 1.3.2.2 jmc for (i = 0; i < 4; i++) {
440 1.3.2.2 jmc for (k = 0; k < 256; k += 2) {
441 1.3.2.2 jmc Blowfish_encipher(c, &datal, &datar);
442 1.3.2.2 jmc
443 1.3.2.2 jmc c->S[i][k] = datal;
444 1.3.2.2 jmc c->S[i][k + 1] = datar;
445 1.3.2.2 jmc }
446 1.3.2.2 jmc }
447 1.3.2.2 jmc }
448 1.3.2.2 jmc
449 1.3.2.2 jmc
450 1.3.2.2 jmc static void
451 1.3.2.2 jmc Blowfish_expandstate(blf_ctx *c, const u_int8_t *data, u_int16_t databytes,
452 1.3.2.2 jmc const u_int8_t *key, u_int16_t keybytes)
453 1.3.2.2 jmc {
454 1.3.2.2 jmc u_int16_t i;
455 1.3.2.2 jmc u_int16_t j;
456 1.3.2.2 jmc u_int16_t k;
457 1.3.2.2 jmc u_int32_t temp;
458 1.3.2.2 jmc u_int32_t datal;
459 1.3.2.2 jmc u_int32_t datar;
460 1.3.2.2 jmc
461 1.3.2.2 jmc j = 0;
462 1.3.2.2 jmc for (i = 0; i < BLF_N + 2; i++) {
463 1.3.2.2 jmc /* Extract 4 int8 to 1 int32 from keystream */
464 1.3.2.2 jmc temp = Blowfish_stream2word(key, keybytes, &j);
465 1.3.2.2 jmc c->P[i] = c->P[i] ^ temp;
466 1.3.2.2 jmc }
467 1.3.2.2 jmc
468 1.3.2.2 jmc j = 0;
469 1.3.2.2 jmc datal = 0x00000000;
470 1.3.2.2 jmc datar = 0x00000000;
471 1.3.2.2 jmc for (i = 0; i < BLF_N + 2; i += 2) {
472 1.3.2.2 jmc datal ^= Blowfish_stream2word(data, databytes, &j);
473 1.3.2.2 jmc datar ^= Blowfish_stream2word(data, databytes, &j);
474 1.3.2.2 jmc Blowfish_encipher(c, &datal, &datar);
475 1.3.2.2 jmc
476 1.3.2.2 jmc c->P[i] = datal;
477 1.3.2.2 jmc c->P[i + 1] = datar;
478 1.3.2.2 jmc }
479 1.3.2.2 jmc
480 1.3.2.2 jmc for (i = 0; i < 4; i++) {
481 1.3.2.2 jmc for (k = 0; k < 256; k += 2) {
482 1.3.2.2 jmc datal ^= Blowfish_stream2word(data, databytes, &j);
483 1.3.2.2 jmc datar ^= Blowfish_stream2word(data, databytes, &j);
484 1.3.2.2 jmc Blowfish_encipher(c, &datal, &datar);
485 1.3.2.2 jmc
486 1.3.2.2 jmc c->S[i][k] = datal;
487 1.3.2.2 jmc c->S[i][k + 1] = datar;
488 1.3.2.2 jmc }
489 1.3.2.2 jmc }
490 1.3.2.2 jmc
491 1.3.2.2 jmc }
492 1.3.2.2 jmc
493 1.3.2.2 jmc static void
494 1.3.2.2 jmc blf_enc(blf_ctx *c, u_int32_t *data, u_int16_t blocks)
495 1.3.2.2 jmc {
496 1.3.2.2 jmc u_int32_t *d;
497 1.3.2.2 jmc u_int16_t i;
498 1.3.2.2 jmc
499 1.3.2.2 jmc d = data;
500 1.3.2.2 jmc for (i = 0; i < blocks; i++) {
501 1.3.2.2 jmc Blowfish_encipher(c, d, d + 1);
502 1.3.2.2 jmc d += 2;
503 1.3.2.2 jmc }
504 1.3.2.2 jmc }
505