[Summary view]

Differences Between: [Versions 39 and 311] [Versions 39 and 400] [Versions 39 and 401] [Versions 39 and 402] [Versions 39 and 403]

   1  <?php
   2  /*
   3   @version   v5.20.16  12-Jan-2020
   4   @copyright (c) 2000-2013 John Lim (jlim#natsoft.com). All rights reserved.
   5   @copyright (c) 2014      Damien Regad, Mark Newnham and the ADOdb community
   6   Released under both BSD license and Lesser GPL library license.
   7    Whenever there is any discrepancy between the two licenses,
   8    the BSD license will take precedence.
   9   Contribution by Frank M. Kromann <frank@frontbase.com>.
  10    Set tabs to 8.
  11  */
  12  
  13  // security - hide paths
  14  if (!defined('ADODB_DIR')) die();
  15  
  16  if (! defined("_ADODB_FBSQL_LAYER")) {
  17   define("_ADODB_FBSQL_LAYER", 1 );
  18  
  19  class ADODB_fbsql extends ADOConnection {
  20  	 var $databaseType = 'fbsql';
  21  	 var $hasInsertID = true;
  22  	 var $hasAffectedRows = true;
  23  	 var $metaTablesSQL = "SHOW TABLES";
  24  	 var $metaColumnsSQL = "SHOW COLUMNS FROM %s";
  25  	 var $fmtTimeStamp = "'Y-m-d H:i:s'";
  26  	 var $hasLimit = false;
  27  
  28  	function __construct()
  29  	 {
  30  	 }
  31  
  32  	function _insertid()
  33  	 {
  34  	 	 	 return fbsql_insert_id($this->_connectionID);
  35  	 }
  36  
  37  	function _affectedrows()
  38  	 {
  39  	 	 	 return fbsql_affected_rows($this->_connectionID);
  40  	 }
  41  
  42    	function MetaDatabases()
  43  	 {
  44  	 	 $qid = fbsql_list_dbs($this->_connectionID);
  45  	 	 $arr = array();
  46  	 	 $i = 0;
  47  	 	 $max = fbsql_num_rows($qid);
  48  	 	 while ($i < $max) {
  49  	 	 	 $arr[] = fbsql_tablename($qid,$i);
  50  	 	 	 $i += 1;
  51  	 	 }
  52  	 	 return $arr;
  53  	 }
  54  
  55  	 // returns concatenated string
  56  	function Concat()
  57  	 {
  58  	 	 $s = "";
  59  	 	 $arr = func_get_args();
  60  	 	 $first = true;
  61  
  62  	 	 $s = implode(',',$arr);
  63  	 	 if (sizeof($arr) > 0) return "CONCAT($s)";
  64  	 	 else return '';
  65  	 }
  66  
  67  	 // returns true or false
  68  	function _connect($argHostname, $argUsername, $argPassword, $argDatabasename)
  69  	 {
  70  	 	 $this->_connectionID = fbsql_connect($argHostname,$argUsername,$argPassword);
  71  	 	 if ($this->_connectionID === false) return false;
  72  	 	 if ($argDatabasename) return $this->SelectDB($argDatabasename);
  73  	 	 return true;
  74  	 }
  75  
  76  	 // returns true or false
  77  	function _pconnect($argHostname, $argUsername, $argPassword, $argDatabasename)
  78  	 {
  79  	 	 $this->_connectionID = fbsql_pconnect($argHostname,$argUsername,$argPassword);
  80  	 	 if ($this->_connectionID === false) return false;
  81  	 	 if ($argDatabasename) return $this->SelectDB($argDatabasename);
  82  	 	 return true;
  83  	 }
  84  
  85   	function MetaColumns($table, $normalize=true)
  86  	 {
  87  	 	 if ($this->metaColumnsSQL) {
  88  
  89  	 	 	 $rs = $this->Execute(sprintf($this->metaColumnsSQL,$table));
  90  
  91  	 	 	 if ($rs === false) return false;
  92  
  93  	 	 	 $retarr = array();
  94  	 	 	 while (!$rs->EOF){
  95  	 	 	 	 $fld = new ADOFieldObject();
  96  	 	 	 	 $fld->name = $rs->fields[0];
  97  	 	 	 	 $fld->type = $rs->fields[1];
  98  
  99  	 	 	 	 // split type into type(length):
 100  	 	 	 	 if (preg_match("/^(.+)\((\d+)\)$/", $fld->type, $query_array)) {
 101  	 	 	 	 	 $fld->type = $query_array[1];
 102  	 	 	 	 	 $fld->max_length = $query_array[2];
 103  	 	 	 	 } else {
 104  	 	 	 	 	 $fld->max_length = -1;
 105  	 	 	 	 }
 106  	 	 	 	 $fld->not_null = ($rs->fields[2] != 'YES');
 107  	 	 	 	 $fld->primary_key = ($rs->fields[3] == 'PRI');
 108  	 	 	 	 $fld->auto_increment = (strpos($rs->fields[5], 'auto_increment') !== false);
 109  	 	 	 	 $fld->binary = (strpos($fld->type,'blob') !== false);
 110  
 111  	 	 	 	 $retarr[strtoupper($fld->name)] = $fld;
 112  	 	 	 	 $rs->MoveNext();
 113  	 	 	 }
 114  	 	 	 $rs->Close();
 115  	 	 	 return $retarr;
 116  	 	 }
 117  	 	 return false;
 118  	 }
 119  
 120  	 // returns true or false
 121  	function SelectDB($dbName)
 122  	 {
 123  	 	 $this->database = $dbName;
 124  	 	 if ($this->_connectionID) {
 125  	 	 	 return @fbsql_select_db($dbName,$this->_connectionID);
 126  	 	 }
 127  	 	 else return false;
 128  	 }
 129  
 130  
 131  	 // returns queryID or false
 132  	function _query($sql,$inputarr=false)
 133  	 {
 134  	 	 return fbsql_query("$sql;",$this->_connectionID);
 135  	 }
 136  
 137  	 /*	 Returns: the last error message from previous database operation	 */
 138  	function ErrorMsg()
 139  	 {
 140  	 	 $this->_errorMsg = @fbsql_error($this->_connectionID);
 141  	 	 	 return $this->_errorMsg;
 142  	 }
 143  
 144  	 /*	 Returns: the last error number from previous database operation	 */
 145  	function ErrorNo()
 146  	 {
 147  	 	 return @fbsql_errno($this->_connectionID);
 148  	 }
 149  
 150  	 // returns true or false
 151  	function _close()
 152  	 {
 153  	 	 return @fbsql_close($this->_connectionID);
 154  	 }
 155  
 156  }
 157  
 158  /*--------------------------------------------------------------------------------------
 159  	  Class Name: Recordset
 160  --------------------------------------------------------------------------------------*/
 161  
 162  class ADORecordSet_fbsql extends ADORecordSet{
 163  
 164  	 var $databaseType = "fbsql";
 165  	 var $canSeek = true;
 166  
 167  	function __construct($queryID,$mode=false)
 168  	 {
 169  	 	 if (!$mode) {
 170  	 	 	 global $ADODB_FETCH_MODE;
 171  	 	 	 $mode = $ADODB_FETCH_MODE;
 172  	 	 }
 173  	 	 switch ($mode) {
 174  	 	 case ADODB_FETCH_NUM: $this->fetchMode = FBSQL_NUM; break;
 175  	 	 case ADODB_FETCH_ASSOC: $this->fetchMode = FBSQL_ASSOC; break;
 176  	 	 case ADODB_FETCH_BOTH:
 177  	 	 default:
 178  	 	 $this->fetchMode = FBSQL_BOTH; break;
 179  	 	 }
 180  	 	 return parent::__construct($queryID);
 181  	 }
 182  
 183  	function _initrs()
 184  	 {
 185  	 GLOBAL $ADODB_COUNTRECS;
 186  	 	 $this->_numOfRows = ($ADODB_COUNTRECS) ? @fbsql_num_rows($this->_queryID):-1;
 187  	 	 $this->_numOfFields = @fbsql_num_fields($this->_queryID);
 188  	 }
 189  
 190  
 191  
 192  	function FetchField($fieldOffset = -1) {
 193  	 	 if ($fieldOffset != -1) {
 194  	 	 	 $o =  @fbsql_fetch_field($this->_queryID, $fieldOffset);
 195  	 	 	 //$o->max_length = -1; // fbsql returns the max length less spaces -- so it is unrealiable
 196  	 	 	 $f = @fbsql_field_flags($this->_queryID,$fieldOffset);
 197  	 	 	 $o->binary = (strpos($f,'binary')!== false);
 198  	 	 }
 199  	 	 else if ($fieldOffset == -1) {	 /*	 The $fieldOffset argument is not provided thus its -1 	 */
 200  	 	 	 $o = @fbsql_fetch_field($this->_queryID);// fbsql returns the max length less spaces -- so it is unrealiable
 201  	 	 	 //$o->max_length = -1;
 202  	 	 }
 203  
 204  	 	 return $o;
 205  	 }
 206  
 207  	function _seek($row)
 208  	 {
 209  	 	 return @fbsql_data_seek($this->_queryID,$row);
 210  	 }
 211  
 212  	function _fetch($ignore_fields=false)
 213  	 {
 214  	 	 $this->fields = @fbsql_fetch_array($this->_queryID,$this->fetchMode);
 215  	 	 return ($this->fields == true);
 216  	 }
 217  
 218  	function _close() {
 219  	 	 return @fbsql_free_result($this->_queryID);
 220  	 }
 221  
 222  	function MetaType($t,$len=-1,$fieldobj=false)
 223  	 {
 224  	 	 if (is_object($t)) {
 225  	 	 	 $fieldobj = $t;
 226  	 	 	 $t = $fieldobj->type;
 227  	 	 	 $len = $fieldobj->max_length;
 228  	 	 }
 229  	 	 $len = -1; // fbsql max_length is not accurate
 230  	 	 switch (strtoupper($t)) {
 231  	 	 case 'CHARACTER':
 232  	 	 case 'CHARACTER VARYING':
 233  	 	 case 'BLOB':
 234  	 	 case 'CLOB':
 235  	 	 case 'BIT':
 236  	 	 case 'BIT VARYING':
 237  	 	 	 if ($len <= $this->blobSize) return 'C';
 238  
 239  	 	 // so we have to check whether binary...
 240  	 	 case 'IMAGE':
 241  	 	 case 'LONGBLOB':
 242  	 	 case 'BLOB':
 243  	 	 case 'MEDIUMBLOB':
 244  	 	 	 return !empty($fieldobj->binary) ? 'B' : 'X';
 245  
 246  	 	 case 'DATE': return 'D';
 247  
 248  	 	 case 'TIME':
 249  	 	 case 'TIME WITH TIME ZONE':
 250  	 	 case 'TIMESTAMP':
 251  	 	 case 'TIMESTAMP WITH TIME ZONE': return 'T';
 252  
 253  	 	 case 'PRIMARY_KEY':
 254  	 	 	 return 'R';
 255  	 	 case 'INTEGER':
 256  	 	 case 'SMALLINT':
 257  	 	 case 'BOOLEAN':
 258  
 259  	 	 	 if (!empty($fieldobj->primary_key)) return 'R';
 260  	 	 	 else return 'I';
 261  
 262  	 	 default: return 'N';
 263  	 	 }
 264  	 }
 265  
 266  } //class
 267  } // defined