File:
[ELWIX - Embedded LightWeight unIX -] /
embedaddon /
php /
ext /
oci8 /
tests /
lob_001.phpt
Revision
1.1.1.1 (vendor branch):
download - view:
text,
annotated -
select for diffs -
revision graph
Tue Feb 21 23:47:58 2012 UTC (12 years, 6 months ago) by
misho
Branches:
php,
MAIN
CVS tags:
v5_4_3elwix,
v5_4_29p0,
v5_4_29,
v5_4_20p0,
v5_4_20,
v5_4_17p0,
v5_4_17,
v5_3_10,
HEAD
php
--TEST--
oci_lob_write() and friends
--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');
// Initialization
$stmtarray = array(
"drop table lob_001_tab",
"create table lob_001_tab (id number, b1 blob)",
);
oci8_test_sql_execute($c, $stmtarray);
echo "Test 1 OCI_B_BLOB bind\n";
$statement = oci_parse($c, "insert into lob_001_tab (id, b1) values (1, empty_blob()) returning b1 into :v_b1 ");
$blob = oci_new_descriptor($c,OCI_D_LOB);
var_dump(oci_bind_by_name($statement, ":v_b1", $blob, -1, OCI_B_BLOB));
oci_execute($statement, OCI_DEFAULT);
var_dump($blob);
echo "Test 2\n";
var_dump($blob->write("test"));
var_dump($blob->tell());
var_dump($blob->seek(10, OCI_SEEK_CUR));
var_dump($blob->write("string"));
var_dump($blob->flush());
oci_commit($c);
echo "Test 3\n";
$s = oci_parse($c, "select b1 from lob_001_tab where id = 1");
oci_execute($s);
var_dump(oci_fetch_array($s, OCI_RETURN_LOBS));
echo "Test 4 SQLT_BLOB (an alias for OCI_B_BLOB) bind\n";
$statement = oci_parse($c, "insert into lob_001_tab (id, b1) values (2, empty_blob()) returning b1 into :v_b1 ");
$blob = oci_new_descriptor($c,OCI_D_LOB);
var_dump(oci_bind_by_name($statement, ":v_b1", $blob, -1, SQLT_BLOB));
oci_execute($statement, OCI_DEFAULT);
var_dump($blob->write("test row 2"));
$s = oci_parse($c, "select b1 from lob_001_tab where id = 2");
oci_execute($s);
var_dump(oci_fetch_array($s, OCI_RETURN_LOBS));
// Cleanup
$stmtarray = array(
"drop table lob_001_tab"
);
oci8_test_sql_execute($c, $stmtarray);
?>
===DONE===
<?php exit(0); ?>
--EXPECTF--
Test 1 OCI_B_BLOB bind
bool(true)
object(OCI-Lob)#%d (1) {
["descriptor"]=>
resource(%d) of type (oci8 descriptor)
}
Test 2
int(4)
int(4)
bool(true)
int(6)
bool(false)
Test 3
array(2) {
[0]=>
string(20) "test string"
["B1"]=>
string(20) "test string"
}
Test 4 SQLT_BLOB (an alias for OCI_B_BLOB) bind
bool(true)
int(10)
array(2) {
[0]=>
string(10) "test row 2"
["B1"]=>
string(10) "test row 2"
}
===DONE===
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>