sixd Thu, 19 Nov 2009 17:44:46 +0000 Revision: http://svn.php.net/viewvc?view=revision&revision=291016
Log: New test Changed paths: A php/php-src/branches/PHP_5_3/ext/oci8/tests/fetch_object_2.phpt A php/php-src/trunk/ext/oci8/tests/fetch_object_2.phpt Added: php/php-src/branches/PHP_5_3/ext/oci8/tests/fetch_object_2.phpt =================================================================== --- php/php-src/branches/PHP_5_3/ext/oci8/tests/fetch_object_2.phpt (rev 0) +++ php/php-src/branches/PHP_5_3/ext/oci8/tests/fetch_object_2.phpt 2009-11-19 17:44:46 UTC (rev 291016) @@ -0,0 +1,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=== Property changes on: php/php-src/branches/PHP_5_3/ext/oci8/tests/fetch_object_2.phpt ___________________________________________________________________ Added: svn:keywords + Id Rev Revision Added: svn:eol-style + native Added: php/php-src/trunk/ext/oci8/tests/fetch_object_2.phpt =================================================================== --- php/php-src/trunk/ext/oci8/tests/fetch_object_2.phpt (rev 0) +++ php/php-src/trunk/ext/oci8/tests/fetch_object_2.phpt 2009-11-19 17:44:46 UTC (rev 291016) @@ -0,0 +1,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=== Property changes on: php/php-src/trunk/ext/oci8/tests/fetch_object_2.phpt ___________________________________________________________________ Added: svn:keywords + Id Rev Revision Added: svn:eol-style + native
-- PHP CVS Mailing List (http://www.php.net/) To unsubscribe, visit: http://www.php.net/unsub.php