<?php

Lib::loadClass('SqlQueryWhereBuilder');

/**
 * API:
 *   get($field_name) - source field value
 *   get_item($id) - get item by ID
 */
class Data_Source {

	var $_db;
	var $_tbl;// sql table name, TODO: or zasob ID
	var $_default_sql_limit;
	var $_fields_type;// array of fields ( name => type )
	var $_fields_perm;// array of field perm ( name => perm )
	var $_cols = array();
	var $_vCols = array();// setVirtualCols - TODO: use Typespecial
	var $_col_types = array();// TODO: array( col_name => TYPE )
	var $_sql_where;// sql where
	var $_sql_limit;
	var $_sql_offset;
	var $_sql_left_join;// TODO: left join in table
	var $_isAccessFltrAllowed = null;
	private $_geomFields = array();
	private $_fieldOwner = null;
	private $_fieldGroupWrite = null;
	private $_fieldGroupRead = null;

	function __construct($db = null) {
		if ($db) {
			$this->_db = DB::getDB($db);
		} else {
			$this->_db = DB::getDB();
		}
		$this->_default_sql_limit = 10;

		$this->_geomFields = array('the_geom');
	}

	function set_table($tbl) {// TODO: RMME
		$this->setTable($tbl);
	}

	public function setTable($tbl) {
		$this->_tbl = $tbl;
		$this->_fields_type = array();
		$this->_fields_perm = array();
	}

	function get_cols() {
		// TODO: cache in session
		if (empty($this->_cols)) {
			if (!$this->_tbl) {
				return $this->_tbl;
			}
			$sql = "show fields from `{$this->_tbl}` ; ";
			$res = $this->_db->query($sql);
			while ($r = $this->_db->fetch($res)) {
				$this->_cols[$r->Field] = $r->Field;
				$this->_col_types[$r->Field] = $r->Type . ';' . $r->Default;
			}
		}
		return $this->_cols;
	}

	public function getFieldTypes() {
		$fieldTypes = array();
		//$dbID = $this->getDB();
		$db = $this->_db;//(TableAcl) DB::getDB($dbID);
		$tblName = $this->_tbl;//(TableAcl) $this->getName();
		if (!$db) {
			throw new Exception('DataSource is not defined');
		}
		$res = $db->query("show fields from `{$tblName}` ");
		while ($h = $db->fetch_row($res)) {
			$fieldName = $h[0];
			$fieldType = $h[1];
			$fieldTypes[$fieldName] = array('type'=>$h[1], 'null'=>('YES' == $h[2]), 'default'=>$h[4]);
		}
		return $fieldTypes;
	}

	public function getUniqueKeys() {
		$sqlKeys = array();
		//$dbID = $this->getDB();
		$db = $this->_db;//(TableAcl) DB::getDB($dbID);
		$tblName = $this->_tbl;//(TableAcl) $this->getName();
		if (!$db) {
			throw new Exception('DataSource is not defined');
		}
		$sql = "SHOW KEYS FROM  `{$tblName}`";
		$res = $db->query($sql);
		while ($r = $db->fetch($res)) {
			if ($r->Non_unique == '0') {
				$sqlKeys[$r->Column_name] = true;
			}
		}
		$sqlKeys = array_keys($sqlKeys);
		return $sqlKeys;
	}

	function set_cols($cols) {// TODO: RMME
		$this->setCols($cols);
	}

	function setCols($cols) {
		foreach ($cols as $v_field_name) {
			$this->_cols[$v_field_name] = $v_field_name;
		}
	}

	public function setColTypes($types) {
		$this->_col_types = $types;
		// TableAcl->getTypes():  $this->_types[$fieldName] = array('type'=>$h[1], 'null'=>('YES' == $h[2]), 'default'=>$h[4]);
	}

	public function getColDefault($fieldName) {
		$fldType = V::get($fieldName, '', $this->_col_types);
		if (!$fldType) return '';
		return V::get('default', '', $fldType);
	}

	function setVirtualCols($cols) {
		foreach ($cols as $v_field_name) {
			$this->_vCols[$v_field_name] = $v_field_name;
		}
	}

	public function setFieldGroupWrite($fieldName, $fieldExists = false) {
		if ($fieldExists) {
			$this->_fieldGroupWrite = $fieldName;
			$this->_cols[$fieldName] = $fieldName;
		}
	}

	public function setFieldGroupRead($fieldName, $fieldExists = false) {
		if ($fieldExists) {
			$this->_fieldGroupRead = $fieldName;
			$this->_cols[$fieldName] = $fieldName;
		}
	}

	public function setFieldOwner($fieldName, $fieldExists = false) {
		if ($fieldExists) {
			$this->_fieldOwner = $fieldName;
			$this->_cols[$fieldName] = $fieldName;
		}
	}

	public function getFieldGroupWrite() {
		return $this->_fieldGroupWrite;
	}

	public function getFieldGroupRead() {
		return $this->_fieldGroupRead;
	}

	public function getFieldOwner() {
		return $this->_fieldOwner;
	}

	function _get_sql_cols() {
		$sql_cols = "t.*";
		if (!empty($this->_cols)) {
			$sql_cols_arr = array();
			foreach ($this->_cols as $k_field => $v_field_label) {
				if ($this->isGeomField($k_field)) {
					$sqlFld = "AsWKT(t.`{$k_field}`) as {$k_field}";
				} else {
					$sqlFld = "t.`{$k_field}`";
				}
				$sql_cols_arr[] = $sqlFld;
			}
			$sql_cols = implode(", ", $sql_cols_arr);
		}
if(V::get('DBG_DS', 0, $_GET) > 0){echo'<pre style="max-height:200px;overflow:auto;border:1px solid red;text-align:left;">sql_cols (' . __CLASS__ . '::' . __FUNCTION__ . ':' . __LINE__ . '): ';print_r($sql_cols);echo'</pre>'."\n\n";}
		return $sql_cols;
	}

