lib/WikiDB/adodb/drivers/adodb-fbsql.inc.php

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