[userv-utils] / ipif / blowfish.c

/*
 * blowfish
 *
 * Algorithm by Bruce Schneier 1995
 * This implementation adapted from a public domain version by Bruce
 * Schneier (1995) by Ian Jackson in 1997.
 */
/*
 * Copyright (C) 1997,2000,2003 Ian Jackson
 * This file is part of ipif, part of userv-utils
 *
 * This 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.
 *
 * This program is distributed in the hope that it will be useful, but
 * WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
 * General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License
 * along with userv-utils; if not, write to the Free Software
 * Foundation, 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
 */

/* TODO: test with zero length key */
/* TODO: test with a through z as key and plain text */

#include <assert.h>
#include <string.h>

#include "blowfish.h"

static const blowfish__p init_p;
static const blowfish__s init_s;

#define S(x,i) (ek->s[i][((x)>>((3-i)<<3))&0x0ff])
#define F(x) (((S((x),0) + S((x),1)) ^ S((x),2)) + S((x),3))
#define ROUND(a,b,n) ((a) ^= F((b)) ^ ek->p[(n)])

#define GETWORD(p) (((p)[0]<<24)|((p)[1]<<16)|((p)[2]<<8)|((p)[3]))
#define PUTWORD(w,p) ((p)[0]=(w)>>24,(p)[1]=(w)>>16,(p)[2]=(w)>>8,(p)[3]=(w))

static void encipher(const struct blowfish_expandedkey *ek,
		     uint32_t *xlp, uint32_t *xrp) {
  uint32_t xl, xr;

  xl= *xlp;
  xr= *xrp;

  xl ^= ek->p[0];
  ROUND (xr, xl, 1);  ROUND (xl, xr, 2);
  ROUND (xr, xl, 3);  ROUND (xl, xr, 4);
  ROUND (xr, xl, 5);  ROUND (xl, xr, 6);
  ROUND (xr, xl, 7);  ROUND (xl, xr, 8);
  ROUND (xr, xl, 9);  ROUND (xl, xr, 10);
  ROUND (xr, xl, 11); ROUND (xl, xr, 12);
  ROUND (xr, xl, 13); ROUND (xl, xr, 14);
  ROUND (xr, xl, 15); ROUND (xl, xr, 16);
  xr ^= ek->p[17];

  *xrp= xl;
  *xlp= xr;
}

static void decipher(const struct blowfish_expandedkey *ek,
		     uint32_t *xlp, uint32_t *xrp) {
  uint32_t xl, xr;

  xl= *xlp;
  xr= *xrp;

  xl ^= ek->p[17];
  ROUND (xr, xl, 16);  ROUND (xl, xr, 15);
  ROUND (xr, xl, 14);  ROUND (xl, xr, 13);
  ROUND (xr, xl, 12);  ROUND (xl, xr, 11);
  ROUND (xr, xl, 10);  ROUND (xl, xr, 9);
  ROUND (xr, xl, 8);   ROUND (xl, xr, 7);
  ROUND (xr, xl, 6);   ROUND (xl, xr, 5);
  ROUND (xr, xl, 4);   ROUND (xl, xr, 3);
  ROUND (xr, xl, 2);   ROUND (xl, xr, 1);
  xr ^= ek->p[0];

  *xlp= xr;
  *xrp= xl;
}

void blowfish_loadkey(struct blowfish_expandedkey *ek,
		      const uint8_t *key, int keybytes) {
  int i, j;
  uint32_t data, datal, datar;

  assert(keybytes>0 && keybytes<=BLOWFISH_MAXKEYBYTES);
  memcpy(ek->s,init_s,sizeof(ek->s));

  for (i=0, j=0; i < BLOWFISH__PSIZE; i++) {
    data= (key[j]<<24)
      | (key[(j+1)%keybytes]<<16)
      | (key[(j+2)%keybytes]<<8)
      |  key[(j+3)%keybytes];
    ek->p[i]= init_p[i] ^ data;
    j = (j + 4) % keybytes;
  }

  datal= 0x00000000;
  datar= 0x00000000;

  for (i = 0; i < BLOWFISH__PSIZE; i += 2) {
    encipher(ek,&datal,&datar);
    ek->p[i]= datal;
    ek->p[i+1]= datar;
  }

  for (i = 0; i < 4; ++i) {
    for (j = 0; j < 256; j += 2) {
      encipher(ek,&datal,&datar);
      ek->s[i][j]= datal;
      ek->s[i][j+1]= datar;
    }
  }
}

void blowfish_encrypt(const struct blowfish_expandedkey *ek,
		      const uint8_t plain[], uint8_t cipher[]) {
  uint32_t datal, datar;

  datal= GETWORD(plain);
  datar= GETWORD(plain+4);
  encipher(ek,&datal,&datar);
  PUTWORD(datal,cipher);
  PUTWORD(datar,cipher+4);
}

void blowfish_decrypt(const struct blowfish_expandedkey *ek,
		      const uint8_t cipher[], uint8_t plain[]) {
  uint32_t datal, datar;

  datal= GETWORD(cipher);
  datar= GETWORD(cipher+4);
  decipher(ek,&datal,&datar);
  PUTWORD(datal,plain);
  PUTWORD(datar,plain+4);
}

void blowfish_cbc_setiv(struct blowfish_cbc_state *cs, const uint8_t iv[]) {
  cs->chainl= GETWORD(iv);
  cs->chainr= GETWORD(iv+4);
}

void blowfish_cbc_encrypt(struct blowfish_cbc_state *cs,
			  const uint8_t plain[], uint8_t cipher[]) {
  uint32_t datal, datar;

  datal= GETWORD(plain);
  datar= GETWORD(plain+4);
  datal ^= cs->chainl;
  datar ^= cs->chainr;
  encipher(&cs->ek,&datal,&datar);
  cs->chainl= datal;
  cs->chainr= datar;
  PUTWORD(datal,cipher);
  PUTWORD(datar,cipher+4);
}

void blowfish_cbc_decrypt(struct blowfish_cbc_state *cs,
			  const uint8_t cipher[], uint8_t plain[]) {
  uint32_t datal, datar, cipherl, cipherr;

  datal= GETWORD(cipher);
  datar= GETWORD(cipher+4);
  cipherl= datal;
  cipherr= datar;
  decipher(&cs->ek,&datal,&datar);
  datal ^= cs->chainl;
  datar ^= cs->chainr;
  cs->chainl= cipherl;
  cs->chainr= cipherr;
  PUTWORD(datal,plain);
  PUTWORD(datar,plain+4);
}

static const blowfish__p init_p= {
  0x243f6a88, 0x85a308d3, 0x13198a2e, 0x03707344,
  0xa4093822, 0x299f31d0, 0x082efa98, 0xec4e6c89,
  0x452821e6, 0x38d01377, 0xbe5466cf, 0x34e90c6c,
  0xc0ac29b7, 0xc97c50dd, 0x3f84d5b5, 0xb5470917,
  0x9216d5d9, 0x8979fb1b
};

