Return to bug44008.phpt CVS log

Up to [ELWIX - Embedded LightWeight unIX -] / embedaddon / php / ext / oci8 / tests

Annotation of embedaddon/php/ext/oci8/tests/bug44008.phpt, revision 1.1

1.1     ! misho       1: --TEST--
        !             2: Bug #44008 (Incorrect usage of OCI-Lob->close crashes PHP)
        !             3: --SKIPIF--
        !             4: <?php
        !             5: $target_dbs = array('oracledb' => true, 'timesten' => false);  // test runs on these DBs
        !             6: require(dirname(__FILE__).'/skipif.inc');
        !             7: ?> 
        !             8: --FILE--
        !             9: <?php
        !            10: 
        !            11: require dirname(__FILE__).'/connect.inc';
        !            12: 
        !            13: // Initialization
        !            14: 
        !            15: $stmtarray = array(
        !            16:                "create or replace procedure bug44008_proc (p in out clob)
        !            17:                as begin p := 'A';
        !            18:                end;"
        !            19: );
        !            20: 
        !            21: oci8_test_sql_execute($c, $stmtarray);
        !            22: 
        !            23: // Run Test
        !            24: 
        !            25: $s = oci_parse($c, 'begin bug44008_proc(:data); end;');
        !            26: $textLob = oci_new_descriptor($c, OCI_D_LOB);
        !            27: oci_bind_by_name($s, ":data", $textLob, -1, OCI_B_CLOB);
        !            28: oci_execute($s, OCI_DEFAULT);
        !            29: $r = $textLob->load();
        !            30: echo "$r\n";
        !            31: 
        !            32: // Incorrectly closing the lob doesn't cause a crash.
        !            33: // OCI-LOB->close() is documented for use only with OCI-Lob->writeTemporary()
        !            34: $textLob->close();
        !            35: 
        !            36: // Cleanup
        !            37: 
        !            38: $stmtarray = array(
        !            39:         "drop procedure bug44008_proc"
        !            40: );
        !            41: 
        !            42: oci8_test_sql_execute($c, $stmtarray);
        !            43: 
        !            44: echo "Done\n";
        !            45: 
        !            46: ?>
        !            47: --EXPECT--
        !            48: A
        !            49: Done