	public function setAccessFltrAllowed($isAccessFltrAllowed) {
		$this->_isAccessFltrAllowed = $isAccessFltrAllowed;
	}

	public function isAccessFltrAllowed() {
		if (false === $this->_isAccessFltrAllowed) {
			return false;
		}
		else if ($this->hasAclGroupFields()) {
			return true;
		}
		return false;
	}

	public function hasAclGroupFields() {
		if ( !empty($this->_fieldGroupWrite)
			&& !empty($this->_fieldGroupRead)
			&& array_key_exists('A_ADM_COMPANY', $this->_cols)
			&& array_key_exists('A_CLASSIFIED', $this->_cols)
		) {
			return true;
		}
		return false;
	}

	function getSpecialFilters() {
		$fltrs = array();

		if (array_key_exists('A_PROBLEM', $this->_cols)) {
			$fltrs['Problemy'] = new stdClass();
			$fltrs['Problemy']->icon = 'glyphicon glyphicon-warning-sign';
			$fltrs['Problemy']->btns = array();
			$fltrs['Problemy']->btns['PROBLEMY'] = (object)array('value'=>'PROBLEM');
			$fltrs['Problemy']->btns['OSTRZEZENIA'] = (object)array('value'=>'WARNING');
			$fltrs['Problemy']->btns['BEZ_PROBLEM.'] = (object)array('value'=>'NORMAL');
		}
		if (array_key_exists('A_STATUS', $this->_cols)) {
			$fltrs['Status'] = new stdClass();
			$fltrs['Status']->icon = 'glyphicon glyphicon-question-sign';
			$fltrs['Status']->btns = array();
			$fltrs['Status']->btns['OCZEKUJACY'] = (object)array('value'=>'WAITING');
			$fltrs['Status']->btns['AKTYWNI'] = (object)array('value'=>'AKTYWNI');
		}
		if (array_key_exists('L_APPOITMENT_DATE', $this->_cols)) {
			$fltrs['Spotkania'] = new stdClass();
			$fltrs['Spotkania']->icon = 'glyphicon glyphicon-calendar';
			$fltrs['Spotkania']->btns = array();
			$fltrs['Spotkania']->btns['STARE'] = (object)array('value'=>'OLD');
			$fltrs['Spotkania']->btns['ZARAZ'] = (object)array('value'=>'NOW');
			$fltrs['Spotkania']->btns['DZISIAJ'] = (object)array('value'=>'TODAY');
			$fltrs['Spotkania']->btns['BRAK'] = (object)array('value'=>'BRAK');
		}
		if ($this->isAccessFltrAllowed()) {
			$fltrs['Access'] = new stdClass();
			$fltrs['Access']->icon = 'glyphicon glyphicon-lock';
			$fltrs['Access']->btns = array();
			$fltrs['Access']->btns['Pokaż'] = (object)array('value'=>'SHOW');
		}
		return $fltrs;
	}

	public function _parseOgcFilter($ogcFilter) {
		$ogcFilterXmlString = <<<OGC_FILTER_XML_FILE
<?xml version="1.0" encoding="UTF-8"?>
<filter xmlns="https://biuro.biall-net.pl/SE/version-git/schema/filter.xsd"
        xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance"
        xmlns:ogc="http://www.opengis.net/ogc">
	{$ogcFilter}
</filter>
OGC_FILTER_XML_FILE;
		$convertedGuiXml = $this->_convertGuiXmlToCmdList($ogcFilterXmlString);

		DBG::_('DBG_DS_OGC', '>1', "convertedGuiXml(".strlen($convertedGuiXml).")", $convertedGuiXml, __CLASS__, __FUNCTION__, __LINE__);

		$tags = array();
		$parserXml = xml_parser_create();
		xml_parser_set_option($parserXml, XML_OPTION_CASE_FOLDING, 0);
		xml_parser_set_option($parserXml, XML_OPTION_SKIP_WHITE, 1);
		if (0 == xml_parse_into_struct($parserXml, $convertedGuiXml, $tags)) {
			throw new Exception("Parse Request xml error #" . __LINE__ . ": parse converted transaction failed");
		}
		xml_parser_free($parserXml);
		if (empty($tags)) {
			throw new Exception("Parse Request xml error #" . __LINE__ . ": parse converted transaction returns empty structure");
		}

		$queryWhereBuilder = new SqlQueryWhereBuilder();
		foreach ($tags as $tag) {
			switch ($tag['tag']) {
				case 'filter': {// root tag
				}
					break;
				case 'sql_filter_comparisonFieldToValue': {
					$fieldName = V::get('fieldName', '', $tag['attributes']);
					$comparisonSign = V::get('comparisonSign', '', $tag['attributes']);
					$value = V::get('value', '', $tag['attributes']);
					$queryWhereBuilder->addComparisonFieldToValue($fieldName, $comparisonSign, $value);
				}
					break;
				case 'sql_filter_openBlock': {
					$blockType = V::get('type', '', $tag['attributes']);
					DBG::_('DBG_DS_OGC', '>2', "sql_filter_openBlock block Type {$blockType} attrs", json_encode($tag), __CLASS__, __FUNCTION__, __LINE__);
					$queryWhereBuilder->openBlock($blockType);
				}
					break;
				case 'sql_filter_closeBlock': {
					$blockType = V::get('type', '', $tag['attributes']);
					$queryWhereBuilder->closeBlock($blockType);
				}
					break;
				default: {
					DBG::_('DBG_DS_OGC', '>1', "TODO: tag {$tag['tag']}", $queryWhereBuilder, __CLASS__, __FUNCTION__, __LINE__);
					throw new Exception("TODO: tag {$tag['tag']}");
				}
			}
		}

		$queryWhereBuilder->parseQueryWhere();
		DBG::_('DBG_DS_OGC', '>1', "queryWhereBuilder", $queryWhereBuilder, __CLASS__, __FUNCTION__, __LINE__);
		return $queryWhereBuilder->getQueryWhere('t');
	}