static const blowfish__s init_s= {
  {
    0xd1310ba6, 0x98dfb5ac, 0x2ffd72db, 0xd01adfb7,
    0xb8e1afed, 0x6a267e96, 0xba7c9045, 0xf12c7f99,
    0x24a19947, 0xb3916cf7, 0x0801f2e2, 0x858efc16,
    0x636920d8, 0x71574e69, 0xa458fea3, 0xf4933d7e,
    0x0d95748f, 0x728eb658, 0x718bcd58, 0x82154aee,
    0x7b54a41d, 0xc25a59b5, 0x9c30d539, 0x2af26013,
    0xc5d1b023, 0x286085f0, 0xca417918, 0xb8db38ef,
    0x8e79dcb0, 0x603a180e, 0x6c9e0e8b, 0xb01e8a3e,
    0xd71577c1, 0xbd314b27, 0x78af2fda, 0x55605c60,
    0xe65525f3, 0xaa55ab94, 0x57489862, 0x63e81440,
    0x55ca396a, 0x2aab10b6, 0xb4cc5c34, 0x1141e8ce,
    0xa15486af, 0x7c72e993, 0xb3ee1411, 0x636fbc2a,
    0x2ba9c55d, 0x741831f6, 0xce5c3e16, 0x9b87931e,
    0xafd6ba33, 0x6c24cf5c, 0x7a325381, 0x28958677,
    0x3b8f4898, 0x6b4bb9af, 0xc4bfe81b, 0x66282193,
    0x61d809cc, 0xfb21a991, 0x487cac60, 0x5dec8032,
    0xef845d5d, 0xe98575b1, 0xdc262302, 0xeb651b88,
    0x23893e81, 0xd396acc5, 0x0f6d6ff3, 0x83f44239,
    0x2e0b4482, 0xa4842004, 0x69c8f04a, 0x9e1f9b5e,
    0x21c66842, 0xf6e96c9a, 0x670c9c61, 0xabd388f0,
    0x6a51a0d2, 0xd8542f68, 0x960fa728, 0xab5133a3,
    0x6eef0b6c, 0x137a3be4, 0xba3bf050, 0x7efb2a98,
    0xa1f1651d, 0x39af0176, 0x66ca593e, 0x82430e88,
    0x8cee8619, 0x456f9fb4, 0x7d84a5c3, 0x3b8b5ebe,
    0xe06f75d8, 0x85c12073, 0x401a449f, 0x56c16aa6,
    0x4ed3aa62, 0x363f7706, 0x1bfedf72, 0x429b023d,
    0x37d0d724, 0xd00a1248, 0xdb0fead3, 0x49f1c09b,
    0x075372c9, 0x80991b7b, 0x25d479d8, 0xf6e8def7,
    0xe3fe501a, 0xb6794c3b, 0x976ce0bd, 0x04c006ba,
    0xc1a94fb6, 0x409f60c4, 0x5e5c9ec2, 0x196a2463,
    0x68fb6faf, 0x3e6c53b5, 0x1339b2eb, 0x3b52ec6f,
    0x6dfc511f, 0x9b30952c, 0xcc814544, 0xaf5ebd09,
    0xbee3d004, 0xde334afd, 0x660f2807, 0x192e4bb3,
    0xc0cba857, 0x45c8740f, 0xd20b5f39, 0xb9d3fbdb,
    0x5579c0bd, 0x1a60320a, 0xd6a100c6, 0x402c7279,
    0x679f25fe, 0xfb1fa3cc, 0x8ea5e9f8, 0xdb3222f8,
    0x3c7516df, 0xfd616b15, 0x2f501ec8, 0xad0552ab,
    0x323db5fa, 0xfd238760, 0x53317b48, 0x3e00df82,
    0x9e5c57bb, 0xca6f8ca0, 0x1a87562e, 0xdf1769db,
    0xd542a8f6, 0x287effc3, 0xac6732c6, 0x8c4f5573,
    0x695b27b0, 0xbbca58c8, 0xe1ffa35d, 0xb8f011a0,
    0x10fa3d98, 0xfd2183b8, 0x4afcb56c, 0x2dd1d35b,
    0x9a53e479, 0xb6f84565, 0xd28e49bc, 0x4bfb9790,
    0xe1ddf2da, 0xa4cb7e33, 0x62fb1341, 0xcee4c6e8,
    0xef20cada, 0x36774c01, 0xd07e9efe, 0x2bf11fb4,
    0x95dbda4d, 0xae909198, 0xeaad8e71, 0x6b93d5a0,
    0xd08ed1d0, 0xafc725e0, 0x8e3c5b2f, 0x8e7594b7,
    0x8ff6e2fb, 0xf2122b64, 0x8888b812, 0x900df01c,
    0x4fad5ea0, 0x688fc31c, 0xd1cff191, 0xb3a8c1ad,
    0x2f2f2218, 0xbe0e1777, 0xea752dfe, 0x8b021fa1,
    0xe5a0cc0f, 0xb56f74e8, 0x18acf3d6, 0xce89e299,
    0xb4a84fe0, 0xfd13e0b7, 0x7cc43b81, 0xd2ada8d9,
    0x165fa266, 0x80957705, 0x93cc7314, 0x211a1477,
    0xe6ad2065, 0x77b5fa86, 0xc75442f5, 0xfb9d35cf,
    0xebcdaf0c, 0x7b3e89a0, 0xd6411bd3, 0xae1e7e49,
    0x00250e2d, 0x2071b35e, 0x226800bb, 0x57b8e0af,
    0x2464369b, 0xf009b91e, 0x5563911d, 0x59dfa6aa,
    0x78c14389, 0xd95a537f, 0x207d5ba2, 0x02e5b9c5,
    0x83260376, 0x6295cfa9, 0x11c81968, 0x4e734a41,
    0xb3472dca, 0x7b14a94a, 0x1b510052, 0x9a532915,
    0xd60f573f, 0xbc9bc6e4, 0x2b60a476, 0x81e67400,
    0x08ba6fb5, 0x571be91f, 0xf296ec6b, 0x2a0dd915,
    0xb6636521, 0xe7b9f9b6, 0xff34052e, 0xc5855664,
    0x53b02d5d, 0xa99f8fa1, 0x08ba4799, 0x6e85076a
  }, {
    0x4b7a70e9, 0xb5b32944, 0xdb75092e, 0xc4192623,
    0xad6ea6b0, 0x49a7df7d, 0x9cee60b8, 0x8fedb266,
    0xecaa8c71, 0x699a17ff, 0x5664526c, 0xc2b19ee1,
    0x193602a5, 0x75094c29, 0xa0591340, 0xe4183a3e,
    0x3f54989a, 0x5b429d65, 0x6b8fe4d6, 0x99f73fd6,
    0xa1d29c07, 0xefe830f5, 0x4d2d38e6, 0xf0255dc1,
    0x4cdd2086, 0x8470eb26, 0x6382e9c6, 0x021ecc5e,
    0x09686b3f, 0x3ebaefc9, 0x3c971814, 0x6b6a70a1,
    0x687f3584, 0x52a0e286, 0xb79c5305, 0xaa500737,
    0x3e07841c, 0x7fdeae5c, 0x8e7d44ec, 0x5716f2b8,
    0xb03ada37, 0xf0500c0d, 0xf01c1f04, 0x0200b3ff,
    0xae0cf51a, 0x3cb574b2, 0x25837a58, 0xdc0921bd,
    0xd19113f9, 0x7ca92ff6, 0x94324773, 0x22f54701,
    0x3ae5e581, 0x37c2dadc, 0xc8b57634, 0x9af3dda7,
    0xa9446146, 0x0fd0030e, 0xecc8c73e, 0xa4751e41,
    0xe238cd99, 0x3bea0e2f, 0x3280bba1, 0x183eb331,
    0x4e548b38, 0x4f6db908, 0x6f420d03, 0xf60a04bf,
    0x2cb81290, 0x24977c79, 0x5679b072, 0xbcaf89af,
    0xde9a771f, 0xd9930810, 0xb38bae12, 0xdccf3f2e,
    0x5512721f, 0x2e6b7124, 0x501adde6, 0x9f84cd87,
    0x7a584718, 0x7408da17, 0xbc9f9abc, 0xe94b7d8c,
    0xec7aec3a, 0xdb851dfa, 0x63094366, 0xc464c3d2,
    0xef1c1847, 0x3215d908, 0xdd433b37, 0x24c2ba16,
    0x12a14d43, 0x2a65c451, 0x50940002, 0x133ae4dd,
    0x71dff89e, 0x10314e55, 0x81ac77d6, 0x5f11199b,
    0x043556f1, 0xd7a3c76b, 0x3c11183b, 0x5924a509,
    0xf28fe6ed, 0x97f1fbfa, 0x9ebabf2c, 0x1e153c6e,
    0x86e34570, 0xeae96fb1, 0x860e5e0a, 0x5a3e2ab3,
    0x771fe71c, 0x4e3d06fa, 0x2965dcb9, 0x99e71d0f,
    0x803e89d6, 0x5266c825, 0x2e4cc978, 0x9c10b36a,
    0xc6150eba, 0x94e2ea78, 0xa5fc3c53, 0x1e0a2df4,
    0xf2f74ea7, 0x361d2b3d, 0x1939260f, 0x19c27960,
    0x5223a708, 0xf71312b6, 0xebadfe6e, 0xeac31f66,
    0xe3bc4595, 0xa67bc883, 0xb17f37d1, 0x018cff28,
    0xc332ddef, 0xbe6c5aa5, 0x65582185, 0x68ab9802,
    0xeecea50f, 0xdb2f953b, 0x2aef7dad, 0x5b6e2f84,
    0x1521b628, 0x29076170, 0xecdd4775, 0x619f1510,
    0x13cca830, 0xeb61bd96, 0x0334fe1e, 0xaa0363cf,
    0xb5735c90, 0x4c70a239, 0xd59e9e0b, 0xcbaade14,
    0xeecc86bc, 0x60622ca7, 0x9cab5cab, 0xb2f3846e,
    0x648b1eaf, 0x19bdf0ca, 0xa02369b9, 0x655abb50,
    0x40685a32, 0x3c2ab4b3, 0x319ee9d5, 0xc021b8f7,
    0x9b540b19, 0x875fa099, 0x95f7997e, 0x623d7da8,
    0xf837889a, 0x97e32d77, 0x11ed935f, 0x16681281,
    0x0e358829, 0xc7e61fd6, 0x96dedfa1, 0x7858ba99,
    0x57f584a5, 0x1b227263, 0x9b83c3ff, 0x1ac24696,
    0xcdb30aeb, 0x532e3054, 0x8fd948e4, 0x6dbc3128,
    0x58ebf2ef, 0x34c6ffea, 0xfe28ed61, 0xee7c3c73,
    0x5d4a14d9, 0xe864b7e3, 0x42105d14, 0x203e13e0,
    0x45eee2b6, 0xa3aaabea, 0xdb6c4f15, 0xfacb4fd0,
    0xc742f442, 0xef6abbb5, 0x654f3b1d, 0x41cd2105,
    0xd81e799e, 0x86854dc7, 0xe44b476a, 0x3d816250,
    0xcf62a1f2, 0x5b8d2646, 0xfc8883a0, 0xc1c7b6a3,
    0x7f1524c3, 0x69cb7492, 0x47848a0b, 0x5692b285,
    0x095bbf00, 0xad19489d, 0x1462b174, 0x23820e00,
    0x58428d2a, 0x0c55f5ea, 0x1dadf43e, 0x233f7061,
    0x3372f092, 0x8d937e41, 0xd65fecf1, 0x6c223bdb,
    0x7cde3759, 0xcbee7460, 0x4085f2a7, 0xce77326e,
    0xa6078084, 0x19f8509e, 0xe8efd855, 0x61d99735,
    0xa969a7aa, 0xc50c06c2, 0x5a04abfc, 0x800bcadc,
    0x9e447a2e, 0xc3453484, 0xfdd56705, 0x0e1e9ec9,
    0xdb73dbd3, 0x105588cd, 0x675fda79, 0xe3674340,
    0xc5c43465, 0x713e38d8, 0x3d28f89e, 0xf16dff20,
    0x153e21e7, 0x8fb03d4a, 0xe6e39f2b, 0xdb83adf7
  }, {
    0xe93d5a68, 0x948140f7, 0xf64c261c, 0x94692934,
    0x411520f7, 0x7602d4f7, 0xbcf46b2e, 0xd4a20068,
    0xd4082471, 0x3320f46a, 0x43b7d4b7, 0x500061af,
    0x1e39f62e, 0x97244546, 0x14214f74, 0xbf8b8840,
    0x4d95fc1d, 0x96b591af, 0x70f4ddd3, 0x66a02f45,
    0xbfbc09ec, 0x03bd9785, 0x7fac6dd0, 0x31cb8504,
    0x96eb27b3, 0x55fd3941, 0xda2547e6, 0xabca0a9a,
    0x28507825, 0x530429f4, 0x0a2c86da, 0xe9b66dfb,
    0x68dc1462, 0xd7486900, 0x680ec0a4, 0x27a18dee,
    0x4f3ffea2, 0xe887ad8c, 0xb58ce006, 0x7af4d6b6,
    0xaace1e7c, 0xd3375fec, 0xce78a399, 0x406b2a42,
    0x20fe9e35, 0xd9f385b9, 0xee39d7ab, 0x3b124e8b,
    0x1dc9faf7, 0x4b6d1856, 0x26a36631, 0xeae397b2,
    0x3a6efa74, 0xdd5b4332, 0x6841e7f7, 0xca7820fb,
    0xfb0af54e, 0xd8feb397, 0x454056ac, 0xba489527,
    0x55533a3a, 0x20838d87, 0xfe6ba9b7, 0xd096954b,
    0x55a867bc, 0xa1159a58, 0xcca92963, 0x99e1db33,
    0xa62a4a56, 0x3f3125f9, 0x5ef47e1c, 0x9029317c,
    0xfdf8e802, 0x04272f70, 0x80bb155c, 0x05282ce3,
    0x95c11548, 0xe4c66d22, 0x48c1133f, 0xc70f86dc,
    0x07f9c9ee, 0x41041f0f, 0x404779a4, 0x5d886e17,
    0x325f51eb, 0xd59bc0d1, 0xf2bcc18f, 0x41113564,
    0x257b7834, 0x602a9c60, 0xdff8e8a3, 0x1f636c1b,
    0x0e12b4c2, 0x02e1329e, 0xaf664fd1, 0xcad18115,
    0x6b2395e0, 0x333e92e1, 0x3b240b62, 0xeebeb922,
    0x85b2a20e, 0xe6ba0d99, 0xde720c8c, 0x2da2f728,
    0xd0127845, 0x95b794fd, 0x647d0862, 0xe7ccf5f0,
    0x5449a36f, 0x877d48fa, 0xc39dfd27, 0xf33e8d1e,
    0x0a476341, 0x992eff74, 0x3a6f6eab, 0xf4f8fd37,
    0xa812dc60, 0xa1ebddf8, 0x991be14c, 0xdb6e6b0d,
    0xc67b5510, 0x6d672c37, 0x2765d43b, 0xdcd0e804,
    0xf1290dc7, 0xcc00ffa3, 0xb5390f92, 0x690fed0b,
    0x667b9ffb, 0xcedb7d9c, 0xa091cf0b, 0xd9155ea3,
    0xbb132f88, 0x515bad24, 0x7b9479bf, 0x763bd6eb,
    0x37392eb3, 0xcc115979, 0x8026e297, 0xf42e312d,
    0x6842ada7, 0xc66a2b3b, 0x12754ccc, 0x782ef11c,
    0x6a124237, 0xb79251e7, 0x06a1bbe6, 0x4bfb6350,
    0x1a6b1018, 0x11caedfa, 0x3d25bdd8, 0xe2e1c3c9,
    0x44421659, 0x0a121386, 0xd90cec6e, 0xd5abea2a,
    0x64af674e, 0xda86a85f, 0xbebfe988, 0x64e4c3fe,
    0x9dbc8057, 0xf0f7c086, 0x60787bf8, 0x6003604d,
    0xd1fd8346, 0xf6381fb0, 0x7745ae04, 0xd736fccc,
    0x83426b33, 0xf01eab71, 0xb0804187, 0x3c005e5f,
    0x77a057be, 0xbde8ae24, 0x55464299, 0xbf582e61,
    0x4e58f48f, 0xf2ddfda2, 0xf474ef38, 0x8789bdc2,
    0x5366f9c3, 0xc8b38e74, 0xb475f255, 0x46fcd9b9,
    0x7aeb2661, 0x8b1ddf84, 0x846a0e79, 0x915f95e2,
    0x466e598e, 0x20b45770, 0x8cd55591, 0xc902de4c,
    0xb90bace1, 0xbb8205d0, 0x11a86248, 0x7574a99e,
    0xb77f19b6, 0xe0a9dc09, 0x662d09a1, 0xc4324633,
    0xe85a1f02, 0x09f0be8c, 0x4a99a025, 0x1d6efe10,
    0x1ab93d1d, 0x0ba5a4df, 0xa186f20f, 0x2868f169,
    0xdcb7da83, 0x573906fe, 0xa1e2ce9b, 0x4fcd7f52,
    0x50115e01, 0xa70683fa, 0xa002b5c4, 0x0de6d027,
    0x9af88c27, 0x773f8641, 0xc3604c06, 0x61a806b5,
    0xf0177a28, 0xc0f586e0, 0x006058aa, 0x30dc7d62,
    0x11e69ed7, 0x2338ea63, 0x53c2dd94, 0xc2c21634,
    0xbbcbee56, 0x90bcb6de, 0xebfc7da1, 0xce591d76,
    0x6f05e409, 0x4b7c0188, 0x39720a3d, 0x7c927c24,
    0x86e3725f, 0x724d9db9, 0x1ac15bb4, 0xd39eb8fc,
    0xed545578, 0x08fca5b5, 0xd83d7cd3, 0x4dad0fc4,
    0x1e50ef5e, 0xb161e6f8, 0xa28514d9, 0x6c51133c,
    0x6fd5c7e7, 0x56e14ec4, 0x362abfce, 0xddc6c837,
    0xd79a3234, 0x92638212, 0x670efa8e, 0x406000e0
  }, {
    0x3a39ce37, 0xd3faf5cf, 0xabc27737, 0x5ac52d1b,
    0x5cb0679e, 0x4fa33742, 0xd3822740, 0x99bc9bbe,
    0xd5118e9d, 0xbf0f7315, 0xd62d1c7e, 0xc700c47b,
    0xb78c1b6b, 0x21a19045, 0xb26eb1be, 0x6a366eb4,
    0x5748ab2f, 0xbc946e79, 0xc6a376d2, 0x6549c2c8,
    0x530ff8ee, 0x468dde7d, 0xd5730a1d, 0x4cd04dc6,
    0x2939bbdb, 0xa9ba4650, 0xac9526e8, 0xbe5ee304,
    0xa1fad5f0, 0x6a2d519a, 0x63ef8ce2, 0x9a86ee22,
    0xc089c2b8, 0x43242ef6, 0xa51e03aa, 0x9cf2d0a4,
    0x83c061ba, 0x9be96a4d, 0x8fe51550, 0xba645bd6,
    0x2826a2f9, 0xa73a3ae1, 0x4ba99586, 0xef5562e9,
    0xc72fefd3, 0xf752f7da, 0x3f046f69, 0x77fa0a59,
    0x80e4a915, 0x87b08601, 0x9b09e6ad, 0x3b3ee593,
    0xe990fd5a, 0x9e34d797, 0x2cf0b7d9, 0x022b8b51,
    0x96d5ac3a, 0x017da67d, 0xd1cf3ed6, 0x7c7d2d28,
    0x1f9f25cf, 0xadf2b89b, 0x5ad6b472, 0x5a88f54c,
    0xe029ac71, 0xe019a5e6, 0x47b0acfd, 0xed93fa9b,
    0xe8d3c48d, 0x283b57cc, 0xf8d56629, 0x79132e28,
    0x785f0191, 0xed756055, 0xf7960e44, 0xe3d35e8c,
    0x15056dd4, 0x88f46dba, 0x03a16125, 0x0564f0bd,
    0xc3eb9e15, 0x3c9057a2, 0x97271aec, 0xa93a072a,
    0x1b3f6d9b, 0x1e6321f5, 0xf59c66fb, 0x26dcf319,
    0x7533d928, 0xb155fdf5, 0x03563482, 0x8aba3cbb,
    0x28517711, 0xc20ad9f8, 0xabcc5167, 0xccad925f,
    0x4de81751, 0x3830dc8e, 0x379d5862, 0x9320f991,
    0xea7a90c2, 0xfb3e7bce, 0x5121ce64, 0x774fbe32,
    0xa8b6e37e, 0xc3293d46, 0x48de5369, 0x6413e680,
    0xa2ae0810, 0xdd6db224, 0x69852dfd, 0x09072166,
    0xb39a460a, 0x6445c0dd, 0x586cdecf, 0x1c20c8ae,
    0x5bbef7dd, 0x1b588d40, 0xccd2017f, 0x6bb4e3bb,
    0xdda26a7e, 0x3a59ff45, 0x3e350a44, 0xbcb4cdd5,
    0x72eacea8, 0xfa6484bb, 0x8d6612ae, 0xbf3c6f47,
    0xd29be463, 0x542f5d9e, 0xaec2771b, 0xf64e6370,
    0x740e0d8d, 0xe75b1357, 0xf8721671, 0xaf537d5d,
    0x4040cb08, 0x4eb4e2cc, 0x34d2466a, 0x0115af84,
    0xe1b00428, 0x95983a1d, 0x06b89fb4, 0xce6ea048,
    0x6f3f3b82, 0x3520ab82, 0x011a1d4b, 0x277227f8,
    0x611560b1, 0xe7933fdc, 0xbb3a792b, 0x344525bd,
    0xa08839e1, 0x51ce794b, 0x2f32c9b7, 0xa01fbac9,
    0xe01cc87e, 0xbcc7d1f6, 0xcf0111c3, 0xa1e8aac7,
    0x1a908749, 0xd44fbd9a, 0xd0dadecb, 0xd50ada38,
    0x0339c32a, 0xc6913667, 0x8df9317c, 0xe0b12b4f,
    0xf79e59b7, 0x43f5bb3a, 0xf2d519ff, 0x27d9459c,
    0xbf97222c, 0x15e6fc2a, 0x0f91fc71, 0x9b941525,
    0xfae59361, 0xceb69ceb, 0xc2a86459, 0x12baa8d1,
    0xb6c1075e, 0xe3056a0c, 0x10d25065, 0xcb03a442,
    0xe0ec6e0e, 0x1698db3b, 0x4c98a0be, 0x3278e964,
    0x9f1f9532, 0xe0d392df, 0xd3a0342b, 0x8971f21e,
    0x1b0a7441, 0x4ba3348c, 0xc5be7120, 0xc37632d8,
    0xdf359f8d, 0x9b992f2e, 0xe60b6f47, 0x0fe3f11d,
    0xe54cda54, 0x1edad891, 0xce6279cf, 0xcd3e7e6f,
    0x1618b166, 0xfd2c1d05, 0x848fd2c5, 0xf6fb2299,
    0xf523f357, 0xa6327623, 0x93a83531, 0x56cccd02,
    0xacf08162, 0x5a75ebb5, 0x6e163697, 0x88d273cc,
    0xde966292, 0x81b949d0, 0x4c50901b, 0x71c65614,
    0xe6c6c7bd, 0x327a140a, 0x45e1d006, 0xc3f27b9a,
    0xc9aa53fd, 0x62a80f00, 0xbb25bfe2, 0x35bdd2f6,
    0x71126905, 0xb2040222, 0xb6cbcf7c, 0xcd769c2b,
    0x53113ec0, 0x1640e3d3, 0x38abbd60, 0x2547adf0,
    0xba38209c, 0xf746ce76, 0x77afa1c5, 0x20756060,
    0x85cbfe4e, 0x8ae88dd8, 0x7aaaf9b0, 0x4cf9aa7e,
    0x1948c25c, 0x02fb8a8c, 0x01c36ae4, 0xd6ebe1f9,
    0x90d4f869, 0xa65cdea0, 0x3f09252d, 0xc208e69f,
    0xb74e6132, 0xce77e25b, 0x578fdfe3, 0x3ac372e6
  }
};
Commit	Line	Data
2dc68225	1	/*
	2	* blowfish
	3	*
	4	* Algorithm by Bruce Schneier 1995
	5	* This implementation adapted from a public domain version by Bruce
	6	* Schneier (1995) by Ian Jackson in 1997.
f0e54a99	7	*/
f0e54a99	8	/*
c07be359	9	* Copyright (C) 1997,2000,2003 Ian Jackson
c07be359	10	* This file is part of ipif, part of userv-utils
f0e54a99	11	*
	12	* This is free software; you can redistribute it and/or modify it
	13	* under the terms of the GNU General Public License as published by
	14	* the Free Software Foundation; either version 2 of the License, or
	15	* (at your option) any later version.
	16	*
	17	* This program is distributed in the hope that it will be useful, but
	18	* WITHOUT ANY WARRANTY; without even the implied warranty of
	19	* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
	20	* General Public License for more details.
	21	*
	22	* You should have received a copy of the GNU General Public License
	23	* along with userv-utils; if not, write to the Free Software
	24	* Foundation, 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
2dc68225	25	*/
	26
	27	/* TODO: test with zero length key */
	28	/* TODO: test with a through z as key and plain text */
