Database;
}
if ($Host == '')
{
$Host = $this->Host;
}
if ($User == '')
{
$User = $this->User;
}
if ($Password == '')
{
$Password = $this->Password;
}
if (! $this->Link_ID)
{
$this->Link_ID=odbc_pconnect($Database, $User, $Password, $this->UseODBCCursor);
if (!$this->Link_ID)
{
$this->halt('Link-ID == false, odbc_pconnect failed');
}
}
}
function query($Query_String)
{
$this->connect();
# printf("
Debug: query = %s
\n", $Query_String);
# rei@netone.com.br suggested that we use this instead of the odbc_exec().
# He is on NT, connecting to a Unix MySQL server with ODBC. -- KK
# $this->Query_ID = odbc_prepare($this->Link_ID,$Query_String);
# $this->Query_Ok = odbc_execute($this->Query_ID);
$this->Query_ID = odbc_exec($this->Link_ID,$Query_String);
$this->Row = 0;
odbc_binmode($this->Query_ID, 1);
odbc_longreadlen($this->Query_ID, 4096);
if (!$this->Query_ID)
{
$this->Errno = 1;
$this->Error = 'General Error (The ODBC interface cannot return detailed error messages).';
$this->halt('Invalid SQL: '.$Query_String);
}
return $this->Query_ID;
}
function next_record()
{
$this->Record = array();
$stat = odbc_fetch_into($this->Query_ID, ++$this->Row, &$this->Record);
if (!$stat)
{
if ($this->Auto_Free)
{
odbc_free_result($this->Query_ID);
$this->Query_ID = 0;
};
}
else
{
// add to Record[]
$count = odbc_num_fields($this->Query_ID);
for ($i=1; $i<=$count; $i++)
{
$this->Record[strtolower(odbc_field_name ($this->Query_ID, $i)) ] = $this->Record[ $i - 1 ];
}
}
return $stat;
}
function seek($pos)
{
$this->Row = $pos;
}
function metadata($table)
{
$count = 0;
$id = 0;
$res = array();
$this->connect();
$id = odbc_exec($this->Link_ID, "select * from $table");
if (!$id)
{
$this->Errno = 1;
$this->Error = 'General Error (The ODBC interface cannot return detailed error messages).';
$this->halt('Metadata query failed.');
}
$count = odbc_num_fields($id);
for ($i=1; $i<=$count; $i++)
{
$res[$i]['table'] = $table;
$name = odbc_field_name ($id, $i);
$res[$i]['name'] = $name;
$res[$i]['type'] = odbc_field_type ($id, $name);
$res[$i]['len'] = 0; // can we determine the width of this column?
$res[$i]['flags'] = ''; // any optional flags to report?
}
odbc_free_result($id);
return $res;
}
function affected_rows()
{
return odbc_num_rows($this->Query_ID);
}
function num_rows()
{
# Many ODBC drivers don't support odbc_num_rows() on SELECT statements.
$num_rows = odbc_num_rows($this->Query_ID);
//printf ($num_rows."
");
# This is a workaround. It is intended to be ugly.
if ($num_rows < 0)
{
$i=10;
while (odbc_fetch_row($this->Query_ID, $i))
{
$i*=10;
}
$j = 0;
while($i != $j)
{
$k = $j + (int)(($i-$j) / 2);
if(odbc_fetch_row($this->Query_ID, $k))
{
$j=$k;
}
else
{
$i=$k;
}
if (($i-$j)==1)
{
if (odbc_fetch_row($this->Query_ID, $i))
{
$j=$i;
}
else
{
$i=$j;
}
}
//printf("$i $j $k
");
}
$num_rows=$i;
}
return $num_rows;
}
function num_fields()
{
return count($this->Record)/2;
}
function f($Field_Name)
{
return $this->Record[strtolower($Field_Name)];
}
function halt($msg)
{
printf("Database error: %s
\n", $msg);
printf("ODBC Error: %s (%s)
\n",
$this->Errno,
$this->Error);
die('Session halted.');
}
}
?>