	public function _convertGuiXmlToCmdList($ogcFilterXmlString) {
		$convertOgcFilterXslString = <<<XSL_CONVERT_OGC_FILTER_TO_XML_TASK_LIST
<?xml version="1.0" encoding="UTF-8"?>
<xsl:stylesheet version="1.0"
								xmlns:xsl="http://www.w3.org/1999/XSL/Transform"
								xmlns:filter="https://biuro.biall-net.pl/SE/version-git/schema/filter.xsd"
								xmlns:ogc="http://www.opengis.net/ogc"
								>
	<xsl:output method="xml" omit-xml-declaration="yes" indent="no"/>

	<xsl:template match="/">
		<xsl:element name="filter">
			<xsl:apply-templates select="filter:filter/ogc:Filter"/>
		</xsl:element>
	</xsl:template>

	<xsl:template match="ogc:Filter">
		<xsl:apply-templates/>
	</xsl:template>

	<xsl:template match="ogc:Or">
		<xsl:element name="sql_filter_openBlock">
			<xsl:attribute name="type"><xsl:value-of select="'or'" /></xsl:attribute>
		</xsl:element>
		<xsl:apply-templates/>
		<xsl:element name="sql_filter_closeBlock">
			<xsl:attribute name="type"><xsl:value-of select="'or'" /></xsl:attribute>
		</xsl:element>
	</xsl:template>

	<xsl:template match="ogc:And">
		<xsl:element name="sql_filter_openBlock">
			<xsl:attribute name="type"><xsl:value-of select="'and'" /></xsl:attribute>
		</xsl:element>
		<xsl:apply-templates/>
		<xsl:element name="sql_filter_closeBlock">
			<xsl:attribute name="type"><xsl:value-of select="'and'" /></xsl:attribute>
		</xsl:element>
	</xsl:template>

	<xsl:template match="ogc:PropertyIsEqualTo">
		<xsl:element name="sql_filter_comparisonFieldToValue">
			<xsl:attribute name="fieldName"><xsl:value-of select="ogc:PropertyName" /></xsl:attribute>
			<xsl:attribute name="comparisonSign"><xsl:value-of select="'='" /></xsl:attribute>
			<xsl:attribute name="value"><xsl:value-of select="ogc:Literal" /></xsl:attribute>
		</xsl:element>
	</xsl:template>

</xsl:stylesheet>

XSL_CONVERT_OGC_FILTER_TO_XML_TASK_LIST;
		$requestXml = new DOMDocument();
		$requestXml->loadXml($ogcFilterXmlString);

		$convertOgcFilterXsl = new DOMDocument();
		$convertOgcFilterXsl->loadXml($convertOgcFilterXslString);
		$proc = new XSLTProcessor();
		$proc->importStylesheet($convertOgcFilterXsl);
		return $proc->transformToXML($requestXml);
	}