2dc68225	29
	30	#include <assert.h>
	31	#include <string.h>
	32
	33	#include "blowfish.h"
	34
	35	static const blowfish__p init_p;
	36	static const blowfish__s init_s;
	37
	38	#define S(x,i) (ek->s[i][((x)>>((3-i)<<3))&0x0ff])
	39	#define F(x) (((S((x),0) + S((x),1)) ^ S((x),2)) + S((x),3))
	40	#define ROUND(a,b,n) ((a) ^= F((b)) ^ ek->p[(n)])
	41
	42	#define GETWORD(p) (((p)[0]<<24)\|((p)[1]<<16)\|((p)[2]<<8)\|((p)[3]))
	43	#define PUTWORD(w,p) ((p)[0]=(w)>>24,(p)[1]=(w)>>16,(p)[2]=(w)>>8,(p)[3]=(w))
	44
1fb3cba0	45	static void encipher(const struct blowfish_expandedkey *ek,
	46	uint32_t xlp, uint32_t xrp) {
	47	uint32_t xl, xr;
2dc68225	48
	49	xl= *xlp;
	50	xr= *xrp;
	51
	52	xl ^= ek->p[0];
	53	ROUND (xr, xl, 1); ROUND (xl, xr, 2);
	54	ROUND (xr, xl, 3); ROUND (xl, xr, 4);
	55	ROUND (xr, xl, 5); ROUND (xl, xr, 6);
	56	ROUND (xr, xl, 7); ROUND (xl, xr, 8);
	57	ROUND (xr, xl, 9); ROUND (xl, xr, 10);
	58	ROUND (xr, xl, 11); ROUND (xl, xr, 12);
	59	ROUND (xr, xl, 13); ROUND (xl, xr, 14);
	60	ROUND (xr, xl, 15); ROUND (xl, xr, 16);
	61	xr ^= ek->p[17];
	62
	63	*xrp= xl;
	64	*xlp= xr;
	65	}
	66
