fix PECL bug #7295 (ORA-01405: fetched column value is NULL on LOB fields)

diff --git a/NEWS b/NEWS
index 8295fb0aa0a8faeb8a00c86b546be5a559e20853..5599f3b29cfa624c0847be121c44dfcc6dca2547 100644 (file)
--- a/NEWS
+++ b/NEWS
@@ -1,6 +1,8 @@
 PHP                                                                        NEWS
 |||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
 ?? Jan 2007, PHP 5.2.1RC4
+- Fixed PECL bug #7295 (ORA-01405: fetched column value is NULL on LOB fields).
+  (Tony)
 - Fixed bug #40191 (use of array_unique() with objects triggers segfault).
   (Tony)
 - Fixed bug #40169 (CURLOPT_TCP_NODELAY only available in curl >= 7.11.2). 

diff --git a/ext/pdo_oci/oci_statement.c b/ext/pdo_oci/oci_statement.c
index 8c5137a30f4fd7572f0b848d8d998c724d464664..7a908fb2f65564407328946928ec2d7af125b6b0 100755 (executable)
--- a/ext/pdo_oci/oci_statement.c
+++ b/ext/pdo_oci/oci_statement.c
@@ -272,7 +272,7 @@ static int oci_stmt_param_hook(pdo_stmt_t *stmt, struct pdo_bound_param_data *pa
                                        case PDO_PARAM_STR:
                                        default:
                                                P->oci_type = SQLT_CHR;
-                                               value_sz = param->max_value_len + 1;
+                                               value_sz = param->max_value_len;
                                                if (param->max_value_len == 0) {
                                                        value_sz = 4000; /* maximum size before value is interpreted as a LONG value */
                                                }
@@ -460,6 +460,7 @@ static sb4 oci_define_callback(dvoid *octxp, OCIDefine *define, ub4 iter, dvoid
                        *piecep = OCI_ONE_PIECE;
                        *bufpp = col->data;
                        *alenpp = &col->datalen;
+                       *indpp = (dvoid *)&col->indicator;
                        break;
 
                default: