xref: /PHP-8.0/ext/oci8/tests/lob_021.phpt (revision ff66e494)
1--TEST--
2oci_lob_free()/close()
3--SKIPIF--
4<?php
5$target_dbs = array('oracledb' => true, 'timesten' => false);  // test runs on these DBs
6require(__DIR__.'/skipif.inc');
7?>
8--FILE--
9<?php
10
11require __DIR__.'/connect.inc';
12require __DIR__.'/create_table.inc';
13
14$ora_sql = "INSERT INTO
15                       ".$schema.$table_name." (blob)
16                      VALUES (empty_blob())
17                      RETURNING
18                               blob
19                      INTO :v_blob ";
20
21$statement = oci_parse($c,$ora_sql);
22$blob = oci_new_descriptor($c,OCI_D_LOB);
23oci_bind_by_name($statement,":v_blob", $blob,-1,OCI_B_BLOB);
24oci_execute($statement, OCI_DEFAULT);
25
26var_dump($blob->write("test"));
27var_dump($blob->close());
28var_dump($blob->write("test"));
29var_dump(oci_free_descriptor($blob));
30
31try {
32    var_dump($blob->write("test"));
33} catch(\TypeError $exception) {
34    var_dump($exception->getMessage());
35}
36
37try {
38    var_dump(oci_free_descriptor($blob));
39} catch(\TypeError $exception) {
40    var_dump($exception->getMessage());
41}
42
43$blob = oci_new_descriptor($c,OCI_D_LOB);
44unset($blob->descriptor);
45var_dump(oci_free_descriptor($blob));
46
47oci_commit($c);
48
49$select_sql = "SELECT blob FROM ".$schema.$table_name."";
50$s = oci_parse($c, $select_sql);
51oci_execute($s);
52
53var_dump(oci_fetch_array($s, OCI_NUM + OCI_RETURN_LOBS));
54
55require __DIR__.'/drop_table.inc';
56
57echo "Done\n";
58
59?>
60--EXPECTF--
61int(4)
62bool(true)
63int(4)
64bool(true)
65string(%d) "OCILob::write(): %s is not a valid oci8 descriptor resource"
66string(%d) "oci_free_descriptor(): %s is not a valid oci8 descriptor resource"
67
68Warning: oci_free_descriptor(): Unable to find descriptor property in %s on line %d
69bool(false)
70array(1) {
71  [0]=>
72  string(8) "testtest"
73}
74Done
75