1fb3cba0	67	static void decipher(const struct blowfish_expandedkey *ek,
	68	uint32_t xlp, uint32_t xrp) {
	69	uint32_t xl, xr;
2dc68225	70
	71	xl= *xlp;
	72	xr= *xrp;
	73
	74	xl ^= ek->p[17];
	75	ROUND (xr, xl, 16); ROUND (xl, xr, 15);
	76	ROUND (xr, xl, 14); ROUND (xl, xr, 13);
	77	ROUND (xr, xl, 12); ROUND (xl, xr, 11);
	78	ROUND (xr, xl, 10); ROUND (xl, xr, 9);
	79	ROUND (xr, xl, 8); ROUND (xl, xr, 7);
	80	ROUND (xr, xl, 6); ROUND (xl, xr, 5);
	81	ROUND (xr, xl, 4); ROUND (xl, xr, 3);
	82	ROUND (xr, xl, 2); ROUND (xl, xr, 1);
	83	xr ^= ek->p[0];
	84
	85	*xlp= xr;
	86	*xrp= xl;
	87	}
	88
1fb3cba0	89	void blowfish_loadkey(struct blowfish_expandedkey *ek,
1fb3cba0	90	const uint8_t *key, int keybytes) {
2dc68225	91	int i, j;
1fb3cba0	92	uint32_t data, datal, datar;
2dc68225	93
	94	assert(keybytes>0 && keybytes<=BLOWFISH_MAXKEYBYTES);
	95	memcpy(ek->s,init_s,sizeof(ek->s));
	96
	97	for (i=0, j=0; i < BLOWFISH__PSIZE; i++) {
	98	data= (key[j]<<24)
	99	\| (key[(j+1)%keybytes]<<16)
	100	\| (key[(j+2)%keybytes]<<8)
	101	\| key[(j+3)%keybytes];
	102	ek->p[i]= init_p[i] ^ data;
	103	j = (j + 4) % keybytes;
	104	}
	105
	106	datal= 0x00000000;
	107	datar= 0x00000000;
	108
	109	for (i = 0; i < BLOWFISH__PSIZE; i += 2) {
	110	encipher(ek,&datal,&datar);
	111	ek->p[i]= datal;
	112	ek->p[i+1]= datar;
	113	}
	114
	115	for (i = 0; i < 4; ++i) {
	116	for (j = 0; j < 256; j += 2) {
	117	encipher(ek,&datal,&datar);
	118	ek->s[i][j]= datal;
	119	ek->s[i][j+1]= datar;
	120	}
	121	}
	122	}
	123
	124	void blowfish_encrypt(const struct blowfish_expandedkey *ek,
1fb3cba0	125	const uint8_t plain[], uint8_t cipher[]) {
1fb3cba0	126	uint32_t datal, datar;
2dc68225	127
	128	datal= GETWORD(plain);
	129	datar= GETWORD(plain+4);
	130	encipher(ek,&datal,&datar);
	131	PUTWORD(datal,cipher);
	132	PUTWORD(datar,cipher+4);
	133	}
	134
	135	void blowfish_decrypt(const struct blowfish_expandedkey *ek,
1fb3cba0	136	const uint8_t cipher[], uint8_t plain[]) {
1fb3cba0	137	uint32_t datal, datar;
2dc68225	138
	139	datal= GETWORD(cipher);
	140	datar= GETWORD(cipher+4);
	141	decipher(ek,&datal,&datar);
	142	PUTWORD(datal,plain);
	143	PUTWORD(datar,plain+4);
	144	}
	145
