phptsmadmin/application/classes/Database/TSM/Result.php

<?php defined('SYSPATH') or die('No direct access allowed.');

/**
 * TSM database result.   See [Results](/database/results) for usage and examples.
 *
 * @package    PTA
 * @subpackage TSM
 * @category   Query/Result
 * @author     Deon George
 * @copyright  (c) 2010 phpTSMadmin Development Team
 * @license    http://phptsmadmin.sf.net/license.html
 */
class Database_TSM_Result extends Database_Result {
	public function __construct($result, $sql, $as_object = FALSE, array $params = NULL) {
		parent::__construct($result, $sql, $as_object, $params);

		$start = FALSE;
		// Is this a DB2 result?
		if (is_resource($result) AND function_exists('db2_fetch_object')) {
			// If we are running a DB2 set command, we can return
			if (preg_match('/^SET/',$sql))
				return;

			while ($r = db2_fetch_object($result))
				$this->_rows[$this->_internal_row++] = (array)$r;

		// Is this an DSMADMC result?
		} elseif (is_array($result))
			foreach ($result as $line) {
				if (! trim($line)) {
					if ($start)
						$this->_internal_row++;

					continue;
				}

				list($k,$v) = explode(':',$line,2);

				$this->_rows[$this->_internal_row][trim($k)] = trim($v);
				$start = TRUE;
			}
		else
			throw new Kohana_Exception('Unknown result :result',array(':result'=>$result));

		$this->_total_rows = $this->_internal_row;
		$this->_internal_row = 0;
	}
}
?>