bfshkeys.pas.inc

const
 cBF_PBox: array [0..17] of Longword = (
   $039D95EE,
   $BEF33801,
   $9A152D7E,
   $31F13B03,
   $A9F663AC,
   $F427CF98,
   $C32E14BD,
   $ED4F42B3,
   $8C77D2D7,
   $8AB31B39,
   $88BEB9DE,
   $06BBEA7A,
   $5BA06D72,
   $FA7AC867,
   $B683BA7E,
   $92D7AC31,
   $2C3FF5CC,
   $D75B1994
 );

 cBF_SBox: array [0..3,0..255] of Longword = (
  (
   $9A14FF43,
   $43420A09,
   $9B73CF6C,
   $0943E8EC,
   $03B80983,
   $F523BDED,
   $92843320,
   $9A26BECD,
   $F5541795,
   $A7B8A4B5,
   $C6D11F3C,
   $16A83F04,
   $74248421,
   $E85991D9,
   $7229DDA0,
   $2AA5B621,
   $6AEFA9CB,
   $044F5571,
   $DF86689E,
   $BD249D71,
   $1142585E,
   $BDBA27D0,
   $3685EFC1,
   $941E0B09,
   $48F307D3,
   $ED6627BA,
   $BBC88B7B,
   $583164ED,
   $7BA14D60,
   $16AC4DEA,
   $08739258,
   $E56466BD,
   $8DEA7004,
   $8329A1CA,
   $6A7A45B9,
   $085E29EB,
   $DC72BF1F,
   $76523555,
   $19778640,
   $973FF523,
   $EAA6B4AA,
   $6A741C21,
   $E3439F6A,
   $1E84C9AE,
   $8297BEB8,
   $751592F5,
   $620AB14D,
   $D71CCD00,
   $F2B8B43D,
   $ECE33BC7,
   $E1AB8030,
   $23A396FD,
   $D84A38A5,
   $F09B3068,
   $38DF58D2,
   $4BFFA14B,
   $17EFD907,
   $BEFAE6B0,
   $A9AE5982,
   $B28F3775,
   $90AE6687,
   $43EBC589,
   $4F687595,
   $29532D3D,
   $D390828B,
   $B6724351,
   $24086540,
   $7DCB78A6,
   $D6FDFBF2,
   $D080BFF6,
   $532DBFFD,
   $AEAF5056,
   $C26066BE,
   $999D1B44,
   $65C4AA33,
   $6FD8B6DC,
   $6AAE508E,
   $6AFE8985,
   $BB2D3ADC,
   $139841EB,
   $2DC2E381,
   $CB9E05A2,
   $B3EB1374,
   $08936953,
   $C07A5815,
   $FE4E1260,
   $42EE14DC,
   $7D1F8BB0,
   $1422076A,
   $930957DE,
   $CFA9FA06,
   $B1EBC2AF,
   $A70B0C0F,
   $324345E3,
   $4ECDCA24,
   $27F2010B,
   $0BEFC627,
   $1C54830B,
   $A9C19EC8,
   $8DBF5C56,
   $54193116,
   $5003BC03,
   $86F528D5,
   $78BFF3B1,
   $2277C971,
   $32C4100D,
   $2C4507B1,
   $0D240FD6,
   $8A4E5020,
   $CA33E40E,
   $340E16CA,
   $92B14ED0,
   $F9A83CBA,
   $FC1C046F,
   $34F2FAF0,
   $2BAE16A5,
   $245CCA24,
   $44CA06E7,
   $DAA9F4B5,
   $391E9743,
   $8CE503BC,
   $BDEFFEFD,
   $553FBA87,
   $FAF4F3DB,
   $2F49C4EE,
   $0F829A73,
   $3DA589D7,
   $6A503C35,
   $4AE161BB,
   $5829F5E7,
   $2F8D021C,
   $813A5713,
   $27275279,
   $DD6D9585,
   $C89EF71F,
   $A7FA9F60,
   $EB4C81EB,
   $5EAA8A83,
   $008120E5,
   $4C00C232,
   $C2945B4C,
   $44C46C06,
   $24BF89EE,
   $DA363310,
   $04FF9D99,
   $76C96DED,
   $16864797,
   $144148EF,
   $4A12D620,
   $0354F45B,
   $0406F057,
   $292E7D11,
   $F36C4B62,
   $8E330726,
   $3D8EACC4,
   $5092B701,
   $9C38CCBF,
   $594924B3,
   $F8019BE8,
   $9121DE7F,
   $1B97686B,
   $370F0574,
   $55727A19,
   $808B3069,
   $389F72DF,
   $BD8FF7FF,
   $519A11B1,
   $C98593CD,
   $DDE47D38,
   $B63BF013,
   $CA9D1BD7,
   $12367604,
   $DC3BDCF8,
   $3A7D7215,
   $C1D9F6EE,
   $B356ABEA,
   $14CDEF5B,
   $CD98B56F,
   $978FFFF8,
   $7EFA787F,
   $B66CBF94,
   $B6F33758,
   $6E221261,
   $D2C577D6,
   $B5B92FAC,
   $C4ED06CC,
   $054E789E,
   $E56FB949,
   $E8910103,
   $E70A0B65,
   $5BDF2477,
   $FD224EC2,
   $BEC720B6,
   $B1439243,
   $BE9E4623,
   $4F8A37BC,
   $92E0E022,
   $70EE5D3C,
   $ED781725,
   $D23014DA,
   $F5AFCCAF,
   $77FE3226,
   $05F36AEE,
   $3A43690E,
   $91A1EF70,
   $67E6E0F3,
   $B3ED5CB0,
   $82E2AC91,
   $1EC2596F,
   $F9C25422,
   $F13A7FBB,
   $A5A937DE,
   $A788FB1D,
   $55FB6F4A,
   $C3A452DA,
   $48C663A3,
   $EA136444,
   $84F45A85,
   $E52E1024,
   $BDA13FC1,
   $9BBE54E1,
   $489DE15C,
   $E7A9E8B8,
   $EE2B3350,
   $C0001EF3,
   $B38C30DF,
   $F55B6E5C,
   $383D86A8,
   $DE167A06,
   $955A0F52,
   $8EE247B5,
   $E483EAE7,
   $DD2BC2E5,
   $E7CAA2C6,
   $E34FEDAB,
   $F46A27A0,
   $6FE8B872,
   $7D020784,
   $5D224DB9,
   $1FB83F74,
   $822DF0B9,
   $0F9DFFF4,
   $F91B1017,
   $29926DF2,
   $7F323111,
   $3F965F09,
   $AA0A40DA,
   $01B85DD3,
   $699AA950,
   $4379D43D,
   $1FCD2744,
   $E3DE2557,
   $D51D63D4,
   $0D64B95D,
   $3FD49D9C,
   $584EC7FA
  ),
  (
   $AF5AB8FB,
   $4F32164E,
   $4FC0ACA5,
   $09B3079F,
   $8995F6E2,
   $D49C4954,
   $9A55F877,
   $36DFF050,
   $035299EA,
   $5B6E478A,
   $EB38FD92,
   $2226EDAA,
   $9846C822,
   $C9380D9C,
   $E6771A1E,
   $732901E4,
   $6FA5FDB0,
   $01EB1370,
   $07F0309C,
   $D236B4B9,
   $A640D4E3,
   $75259536,
   $AFFAD1FE,
   $8D1A1208,
   $5029358D,
   $ED17419A,
   $7D4C2195,
   $CBFAFFE9,
   $15D8623B,
   $E3EFE746,
   $58066FB3,
   $3A3DEDFB,
   $1E2A596F,
   $000297E2,
   $E13A7029,
   $B23C04F6,
   $8DD5245C,
   $D65147FB,
   $A56694C4,
   $5E239B85,
   $61DD7999,
   $9B101989,
   $56435412,
   $79D4CDEC,
   $CB1EAE16,
   $5E9CADAF,
   $985BD9F3,
   $E5D4A312,
   $3E29DB93,
   $CD924296,
   $A186F16B,
   $66E72F8C,
   $5A6A18F2,
   $5CD4CCAD,
   $7C80129C,
   $BE73D6F6,
   $C3E47291,
   $BEAC3073,
   $C0E9F583,
   $74B5755F,
   $EB9AAF9F,
   $695C0877,
   $29F5B464,
   $210DCAF0,
   $72A17FF0,
   $CCB312C6,
   $110C0A49,
   $76E4ECBF,
   $3183F507,
   $66D1710B,
   $0600AA30,
   $1B5543A6,
   $85D82F14,
   $A8B1DF9D,
   $DCE20463,
   $9DD7163D,
   $0113AD51,
   $5296E4BD,
   $2A4E2B17,
   $7A851BF6,
   $69AA4B42,
   $FDF7B8A9,
   $1823EAE8,
   $113149B0,
   $59ECD86F,
   $D6C493FE,
   $A477CC0F,
   $5E22ADEE,
   $D9C81B07,
   $77D49606,
   $C14F90E1,
   $0DF28048,
   $D5FB17BE,
   $875C8F84,
   $8F8470F2,
   $AC12EDFB,
   $4C1C5B4E,
   $63919828,
   $8100E781,
   $BFC0B2DE,
   $DEFA5091,
   $EEC52244,
   $8FD90A29,
   $B0F626F9,
   $C7A0BEDF,
   $FE000312,
   $9FB31FDC,
   $2DBF622C,
   $D1AF7A9D,
   $F2262522,
   $65BD19E0,
   $6E5B4463,
   $854E8872,
   $943D33E7,
   $AC527D4C,
   $0969C177,
   $52F386A0,
   $7E684FF9,
   $549D4273,
   $64F55854,
   $541D64A4,
   $45DCAA83,
   $90749D71,
   $049E5B4B,
   $5EFD9D80,
   $DB5FC762,
   $1FAFA47A,
   $49B8003C,
   $23E58910,
   $14437772,
   $1D8EA970,
   $E0C774BC,
   $A6E43511,
   $C62B2741,
   $AC17D251,
   $33E7D7FA,
   $71B42D48,
   $71A51512,
   $03A7C0EA,
   $F8E06549,
   $838BA30A,
   $32F4B31B,
   $A25D00C1,
   $3F273452,
   $49399921,
   $26A91659,
   $7F33D71F,
   $D0309449,
   $1F79E51C,
   $CD947E18,
   $5FA550C2,
   $BCE58F78,
   $EEC10695,
   $FA766C8C,
   $8845E39D,
   $EA7A7FCA,
   $8858C42D,
   $5E303231,
   $E464A218,
   $C277D03F,
   $49CD9E1B,
   $6F18CB55,
   $17AE41D8,
   $DBF3B8B9,
   $CE491E2A,
   $ED0C01E6,
   $EF6BAD5F,
   $8287E5E4,
   $B3E9751D,
   $83B35791,
   $468C45C1,
   $B1740AAB,
   $98098461,
   $8D1C7057,
   $91FE94AD,
   $F937CDBB,
   $83DCC0D9,
   $D7B1B57C,
   $DF3CE868,
   $E28B5B92,
   $539545E6,
   $493E48A3,
   $137DC67A,
   $3C34C93E,
   $329C3F17,
   $521059A7,
   $F9D5F15A,
   $73E6B86F,
   $1B48612F,
   $F2A05C72,
   $9878D4D6,
   $93B46FD2,
   $C541137B,
   $356489CB,
   $50019290,
   $A1D76E17,
   $1ACA583E,
   $7FEF869A,
   $340C0114,
   $591081CC,
   $515777AE,
   $87E5E577,
   $FCB27F5C,
   $77C4076C,
   $D8B2DC8E,
   $229170B6,
   $5BA1BEE0,
   $67380564,
   $B9F42BCB,
   $120B5B72,
   $396B82FF,
   $5EAE9234,
   $86FA7491,
   $6E66E992,
   $6CD13838,
   $BE4CF2D4,
   $98375BE8,
   $43CC7C82,
   $B8572E6D,
   $F268E857,
   $1C18A052,
   $183BEF85,
   $B61CB44E,
   $960FBDDF,
   $D8ACB2CE,
   $32564D30,
   $F6031149,
   $E4AC4D5F,
   $9B8926C6,
   $39C37722,
   $268268CA,
   $2296D3A1,
   $2FA5935F,
   $AE724C6B,
   $4EF26297,
   $FD7D3188,
   $E1D9F535,
   $2354C43F,
   $C7A2BB9E,
   $C712367A,
   $F079A33B,
   $99FAF6B7,
   $5EB7EA6D,
   $0AA426B9,
   $55B2C168,
   $16D49C0F,
   $317BB750,
   $D1F329CF,
   $AC802393,
   $44CC4110,
   $E848E636,
   $385D50AB,
   $236CA49C,
   $1823B7E6,
   $5150E9D3,
   $F71A8DB0
  ),
  (
   $CF009BB6,
   $1C551C1D,
   $24E9FC54,
   $E05F634F,
   $2B25238A,
   $AB7E02C7,
   $B2992C5D,
   $2941CA2E,
   $B85784D8,
   $AA5D2F10,
   $5605ECCF,
   $21B1934A,
   $22DD3480,
   $50F0A395,
   $868B6EE6,
   $B608FFFC,
   $48AF33A2,
   $56F971B7,
   $BAFFC22D,
   $75C90C12,
   $029EBA2E,
   $86F79ECE,
   $8ECE826C,
   $9AE231FE,
   $2BFC24A8,
   $AF602E5C,
   $CDD707EC,
   $456F7A5D,
   $C5C01C08,
   $1763D989,
   $C48404FB,
   $FB435D00,
   $E3A36E21,
   $F9EC4BD5,
   $A2FC487F,
   $3CFBAEBB,
   $811D69AE,
   $F7894C07,
   $6A79B960,
   $CFD0FC8C,
   $BAEB4744,
   $22895C20,
   $B524D524,
   $861C20B7,
   $FCE6264D,
   $6C026378,
   $E97BF219,
   $6E8C79D9,
   $52D8686C,
   $BDB21CD7,
   $CB7014E9,
   $939B8D1B,
   $85E4A946,
   $5483F22F,
   $57BEEF0A,
   $61AEEDCC,
   $C196D298,
   $7DD58741,
   $11826FE8,
   $493ED845,
   $522BAC00,
   $4077F172,
   $72380CEE,
   $50F4C295,
   $30EEA791,
   $E68A510B,
   $6CEA21AA,
   $ECAAA21C,
   $83FBA2D2,
   $77B79938,
   $7FC133B2,
   $129CE5DC,
   $50E65BCD,
   $477B7453,
   $AF7D1514,
   $89C00827,
   $F7A1EC17,
   $356959ED,
   $B0DA0D24,
   $7783F2B1,
   $E4FA5DDC,
   $F45B2515,
   $968E0CC0,
   $F2D4709B,
   $8BC437AB,
   $F52C331C,
   $3E585066,
   $43ACD3A7,
   $0FE64231,
   $8BAE332C,
   $3C45C872,
   $E629C815,
   $18C0CD24,
   $2DF9B8B9,
   $E22666B3,
   $AE28482B,
   $35A36B23,
   $C09C417E,
   $FD9137CC,
   $3CC784A4,
   $6A4AFA4A,
   $7E356423,
   $992E3D08,
   $932E2E39,
   $D6B81CB4,
   $F591CB50,
   $44FFFA39,
   $B8F0F66F,
   $EB0A5944,
   $3659B530,
   $5D447F2F,
   $A89E7D80,
   $C6964BE7,
   $8886C665,
   $0D2B9D36,
   $19CF6D7A,
   $1FF808A2,
   $E562381F,
   $97869179,
   $E19B4442,
   $DC451E4B,
   $C23C898E,
   $3B2E8A9C,
   $5CA54832,
   $BE47D0FC,
   $E6490301,
   $87B11E5C,
   $510D8D6B,
   $7744450C,
   $3CD4E633,
   $8B081BDC,
   $7D7461A5,
   $9DEC5CD5,
   $9247D9CE,
   $93DB938F,
   $B5ADA544,
   $2D4ADC2F,
   $DBE4D336,
   $5909DC44,
   $6318E715,
   $804C22FD,
   $4C9BB1E6,
   $E31A477C,
   $CCB6C16B,
   $0E177B2C,
   $3F63C28E,
   $B1CC91C0,
   $F224268D,
   $45C3219D,
   $930043E8,
   $337D6FDE,
   $275DCF68,
   $F11A77AE,
   $0BF98AFA,
   $96F0EAFB,
   $562E7AF1,
   $F69517E4,
   $1285A653,
   $DCC1F517,
   $6A3E3160,
   $F8927AD7,
   $E777A6F8,
   $6A26B171,
   $9020E9AE,
   $6189F470,
   $87D17422,
   $B6E4AA19,
   $F4B52464,
   $739FD032,
   $A38F8BB1,
   $619139F5,
   $71BDAB10,
   $73F5BDFF,
   $93F327CE,
   $F0CF1B9A,
   $4885A086,
   $597AFC18,
   $34A853E9,
   $7CE3FF22,
   $610FE03A,
   $002C20C7,
   $A47161A9,
   $9A8DE679,
   $C6247D98,
   $7709A2E8,
   $87ED5BBF,
   $0893F1FC,
   $0431B7AB,
   $82BEDAD8,
   $5A9B8D34,
   $55FAA474,
   $B957A23C,
   $82DD1A98,
   $CC67E0EF,
   $A53C8BCB,
   $35DED15C,
   $8FFF7CD9,
   $0870A93B,
   $4FB2B3BB,
   $418D9D56,
   $1D160E9F,
   $7A774DF4,
   $4D587349,
   $7FAA5314,
   $3787049A,
   $03C9FB33,
   $E96B2CBF,
   $6829A55D,
   $9D51D4EA,
   $BC1CAC54,
   $462B09C0,
   $B31BB9EC,
   $7FD96DB9,
   $507D05F7,
   $8B645E56,
   $DE5B0CB9,
   $F92FE869,
   $B227E48A,
   $8FCFCC2A,
   $2E337B87,
   $A10ED4E9,
   $A59580FD,
   $DA66DF40,
   $B2B95A7E,
   $70D3B0AE,
   $A8AA8B82,
   $A578EAA5,
   $9B2635E4,
   $2C0F952A,
   $DC84B991,
   $DF6B1714,
   $AAA1D947,
   $D6CE839B,
   $B4E1FD26,
   $BBB9D0C1,
   $13038688,
   $4CE823E1,
   $7498A196,
   $B350C720,
   $99EFE5E0,
   $E42D0E11,
   $E9C40027,
   $C411832F,
   $AFEAF96B,
   $E60FA38F,
   $7068ACAA,
   $28216A15,
   $22F8CBC0,
   $B03B238A,
   $7A833B62,
   $3EE57B5F,
   $877E828A,
   $3B5CA3C5,
   $8B7EBCCA,
   $472FB0BB,
   $073A0C47
  ),
  (
   $60748AC5,
   $CC77BAA2,
   $B4026414,
   $AB798B64,
   $EA64AF2F,
   $AD4A6B3C,
   $63893A34,
   $D57C0438,
   $E43ADADC,
   $E8FD1C90,
   $F59769E0,
   $B7C2E003,
   $43D58C3A,
   $7CE1AC19,
   $F2B9D881,
   $687F4678,
   $7EEFDF4D,
   $0F4798F8,
   $5B7FEF36,
   $FDC20499,
   $8D0C64F5,
   $988B96FF,
   $D1837CBD,
   $B7741B4D,
   $1C31791B,
   $B3D36D71,
   $18893864,
   $70A7D77A,
   $4593FC3A,
   $1D3FCA87,
   $E0650396,
   $EA93F74F,
   $C18CAE05,
   $BC793BEF,
   $8282797F,
   $78999CD7,
   $83E9F68E,
   $F3456649,
   $90AEBB3F,
   $9BAE7D05,
   $6DCD2A59,
   $D1DCD15C,
   $36236BAC,
   $BA4A8127,
   $11F9F994,
   $F76208C3,
   $695607A8,
   $60C6189D,
   $EA2F3CCF,
   $2D6DB3CD,
   $E6B761A4,
   $DF9DBDD2,
   $D7644DCA,
   $7A6771D8,
   $F3608620,
   $EDBF342F,
   $7092257E,
   $9F1A678E,
   $9091620B,
   $E3634AEF,
   $C740603C,
   $C851DEEA,
   $D6852E9C,
   $16083C77,
   $7238310B,
   $6AE23EE8,
   $21E04D18,
   $A1DD4AED,
   $B3948CA3,
   $F75039EF,
   $6F8DA4A2,
   $8AAF1721,
   $07846C0F,
   $3C650AFA,
   $E73088F6,
   $4038D942,
   $E39F9DE8,
   $A557A400,
   $D1710219,
   $FD3A2587,
   $510032E0,
   $2F090304,
   $3AF60B25,
   $54B0C0F4,
   $10A2FEC7,
   $B50F1B81,
   $4937596D,
   $6697284D,
   $FF40C224,
   $4CD4A8D2,
   $3E1E1974,
   $CC370578,
   $90EDC50C,
   $13C75FF6,
   $512CCCCD,
   $FF1F412C,
   $366AA97A,
   $6C352482,
   $8F8F2EA0,
   $A50A7FD1,
   $68EE3CCB,
   $21441264,
   $F16C37C5,
   $AF10CAFC,
   $B105CC7C,
   $8AF90EFE,
   $115EAEC1,
   $E5414CF1,
   $5DBE3741,
   $CEE69297,
   $0645D982,
   $234579BB,
   $334E141C,
   $5D2CEEED,
   $1118451C,
   $0B10E8A9,
   $6D119F5A,
   $FC6A57E1,
   $92E57D9C,
   $A94176D0,
   $C2A2F500,
   $4539E580,
   $6895D728,
   $622960B9,
   $DCC8935B,
   $DDED7411,
   $BEBD896E,
   $D4C921D3,
   $DBFAF3C5,
   $97F04648,
   $B9C28D77,
   $381A227D,
   $1CA89D58,
   $7B7079B6,
   $5DB866CE,
   $5C9E7208,
   $3C8F4135,
   $B9AF1CF1,
   $AC2378F2,
   $DE121392,
   $BD2BA94D,
   $F81D43C1,
   $317458F3,
   $AE43F035,
   $3A7A72B9,
   $BB239503,
   $590E84C2,
   $6927C7CD,
   $5B7DF808,
   $14B07159,
   $4F1211C5,
   $A60BA83D,
   $06F57950,
   $FAEA8464,
   $B35746DD,
   $2726FD24,
   $63B52689,
   $60FEB8BF,
   $41B500A0,
   $CF6FAD1D,
   $059222B8,
   $CD4FB7B0,
   $10085D2F,
   $FC376C76,
   $13682F93,
   $1EA0F40E,
   $753D2324,
   $BCE743CE,
   $FD15BAA2,
   $43A1BA7E,
   $3A492ACD,
   $BF39EE8C,
   $47D813F9,
   $3F17E8BA,
   $D298685F,
   $714436B4,
   $15D78D30,
   $47F83727,
   $237D77A3,
   $671A3849,
   $B7D73474,
   $9017CE57,
   $C9DD51D6,
   $096D3D96,
   $4ED03D4F,
   $AB8DCBD5,
   $B5A85C14,
   $0DDCD38A,
   $83404D8A,
   $D9A3BC7B,
   $6B0BA582,
   $6C6C38C6,
   $B790729B,
   $976EA7B9,
   $4AF7CB8B,
   $D75796EA,
   $78148BB9,
   $F1DA76A7,
   $76A5D288,
   $B03D2194,
   $A232A287,
   $72BD5DB2,
   $4B399FD5,
   $F46BC1FE,
   $608E5374,
   $6EAFED7D,
   $A1BC656D,
   $B89E78A1,
   $3F17D0D2,
   $7591310D,
   $9E0CD2B9,
   $68A1C260,
   $254F250C,
   $E15B45E9,
   $D2D19229,
   $27B02FD7,
   $8E2CE603,
   $77C5A24B,
   $45865548,
   $9F4E315B,
   $951C4346,
   $EE6AC851,
   $E25661FB,
   $65D5006D,
   $A6DB5F15,
   $F06490AD,
   $645345A0,
   $883C3B40,
   $B6B4A998,
   $12DB1823,
   $91874149,
   $D98C74FB,
   $F2840B6A,
   $9D55984B,
   $1CAE045E,
   $FDFD0A05,
   $FCE34B37,
   $6A13C85E,
   $046D87B5,
   $E4DD910B,
   $61587845,
   $5B1F4984,
   $67182B06,
   $A5548E66,
   $177A104B,
   $66AF3EC3,
   $3F6844C6,
   $80FD5937,
   $37DB0045,
   $CB7EE355,
   $C6B7A77B,
   $E680A8C5,
   $944EF71B,
   $269E3ED0,
   $0B0E52FF,
   $7DEA7A12
  )
 );