	function _parseSpecialFilter($fltr, $value) {
		$sqlFltr = "";

		switch ($fltr) {
			case 'Problemy':
				if (array_key_exists('A_PROBLEM', $this->_cols)) {
					switch ($value) {
						case 'PROBLEM':
							$sqlFltr = " t.`A_PROBLEM`!='' ";
							break;
						case 'WARNING':
							$sqlFltr = " t.`A_PROBLEM`='WARNING' ";
							break;
						case 'NORMAL':
							$sqlFltr = " t.`A_PROBLEM`='' ";
							break;
					}
				}
				break;
			case 'Status':
				if (array_key_exists('A_STATUS', $this->_cols)) {
					switch ($value) {
						case 'WAITING':
							$sqlFltr = " t.`A_STATUS`='WAITING' ";
							break;
						case 'AKTYWNI':
							$sqlFltr = " t.`A_STATUS` in('NORMAL', 'WARNING') ";
			// TODO: $_SESSION['USERS_FILTER_STATUS_SQL']="and (( $thiss->DETECT_TABLE_NAME.A_STATUS='NORMAL' or $thiss->DETECT_TABLE_NAME.A_STATUS='WARNING'  ) or ( $thiss->DETECT_TABLE_NAME.A_STATUS='OFF_SOFT' and $thiss->DETECT_TABLE_NAME.A_PROBLEM_DESC not like '%odla%fizy%' and $thiss->DETECT_TABLE_NAME.A_PROBLEM!='' ) or ( $thiss->DETECT_TABLE_NAME.A_STATUS='OFF_SOFT' and $thiss->DETECT_TABLE_NAME.A_PROBLEM='' )) ";
			// if ($thiss->DETECT_TABLE_NAME == 'KSIEG_DOKUMENTY') $_SESSION['USERS_FILTER_STATUS_SQL']="and ( $thiss->DETECT_TABLE_NAME.A_STATUS='NORMAL' or $thiss->DETECT_TABLE_NAME.A_STATUS='WARNING'  )  ";
							break;
					}
				}
				break;
			case 'Spotkania':
				if (array_key_exists('L_APPOITMENT_DATE', $this->_cols)) {
					switch ($value) {
						case 'OLD':
							$sqlFltr = " UNIX_TIMESTAMP(t.`L_APPOITMENT_DATE`)<UNIX_TIMESTAMP(now()) and t.`L_APPOITMENT_DATE`!='' ";
							break;
						case 'NOW':
							$sqlFltr = " UNIX_TIMESTAMP(t.`L_APPOITMENT_DATE`)<UNIX_TIMESTAMP(now())+3600 and UNIX_TIMESTAMP(t.`L_APPOITMENT_DATE`)>UNIX_TIMESTAMP(now())-3600 ";
							break;
						case 'TODAY':
							$start = mktime(0,0,0, date("m"), date("d"), date("Y"));
							$end = mktime(0,0,0, date("m"), date("d") + 1, date("Y"));
							$sqlFltr = " UNIX_TIMESTAMP(t.`L_APPOITMENT_DATE`)>'{$start}' and UNIX_TIMESTAMP(t.`L_APPOITMENT_DATE`)<'{$end}' ";
							break;
						case 'TOMORROW':
							$start = mktime(0,0,0, date("m"), date("d") + 1, date("Y"));
							$end = mktime(0,0,0, date("m"), date("d") + 2, date("Y"));
							$sqlFltr = " UNIX_TIMESTAMP(t.`L_APPOITMENT_DATE`)>'{$start}' and UNIX_TIMESTAMP(t.`L_APPOITMENT_DATE`)<'{$end}' ";
							break;
						case 'YESTERDAY':
							$start = mktime(0,0,0, date("m"), date("d") - 1, date("Y"));
							$end = mktime(0,0,0, date("m"), date("d") - 2, date("Y"));
							$sqlFltr = " UNIX_TIMESTAMP(t.`L_APPOITMENT_DATE`)>'{$start}' and UNIX_TIMESTAMP(t.`L_APPOITMENT_DATE`)<'{$end}' ";
							break;
						case 'BRAK':
							$start = mktime(0,0,0, date("m"), date("d") - 1, date("Y"));
							$end = mktime(0,0,0, date("m"), date("d") - 2, date("Y"));
							$sqlFltr = " t.`L_APPOITMENT_DATE`='' ";
							break;
					}
				}
				break;
			case 'Access':
				if ('SHOW' != $value && $this->isAccessFltrAllowed()) {
					$userLogin = User::getLogin();
					$usrAclGroups = User::getLdapGroupsNames();
					$usrAclGroups[] = '';// TODO: allow empty for everyone?
					$sqlUsrAclGroups = "'" . implode("','", $usrAclGroups) . "'";
					$sqlFltr = "
						t.`{$this->_fieldGroupWrite}` in({$sqlUsrAclGroups})
						and t.`{$this->_fieldGroupRead}` in({$sqlUsrAclGroups})
					";
					if (array_key_exists('L_APPOITMENT_USER', $this->_cols)) {
						$sqlFltr = "
							(
								({$sqlFltr})
								or t.`L_APPOITMENT_USER`='{$userLogin}'
							)
						";
					}
				}
				break;
			default:
		}

/*
			//USERS_FILTER_PROBLEM
			// 	PROBLEMY			https://biuro.biall-net.pl/SE/se-dev/index.php?FUNCTION_INIT=USERS_FILTER_PROBLEM&USERS_FILTER_PROBLEM=PROBLEM
			//	OSTRZEZENIA		https://biuro.biall-net.pl/SE/se-dev/index.php?FUNCTION_INIT=USERS_FILTER_PROBLEM&USERS_FILTER_PROBLEM=WARNING
			//	BEZ_PROBLEM.	https://biuro.biall-net.pl/SE/se-dev/index.php?FUNCTION_INIT=USERS_FILTER_PROBLEM&USERS_FILTER_PROBLEM=NORMAL
			//	KASUJ-FILTR		https://biuro.biall-net.pl/SE/se-dev/index.php?FUNCTION_INIT=USERS_FILTER_PROBLEM&USERS_FILTER_PROBLEM=

			//USERS_FILTER_STATUS
			//	OCZEKUJACY	https://biuro.biall-net.pl/SE/se-dev/index.php?FUNCTION_INIT=USERS_FILTER_STATUS&USERS_FILTER_STATUS=WAITING
			//	AKTYWNI			https://biuro.biall-net.pl/SE/se-dev/index.php?FUNCTION_INIT=USERS_FILTER_STATUS&USERS_FILTER_STATUS=AKTYWNI
			//	KASUJ-FILTR	https://biuro.biall-net.pl/SE/se-dev/index.php?FUNCTION_INIT=USERS_FILTER_STATUS&USERS_FILTER_STATUS=

			//USERS_FILTER_APPOINTMENT
			//	A_STARE		https://biuro.biall-net.pl/SE/se-dev/index.php?FUNCTION_INIT=USERS_FILTER_APPOINTMENT&USERS_FILTER_APPOINTMENT=OLD
			//	A_ZARAZ		https://biuro.biall-net.pl/SE/se-dev/index.php?FUNCTION_INIT=USERS_FILTER_APPOINTMENT&USERS_FILTER_APPOINTMENT=NOW
			//	A_DZISIAJ	https://biuro.biall-net.pl/SE/se-dev/index.php?FUNCTION_INIT=USERS_FILTER_APPOINTMENT&USERS_FILTER_APPOINTMENT=TODAY
			//	APP_ALL		https://biuro.biall-net.pl/SE/se-dev/index.php?FUNCTION_INIT=USERS_FILTER_APPOINTMENT&USERS_FILTER_APPOINTMENT=

			// btn class: active, disabled
			{// USERS_FILTER_PROBLEM
				var groupHtml = $('<div class="btn-group"></div>');
				$('<button class="btn btn-xs" title="Problemy"><i class="glyphicon glyphicon-warning-sign"></i></button>').appendTo(groupHtml);
				$('<button class="btn btn-xs">PROBLEMY</button>').appendTo(groupHtml);
				$('<button class="btn btn-xs">OSTRZEZENIA</button>').appendTo(groupHtml);
				$('<button class="btn btn-xs active">BEZ_PROBLEM.</button>').appendTo(groupHtml);
				$('<button class="btn btn-xs disabled" title="Kasuj filtr"><i class="glyphicon glyphicon-remove"></i></button>').appendTo(groupHtml);
				groupHtml.appendTo(_headSpecialFilter);
			}
			{// USERS_FILTER_STATUS
				var groupHtml = $('<div class="btn-group"></div>');
				$('<button class="btn btn-xs" title="Status"><i class="glyphicon glyphicon-question-sign"></i></button>').appendTo(groupHtml);
				$('<button class="btn btn-xs">OCZEKUJACY</button>').appendTo(groupHtml);
				$('<button class="btn btn-xs">AKTYWNI</button>').appendTo(groupHtml);
				$('<button class="btn btn-xs disabled" title="Kasuj filtr"><i class="glyphicon glyphicon-remove"></i></button>').appendTo(groupHtml);
				groupHtml.appendTo(_headSpecialFilter);
			}
			{// USERS_FILTER_APPOINTMENT
				var groupHtml = $('<div class="btn-group"></div>');
				$('<button class="btn btn-xs" title="Spotkania"><i class="glyphicon glyphicon-calendar"></i></button>').appendTo(groupHtml);
				$('<button class="btn btn-xs">A_STARE</button>').appendTo(groupHtml);
				$('<button class="btn btn-xs">A_ZARAZ</button>').appendTo(groupHtml);
				$('<button class="btn btn-xs active">A_DZISIAJ</button>').appendTo(groupHtml);
				$('<button class="btn btn-xs disabled" title="Kasuj filtr"><i class="glyphicon glyphicon-remove"></i></button>').appendTo(groupHtml);// To samo co KASUJ-FILTR
				groupHtml.appendTo(_headSpecialFilter);
			}
 */

		return $sqlFltr;
	}

