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
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
|
--TEST--
oci_lob_read() tests
--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)
VALUES (empty_blob())
RETURNING
blob
INTO :v_blob ";
$statement = oci_parse($c,$ora_sql);
$blob = oci_new_descriptor($c,OCI_D_LOB);
oci_bind_by_name($statement,":v_blob", $blob,-1,OCI_B_BLOB);
oci_execute($statement, OCI_DEFAULT);
var_dump($blob->size());
var_dump($blob->write(str_repeat("string.", 1000)));
var_dump($blob->size());
oci_commit($c);
$select_sql = "SELECT blob FROM ".$schema.$table_name." FOR UPDATE";
$s = oci_parse($c, $select_sql);
oci_execute($s, OCI_DEFAULT);
var_dump($row = oci_fetch_array($s));
var_dump(oci_lob_read($row[0], 2));
var_dump(oci_lob_read($row[0]));
var_dump(oci_lob_read());
var_dump(oci_lob_eof($row[0]));
var_dump(oci_lob_eof());
unset($row[0]->descriptor);
var_dump(oci_lob_read($row[0],1));
var_dump(oci_lob_eof($row[0]));
require dirname(__FILE__).'/drop_table.inc';
echo "Done\n";
?>
--EXPECTF--
int(0)
int(7000)
int(7000)
array(2) {
[0]=>
object(OCI-Lob)#%d (1) {
["descriptor"]=>
resource(%d) of type (oci8 descriptor)
}
["BLOB"]=>
object(OCI-Lob)#%d (1) {
["descriptor"]=>
resource(%d) of type (oci8 descriptor)
}
}
string(2) "st"
Warning: oci_lob_read() expects exactly 2 parameters, 1 given in %s on line %d
NULL
Warning: oci_lob_read() expects exactly 2 parameters, 0 given in %s on line %d
NULL
bool(false)
Warning: oci_lob_eof() expects exactly 1 parameter, 0 given in %s on line %d
NULL
Warning: oci_lob_read(): Unable to find descriptor property in %s on line %d
bool(false)
Warning: oci_lob_eof(): Unable to find descriptor property in %s on line %d
bool(false)
Done
|
