<?php

class kCatDBItem extends kDBItem {
	
	var $CustomFields = Array();
	
	function Init($prefix, $special, $event_params = null)
	{
		parent::Init($prefix, $special, $event_params);
		
		$item_type = $this->Application->getUnitOption($this->Prefix, 'ItemType');
		$sql = 'SELECT CustomFieldId, FieldName FROM '.TABLE_PREFIX.'CustomField WHERE Type = %s';
		$this->CustomFields = $this->Conn->GetCol( sprintf($sql, $item_type), 'FieldName' );
	}
	
	function Create()
	{
		if (!$this->Validate()) return false;
		
		$this->checkFilename();
		$this->SetDBField('ResourceId', $this->Application->NextResourceId());
		$this->SetDBField('Modified', mktime());
		$this->SetDBField('CreatedById', $this->Application->GetVar('u_id'));
		$this->generateFilename();
		
		$ret = parent::Create();
		if($ret)
		{
			if ( kTempTablesHandler::IsTempTable($this->TableName) ) {
				$table = kTempTablesHandler::GetTempName(TABLE_PREFIX.'CategoryItems');
			}
			else {
				$table = TABLE_PREFIX.'CategoryItems';
			}
			$cat_id = $this->Application->GetVar('m_cat_id');
			$query = 'INSERT INTO '.$table.' (CategoryId,ItemResourceId,PrimaryCat)
								VALUES ('.$cat_id.','.$this->GetField('ResourceId').',1)';
			$this->Conn->Query($query);
		}
		return $ret;
	}
	
	function Update($id=null)
	{
		$this->checkFilename();
		$this->VirtualFields['ResourceId'] = true;
		$this->SetDBField('Modified', mktime());
		$this->SetDBField('ModifiedById', $this->Application->GetVar('u_id'));
		$this->generateFilename();
		
		return parent::Update($id);
	}
	
	function checkFilename()
	{
		if( !$this->GetDBField('AutomaticFilename') )
		{
			$filename = $this->GetDBField('Filename');
			$this->SetDBField('Filename', $this->stripDisallowed($filename) );
		}
	}
	
	function Copy($cat_id=null)
	{
		if (!isset($cat_id)) $cat_id = $this->Application->GetVar('m_cat_id');
		$this->NameCopy($cat_id);
		return $this->Create($cat_id);
	}
	
	function NameCopy($master=null, $foreign_key=null)
	{
		$title_field = $this->Application->getUnitOption($this->Prefix, 'TitleField');
		if (!$title_field) return;
		
		$new_name = $this->GetDBField($title_field);
		$cat_id = $this->Application->GetVar('m_cat_id');
		$original_checked = false;
		do {
			if ( preg_match('/Copy ([0-9]*) *of (.*)/', $new_name, $regs) ) {
				$new_name = 'Copy '.( (int)$regs[1] + 1 ).' of '.$regs[2];
			}
			elseif ($original_checked) {
				$new_name = 'Copy of '.$new_name;
			}
			$query = 'SELECT '.$title_field.' FROM '.$this->TableName.'
								LEFT JOIN '.TABLE_PREFIX.'CategoryItems ON 
								('.TABLE_PREFIX.'CategoryItems.ItemResourceId = '.$this->TableName.'.ResourceId)
								WHERE ('.TABLE_PREFIX.'CategoryItems.CategoryId = '.$cat_id.') AND '.
								$title_field.' = '.$this->Conn->qstr($new_name);
			$res = $this->Conn->GetOne($query);
			$original_checked = true;
		} while ($res !== false);
		$this->SetDBField($title_field, $new_name);
	}
	