	private function isColTypeNumber($colName) {
		if ($colName == 'ID') {
			return true;
		}
		$type = V::get($colName, null, $this->_col_types);
		if(V::get('DBG_DS', 0, $_GET) > 0){echo'<pre style="max-height:200px;overflow:auto;border:1px solid red;text-align:left;">type['.$colName.'] (' . __CLASS__ . '::' . __FUNCTION__ . ':' . __LINE__ . '): ';print_r(array('type'=>$type, '!empty'=>(!empty($type['type']['type']))));echo'</pre>'."\n\n";}
		if (!empty($type['type'])) {
			$sqlType = $type['type'];
			if (substr($sqlType, 0, 3) == 'int'
					|| substr($sqlType, 0, 7) == 'tinyint'
					|| substr($sqlType, 0, 8) == 'smallint'
			) {
				return true;
			}
		}
		return false;
	}

	public function _parseSqlWhere($params = array()) {

		// default filter value
		if (empty($params['sf_Access'])) $params['sf_Access'] = 'HIDE';

		$sql_where = '';
		// ... parse filters
		$sql_where_and = array();
		foreach ($params as $k => $v) {
			if (strlen($k) > 3 && substr($k, 0, 2) == 'f_') {
				//$v = trim($v, '% ');
				//$sql_where_and[] = "t.`" . substr($k, 2) . "` like '%" . DB::_($v) . "%'";
				$fldName = substr($k, 2);
				if ($this->isGeomField($fldName)) {
					$sqlFilter = $this->_sqlValueForGeomField($fldName, $v, 't');
					if ($sqlFilter) $sql_where_and[] = $sqlFilter;
					continue;
				}
				if ($this->isCsvNumericField($fldName)) {
					$sqlFilter = $this->_sqlValueForCsvNumericField($fldName, $v, 't');
					if ($sqlFilter) $sql_where_and[] = $sqlFilter;
					continue;
				}

				if (substr($v, 0, 1) == '=') {
					$v = $this->_db->_(substr($v, 1));
					if (strlen($v)) $sql_where_and[] = "t.`{$fldName}`='{$v}'";
				}
				else if ($v == '!NULL' || $v == 'IS NOT NULL') {
					$sql_where_and[] = "t.`{$fldName}` is not null";
				}
				else if (substr($v, 0, 1) == '!') {
					$v = $this->_db->_(substr($v, 1));
					if (strlen($v)) $sql_where_and[] = "t.`{$fldName}` not like '{$v}'";
				}
				else if (substr($v, 0, 2) == '<=') {
					$v = $this->_db->_(substr($v, 2));
					if (strlen($v)) $sql_where_and[] = "t.`{$fldName}`<='{$v}'";
				}
				else if (substr($v, 0, 2) == '>=') {
					$v = $this->_db->_(substr($v, 2));
					if (strlen($v)) $sql_where_and[] = "t.`{$fldName}`>='{$v}'";
				}
				else if (substr($v, 0, 1) == '<') {
					$v = $this->_db->_(substr($v, 1));
					if (strlen($v)) $sql_where_and[] = "t.`{$fldName}`<'{$v}'";
				}
				else if (substr($v, 0, 1) == '>') {
					$v = $this->_db->_(substr($v, 1));
					if (strlen($v)) $sql_where_and[] = "t.`{$fldName}`>'{$v}'";
				}
				else if (false !== strpos($v, '%')) {
					$sql_where_and[] = "t.`{$fldName}` like '{$v}'";
				}
				else if ($this->isColTypeNumber($fldName)) {
					$v = $this->_db->_($v);
					$sql_where_and[] = "t.`{$fldName}`='{$v}'";
				}
				else {
					$queryWhereBuilder = new SqlQueryWhereBuilder();
					$searchWords = $queryWhereBuilder->splitQueryToWords($v);
					$sqlWhereWords = array();
					if (!empty($searchWords)) {
						foreach ($searchWords as $word) {
							$sqlWord = $this->_db->_($word);
							$sqlWhereWords[] = "t.`{$fldName}` like '%{$sqlWord}%'";
						}
					}
					if (!empty($searchWords)) {
						$sql_where_and[] = "(" . implode(" and ", $sqlWhereWords) . ")";
					}
				}
			}
			else if (strlen($k) > 4 && substr($k, 0, 3) == 'sf_') {
				$sqlFltr = $this->_parseSpecialFilter(substr($k, 3), $v);
				if (!empty($sqlFltr)) {
					$sql_where_and[] = $sqlFltr;
				}
			}
			else if ('ogc:Filter' == $k) {
				$sqlFltr = $this->_parseOgcFilter($v);
				if (!empty($sqlFltr)) {
					$sql_where_and[] = $sqlFltr;
				}
			}
		}
		if (!empty($sql_where_and)) {
			$sql_where = implode(" and ", $sql_where_and);
		}

		if (!$sql_where) $sql_where = "1=1";
		if(V::get('DBG_DS', 0, $_GET) > 1){echo'<pre style="max-height:200px;overflow:auto;border:1px solid red;text-align:left;">sql_where (' . __CLASS__ . '::' . __FUNCTION__ . ':' . __LINE__ . '): ';print_r($sql_where);echo'</pre>'."\n\n";}
		return $sql_where;
	}

