forked from extern/egroupware
67 lines
1.3 KiB
PHP
67 lines
1.3 KiB
PHP
|
<?php
|
||
|
|
|
||
|
|
/**
|
||
|
|
V4.51 29 July 2004 (c) 2000-2004 John Lim (jlim@natsoft.com.my). All rights reserved.
|
||
|
|
Released under both BSD license and Lesser GPL library license.
|
||
|
|
Whenever there is any discrepancy between the two licenses,
|
||
|
|
the BSD license will take precedence.
|
||
|
|
|
||
|
|
Set tabs to 4 for best viewing.
|
||
|
|
|
||
|
|
*/
|
||
|
|
|
||
|
|
// security - hide paths
|
||
|
|
if (!defined('ADODB_DIR')) die();
|
||
|
|
|
||
|
|
class ADODB2_ibase extends ADODB_DataDict {
|
||
|
|
|
||
|
|
var $databaseType = 'ibase';
|
||
|
|
var $seqField = false;
|
||
|
|
|
||
|
|
|
||
|
|
function ActualType($meta)
|
||
|
|
{
|
||
|
|
switch($meta) {
|
||
|
|
case 'C': return 'VARCHAR';
|
||
|
|
case 'XL':
|
||
|
|
case 'X': return 'VARCHAR(4000)';
|
||
|
|
|
||
|
|
case 'C2': return 'VARCHAR'; // up to 32K
|
||
|
|
case 'X2': return 'VARCHAR(4000)';
|
||
|
|
|
||
|
|
case 'B': return 'BLOB';
|
||
|
|
|
||
|
|
case 'D': return 'DATE';
|
||
|
|
case 'T': return 'TIMESTAMP';
|
||
|
|
|
||
|
|
case 'L': return 'SMALLINT';
|
||
|
|
case 'I': return 'INTEGER';
|
||
|
|
case 'I1': return 'SMALLINT';
|
||
|
|
case 'I2': return 'SMALLINT';
|
||
|
|
case 'I4': return 'INTEGER';
|
||
|
|
case 'I8': return 'INTEGER';
|
||
|
|
|
||
|
|
case 'F': return 'DOUBLE PRECISION';
|
||
|
|
case 'N': return 'DECIMAL';
|
||
|
|
default:
|
||
|
|
return $meta;
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
function AlterColumnSQL($tabname, $flds)
|
||
|
|
{
|
||
|
|
if ($this->debug) ADOConnection::outp("AlterColumnSQL not supported");
|
||
|
|
return array();
|
||
|
|
}
|
||
|
|
|
||
|
|
|
||
|
|
function DropColumnSQL($tabname, $flds)
|
||
|
|
{
|
||
|
|
if ($this->debug) ADOConnection::outp("DropColumnSQL not supported");
|
||
|
|
return array();
|
||
|
|
}
|
||
|
|
|
||
|
|
}
|
||
|
|
|
||
|
|
|
||
|
|
?>
|