From: Danny Heijl <danny@php.net>
Date: Mon, 10 Jul 2000 19:08:27 +0000 (+0000)
Subject: - Fix the case of NULL BYTE and TEXT columns. (Danny).
X-Git-Tag: PRE_FILE_COMPILE_API_CHANGE~323
X-Git-Url: https://granicus.if.org/sourcecode?a=commitdiff_plain;h=42693bb820320c2fcafbcfe9a999e768a407f05c;p=php

- Fix the case of NULL BYTE and TEXT columns. (Danny).
  ESQL/C (sometimes ?) does not set the indicator variable,
  but the locator->loc_indicator instead.
---

diff --git a/ext/informix/ifx.ec b/ext/informix/ifx.ec
index 5a8d2536e8..789f62344a 100644
--- a/ext/informix/ifx.ec
+++ b/ext/informix/ifx.ec
@@ -2162,12 +2162,33 @@ $ifdef HAVE_IFX_IUS;
 $endif;
 		
             case SQLBYTES   :   
-            case SQLTEXT    :        /* NULL has already been dealt with */   
+            case SQLTEXT    :     
                 bid_b=Ifx_Result->res_id[locind];
                 locator_b=php3_intifx_get_blobloc(bid_b,&EG(regular_list)); 
                 ++locind;
 
                 EXEC SQL GET DESCRIPTOR :descrpid VALUE :i :*locator_b = DATA;
+                
+		if (locator_b->loc_indicator == -1) { // additional check for NULL 
+                  if((IFXG(textasvarchar)==0 && fieldtype==SQLTEXT) 
+                      || (IFXG(byteasvarchar)==0 && fieldtype==SQLBYTES)) {
+                    bid_b=Ifx_Result->res_id[locind];
+                    bid=php3_intifx_copy_blob(bid_b, &EG(regular_list));
+                    php3_intifx_update_blob(bid,nullstr,strlen(nullstr),&EG(regular_list));
+                    add_assoc_long(return_value,fieldname,bid);
+                    break; 
+                  }
+                  if (
+                     (fieldtype==SQLTEXT) || (fieldtype==SQLBYTES)
+$ifdef HAVE_IFX_IUS;
+                                          || (fieldtype==SQLUDTFIXED)
+$endif;
+                      ) {
+                    add_assoc_string(return_value, fieldname, nullstr, DUP);
+		    break;
+                  }
+		}
+		
                 if (locator_b->loc_status < 0) {  /* blob too large */   
                        php_error(E_WARNING,"no memory (%d bytes) for blob",
                                   locator_b->loc_bufsize);
@@ -2499,7 +2520,6 @@ $endif;
                     char_data = NULL;
                     break;
                 case SQLTEXT    :
-                                /* NULL has already been dealt with          */
                                 /* treated always as a long VARCHAR here     */
                                 /* if blobinbfile, too bad                   */
                     bid_b=Ifx_Result->res_id[locind];
@@ -2509,6 +2529,17 @@ $endif;
                   
                     EXEC SQL GET DESCRIPTOR :descrpid VALUE :i 
                                             :*locator_b = DATA;
+                    if (locator_b->loc_indicator == -1) {
+                      if (
+                         (fieldtype==SQLTEXT) || (fieldtype==SQLBYTES)
+$ifdef HAVE_IFX_IUS;
+                                              || (fieldtype==SQLUDTFIXED)
+$endif;
+                          ) {
+                        php_printf("<td>%s</td>", nullstr);
+		        break;
+                      }
+		    }
                     if (locator_b->loc_status < 0) {  /* blob too large */   
                         php_error(E_WARNING,"no memory (%d bytes) for blob",
                                    locator_b->loc_bufsize);