1--TEST--
2Test mcrypt_cbc() function : usage variation
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_cbc(string cipher, string key, string data, int mode, string iv)
12 * Description: CBC 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
17echo "*** Testing mcrypt_cbc() : usage variation ***\n";
18
19// Define error handler
20function test_error_handler($err_no, $err_msg, $filename, $linenum, $vars) {
21	if (error_reporting() != 0) {
22		// report non-silenced errors
23		echo "Error: $err_no - $err_msg, $filename($linenum)\n";
24	}
25}
26set_error_handler('test_error_handler');
27
28// Initialise function arguments not being substituted (if any)
29$cipher = MCRYPT_TRIPLEDES;
30$key = b'string_val';
31$data = b'string_val';
32$mode = MCRYPT_ENCRYPT;
33
34//get an unset variable
35$unset_var = 10;
36unset ($unset_var);
37
38// define some classes
39class classWithToString
40{
41	public function __toString() {
42		return b"Class A object";
43	}
44}
45
46class classWithoutToString
47{
48}
49
50// heredoc string
51$heredoc = b<<<EOT
52hello world
53EOT;
54
55// get a resource variable
56$fp = fopen(__FILE__, "r");
57
58// add arrays
59$index_array = array (1, 2, 3);
60$assoc_array = array ('one' => 1, 'two' => 2);
61
62//array of values to iterate over
63$inputs = array(
64
65      // int data
66      'int 0' => 0,
67      'int 1' => 1,
68      'int 12345' => 12345,
69      'int -12345' => -2345,
70
71      // float data
72      'float 10.5' => 10.5,
73      'float -10.5' => -10.5,
74      'float 12.3456789000e10' => 12.3456789000e10,
75      'float -12.3456789000e10' => -12.3456789000e10,
76      'float .5' => .5,
77
78      // array data
79      'empty array' => array(),
80      'int indexed array' => $index_array,
81      'associative array' => $assoc_array,
82      'nested arrays' => array('foo', $index_array, $assoc_array),
83
84      // null data
85      'uppercase NULL' => NULL,
86      'lowercase null' => null,
87
88      // boolean data
89      'lowercase true' => true,
90      'lowercase false' =>false,
91      'uppercase TRUE' =>TRUE,
92      'uppercase FALSE' =>FALSE,
93
94      // empty data
95      'empty string DQ' => "",
96      'empty string SQ' => '',
97
98      // object data
99      'instance of classWithToString' => new classWithToString(),
100      'instance of classWithoutToString' => new classWithoutToString(),
101
102      // undefined data
103      'undefined var' => @$undefined_var,
104
105      // unset data
106      'unset var' => @$unset_var,
107
108      // resource variable
109      'resource' => $fp
110);
111
112// loop through each element of the array for iv
113
114foreach($inputs as $valueType =>$value) {
115      echo "\n--$valueType--\n";
116      var_dump( bin2hex(mcrypt_cbc($cipher, $key, $data, $mode, $value)) );
117};
118
119fclose($fp);
120
121?>
122===DONE===
123--EXPECTF--
124*** Testing mcrypt_cbc() : usage variation ***
125
126--int 0--
127Error: 2 - mcrypt_cbc(): The IV parameter must be as long as the blocksize, %s(%d)
128string(32) "6438db90653c4d3080c3ceab43618c05"
129
130--int 1--
131Error: 2 - mcrypt_cbc(): The IV parameter must be as long as the blocksize, %s(%d)
132string(32) "6438db90653c4d3080c3ceab43618c05"
133
134--int 12345--
135Error: 2 - mcrypt_cbc(): The IV parameter must be as long as the blocksize, %s(%d)
136string(32) "6438db90653c4d3080c3ceab43618c05"
137
138--int -12345--
139Error: 2 - mcrypt_cbc(): The IV parameter must be as long as the blocksize, %s(%d)
140string(32) "6438db90653c4d3080c3ceab43618c05"
141
142--float 10.5--
143Error: 2 - mcrypt_cbc(): The IV parameter must be as long as the blocksize, %s(%d)
144string(32) "6438db90653c4d3080c3ceab43618c05"
145
146--float -10.5--
147Error: 2 - mcrypt_cbc(): The IV parameter must be as long as the blocksize, %s(%d)
148string(32) "6438db90653c4d3080c3ceab43618c05"
149
150--float 12.3456789000e10--
151Error: 2 - mcrypt_cbc(): The IV parameter must be as long as the blocksize, %s(%d)
152string(32) "6438db90653c4d3080c3ceab43618c05"
153
154--float -12.3456789000e10--
155Error: 2 - mcrypt_cbc(): The IV parameter must be as long as the blocksize, %s(%d)
156string(32) "6438db90653c4d3080c3ceab43618c05"
157
158--float .5--
159Error: 2 - mcrypt_cbc(): The IV parameter must be as long as the blocksize, %s(%d)
160string(32) "6438db90653c4d3080c3ceab43618c05"
161
162--empty array--
163Error: 2 - mcrypt_cbc() expects parameter 5 to be string, array given, %s(%d)
164string(0) ""
165
166--int indexed array--
167Error: 2 - mcrypt_cbc() expects parameter 5 to be string, array given, %s(%d)
168string(0) ""
169
170--associative array--
171Error: 2 - mcrypt_cbc() expects parameter 5 to be string, array given, %s(%d)
172string(0) ""
173
174--nested arrays--
175Error: 2 - mcrypt_cbc() expects parameter 5 to be string, array given, %s(%d)
176string(0) ""
177
178--uppercase NULL--
179Error: 2 - mcrypt_cbc(): The IV parameter must be as long as the blocksize, %s(%d)
180string(32) "6438db90653c4d3080c3ceab43618c05"
181
182--lowercase null--
183Error: 2 - mcrypt_cbc(): The IV parameter must be as long as the blocksize, %s(%d)
184string(32) "6438db90653c4d3080c3ceab43618c05"
185
186--lowercase true--
187Error: 2 - mcrypt_cbc(): The IV parameter must be as long as the blocksize, %s(%d)
188string(32) "6438db90653c4d3080c3ceab43618c05"
189
190--lowercase false--
191Error: 2 - mcrypt_cbc(): The IV parameter must be as long as the blocksize, %s(%d)
192string(32) "6438db90653c4d3080c3ceab43618c05"
193
194--uppercase TRUE--
195Error: 2 - mcrypt_cbc(): The IV parameter must be as long as the blocksize, %s(%d)
196string(32) "6438db90653c4d3080c3ceab43618c05"
197
198--uppercase FALSE--
199Error: 2 - mcrypt_cbc(): The IV parameter must be as long as the blocksize, %s(%d)
200string(32) "6438db90653c4d3080c3ceab43618c05"
201
202--empty string DQ--
203Error: 2 - mcrypt_cbc(): The IV parameter must be as long as the blocksize, %s(%d)
204string(32) "6438db90653c4d3080c3ceab43618c05"
205
206--empty string SQ--
207Error: 2 - mcrypt_cbc(): The IV parameter must be as long as the blocksize, %s(%d)
208string(32) "6438db90653c4d3080c3ceab43618c05"
209
210--instance of classWithToString--
211Error: 2 - mcrypt_cbc(): The IV parameter must be as long as the blocksize, %s(%d)
212string(32) "6438db90653c4d3080c3ceab43618c05"
213
214--instance of classWithoutToString--
215Error: 2 - mcrypt_cbc() expects parameter 5 to be string, object given, %s(%d)
216string(0) ""
217
218--undefined var--
219Error: 2 - mcrypt_cbc(): The IV parameter must be as long as the blocksize, %s(%d)
220string(32) "6438db90653c4d3080c3ceab43618c05"
221
222--unset var--
223Error: 2 - mcrypt_cbc(): The IV parameter must be as long as the blocksize, %s(%d)
224string(32) "6438db90653c4d3080c3ceab43618c05"
225
226--resource--
227Error: 2 - mcrypt_cbc() expects parameter 5 to be string, resource given, %s(%d)
228string(0) ""
229===DONE===
230
231