Return to pecl_bug_6364.phpt CVS log

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

Annotation of embedaddon/php/ext/pdo_oci/tests/pecl_bug_6364.phpt, revision 1.1

1.1     ! misho       1: --TEST--
        !             2: PECL PDO_OCI Bug #6364 (segmentation fault on stored procedure call with OUT binds)
        !             3: --SKIPIF--
        !             4: <?php
        !             5: if (!extension_loaded('pdo') || !extension_loaded('pdo_oci')) die('skip not loaded');
        !             6: require(dirname(__FILE__).'/../../pdo/tests/pdo_test.inc');
        !             7: PDOTest::skip();
        !             8: ?>
        !             9: --FILE--
        !            10: <?php
        !            11: 
        !            12: require dirname(__FILE__) . '/../../pdo/tests/pdo_test.inc';
        !            13: $dbh = PDOTest::factory();
        !            14: 
        !            15: @$dbh->exec ("drop table bug_6364_t");
        !            16: 
        !            17: $dbh->exec ("create table bug_6364_t (c1 varchar2(10), c2 varchar2(10), c3 varchar2(10), c4 varchar2(10), c5 varchar2(10))");
        !            18: 
        !            19: $dbh->exec ("create or replace procedure bug_6364_sp(p1 IN varchar2, p2 IN varchar2, p3 IN varchar2, p4 OUT varchar2, p5 OUT varchar2) as begin insert into bug_6364_t (c1, c2, c3) values (p1, p2, p3); p4 := 'val4'; p5 := 'val5'; end;");
        !            20: 
        !            21: $stmt = $dbh->prepare("call bug_6364_sp('p1','p2','p3',?,?)");
        !            22: 
        !            23: $out_param1 = "a";
        !            24: $out_param2 = "a";
        !            25: 
        !            26: $stmt->bindParam(1, $out_param1,PDO::PARAM_STR, 1024);
        !            27: $stmt->bindParam(2, $out_param2,PDO::PARAM_STR, 1024);
        !            28: 
        !            29: $stmt->execute() or die ("Execution error: " . var_dump($dbh->errorInfo()));
        !            30: 
        !            31: var_dump($out_param1);
        !            32: var_dump($out_param2);
        !            33: 
        !            34: foreach ($dbh->query("select * from bug_6364_t") as $row) {
        !            35:        var_dump($row);
        !            36: }
        !            37: 
        !            38: print "Done\n";
        !            39: 
        !            40: // Cleanup
        !            41: $dbh->exec ("drop procedure bug_6364_sp");
        !            42: $dbh->exec ("drop table bug_6364_t");
        !            43: 
        !            44: ?>
        !            45: 
        !            46: --EXPECTF--
        !            47: string(4) "val4"
        !            48: string(4) "val5"
        !            49: array(10) {
        !            50:   ["c1"]=>
        !            51:   string(2) "p1"
        !            52:   [0]=>
        !            53:   string(2) "p1"
        !            54:   ["c2"]=>
        !            55:   string(2) "p2"
        !            56:   [1]=>
        !            57:   string(2) "p2"
        !            58:   ["c3"]=>
        !            59:   string(2) "p3"
        !            60:   [2]=>
        !            61:   string(2) "p3"
        !            62:   ["c4"]=>
        !            63:   NULL
        !            64:   [3]=>
        !            65:   NULL
        !            66:   ["c5"]=>
        !            67:   NULL
        !            68:   [4]=>
        !            69:   NULL
        !            70: }
        !            71: Done