PageRenderTime 107ms CodeModel.GetById 7ms RepoModel.GetById 1ms app.codeStats 0ms

/phpseclib/Crypt/Rijndael.php

https://github.com/kea/phpseclib
PHP | 1476 lines | 830 code | 108 blank | 538 comment | 106 complexity | b3d9f0e1c9771c4a339cf456803d0ca2 MD5 | raw file
  1. <?php
  2. /* vim: set expandtab tabstop=4 shiftwidth=4 softtabstop=4: */
  3. /**
  4. * Pure-PHP implementation of Rijndael.
  5. *
  6. * Does not use mcrypt, even when available, for reasons that are explained below.
  7. *
  8. * PHP versions 4 and 5
  9. *
  10. * If {@link Crypt_Rijndael::setBlockLength() setBlockLength()} isn't called, it'll be assumed to be 128 bits. If
  11. * {@link Crypt_Rijndael::setKeyLength() setKeyLength()} isn't called, it'll be calculated from
  12. * {@link Crypt_Rijndael::setKey() setKey()}. ie. if the key is 128-bits, the key length will be 128-bits. If it's
  13. * 136-bits it'll be null-padded to 160-bits and 160 bits will be the key length until
  14. * {@link Crypt_Rijndael::setKey() setKey()} is called, again, at which point, it'll be recalculated.
  15. *
  16. * Not all Rijndael implementations may support 160-bits or 224-bits as the block length / key length. mcrypt, for example,
  17. * does not. AES, itself, only supports block lengths of 128 and key lengths of 128, 192, and 256.
  18. * {@link http://csrc.nist.gov/archive/aes/rijndael/Rijndael-ammended.pdf#page=10 Rijndael-ammended.pdf#page=10} defines the
  19. * algorithm for block lengths of 192 and 256 but not for block lengths / key lengths of 160 and 224. Indeed, 160 and 224
  20. * are first defined as valid key / block lengths in
  21. * {@link http://csrc.nist.gov/archive/aes/rijndael/Rijndael-ammended.pdf#page=44 Rijndael-ammended.pdf#page=44}:
  22. * Extensions: Other block and Cipher Key lengths.
  23. *
  24. * {@internal The variable names are the same as those in
  25. * {@link http://www.csrc.nist.gov/publications/fips/fips197/fips-197.pdf#page=10 fips-197.pdf#page=10}.}}
  26. *
  27. * Here's a short example of how to use this library:
  28. * <code>
  29. * <?php
  30. * include('Crypt/Rijndael.php');
  31. *
  32. * $rijndael = new Crypt_Rijndael();
  33. *
  34. * $rijndael->setKey('abcdefghijklmnop');
  35. *
  36. * $size = 10 * 1024;
  37. * $plaintext = '';
  38. * for ($i = 0; $i < $size; $i++) {
  39. * $plaintext.= 'a';
  40. * }
  41. *
  42. * echo $rijndael->decrypt($rijndael->encrypt($plaintext));
  43. * ?>
  44. * </code>
  45. *
  46. * LICENSE: Permission is hereby granted, free of charge, to any person obtaining a copy
  47. * of this software and associated documentation files (the "Software"), to deal
  48. * in the Software without restriction, including without limitation the rights
  49. * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
  50. * copies of the Software, and to permit persons to whom the Software is
  51. * furnished to do so, subject to the following conditions:
  52. *
  53. * The above copyright notice and this permission notice shall be included in
  54. * all copies or substantial portions of the Software.
  55. *
  56. * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
  57. * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
  58. * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
  59. * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
  60. * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
  61. * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
  62. * THE SOFTWARE.
  63. *
  64. * @category Crypt
  65. * @package Crypt_Rijndael
  66. * @author Jim Wigginton <terrafrost@php.net>
  67. * @copyright MMVIII Jim Wigginton
  68. * @license http://www.opensource.org/licenses/mit-license.html MIT License
  69. * @version $Id: Rijndael.php,v 1.12 2010/02/09 06:10:26 terrafrost Exp $
  70. * @link http://phpseclib.sourceforge.net
  71. */
  72. namespace phpseclib;
  73. /**
  74. * Pure-PHP implementation of Rijndael.
  75. *
  76. * @author Jim Wigginton <terrafrost@php.net>
  77. * @version 0.1.0
  78. * @access public
  79. * @package Crypt_Rijndael
  80. */
  81. class Crypt_Rijndael {
  82. /**#@+
  83. * @access public
  84. * @see Crypt_Rijndael::encrypt()
  85. * @see Crypt_Rijndael::decrypt()
  86. */
  87. /**
  88. * Encrypt / decrypt using the Counter mode.
  89. *
  90. * Set to -1 since that's what Crypt/Random.php uses to index the CTR mode.
  91. *
  92. * @link http://en.wikipedia.org/wiki/Block_cipher_modes_of_operation#Counter_.28CTR.29
  93. */
  94. const MODE_CTR = -1;
  95. /**
  96. * Encrypt / decrypt using the Electronic Code Book mode.
  97. *
  98. * @link http://en.wikipedia.org/wiki/Block_cipher_modes_of_operation#Electronic_codebook_.28ECB.29
  99. */
  100. const MODE_ECB = 1;
  101. /**
  102. * Encrypt / decrypt using the Code Book Chaining mode.
  103. *
  104. * @link http://en.wikipedia.org/wiki/Block_cipher_modes_of_operation#Cipher-block_chaining_.28CBC.29
  105. */
  106. const MODE_CBC = 2;
  107. /**
  108. * Encrypt / decrypt using the Cipher Feedback mode.
  109. *
  110. * @link http://en.wikipedia.org/wiki/Block_cipher_modes_of_operation#Cipher_feedback_.28CFB.29
  111. */
  112. const MODE_CFB = 3;
  113. /**
  114. * Encrypt / decrypt using the Cipher Feedback mode.
  115. *
  116. * @link http://en.wikipedia.org/wiki/Block_cipher_modes_of_operation#Output_feedback_.28OFB.29
  117. */
  118. const MODE_OFB = 4;
  119. /**#@-*/
  120. /**#@+
  121. * @access private
  122. * @see Crypt_Rijndael::Crypt_Rijndael()
  123. */
  124. /**
  125. * Toggles the internal implementation
  126. */
  127. const MODE_INTERNAL = 1;
  128. /**
  129. * Toggles the mcrypt implementation
  130. */
  131. const MODE_MCRYPT = 2;
  132. /**#@-*/
  133. /**
  134. * The Encryption Mode
  135. *
  136. * @see Crypt_Rijndael::Crypt_Rijndael()
  137. * @var Integer
  138. * @access private
  139. */
  140. var $mode;
  141. /**
  142. * The Key
  143. *
  144. * @see Crypt_Rijndael::setKey()
  145. * @var String
  146. * @access private
  147. */
  148. var $key = "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0";
  149. /**
  150. * The Initialization Vector
  151. *
  152. * @see Crypt_Rijndael::setIV()
  153. * @var String
  154. * @access private
  155. */
  156. var $iv = '';
  157. /**
  158. * A "sliding" Initialization Vector
  159. *
  160. * @see Crypt_Rijndael::enableContinuousBuffer()
  161. * @var String
  162. * @access private
  163. */
  164. var $encryptIV = '';
  165. /**
  166. * A "sliding" Initialization Vector
  167. *
  168. * @see Crypt_Rijndael::enableContinuousBuffer()
  169. * @var String
  170. * @access private
  171. */
  172. var $decryptIV = '';
  173. /**
  174. * Continuous Buffer status
  175. *
  176. * @see Crypt_Rijndael::enableContinuousBuffer()
  177. * @var Boolean
  178. * @access private
  179. */
  180. var $continuousBuffer = false;
  181. /**
  182. * Padding status
  183. *
  184. * @see Crypt_Rijndael::enablePadding()
  185. * @var Boolean
  186. * @access private
  187. */
  188. var $padding = true;
  189. /**
  190. * Does the key schedule need to be (re)calculated?
  191. *
  192. * @see setKey()
  193. * @see setBlockLength()
  194. * @see setKeyLength()
  195. * @var Boolean
  196. * @access private
  197. */
  198. var $changed = true;
  199. /**
  200. * Has the key length explicitly been set or should it be derived from the key, itself?
  201. *
  202. * @see setKeyLength()
  203. * @var Boolean
  204. * @access private
  205. */
  206. var $explicit_key_length = false;
  207. /**
  208. * The Key Schedule
  209. *
  210. * @see _setup()
  211. * @var Array
  212. * @access private
  213. */
  214. var $w;
  215. /**
  216. * The Inverse Key Schedule
  217. *
  218. * @see _setup()
  219. * @var Array
  220. * @access private
  221. */
  222. var $dw;
  223. /**
  224. * The Block Length
  225. *
  226. * @see setBlockLength()
  227. * @var Integer
  228. * @access private
  229. * @internal The max value is 32, the min value is 16. All valid values are multiples of 4. Exists in conjunction with
  230. * $Nb because we need this value and not $Nb to pad strings appropriately.
  231. */
  232. var $block_size = 16;
  233. /**
  234. * The Block Length divided by 32
  235. *
  236. * @see setBlockLength()
  237. * @var Integer
  238. * @access private
  239. * @internal The max value is 256 / 32 = 8, the min value is 128 / 32 = 4. Exists in conjunction with $block_size
  240. * because the encryption / decryption / key schedule creation requires this number and not $block_size. We could
  241. * derive this from $block_size or vice versa, but that'd mean we'd have to do multiple shift operations, so in lieu
  242. * of that, we'll just precompute it once.
  243. *
  244. */
  245. var $Nb = 4;
  246. /**
  247. * The Key Length
  248. *
  249. * @see setKeyLength()
  250. * @var Integer
  251. * @access private
  252. * @internal The max value is 256 / 8 = 32, the min value is 128 / 8 = 16. Exists in conjunction with $key_size
  253. * because the encryption / decryption / key schedule creation requires this number and not $key_size. We could
  254. * derive this from $key_size or vice versa, but that'd mean we'd have to do multiple shift operations, so in lieu
  255. * of that, we'll just precompute it once.
  256. */
  257. var $key_size = 16;
  258. /**
  259. * The Key Length divided by 32
  260. *
  261. * @see setKeyLength()
  262. * @var Integer
  263. * @access private
  264. * @internal The max value is 256 / 32 = 8, the min value is 128 / 32 = 4
  265. */
  266. var $Nk = 4;
  267. /**
  268. * The Number of Rounds
  269. *
  270. * @var Integer
  271. * @access private
  272. * @internal The max value is 14, the min value is 10.
  273. */
  274. var $Nr;
  275. /**
  276. * Shift offsets
  277. *
  278. * @var Array
  279. * @access private
  280. */
  281. var $c;
  282. /**
  283. * Precomputed mixColumns table
  284. *
  285. * @see Crypt_Rijndael()
  286. * @var Array
  287. * @access private
  288. */
  289. var $t0;
  290. /**
  291. * Precomputed mixColumns table
  292. *
  293. * @see Crypt_Rijndael()
  294. * @var Array
  295. * @access private
  296. */
  297. var $t1;
  298. /**
  299. * Precomputed mixColumns table
  300. *
  301. * @see Crypt_Rijndael()
  302. * @var Array
  303. * @access private
  304. */
  305. var $t2;
  306. /**
  307. * Precomputed mixColumns table
  308. *
  309. * @see Crypt_Rijndael()
  310. * @var Array
  311. * @access private
  312. */
  313. var $t3;
  314. /**
  315. * Precomputed invMixColumns table
  316. *
  317. * @see Crypt_Rijndael()
  318. * @var Array
  319. * @access private
  320. */
  321. var $dt0;
  322. /**
  323. * Precomputed invMixColumns table
  324. *
  325. * @see Crypt_Rijndael()
  326. * @var Array
  327. * @access private
  328. */
  329. var $dt1;
  330. /**
  331. * Precomputed invMixColumns table
  332. *
  333. * @see Crypt_Rijndael()
  334. * @var Array
  335. * @access private
  336. */
  337. var $dt2;
  338. /**
  339. * Precomputed invMixColumns table
  340. *
  341. * @see Crypt_Rijndael()
  342. * @var Array
  343. * @access private
  344. */
  345. var $dt3;
  346. /**
  347. * Is the mode one that is paddable?
  348. *
  349. * @see Crypt_Rijndael::Crypt_Rijndael()
  350. * @var Boolean
  351. * @access private
  352. */
  353. var $paddable = false;
  354. /**
  355. * Encryption buffer for CTR, OFB and CFB modes
  356. *
  357. * @see Crypt_Rijndael::encrypt()
  358. * @var String
  359. * @access private
  360. */
  361. var $enbuffer = array('encrypted' => '', 'xor' => '');
  362. /**
  363. * Decryption buffer for CTR, OFB and CFB modes
  364. *
  365. * @see Crypt_Rijndael::decrypt()
  366. * @var String
  367. * @access private
  368. */
  369. var $debuffer = array('ciphertext' => '');
  370. /**
  371. * Default Constructor.
  372. *
  373. * Determines whether or not the mcrypt extension should be used. $mode should only, at present, be
  374. * self::MODE_ECB or self::MODE_CBC. If not explictly set, self::MODE_CBC will be used.
  375. *
  376. * @param optional Integer $mode
  377. * @return Crypt_Rijndael
  378. * @access public
  379. */
  380. function __construct($mode = self::MODE_CBC)
  381. {
  382. switch ($mode) {
  383. case self::MODE_ECB:
  384. case self::MODE_CBC:
  385. $this->paddable = true;
  386. $this->mode = $mode;
  387. break;
  388. case self::MODE_CTR:
  389. case self::MODE_CFB:
  390. case self::MODE_OFB:
  391. $this->mode = $mode;
  392. break;
  393. default:
  394. $this->paddable = true;
  395. $this->mode = self::MODE_CBC;
  396. }
  397. $t3 = &$this->t3;
  398. $t2 = &$this->t2;
  399. $t1 = &$this->t1;
  400. $t0 = &$this->t0;
  401. $dt3 = &$this->dt3;
  402. $dt2 = &$this->dt2;
  403. $dt1 = &$this->dt1;
  404. $dt0 = &$this->dt0;
  405. // according to <http://csrc.nist.gov/archive/aes/rijndael/Rijndael-ammended.pdf#page=19> (section 5.2.1),
  406. // precomputed tables can be used in the mixColumns phase. in that example, they're assigned t0...t3, so
  407. // those are the names we'll use.
  408. $t3 = array(
  409. 0x6363A5C6, 0x7C7C84F8, 0x777799EE, 0x7B7B8DF6, 0xF2F20DFF, 0x6B6BBDD6, 0x6F6FB1DE, 0xC5C55491,
  410. 0x30305060, 0x01010302, 0x6767A9CE, 0x2B2B7D56, 0xFEFE19E7, 0xD7D762B5, 0xABABE64D, 0x76769AEC,
  411. 0xCACA458F, 0x82829D1F, 0xC9C94089, 0x7D7D87FA, 0xFAFA15EF, 0x5959EBB2, 0x4747C98E, 0xF0F00BFB,
  412. 0xADADEC41, 0xD4D467B3, 0xA2A2FD5F, 0xAFAFEA45, 0x9C9CBF23, 0xA4A4F753, 0x727296E4, 0xC0C05B9B,
  413. 0xB7B7C275, 0xFDFD1CE1, 0x9393AE3D, 0x26266A4C, 0x36365A6C, 0x3F3F417E, 0xF7F702F5, 0xCCCC4F83,
  414. 0x34345C68, 0xA5A5F451, 0xE5E534D1, 0xF1F108F9, 0x717193E2, 0xD8D873AB, 0x31315362, 0x15153F2A,
  415. 0x04040C08, 0xC7C75295, 0x23236546, 0xC3C35E9D, 0x18182830, 0x9696A137, 0x05050F0A, 0x9A9AB52F,
  416. 0x0707090E, 0x12123624, 0x80809B1B, 0xE2E23DDF, 0xEBEB26CD, 0x2727694E, 0xB2B2CD7F, 0x75759FEA,
  417. 0x09091B12, 0x83839E1D, 0x2C2C7458, 0x1A1A2E34, 0x1B1B2D36, 0x6E6EB2DC, 0x5A5AEEB4, 0xA0A0FB5B,
  418. 0x5252F6A4, 0x3B3B4D76, 0xD6D661B7, 0xB3B3CE7D, 0x29297B52, 0xE3E33EDD, 0x2F2F715E, 0x84849713,
  419. 0x5353F5A6, 0xD1D168B9, 0x00000000, 0xEDED2CC1, 0x20206040, 0xFCFC1FE3, 0xB1B1C879, 0x5B5BEDB6,
  420. 0x6A6ABED4, 0xCBCB468D, 0xBEBED967, 0x39394B72, 0x4A4ADE94, 0x4C4CD498, 0x5858E8B0, 0xCFCF4A85,
  421. 0xD0D06BBB, 0xEFEF2AC5, 0xAAAAE54F, 0xFBFB16ED, 0x4343C586, 0x4D4DD79A, 0x33335566, 0x85859411,
  422. 0x4545CF8A, 0xF9F910E9, 0x02020604, 0x7F7F81FE, 0x5050F0A0, 0x3C3C4478, 0x9F9FBA25, 0xA8A8E34B,
  423. 0x5151F3A2, 0xA3A3FE5D, 0x4040C080, 0x8F8F8A05, 0x9292AD3F, 0x9D9DBC21, 0x38384870, 0xF5F504F1,
  424. 0xBCBCDF63, 0xB6B6C177, 0xDADA75AF, 0x21216342, 0x10103020, 0xFFFF1AE5, 0xF3F30EFD, 0xD2D26DBF,
  425. 0xCDCD4C81, 0x0C0C1418, 0x13133526, 0xECEC2FC3, 0x5F5FE1BE, 0x9797A235, 0x4444CC88, 0x1717392E,
  426. 0xC4C45793, 0xA7A7F255, 0x7E7E82FC, 0x3D3D477A, 0x6464ACC8, 0x5D5DE7BA, 0x19192B32, 0x737395E6,
  427. 0x6060A0C0, 0x81819819, 0x4F4FD19E, 0xDCDC7FA3, 0x22226644, 0x2A2A7E54, 0x9090AB3B, 0x8888830B,
  428. 0x4646CA8C, 0xEEEE29C7, 0xB8B8D36B, 0x14143C28, 0xDEDE79A7, 0x5E5EE2BC, 0x0B0B1D16, 0xDBDB76AD,
  429. 0xE0E03BDB, 0x32325664, 0x3A3A4E74, 0x0A0A1E14, 0x4949DB92, 0x06060A0C, 0x24246C48, 0x5C5CE4B8,
  430. 0xC2C25D9F, 0xD3D36EBD, 0xACACEF43, 0x6262A6C4, 0x9191A839, 0x9595A431, 0xE4E437D3, 0x79798BF2,
  431. 0xE7E732D5, 0xC8C8438B, 0x3737596E, 0x6D6DB7DA, 0x8D8D8C01, 0xD5D564B1, 0x4E4ED29C, 0xA9A9E049,
  432. 0x6C6CB4D8, 0x5656FAAC, 0xF4F407F3, 0xEAEA25CF, 0x6565AFCA, 0x7A7A8EF4, 0xAEAEE947, 0x08081810,
  433. 0xBABAD56F, 0x787888F0, 0x25256F4A, 0x2E2E725C, 0x1C1C2438, 0xA6A6F157, 0xB4B4C773, 0xC6C65197,
  434. 0xE8E823CB, 0xDDDD7CA1, 0x74749CE8, 0x1F1F213E, 0x4B4BDD96, 0xBDBDDC61, 0x8B8B860D, 0x8A8A850F,
  435. 0x707090E0, 0x3E3E427C, 0xB5B5C471, 0x6666AACC, 0x4848D890, 0x03030506, 0xF6F601F7, 0x0E0E121C,
  436. 0x6161A3C2, 0x35355F6A, 0x5757F9AE, 0xB9B9D069, 0x86869117, 0xC1C15899, 0x1D1D273A, 0x9E9EB927,
  437. 0xE1E138D9, 0xF8F813EB, 0x9898B32B, 0x11113322, 0x6969BBD2, 0xD9D970A9, 0x8E8E8907, 0x9494A733,
  438. 0x9B9BB62D, 0x1E1E223C, 0x87879215, 0xE9E920C9, 0xCECE4987, 0x5555FFAA, 0x28287850, 0xDFDF7AA5,
  439. 0x8C8C8F03, 0xA1A1F859, 0x89898009, 0x0D0D171A, 0xBFBFDA65, 0xE6E631D7, 0x4242C684, 0x6868B8D0,
  440. 0x4141C382, 0x9999B029, 0x2D2D775A, 0x0F0F111E, 0xB0B0CB7B, 0x5454FCA8, 0xBBBBD66D, 0x16163A2C
  441. );
  442. $dt3 = array(
  443. 0xF4A75051, 0x4165537E, 0x17A4C31A, 0x275E963A, 0xAB6BCB3B, 0x9D45F11F, 0xFA58ABAC, 0xE303934B,
  444. 0x30FA5520, 0x766DF6AD, 0xCC769188, 0x024C25F5, 0xE5D7FC4F, 0x2ACBD7C5, 0x35448026, 0x62A38FB5,
  445. 0xB15A49DE, 0xBA1B6725, 0xEA0E9845, 0xFEC0E15D, 0x2F7502C3, 0x4CF01281, 0x4697A38D, 0xD3F9C66B,
  446. 0x8F5FE703, 0x929C9515, 0x6D7AEBBF, 0x5259DA95, 0xBE832DD4, 0x7421D358, 0xE0692949, 0xC9C8448E,
  447. 0xC2896A75, 0x8E7978F4, 0x583E6B99, 0xB971DD27, 0xE14FB6BE, 0x88AD17F0, 0x20AC66C9, 0xCE3AB47D,
  448. 0xDF4A1863, 0x1A3182E5, 0x51336097, 0x537F4562, 0x6477E0B1, 0x6BAE84BB, 0x81A01CFE, 0x082B94F9,
  449. 0x48685870, 0x45FD198F, 0xDE6C8794, 0x7BF8B752, 0x73D323AB, 0x4B02E272, 0x1F8F57E3, 0x55AB2A66,
  450. 0xEB2807B2, 0xB5C2032F, 0xC57B9A86, 0x3708A5D3, 0x2887F230, 0xBFA5B223, 0x036ABA02, 0x16825CED,
  451. 0xCF1C2B8A, 0x79B492A7, 0x07F2F0F3, 0x69E2A14E, 0xDAF4CD65, 0x05BED506, 0x34621FD1, 0xA6FE8AC4,
  452. 0x2E539D34, 0xF355A0A2, 0x8AE13205, 0xF6EB75A4, 0x83EC390B, 0x60EFAA40, 0x719F065E, 0x6E1051BD,
  453. 0x218AF93E, 0xDD063D96, 0x3E05AEDD, 0xE6BD464D, 0x548DB591, 0xC45D0571, 0x06D46F04, 0x5015FF60,
  454. 0x98FB2419, 0xBDE997D6, 0x4043CC89, 0xD99E7767, 0xE842BDB0, 0x898B8807, 0x195B38E7, 0xC8EEDB79,
  455. 0x7C0A47A1, 0x420FE97C, 0x841EC9F8, 0x00000000, 0x80868309, 0x2BED4832, 0x1170AC1E, 0x5A724E6C,
  456. 0x0EFFFBFD, 0x8538560F, 0xAED51E3D, 0x2D392736, 0x0FD9640A, 0x5CA62168, 0x5B54D19B, 0x362E3A24,
  457. 0x0A67B10C, 0x57E70F93, 0xEE96D2B4, 0x9B919E1B, 0xC0C54F80, 0xDC20A261, 0x774B695A, 0x121A161C,
  458. 0x93BA0AE2, 0xA02AE5C0, 0x22E0433C, 0x1B171D12, 0x090D0B0E, 0x8BC7ADF2, 0xB6A8B92D, 0x1EA9C814,
  459. 0xF1198557, 0x75074CAF, 0x99DDBBEE, 0x7F60FDA3, 0x01269FF7, 0x72F5BC5C, 0x663BC544, 0xFB7E345B,
  460. 0x4329768B, 0x23C6DCCB, 0xEDFC68B6, 0xE4F163B8, 0x31DCCAD7, 0x63851042, 0x97224013, 0xC6112084,
  461. 0x4A247D85, 0xBB3DF8D2, 0xF93211AE, 0x29A16DC7, 0x9E2F4B1D, 0xB230F3DC, 0x8652EC0D, 0xC1E3D077,
  462. 0xB3166C2B, 0x70B999A9, 0x9448FA11, 0xE9642247, 0xFC8CC4A8, 0xF03F1AA0, 0x7D2CD856, 0x3390EF22,
  463. 0x494EC787, 0x38D1C1D9, 0xCAA2FE8C, 0xD40B3698, 0xF581CFA6, 0x7ADE28A5, 0xB78E26DA, 0xADBFA43F,
  464. 0x3A9DE42C, 0x78920D50, 0x5FCC9B6A, 0x7E466254, 0x8D13C2F6, 0xD8B8E890, 0x39F75E2E, 0xC3AFF582,
  465. 0x5D80BE9F, 0xD0937C69, 0xD52DA96F, 0x2512B3CF, 0xAC993BC8, 0x187DA710, 0x9C636EE8, 0x3BBB7BDB,
  466. 0x267809CD, 0x5918F46E, 0x9AB701EC, 0x4F9AA883, 0x956E65E6, 0xFFE67EAA, 0xBCCF0821, 0x15E8E6EF,
  467. 0xE79BD9BA, 0x6F36CE4A, 0x9F09D4EA, 0xB07CD629, 0xA4B2AF31, 0x3F23312A, 0xA59430C6, 0xA266C035,
  468. 0x4EBC3774, 0x82CAA6FC, 0x90D0B0E0, 0xA7D81533, 0x04984AF1, 0xECDAF741, 0xCD500E7F, 0x91F62F17,
  469. 0x4DD68D76, 0xEFB04D43, 0xAA4D54CC, 0x9604DFE4, 0xD1B5E39E, 0x6A881B4C, 0x2C1FB8C1, 0x65517F46,
  470. 0x5EEA049D, 0x8C355D01, 0x877473FA, 0x0B412EFB, 0x671D5AB3, 0xDBD25292, 0x105633E9, 0xD647136D,
  471. 0xD7618C9A, 0xA10C7A37, 0xF8148E59, 0x133C89EB, 0xA927EECE, 0x61C935B7, 0x1CE5EDE1, 0x47B13C7A,
  472. 0xD2DF599C, 0xF2733F55, 0x14CE7918, 0xC737BF73, 0xF7CDEA53, 0xFDAA5B5F, 0x3D6F14DF, 0x44DB8678,
  473. 0xAFF381CA, 0x68C43EB9, 0x24342C38, 0xA3405FC2, 0x1DC37216, 0xE2250CBC, 0x3C498B28, 0x0D9541FF,
  474. 0xA8017139, 0x0CB3DE08, 0xB4E49CD8, 0x56C19064, 0xCB84617B, 0x32B670D5, 0x6C5C7448, 0xB85742D0
  475. );
  476. for ($i = 0; $i < 256; $i++) {
  477. $t2[$i << 8] = (($t3[$i] << 8) & 0xFFFFFF00) | (($t3[$i] >> 24) & 0x000000FF);
  478. $t1[$i << 16] = (($t3[$i] << 16) & 0xFFFF0000) | (($t3[$i] >> 16) & 0x0000FFFF);
  479. $t0[$i << 24] = (($t3[$i] << 24) & 0xFF000000) | (($t3[$i] >> 8) & 0x00FFFFFF);
  480. $dt2[$i << 8] = (($this->dt3[$i] << 8) & 0xFFFFFF00) | (($dt3[$i] >> 24) & 0x000000FF);
  481. $dt1[$i << 16] = (($this->dt3[$i] << 16) & 0xFFFF0000) | (($dt3[$i] >> 16) & 0x0000FFFF);
  482. $dt0[$i << 24] = (($this->dt3[$i] << 24) & 0xFF000000) | (($dt3[$i] >> 8) & 0x00FFFFFF);
  483. }
  484. }
  485. /**
  486. * Sets the key.
  487. *
  488. * Keys can be of any length. Rijndael, itself, requires the use of a key that's between 128-bits and 256-bits long and
  489. * whose length is a multiple of 32. If the key is less than 256-bits and the key length isn't set, we round the length
  490. * up to the closest valid key length, padding $key with null bytes. If the key is more than 256-bits, we trim the
  491. * excess bits.
  492. *
  493. * If the key is not explicitly set, it'll be assumed to be all null bytes.
  494. *
  495. * @access public
  496. * @param String $key
  497. */
  498. function setKey($key)
  499. {
  500. $this->key = $key;
  501. $this->changed = true;
  502. }
  503. /**
  504. * Sets the initialization vector. (optional)
  505. *
  506. * SetIV is not required when self::MODE_ECB is being used. If not explictly set, it'll be assumed
  507. * to be all zero's.
  508. *
  509. * @access public
  510. * @param String $iv
  511. */
  512. function setIV($iv)
  513. {
  514. $this->encryptIV = $this->decryptIV = $this->iv = str_pad(substr($iv, 0, $this->block_size), $this->block_size, chr(0));
  515. }
  516. /**
  517. * Sets the key length
  518. *
  519. * Valid key lengths are 128, 160, 192, 224, and 256. If the length is less than 128, it will be rounded up to
  520. * 128. If the length is greater then 128 and invalid, it will be rounded down to the closest valid amount.
  521. *
  522. * @access public
  523. * @param Integer $length
  524. */
  525. function setKeyLength($length)
  526. {
  527. $length >>= 5;
  528. if ($length > 8) {
  529. $length = 8;
  530. } else if ($length < 4) {
  531. $length = 4;
  532. }
  533. $this->Nk = $length;
  534. $this->key_size = $length << 2;
  535. $this->explicit_key_length = true;
  536. $this->changed = true;
  537. }
  538. /**
  539. * Sets the password.
  540. *
  541. * Depending on what $method is set to, setPassword()'s (optional) parameters are as follows:
  542. * {@link http://en.wikipedia.org/wiki/PBKDF2 pbkdf2}:
  543. * $hash, $salt, $count
  544. * Set $dkLen by calling setKeyLength()
  545. *
  546. * @param String $password
  547. * @param optional String $method
  548. * @access public
  549. */
  550. function setPassword($password, $method = 'pbkdf2')
  551. {
  552. $key = '';
  553. switch ($method) {
  554. default: // 'pbkdf2'
  555. //not the prettiest thing ever, but solves the undefined index issue with list()
  556. $args = func_get_args();
  557. $hash = 'sha1';
  558. $salt = 'phpseclib/salt';
  559. $count = 1000;
  560. switch(count($args)){
  561. case 6:
  562. case 5:
  563. $count = $args[4];
  564. case 4:
  565. $salt = $args[3];
  566. case 3:
  567. $hash = $args[2];
  568. }
  569. $i = 1;
  570. while (strlen($key) < $this->key_size) { // $dkLen == $this->key_size
  571. //$dk.= $this->_pbkdf($password, $salt, $count, $i++);
  572. $hmac = new Crypt_Hash();
  573. $hmac->setHash($hash);
  574. $hmac->setKey($password);
  575. $f = $u = $hmac->hash($salt . pack('N', $i++));
  576. for ($j = 2; $j <= $count; $j++) {
  577. $u = $hmac->hash($u);
  578. $f^= $u;
  579. }
  580. $key.= $f;
  581. }
  582. }
  583. $this->setKey(substr($key, 0, $this->key_size));
  584. }
  585. /**
  586. * Sets the block length
  587. *
  588. * Valid block lengths are 128, 160, 192, 224, and 256. If the length is less than 128, it will be rounded up to
  589. * 128. If the length is greater then 128 and invalid, it will be rounded down to the closest valid amount.
  590. *
  591. * @access public
  592. * @param Integer $length
  593. */
  594. function setBlockLength($length)
  595. {
  596. $length >>= 5;
  597. if ($length > 8) {
  598. $length = 8;
  599. } else if ($length < 4) {
  600. $length = 4;
  601. }
  602. $this->Nb = $length;
  603. $this->block_size = $length << 2;
  604. $this->changed = true;
  605. }
  606. /**
  607. * Generate CTR XOR encryption key
  608. *
  609. * Encrypt the output of this and XOR it against the ciphertext / plaintext to get the
  610. * plaintext / ciphertext in CTR mode.
  611. *
  612. * @see Crypt_Rijndael::decrypt()
  613. * @see Crypt_Rijndael::encrypt()
  614. * @access public
  615. * @param Integer $length
  616. * @param String $iv
  617. */
  618. function _generate_xor($length, &$iv)
  619. {
  620. $xor = '';
  621. $block_size = $this->block_size;
  622. $num_blocks = floor(($length + ($block_size - 1)) / $block_size);
  623. for ($i = 0; $i < $num_blocks; $i++) {
  624. $xor.= $iv;
  625. for ($j = 4; $j <= $block_size; $j+=4) {
  626. $temp = substr($iv, -$j, 4);
  627. switch ($temp) {
  628. case "\xFF\xFF\xFF\xFF":
  629. $iv = substr_replace($iv, "\x00\x00\x00\x00", -$j, 4);
  630. break;
  631. case "\x7F\xFF\xFF\xFF":
  632. $iv = substr_replace($iv, "\x80\x00\x00\x00", -$j, 4);
  633. break 2;
  634. default:
  635. extract(unpack('Ncount', $temp));
  636. $iv = substr_replace($iv, pack('N', $count + 1), -$j, 4);
  637. break 2;
  638. }
  639. }
  640. }
  641. return $xor;
  642. }
  643. /**
  644. * Encrypts a message.
  645. *
  646. * $plaintext will be padded with additional bytes such that it's length is a multiple of the block size. Other Rjindael
  647. * implementations may or may not pad in the same manner. Other common approaches to padding and the reasons why it's
  648. * necessary are discussed in the following
  649. * URL:
  650. *
  651. * {@link http://www.di-mgt.com.au/cryptopad.html http://www.di-mgt.com.au/cryptopad.html}
  652. *
  653. * An alternative to padding is to, separately, send the length of the file. This is what SSH, in fact, does.
  654. * strlen($plaintext) will still need to be a multiple of 8, however, arbitrary values can be added to make it that
  655. * length.
  656. *
  657. * @see Crypt_Rijndael::decrypt()
  658. * @access public
  659. * @param String $plaintext
  660. */
  661. function encrypt($plaintext)
  662. {
  663. $this->_setup();
  664. if ($this->paddable) {
  665. $plaintext = $this->_pad($plaintext);
  666. }
  667. $block_size = $this->block_size;
  668. $buffer = &$this->enbuffer;
  669. $continuousBuffer = $this->continuousBuffer;
  670. $ciphertext = '';
  671. switch ($this->mode) {
  672. case self::MODE_ECB:
  673. for ($i = 0; $i < strlen($plaintext); $i+=$block_size) {
  674. $ciphertext.= $this->_encryptBlock(substr($plaintext, $i, $block_size));
  675. }
  676. break;
  677. case self::MODE_CBC:
  678. $xor = $this->encryptIV;
  679. for ($i = 0; $i < strlen($plaintext); $i+=$block_size) {
  680. $block = substr($plaintext, $i, $block_size);
  681. $block = $this->_encryptBlock($block ^ $xor);
  682. $xor = $block;
  683. $ciphertext.= $block;
  684. }
  685. if ($this->continuousBuffer) {
  686. $this->encryptIV = $xor;
  687. }
  688. break;
  689. case self::MODE_CTR:
  690. $xor = $this->encryptIV;
  691. if (!empty($buffer['encrypted'])) {
  692. for ($i = 0; $i < strlen($plaintext); $i+=$block_size) {
  693. $block = substr($plaintext, $i, $block_size);
  694. $buffer['encrypted'].= $this->_encryptBlock($this->_generate_xor($block_size, $xor));
  695. $key = $this->_string_shift($buffer['encrypted'], $block_size);
  696. $ciphertext.= $block ^ $key;
  697. }
  698. } else {
  699. for ($i = 0; $i < strlen($plaintext); $i+=$block_size) {
  700. $block = substr($plaintext, $i, $block_size);
  701. $key = $this->_encryptBlock($this->_generate_xor($block_size, $xor));
  702. $ciphertext.= $block ^ $key;
  703. }
  704. }
  705. if ($this->continuousBuffer) {
  706. $this->encryptIV = $xor;
  707. if ($start = strlen($plaintext) % $block_size) {
  708. $buffer['encrypted'] = substr($key, $start) . $buffer['encrypted'];
  709. }
  710. }
  711. break;
  712. case self::MODE_CFB:
  713. if (!empty($buffer['xor'])) {
  714. $ciphertext = $plaintext ^ $buffer['xor'];
  715. $iv = $buffer['encrypted'] . $ciphertext;
  716. $start = strlen($ciphertext);
  717. $buffer['encrypted'].= $ciphertext;
  718. $buffer['xor'] = substr($buffer['xor'], strlen($ciphertext));
  719. } else {
  720. $ciphertext = '';
  721. $iv = $this->encryptIV;
  722. $start = 0;
  723. }
  724. for ($i = $start; $i < strlen($plaintext); $i+=$block_size) {
  725. $block = substr($plaintext, $i, $block_size);
  726. $xor = $this->_encryptBlock($iv);
  727. $iv = $block ^ $xor;
  728. if ($continuousBuffer && strlen($iv) != $block_size) {
  729. $buffer = array(
  730. 'encrypted' => $iv,
  731. 'xor' => substr($xor, strlen($iv))
  732. );
  733. }
  734. $ciphertext.= $iv;
  735. }
  736. if ($this->continuousBuffer) {
  737. $this->encryptIV = $iv;
  738. }
  739. break;
  740. case self::MODE_OFB:
  741. $xor = $this->encryptIV;
  742. if (is_string($buffer) && strlen($buffer)) {
  743. for ($i = 0; $i < strlen($plaintext); $i+=$block_size) {
  744. $xor = $this->_encryptBlock($xor);
  745. $buffer.= $xor;
  746. $key = $this->_string_shift($buffer, $block_size);
  747. $ciphertext.= substr($plaintext, $i, $block_size) ^ $key;
  748. }
  749. } else {
  750. for ($i = 0; $i < strlen($plaintext); $i+=$block_size) {
  751. $xor = $this->_encryptBlock($xor);
  752. $ciphertext.= substr($plaintext, $i, $block_size) ^ $xor;
  753. }
  754. $key = $xor;
  755. }
  756. if ($this->continuousBuffer) {
  757. $this->encryptIV = $xor;
  758. if ($start = strlen($plaintext) % $block_size) {
  759. $buffer = substr($key, $start) . $buffer;
  760. }
  761. }
  762. }
  763. return $ciphertext;
  764. }
  765. /**
  766. * Decrypts a message.
  767. *
  768. * If strlen($ciphertext) is not a multiple of the block size, null bytes will be added to the end of the string until
  769. * it is.
  770. *
  771. * @see Crypt_Rijndael::encrypt()
  772. * @access public
  773. * @param String $ciphertext
  774. */
  775. function decrypt($ciphertext)
  776. {
  777. $this->_setup();
  778. if ($this->paddable) {
  779. // we pad with chr(0) since that's what mcrypt_generic does. to quote from http://php.net/function.mcrypt-generic :
  780. // "The data is padded with "\0" to make sure the length of the data is n * blocksize."
  781. $ciphertext = str_pad($ciphertext, strlen($ciphertext) + ($this->block_size - strlen($ciphertext) % $this->block_size) % $this->block_size, chr(0));
  782. }
  783. $block_size = $this->block_size;
  784. $buffer = &$this->debuffer;
  785. $continuousBuffer = $this->continuousBuffer;
  786. $plaintext = '';
  787. switch ($this->mode) {
  788. case self::MODE_ECB:
  789. for ($i = 0; $i < strlen($ciphertext); $i+=$block_size) {
  790. $plaintext.= $this->_decryptBlock(substr($ciphertext, $i, $block_size));
  791. }
  792. break;
  793. case self::MODE_CBC:
  794. $xor = $this->decryptIV;
  795. for ($i = 0; $i < strlen($ciphertext); $i+=$block_size) {
  796. $block = substr($ciphertext, $i, $block_size);
  797. $plaintext.= $this->_decryptBlock($block) ^ $xor;
  798. $xor = $block;
  799. }
  800. if ($this->continuousBuffer) {
  801. $this->decryptIV = $xor;
  802. }
  803. break;
  804. case self::MODE_CTR:
  805. $xor = $this->decryptIV;
  806. if (!empty($buffer['ciphertext'])) {
  807. for ($i = 0; $i < strlen($ciphertext); $i+=$block_size) {
  808. $block = substr($ciphertext, $i, $block_size);
  809. $buffer['ciphertext'].= $this->_encryptBlock($this->_generate_xor($block_size, $xor));
  810. $key = $this->_string_shift($buffer['ciphertext'], $block_size);
  811. $plaintext.= $block ^ $key;
  812. }
  813. } else {
  814. for ($i = 0; $i < strlen($ciphertext); $i+=$block_size) {
  815. $block = substr($ciphertext, $i, $block_size);
  816. $key = $this->_encryptBlock($this->_generate_xor($block_size, $xor));
  817. $plaintext.= $block ^ $key;
  818. }
  819. }
  820. if ($this->continuousBuffer) {
  821. $this->decryptIV = $xor;
  822. if ($start = strlen($ciphertext) % $block_size) {
  823. $buffer['ciphertext'] = substr($key, $start) . $buffer['encrypted'];
  824. }
  825. }
  826. break;
  827. case self::MODE_CFB:
  828. if (!empty($buffer['ciphertext'])) {
  829. $plaintext = $ciphertext ^ substr($this->decryptIV, strlen($buffer['ciphertext']));
  830. $buffer['ciphertext'].= substr($ciphertext, 0, strlen($plaintext));
  831. if (strlen($buffer['ciphertext']) == $block_size) {
  832. $xor = $this->_encryptBlock($buffer['ciphertext']);
  833. $buffer['ciphertext'] = '';
  834. }
  835. $start = strlen($plaintext);
  836. $block = $this->decryptIV;
  837. } else {
  838. $plaintext = '';
  839. $xor = $this->_encryptBlock($this->decryptIV);
  840. $start = 0;
  841. }
  842. for ($i = $start; $i < strlen($ciphertext); $i+=$block_size) {
  843. $block = substr($ciphertext, $i, $block_size);
  844. $plaintext.= $block ^ $xor;
  845. if ($continuousBuffer && strlen($block) != $block_size) {
  846. $buffer['ciphertext'].= $block;
  847. $block = $xor;
  848. } else if (strlen($block) == $block_size) {
  849. $xor = $this->_encryptBlock($block);
  850. }
  851. }
  852. if ($this->continuousBuffer) {
  853. $this->decryptIV = $block;
  854. }
  855. break;
  856. case self::MODE_OFB:
  857. $xor = $this->decryptIV;
  858. if (is_string($buffer) && strlen($buffer)) {
  859. for ($i = 0; $i < strlen($ciphertext); $i+=$block_size) {
  860. $xor = $this->_encryptBlock($xor);
  861. $buffer.= $xor;
  862. $key = $this->_string_shift($buffer, $block_size);
  863. $plaintext.= substr($ciphertext, $i, $block_size) ^ $key;
  864. }
  865. } else {
  866. for ($i = 0; $i < strlen($ciphertext); $i+=$block_size) {
  867. $xor = $this->_encryptBlock($xor);
  868. $plaintext.= substr($ciphertext, $i, $block_size) ^ $xor;
  869. }
  870. $key = $xor;
  871. }
  872. if ($this->continuousBuffer) {
  873. $this->decryptIV = $xor;
  874. if ($start = strlen($ciphertext) % $block_size) {
  875. $buffer = substr($key, $start) . $buffer;
  876. }
  877. }
  878. }
  879. return $this->paddable ? $this->_unpad($plaintext) : $plaintext;
  880. }
  881. /**
  882. * Encrypts a block
  883. *
  884. * @access private
  885. * @param String $in
  886. * @return String
  887. */
  888. function _encryptBlock($in)
  889. {
  890. $state = array();
  891. $words = unpack('N*word', $in);
  892. $w = $this->w;
  893. $t0 = $this->t0;
  894. $t1 = $this->t1;
  895. $t2 = $this->t2;
  896. $t3 = $this->t3;
  897. $Nb = $this->Nb;
  898. $Nr = $this->Nr;
  899. $c = $this->c;
  900. // addRoundKey
  901. $i = 0;
  902. foreach ($words as $word) {
  903. $state[] = $word ^ $w[0][$i++];
  904. }
  905. // fips-197.pdf#page=19, "Figure 5. Pseudo Code for the Cipher", states that this loop has four components -
  906. // subBytes, shiftRows, mixColumns, and addRoundKey. fips-197.pdf#page=30, "Implementation Suggestions Regarding
  907. // Various Platforms" suggests that performs enhanced implementations are described in Rijndael-ammended.pdf.
  908. // Rijndael-ammended.pdf#page=20, "Implementation aspects / 32-bit processor", discusses such an optimization.
  909. // Unfortunately, the description given there is not quite correct. Per aes.spec.v316.pdf#page=19 [1],
  910. // equation (7.4.7) is supposed to use addition instead of subtraction, so we'll do that here, as well.
  911. // [1] http://fp.gladman.plus.com/cryptography_technology/rijndael/aes.spec.v316.pdf
  912. $temp = array();
  913. for ($round = 1; $round < $Nr; $round++) {
  914. $i = 0; // $c[0] == 0
  915. $j = $c[1];
  916. $k = $c[2];
  917. $l = $c[3];
  918. while ($i < $this->Nb) {
  919. $temp[$i] = $t0[$state[$i] & 0xFF000000] ^
  920. $t1[$state[$j] & 0x00FF0000] ^
  921. $t2[$state[$k] & 0x0000FF00] ^
  922. $t3[$state[$l] & 0x000000FF] ^
  923. $w[$round][$i];
  924. $i++;
  925. $j = ($j + 1) % $Nb;
  926. $k = ($k + 1) % $Nb;
  927. $l = ($l + 1) % $Nb;
  928. }
  929. for ($i = 0; $i < $Nb; $i++) {
  930. $state[$i] = $temp[$i];
  931. }
  932. }
  933. // subWord
  934. for ($i = 0; $i < $Nb; $i++) {
  935. $state[$i] = $this->_subWord($state[$i]);
  936. }
  937. // shiftRows + addRoundKey
  938. $i = 0; // $c[0] == 0
  939. $j = $c[1];
  940. $k = $c[2];
  941. $l = $c[3];
  942. while ($i < $this->Nb) {
  943. $temp[$i] = ($state[$i] & 0xFF000000) ^
  944. ($state[$j] & 0x00FF0000) ^
  945. ($state[$k] & 0x0000FF00) ^
  946. ($state[$l] & 0x000000FF) ^
  947. $w[$Nr][$i];
  948. $i++;
  949. $j = ($j + 1) % $Nb;
  950. $k = ($k + 1) % $Nb;
  951. $l = ($l + 1) % $Nb;
  952. }
  953. $state = $temp;
  954. array_unshift($state, 'N*');
  955. return call_user_func_array('pack', $state);
  956. }
  957. /**
  958. * Decrypts a block
  959. *
  960. * @access private
  961. * @param String $in
  962. * @return String
  963. */
  964. function _decryptBlock($in)
  965. {
  966. $state = array();
  967. $words = unpack('N*word', $in);
  968. $num_states = count($state);
  969. $dw = $this->dw;
  970. $dt0 = $this->dt0;
  971. $dt1 = $this->dt1;
  972. $dt2 = $this->dt2;
  973. $dt3 = $this->dt3;
  974. $Nb = $this->Nb;
  975. $Nr = $this->Nr;
  976. $c = $this->c;
  977. // addRoundKey
  978. $i = 0;
  979. foreach ($words as $word) {
  980. $state[] = $word ^ $dw[$Nr][$i++];
  981. }
  982. $temp = array();
  983. for ($round = $Nr - 1; $round > 0; $round--) {
  984. $i = 0; // $c[0] == 0
  985. $j = $Nb - $c[1];
  986. $k = $Nb - $c[2];
  987. $l = $Nb - $c[3];
  988. while ($i < $Nb) {
  989. $temp[$i] = $dt0[$state[$i] & 0xFF000000] ^
  990. $dt1[$state[$j] & 0x00FF0000] ^
  991. $dt2[$state[$k] & 0x0000FF00] ^
  992. $dt3[$state[$l] & 0x000000FF] ^
  993. $dw[$round][$i];
  994. $i++;
  995. $j = ($j + 1) % $Nb;
  996. $k = ($k + 1) % $Nb;
  997. $l = ($l + 1) % $Nb;
  998. }
  999. for ($i = 0; $i < $Nb; $i++) {
  1000. $state[$i] = $temp[$i];
  1001. }
  1002. }
  1003. // invShiftRows + invSubWord + addRoundKey
  1004. $i = 0; // $c[0] == 0
  1005. $j = $Nb - $c[1];
  1006. $k = $Nb - $c[2];
  1007. $l = $Nb - $c[3];
  1008. while ($i < $Nb) {
  1009. $temp[$i] = $dw[0][$i] ^
  1010. $this->_invSubWord(($state[$i] & 0xFF000000) |
  1011. ($state[$j] & 0x00FF0000) |
  1012. ($state[$k] & 0x0000FF00) |
  1013. ($state[$l] & 0x000000FF));
  1014. $i++;
  1015. $j = ($j + 1) % $Nb;
  1016. $k = ($k + 1) % $Nb;
  1017. $l = ($l + 1) % $Nb;
  1018. }
  1019. $state = $temp;
  1020. array_unshift($state, 'N*');
  1021. return call_user_func_array('pack', $state);
  1022. }
  1023. /**
  1024. * Setup Rijndael
  1025. *
  1026. * Validates all the variables and calculates $Nr - the number of rounds that need to be performed - and $w - the key
  1027. * key schedule.
  1028. *
  1029. * @access private
  1030. */
  1031. function _setup()
  1032. {
  1033. // Each number in $rcon is equal to the previous number multiplied by two in Rijndael's finite field.
  1034. // See http://en.wikipedia.org/wiki/Finite_field_arithmetic#Multiplicative_inverse
  1035. static $rcon = array(0,
  1036. 0x01000000, 0x02000000, 0x04000000, 0x08000000, 0x10000000,
  1037. 0x20000000, 0x40000000, 0x80000000, 0x1B000000, 0x36000000,
  1038. 0x6C000000, 0xD8000000, 0xAB000000, 0x4D000000, 0x9A000000,
  1039. 0x2F000000, 0x5E000000, 0xBC000000, 0x63000000, 0xC6000000,
  1040. 0x97000000, 0x35000000, 0x6A000000, 0xD4000000, 0xB3000000,
  1041. 0x7D000000, 0xFA000000, 0xEF000000, 0xC5000000, 0x91000000
  1042. );
  1043. if (!$this->changed) {
  1044. return;
  1045. }
  1046. if (!$this->explicit_key_length) {
  1047. // we do >> 2, here, and not >> 5, as we do above, since strlen($this->key) tells us the number of bytes - not bits
  1048. $length = strlen($this->key) >> 2;
  1049. if ($length > 8) {
  1050. $length = 8;
  1051. } else if ($length < 4) {
  1052. $length = 4;
  1053. }
  1054. $this->Nk = $length;
  1055. $this->key_size = $length << 2;
  1056. }
  1057. $this->key = str_pad(substr($this->key, 0, $this->key_size), $this->key_size, chr(0));
  1058. $this->encryptIV = $this->decryptIV = $this->iv = str_pad(substr($this->iv, 0, $this->block_size), $this->block_size, chr(0));
  1059. // see Rijndael-ammended.pdf#page=44
  1060. $this->Nr = max($this->Nk, $this->Nb) + 6;
  1061. // shift offsets for Nb = 5, 7 are defined in Rijndael-ammended.pdf#page=44,
  1062. // "Table 8: Shift offsets in Shiftrow for the alternative block lengths"
  1063. // shift offsets for Nb = 4, 6, 8 are defined in Rijndael-ammended.pdf#page=14,
  1064. // "Table 2: Shift offsets for different block lengths"
  1065. switch ($this->Nb) {
  1066. case 4:
  1067. case 5:
  1068. case 6:
  1069. $this->c = array(0, 1, 2, 3);
  1070. break;
  1071. case 7:
  1072. $this->c = array(0, 1, 2, 4);
  1073. break;
  1074. case 8:
  1075. $this->c = array(0, 1, 3, 4);
  1076. }
  1077. $key = $this->key;
  1078. $w = array_values(unpack('N*words', $key));
  1079. $length = $this->Nb * ($this->Nr + 1);
  1080. for ($i = $this->Nk; $i < $length; $i++) {
  1081. $temp = $w[$i - 1];
  1082. if ($i % $this->Nk == 0) {
  1083. // according to <http://php.net/language.types.integer>, "the size of an integer is platform-dependent".
  1084. // on a 32-bit machine, it's 32-bits, and on a 64-bit machine, it's 64-bits. on a 32-bit machine,
  1085. // 0xFFFFFFFF << 8 == 0xFFFFFF00, but on a 64-bit machine, it equals 0xFFFFFFFF00. as such, doing 'and'
  1086. // with 0xFFFFFFFF (or 0xFFFFFF00) on a 32-bit machine is unnecessary, but on a 64-bit machine, it is.
  1087. $temp = (($temp << 8) & 0xFFFFFF00) | (($temp >> 24) & 0x000000FF); // rotWord
  1088. $temp = $this->_subWord($temp) ^ $rcon[$i / $this->Nk];
  1089. } else if ($this->Nk > 6 && $i % $this->Nk == 4) {
  1090. $temp = $this->_subWord($temp);
  1091. }
  1092. $w[$i] = $w[$i - $this->Nk] ^ $temp;
  1093. }
  1094. // convert the key schedule from a vector of $Nb * ($Nr + 1) length to a matrix with $Nr + 1 rows and $Nb columns
  1095. // and generate the inverse key schedule. more specifically,
  1096. // according to <http://csrc.nist.gov/archive/aes/rijndael/Rijndael-ammended.pdf#page=23> (section 5.3.3),
  1097. // "The key expansion for the Inverse Cipher is defined as follows:
  1098. // 1. Apply the Key Expansion.
  1099. // 2. Apply InvMixColumn to all Round Keys except the first and the last one."
  1100. // also, see fips-197.pdf#page=27, "5.3.5 Equivalent Inverse Cipher"
  1101. $temp = array();
  1102. for ($i = $row = $col = 0; $i < $length; $i++, $col++) {
  1103. if ($col == $this->Nb) {
  1104. if ($row == 0) {
  1105. $this->dw[0] = $this->w[0];
  1106. } else {
  1107. // subWord + invMixColumn + invSubWord = invMixColumn
  1108. $j = 0;
  1109. while ($j < $this->Nb) {
  1110. $dw = $this->_subWord($this->w[$row][$j]);
  1111. $temp[$j] = $this->dt0[$dw & 0xFF000000] ^
  1112. $this->dt1[$dw & 0x00FF0000] ^
  1113. $this->dt2[$dw & 0x0000FF00] ^
  1114. $this->dt3[$dw & 0x000000FF];
  1115. $j++;
  1116. }
  1117. $this->dw[$row] = $temp;
  1118. }
  1119. $col = 0;
  1120. $row++;
  1121. }
  1122. $this->w[$row][$col] = $w[$i];
  1123. }
  1124. $this->dw[$row] = $this->w[$row];
  1125. $this->changed = false;
  1126. }
  1127. /**
  1128. * Performs S-Box substitutions
  1129. *
  1130. * @access private
  1131. */
  1132. function _subWord($word)
  1133. {
  1134. static $sbox0, $sbox1, $sbox2, $sbox3;
  1135. if (empty($sbox0)) {
  1136. $sbox0 = array(
  1137. 0x63, 0x7C, 0x77, 0x7B, 0xF2, 0x6B, 0x6F, 0xC5, 0x30, 0x01, 0x67, 0x2B, 0xFE, 0xD7, 0xAB, 0x76,
  1138. 0xCA, 0x82, 0xC9, 0x7D, 0xFA, 0x59, 0x47, 0xF0, 0xAD, 0xD4, 0xA2, 0xAF, 0x9C, 0xA4, 0x72, 0xC0,
  1139. 0xB7, 0xFD, 0x93, 0x26, 0x36, 0x3F, 0xF7, 0xCC, 0x34, 0xA5, 0xE5, 0xF1, 0x71, 0xD8, 0x31, 0x15,
  1140. 0x04, 0xC7, 0x23, 0xC3, 0x18, 0x96, 0x05, 0x9A, 0x07, 0x12, 0x80, 0xE2, 0xEB, 0x27, 0xB2, 0x75,
  1141. 0x09, 0x83, 0x2C, 0x1A, 0x1B, 0x6E, 0x5A, 0xA0, 0x52, 0x3B, 0xD6, 0xB3, 0x29, 0xE3, 0x2F, 0x84,
  1142. 0x53, 0xD1, 0x00, 0xED, 0x20, 0xFC, 0xB1, 0x5B, 0x6A, 0xCB, 0xBE, 0x39, 0x4A, 0x4C, 0x58, 0xCF,
  1143. 0xD0, 0xEF, 0xAA, 0xFB, 0x43, 0x4D, 0x33, 0x85, 0x45, 0xF9, 0x02, 0x7F, 0x50, 0x3C, 0x9F, 0xA8,
  1144. 0x51, 0xA3, 0x40, 0x8F, 0x92, 0x9D, 0x38, 0xF5, 0xBC, 0xB6, 0xDA, 0x21, 0x10, 0xFF, 0xF3, 0xD2,
  1145. 0xCD, 0x0C, 0x13, 0xEC, 0x5F, 0x97, 0x44, 0x17, 0xC4, 0xA7, 0x7E, 0x3D, 0x64, 0x5D, 0x19, 0x73,
  1146. 0x60, 0x81, 0x4F, 0xDC, 0x22, 0x2A, 0x90, 0x88, 0x46, 0xEE, 0xB8, 0x14, 0xDE, 0x5E, 0x0B, 0xDB,
  1147. 0xE0, 0x32, 0x3A, 0x0A, 0x49, 0x06, 0x24, 0x5C, 0xC2, 0xD3, 0xAC, 0x62, 0x91, 0x95, 0xE4, 0x79,
  1148. 0xE7, 0xC8, 0x37, 0x6D, 0x8D, 0xD5, 0x4E, 0xA9, 0x6C, 0x56, 0xF4, 0xEA, 0x65, 0x7A, 0xAE, 0x08,
  1149. 0xBA, 0x78, 0x25, 0x2E, 0x1C, 0xA6, 0xB4, 0xC6, 0xE8, 0xDD, 0x74, 0x1F, 0x4B, 0xBD, 0x8B, 0x8A,
  1150. 0x70, 0x3E, 0xB5, 0x66, 0x48, 0x03, 0xF6, 0x0E, 0x61, 0x35, 0x57, 0xB9, 0x86, 0xC1, 0x1D, 0x9E,
  1151. 0xE1, 0xF8, 0x98, 0x11, 0x69, 0xD9, 0x8E, 0x94, 0x9B, 0x1E, 0x87, 0xE9, 0xCE, 0x55, 0x28, 0xDF,
  1152. 0x8C, 0xA1, 0x89, 0x0D, 0xBF, 0xE6, 0x42, 0x68, 0x41, 0x99, 0x2D, 0x0F, 0xB0, 0x54, 0xBB, 0x16
  1153. );
  1154. $sbox1 = array();
  1155. $sbox2 = array();
  1156. $sbox3 = array();
  1157. for ($i = 0; $i < 256; $i++) {
  1158. $sbox1[$i << 8] = $sbox0[$i] << 8;
  1159. $sbox2[$i << 16] = $sbox0[$i] << 16;
  1160. $sbox3[$i << 24] = $sbox0[$i] << 24;
  1161. }
  1162. }
  1163. return $sbox0[$word & 0x000000FF] |
  1164. $sbox1[$word & 0x0000FF00] |
  1165. $sbox2[$word & 0x00FF0000] |
  1166. $sbox3[$word & 0xFF000000];
  1167. }
  1168. /**
  1169. * Performs inverse S-Box substitutions
  1170. *
  1171. * @access private
  1172. */
  1173. function _invSubWord($word)
  1174. {
  1175. static $sbox0, $sbox1, $sbox2, $sbox3;
  1176. if (empty($sbox0)) {
  1177. $sbox0 = array(
  1178. 0x52, 0x09, 0x6A, 0xD5, 0x30, 0x36, 0xA5, 0x38, 0xBF, 0x40, 0xA3, 0x9E, 0x81, 0xF3, 0xD7, 0xFB,
  1179. 0x7C, 0xE3, 0x39, 0x82, 0x9B, 0x2F, 0xFF, 0x87, 0x34, 0x8E, 0x43, 0x44, 0xC4, 0xDE, 0xE9, 0xCB,
  1180. 0x54, 0x7B, 0x94, 0x32, 0xA6, 0xC2, 0x23, 0x3D, 0xEE, 0x4C, 0x95, 0x0B, 0x42, 0xFA, 0xC3, 0x4E,
  1181. 0x08, 0x2E, 0xA1, 0x66, 0x28, 0xD9, 0x24, 0xB2, 0x76, 0x5B, 0xA2, 0x49, 0x6D, 0x8B, 0xD1, 0x25,
  1182. 0x72, 0xF8, 0xF6, 0x64, 0x86, 0x68, 0x98, 0x16, 0xD4, 0xA4, 0x5C, 0xCC, 0x5D, 0x65, 0xB6, 0x92,
  1183. 0x6C, 0x70, 0x48, 0x50, 0xFD, 0xED, 0xB9, 0xDA, 0x5E, 0x15, 0x46, 0x57, 0xA7, 0x8D, 0x9D, 0x84,
  1184. 0x90, 0xD8, 0xAB, 0x00, 0x8C, 0xBC, 0xD3, 0x0A, 0xF7, 0xE4, 0x58, 0x05, 0xB8, 0xB3, 0x45, 0x06,
  1185. 0xD0, 0x2C, 0x1E, 0x8F, 0xCA, 0x3F, 0x0F, 0x02, 0xC1, 0xAF, 0xBD, 0x03, 0x01, 0x13, 0x8A, 0x6B,
  1186. 0x3A, 0x91, 0x11, 0x41, 0x4F, 0x67, 0xDC, 0xEA, 0x97, 0xF2, 0xCF, 0xCE, 0xF0, 0xB4, 0xE6, 0x73,
  1187. 0x96, 0xAC, 0x74, 0x22, 0xE7, 0xAD, 0x35, 0x85, 0xE2, 0xF9, 0x37, 0xE8, 0x1C, 0x75, 0xDF, 0x6E,
  1188. 0x47, 0xF1, 0x1A, 0x71, 0x1D, 0x29, 0xC5, 0x89, 0x6F, 0xB7, 0x62, 0x0E, 0xAA, 0x18, 0xBE, 0x1B,
  1189. 0xFC, 0x56, 0x3E, 0x4B, 0xC6, 0xD2, 0x79, 0x20, 0x9A, 0xDB, 0xC0, 0xFE, 0x78, 0xCD, 0x5A, 0xF4,
  1190. 0x1F, 0xDD, 0xA8, 0x33, 0x88, 0x07, 0xC7, 0x31, 0xB1, 0x12, 0x10, 0x59, 0x27, 0x80, 0xEC, 0x5F,
  1191. 0x60, 0x51, 0x7F, 0xA9, 0x19, 0xB5, 0x4A, 0x0D, 0x2D, 0xE5, 0x7A, 0x9F, 0x93, 0xC9, 0x9C, 0xEF,
  1192. 0xA0, 0xE0, 0x3B, 0x4D, 0xAE, 0x2A, 0xF5, 0xB0, 0xC8, 0xEB, 0xBB, 0x3C, 0x83, 0x53, 0x99, 0x61,
  1193. 0x17, 0x2B, 0x04, 0x7E, 0xBA, 0x77, 0xD6, 0x26, 0xE1, 0x69, 0x14, 0x63, 0x55, 0x21, 0x0C, 0x7D
  1194. );
  1195. $sbox1 = array();
  1196. $sbox2 = array();
  1197. $sbox3 = array();
  1198. for ($i = 0; $i < 256; $i++) {
  1199. $sbox1[$i << 8] = $sbox0[$i] << 8;
  1200. $sbox2[$i << 16] = $sbox0[$i] << 16;
  1201. $sbox3[$i << 24] = $sbox0[$i] << 24;
  1202. }
  1203. }
  1204. return $sbox0[$word & 0x000000FF] |
  1205. $sbox1[$word & 0x0000FF00] |
  1206. $sbox2[$word & 0x00FF0000] |
  1207. $sbox3[$word & 0xFF000000];
  1208. }
  1209. /**
  1210. * Pad "packets".
  1211. *
  1212. * Rijndael works by encrypting between sixteen and thirty-two bytes at a time, provided that number is also a multiple
  1213. * of four. If you ever need to encrypt or decrypt something that isn't of the proper length, it becomes necessary to
  1214. * pad the input so that it is of the proper length.
  1215. *
  1216. * Padding is enabled by default. Sometimes, however, it is undesirable to pad strings. Such is the case in SSH,
  1217. * where "packets" are padded with random bytes before being encrypted. Unpad these packets and you risk stripping
  1218. * away characters that shouldn't be stripped away. (SSH knows how many bytes are added because the length is
  1219. * transmitted separately)
  1220. *
  1221. * @see Crypt_Rijndael::disablePadding()
  1222. * @access public
  1223. */
  1224. function enablePadding()
  1225. {
  1226. $this->padding = true;
  1227. }
  1228. /**
  1229. * Do not pad packets.
  1230. *
  1231. * @see Crypt_Rijndael::enablePadding()
  1232. * @access public
  1233. */
  1234. function disablePadding()
  1235. {
  1236. $this->padding = false;
  1237. }
  1238. /**
  1239. * Pads a string
  1240. *
  1241. * Pads a string using the RSA PKCS padding standards so that its length is a multiple of the blocksize.
  1242. * $block_size - (strlen($text) % $block_size) bytes are added, each of which is equal to
  1243. * chr($block_size - (strlen($text) % $block_size)
  1244. *
  1245. * If padding is disabled and $text is not a multiple of the blocksize, the string will be padded regardless
  1246. * and padding will, hence forth, be enabled.
  1247. *
  1248. * @see Crypt_Rijndael::_unpad()
  1249. * @access private
  1250. */
  1251. function _pad($text)
  1252. {
  1253. $length = strlen($text);
  1254. if (!$this->padding) {
  1255. if ($length % $this->block_size == 0) {
  1256. return $text;
  1257. } else {
  1258. user_error("The plaintext's length ($length) is not a multiple of the block size ({$this->block_size})", E_USER_WARNING);
  1259. $this->padding = true;
  1260. }
  1261. }
  1262. $pad = $this->block_size - ($length % $this->block_size);
  1263. return str_pad($text, $length + $pad, chr($pad));
  1264. }
  1265. /**
  1266. * Unpads a string.
  1267. *
  1268. * If padding is enabled and the reported padding length is invalid the encryption key will be assumed to be wrong
  1269. * and false will be returned.
  1270. *
  1271. * @see Crypt_Rijndael::_pad()
  1272. * @access private
  1273. */
  1274. function _unpad($text)
  1275. {
  1276. if (!$this->padding) {
  1277. return $text;
  1278. }
  1279. $length = ord($text[strlen($text) - 1]);
  1280. if (!$length || $length > $this->block_size) {
  1281. return false;
  1282. }
  1283. return substr($text, 0, -$length);
  1284. }
  1285. /**
  1286. * Treat consecutive "packets" as if they are a continuous buffer.
  1287. *
  1288. * Say you have a 32-byte plaintext $plaintext. Using the default behavior, the two following code snippets
  1289. * will yield different outputs:
  1290. *
  1291. * <code>
  1292. * echo $rijndael->encrypt(substr($plaintext, 0, 16));
  1293. * echo $rijndael->encrypt(substr($plaintext, 16, 16));
  1294. * </code>
  1295. * <code>
  1296. * echo $rijndael->encrypt($plaintext);
  1297. * </code>
  1298. *
  1299. * The solution is to enable the continuous buffer. Although this will resolve the above discrepancy, it creates
  1300. * another, as demonstrated with the following:
  1301. *
  1302. * <code>
  1303. * $rijndael->encrypt(substr($plaintext, 0, 16));
  1304. * echo $rijndael->decrypt($des->encrypt(substr($plaintext, 16, 16)));
  1305. * </code>
  1306. * <code>
  1307. * echo $rijndael->decrypt($des->encrypt(substr($plaintext, 16, 16)));
  1308. * </code>
  1309. *
  1310. * With the continuous buffer disabled, these would yield the same output. With it enabled, they yield different
  1311. * outputs. The reason is due to the fact that the initialization vector's change after every encryption /
  1312. * decryption round when the continuous buffer is enabled. When it's disabled, they remain constant.
  1313. *
  1314. * Put another way, when the continuous buffer is enabled, the state of the Crypt_Rijndael() object changes after each
  1315. * encryption / decryption round, whereas otherwise, it'd remain constant. For this reason, it's recommended that
  1316. * continuous buffers not be used. They do offer better security and are, in fact, sometimes required (SSH uses them),
  1317. * however, they are also less intuitive and more likely to cause you problems.
  1318. *
  1319. * @see Crypt_Rijndael::disableContinuousBuffer()
  1320. * @access public
  1321. */
  1322. function enableContinuousBuffer()
  1323. {
  1324. $this->continuousBuffer = true;
  1325. }
  1326. /**
  1327. * Treat consecutive packets as if they are a discontinuous buffer.
  1328. *
  1329. * The default behavior.
  1330. *
  1331. * @see Crypt_Rijndael::enableContinuousBuffer()
  1332. * @access public
  1333. */
  1334. function disableContinuousBuffer()
  1335. {
  1336. $this->continuousBuffer = false;
  1337. $this->encryptIV = $this->iv;
  1338. $this->decryptIV = $this->iv;
  1339. }
  1340. /**
  1341. * String Shift
  1342. *
  1343. * Inspired by array_shift
  1344. *
  1345. * @param String $string
  1346. * @param optional Integer $index
  1347. * @return String
  1348. * @access private
  1349. */
  1350. function _string_shift(&$string, $index = 1)
  1351. {
  1352. $substr = substr($string, 0, $index);
  1353. $string = substr($string, $index);
  1354. return $substr;
  1355. }
  1356. }
  1357. // vim: ts=4:sw=4:et:
  1358. // vim6: fdl=1: