00001 <?php
00002
00020
00021
00022 class Horde_Cipher_blowfish {
00023
00024
00025 var $p = array(
00026 0x243F6A88, 0x85A308D3, 0x13198A2E, 0x03707344,
00027 0xA4093822, 0x299F31D0, 0x082EFA98, 0xEC4E6C89,
00028 0x452821E6, 0x38D01377, 0xBE5466CF, 0x34E90C6C,
00029 0xC0AC29B7, 0xC97C50DD, 0x3F84D5B5, 0xB5470917,
00030 0x9216D5D9, 0x8979FB1B);
00031
00032
00033 var $s1 = array(
00034 0xD1310BA6, 0x98DFB5AC, 0x2FFD72DB, 0xD01ADFB7,
00035 0xB8E1AFED, 0x6A267E96, 0xBA7C9045, 0xF12C7F99,
00036 0x24A19947, 0xB3916CF7, 0x0801F2E2, 0x858EFC16,
00037 0x636920D8, 0x71574E69, 0xA458FEA3, 0xF4933D7E,
00038 0x0D95748F, 0x728EB658, 0x718BCD58, 0x82154AEE,
00039 0x7B54A41D, 0xC25A59B5, 0x9C30D539, 0x2AF26013,
00040 0xC5D1B023, 0x286085F0, 0xCA417918, 0xB8DB38EF,
00041 0x8E79DCB0, 0x603A180E, 0x6C9E0E8B, 0xB01E8A3E,
00042 0xD71577C1, 0xBD314B27, 0x78AF2FDA, 0x55605C60,
00043 0xE65525F3, 0xAA55AB94, 0x57489862, 0x63E81440,
00044 0x55CA396A, 0x2AAB10B6, 0xB4CC5C34, 0x1141E8CE,
00045 0xA15486AF, 0x7C72E993, 0xB3EE1411, 0x636FBC2A,
00046 0x2BA9C55D, 0x741831F6, 0xCE5C3E16, 0x9B87931E,
00047 0xAFD6BA33, 0x6C24CF5C, 0x7A325381, 0x28958677,
00048 0x3B8F4898, 0x6B4BB9AF, 0xC4BFE81B, 0x66282193,
00049 0x61D809CC, 0xFB21A991, 0x487CAC60, 0x5DEC8032,
00050 0xEF845D5D, 0xE98575B1, 0xDC262302, 0xEB651B88,
00051 0x23893E81, 0xD396ACC5, 0x0F6D6FF3, 0x83F44239,
00052 0x2E0B4482, 0xA4842004, 0x69C8F04A, 0x9E1F9B5E,
00053 0x21C66842, 0xF6E96C9A, 0x670C9C61, 0xABD388F0,
00054 0x6A51A0D2, 0xD8542F68, 0x960FA728, 0xAB5133A3,
00055 0x6EEF0B6C, 0x137A3BE4, 0xBA3BF050, 0x7EFB2A98,
00056 0xA1F1651D, 0x39AF0176, 0x66CA593E, 0x82430E88,
00057 0x8CEE8619, 0x456F9FB4, 0x7D84A5C3, 0x3B8B5EBE,
00058 0xE06F75D8, 0x85C12073, 0x401A449F, 0x56C16AA6,
00059 0x4ED3AA62, 0x363F7706, 0x1BFEDF72, 0x429B023D,
00060 0x37D0D724, 0xD00A1248, 0xDB0FEAD3, 0x49F1C09B,
00061 0x075372C9, 0x80991B7B, 0x25D479D8, 0xF6E8DEF7,
00062 0xE3FE501A, 0xB6794C3B, 0x976CE0BD, 0x04C006BA,
00063 0xC1A94FB6, 0x409F60C4, 0x5E5C9EC2, 0x196A2463,
00064 0x68FB6FAF, 0x3E6C53B5, 0x1339B2EB, 0x3B52EC6F,
00065 0x6DFC511F, 0x9B30952C, 0xCC814544, 0xAF5EBD09,
00066 0xBEE3D004, 0xDE334AFD, 0x660F2807, 0x192E4BB3,
00067 0xC0CBA857, 0x45C8740F, 0xD20B5F39, 0xB9D3FBDB,
00068 0x5579C0BD, 0x1A60320A, 0xD6A100C6, 0x402C7279,
00069 0x679F25FE, 0xFB1FA3CC, 0x8EA5E9F8, 0xDB3222F8,
00070 0x3C7516DF, 0xFD616B15, 0x2F501EC8, 0xAD0552AB,
00071 0x323DB5FA, 0xFD238760, 0x53317B48, 0x3E00DF82,
00072 0x9E5C57BB, 0xCA6F8CA0, 0x1A87562E, 0xDF1769DB,
00073 0xD542A8F6, 0x287EFFC3, 0xAC6732C6, 0x8C4F5573,
00074 0x695B27B0, 0xBBCA58C8, 0xE1FFA35D, 0xB8F011A0,
00075 0x10FA3D98, 0xFD2183B8, 0x4AFCB56C, 0x2DD1D35B,
00076 0x9A53E479, 0xB6F84565, 0xD28E49BC, 0x4BFB9790,
00077 0xE1DDF2DA, 0xA4CB7E33, 0x62FB1341, 0xCEE4C6E8,
00078 0xEF20CADA, 0x36774C01, 0xD07E9EFE, 0x2BF11FB4,
00079 0x95DBDA4D, 0xAE909198, 0xEAAD8E71, 0x6B93D5A0,
00080 0xD08ED1D0, 0xAFC725E0, 0x8E3C5B2F, 0x8E7594B7,
00081 0x8FF6E2FB, 0xF2122B64, 0x8888B812, 0x900DF01C,
00082 0x4FAD5EA0, 0x688FC31C, 0xD1CFF191, 0xB3A8C1AD,
00083 0x2F2F2218, 0xBE0E1777, 0xEA752DFE, 0x8B021FA1,
00084 0xE5A0CC0F, 0xB56F74E8, 0x18ACF3D6, 0xCE89E299,
00085 0xB4A84FE0, 0xFD13E0B7, 0x7CC43B81, 0xD2ADA8D9,
00086 0x165FA266, 0x80957705, 0x93CC7314, 0x211A1477,
00087 0xE6AD2065, 0x77B5FA86, 0xC75442F5, 0xFB9D35CF,
00088 0xEBCDAF0C, 0x7B3E89A0, 0xD6411BD3, 0xAE1E7E49,
00089 0x00250E2D, 0x2071B35E, 0x226800BB, 0x57B8E0AF,
00090 0x2464369B, 0xF009B91E, 0x5563911D, 0x59DFA6AA,
00091 0x78C14389, 0xD95A537F, 0x207D5BA2, 0x02E5B9C5,
00092 0x83260376, 0x6295CFA9, 0x11C81968, 0x4E734A41,
00093 0xB3472DCA, 0x7B14A94A, 0x1B510052, 0x9A532915,
00094 0xD60F573F, 0xBC9BC6E4, 0x2B60A476, 0x81E67400,
00095 0x08BA6FB5, 0x571BE91F, 0xF296EC6B, 0x2A0DD915,
00096 0xB6636521, 0xE7B9F9B6, 0xFF34052E, 0xC5855664,
00097 0x53B02D5D, 0xA99F8FA1, 0x08BA4799, 0x6E85076A);
00098 var $s2 = array(
00099 0x4B7A70E9, 0xB5B32944, 0xDB75092E, 0xC4192623,
00100 0xAD6EA6B0, 0x49A7DF7D, 0x9CEE60B8, 0x8FEDB266,
00101 0xECAA8C71, 0x699A17FF, 0x5664526C, 0xC2B19EE1,
00102 0x193602A5, 0x75094C29, 0xA0591340, 0xE4183A3E,
00103 0x3F54989A, 0x5B429D65, 0x6B8FE4D6, 0x99F73FD6,
00104 0xA1D29C07, 0xEFE830F5, 0x4D2D38E6, 0xF0255DC1,
00105 0x4CDD2086, 0x8470EB26, 0x6382E9C6, 0x021ECC5E,
00106 0x09686B3F, 0x3EBAEFC9, 0x3C971814, 0x6B6A70A1,
00107 0x687F3584, 0x52A0E286, 0xB79C5305, 0xAA500737,
00108 0x3E07841C, 0x7FDEAE5C, 0x8E7D44EC, 0x5716F2B8,
00109 0xB03ADA37, 0xF0500C0D, 0xF01C1F04, 0x0200B3FF,
00110 0xAE0CF51A, 0x3CB574B2, 0x25837A58, 0xDC0921BD,
00111 0xD19113F9, 0x7CA92FF6, 0x94324773, 0x22F54701,
00112 0x3AE5E581, 0x37C2DADC, 0xC8B57634, 0x9AF3DDA7,
00113 0xA9446146, 0x0FD0030E, 0xECC8C73E, 0xA4751E41,
00114 0xE238CD99, 0x3BEA0E2F, 0x3280BBA1, 0x183EB331,
00115 0x4E548B38, 0x4F6DB908, 0x6F420D03, 0xF60A04BF,
00116 0x2CB81290, 0x24977C79, 0x5679B072, 0xBCAF89AF,
00117 0xDE9A771F, 0xD9930810, 0xB38BAE12, 0xDCCF3F2E,
00118 0x5512721F, 0x2E6B7124, 0x501ADDE6, 0x9F84CD87,
00119 0x7A584718, 0x7408DA17, 0xBC9F9ABC, 0xE94B7D8C,
00120 0xEC7AEC3A, 0xDB851DFA, 0x63094366, 0xC464C3D2,
00121 0xEF1C1847, 0x3215D908, 0xDD433B37, 0x24C2BA16,
00122 0x12A14D43, 0x2A65C451, 0x50940002, 0x133AE4DD,
00123 0x71DFF89E, 0x10314E55, 0x81AC77D6, 0x5F11199B,
00124 0x043556F1, 0xD7A3C76B, 0x3C11183B, 0x5924A509,
00125 0xF28FE6ED, 0x97F1FBFA, 0x9EBABF2C, 0x1E153C6E,
00126 0x86E34570, 0xEAE96FB1, 0x860E5E0A, 0x5A3E2AB3,
00127 0x771FE71C, 0x4E3D06FA, 0x2965DCB9, 0x99E71D0F,
00128 0x803E89D6, 0x5266C825, 0x2E4CC978, 0x9C10B36A,
00129 0xC6150EBA, 0x94E2EA78, 0xA5FC3C53, 0x1E0A2DF4,
00130 0xF2F74EA7, 0x361D2B3D, 0x1939260F, 0x19C27960,
00131 0x5223A708, 0xF71312B6, 0xEBADFE6E, 0xEAC31F66,
00132 0xE3BC4595, 0xA67BC883, 0xB17F37D1, 0x018CFF28,
00133 0xC332DDEF, 0xBE6C5AA5, 0x65582185, 0x68AB9802,
00134 0xEECEA50F, 0xDB2F953B, 0x2AEF7DAD, 0x5B6E2F84,
00135 0x1521B628, 0x29076170, 0xECDD4775, 0x619F1510,
00136 0x13CCA830, 0xEB61BD96, 0x0334FE1E, 0xAA0363CF,
00137 0xB5735C90, 0x4C70A239, 0xD59E9E0B, 0xCBAADE14,
00138 0xEECC86BC, 0x60622CA7, 0x9CAB5CAB, 0xB2F3846E,
00139 0x648B1EAF, 0x19BDF0CA, 0xA02369B9, 0x655ABB50,
00140 0x40685A32, 0x3C2AB4B3, 0x319EE9D5, 0xC021B8F7,
00141 0x9B540B19, 0x875FA099, 0x95F7997E, 0x623D7DA8,
00142 0xF837889A, 0x97E32D77, 0x11ED935F, 0x16681281,
00143 0x0E358829, 0xC7E61FD6, 0x96DEDFA1, 0x7858BA99,
00144 0x57F584A5, 0x1B227263, 0x9B83C3FF, 0x1AC24696,
00145 0xCDB30AEB, 0x532E3054, 0x8FD948E4, 0x6DBC3128,
00146 0x58EBF2EF, 0x34C6FFEA, 0xFE28ED61, 0xEE7C3C73,
00147 0x5D4A14D9, 0xE864B7E3, 0x42105D14, 0x203E13E0,
00148 0x45EEE2B6, 0xA3AAABEA, 0xDB6C4F15, 0xFACB4FD0,
00149 0xC742F442, 0xEF6ABBB5, 0x654F3B1D, 0x41CD2105,
00150 0xD81E799E, 0x86854DC7, 0xE44B476A, 0x3D816250,
00151 0xCF62A1F2, 0x5B8D2646, 0xFC8883A0, 0xC1C7B6A3,
00152 0x7F1524C3, 0x69CB7492, 0x47848A0B, 0x5692B285,
00153 0x095BBF00, 0xAD19489D, 0x1462B174, 0x23820E00,
00154 0x58428D2A, 0x0C55F5EA, 0x1DADF43E, 0x233F7061,
00155 0x3372F092, 0x8D937E41, 0xD65FECF1, 0x6C223BDB,
00156 0x7CDE3759, 0xCBEE7460, 0x4085F2A7, 0xCE77326E,
00157 0xA6078084, 0x19F8509E, 0xE8EFD855, 0x61D99735,
00158 0xA969A7AA, 0xC50C06C2, 0x5A04ABFC, 0x800BCADC,
00159 0x9E447A2E, 0xC3453484, 0xFDD56705, 0x0E1E9EC9,
00160 0xDB73DBD3, 0x105588CD, 0x675FDA79, 0xE3674340,
00161 0xC5C43465, 0x713E38D8, 0x3D28F89E, 0xF16DFF20,
00162 0x153E21E7, 0x8FB03D4A, 0xE6E39F2B, 0xDB83ADF7);
00163 var $s3 = array(
00164 0xE93D5A68, 0x948140F7, 0xF64C261C, 0x94692934,
00165 0x411520F7, 0x7602D4F7, 0xBCF46B2E, 0xD4A20068,
00166 0xD4082471, 0x3320F46A, 0x43B7D4B7, 0x500061AF,
00167 0x1E39F62E, 0x97244546, 0x14214F74, 0xBF8B8840,
00168 0x4D95FC1D, 0x96B591AF, 0x70F4DDD3, 0x66A02F45,
00169 0xBFBC09EC, 0x03BD9785, 0x7FAC6DD0, 0x31CB8504,
00170 0x96EB27B3, 0x55FD3941, 0xDA2547E6, 0xABCA0A9A,
00171 0x28507825, 0x530429F4, 0x0A2C86DA, 0xE9B66DFB,
00172 0x68DC1462, 0xD7486900, 0x680EC0A4, 0x27A18DEE,
00173 0x4F3FFEA2, 0xE887AD8C, 0xB58CE006, 0x7AF4D6B6,
00174 0xAACE1E7C, 0xD3375FEC, 0xCE78A399, 0x406B2A42,
00175 0x20FE9E35, 0xD9F385B9, 0xEE39D7AB, 0x3B124E8B,
00176 0x1DC9FAF7, 0x4B6D1856, 0x26A36631, 0xEAE397B2,
00177 0x3A6EFA74, 0xDD5B4332, 0x6841E7F7, 0xCA7820FB,
00178 0xFB0AF54E, 0xD8FEB397, 0x454056AC, 0xBA489527,
00179 0x55533A3A, 0x20838D87, 0xFE6BA9B7, 0xD096954B,
00180 0x55A867BC, 0xA1159A58, 0xCCA92963, 0x99E1DB33,
00181 0xA62A4A56, 0x3F3125F9, 0x5EF47E1C, 0x9029317C,
00182 0xFDF8E802, 0x04272F70, 0x80BB155C, 0x05282CE3,
00183 0x95C11548, 0xE4C66D22, 0x48C1133F, 0xC70F86DC,
00184 0x07F9C9EE, 0x41041F0F, 0x404779A4, 0x5D886E17,
00185 0x325F51EB, 0xD59BC0D1, 0xF2BCC18F, 0x41113564,
00186 0x257B7834, 0x602A9C60, 0xDFF8E8A3, 0x1F636C1B,
00187 0x0E12B4C2, 0x02E1329E, 0xAF664FD1, 0xCAD18115,
00188 0x6B2395E0, 0x333E92E1, 0x3B240B62, 0xEEBEB922,
00189 0x85B2A20E, 0xE6BA0D99, 0xDE720C8C, 0x2DA2F728,
00190 0xD0127845, 0x95B794FD, 0x647D0862, 0xE7CCF5F0,
00191 0x5449A36F, 0x877D48FA, 0xC39DFD27, 0xF33E8D1E,
00192 0x0A476341, 0x992EFF74, 0x3A6F6EAB, 0xF4F8FD37,
00193 0xA812DC60, 0xA1EBDDF8, 0x991BE14C, 0xDB6E6B0D,
00194 0xC67B5510, 0x6D672C37, 0x2765D43B, 0xDCD0E804,
00195 0xF1290DC7, 0xCC00FFA3, 0xB5390F92, 0x690FED0B,
00196 0x667B9FFB, 0xCEDB7D9C, 0xA091CF0B, 0xD9155EA3,
00197 0xBB132F88, 0x515BAD24, 0x7B9479BF, 0x763BD6EB,
00198 0x37392EB3, 0xCC115979, 0x8026E297, 0xF42E312D,
00199 0x6842ADA7, 0xC66A2B3B, 0x12754CCC, 0x782EF11C,
00200 0x6A124237, 0xB79251E7, 0x06A1BBE6, 0x4BFB6350,
00201 0x1A6B1018, 0x11CAEDFA, 0x3D25BDD8, 0xE2E1C3C9,
00202 0x44421659, 0x0A121386, 0xD90CEC6E, 0xD5ABEA2A,
00203 0x64AF674E, 0xDA86A85F, 0xBEBFE988, 0x64E4C3FE,
00204 0x9DBC8057, 0xF0F7C086, 0x60787BF8, 0x6003604D,
00205 0xD1FD8346, 0xF6381FB0, 0x7745AE04, 0xD736FCCC,
00206 0x83426B33, 0xF01EAB71, 0xB0804187, 0x3C005E5F,
00207 0x77A057BE, 0xBDE8AE24, 0x55464299, 0xBF582E61,
00208 0x4E58F48F, 0xF2DDFDA2, 0xF474EF38, 0x8789BDC2,
00209 0x5366F9C3, 0xC8B38E74, 0xB475F255, 0x46FCD9B9,
00210 0x7AEB2661, 0x8B1DDF84, 0x846A0E79, 0x915F95E2,
00211 0x466E598E, 0x20B45770, 0x8CD55591, 0xC902DE4C,
00212 0xB90BACE1, 0xBB8205D0, 0x11A86248, 0x7574A99E,
00213 0xB77F19B6, 0xE0A9DC09, 0x662D09A1, 0xC4324633,
00214 0xE85A1F02, 0x09F0BE8C, 0x4A99A025, 0x1D6EFE10,
00215 0x1AB93D1D, 0x0BA5A4DF, 0xA186F20F, 0x2868F169,
00216 0xDCB7DA83, 0x573906FE, 0xA1E2CE9B, 0x4FCD7F52,
00217 0x50115E01, 0xA70683FA, 0xA002B5C4, 0x0DE6D027,
00218 0x9AF88C27, 0x773F8641, 0xC3604C06, 0x61A806B5,
00219 0xF0177A28, 0xC0F586E0, 0x006058AA, 0x30DC7D62,
00220 0x11E69ED7, 0x2338EA63, 0x53C2DD94, 0xC2C21634,
00221 0xBBCBEE56, 0x90BCB6DE, 0xEBFC7DA1, 0xCE591D76,
00222 0x6F05E409, 0x4B7C0188, 0x39720A3D, 0x7C927C24,
00223 0x86E3725F, 0x724D9DB9, 0x1AC15BB4, 0xD39EB8FC,
00224 0xED545578, 0x08FCA5B5, 0xD83D7CD3, 0x4DAD0FC4,
00225 0x1E50EF5E, 0xB161E6F8, 0xA28514D9, 0x6C51133C,
00226 0x6FD5C7E7, 0x56E14EC4, 0x362ABFCE, 0xDDC6C837,
00227 0xD79A3234, 0x92638212, 0x670EFA8E, 0x406000E0);
00228 var $s4 = array(
00229 0x3A39CE37, 0xD3FAF5CF, 0xABC27737, 0x5AC52D1B,
00230 0x5CB0679E, 0x4FA33742, 0xD3822740, 0x99BC9BBE,
00231 0xD5118E9D, 0xBF0F7315, 0xD62D1C7E, 0xC700C47B,
00232 0xB78C1B6B, 0x21A19045, 0xB26EB1BE, 0x6A366EB4,
00233 0x5748AB2F, 0xBC946E79, 0xC6A376D2, 0x6549C2C8,
00234 0x530FF8EE, 0x468DDE7D, 0xD5730A1D, 0x4CD04DC6,
00235 0x2939BBDB, 0xA9BA4650, 0xAC9526E8, 0xBE5EE304,
00236 0xA1FAD5F0, 0x6A2D519A, 0x63EF8CE2, 0x9A86EE22,
00237 0xC089C2B8, 0x43242EF6, 0xA51E03AA, 0x9CF2D0A4,
00238 0x83C061BA, 0x9BE96A4D, 0x8FE51550, 0xBA645BD6,
00239 0x2826A2F9, 0xA73A3AE1, 0x4BA99586, 0xEF5562E9,
00240 0xC72FEFD3, 0xF752F7DA, 0x3F046F69, 0x77FA0A59,
00241 0x80E4A915, 0x87B08601, 0x9B09E6AD, 0x3B3EE593,
00242 0xE990FD5A, 0x9E34D797, 0x2CF0B7D9, 0x022B8B51,
00243 0x96D5AC3A, 0x017DA67D, 0xD1CF3ED6, 0x7C7D2D28,
00244 0x1F9F25CF, 0xADF2B89B, 0x5AD6B472, 0x5A88F54C,
00245 0xE029AC71, 0xE019A5E6, 0x47B0ACFD, 0xED93FA9B,
00246 0xE8D3C48D, 0x283B57CC, 0xF8D56629, 0x79132E28,
00247 0x785F0191, 0xED756055, 0xF7960E44, 0xE3D35E8C,
00248 0x15056DD4, 0x88F46DBA, 0x03A16125, 0x0564F0BD,
00249 0xC3EB9E15, 0x3C9057A2, 0x97271AEC, 0xA93A072A,
00250 0x1B3F6D9B, 0x1E6321F5, 0xF59C66FB, 0x26DCF319,
00251 0x7533D928, 0xB155FDF5, 0x03563482, 0x8ABA3CBB,
00252 0x28517711, 0xC20AD9F8, 0xABCC5167, 0xCCAD925F,
00253 0x4DE81751, 0x3830DC8E, 0x379D5862, 0x9320F991,
00254 0xEA7A90C2, 0xFB3E7BCE, 0x5121CE64, 0x774FBE32,
00255 0xA8B6E37E, 0xC3293D46, 0x48DE5369, 0x6413E680,
00256 0xA2AE0810, 0xDD6DB224, 0x69852DFD, 0x09072166,
00257 0xB39A460A, 0x6445C0DD, 0x586CDECF, 0x1C20C8AE,
00258 0x5BBEF7DD, 0x1B588D40, 0xCCD2017F, 0x6BB4E3BB,
00259 0xDDA26A7E, 0x3A59FF45, 0x3E350A44, 0xBCB4CDD5,
00260 0x72EACEA8, 0xFA6484BB, 0x8D6612AE, 0xBF3C6F47,
00261 0xD29BE463, 0x542F5D9E, 0xAEC2771B, 0xF64E6370,
00262 0x740E0D8D, 0xE75B1357, 0xF8721671, 0xAF537D5D,
00263 0x4040CB08, 0x4EB4E2CC, 0x34D2466A, 0x0115AF84,
00264 0xE1B00428, 0x95983A1D, 0x06B89FB4, 0xCE6EA048,
00265 0x6F3F3B82, 0x3520AB82, 0x011A1D4B, 0x277227F8,
00266 0x611560B1, 0xE7933FDC, 0xBB3A792B, 0x344525BD,
00267 0xA08839E1, 0x51CE794B, 0x2F32C9B7, 0xA01FBAC9,
00268 0xE01CC87E, 0xBCC7D1F6, 0xCF0111C3, 0xA1E8AAC7,
00269 0x1A908749, 0xD44FBD9A, 0xD0DADECB, 0xD50ADA38,
00270 0x0339C32A, 0xC6913667, 0x8DF9317C, 0xE0B12B4F,
00271 0xF79E59B7, 0x43F5BB3A, 0xF2D519FF, 0x27D9459C,
00272 0xBF97222C, 0x15E6FC2A, 0x0F91FC71, 0x9B941525,
00273 0xFAE59361, 0xCEB69CEB, 0xC2A86459, 0x12BAA8D1,
00274 0xB6C1075E, 0xE3056A0C, 0x10D25065, 0xCB03A442,
00275 0xE0EC6E0E, 0x1698DB3B, 0x4C98A0BE, 0x3278E964,
00276 0x9F1F9532, 0xE0D392DF, 0xD3A0342B, 0x8971F21E,
00277 0x1B0A7441, 0x4BA3348C, 0xC5BE7120, 0xC37632D8,
00278 0xDF359F8D, 0x9B992F2E, 0xE60B6F47, 0x0FE3F11D,
00279 0xE54CDA54, 0x1EDAD891, 0xCE6279CF, 0xCD3E7E6F,
00280 0x1618B166, 0xFD2C1D05, 0x848FD2C5, 0xF6FB2299,
00281 0xF523F357, 0xA6327623, 0x93A83531, 0x56CCCD02,
00282 0xACF08162, 0x5A75EBB5, 0x6E163697, 0x88D273CC,
00283 0xDE966292, 0x81B949D0, 0x4C50901B, 0x71C65614,
00284 0xE6C6C7BD, 0x327A140A, 0x45E1D006, 0xC3F27B9A,
00285 0xC9AA53FD, 0x62A80F00, 0xBB25BFE2, 0x35BDD2F6,
00286 0x71126905, 0xB2040222, 0xB6CBCF7C, 0xCD769C2B,
00287 0x53113EC0, 0x1640E3D3, 0x38ABBD60, 0x2547ADF0,
00288 0xBA38209C, 0xF746CE76, 0x77AFA1C5, 0x20756060,
00289 0x85CBFE4E, 0x8AE88DD8, 0x7AAAF9B0, 0x4CF9AA7E,
00290 0x1948C25C, 0x02FB8A8C, 0x01C36AE4, 0xD6EBE1F9,
00291 0x90D4F869, 0xA65CDEA0, 0x3F09252D, 0xC208E69F,
00292 0xB74E6132, 0xCE77E25B, 0x578FDFE3, 0x3AC372E6);
00293
00294
00295 var $_rounds = 16;
00296
00297
00298 function Cipher_blowfish($params = null)
00299 {
00300 }
00301
00307 function setKey($key)
00308 {
00309 $key = $this->_formatKey($key);
00310 $keyPos = $keyXor = 0;
00311
00312 $iMax = count($this->p);
00313 $keyLen = count($key);
00314 for ($i = 0; $i < $iMax; $i++) {
00315 for ($t = 0; $t < 4; $t++) {
00316 $keyXor = ($keyXor << 8) | (($key[$keyPos]) & 0x0ff);
00317 if (++$keyPos == $keyLen) {
00318 $keyPos = 0;
00319 }
00320 }
00321 $this->p[$i] = $this->p[$i] ^ $keyXor;
00322 }
00323
00324 $encZero = array('L' => 0, 'R' => 0);
00325 for ($i = 0; $i + 1 < $iMax; $i += 2) {
00326 $encZero = $this->_encryptBlock($encZero['L'], $encZero['R']);
00327 $this->p[$i] = $encZero['L'];
00328 $this->p[$i + 1] = $encZero['R'];
00329 }
00330
00331 $iMax = count($this->s1);
00332 for ($i = 0; $i < $iMax; $i += 2) {
00333 $encZero = $this->_encryptBlock($encZero['L'], $encZero['R']);
00334 $this->s1[$i] = $encZero['L'];
00335 $this->s1[$i + 1] = $encZero['R'];
00336 }
00337
00338 $iMax = count($this->s2);
00339 for ($i = 0; $i < $iMax; $i += 2) {
00340 $encZero = $this->_encryptBlock($encZero['L'], $encZero['R']);
00341 $this->s2[$i] = $encZero['L'];
00342 $this->s2[$i + 1] = $encZero['R'];
00343 }
00344
00345 $iMax = count($this->s3);
00346 for ($i = 0; $i < $iMax; $i += 2) {
00347 $encZero = $this->_encryptBlock($encZero['L'], $encZero['R']);
00348 $this->s3[$i] = $encZero['L'];
00349 $this->s3[$i + 1] = $encZero['R'];
00350 }
00351
00352 $iMax = count($this->s4);
00353 for ($i = 0; $i < $iMax; $i += 2) {
00354 $encZero = $this->_encryptBlock($encZero['L'], $encZero['R']);
00355 $this->s4[$i] = $encZero['L'];
00356 $this->s4[$i + 1] = $encZero['R'];
00357 }
00358
00359 }
00360
00366 function getBlockSize()
00367 {
00368 return 8;
00369 }
00370
00379 function encryptBlock($block, $key = null)
00380 {
00381 if (!is_null($key)) {
00382 $this->setKey($key);
00383 }
00384
00385 list($L, $R) = array_values(unpack('N*', $block));
00386 $parts = $this->_encryptBlock($L, $R);
00387 return pack("NN", $parts['L'], $parts['R']);
00388 }
00389
00398 function _encryptBlock($L, $R)
00399 {
00400 $L ^= $this->p[0];
00401 $R ^= ((($this->s1[($L >> 24) & 0xFF] + $this->s2[($L >> 16) & 0x0ff]) ^ $this->s3[($L >> 8) & 0x0ff]) + $this->s4[$L & 0x0ff]) ^ $this->p[1];
00402 $L ^= ((($this->s1[($R >> 24) & 0xFF] + $this->s2[($R >> 16) & 0x0ff]) ^ $this->s3[($R >> 8) & 0x0ff]) + $this->s4[$R & 0x0ff]) ^ $this->p[2];
00403 $R ^= ((($this->s1[($L >> 24) & 0xFF] + $this->s2[($L >> 16) & 0x0ff]) ^ $this->s3[($L >> 8) & 0x0ff]) + $this->s4[$L & 0x0ff]) ^ $this->p[3];
00404 $L ^= ((($this->s1[($R >> 24) & 0xFF] + $this->s2[($R >> 16) & 0x0ff]) ^ $this->s3[($R >> 8) & 0x0ff]) + $this->s4[$R & 0x0ff]) ^ $this->p[4];
00405 $R ^= ((($this->s1[($L >> 24) & 0xFF] + $this->s2[($L >> 16) & 0x0ff]) ^ $this->s3[($L >> 8) & 0x0ff]) + $this->s4[$L & 0x0ff]) ^ $this->p[5];
00406 $L ^= ((($this->s1[($R >> 24) & 0xFF] + $this->s2[($R >> 16) & 0x0ff]) ^ $this->s3[($R >> 8) & 0x0ff]) + $this->s4[$R & 0x0ff]) ^ $this->p[6];
00407 $R ^= ((($this->s1[($L >> 24) & 0xFF] + $this->s2[($L >> 16) & 0x0ff]) ^ $this->s3[($L >> 8) & 0x0ff]) + $this->s4[$L & 0x0ff]) ^ $this->p[7];
00408 $L ^= ((($this->s1[($R >> 24) & 0xFF] + $this->s2[($R >> 16) & 0x0ff]) ^ $this->s3[($R >> 8) & 0x0ff]) + $this->s4[$R & 0x0ff]) ^ $this->p[8];
00409 $R ^= ((($this->s1[($L >> 24) & 0xFF] + $this->s2[($L >> 16) & 0x0ff]) ^ $this->s3[($L >> 8) & 0x0ff]) + $this->s4[$L & 0x0ff]) ^ $this->p[9];
00410 $L ^= ((($this->s1[($R >> 24) & 0xFF] + $this->s2[($R >> 16) & 0x0ff]) ^ $this->s3[($R >> 8) & 0x0ff]) + $this->s4[$R & 0x0ff]) ^ $this->p[10];
00411 $R ^= ((($this->s1[($L >> 24) & 0xFF] + $this->s2[($L >> 16) & 0x0ff]) ^ $this->s3[($L >> 8) & 0x0ff]) + $this->s4[$L & 0x0ff]) ^ $this->p[11];
00412 $L ^= ((($this->s1[($R >> 24) & 0xFF] + $this->s2[($R >> 16) & 0x0ff]) ^ $this->s3[($R >> 8) & 0x0ff]) + $this->s4[$R & 0x0ff]) ^ $this->p[12];
00413 $R ^= ((($this->s1[($L >> 24) & 0xFF] + $this->s2[($L >> 16) & 0x0ff]) ^ $this->s3[($L >> 8) & 0x0ff]) + $this->s4[$L & 0x0ff]) ^ $this->p[13];
00414 $L ^= ((($this->s1[($R >> 24) & 0xFF] + $this->s2[($R >> 16) & 0x0ff]) ^ $this->s3[($R >> 8) & 0x0ff]) + $this->s4[$R & 0x0ff]) ^ $this->p[14];
00415 $R ^= ((($this->s1[($L >> 24) & 0xFF] + $this->s2[($L >> 16) & 0x0ff]) ^ $this->s3[($L >> 8) & 0x0ff]) + $this->s4[$L & 0x0ff]) ^ $this->p[15];
00416 $L ^= ((($this->s1[($R >> 24) & 0xFF] + $this->s2[($R >> 16) & 0x0ff]) ^ $this->s3[($R >> 8) & 0x0ff]) + $this->s4[$R & 0x0ff]) ^ $this->p[16];
00417 $R ^= $this->p[17];
00418
00419 return array('L' => $R, 'R' => $L);
00420 }
00421
00430 function decryptBlock($block, $key = null)
00431 {
00432 if (!is_null($key)) {
00433 $this->setKey($key);
00434 }
00435
00436 list($L, $R) = array_values(unpack('N*', $block));
00437
00438 $L ^= $this->p[17];
00439 $R ^= ((($this->s1[($L >> 24) & 0xFF] + $this->s2[($L >> 16) & 0x0ff]) ^ $this->s3[($L >> 8) & 0x0ff]) + $this->s4[$L & 0x0ff]) ^ $this->p[16];
00440 $L ^= ((($this->s1[($R >> 24) & 0xFF] + $this->s2[($R >> 16) & 0x0ff]) ^ $this->s3[($R >> 8) & 0x0ff]) + $this->s4[$R & 0x0ff]) ^ $this->p[15];
00441 $R ^= ((($this->s1[($L >> 24) & 0xFF] + $this->s2[($L >> 16) & 0x0ff]) ^ $this->s3[($L >> 8) & 0x0ff]) + $this->s4[$L & 0x0ff]) ^ $this->p[14];
00442 $L ^= ((($this->s1[($R >> 24) & 0xFF] + $this->s2[($R >> 16) & 0x0ff]) ^ $this->s3[($R >> 8) & 0x0ff]) + $this->s4[$R & 0x0ff]) ^ $this->p[13];
00443 $R ^= ((($this->s1[($L >> 24) & 0xFF] + $this->s2[($L >> 16) & 0x0ff]) ^ $this->s3[($L >> 8) & 0x0ff]) + $this->s4[$L & 0x0ff]) ^ $this->p[12];
00444 $L ^= ((($this->s1[($R >> 24) & 0xFF] + $this->s2[($R >> 16) & 0x0ff]) ^ $this->s3[($R >> 8) & 0x0ff]) + $this->s4[$R & 0x0ff]) ^ $this->p[11];
00445 $R ^= ((($this->s1[($L >> 24) & 0xFF] + $this->s2[($L >> 16) & 0x0ff]) ^ $this->s3[($L >> 8) & 0x0ff]) + $this->s4[$L & 0x0ff]) ^ $this->p[10];
00446 $L ^= ((($this->s1[($R >> 24) & 0xFF] + $this->s2[($R >> 16) & 0x0ff]) ^ $this->s3[($R >> 8) & 0x0ff]) + $this->s4[$R & 0x0ff]) ^ $this->p[9];
00447 $R ^= ((($this->s1[($L >> 24) & 0xFF] + $this->s2[($L >> 16) & 0x0ff]) ^ $this->s3[($L >> 8) & 0x0ff]) + $this->s4[$L & 0x0ff]) ^ $this->p[8];
00448 $L ^= ((($this->s1[($R >> 24) & 0xFF] + $this->s2[($R >> 16) & 0x0ff]) ^ $this->s3[($R >> 8) & 0x0ff]) + $this->s4[$R & 0x0ff]) ^ $this->p[7];
00449 $R ^= ((($this->s1[($L >> 24) & 0xFF] + $this->s2[($L >> 16) & 0x0ff]) ^ $this->s3[($L >> 8) & 0x0ff]) + $this->s4[$L & 0x0ff]) ^ $this->p[6];
00450 $L ^= ((($this->s1[($R >> 24) & 0xFF] + $this->s2[($R >> 16) & 0x0ff]) ^ $this->s3[($R >> 8) & 0x0ff]) + $this->s4[$R & 0x0ff]) ^ $this->p[5];
00451 $R ^= ((($this->s1[($L >> 24) & 0xFF] + $this->s2[($L >> 16) & 0x0ff]) ^ $this->s3[($L >> 8) & 0x0ff]) + $this->s4[$L & 0x0ff]) ^ $this->p[4];
00452 $L ^= ((($this->s1[($R >> 24) & 0xFF] + $this->s2[($R >> 16) & 0x0ff]) ^ $this->s3[($R >> 8) & 0x0ff]) + $this->s4[$R & 0x0ff]) ^ $this->p[3];
00453 $R ^= ((($this->s1[($L >> 24) & 0xFF] + $this->s2[($L >> 16) & 0x0ff]) ^ $this->s3[($L >> 8) & 0x0ff]) + $this->s4[$L & 0x0ff]) ^ $this->p[2];
00454 $L ^= ((($this->s1[($R >> 24) & 0xFF] + $this->s2[($R >> 16) & 0x0ff]) ^ $this->s3[($R >> 8) & 0x0ff]) + $this->s4[$R & 0x0ff]) ^ $this->p[1];
00455
00456 $decrypted = pack("NN", $R ^ $this->p[0], $L);
00457 return $decrypted;
00458 }
00459
00465 function _formatKey($key)
00466 {
00467 return array_values(unpack('C*', $key));
00468 }
00469
00470 }
00471 ?>
1.4.6