2
0
mirror of https://github.com/ACSPRI/queXS synced 2024-04-02 12:12:16 +00:00

Merging the Limesurvey 1.91+ branch of queXS in to the trunk

This commit is contained in:
azammitdcarf
2011-09-08 01:58:41 +00:00
parent dfa55a3b9e
commit eaa9578ab8
2312 changed files with 811461 additions and 597534 deletions

View File

@@ -1,119 +1,119 @@
<?php
/*
V5.08 6 Apr 2009 (c) 2000-2009 John Lim (jlim#natsoft.com). 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.
Contributed by Interakt Online. Thx Cristian MARIN cristic#interaktonline.com
*/
V5.10 10 Nov 2009 (c) 2000-2009 John Lim (jlim#natsoft.com). 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.
Contributed by Interakt Online. Thx Cristian MARIN cristic#interaktonline.com
*/
require_once ADODB_DIR."/drivers/adodb-sybase.inc.php";
class ADODB_sybase_ase extends ADODB_sybase {
var $databaseType = "sybase_ase";
var $metaTablesSQL="SELECT sysobjects.name FROM sysobjects, sysusers WHERE sysobjects.type='U' AND sysobjects.uid = sysusers.uid";
var $metaColumnsSQL = "SELECT syscolumns.name AS field_name, systypes.name AS type, systypes.length AS width FROM sysobjects, syscolumns, systypes WHERE sysobjects.name='%s' AND syscolumns.id = sysobjects.id AND systypes.type=syscolumns.type";
var $metaDatabasesSQL ="SELECT a.name FROM master.dbo.sysdatabases a, master.dbo.syslogins b WHERE a.suid = b.suid and a.name like '%' and a.name != 'tempdb' and a.status3 != 256 order by 1";
var $databaseType = "sybase_ase";
function ADODB_sybase_ase()
{
}
// split the Views, Tables and procedures.
function MetaTables($ttype=false,$showSchema=false,$mask=false)
{
$false = false;
if ($this->metaTablesSQL) {
// complicated state saving by the need for backward compat
if ($ttype == 'VIEWS'){
$sql = str_replace('U', 'V', $this->metaTablesSQL);
}elseif (false === $ttype){
$sql = str_replace('U',"U' OR type='V", $this->metaTablesSQL);
}else{ // TABLES OR ANY OTHER
$sql = $this->metaTablesSQL;
}
$rs = $this->Execute($sql);
if ($rs === false || !method_exists($rs, 'GetArray')){
return $false;
}
$arr = $rs->GetArray();
var $metaTablesSQL="SELECT sysobjects.name FROM sysobjects, sysusers WHERE sysobjects.type='U' AND sysobjects.uid = sysusers.uid";
var $metaColumnsSQL = "SELECT syscolumns.name AS field_name, systypes.name AS type, systypes.length AS width FROM sysobjects, syscolumns, systypes WHERE sysobjects.name='%s' AND syscolumns.id = sysobjects.id AND systypes.type=syscolumns.type";
var $metaDatabasesSQL ="SELECT a.name FROM master.dbo.sysdatabases a, master.dbo.syslogins b WHERE a.suid = b.suid and a.name like '%' and a.name != 'tempdb' and a.status3 != 256 order by 1";
$arr2 = array();
foreach($arr as $key=>$value){
$arr2[] = trim($value['name']);
}
return $arr2;
}
return $false;
}
function ADODB_sybase_ase()
{
}
function MetaDatabases()
{
$arr = array();
if ($this->metaDatabasesSQL!='') {
$rs = $this->Execute($this->metaDatabasesSQL);
if ($rs && !$rs->EOF){
while (!$rs->EOF){
$arr[] = $rs->Fields('name');
$rs->MoveNext();
}
return $arr;
}
}
return false;
}
// split the Views, Tables and procedures.
function MetaTables($ttype=false,$showSchema=false,$mask=false)
{
$false = false;
if ($this->metaTablesSQL) {
// complicated state saving by the need for backward compat
// fix a bug which prevent the metaColumns query to be executed for Sybase ASE
function MetaColumns($table,$upper=false)
{
$false = false;
if (!empty($this->metaColumnsSQL)) {
$rs = $this->Execute(sprintf($this->metaColumnsSQL,$table));
if ($rs === false) return $false;
if ($ttype == 'VIEWS'){
$sql = str_replace('U', 'V', $this->metaTablesSQL);
}elseif (false === $ttype){
$sql = str_replace('U',"U' OR type='V", $this->metaTablesSQL);
}else{ // TABLES OR ANY OTHER
$sql = $this->metaTablesSQL;
}
$rs = $this->Execute($sql);
$retarr = array();
while (!$rs->EOF) {
$fld = new ADOFieldObject();
$fld->name = $rs->Fields('field_name');
$fld->type = $rs->Fields('type');
$fld->max_length = $rs->Fields('width');
$retarr[strtoupper($fld->name)] = $fld;
$rs->MoveNext();
}
$rs->Close();
return $retarr;
}
return $false;
}
function getProcedureList($schema)
{
return false;
}
if ($rs === false || !method_exists($rs, 'GetArray')){
return $false;
}
$arr = $rs->GetArray();
function ErrorMsg()
{
if (!function_exists('sybase_connect')){
return 'Your PHP doesn\'t contain the Sybase connection module!';
}
return parent::ErrorMsg();
}
$arr2 = array();
foreach($arr as $key=>$value){
$arr2[] = trim($value['name']);
}
return $arr2;
}
return $false;
}
function MetaDatabases()
{
$arr = array();
if ($this->metaDatabasesSQL!='') {
$rs = $this->Execute($this->metaDatabasesSQL);
if ($rs && !$rs->EOF){
while (!$rs->EOF){
$arr[] = $rs->Fields('name');
$rs->MoveNext();
}
return $arr;
}
}
return false;
}
// fix a bug which prevent the metaColumns query to be executed for Sybase ASE
function MetaColumns($table,$upper=false)
{
$false = false;
if (!empty($this->metaColumnsSQL)) {
$rs = $this->Execute(sprintf($this->metaColumnsSQL,$table));
if ($rs === false) return $false;
$retarr = array();
while (!$rs->EOF) {
$fld = new ADOFieldObject();
$fld->name = $rs->Fields('field_name');
$fld->type = $rs->Fields('type');
$fld->max_length = $rs->Fields('width');
$retarr[strtoupper($fld->name)] = $fld;
$rs->MoveNext();
}
$rs->Close();
return $retarr;
}
return $false;
}
function getProcedureList($schema)
{
return false;
}
function ErrorMsg()
{
if (!function_exists('sybase_connect')){
return 'Your PHP doesn\'t contain the Sybase connection module!';
}
return parent::ErrorMsg();
}
}
class adorecordset_sybase_ase extends ADORecordset_sybase {
var $databaseType = "sybase_ase";
function ADORecordset_sybase_ase($id,$mode=false)
{
$this->ADORecordSet_sybase($id,$mode);
}
var $databaseType = "sybase_ase";
function ADORecordset_sybase_ase($id,$mode=false)
{
$this->ADORecordSet_sybase($id,$mode);
}
}
?>