	function MoveToCat($cat_id=null)
	{
//		$this->NameCopy();
		$cat_id = $this->Application->GetVar('m_cat_id');
		// check if the product already exists in destination cat
		$query = 'SELECT PrimaryCat FROM '.TABLE_PREFIX.'CategoryItems 
							WHERE CategoryId = '.$cat_id.' AND ItemResourceId = '.$this->GetDBField('ResourceId');
		// if it's not found is_primary will be FALSE, if it's found but not primary it will be int 0
		$is_primary = $this->Conn->GetOne($query); 
		$exists = $is_primary !== false;
		
		if ($exists) { // if the Product already exists in destination category
			if ($is_primary) return; // do nothing when we paste to primary
			// if it's not primary - delete it from destination category, 
			// as we will move it from current primary below
			$query = 'DELETE FROM '.TABLE_PREFIX.'CategoryItems 
								WHERE ItemResourceId = '.$this->GetDBField('ResourceId').' AND CategoryId = '.$cat_id;
			$this->Conn->Query($query);
			
		}
		$query = 'UPDATE '.TABLE_PREFIX.'CategoryItems SET CategoryId = '.$cat_id.
						 ' WHERE ItemResourceId = '.$this->GetDBField('ResourceId').' AND PrimaryCat = 1';	
		$this->Conn->Query($query);
		$this->Update();
	}
	
	// We need to delete CategoryItems record when deleting product
	function Delete($id=null)
	{
		if( isset($id) ) {
			$this->setID($id);
		}
		$this->Load($this->GetID());
		
		$ret = parent::Delete();
		if ($ret) {
			$query = 'DELETE FROM '.TABLE_PREFIX.'CategoryItems WHERE ItemResourceId = '.$this->GetDBField('ResourceId');
			$this->Conn->Query($query);
		}
		
		return $ret;
	}
	
	/**
	 * Deletes item from categories
	 *
	 * @param Array $delete_category_ids
	 * @author Alex
	 */
	function DeleteFromCategories($delete_category_ids)
	{
		$id_field = $this->Application->getUnitOption($this->Prefix, 'IDField'); // because item was loaded before by ResourceId
		
		$ci_table = $this->Application->getUnitOption('ci', 'TableName');
		$resource_id = $this->GetDBField('ResourceId');
		
		$item_cats_sql = 'SELECT CategoryId FROM %s WHERE ItemResourceId = %s';
		$delete_category_items_sql = 'DELETE FROM %s WHERE ItemResourceId = %s AND CategoryId IN (%s)';
		
		$category_ids = $this->Conn->GetCol( sprintf($item_cats_sql, $ci_table, $resource_id) );
		$cats_left = array_diff($category_ids, $delete_category_ids);
		if(!$cats_left)
		{
			$sql = 'SELECT %s FROM %s WHERE ResourceId = %s';
			$ids = $this->Conn->GetCol( sprintf($sql, $id_field, $this->TableName, $resource_id) );

			$temp =& $this->Application->recallObject($this->getPrefixSpecial().'_TempHandler', 'kTempTablesHandler');
			$temp->DeleteItems($this->Prefix, $this->Special, $ids);
		}
		else
		{
			$this->Conn->Query( sprintf($delete_category_items_sql, $ci_table, $resource_id, implode(',', $delete_category_ids) ) );
			
			$sql = 'SELECT CategoryId FROM %s WHERE PrimaryCat = 1 AND ItemResourceId = %s';
			$primary_cat_id = $this->Conn->GetCol( sprintf($sql, $ci_table, $resource_id) );
			if( count($primary_cat_id) == 0 )
			{
				$sql = 'UPDATE %s SET PrimaryCat = 1 WHERE (CategoryId = %s) AND (ItemResourceId = %s)';
				$this->Conn->Query( sprintf($sql, $ci_table, reset($cats_left), $resource_id ) );
			}
		}
	}
	
	function SetCustomField($field, $value)
	{
		$cf_id = getArrayValue($this->CustomFields, $field);
		if(!$cf_id) return false;
		
		$data_table = TABLE_PREFIX.'CustomMetaData';
		
		$sql = 'SELECT CustomDataId FROM '.$data_table.' WHERE CustomFieldId = %s AND ResourceId = %s';
		$data_id = (int)$this->Conn->GetOne( sprintf($sql, $cf_id, $this->GetDBField('ResourceId') ) );
		
		$lang_id = $this->Application->GetVar('lang.current_id');
		
		$sql = 'REPLACE INTO '.$data_table.'(CustomDataId,ResourceId,CustomFieldId,Value,l'.$lang_id.'_Value) VALUES (%1$s,%2$s,%3$s,%4$s,%4$s)';

		$this->Conn->Query( sprintf($sql, $data_id, $this->GetDBField('ResourceId'), $cf_id, $this->Conn->qstr($value) ) );
	}
	
