<?php

/**
 * This file is part of the "dibi" project (http://dibi.texy.info/)
 *
 * Copyright (c) 2005-2007 David Grudl aka -dgx- <dave@dgx.cz>
 *
 * @version  $Revision: 43 $ $Date: 2007-05-12 00:25:32 +0200 (so, 12 V 2007) $
 * @package  dibi
 */


// security - include dibi.php, not this file
if (!class_exists('dibi', FALSE)) die();


/**
 * The dibi driver for MS SQL database
 *
 */
class DibiMSSqlDriver extends DibiDriver
{
    private
        $affectedRows = FALSE;

    public
        $formats = array(
            'TRUE'     => "1",
            'FALSE'    => "0",
            'date'     => "'Y-m-d'",
            'datetime' => "'Y-m-d H:i:s'",
        );


    /**
     * @param array  connect configuration
     * @throw  DibiException
     */
    public function __construct($config)
    {
        if (!extension_loaded('mssql'))
            throw new DibiException("PHP extension 'mssql' is not loaded");

        if (!isset($config['host'])) $config['host'] = NULL;
        if (!isset($config['username'])) $config['username'] = NULL;
        if (!isset($config['password'])) $config['password'] = NULL;

        parent::__construct($config);
    }



    protected function connect()
    {
        $config = $this->config;

        if (empty($config['persistent']))
            $conn = @mssql_connect($config['host'], $config['username'], $config['password'], TRUE);
        else
            $conn = @mssql_pconnect($config['host'], $config['username'], $config['password']);

        if (!is_resource($conn))
            throw new DibiException("Connecting error (driver mssql)'");

        if (!empty($config['database'])) {
            if (!@mssql_select_db($config['database'], $conn))
                throw new DibiException("Connecting error (driver mssql)");
        }

        return $conn;
    }




    public function nativeQuery($sql)
    {
        $this->affectedRows = FALSE;
        $conn = $this->getResource();
        $res = @mssql_query($sql, $conn);

        if ($res === FALSE) return FALSE;

        $this->affectedRows = mssql_rows_affected($conn);
        if ($this->affectedRows < 0) $this->affectedRows = FALSE;

        if (is_resource($res))
            return new DibiMSSqlResult($res);

        return TRUE;
    }


    public function affectedRows()
    {
        return $this->affectedRows;
    }


    public function insertId()
    {
        return FALSE;
    }


    public function begin()
    {
        return mssql_query('BEGIN TRANSACTION', $this->getResource());
    }


    public function commit()
    {
        return mssql_query('COMMIT', $this->getResource());
    }


    public function rollback()
    {
        return mssql_query('ROLLBACK', $this->getResource());
    }


    public function errorInfo()
    {
        return FALSE;
    }


    public function escape($value, $appendQuotes=TRUE)
    {
        $value = str_replace("'", "''", $value);
        return $appendQuotes
               ? "'" . $value . "'"
               : $value;
    }


    public function delimite($value)
    {
        return '[' . str_replace('.', '].[', $value) . ']';
    }


    public function getMetaData()
    {
        trigger_error('Meta is not implemented yet.', E_USER_WARNING);
    }


    /**
     * @see DibiDriver::applyLimit()
     */
    public function applyLimit(&$sql, $limit, $offset = 0)
    {
        // offset suppot is missing...
        if ($limit >= 0)
           $sql = 'SELECT TOP ' . (int) $limit . ' * FROM (' . $sql . ')';

        if ($offset) throw new DibiException('Offset is not implemented in driver odbc');
    }


}  // DibiMSSqlDriver









class DibiMSSqlResult extends DibiResult
{
    private $resource;


    public function __construct($resource)
    {
        $this->resource = $resource;
    }


    public function rowCount()
    {
        return mssql_num_rows($this->resource);
    }


    protected function doFetch()
    {
        return mssql_fetch_assoc($this->resource);
    }


    public function seek($row)
    {
        return mssql_data_seek($this->resource, $row);
    }


    protected function free()
    {
        mssql_free_result($this->resource);
    }


    /** this is experimental */
    protected function buildMeta()
    {
        static $types = array(
            'CHAR'      => dibi::FIELD_TEXT,
            'COUNTER'   => dibi::FIELD_COUNTER,
            'VARCHAR'   => dibi::FIELD_TEXT,
            'LONGCHAR'  => dibi::FIELD_TEXT,
            'INTEGER'   => dibi::FIELD_INTEGER,
            'DATETIME'  => dibi::FIELD_DATETIME,
            'CURRENCY'  => dibi::FIELD_FLOAT,
            'BIT'       => dibi::FIELD_BOOL,
            'LONGBINARY'=> dibi::FIELD_BINARY,
            'SMALLINT'  => dibi::FIELD_INTEGER,
            'BYTE'      => dibi::FIELD_INTEGER,
            'BIGINT'    => dibi::FIELD_INTEGER,
            'INT'       => dibi::FIELD_INTEGER,
            'TINYINT'   => dibi::FIELD_INTEGER,
            'REAL'      => dibi::FIELD_FLOAT,
            'DOUBLE'    => dibi::FIELD_FLOAT,
            'DECIMAL'   => dibi::FIELD_FLOAT,
            'NUMERIC'   => dibi::FIELD_FLOAT,
            'MONEY'     => dibi::FIELD_FLOAT,
            'SMALLMONEY'=> dibi::FIELD_FLOAT,
            'FLOAT'     => dibi::FIELD_FLOAT,
            'YESNO'     => dibi::FIELD_BOOL,
            // and many others?
        );

        $count = mssql_num_fields($this->resource);
        $this->meta = $this->convert = array();
        for ($index = 0; $index < $count; $index++) {

            $tmp = mssql_fetch_field($this->resource, $index);
            $type = strtoupper($tmp->type);
            $info['native'] = $tmp->type;
            $info['type'] = isset($types[$type]) ? $types[$type] : dibi::FIELD_UNKNOWN;
            $info['length'] = $tmp->max_length;
            $info['table'] = $tmp->column_source;

            $this->meta[$tmp->name] = $info;
            $this->convert[$tmp->name] = $info['type'];
        }
    }


} // class DibiMSSqlResult