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
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
|
--TEST--
oci_fetch_object() with CLOB and NULL
--SKIPIF--
<?php if (!extension_loaded('oci8')) die("skip no oci8 extension"); ?>
--FILE--
<?php
require(dirname(__FILE__).'/connect.inc');
// Initialization
$stmtarray = array(
"drop table fetch_object_2_tab",
"create table fetch_object_2_tab (col1 number, col2 CLOB, col3 varchar2(15))",
"insert into fetch_object_2_tab values (123, '1st row col2 string', '1 more text')",
"insert into fetch_object_2_tab values (456, '2nd row col2 string', NULL)",
"insert into fetch_object_2_tab values (789, '3rd row col2 string', '3 more text')",
);
foreach ($stmtarray as $stmt) {
$s = oci_parse($c, $stmt);
$r = @oci_execute($s);
if (!$r) {
$m = oci_error($s);
if (!in_array($m['code'], array( // ignore expected errors
942 // table or view does not exist
, 2289 // sequence does not exist
, 4080 // trigger does not exist
, 38802 // edition does not exist
))) {
echo $stmt . PHP_EOL . $m['message'] . PHP_EOL;
}
}
}
// Run Test
echo "Test 1\n";
if (!($s = oci_parse($c, 'select * from fetch_object_2_tab order by 1'))) {
die("oci_parse(select) failed!\n");
}
if (!oci_execute($s)) {
die("oci_execute(select) failed!\n");
}
while ($row = oci_fetch_object($s)) {
var_dump($row);
}
echo "Test 2\n";
if (!($s = oci_parse($c, 'select * from fetch_object_2_tab order by 1'))) {
die("oci_parse(select) failed!\n");
}
if (!oci_execute($s)) {
die("oci_execute(select) failed!\n");
}
while ($row = oci_fetch_object($s)) {
echo $row->COL1 . "\n";
echo $row->COL2->load(100) . "\n";
echo $row->COL3 . "\n";
}
// Clean up
$stmtarray = array(
"drop table fetch_object_2_tab"
);
foreach ($stmtarray as $stmt) {
$s = oci_parse($c, $stmt);
oci_execute($s);
}
?>
===DONE===
<?php exit(0); ?>
--EXPECTF--
Test 1
object(stdClass)#%d (3) {
[%u|b%"COL1"]=>
%unicode|string%(3) "123"
[%u|b%"COL2"]=>
object(OCI-Lob)#%d (1) {
[%u|b%"descriptor"]=>
resource(15) of type (oci8 descriptor)
}
[%u|b%"COL3"]=>
%unicode|string%(11) "1 more text"
}
object(stdClass)#%d (3) {
[%u|b%"COL1"]=>
%unicode|string%(3) "456"
[%u|b%"COL2"]=>
object(OCI-Lob)#%d (1) {
[%u|b%"descriptor"]=>
resource(16) of type (oci8 descriptor)
}
[%u|b%"COL3"]=>
NULL
}
object(stdClass)#%d (3) {
[%u|b%"COL1"]=>
%unicode|string%(3) "789"
[%u|b%"COL2"]=>
object(OCI-Lob)#%d (1) {
[%u|b%"descriptor"]=>
resource(17) of type (oci8 descriptor)
}
[%u|b%"COL3"]=>
%unicode|string%(11) "3 more text"
}
Test 2
123
1st row col2 string
1 more text
456
2nd row col2 string
789
3rd row col2 string
3 more text
===DONE===
|