function MetaTables($ttype = false, $schema = false)
{
global $ADODB_FETCH_MODE;
$savem = $ADODB_FETCH_MODE;
$ADODB_FETCH_MODE = ADODB_FETCH_NUM;
$qid = db2_tables($this->_connectionID);
$rs = new ADORecordSet_db2($qid);
$ADODB_FETCH_MODE = $savem;
if (!$rs) {
$false = false;
return $false;
}
$arr = $rs->GetArray();
$rs->Close();
$arr2 = array();
// adodb_pr($arr);
if ($ttype) {
$isview = strncmp($ttype, 'V', 1) === 0;
}
for ($i = 0; $i < sizeof($arr); $i++) {
if (!$arr[$i][2]) {
continue;
}
$type = $arr[$i][3];
$schemaval = $schema ? $arr[$i][1] . '.' : '';
$name = $schemaval . $arr[$i][2];
$owner = $arr[$i][1];
if (substr($name, 0, 8) == 'EXPLAIN_') {
continue;
}
if ($ttype) {
if ($isview) {
if (strncmp($type, 'V', 1) === 0) {
$arr2[] = $name;
}
} else {
if (strncmp($type, 'T', 1) === 0 && strncmp($owner, 'SYS', 3) !== 0) {
$arr2[] = $name;
}
}
} else {
if (strncmp($type, 'T', 1) === 0 && strncmp($owner, 'SYS', 3) !== 0) {
$arr2[] = $name;
}
}
}
return $arr2;
}
function MetaColumns($table)
{
global $ADODB_FETCH_MODE;
$false = false;
if ($this->uCaseTables) {
$table = strtoupper($table);
}
$schema = '';
$this->_findschema($table, $schema);
$savem = $ADODB_FETCH_MODE;
$ADODB_FETCH_MODE = ADODB_FETCH_NUM;
$colname = "%";
$qid = db2_columns($this->_connectionID, "", $schema, $table, $colname);
if (empty($qid)) {
return $false;
}
$rs = new ADORecordSet_db2($qid);
$ADODB_FETCH_MODE = $savem;
if (!$rs) {
return $false;
}
$rs->_fetch();
$retarr = array();
/*
$rs->fields indices
0 TABLE_QUALIFIER
1 TABLE_SCHEM
2 TABLE_NAME
3 COLUMN_NAME
4 DATA_TYPE
5 TYPE_NAME
6 PRECISION
7 LENGTH
8 SCALE
9 RADIX
10 NULLABLE
11 REMARKS
*/
while (!$rs->EOF) {
if (strtoupper(trim($rs->fields[2])) == $table && (!$schema || strtoupper($rs->fields[1]) == $schema)) {
$fld = new ADOFieldObject();
$fld->name = $rs->fields[3];
$fld->type = $this->DB2Types($rs->fields[4]);
// ref: http://msdn.microsoft.com/library/default.asp?url=/archive/en-us/dnaraccgen/html/msdn_odk.asp
// access uses precision to store length for char/varchar
if ($fld->type == 'C' or $fld->type == 'X') {
if ($rs->fields[4] <= -95) {
// UNICODE
$fld->max_length = $rs->fields[7] / 2;
} else {
$fld->max_length = $rs->fields[7];
}
} else {
$fld->max_length = $rs->fields[7];
}
$fld->not_null = !empty($rs->fields[10]);
$fld->scale = $rs->fields[8];
$fld->primary_key = false;
$retarr[strtoupper($fld->name)] = $fld;
} else {
if (sizeof($retarr) > 0) {
break;
}
}
$rs->MoveNext();
}
$rs->Close();
if (empty($retarr)) {
$retarr = false;
}
$qid = db2_primary_keys($this->_connectionID, "", $schema, $table);
if (empty($qid)) {
return $false;
}
$rs = new ADORecordSet_db2($qid);
$ADODB_FETCH_MODE = $savem;
if (!$rs) {
return $retarr;
}
$rs->_fetch();
/*
$rs->fields indices
0 TABLE_CAT
1 TABLE_SCHEM
2 TABLE_NAME
3 COLUMN_NAME
4 KEY_SEQ
5 PK_NAME
*/
while (!$rs->EOF) {
if (strtoupper(trim($rs->fields[2])) == $table && (!$schema || strtoupper($rs->fields[1]) == $schema)) {
$retarr[strtoupper($rs->fields[3])]->primary_key = true;
} else {
if (sizeof($retarr) > 0) {
break;
}
}
$rs->MoveNext();
}
$rs->Close();
if (empty($retarr)) {
$retarr = false;
}
return $retarr;
}
function &MetaTables($ttype = false)
{
global $ADODB_FETCH_MODE;
$savem = $ADODB_FETCH_MODE;
$ADODB_FETCH_MODE = ADODB_FETCH_NUM;
$qid = db2_tables($this->_connectionID);
$rs = new ADORecordSet_db2($qid);
$ADODB_FETCH_MODE = $savem;
if (!$rs) {
$false = false;
return $false;
}
$arr =& $rs->GetArray();
$rs->Close();
$arr2 = array();
if ($ttype) {
$isview = strncmp($ttype, 'V', 1) === 0;
}
for ($i = 0; $i < sizeof($arr); $i++) {
if (!$arr[$i][2]) {
continue;
}
$type = $arr[$i][3];
if ($ttype) {
if ($isview) {
if (strncmp($type, 'V', 1) === 0) {
$arr2[] = $arr[$i][2];
}
} else {
if (strncmp($type, 'SYS', 3) !== 0) {
$arr2[] = $arr[$i][2];
}
}
} else {
if (strncmp($type, 'SYS', 3) !== 0) {
$arr2[] = $arr[$i][2];
}
}
}
return $arr2;
}
function __construct($id, $mode = false)
{
return parent::__construct($id, $mode);
}
function MetaTables($ttype = false, $showSchema = false, $qtable = "%", $qschema = "%")
{
global $ADODB_FETCH_MODE;
$savem = $ADODB_FETCH_MODE;
$ADODB_FETCH_MODE = ADODB_FETCH_NUM;
// @@@ original: $qid = db2_tables($this->_connectionID);
$qid = db2_tables($this->_connectionID, null, $qschema, $qtable);
$rs = new ADORecordSet_db2($qid);
$ADODB_FETCH_MODE = $savem;
if (!$rs) {
$false = false;
return $false;
}
$arr =& $rs->GetArray();
$rs->Close();
$arr2 = array();
if ($ttype) {
$isview = strncmp($ttype, 'V', 1) === 0;
}
for ($i = 0; $i < sizeof($arr); $i++) {
if (!$arr[$i][2]) {
continue;
}
$type = $arr[$i][3];
// @@@ original: DB2/400 $schemaval = ($schema) ? $arr[$i][1].'.' : '';
// use $showSchema instead of $schema, for consistency with odbc_db2.inc.php
$schemaval = $showSchema ? $arr[$i][1] . '.' : '';
if ($ttype) {
if ($isview) {
if (strncmp($type, 'V', 1) === 0) {
$arr2[] = $schemaval . $arr[$i][2];
}
} else {
if (strncmp($type, 'SYS', 3) !== 0) {
$arr2[] = $schemaval . $arr[$i][2];
}
}
} else {
if (strncmp($type, 'SYS', 3) !== 0) {
$arr2[] = $schemaval . $arr[$i][2];
}
}
}
return $arr2;
}