	/**
	 * replace not allowed symbols with "_" chars + remove duplicate "_" chars in result
	 *
	 * @param string $string
	 * @return string
	 */
	function stripDisallowed($string)
	{
		$not_allowed = Array(	' ', '\\', '/', ':', '*', '?', '"', '<', '>', '|',
     							'~', '!', '@', '#', '$', '%', '^', '&', '(', ')', 
     							'+', '=', '-', '{', '}', ']', '[', "'", ';', '.', ',');
     							
     	$string = str_replace($not_allowed, '_', $string);
     	$string = preg_replace('/(_+)/', '_', $string);
     	$string = $this->checkAutoFilename($string);
     	
     	return $string;
	}

	function checkAutoFilename($filename)
	{
		if(!$filename) return $filename;
		
		$item_id = !$this->GetID() ? 0 : $this->GetID();
		
		// check temp table
		$sql_temp = 'SELECT '.$this->IDField.' FROM '.$this->TableName.' WHERE Filename = '.$this->Conn->qstr($filename);
		$found_temp_ids = $this->Conn->GetCol($sql_temp);
		
		// check live table
		$sql_live = 'SELECT '.$this->IDField.' FROM '.kTempTablesHandler::GetLiveName($this->TableName).' WHERE Filename = '.$this->Conn->qstr($filename);
		$found_live_ids = $this->Conn->GetCol($sql_live);
		
		$found_item_ids = array_unique( array_merge($found_temp_ids, $found_live_ids) );
		
		$has_page = preg_match('/(.*)_([\d]+)([a-z]*)$/', $filename, $rets);
		
		$duplicates_found = (count($found_item_ids) > 1) || ($found_item_ids && $found_item_ids[0] != $item_id);
		if ($duplicates_found || $has_page) // other category has same filename as ours OR we have filename, that ends with _number
		{
			$append = $duplicates_found ? '_a' : '';
			if($has_page)
			{
				$filename = $rets[1].'_'.$rets[2];
				$append = $rets[3] ? $rets[3] : '_a';
			}

			// check live & temp table
			$sql_temp = 'SELECT '.$this->IDField.' FROM '.$this->TableName.' WHERE (Filename = %s) AND ('.$this->IDField.' != '.$item_id.')';
			$sql_live = 'SELECT '.$this->IDField.' FROM '.kTempTablesHandler::GetLiveName($this->TableName).' WHERE (Filename = %s) AND ('.$this->IDField.' != '.$item_id.')';
			while ( $this->Conn->GetOne( sprintf($sql_temp, $this->Conn->qstr($filename.$append)) ) > 0 ||
					$this->Conn->GetOne( sprintf($sql_live, $this->Conn->qstr($filename.$append)) ) > 0 )
			{
				if (substr($append, -1) == 'z') $append .= 'a';
				$append = substr($append, 0, strlen($append) - 1) . chr( ord( substr($append, -1) ) + 1 );
			}
			
			return $filename.$append;
		}

		return $filename;
	}
	
	/**
	 * Generate item's filename based on it's title field value
	 *
	 * @return string
	 */
	function generateFilename()
	{
		if ( !$this->GetDBField('AutomaticFilename') && $this->GetDBField('Filename') ) return false;
		
		$title_field = $this->Application->getUnitOption($this->Prefix, 'TitleField');
		$name = $this->stripDisallowed( $this->GetDBField($title_field) );
		
		if ( $name != $this->GetDBField('Filename') ) $this->SetDBField('Filename', $name);
	}
}

?>