<?php /**************************************************************************\ * phpGroupWare API - ODBC Database support * * Copyright (c) 1998,1999 SH Online Dienst GmbH Boris Erdmann, * * Kristian Koehntopp * * ------------------------------------------------------------------------ * * This is not part of phpGroupWare, but is used by phpGroupWare. * * http://www.phpgroupware.org/ * * ------------------------------------------------------------------------ * * This program is free software; you can redistribute it and/or modify it * * under the terms of the GNU Lesser General Public License as published * * by the Free Software Foundation; either version 2.1 of the License, or * * any later version. * \**************************************************************************/ /* $Id$ */ class db { var $Host = ""; var $Database = ""; var $User = ""; var $Password = ""; var $UseODBCCursor = 0; var $Link_ID = 0; var $Query_ID = 0; var $Record = array(); var $Row = 0; var $Errno = 0; var $Error = ""; var $Auto_Free = 0; ## set this to 1 to automatically free results function connect() { if ( 0 == $this->Link_ID ) { $this->Link_ID=odbc_pconnect($this->Database, $this->User, $this->Password, $this->UseODBCCursor); if (!$this->Link_ID) { $this->halt("Link-ID == false, odbc_pconnect failed"); } } } function query($Query_String) { $this->connect(); # printf("<br>Debug: query = %s<br>\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[<key>] $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."<br>"); # 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+intval(($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 <br>"); }; $num_rows=$i; } return $num_rows; } function num_fields() { return count($this->Record)/2; } function nf() { return $this->num_rows(); } function np() { print $this->num_rows(); } function f($Field_Name) { return $this->Record[strtolower($Field_Name)]; } function p($Field_Name) { print $this->f($Field_Name); } function halt($msg) { printf("<b>Database error:</b> %s<br>\n", $msg); printf("<b>ODBC Error</b>: %s (%s)<br>\n", $this->Errno, $this->Error); die("Session halted."); } } ?>