1--TEST--
2Test mcrypt_encrypt() function : TripleDES functionality
3--SKIPIF--
4<?php
5if (!extension_loaded("mcrypt")) {
6	print "skip - mcrypt extension not loaded";
7}
8?>
9--FILE--
10<?php
11/* Prototype  : string mcrypt_encrypt(string cipher, string key, string data, string mode, string iv)
12 * Description: OFB crypt/decrypt data using key key with cipher cipher starting with iv
13 * Source code: ext/mcrypt/mcrypt.c
14 * Alias to functions:
15 */
16 /* Prototype  : string mcrypt_decrypt(string cipher, string key, string data, string mode, string iv)
17 * Description: OFB crypt/decrypt data using key key with cipher cipher starting with iv
18 * Source code: ext/mcrypt/mcrypt.c
19 * Alias to functions:
20 */
21 /* Prototype  : string mcrypt_cbc(int cipher, string key, string data, int mode, string iv)
22 * Description: CBC crypt/decrypt data using key key with cipher cipher starting with iv
23 * Source code: ext/mcrypt/mcrypt.c
24 * Alias to functions:
25 */
26 /* Prototype  : string mcrypt_ecb(int cipher, string key, string data, int mode, string iv)
27 * Description: ECB crypt/decrypt data using key key with cipher cipher starting with iv
28 * Source code: ext/mcrypt/mcrypt.c
29 * Alias to functions:
30 */
31
32echo "*** Testing mcrypt : Rijndael128 functionality ***\n";
33
34$cipher = MCRYPT_RIJNDAEL_128;
35$mode = MCRYPT_MODE_CBC;
36$data = b'This is the secret message which must be encrypted';
37
38// keys : 20 bytes, 24 bytes, 30 Bytes, 32 Bytes, 40 Bytes
39$keys = array(
40              b'12345678901234567890',
41              b'123456789012345678901234',
42              b'123456789012345678901234567890',
43              b'12345678901234567890123456789012',
44              b'1234567890123456789012345678901234567890'
45 );
46// rijndael128 is a block cipher of 128 bits (16 bytes)
47$iv = b'1234567890123456';
48
49echo "\n--- testing different key lengths\n";
50foreach ($keys as $key) {
51   echo "\nkey length=".strlen($key)."\n";
52   $res = mcrypt_encrypt($cipher, $key, $data, MCRYPT_MODE_CBC, $iv);
53   var_dump(bin2hex($res));
54   $res = mcrypt_decrypt($cipher, $key, $res, MCRYPT_MODE_CBC, $iv);
55   var_dump(bin2hex($res));
56}
57?>
58===DONE===
59--EXPECTF--
60*** Testing mcrypt : Rijndael128 functionality ***
61
62--- testing different key lengths
63
64key length=20
65string(128) "6369830bfc89a39c9981c9a40e349e3bbc8599c28d7ffbd7a330a67690dac6dfb76a55814e95c83cced68eb1544cdd8406d272c249bd0a60fa5b605d4aefbaa0"
66string(128) "546869732069732074686520736563726574206d657373616765207768696368206d75737420626520656e637279707465640000000000000000000000000000"
67
68key length=24
69string(128) "8ecdf1ed5742aff16ef34c819c8d22c707c54f4d9ffc18e5f6ab79fe68c25705351e2c001a0b9f29e5def67570ca9da644efb69a8bb97940cb4bec094dae8bb5"
70string(128) "546869732069732074686520736563726574206d657373616765207768696368206d75737420626520656e637279707465640000000000000000000000000000"
71
72key length=30
73string(128) "f7731f0c0ab22270b2f516c7837256ed731ba6658ca8f78cda2ab1588e204f990843719ae88474f6572711674fcda9f40d99155e4cc4f5a31aa461ad36a7871d"
74string(128) "546869732069732074686520736563726574206d657373616765207768696368206d75737420626520656e637279707465640000000000000000000000000000"
75
76key length=32
77string(128) "f23bc103bfd0859a8318acee6d96e5f43dff68f3cdeae817a1e77c33492e32bdb82c5f660fcd1a2bfda70d9de4d5d8028ce179a9e2f7f9ee7dd61c7b4b409e95"
78string(128) "546869732069732074686520736563726574206d657373616765207768696368206d75737420626520656e637279707465640000000000000000000000000000"
79
80key length=40
81
82Warning: mcrypt_encrypt(): Size of key is too large for this algorithm in %s on line %d
83string(128) "f23bc103bfd0859a8318acee6d96e5f43dff68f3cdeae817a1e77c33492e32bdb82c5f660fcd1a2bfda70d9de4d5d8028ce179a9e2f7f9ee7dd61c7b4b409e95"
84
85Warning: mcrypt_decrypt(): Size of key is too large for this algorithm in %s on line %d
86string(128) "546869732069732074686520736563726574206d657373616765207768696368206d75737420626520656e637279707465640000000000000000000000000000"
87===DONE===