2 * This implementation was taken from the International Kernel (kerneli)
3 * patch for Linux kernel. The author is unknown to me. This
4 * implementation is under the same license as it is in the kerneli patch.
5 * I've modified it a bit to fit to SILC. -Pekka
10 * Permission is hereby granted, free of charge, to any person obtaining a
11 * copy of this software and associated documentation files (the
12 * "Software"), to deal in the Software without restriction, including
13 * without limitation the rights to use, copy, modify, merge, publish, dis-
14 * tribute, sublicense, and/or sell copies of the Software, and to permit
15 * persons to whom the Software is furnished to do so, subject to the fol-
18 * The above copyright notice and this permission notice shall be included
19 * in all copies or substantial portions of the Software.
21 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS
22 * OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABIL-
23 * ITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT
24 * SHALL THE OPEN GROUP BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABIL-
25 * ITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
26 * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS
29 * Except as contained in this notice, the name of the authors shall
30 * not be used in advertising or otherwise to promote the sale, use or
31 * other dealings in this Software without prior written authorization from
37 #include "blowfish_internal.h"
41 * SILC Crypto API for Blowfish
44 /* Sets the key for the cipher. */
46 SILC_CIPHER_API_SET_KEY(blowfish)
48 blowfish_set_key((BlowfishContext *)context, (unsigned char *)key, keylen);
52 /* Returns the size of the cipher context. */
54 SILC_CIPHER_API_CONTEXT_LEN(blowfish)
56 return sizeof(BlowfishContext);
59 /* Encrypts with the cipher in CBC mode. Source and destination buffers
60 maybe one and same. */
62 SILC_CIPHER_API_ENCRYPT_CBC(blowfish)
67 SILC_CBC_GET_IV(tiv, iv);
69 SILC_CBC_ENC_PRE(tiv, src);
70 blowfish_encrypt((BlowfishContext *)context, tiv, tiv, 16);
71 SILC_CBC_ENC_POST(tiv, dst, src);
73 for (i = 16; i < len; i += 16) {
74 SILC_CBC_ENC_PRE(tiv, src);
75 blowfish_encrypt((BlowfishContext *)context, tiv, tiv, 16);
76 SILC_CBC_ENC_POST(tiv, dst, src);
79 SILC_CBC_PUT_IV(tiv, iv);
84 /* Decrypts with the cipher in CBC mode. Source and destination buffers
85 maybe one and same. */
87 SILC_CIPHER_API_DECRYPT_CBC(blowfish)
89 SilcUInt32 tmp[4], tmp2[4], tiv[4];
92 SILC_CBC_GET_IV(tiv, iv);
94 SILC_CBC_DEC_PRE(tmp, src);
95 blowfish_decrypt((BlowfishContext *)context, tmp, tmp2, 16);
96 SILC_CBC_DEC_POST(tmp2, dst, src, tmp, tiv);
98 for (i = 16; i < len; i += 16) {
99 SILC_CBC_DEC_PRE(tmp, src);
100 blowfish_decrypt((BlowfishContext *)context, tmp, tmp2, 16);
101 SILC_CBC_DEC_POST(tmp2, dst, src, tmp, tiv);
104 SILC_CBC_PUT_IV(tiv, iv);
109 static u32 bf_pbox[16 + 2] =
111 0x243f6a88, 0x85a308d3, 0x13198a2e, 0x03707344,
112 0xa4093822, 0x299f31d0, 0x082efa98, 0xec4e6c89,
113 0x452821e6, 0x38d01377, 0xbe5466cf, 0x34e90c6c,
114 0xc0ac29b7, 0xc97c50dd, 0x3f84d5b5, 0xb5470917,
115 0x9216d5d9, 0x8979fb1b,
118 static u32 bf_sbox[256 * 4] =
120 0xd1310ba6, 0x98dfb5ac, 0x2ffd72db, 0xd01adfb7,
121 0xb8e1afed, 0x6a267e96, 0xba7c9045, 0xf12c7f99,
122 0x24a19947, 0xb3916cf7, 0x0801f2e2, 0x858efc16,
123 0x636920d8, 0x71574e69, 0xa458fea3, 0xf4933d7e,
124 0x0d95748f, 0x728eb658, 0x718bcd58, 0x82154aee,
125 0x7b54a41d, 0xc25a59b5, 0x9c30d539, 0x2af26013,
126 0xc5d1b023, 0x286085f0, 0xca417918, 0xb8db38ef,
127 0x8e79dcb0, 0x603a180e, 0x6c9e0e8b, 0xb01e8a3e,
128 0xd71577c1, 0xbd314b27, 0x78af2fda, 0x55605c60,
129 0xe65525f3, 0xaa55ab94, 0x57489862, 0x63e81440,
130 0x55ca396a, 0x2aab10b6, 0xb4cc5c34, 0x1141e8ce,
131 0xa15486af, 0x7c72e993, 0xb3ee1411, 0x636fbc2a,
132 0x2ba9c55d, 0x741831f6, 0xce5c3e16, 0x9b87931e,
133 0xafd6ba33, 0x6c24cf5c, 0x7a325381, 0x28958677,
134 0x3b8f4898, 0x6b4bb9af, 0xc4bfe81b, 0x66282193,
135 0x61d809cc, 0xfb21a991, 0x487cac60, 0x5dec8032,
136 0xef845d5d, 0xe98575b1, 0xdc262302, 0xeb651b88,
137 0x23893e81, 0xd396acc5, 0x0f6d6ff3, 0x83f44239,
138 0x2e0b4482, 0xa4842004, 0x69c8f04a, 0x9e1f9b5e,
139 0x21c66842, 0xf6e96c9a, 0x670c9c61, 0xabd388f0,
140 0x6a51a0d2, 0xd8542f68, 0x960fa728, 0xab5133a3,
141 0x6eef0b6c, 0x137a3be4, 0xba3bf050, 0x7efb2a98,
142 0xa1f1651d, 0x39af0176, 0x66ca593e, 0x82430e88,
143 0x8cee8619, 0x456f9fb4, 0x7d84a5c3, 0x3b8b5ebe,
144 0xe06f75d8, 0x85c12073, 0x401a449f, 0x56c16aa6,
145 0x4ed3aa62, 0x363f7706, 0x1bfedf72, 0x429b023d,
146 0x37d0d724, 0xd00a1248, 0xdb0fead3, 0x49f1c09b,
147 0x075372c9, 0x80991b7b, 0x25d479d8, 0xf6e8def7,
148 0xe3fe501a, 0xb6794c3b, 0x976ce0bd, 0x04c006ba,
149 0xc1a94fb6, 0x409f60c4, 0x5e5c9ec2, 0x196a2463,
150 0x68fb6faf, 0x3e6c53b5, 0x1339b2eb, 0x3b52ec6f,
151 0x6dfc511f, 0x9b30952c, 0xcc814544, 0xaf5ebd09,
152 0xbee3d004, 0xde334afd, 0x660f2807, 0x192e4bb3,
153 0xc0cba857, 0x45c8740f, 0xd20b5f39, 0xb9d3fbdb,
154 0x5579c0bd, 0x1a60320a, 0xd6a100c6, 0x402c7279,
155 0x679f25fe, 0xfb1fa3cc, 0x8ea5e9f8, 0xdb3222f8,
156 0x3c7516df, 0xfd616b15, 0x2f501ec8, 0xad0552ab,
157 0x323db5fa, 0xfd238760, 0x53317b48, 0x3e00df82,
158 0x9e5c57bb, 0xca6f8ca0, 0x1a87562e, 0xdf1769db,
159 0xd542a8f6, 0x287effc3, 0xac6732c6, 0x8c4f5573,
160 0x695b27b0, 0xbbca58c8, 0xe1ffa35d, 0xb8f011a0,
161 0x10fa3d98, 0xfd2183b8, 0x4afcb56c, 0x2dd1d35b,
162 0x9a53e479, 0xb6f84565, 0xd28e49bc, 0x4bfb9790,
163 0xe1ddf2da, 0xa4cb7e33, 0x62fb1341, 0xcee4c6e8,
164 0xef20cada, 0x36774c01, 0xd07e9efe, 0x2bf11fb4,
165 0x95dbda4d, 0xae909198, 0xeaad8e71, 0x6b93d5a0,
166 0xd08ed1d0, 0xafc725e0, 0x8e3c5b2f, 0x8e7594b7,
167 0x8ff6e2fb, 0xf2122b64, 0x8888b812, 0x900df01c,
168 0x4fad5ea0, 0x688fc31c, 0xd1cff191, 0xb3a8c1ad,
169 0x2f2f2218, 0xbe0e1777, 0xea752dfe, 0x8b021fa1,
170 0xe5a0cc0f, 0xb56f74e8, 0x18acf3d6, 0xce89e299,
171 0xb4a84fe0, 0xfd13e0b7, 0x7cc43b81, 0xd2ada8d9,
172 0x165fa266, 0x80957705, 0x93cc7314, 0x211a1477,
173 0xe6ad2065, 0x77b5fa86, 0xc75442f5, 0xfb9d35cf,
174 0xebcdaf0c, 0x7b3e89a0, 0xd6411bd3, 0xae1e7e49,
175 0x00250e2d, 0x2071b35e, 0x226800bb, 0x57b8e0af,
176 0x2464369b, 0xf009b91e, 0x5563911d, 0x59dfa6aa,
177 0x78c14389, 0xd95a537f, 0x207d5ba2, 0x02e5b9c5,
178 0x83260376, 0x6295cfa9, 0x11c81968, 0x4e734a41,
179 0xb3472dca, 0x7b14a94a, 0x1b510052, 0x9a532915,
180 0xd60f573f, 0xbc9bc6e4, 0x2b60a476, 0x81e67400,
181 0x08ba6fb5, 0x571be91f, 0xf296ec6b, 0x2a0dd915,
182 0xb6636521, 0xe7b9f9b6, 0xff34052e, 0xc5855664,
183 0x53b02d5d, 0xa99f8fa1, 0x08ba4799, 0x6e85076a,
184 0x4b7a70e9, 0xb5b32944, 0xdb75092e, 0xc4192623,
185 0xad6ea6b0, 0x49a7df7d, 0x9cee60b8, 0x8fedb266,
186 0xecaa8c71, 0x699a17ff, 0x5664526c, 0xc2b19ee1,
187 0x193602a5, 0x75094c29, 0xa0591340, 0xe4183a3e,
188 0x3f54989a, 0x5b429d65, 0x6b8fe4d6, 0x99f73fd6,
189 0xa1d29c07, 0xefe830f5, 0x4d2d38e6, 0xf0255dc1,
190 0x4cdd2086, 0x8470eb26, 0x6382e9c6, 0x021ecc5e,
191 0x09686b3f, 0x3ebaefc9, 0x3c971814, 0x6b6a70a1,
192 0x687f3584, 0x52a0e286, 0xb79c5305, 0xaa500737,
193 0x3e07841c, 0x7fdeae5c, 0x8e7d44ec, 0x5716f2b8,
194 0xb03ada37, 0xf0500c0d, 0xf01c1f04, 0x0200b3ff,
195 0xae0cf51a, 0x3cb574b2, 0x25837a58, 0xdc0921bd,
196 0xd19113f9, 0x7ca92ff6, 0x94324773, 0x22f54701,
197 0x3ae5e581, 0x37c2dadc, 0xc8b57634, 0x9af3dda7,
198 0xa9446146, 0x0fd0030e, 0xecc8c73e, 0xa4751e41,
199 0xe238cd99, 0x3bea0e2f, 0x3280bba1, 0x183eb331,
200 0x4e548b38, 0x4f6db908, 0x6f420d03, 0xf60a04bf,
201 0x2cb81290, 0x24977c79, 0x5679b072, 0xbcaf89af,
202 0xde9a771f, 0xd9930810, 0xb38bae12, 0xdccf3f2e,
203 0x5512721f, 0x2e6b7124, 0x501adde6, 0x9f84cd87,
204 0x7a584718, 0x7408da17, 0xbc9f9abc, 0xe94b7d8c,
205 0xec7aec3a, 0xdb851dfa, 0x63094366, 0xc464c3d2,
206 0xef1c1847, 0x3215d908, 0xdd433b37, 0x24c2ba16,
207 0x12a14d43, 0x2a65c451, 0x50940002, 0x133ae4dd,
208 0x71dff89e, 0x10314e55, 0x81ac77d6, 0x5f11199b,
209 0x043556f1, 0xd7a3c76b, 0x3c11183b, 0x5924a509,
210 0xf28fe6ed, 0x97f1fbfa, 0x9ebabf2c, 0x1e153c6e,
211 0x86e34570, 0xeae96fb1, 0x860e5e0a, 0x5a3e2ab3,
212 0x771fe71c, 0x4e3d06fa, 0x2965dcb9, 0x99e71d0f,
213 0x803e89d6, 0x5266c825, 0x2e4cc978, 0x9c10b36a,
214 0xc6150eba, 0x94e2ea78, 0xa5fc3c53, 0x1e0a2df4,
215 0xf2f74ea7, 0x361d2b3d, 0x1939260f, 0x19c27960,
216 0x5223a708, 0xf71312b6, 0xebadfe6e, 0xeac31f66,
217 0xe3bc4595, 0xa67bc883, 0xb17f37d1, 0x018cff28,
218 0xc332ddef, 0xbe6c5aa5, 0x65582185, 0x68ab9802,
219 0xeecea50f, 0xdb2f953b, 0x2aef7dad, 0x5b6e2f84,
220 0x1521b628, 0x29076170, 0xecdd4775, 0x619f1510,
221 0x13cca830, 0xeb61bd96, 0x0334fe1e, 0xaa0363cf,
222 0xb5735c90, 0x4c70a239, 0xd59e9e0b, 0xcbaade14,
223 0xeecc86bc, 0x60622ca7, 0x9cab5cab, 0xb2f3846e,
224 0x648b1eaf, 0x19bdf0ca, 0xa02369b9, 0x655abb50,
225 0x40685a32, 0x3c2ab4b3, 0x319ee9d5, 0xc021b8f7,
226 0x9b540b19, 0x875fa099, 0x95f7997e, 0x623d7da8,
227 0xf837889a, 0x97e32d77, 0x11ed935f, 0x16681281,
228 0x0e358829, 0xc7e61fd6, 0x96dedfa1, 0x7858ba99,
229 0x57f584a5, 0x1b227263, 0x9b83c3ff, 0x1ac24696,
230 0xcdb30aeb, 0x532e3054, 0x8fd948e4, 0x6dbc3128,
231 0x58ebf2ef, 0x34c6ffea, 0xfe28ed61, 0xee7c3c73,
232 0x5d4a14d9, 0xe864b7e3, 0x42105d14, 0x203e13e0,
233 0x45eee2b6, 0xa3aaabea, 0xdb6c4f15, 0xfacb4fd0,
234 0xc742f442, 0xef6abbb5, 0x654f3b1d, 0x41cd2105,
235 0xd81e799e, 0x86854dc7, 0xe44b476a, 0x3d816250,
236 0xcf62a1f2, 0x5b8d2646, 0xfc8883a0, 0xc1c7b6a3,
237 0x7f1524c3, 0x69cb7492, 0x47848a0b, 0x5692b285,
238 0x095bbf00, 0xad19489d, 0x1462b174, 0x23820e00,
239 0x58428d2a, 0x0c55f5ea, 0x1dadf43e, 0x233f7061,
240 0x3372f092, 0x8d937e41, 0xd65fecf1, 0x6c223bdb,
241 0x7cde3759, 0xcbee7460, 0x4085f2a7, 0xce77326e,
242 0xa6078084, 0x19f8509e, 0xe8efd855, 0x61d99735,
243 0xa969a7aa, 0xc50c06c2, 0x5a04abfc, 0x800bcadc,
244 0x9e447a2e, 0xc3453484, 0xfdd56705, 0x0e1e9ec9,
245 0xdb73dbd3, 0x105588cd, 0x675fda79, 0xe3674340,
246 0xc5c43465, 0x713e38d8, 0x3d28f89e, 0xf16dff20,
247 0x153e21e7, 0x8fb03d4a, 0xe6e39f2b, 0xdb83adf7,
248 0xe93d5a68, 0x948140f7, 0xf64c261c, 0x94692934,
249 0x411520f7, 0x7602d4f7, 0xbcf46b2e, 0xd4a20068,
250 0xd4082471, 0x3320f46a, 0x43b7d4b7, 0x500061af,
251 0x1e39f62e, 0x97244546, 0x14214f74, 0xbf8b8840,
252 0x4d95fc1d, 0x96b591af, 0x70f4ddd3, 0x66a02f45,
253 0xbfbc09ec, 0x03bd9785, 0x7fac6dd0, 0x31cb8504,
254 0x96eb27b3, 0x55fd3941, 0xda2547e6, 0xabca0a9a,
255 0x28507825, 0x530429f4, 0x0a2c86da, 0xe9b66dfb,
256 0x68dc1462, 0xd7486900, 0x680ec0a4, 0x27a18dee,
257 0x4f3ffea2, 0xe887ad8c, 0xb58ce006, 0x7af4d6b6,
258 0xaace1e7c, 0xd3375fec, 0xce78a399, 0x406b2a42,
259 0x20fe9e35, 0xd9f385b9, 0xee39d7ab, 0x3b124e8b,
260 0x1dc9faf7, 0x4b6d1856, 0x26a36631, 0xeae397b2,
261 0x3a6efa74, 0xdd5b4332, 0x6841e7f7, 0xca7820fb,
262 0xfb0af54e, 0xd8feb397, 0x454056ac, 0xba489527,
263 0x55533a3a, 0x20838d87, 0xfe6ba9b7, 0xd096954b,
264 0x55a867bc, 0xa1159a58, 0xcca92963, 0x99e1db33,
265 0xa62a4a56, 0x3f3125f9, 0x5ef47e1c, 0x9029317c,
266 0xfdf8e802, 0x04272f70, 0x80bb155c, 0x05282ce3,
267 0x95c11548, 0xe4c66d22, 0x48c1133f, 0xc70f86dc,
268 0x07f9c9ee, 0x41041f0f, 0x404779a4, 0x5d886e17,
269 0x325f51eb, 0xd59bc0d1, 0xf2bcc18f, 0x41113564,
270 0x257b7834, 0x602a9c60, 0xdff8e8a3, 0x1f636c1b,
271 0x0e12b4c2, 0x02e1329e, 0xaf664fd1, 0xcad18115,
272 0x6b2395e0, 0x333e92e1, 0x3b240b62, 0xeebeb922,
273 0x85b2a20e, 0xe6ba0d99, 0xde720c8c, 0x2da2f728,
274 0xd0127845, 0x95b794fd, 0x647d0862, 0xe7ccf5f0,
275 0x5449a36f, 0x877d48fa, 0xc39dfd27, 0xf33e8d1e,
276 0x0a476341, 0x992eff74, 0x3a6f6eab, 0xf4f8fd37,
277 0xa812dc60, 0xa1ebddf8, 0x991be14c, 0xdb6e6b0d,
278 0xc67b5510, 0x6d672c37, 0x2765d43b, 0xdcd0e804,
279 0xf1290dc7, 0xcc00ffa3, 0xb5390f92, 0x690fed0b,
280 0x667b9ffb, 0xcedb7d9c, 0xa091cf0b, 0xd9155ea3,
281 0xbb132f88, 0x515bad24, 0x7b9479bf, 0x763bd6eb,
282 0x37392eb3, 0xcc115979, 0x8026e297, 0xf42e312d,
283 0x6842ada7, 0xc66a2b3b, 0x12754ccc, 0x782ef11c,
284 0x6a124237, 0xb79251e7, 0x06a1bbe6, 0x4bfb6350,
285 0x1a6b1018, 0x11caedfa, 0x3d25bdd8, 0xe2e1c3c9,
286 0x44421659, 0x0a121386, 0xd90cec6e, 0xd5abea2a,
287 0x64af674e, 0xda86a85f, 0xbebfe988, 0x64e4c3fe,
288 0x9dbc8057, 0xf0f7c086, 0x60787bf8, 0x6003604d,
289 0xd1fd8346, 0xf6381fb0, 0x7745ae04, 0xd736fccc,
290 0x83426b33, 0xf01eab71, 0xb0804187, 0x3c005e5f,
291 0x77a057be, 0xbde8ae24, 0x55464299, 0xbf582e61,
292 0x4e58f48f, 0xf2ddfda2, 0xf474ef38, 0x8789bdc2,
293 0x5366f9c3, 0xc8b38e74, 0xb475f255, 0x46fcd9b9,
294 0x7aeb2661, 0x8b1ddf84, 0x846a0e79, 0x915f95e2,
295 0x466e598e, 0x20b45770, 0x8cd55591, 0xc902de4c,
296 0xb90bace1, 0xbb8205d0, 0x11a86248, 0x7574a99e,
297 0xb77f19b6, 0xe0a9dc09, 0x662d09a1, 0xc4324633,
298 0xe85a1f02, 0x09f0be8c, 0x4a99a025, 0x1d6efe10,
299 0x1ab93d1d, 0x0ba5a4df, 0xa186f20f, 0x2868f169,
300 0xdcb7da83, 0x573906fe, 0xa1e2ce9b, 0x4fcd7f52,
301 0x50115e01, 0xa70683fa, 0xa002b5c4, 0x0de6d027,
302 0x9af88c27, 0x773f8641, 0xc3604c06, 0x61a806b5,
303 0xf0177a28, 0xc0f586e0, 0x006058aa, 0x30dc7d62,
304 0x11e69ed7, 0x2338ea63, 0x53c2dd94, 0xc2c21634,
305 0xbbcbee56, 0x90bcb6de, 0xebfc7da1, 0xce591d76,
306 0x6f05e409, 0x4b7c0188, 0x39720a3d, 0x7c927c24,
307 0x86e3725f, 0x724d9db9, 0x1ac15bb4, 0xd39eb8fc,
308 0xed545578, 0x08fca5b5, 0xd83d7cd3, 0x4dad0fc4,
309 0x1e50ef5e, 0xb161e6f8, 0xa28514d9, 0x6c51133c,
310 0x6fd5c7e7, 0x56e14ec4, 0x362abfce, 0xddc6c837,
311 0xd79a3234, 0x92638212, 0x670efa8e, 0x406000e0,
312 0x3a39ce37, 0xd3faf5cf, 0xabc27737, 0x5ac52d1b,
313 0x5cb0679e, 0x4fa33742, 0xd3822740, 0x99bc9bbe,
314 0xd5118e9d, 0xbf0f7315, 0xd62d1c7e, 0xc700c47b,
315 0xb78c1b6b, 0x21a19045, 0xb26eb1be, 0x6a366eb4,
316 0x5748ab2f, 0xbc946e79, 0xc6a376d2, 0x6549c2c8,
317 0x530ff8ee, 0x468dde7d, 0xd5730a1d, 0x4cd04dc6,
318 0x2939bbdb, 0xa9ba4650, 0xac9526e8, 0xbe5ee304,
319 0xa1fad5f0, 0x6a2d519a, 0x63ef8ce2, 0x9a86ee22,
320 0xc089c2b8, 0x43242ef6, 0xa51e03aa, 0x9cf2d0a4,
321 0x83c061ba, 0x9be96a4d, 0x8fe51550, 0xba645bd6,
322 0x2826a2f9, 0xa73a3ae1, 0x4ba99586, 0xef5562e9,
323 0xc72fefd3, 0xf752f7da, 0x3f046f69, 0x77fa0a59,
324 0x80e4a915, 0x87b08601, 0x9b09e6ad, 0x3b3ee593,
325 0xe990fd5a, 0x9e34d797, 0x2cf0b7d9, 0x022b8b51,
326 0x96d5ac3a, 0x017da67d, 0xd1cf3ed6, 0x7c7d2d28,
327 0x1f9f25cf, 0xadf2b89b, 0x5ad6b472, 0x5a88f54c,
328 0xe029ac71, 0xe019a5e6, 0x47b0acfd, 0xed93fa9b,
329 0xe8d3c48d, 0x283b57cc, 0xf8d56629, 0x79132e28,
330 0x785f0191, 0xed756055, 0xf7960e44, 0xe3d35e8c,
331 0x15056dd4, 0x88f46dba, 0x03a16125, 0x0564f0bd,
332 0xc3eb9e15, 0x3c9057a2, 0x97271aec, 0xa93a072a,
333 0x1b3f6d9b, 0x1e6321f5, 0xf59c66fb, 0x26dcf319,
334 0x7533d928, 0xb155fdf5, 0x03563482, 0x8aba3cbb,
335 0x28517711, 0xc20ad9f8, 0xabcc5167, 0xccad925f,
336 0x4de81751, 0x3830dc8e, 0x379d5862, 0x9320f991,
337 0xea7a90c2, 0xfb3e7bce, 0x5121ce64, 0x774fbe32,
338 0xa8b6e37e, 0xc3293d46, 0x48de5369, 0x6413e680,
339 0xa2ae0810, 0xdd6db224, 0x69852dfd, 0x09072166,
340 0xb39a460a, 0x6445c0dd, 0x586cdecf, 0x1c20c8ae,
341 0x5bbef7dd, 0x1b588d40, 0xccd2017f, 0x6bb4e3bb,
342 0xdda26a7e, 0x3a59ff45, 0x3e350a44, 0xbcb4cdd5,
343 0x72eacea8, 0xfa6484bb, 0x8d6612ae, 0xbf3c6f47,
344 0xd29be463, 0x542f5d9e, 0xaec2771b, 0xf64e6370,
345 0x740e0d8d, 0xe75b1357, 0xf8721671, 0xaf537d5d,
346 0x4040cb08, 0x4eb4e2cc, 0x34d2466a, 0x0115af84,
347 0xe1b00428, 0x95983a1d, 0x06b89fb4, 0xce6ea048,
348 0x6f3f3b82, 0x3520ab82, 0x011a1d4b, 0x277227f8,
349 0x611560b1, 0xe7933fdc, 0xbb3a792b, 0x344525bd,
350 0xa08839e1, 0x51ce794b, 0x2f32c9b7, 0xa01fbac9,
351 0xe01cc87e, 0xbcc7d1f6, 0xcf0111c3, 0xa1e8aac7,
352 0x1a908749, 0xd44fbd9a, 0xd0dadecb, 0xd50ada38,
353 0x0339c32a, 0xc6913667, 0x8df9317c, 0xe0b12b4f,
354 0xf79e59b7, 0x43f5bb3a, 0xf2d519ff, 0x27d9459c,
355 0xbf97222c, 0x15e6fc2a, 0x0f91fc71, 0x9b941525,
356 0xfae59361, 0xceb69ceb, 0xc2a86459, 0x12baa8d1,
357 0xb6c1075e, 0xe3056a0c, 0x10d25065, 0xcb03a442,
358 0xe0ec6e0e, 0x1698db3b, 0x4c98a0be, 0x3278e964,
359 0x9f1f9532, 0xe0d392df, 0xd3a0342b, 0x8971f21e,
360 0x1b0a7441, 0x4ba3348c, 0xc5be7120, 0xc37632d8,
361 0xdf359f8d, 0x9b992f2e, 0xe60b6f47, 0x0fe3f11d,
362 0xe54cda54, 0x1edad891, 0xce6279cf, 0xcd3e7e6f,
363 0x1618b166, 0xfd2c1d05, 0x848fd2c5, 0xf6fb2299,
364 0xf523f357, 0xa6327623, 0x93a83531, 0x56cccd02,
365 0xacf08162, 0x5a75ebb5, 0x6e163697, 0x88d273cc,
366 0xde966292, 0x81b949d0, 0x4c50901b, 0x71c65614,
367 0xe6c6c7bd, 0x327a140a, 0x45e1d006, 0xc3f27b9a,
368 0xc9aa53fd, 0x62a80f00, 0xbb25bfe2, 0x35bdd2f6,
369 0x71126905, 0xb2040222, 0xb6cbcf7c, 0xcd769c2b,
370 0x53113ec0, 0x1640e3d3, 0x38abbd60, 0x2547adf0,
371 0xba38209c, 0xf746ce76, 0x77afa1c5, 0x20756060,
372 0x85cbfe4e, 0x8ae88dd8, 0x7aaaf9b0, 0x4cf9aa7e,
373 0x1948c25c, 0x02fb8a8c, 0x01c36ae4, 0xd6ebe1f9,
374 0x90d4f869, 0xa65cdea0, 0x3f09252d, 0xc208e69f,
375 0xb74e6132, 0xce77e25b, 0x578fdfe3, 0x3ac372e6,
379 * Round loop unrolling macros, S is a pointer to a S-Box array
380 * organized in 4 SilcUInt32s at a row.
383 #define GET32_3(x) (((x) & 0xff))
384 #define GET32_2(x) (((x) >> (8)) & (0xff))
385 #define GET32_1(x) (((x) >> (16)) & (0xff))
386 #define GET32_0(x) (((x) >> (24)) & (0xff))
388 #define bf_F(x) (((S[GET32_0(x)] + S[256 + GET32_1(x)]) ^ \
389 S[512 + GET32_2(x)]) + S[768 + GET32_3(x)])
391 #define ROUND(a, b, n) b^=P[n];a ^= bf_F(b)
394 * The blowfish encipher, processes 64-bit blocks.
395 * NOTE: This function MUSTN'T respect endianess
398 int blowfish_encrypt(BlowfishContext *ctx,
399 u32 *in_blk, u32 *out_blk, int size)
406 for (; size >= 8; size -= 8) {
427 /* yl and yr are switched */
438 int blowfish_decrypt(BlowfishContext *ctx,
439 u32 *in_blk, u32 *out_blk, int size)
446 for (; size >= 8; size -= 8) {
467 /* yl and yr are switched */
478 /* Sets the blowfish S and P boxes for encryption and decryption. */
480 int blowfish_set_key(BlowfishContext *ctx,
481 unsigned char *key, int keybytes)
491 /* Copy the initialization s-boxes */
493 for (i = 0, count = 0; i < 256; i++)
494 for (j = 0; j < 4; j++, count++)
495 S[count] = bf_sbox[count];
497 /* Set the p-boxes */
499 for (i = 0; i < 16 + 2; i++)
502 /* Actual subkey generation */
504 for (j = 0, i = 0; i < 16 + 2; i++)
506 temp = (((u32) key[j] << 24) |
507 ((u32) key[(j + 1) % keybytes] << 16) |
508 ((u32) key[(j + 2) % keybytes] << 8) |
509 ((u32) key[(j + 3) % keybytes] ));
512 j = (j + 4) % keybytes;
515 data[0] = 0x00000000;
516 data[1] = 0x00000000;
518 for (i = 0; i < 16 + 2; i += 2)
520 blowfish_encrypt(ctx, data, data, 8);
526 for (i = 0; i < 4; i++)
528 for (j = 0, count = i * 256; j < 256; j += 2, count += 2)
530 blowfish_encrypt(ctx, data, data, 8);
533 S[count + 1] = data[1];