	private function _sqlValueForGeomField($fldName, $fltrValue, $tblPrefix = 't') {
		$sqlFilter = false;
		// example: BBOX:54.40993961633866,18.583889010112824,54.337945760687454,18.397121431987586
		if ('BBOX:' == substr($fltrValue, 0, 5)) {
			$val = substr($fltrValue, 5);
			$valParts = explode(',', $val);
			if (count($valParts) == 4) {
				$isAllNumeric = true;
				foreach ($valParts as $v) {
					if (!is_numeric($v)) $isAllNumeric = false;
				}
				if ($isAllNumeric) {
					$bounds = "POLYGON((
						{$valParts[3]} {$valParts[2]},
						{$valParts[3]} {$valParts[0]},
						{$valParts[1]} {$valParts[0]},
						{$valParts[1]} {$valParts[2]},
						{$valParts[3]} {$valParts[2]}
					))";
					// for mysql 5.6 use ST_Contains() @see http://dev.mysql.com/doc/refman/5.6/en/spatial-relation-functions.html
					$sqlFilter = "Intersects(GeomFromText('{$bounds}'), GeomFromText(AsWKT({$tblPrefix}.`{$fldName}`)))=1";
				}
			}
		}
		else if ('GeometryType=' == substr($fltrValue, 0, 13)) {
			$sqlFilter = "GeometryType({$tblPrefix}.`{$fldName}`)='" . substr($fltrValue, 13) . "'";
		}
		return $sqlFilter;
	}

	private function _sqlValueForCsvNumericField($fldName, $fltrValue, $tblPrefix = 't') {
		$sqlFilter = false;
		if (is_numeric($fltrValue)) {
			$sqlFilter = "FIND_IN_SET('{$fltrValue}', `{$fldName}`)>0";
		} else if (false !== strpos($fltrValue, ' ')) {
			$sqlGlue = " or ";
			$fltrValues = $fltrValue;
			if ('&' == substr($fltrValues, 0, 1)) {
				$fltrValues = substr($fltrValues, 1);
				$sqlGlue = " and ";
			}
			$fltrValues = explode(' ', $fltrValues);
			$sqlNumericValues = array();
			foreach ($fltrValues as $fltrVal) {
				if (is_numeric($fltrVal)) {
					$sqlNumericValues[] = "FIND_IN_SET('{$fltrVal}', `{$fldName}`)>0";
				}
			}
			if (!empty($sqlNumericValues)) {
				$sqlFilter = "(" . implode($sqlGlue, $sqlNumericValues) . ")";
			}
		}
		return $sqlFilter;
	}

	function get_item($id) {// TODO: RMME
		$this->getItem($id);
	}

	/**
	 * @returns object
	 */
	public function getItem($primaryKey) {
		$primaryKeyField = $this->getPrimaryKeyField();
		$ret = null;
		$sql_cols = $this->_get_sql_cols();
		$primaryKey = intval($primaryKey);// TODO: validate $primaryKey
		$sql = "select {$sql_cols}
			from `{$this->_tbl}` as t
			where t.`{$primaryKeyField}`='{$primaryKey}'
		";
		// TODO: use PDO
		$res = $this->_db->query($sql);
		if ($r = $this->_db->fetch($res)) {
			$ret = $r;
		}
		return $ret;
	}

	function get_items($params = array()) {// TODO: RMME
		$this->getItems($params);
	}

	public function getItems($params = array()) {
		$primaryKeyField = $this->getPrimaryKeyField();
		$items = array();
		$sql_limit = V::get('limit', $this->_default_sql_limit, $params, 'int');
		$sql_offset = V::get('limitstart', 0, $params, 'int');
		$sql_order_by = V::get('order_by', '', $params);
		if ($sql_order_by) {
			$sql_order_dir = V::get('order_dir', '', $params);

			// prevent from sorting by special columns
			if (!array_key_exists($sql_order_by, $this->_cols)) {
				$sql_order_by = null;
				$sql_order_dir = null;
			}
		}
		if ($sql_order_by) {
			$sql_order_by = "order by t.`{$sql_order_by}`";
			if ($sql_order_dir) {
				$sql_order_by = "{$sql_order_by} {$sql_order_dir}";
			}
		}
		$sql_cols = $this->_get_sql_cols();
		$sql_where = $this->_parseSqlWhere($params);
		$sql = "select {$sql_cols}
			from {$this->_tbl} as t
			where {$sql_where}
			{$sql_order_by}
			limit {$sql_limit} offset {$sql_offset}
		";
		if(V::get('DBG_DS', 0, $_GET) > 2){echo'<pre style="max-height:200px;overflow:auto;border:1px solid red;text-align:left;">sql (' . __CLASS__ . '::' . __FUNCTION__ . ':' . __LINE__ . '): ';print_r($sql);echo'</pre>'."\n\n";}
		$res = $this->_db->query($sql);
		while ($r = $this->_db->fetch($res)) {
			$items[$r->{$primaryKeyField}] = $r;
		}
		return $items;
	}

	function get_hist_items($id) {// TODO: RMME
		$this->getHistItems($id);
	}

	public function getHistItems($id, $params = array()) {
		$ret = array();
		$sql_tbl = $this->_tbl . "_HIST";
		$sql_cols = $this->_get_sql_cols();
		$sql_where = "t.`ID_USERS2`='{$id}'";

		$paramNotEmptyFlds = V::get('notEmptyFlds', '', $params);
		if (!empty($paramNotEmptyFlds) && is_array($paramNotEmptyFlds)) {
			$sqlWhereOr = array();
			foreach ($paramNotEmptyFlds as $fldName) {
				if (array_key_exists($fldName, $this->_cols)) {
					$sqlWhereOr[] = "t.`{$fldName}`!='N/S;'";
				}
			}
			if (!empty($sqlWhereOr)) $sql_where .= "\n and (" . implode(" or ", $sqlWhereOr) . ")";
		}

		$sql = "select {$sql_cols}
			from {$sql_tbl} as t
			where {$sql_where}
			order by ID DESC
		";
if(V::get('DBG_DS', 0, $_GET) > 2){echo'<pre style="max-height:200px;overflow:auto;border:1px solid red;text-align:left;">sql (' . __CLASS__ . '::' . __FUNCTION__ . ':' . __LINE__ . '): ';print_r($sql);echo'</pre>'."\n\n";}
		$res = $this->_db->query($sql);
		while ($r = $this->_db->fetch($res)) {
			$r->_author = $r->A_RECORD_UPDATE_AUTHOR;
			$r->_created = $r->A_RECORD_UPDATE_DATE;

			if (!$r->_author || $r->_author == 'N/S;') {
				$r->_author = $r->A_RECORD_CREATE_AUTHOR;
			}
			if (!$r->_created || $r->_created == 'N/S;') {
				$r->_created = $r->A_RECORD_CREATE_DATE;
			}

			$ret[$r->ID] = $r;
		}
		return $ret;
	}

	function get_total($params = array()) {// TODO: RMME
		$this->getTotal($params);
	}

	public function getTotal($params = array()) {
		$ret = 0;
		$sql_where = $this->_parseSqlWhere($params);
		$sql = "select count(1) as cnt
			from {$this->_tbl} as t
			where {$sql_where}
		";
		$res = $this->_db->query($sql);
		if ($r = $this->_db->fetch($res)) {
			$ret = $r->cnt;
		}
		return $ret;
	}

	function set_sql_where($sql_where) {
		$this->_sql_where = $sql_where;
	}

	function set_field_sql_type($field, $sql_type) {
		$this->_fields_type[$field] = $sql_type;
	}

	function get_field_sql_type($field) {
		if (array_key_exists($field, $this->_fields_type)) {
			return $this->_fields_type[$field];
		}
		return 'varchar(255)';
	}

	function set_field_perm($field, $perm) {
		$this->_fields_perm[$field] = $perm;
	}

	function get_field_perm($field) {
		if (array_key_exists($field, $this->_fields_perm)) {
			return $this->_fields_perm[$field];
		}
		return '';
	}

	function field_allow_write($field_name) {
		return (strpos($this->get_field_perm($field_name), 'W') !== false)? true : false;
	}

	function field_allow_read($field_name) {
		return (strpos($this->get_field_perm($field_name), 'R') !== false)? true : false;
	}

	function field_allow_create($field_name) {
		return (strpos($this->get_field_perm($field_name), 'C') !== false)? true : false;
	}

	public function add_col($col_name, $label = '', $type = 'string') {
		if (!$label) $label = $col_name;
		$this->_cols[$col_name] = $label;
		$this->_col_types[$col_name] = $type;
	}

	public function addCol($col_name) {
		$this->_cols[$col_name] = $col_name;
	}

	function count() {
		$ret = 0;
		$sql_where = ($this->_sql_where)? $this->_sql_where : "1=1";
		$sql = "select count(1) as cnt
			from `{$this->_tbl}`
			where {$sql_where}
		";
		$res = $this->_db->query($sql);
		if ($r = $this->_db->fetch($res)) {
			$ret = $r->cnt;
		}
		return $ret;
	}

	function fetch_list($limit = 10, $offset = 0) {
		$primaryKeyField = $this->getPrimaryKeyField();
		$ret = array();
		$this->_sql_limit = $limit;
		$this->_sql_offset = $offset;
		$sql_cols = (!empty($this->_cols))? implode(',', array_keys($this->_cols)) : "*";
		$sql_where = ($this->_sql_where)? $this->_sql_where : "1=1";
		$sql = "
			select {$sql_cols}
			from {$this->_tbl}
			where {$sql_where}
			limit {$this->_sql_limit} offset {$this->_sql_offset}
		";
		$res = $this->_db->query($sql);
		while ($r = $this->_db->fetch($res)) {
			$ret[$r->{$primaryKeyField}] = $r;
		}
		return $ret;
	}

	function field_check_value($field_name, $val) {
		if (!$this->field_allow_write($field_name)) {
			return false;
		}
		// post verify
		// get type, and check if value is correct
		// TODO: if typespecial use it
		return true;
	}

	function save_item(&$item, $values, $prefix) {
		if (!$item->ID) {
			return null;
		}
		$sql_obj = new stdClass();
		$sql_obj->ID = $item->ID;
		foreach ($values as $k_field_with_prefix => $v_field) {
			if (substr($k_field_with_prefix, 0, strlen($prefix)) != $prefix) {
				continue;
			}
			$k_field = substr($k_field_with_prefix, strlen($prefix));
			if ($this->field_allow_write($k_field)) {
				if ($this->field_check_value($k_field, $v_field)) {
					$sql_obj->$k_field = $v_field;
				}
			}
		}
		$affected = $this->_db->PDATE_OBJ($this->_tbl, $sql_obj);
		return $affected;
	}

	function add_item($values, $prefix) {
		$sql_obj = new stdClass();
		foreach ($values as $k_field_with_prefix => $v_field) {
			if (substr($k_field_with_prefix, 0, strlen($prefix)) != $prefix) {
				continue;
			}
			$k_field = substr($k_field_with_prefix, strlen($prefix));
			if ($this->field_allow_create($k_field)) {
				if ($this->field_check_value($k_field, $v_field)) {
					$sql_obj->$k_field = $v_field;
				}
			}
		}
		$insert_id = $this->_db->ADD_NEW_OBJ($this->_tbl, $sql_obj);
		return $insert_id;
	}

	public function getGeomFields() {
		return $this->_geomFields;
	}

	public function isGeomField($fldName) {
		return in_array($fldName, $this->_geomFields);
	}

	public function isCsvNumericField($fldName) {
		return ('_CSV_NUM' == substr($fldName, -8));
	}

	public function updateItem($itemPatch) {
		// TODO: $item as array and copy from $db->UPDATE_OBJ using PDO
		if (is_object($itemPatch)) {
			$itemPatch = (array)$itemPatch;
		} else if (!is_array($itemPatch)) {
			throw new HttpException('Item patch is not array', 400);
		}
		if (empty($itemPatch)) {
			//throw new Exception('Item patch is empty');
			return 0;// nothing to change
		}

		$primaryKeyField = $this->getPrimaryKeyField();
		if (empty($itemPatch[$primaryKeyField])) {
			throw new HttpException("Item Primary Key not set!", 400);
		}

		// the geom fix
		foreach ($itemPatch as $fld => $val) {
			if ($this->isGeomField($fld)) {
				if (!empty($val)
						&& 'NULL' !== $val
						&& 'GeomFromText' != substr($val, 0, strlen('GeomFromText'))
					 ) {
					$itemPatch[$fld] = "GeomFromText('{$val}')";
				}
			}
		}

		$itemPatch = (object)$itemPatch;
		$affected = $this->_db->UPDATE_OBJ($this->_tbl, $itemPatch);
		if ($affected < 0) {
			$dsErrors = $this->getDbErrors();
			//$dsErrors = "Wystąpiły błędy!\n" . implode("\n", $dsErrors);
			if (!empty($dsErrors)) {
				throw new StorageException($dsErrors);
			}
		}
		return $affected;
	}

	public function addItem($item) {
		// TODO: $item as array and copy from $db->ADD_NEW_OBJ using PDO
		if (is_object($item)) {
			$item = (array)$item;
		} else if (!is_array($item)) {
			throw new HttpException('Item is not array', 400);
		}
		if (empty($item)) {
			//throw new Exception('Item patch is empty');
			return 0;// nothing to insert
		}

		// the geom fix
		foreach ($item as $fld => $val) {
			if ($this->isGeomField($fld)) {
				if (!empty($val)
						&& 'NULL' !== $val
						&& 'GeomFromText' != substr($val, 0, strlen('GeomFromText'))
					 ) {
					$item[$fld] = "GeomFromText('{$val}')";
				}
			}
		}

		$item = (object)$item;
		$primaryKey = $this->_db->ADD_NEW_OBJ($this->_tbl, $item);
		if ($primaryKey < 0) {
			$dsErrors = $this->getDbErrors();
			$dsErrors = "Wystąpiły błędy!\n" . implode("\n", $dsErrors);
			throw new Exception($dsErrors);
		}
		return $primaryKey;
	}

	public function getDbErrors() {
		$errors = array();
		if ($this->_db->has_errors()) {
			$errorsSql = $this->_db->get_errors();
			foreach ($errorsSql as $vErr) {
				if ('SQL QUERY FAILED: ' == substr($vErr, 0, 18)) {
					$vErr = substr($vErr, 18);
				}
				//$errors[] = StorageException::parseMessage($vErr);
				$errors[] = $vErr;
			}
		}
		return $errors;
	}

	public function getPrimaryKeyField() {
		return 'ID';// TODO: read from struct - jest funkcja w Mysql.php my Psql.php
	}

}