<?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 $UseODBCCursor = 0; function connect($Database = '', $Host = '', $User = '', $Password = '') { /* Handle defaults */ if ($Database == '') { $Database = $this->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("<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 + (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 <br>"); } $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("<b>Database error:</b> %s<br>\n", $msg); printf("<b>ODBC Error</b>: %s (%s)<br>\n", $this->Errno, $this->Error); die('Session halted.'); } function create_database($adminname = '', $adminpasswd = '') { return False; } } ?>