xref: /PHP-8.0/ext/oci8/tests/pecl_bug10194.phpt (revision f8d79582) 
1--TEST--
2PECL Bug #10194 (segfault in Instant Client when memory_limit is reached inside the callback)
3--SKIPIF--
4<?php
5$target_dbs = array('oracledb' => true, 'timesten' => false);  // test runs on these DBs
6require(__DIR__.'/skipif.inc');
7if (getenv('SKIP_SLOW_TESTS')) die('skip slow tests excluded by request');
8if (getenv("USE_ZEND_ALLOC") === "0") {
9    die("skip Zend MM disabled");
10}
11?>
12--INI--
13memory_limit=10M
14--FILE--
15<?php
16
17require __DIR__.'/connect.inc';
18require __DIR__.'/create_table.inc';
19
20$ora_sql = "INSERT INTO
21                       ".$schema.$table_name." (clob)
22                      VALUES (empty_clob())
23                      ";
24
25$statement = oci_parse($c,$ora_sql);
26oci_execute($statement);
27
28$ora_sql = "SELECT clob FROM ".$schema.$table_name." FOR UPDATE";
29$statement = oci_parse($c,$ora_sql);
30oci_execute($statement, OCI_DEFAULT);
31
32$row = oci_fetch_assoc($statement);
33
34$string = str_repeat("test", 32768*4*4);
35
36for ($i = 0; $i < 8; $i++) {
37    $row['CLOB']->write($string);
38}
39
40oci_commit($c);
41
42$ora_sql = "SELECT clob FROM ".$schema.$table_name."";
43$statement = oci_parse($c,$ora_sql);
44oci_execute($statement);
45
46$row = oci_fetch_assoc($statement);
47var_dump(strlen($row['CLOB']->load())); /* here it should fail */
48
49require __DIR__.'/drop_table.inc';
50
51echo "Done\n";
52?>
53--EXPECTF--
54Fatal error: Allowed memory size of 10485760 bytes exhausted%s(tried to allocate %d bytes) in %s on line %d
55