1fb3cba0	146	void blowfish_cbc_setiv(struct blowfish_cbc_state *cs, const uint8_t iv[]) {
2dc68225	147	cs->chainl= GETWORD(iv);
	148	cs->chainr= GETWORD(iv+4);
	149	}
	150
	151	void blowfish_cbc_encrypt(struct blowfish_cbc_state *cs,
1fb3cba0	152	const uint8_t plain[], uint8_t cipher[]) {
1fb3cba0	153	uint32_t datal, datar;
2dc68225	154
	155	datal= GETWORD(plain);
	156	datar= GETWORD(plain+4);
	157	datal ^= cs->chainl;
	158	datar ^= cs->chainr;
	159	encipher(&cs->ek,&datal,&datar);
	160	cs->chainl= datal;
	161	cs->chainr= datar;
	162	PUTWORD(datal,cipher);
	163	PUTWORD(datar,cipher+4);
	164	}
	165
	166	void blowfish_cbc_decrypt(struct blowfish_cbc_state *cs,
1fb3cba0	167	const uint8_t cipher[], uint8_t plain[]) {
1fb3cba0	168	uint32_t datal, datar, cipherl, cipherr;
2dc68225	169
	170	datal= GETWORD(cipher);
	171	datar= GETWORD(cipher+4);
	172	cipherl= datal;
	173	cipherr= datar;
	174	decipher(&cs->ek,&datal,&datar);
	175	datal ^= cs->chainl;
	176	datar ^= cs->chainr;
	177	cs->chainl= cipherl;
	178	cs->chainr= cipherr;
	179	PUTWORD(datal,plain);
	180	PUTWORD(datar,plain+4);
	181	}
	182
	183	static const blowfish__p init_p= {
	184	0x243f6a88, 0x85a308d3, 0x13198a2e, 0x03707344,
	185	0xa4093822, 0x299f31d0, 0x082efa98, 0xec4e6c89,
	186	0x452821e6, 0x38d01377, 0xbe5466cf, 0x34e90c6c,
	187	0xc0ac29b7, 0xc97c50dd, 0x3f84d5b5, 0xb5470917,
	188	0x9216d5d9, 0x8979fb1b
	189	};
	190
	191	static const blowfish__s init_s= {
	192	{
	193	0xd1310ba6, 0x98dfb5ac, 0x2ffd72db, 0xd01adfb7,
	194	0xb8e1afed, 0x6a267e96, 0xba7c9045, 0xf12c7f99,
	195	0x24a19947, 0xb3916cf7, 0x0801f2e2, 0x858efc16,
	196	0x636920d8, 0x71574e69, 0xa458fea3, 0xf4933d7e,
	197	0x0d95748f, 0x728eb658, 0x718bcd58, 0x82154aee,
	198	0x7b54a41d, 0xc25a59b5, 0x9c30d539, 0x2af26013,
	199	0xc5d1b023, 0x286085f0, 0xca417918, 0xb8db38ef,
	200	0x8e79dcb0, 0x603a180e, 0x6c9e0e8b, 0xb01e8a3e,
	201	0xd71577c1, 0xbd314b27, 0x78af2fda, 0x55605c60,
	202	0xe65525f3, 0xaa55ab94, 0x57489862, 0x63e81440,
	203	0x55ca396a, 0x2aab10b6, 0xb4cc5c34, 0x1141e8ce,
	204	0xa15486af, 0x7c72e993, 0xb3ee1411, 0x636fbc2a,
	205	0x2ba9c55d, 0x741831f6, 0xce5c3e16, 0x9b87931e,
	206	0xafd6ba33, 0x6c24cf5c, 0x7a325381, 0x28958677,
	207	0x3b8f4898, 0x6b4bb9af, 0xc4bfe81b, 0x66282193,
	208	0x61d809cc, 0xfb21a991, 0x487cac60, 0x5dec8032,
	209	0xef845d5d, 0xe98575b1, 0xdc262302, 0xeb651b88,
	210	0x23893e81, 0xd396acc5, 0x0f6d6ff3, 0x83f44239,
	211	0x2e0b4482, 0xa4842004, 0x69c8f04a, 0x9e1f9b5e,
	212	0x21c66842, 0xf6e96c9a, 0x670c9c61, 0xabd388f0,
	213	0x6a51a0d2, 0xd8542f68, 0x960fa728, 0xab5133a3,
	214	0x6eef0b6c, 0x137a3be4, 0xba3bf050, 0x7efb2a98,
	215	0xa1f1651d, 0x39af0176, 0x66ca593e, 0x82430e88,
	216	0x8cee8619, 0x456f9fb4, 0x7d84a5c3, 0x3b8b5ebe,
	217	0xe06f75d8, 0x85c12073, 0x401a449f, 0x56c16aa6,
	218	0x4ed3aa62, 0x363f7706, 0x1bfedf72, 0x429b023d,
	219	0x37d0d724, 0xd00a1248, 0xdb0fead3, 0x49f1c09b,
	220	0x075372c9, 0x80991b7b, 0x25d479d8, 0xf6e8def7,
	221	0xe3fe501a, 0xb6794c3b, 0x976ce0bd, 0x04c006ba,
	222	0xc1a94fb6, 0x409f60c4, 0x5e5c9ec2, 0x196a2463,
	223	0x68fb6faf, 0x3e6c53b5, 0x1339b2eb, 0x3b52ec6f,
	224	0x6dfc511f, 0x9b30952c, 0xcc814544, 0xaf5ebd09,
	225	0xbee3d004, 0xde334afd, 0x660f2807, 0x192e4bb3,
	226	0xc0cba857, 0x45c8740f, 0xd20b5f39, 0xb9d3fbdb,
	227	0x5579c0bd, 0x1a60320a, 0xd6a100c6, 0x402c7279,
	228	0x679f25fe, 0xfb1fa3cc, 0x8ea5e9f8, 0xdb3222f8,
	229	0x3c7516df, 0xfd616b15, 0x2f501ec8, 0xad0552ab,
	230	0x323db5fa, 0xfd238760, 0x53317b48, 0x3e00df82,
	231	0x9e5c57bb, 0xca6f8ca0, 0x1a87562e, 0xdf1769db,
	232	0xd542a8f6, 0x287effc3, 0xac6732c6, 0x8c4f5573,
233	0x695b27b0, 0xbbca58c8, 0xe1ffa35d, 0xb8f011a0,
234	0x10fa3d98, 0xfd2183b8, 0x4afcb56c, 0x2dd1d35b,
235	0x9a53e479, 0xb6f84565, 0xd28e49bc, 0x4bfb9790,
236	0xe1ddf2da, 0xa4cb7e33, 0x62fb1341, 0xcee4c6e8,
237	0xef20cada, 0x36774c01, 0xd07e9efe, 0x2bf11fb4,
238	0x95dbda4d, 0xae909198, 0xeaad8e71, 0x6b93d5a0,
239	0xd08ed1d0, 0xafc725e0, 0x8e3c5b2f, 0x8e7594b7,
240	0x8ff6e2fb, 0xf2122b64, 0x8888b812, 0x900df01c,
241	0x4fad5ea0, 0x688fc31c, 0xd1cff191, 0xb3a8c1ad,
242	0x2f2f2218, 0xbe0e1777, 0xea752dfe, 0x8b021fa1,
243	0xe5a0cc0f, 0xb56f74e8, 0x18acf3d6, 0xce89e299,
244	0xb4a84fe0, 0xfd13e0b7, 0x7cc43b81, 0xd2ada8d9,
245	0x165fa266, 0x80957705, 0x93cc7314, 0x211a1477,
246	0xe6ad2065, 0x77b5fa86, 0xc75442f5, 0xfb9d35cf,
247	0xebcdaf0c, 0x7b3e89a0, 0xd6411bd3, 0xae1e7e49,
248	0x00250e2d, 0x2071b35e, 0x226800bb, 0x57b8e0af,
249	0x2464369b, 0xf009b91e, 0x5563911d, 0x59dfa6aa,
250	0x78c14389, 0xd95a537f, 0x207d5ba2, 0x02e5b9c5,
251	0x83260376, 0x6295cfa9, 0x11c81968, 0x4e734a41,
252	0xb3472dca, 0x7b14a94a, 0x1b510052, 0x9a532915,
253	0xd60f573f, 0xbc9bc6e4, 0x2b60a476, 0x81e67400,
254	0x08ba6fb5, 0x571be91f, 0xf296ec6b, 0x2a0dd915,
255	0xb6636521, 0xe7b9f9b6, 0xff34052e, 0xc5855664,
256	0x53b02d5d, 0xa99f8fa1, 0x08ba4799, 0x6e85076a
257	}, {
258	0x4b7a70e9, 0xb5b32944, 0xdb75092e, 0xc4192623,
259	0xad6ea6b0, 0x49a7df7d, 0x9cee60b8, 0x8fedb266,
260	0xecaa8c71, 0x699a17ff, 0x5664526c, 0xc2b19ee1,
261	0x193602a5, 0x75094c29, 0xa0591340, 0xe4183a3e,
262	0x3f54989a, 0x5b429d65, 0x6b8fe4d6, 0x99f73fd6,
263	0xa1d29c07, 0xefe830f5, 0x4d2d38e6, 0xf0255dc1,
264	0x4cdd2086, 0x8470eb26, 0x6382e9c6, 0x021ecc5e,
265	0x09686b3f, 0x3ebaefc9, 0x3c971814, 0x6b6a70a1,
266	0x687f3584, 0x52a0e286, 0xb79c5305, 0xaa500737,
267	0x3e07841c, 0x7fdeae5c, 0x8e7d44ec, 0x5716f2b8,
268	0xb03ada37, 0xf0500c0d, 0xf01c1f04, 0x0200b3ff,
269	0xae0cf51a, 0x3cb574b2, 0x25837a58, 0xdc0921bd,
270	0xd19113f9, 0x7ca92ff6, 0x94324773, 0x22f54701,
271	0x3ae5e581, 0x37c2dadc, 0xc8b57634, 0x9af3dda7,
272	0xa9446146, 0x0fd0030e, 0xecc8c73e, 0xa4751e41,
273	0xe238cd99, 0x3bea0e2f, 0x3280bba1, 0x183eb331,
274	0x4e548b38, 0x4f6db908, 0x6f420d03, 0xf60a04bf,
275	0x2cb81290, 0x24977c79, 0x5679b072, 0xbcaf89af,
276	0xde9a771f, 0xd9930810, 0xb38bae12, 0xdccf3f2e,
277	0x5512721f, 0x2e6b7124, 0x501adde6, 0x9f84cd87,
278	0x7a584718, 0x7408da17, 0xbc9f9abc, 0xe94b7d8c,
279	0xec7aec3a, 0xdb851dfa, 0x63094366, 0xc464c3d2,
280	0xef1c1847, 0x3215d908, 0xdd433b37, 0x24c2ba16,
281	0x12a14d43, 0x2a65c451, 0x50940002, 0x133ae4dd,
282	0x71dff89e, 0x10314e55, 0x81ac77d6, 0x5f11199b,
283	0x043556f1, 0xd7a3c76b, 0x3c11183b, 0x5924a509,
284	0xf28fe6ed, 0x97f1fbfa, 0x9ebabf2c, 0x1e153c6e,
285	0x86e34570, 0xeae96fb1, 0x860e5e0a, 0x5a3e2ab3,
286	0x771fe71c, 0x4e3d06fa, 0x2965dcb9, 0x99e71d0f,
287	0x803e89d6, 0x5266c825, 0x2e4cc978, 0x9c10b36a,
288	0xc6150eba, 0x94e2ea78, 0xa5fc3c53, 0x1e0a2df4,
289	0xf2f74ea7, 0x361d2b3d, 0x1939260f, 0x19c27960,
290	0x5223a708, 0xf71312b6, 0xebadfe6e, 0xeac31f66,
291	0xe3bc4595, 0xa67bc883, 0xb17f37d1, 0x018cff28,
292	0xc332ddef, 0xbe6c5aa5, 0x65582185, 0x68ab9802,
293	0xeecea50f, 0xdb2f953b, 0x2aef7dad, 0x5b6e2f84,
294	0x1521b628, 0x29076170, 0xecdd4775, 0x619f1510,
295	0x13cca830, 0xeb61bd96, 0x0334fe1e, 0xaa0363cf,
296	0xb5735c90, 0x4c70a239, 0xd59e9e0b, 0xcbaade14,
297	0xeecc86bc, 0x60622ca7, 0x9cab5cab, 0xb2f3846e,
298	0x648b1eaf, 0x19bdf0ca, 0xa02369b9, 0x655abb50,
299	0x40685a32, 0x3c2ab4b3, 0x319ee9d5, 0xc021b8f7,
300	0x9b540b19, 0x875fa099, 0x95f7997e, 0x623d7da8,
301	0xf837889a, 0x97e32d77, 0x11ed935f, 0x16681281,
302	0x0e358829, 0xc7e61fd6, 0x96dedfa1, 0x7858ba99,
303	0x57f584a5, 0x1b227263, 0x9b83c3ff, 0x1ac24696,
304	0xcdb30aeb, 0x532e3054, 0x8fd948e4, 0x6dbc3128,
305	0x58ebf2ef, 0x34c6ffea, 0xfe28ed61, 0xee7c3c73,
306	0x5d4a14d9, 0xe864b7e3, 0x42105d14, 0x203e13e0,
307	0x45eee2b6, 0xa3aaabea, 0xdb6c4f15, 0xfacb4fd0,
308	0xc742f442, 0xef6abbb5, 0x654f3b1d, 0x41cd2105,
309	0xd81e799e, 0x86854dc7, 0xe44b476a, 0x3d816250,
310	0xcf62a1f2, 0x5b8d2646, 0xfc8883a0, 0xc1c7b6a3,
311	0x7f1524c3, 0x69cb7492, 0x47848a0b, 0x5692b285,
312	0x095bbf00, 0xad19489d, 0x1462b174, 0x23820e00,
313	0x58428d2a, 0x0c55f5ea, 0x1dadf43e, 0x233f7061,
314	0x3372f092, 0x8d937e41, 0xd65fecf1, 0x6c223bdb,
315	0x7cde3759, 0xcbee7460, 0x4085f2a7, 0xce77326e,
316	0xa6078084, 0x19f8509e, 0xe8efd855, 0x61d99735,
317	0xa969a7aa, 0xc50c06c2, 0x5a04abfc, 0x800bcadc,
318	0x9e447a2e, 0xc3453484, 0xfdd56705, 0x0e1e9ec9,
319	0xdb73dbd3, 0x105588cd, 0x675fda79, 0xe3674340,
320	0xc5c43465, 0x713e38d8, 0x3d28f89e, 0xf16dff20,
321	0x153e21e7, 0x8fb03d4a, 0xe6e39f2b, 0xdb83adf7
322	}, {
323	0xe93d5a68, 0x948140f7, 0xf64c261c, 0x94692934,
324	0x411520f7, 0x7602d4f7, 0xbcf46b2e, 0xd4a20068,
325	0xd4082471, 0x3320f46a, 0x43b7d4b7, 0x500061af,
326	0x1e39f62e, 0x97244546, 0x14214f74, 0xbf8b8840,
327	0x4d95fc1d, 0x96b591af, 0x70f4ddd3, 0x66a02f45,
328	0xbfbc09ec, 0x03bd9785, 0x7fac6dd0, 0x31cb8504,
329	0x96eb27b3, 0x55fd3941, 0xda2547e6, 0xabca0a9a,
330	0x28507825, 0x530429f4, 0x0a2c86da, 0xe9b66dfb,
331	0x68dc1462, 0xd7486900, 0x680ec0a4, 0x27a18dee,
332	0x4f3ffea2, 0xe887ad8c, 0xb58ce006, 0x7af4d6b6,
333	0xaace1e7c, 0xd3375fec, 0xce78a399, 0x406b2a42,
334	0x20fe9e35, 0xd9f385b9, 0xee39d7ab, 0x3b124e8b,
335	0x1dc9faf7, 0x4b6d1856, 0x26a36631, 0xeae397b2,
336	0x3a6efa74, 0xdd5b4332, 0x6841e7f7, 0xca7820fb,
337	0xfb0af54e, 0xd8feb397, 0x454056ac, 0xba489527,
338	0x55533a3a, 0x20838d87, 0xfe6ba9b7, 0xd096954b,
339	0x55a867bc, 0xa1159a58, 0xcca92963, 0x99e1db33,
340	0xa62a4a56, 0x3f3125f9, 0x5ef47e1c, 0x9029317c,
341	0xfdf8e802, 0x04272f70, 0x80bb155c, 0x05282ce3,
342	0x95c11548, 0xe4c66d22, 0x48c1133f, 0xc70f86dc,
343	0x07f9c9ee, 0x41041f0f, 0x404779a4, 0x5d886e17,
344	0x325f51eb, 0xd59bc0d1, 0xf2bcc18f, 0x41113564,
345	0x257b7834, 0x602a9c60, 0xdff8e8a3, 0x1f636c1b,
346	0x0e12b4c2, 0x02e1329e, 0xaf664fd1, 0xcad18115,
347	0x6b2395e0, 0x333e92e1, 0x3b240b62, 0xeebeb922,
348	0x85b2a20e, 0xe6ba0d99, 0xde720c8c, 0x2da2f728,
349	0xd0127845, 0x95b794fd, 0x647d0862, 0xe7ccf5f0,
350	0x5449a36f, 0x877d48fa, 0xc39dfd27, 0xf33e8d1e,
351	0x0a476341, 0x992eff74, 0x3a6f6eab, 0xf4f8fd37,
352	0xa812dc60, 0xa1ebddf8, 0x991be14c, 0xdb6e6b0d,
353	0xc67b5510, 0x6d672c37, 0x2765d43b, 0xdcd0e804,
354	0xf1290dc7, 0xcc00ffa3, 0xb5390f92, 0x690fed0b,
355	0x667b9ffb, 0xcedb7d9c, 0xa091cf0b, 0xd9155ea3,
356	0xbb132f88, 0x515bad24, 0x7b9479bf, 0x763bd6eb,
357	0x37392eb3, 0xcc115979, 0x8026e297, 0xf42e312d,
358	0x6842ada7, 0xc66a2b3b, 0x12754ccc, 0x782ef11c,
359	0x6a124237, 0xb79251e7, 0x06a1bbe6, 0x4bfb6350,
360	0x1a6b1018, 0x11caedfa, 0x3d25bdd8, 0xe2e1c3c9,
361	0x44421659, 0x0a121386, 0xd90cec6e, 0xd5abea2a,
362	0x64af674e, 0xda86a85f, 0xbebfe988, 0x64e4c3fe,
363	0x9dbc8057, 0xf0f7c086, 0x60787bf8, 0x6003604d,
364	0xd1fd8346, 0xf6381fb0, 0x7745ae04, 0xd736fccc,
365	0x83426b33, 0xf01eab71, 0xb0804187, 0x3c005e5f,
366	0x77a057be, 0xbde8ae24, 0x55464299, 0xbf582e61,
367	0x4e58f48f, 0xf2ddfda2, 0xf474ef38, 0x8789bdc2,
368	0x5366f9c3, 0xc8b38e74, 0xb475f255, 0x46fcd9b9,
369	0x7aeb2661, 0x8b1ddf84, 0x846a0e79, 0x915f95e2,
370	0x466e598e, 0x20b45770, 0x8cd55591, 0xc902de4c,
371	0xb90bace1, 0xbb8205d0, 0x11a86248, 0x7574a99e,
372	0xb77f19b6, 0xe0a9dc09, 0x662d09a1, 0xc4324633,
373	0xe85a1f02, 0x09f0be8c, 0x4a99a025, 0x1d6efe10,
374	0x1ab93d1d, 0x0ba5a4df, 0xa186f20f, 0x2868f169,
375	0xdcb7da83, 0x573906fe, 0xa1e2ce9b, 0x4fcd7f52,
376	0x50115e01, 0xa70683fa, 0xa002b5c4, 0x0de6d027,
377	0x9af88c27, 0x773f8641, 0xc3604c06, 0x61a806b5,
378	0xf0177a28, 0xc0f586e0, 0x006058aa, 0x30dc7d62,
379	0x11e69ed7, 0x2338ea63, 0x53c2dd94, 0xc2c21634,
380	0xbbcbee56, 0x90bcb6de, 0xebfc7da1, 0xce591d76,
381	0x6f05e409, 0x4b7c0188, 0x39720a3d, 0x7c927c24,
382	0x86e3725f, 0x724d9db9, 0x1ac15bb4, 0xd39eb8fc,
383	0xed545578, 0x08fca5b5, 0xd83d7cd3, 0x4dad0fc4,
384	0x1e50ef5e, 0xb161e6f8, 0xa28514d9, 0x6c51133c,
385	0x6fd5c7e7, 0x56e14ec4, 0x362abfce, 0xddc6c837,
386	0xd79a3234, 0x92638212, 0x670efa8e, 0x406000e0
387	}, {
388	0x3a39ce37, 0xd3faf5cf, 0xabc27737, 0x5ac52d1b,
389	0x5cb0679e, 0x4fa33742, 0xd3822740, 0x99bc9bbe,
390	0xd5118e9d, 0xbf0f7315, 0xd62d1c7e, 0xc700c47b,
391	0xb78c1b6b, 0x21a19045, 0xb26eb1be, 0x6a366eb4,
392	0x5748ab2f, 0xbc946e79, 0xc6a376d2, 0x6549c2c8,
393	0x530ff8ee, 0x468dde7d, 0xd5730a1d, 0x4cd04dc6,
394	0x2939bbdb, 0xa9ba4650, 0xac9526e8, 0xbe5ee304,
395	0xa1fad5f0, 0x6a2d519a, 0x63ef8ce2, 0x9a86ee22,
396	0xc089c2b8, 0x43242ef6, 0xa51e03aa, 0x9cf2d0a4,
397	0x83c061ba, 0x9be96a4d, 0x8fe51550, 0xba645bd6,
398	0x2826a2f9, 0xa73a3ae1, 0x4ba99586, 0xef5562e9,
399	0xc72fefd3, 0xf752f7da, 0x3f046f69, 0x77fa0a59,
400	0x80e4a915, 0x87b08601, 0x9b09e6ad, 0x3b3ee593,
401	0xe990fd5a, 0x9e34d797, 0x2cf0b7d9, 0x022b8b51,
402	0x96d5ac3a, 0x017da67d, 0xd1cf3ed6, 0x7c7d2d28,
403	0x1f9f25cf, 0xadf2b89b, 0x5ad6b472, 0x5a88f54c,
404	0xe029ac71, 0xe019a5e6, 0x47b0acfd, 0xed93fa9b,
405	0xe8d3c48d, 0x283b57cc, 0xf8d56629, 0x79132e28,
406	0x785f0191, 0xed756055, 0xf7960e44, 0xe3d35e8c,
407	0x15056dd4, 0x88f46dba, 0x03a16125, 0x0564f0bd,
408	0xc3eb9e15, 0x3c9057a2, 0x97271aec, 0xa93a072a,
409	0x1b3f6d9b, 0x1e6321f5, 0xf59c66fb, 0x26dcf319,
410	0x7533d928, 0xb155fdf5, 0x03563482, 0x8aba3cbb,
411	0x28517711, 0xc20ad9f8, 0xabcc5167, 0xccad925f,
412	0x4de81751, 0x3830dc8e, 0x379d5862, 0x9320f991,
413	0xea7a90c2, 0xfb3e7bce, 0x5121ce64, 0x774fbe32,
414	0xa8b6e37e, 0xc3293d46, 0x48de5369, 0x6413e680,
415	0xa2ae0810, 0xdd6db224, 0x69852dfd, 0x09072166,
416	0xb39a460a, 0x6445c0dd, 0x586cdecf, 0x1c20c8ae,
417	0x5bbef7dd, 0x1b588d40, 0xccd2017f, 0x6bb4e3bb,
418	0xdda26a7e, 0x3a59ff45, 0x3e350a44, 0xbcb4cdd5,
419	0x72eacea8, 0xfa6484bb, 0x8d6612ae, 0xbf3c6f47,
420	0xd29be463, 0x542f5d9e, 0xaec2771b, 0xf64e6370,
421	0x740e0d8d, 0xe75b1357, 0xf8721671, 0xaf537d5d,
422	0x4040cb08, 0x4eb4e2cc, 0x34d2466a, 0x0115af84,
423	0xe1b00428, 0x95983a1d, 0x06b89fb4, 0xce6ea048,
424	0x6f3f3b82, 0x3520ab82, 0x011a1d4b, 0x277227f8,
425	0x611560b1, 0xe7933fdc, 0xbb3a792b, 0x344525bd,
426	0xa08839e1, 0x51ce794b, 0x2f32c9b7, 0xa01fbac9,
427	0xe01cc87e, 0xbcc7d1f6, 0xcf0111c3, 0xa1e8aac7,
428	0x1a908749, 0xd44fbd9a, 0xd0dadecb, 0xd50ada38,
429	0x0339c32a, 0xc6913667, 0x8df9317c, 0xe0b12b4f,
430	0xf79e59b7, 0x43f5bb3a, 0xf2d519ff, 0x27d9459c,
431	0xbf97222c, 0x15e6fc2a, 0x0f91fc71, 0x9b941525,
432	0xfae59361, 0xceb69ceb, 0xc2a86459, 0x12baa8d1,
433	0xb6c1075e, 0xe3056a0c, 0x10d25065, 0xcb03a442,
434	0xe0ec6e0e, 0x1698db3b, 0x4c98a0be, 0x3278e964,
435	0x9f1f9532, 0xe0d392df, 0xd3a0342b, 0x8971f21e,
436	0x1b0a7441, 0x4ba3348c, 0xc5be7120, 0xc37632d8,
437	0xdf359f8d, 0x9b992f2e, 0xe60b6f47, 0x0fe3f11d,
438	0xe54cda54, 0x1edad891, 0xce6279cf, 0xcd3e7e6f,
439	0x1618b166, 0xfd2c1d05, 0x848fd2c5, 0xf6fb2299,
440	0xf523f357, 0xa6327623, 0x93a83531, 0x56cccd02,
441	0xacf08162, 0x5a75ebb5, 0x6e163697, 0x88d273cc,
442	0xde966292, 0x81b949d0, 0x4c50901b, 0x71c65614,
443	0xe6c6c7bd, 0x327a140a, 0x45e1d006, 0xc3f27b9a,
444	0xc9aa53fd, 0x62a80f00, 0xbb25bfe2, 0x35bdd2f6,
445	0x71126905, 0xb2040222, 0xb6cbcf7c, 0xcd769c2b,
446	0x53113ec0, 0x1640e3d3, 0x38abbd60, 0x2547adf0,
447	0xba38209c, 0xf746ce76, 0x77afa1c5, 0x20756060,
448	0x85cbfe4e, 0x8ae88dd8, 0x7aaaf9b0, 0x4cf9aa7e,
449	0x1948c25c, 0x02fb8a8c, 0x01c36ae4, 0xd6ebe1f9,
450	0x90d4f869, 0xa65cdea0, 0x3f09252d, 0xc208e69f,
451	0xb74e6132, 0xce77e25b, 0x578fdfe3, 0x3ac372e6
452	}
453	};