cakephp2-php8/libs/dbo/dbo_pear.php

<?php
//////////////////////////////////////////////////////////////////////////
// + $Id$
// +------------------------------------------------------------------+ //
// + Cake PHP : Rapid Development Framework <http://www.cakephp.org/> + //
// + Copyright: (c) 2005, CakePHP Authors/Developers                  + //
// + Author(s): Michal Tatarynowicz aka Pies <tatarynowicz@gmail.com> + //
// +            Larry E. Masters aka PhpNut <nut@phpnut.com>          + //
// +            Kamil Dzielinski aka Brego <brego.dk@gmail.com>       + //
// +------------------------------------------------------------------+ //
// + Licensed under The MIT License                                   + //
// + Redistributions of files must retain the above copyright notice. + //
// + See: http://www.opensource.org/licenses/mit-license.php          + //
//////////////////////////////////////////////////////////////////////////

/**
  * Pear::DB layer for DBO.
  * 
  * @filesource 
  * @author CakePHP Authors/Developers
  * @copyright Copyright (c) 2005, CakePHP Authors/Developers
  * @link https://trac.cakephp.org/wiki/Authors Authors/Developers
  * @package cake
  * @subpackage cake.libs.dbo
  * @since CakePHP v 0.2.9
  * @version $Revision$
  * @modifiedby $LastChangedBy$
  * @lastmodified $Date$
  * @license http://www.opensource.org/licenses/mit-license.php The MIT License
  */

/**
  * Create an include path required Pear libraries.
  */
uses('dbo');
ini_set('include_path', ini_get('include_path') . PATH_SEPARATOR . PEAR);
vendor('Pear/DB');

/**
  * Pear::DB layer for DBO.
  *
  * @package cake
  * @subpackage cake.libs.dbo
  * @since CakePHP v 0.2.9
  */
class DBO_Pear extends DBO
{
	
	/**
	 * PEAR::DB object with which we connect.
	 *
	 * @var DB The connection object.
	 * @access private
	 */
	var $_pear = null;

/**
  * Connects to the database using options in the given configuration array.
  *
  * @param array $config Configuration array for connecting
  * @return boolean True if the database could be connected, else false
  */
	function connect ($config) 
	{
		$this->config = $config;

		$dsn = $config['driver'].'://'.$config['login'].':'.$config['password'].'@'.$config['host'].'/'.$config['database'];
		$options = array(
			'debug'       => DEBUG-1,
			'portability' => DB_PORTABILITY_ALL,
		);
		
		$this->_pear =& DB::connect($dsn, $options);

		return !(PEAR::isError($this->_pear));
	}

/**
  * Disconnects from database.
  *
  * @return boolean True if the database could be disconnected, else false
  */
	function disconnect () 
	{
		die('Please implement DBO::disconnect() first.');
	}

/**
  * Executes given SQL statement.
  *
  * @param string $sql SQL statement
  * @return resource Result resource identifier
  */
	function execute ($sql) 
	{
		return $this->_pear->query($sql);
	}

/**
  * Returns a row from given resultset as an array .
  *
  * @return array The fetched row as an array
  */
	function fetchRow () 
	{
		return $this->_result->fetchRow(DB_FETCHMODE_ASSOC);
	}

/**
  * Returns an array of tables in the database. If there are no tables, an error is raised and the application exits.
  * :WARNING: :TODO: POSTGRESQL & MYSQL ONLY! Pear::DB doesn't support universal table listing.
  *
  * @return array Array of tablenames in the database
  */
	function tablesList () 
	{
		$driver = $this->config['driver'];
		$tables = array();
	
		if ('postgres' == $driver)
		{
			$sql = "SELECT a.relname AS name
	         FROM pg_class a, pg_user b
	         WHERE ( relkind = 'r') and relname !~ '^pg_' AND relname !~ '^sql_'
	         AND relname !~ '^xin[vx][0-9]+' AND b.usesysid = a.relowner
	         AND NOT (EXISTS (SELECT viewname FROM pg_views WHERE viewname=a.relname));";

			$result = $this->all($sql);
			foreach ($result as $item) 
			{
				$tables[] = $item['name'];
			}
		}
		elseif ('mysql' == $driver)
		{
			$result = array();

			$result = mysql_list_tables($this->config['database']);
			while ($item = mysql_fetch_array($result))
			{
				$tables[] = $item[0];
			}
		}
		else
		{
			die('Please implement DBO_Pear::tablesList() for your database driver.');
		}


		if (!$result) 
		{
			trigger_error(ERROR_NO_TABLE_LIST, E_USER_ERROR);
			exit;
		}
		else 
		{
			return $tables;
		}
	}

/**
  * Returns an array of the fields in given table name.
  *
  * @param string $table_name Name of database table to inspect
  * @return array Fields in table. Keys are name and type
  */
	function fields ($table_name)
	{
		$data = $this->_pear->tableInfo($table_name);
		$fields = false;

		foreach ($data as $item)
			$fields[] = array('name'=>$item['name'], 'type'=>$item['type']);

		return $fields;
	}

/**
  * Returns a quoted and escaped string of $data for use in an SQL statement.
  *
  * @param string $data String to be prepared for use in an SQL statement
  * @return string Quoted and escaped
  */
	function prepareValue ($data)
	{
		return $this->_pear->quoteSmart($data);
	}

/**
  * Returns a formatted error message from previous database operation.
  *
  * @return string Error message
  */
	function lastError () 
	{
		return PEAR::isError($this->_result)? $this->_result->getMessage(): null;
	}

/**
  * Returns number of affected rows in previous database operation. If no previous operation exists, this returns false.
  *
  * @return int Number of affected rows
  */
	function lastAffected ()
	{
		return $this->_pear->affectedRows();
	}

/**
  * Returns number of rows in previous resultset. If no previous resultset exists, 
  * this returns false.
  *
  * @return int Number of rows in resultset
  */
	function lastNumRows () 
	{
		if (method_exists($this->_result, 'numRows'))
			return $this->_result->numRows();
		else
			return false;
	}

/**
  * Returns the ID generated from the previous INSERT operation.
  *
  * @param string $table Name of the database table
  * @return int 
  */
	function lastInsertId ($table) 
	{
		return $this->field('id', "SELECT MAX(id) FROM {$table}");
	}

	/**
	 * Returns a limit statement in the correct format for the particular database.
	 *
	 * @param int $limit Limit of results returned
	 * @param int $offset Offset from which to start results
	 * @return string SQL limit/offset statement
	 */
	function selectLimit ($limit, $offset='0')
	{
		return ' '.$this->_pear->modifyLimitQuery('', $offset, $limit);
	}
	
}

?>