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