File: oci_execute_segfault.phpt

package info (click to toggle)
php5 5.6.33%2Bdfsg-0%2Bdeb8u1
  • links: PTS, VCS
  • area: main
  • in suites: jessie
  • size: 157,872 kB
  • sloc: ansic: 756,065; php: 22,030; sh: 12,311; cpp: 8,771; xml: 6,179; yacc: 1,564; exp: 1,514; makefile: 1,467; pascal: 1,147; awk: 538; perl: 315; sql: 22
file content (51 lines) | stat: -rw-r--r-- 1,333 bytes parent folder | download | duplicates (4)
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
44
45
46
47
48
49
50
51
--TEST--
oci_execute() segfault after repeated bind of LOB descriptor
--SKIPIF--
<?php
$target_dbs = array('oracledb' => true, 'timesten' => false);  // test runs on these DBs
require(dirname(__FILE__).'/skipif.inc');
?> 
--FILE--
<?php

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

$ora_sql = "INSERT INTO
                       ".$schema.$table_name." (blob, clob)
                      VALUES (empty_blob(), empty_clob())
                      RETURNING
                               blob
                      INTO :v_blob ";

$s = oci_parse($c, $ora_sql);
$blob = oci_new_descriptor($c, OCI_D_LOB);
oci_bind_by_name($s, ":v_blob", $blob, -1, OCI_B_BLOB);
oci_execute($s, OCI_DEFAULT);
var_dump($blob->save("some binary data"));

oci_bind_by_name($s, ":v_blob", $blob, -1, OCI_B_BLOB);
oci_execute($s, OCI_DEFAULT);
var_dump($blob->save("some more binary data"));

$query = 'SELECT blob, DBMS_LOB.GETLENGTH(blob) FROM '.$schema.$table_name.' ORDER BY 2';

$s = oci_parse ($c, $query);
oci_execute($s, OCI_DEFAULT);

while ($arr = oci_fetch_assoc($s)) {
    $result = $arr['BLOB']->load();
    var_dump($result);
}

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

echo "Done\n";

?>
--EXPECT--
bool(true)
bool(true)
string(16) "some binary data"
string(21) "some more binary data"
Done