summaryrefslogtreecommitdiff
path: root/tests/bug44206.phpt
blob: e5771e4182c5cbc371304099022696b7bfd2d2e7 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
--TEST--
Bug #44206 (Test if selecting ref cursors leads to ORA-1000 maximum open cursors reached)
--SKIPIF--
<?php if (!extension_loaded('oci8')) die ("skip no oci8 extension"); ?>
--FILE--
<?php

require dirname(__FILE__).'/connect.inc';

// Run Test

for ($x = 0; $x < 400; $x++)
{
	$stmt = "select cursor (select $x from dual) a,
		 cursor (select $x from dual) b 
		 from dual";
	$s = oci_parse($c, $stmt);
	$r = oci_execute($s);
        if (!$r) {
                echo "Exiting $x\n";
                exit;
        }
	$mode = OCI_ASSOC | OCI_RETURN_NULLS;
	$result = oci_fetch_array($s, $mode);
	oci_execute($result['A']);
	oci_execute($result['B']);
	oci_fetch_array($result['A'], $mode);
	oci_fetch_array($result['B'], $mode);
	oci_free_statement($result['A']);
	oci_free_statement($result['B']);
	oci_free_statement($s);
}

echo "Completed $x\n";

oci_close($c);

echo "Done\n";

?>
--EXPECT--
Completed 400
Done