<?php
/**
 * @package DJ-Catalog2
 * @copyright Copyright (C) DJ-Extensions.com, All rights reserved.
 * @license http://www.gnu.org/licenses GNU/GPL
 * @author url: http://dj-extensions.com
 * @author email contact@dj-extensions.com
 */
// No direct access.
defined('_JEXEC') or die;
use Joomla\Registry\Registry;
use Joomla\CMS\Factory;
use Joomla\CMS\Table\Table;
use Joomla\CMS\Language\Text;
use Joomla\CMS\Language\Associations;
use Joomla\CMS\Language\LanguageHelper;
use Joomla\CMS\Filesystem\File;
use Joomla\CMS\Filesystem\Folder;
//jimport('joomla.application.component.modeladmin');
require_once(JPATH_ROOT.'/administrator/components/com_djcatalog2/lib/modeladmin.php');

class Djcatalog2ModelField extends DJCAdminModel
{
	protected $text_prefix = 'COM_DJCATALOG2';
	protected $associationsContext = 'com_djcatalog2.field';

	public function __construct($config = array()) {
		//$config['event_after_save'] = 'onFieldAfterSave';
		//$config['event_after_delete'] = 'onFieldAfterDelete';
		parent::__construct($config);
	}

	public function getTable($type = 'Fields', $prefix = 'Djcatalog2Table', $config = array())
	{
		return Table::getInstance($type, $prefix, $config);
	}
	public function getForm($data = array(), $loadData = true)
	{
		// Initialise variables.
		$app	= Factory::getApplication();

		// Get the form.
		$form = $this->loadForm('com_djcatalog2.field', 'field', array('control' => 'jform', 'load_data' => $loadData));
		if (empty($form)) {
			return false;
		}

		return $form;
	}

	protected function loadFormData()
	{
		$data = Factory::getApplication()->getUserState('com_djcatalog2.edit.field.data', array());

		if (empty($data)) {
			$data = $this->getItem();
		}

		return $data;
	}

	protected function _prepareTable(&$table)
	{
		jimport('joomla.filter.output');
		$date = Factory::getDate();
		$user = Factory::getUser();

		$table->name		= htmlspecialchars_decode($table->name, ENT_QUOTES);

		if (empty($table->alias)) {
			$table->alias = OutputFilter::stringURLSafe($table->name);
			$table->alias = trim(str_replace('-','_',$table->alias));
			if(trim(str_replace('_','',$table->alias)) == '') {
				$table->alias = Factory::getDate()->format('Y_m_d_H_i_s');
			}
		}

		if (empty($table->id)) {
			if (empty($table->ordering)) {
				$db = Factory::getDbo();
				$db->setQuery('SELECT MAX(ordering) FROM #__djc2_items_extra_fields');
				$max = $db->loadResult();

				$table->ordering = $max+1;
			}
		}
	}

	protected function getReorderConditions($table)
	{
		$condition = array();
		$condition[] = 'group_id = '.(int) $table->group_id;

		return implode(' AND ', $condition);
	}

	public function delete(&$cid) {
		if (count( $cid ))
		{
			$db = Factory::getDbo();
			$cids = implode(',', $cid);
			try {
				$db->setQuery('DELETE FROM #__djc2_items_extra_fields_values_text WHERE field_id IN ('.$cids.') ');
				$db->execute();
			}
			catch (Exception $e) {
				$this->setError($e->getMessage());
				return false;
			}

			$query = $db->getQuery(true);
			$query->select('*')->from('#__djc2_items_extra_fields_options')->where('field_id IN ('.$cids.')');
			$db->setQuery($query);
			$deleteOptions = $db->loadObjectList();

			foreach($deleteOptions as $option) {
				if (empty($option->params)) {
					continue;
				}

				$params = new Registry($option->params);
				$fileName = trim((string)$params->get('file_name', ''));

				if ($fileName) {
					$this->deleteColorFile($fileName);
				}
			}

			try {
				$db->setQuery('DELETE FROM #__djc2_items_extra_fields_values_int WHERE field_id IN ('.$cids.') ');
				$db->execute();
			}
			catch (Exception $e) {
				$this->setError($e->getMessage());
				return false;
			}
			try {
				$db->setQuery('DELETE FROM #__djc2_items_extra_fields_values_date WHERE field_id IN ('.$cids.') ');
				$db->execute();
			}
			catch (Exception $e) {
				$this->setError($e->getMessage());
				return false;
			}

			$query = $db->getQuery(true);
			$query->select('*')->from('#__djc2_items_combinations_fields')->where('field_id IN ('.$cids.')');
			$db->setQuery($query);
			$deleteCombinations = $db->loadObjectList();
			$comboIds = array();
			foreach($deleteCombinations as $combination) {
				$comboIds[] = $combination->combination_id;
			}
			if (count($comboIds) > 0) {
				$db->setQuery('DELETE FROM #__djc2_items_combinations_fields WHERE field_id IN ('.$cids.') ');
				if ($db->execute()) {
					$db->setQuery('DELETE FROM #__djc2_items_combinations WHERE id IN ('.implode(',', $comboIds).') ');
					$db->execute();
				}
			}
		}
		return parent::delete($cid);
	}

	public function saveOptions($values, &$table, $newField) {
		$db = Factory::getDbo();
		$app = Factory::getApplication();

		$files = $app->input->files->get('fieldtype', array());

		if (!empty($values) && array_key_exists('id', $values) && array_key_exists('option', $values) && array_key_exists('position', $values)) {
			if ($table->type == 'select' || $table->type == 'checkbox' || $table->type == 'radio' || $table->type == 'color' || $table->type == 'multicolor'  || $table->type == 'multiselect') {

				$pks = array();
				$max = 1;

				foreach ($values['id'] as $key=>$id) {
					if ($values['option'][$key] != '') {
						$fo_table = Table::getInstance('FieldOptions', 'Djcatalog2Table', array());
						$isNew = true;
						// Load the row if saving an existing record.
						if ($id > 0 && $newField === false) {
							$fo_table->load($id);
							$isNew = false;
							$fo_table->params = new Registry($fo_table->params);
						} else {
							$fo_table->params = new Registry();
						}

						$data = array();
						$data['id'] = $isNew ? null:$id;
						//$data['value'] = htmlspecialchars($values['option'][$key]);
						$data['value'] = ($values['option'][$key]);
						$data['ordering'] = ($values['position'][$key] > 0) ? $values['position'][$key] : 0;
						$data['field_id'] = $table->id;

						$params = clone $fo_table->params;

						if ($table->type == 'color' || $table->type == 'multicolor') {
							if (isset($values['hexcode'][$key])) {
								$params->set('hexcode', $values['hexcode'][$key]);
							}
							if (isset($values['description'][$key])) {
								$params->set('description', $values['description'][$key]);
							}

							if (isset($values['file_name'][$key])) {
								$params->set('file_name',$values['file_name'][$key]);
							}

							$fileName = trim((string)$params->get('file_name', ''));
							$deleteOld = (bool)($values['file_name'][$key] == '' && $fileName != '');

							if ($deleteOld) {
								$this->deleteColorFile($fileName);
								$fileName = '';
							}

							if (isset($files['file']) && isset($files['file'][$key])) {
								$retVal = $this->saveColorFile($data, $key, $files);
								if (true !== $retVal) {
									$fileName = ($retVal) ? $retVal : '';
								}
							}
							$params->set('file_name', $fileName);
						}

						$data['params'] = $params->toString('JSON');

						// Bind the data.
						if (!$fo_table->bind($data)) {
							$this->setError($fo_table->getError());
							return false;
						}
						if (empty($fo_table->ordering) || !$fo_table->ordering) {
							$fo_table->ordering = $max;
						}
						$max = $fo_table->ordering + 1;
						// Check the data.
						if (!$fo_table->check()) {
							$this->setError($fo_table->getError());
							return false;
						}

						// Store the data.
						if (!$fo_table->store()) {
							$this->setError($fo_table->getError());
							return false;
						}

						$pks[] = $fo_table->id;
					}
				}

				if (!empty($pks)) {
					$query = $db->getQuery(true);
					$query->select('*')->from('#__djc2_items_extra_fields_options')->where('field_id='.(int)$table->id)->where('id NOT IN ('.implode(',', $pks).')');
					$db->setQuery($query);
					$deleteOptions = $db->loadObjectList();

					$optionIds = array();
					foreach($deleteOptions as $option) {
						$optionIds[] = $option->id;

						if (empty($option->params)) {
							continue;
						}

						$params = new Registry($option->params);
						$fileName = trim((string)$params->get('file_name', ''));

						if ($fileName) {
							$this->deleteColorFile($fileName);
						}
					}

					if (count($optionIds) > 0) {
						$query = $db->getQuery(true);
						$query->delete('#__djc2_items_extra_fields_options')->where('id IN ('.implode(',', $optionIds).')');
						$db->setQuery($query);
						$db->execute();

						$db->setQuery('SELECT * FROM #__djc2_items_combinations_fields WHERE field_id='.(int)$table->id.' AND value IN ('.implode(',', $optionIds).')');

						$deleteCombinations = $db->loadObjectList();

						$comboIds = array();
						foreach($deleteCombinations as $combination) {
							$comboIds[] = $combination->combination_id;
						}
						if (count($comboIds) > 0) {
							$db->setQuery('DELETE FROM #__djc2_items_combinations_fields WHERE field_id='.$table->id.' AND value IN ('.implode(',', $optionIds).')');
							if ($db->execute()) {
								$db->setQuery('DELETE FROM #__djc2_items_combinations WHERE id IN ('.implode(',', $comboIds).') ');
								$db->execute();
							}
						}
					}
				}
			}
		}
		return true;
	}
	public function deleteOptions(&$table) {
		$db = Factory::getDbo();
		$db->setQuery('DELETE FROM #__djc2_items_extra_fields_options WHERE field_id='.(int)$table->id);
		if (!$db->execute()){
			$this->setError($db->getError());
		}
		return true;


	}
	public function saveColorFile($data, $key, $files) {
		$postFile = $files['file'][$key];
		$path = DJCATIMGFOLDER.'/colors';

		$fileName = '';

		if ($postFile['name'] && $postFile['tmp_name']) {
			if ($postFile['error'] === 0 && $postFile['size'] > 0) {
				$lang = Factory::getApplication()->getLanguage();

				$fileExt = File::getExt($postFile['name']);
				$fileBase = File::stripExt($postFile['name']);
				$fileName = File::makeSafe($lang->transliterate(\Joomla\String\StringHelper::strtolower((string)$data['field_id'].'-'.$data['value'] . '-'.$fileBase).'.'.$fileExt));
				$fileName = str_replace(' ', '-', $fileName);
				if (!Folder::exists(JPath::clean($path))) {
					Folder::create(JPath::clean($path));
				}

				if (!File::upload($postFile['tmp_name'], JPath::clean($path.'/'.$fileName))) {
					return false;
				}

				return $fileName;
			} else {
				return !($postFile['size'] > 0);
			}
		}

		return true;
	}

	public function deleteColorFile($fileName) {
		$path = DJCATIMGFOLDER.'/colors';

		if ($fileName) {
			$filePath = $path.'/'.$fileName;

			if (File::exists(JPath::clean($filePath))) {
				File::delete(JPath::clean($filePath));
			}
		}

		return true;
	}

	/**
	 * Method to test whether a record can be deleted.
	 *
	 * @param   object  $record  A record object.
	 *
	 * @return  boolean  True if allowed to delete the record. Defaults to the permission for the component.
	 *
	 * @since   1.6
	 */
	protected function canDelete($record)
	{
		return Factory::getUser()->authorise('core.delete', $this->option) || Factory::getUser()->authorise('djcatalog2.admin.catalogue', $this->option);
	}

	/**
	 * Method to test whether a record can have its state changed.
	 *
	 * @param   object  $record  A record object.
	 *
	 * @return  boolean  True if allowed to change the state of the record. Defaults to the permission for the component.
	 *
	 * @since   1.6
	 */
	protected function canEditState($record)
	{
		return Factory::getUser()->authorise('core.edit.state', $this->option)  || Factory::getUser()->authorise('djcatalog2.admin.catalogue', $this->option);
	}

	public function getItem($pk = null)
	{
		$item = parent::getItem($pk);
		if ($item AND property_exists($item, 'image'))
		{
			$registry = new Registry($item->image);
			$item->imageinfo = $registry->toArray();
		}

		// Load associated items
		if (Associations::isEnabled())
		{
			$item->associations = array();

			if ($item->id != null)
			{
				$associations = Associations::getAssociations('com_djcatalog2', '#__djc2_items_extra_fields', 'com_djcatalog2.field', (int)$item->id,'id', '','');



				foreach ($associations as $tag => $association)
				{
					$item->associations[$tag] = $association->id;
				}
			}
		}
		return $item;
	}

	/**
	 * Method to preprocess the form to add the association fields dynamically
	 *
	 * @return     none
	 */
	protected function preprocessForm(Joomla\CMS\Form\Form $form, $data, $group = 'content')
	{
		// Association content items
		if (Associations::isEnabled())
		{
			$languages = LanguageHelper::getContentLanguages(false, true, null, 'ordering', 'asc');

			if (count($languages) > 1)
			{
				$addform = new SimpleXMLElement('<form />');
				$fields = $addform->addChild('fields');
				$fields->addAttribute('name', 'associations');
				$fieldset = $fields->addChild('fieldset');
				$fieldset->addAttribute('name', 'item_associations');

				foreach ($languages as $language)
				{
					$field = $fieldset->addChild('field');
					$field->addAttribute('name', $language->lang_code);
					$field->addAttribute('type', 'djfieldmodal');
					$field->addAttribute('language', $language->lang_code);
					$field->addAttribute('label', $language->title);
					$field->addAttribute('translate_label', 'false');
				}

				$form->load($addform, false);
			}
		}
		parent::preprocessForm($form, $data, $group);
	}


	public function batch($pk, $batchData, $cursor)
	{

		$language = ((isset($batchData['language_id'])) ? $batchData['language_id'] : null);
		$language_copy = ((isset($batchData['language_copy'])) ? $batchData['language_copy'] : 'n');
		$move_copy = ((isset($batchData['move_copy'])) ? $batchData['move_copy'] : 'copy');

		$multilangEnabled = Associations::isEnabled();

		$success = false;
		$message = 'invalid language';
		$error = '';

		$db = Factory::getDbo();

		$table = $this->getTable();
		if ($language && $language_copy) {


			$item = $this->getItem($pk);


			$db = Factory::getDbo();
			$query = $db->getQuery(true);

			$query
				->select('*')
				->from($db->quoteName('#__djc2_items_extra_fields_options'))
				->where('field_id = ' . $pk);

			$db->setQuery($query);
			$options = $db->loadObjectList();
			$newItemOpt = array();
			foreach ($options as $option) {
				$newItemOpt['id'][] = 0;
				$newItemOpt['option'][] = $option->value;
				$newItemOpt['position'][] = $option->ordering;

				$params = json_decode((string)$option->params);
				foreach ($params as $key => $value) {
					$newItemOpt[$key][] = $value;
				}
			}


			$baseLang = $item->language;
			$baseName = $item->name;

			if ($baseLang == $language) {
				$error = Text::sprintf('COM_DJCATALOG2_MOVE_DUPLICATE_LANG', $pk);
			}


			$app = Factory::getApplication();
			$db = Factory::getDbo();

			if($move_copy == 'copy') {
				$item->id = 0;
				$app->input->set('id', 0);
				$this->setState('category.id', 0);
			}


			$alias = str_replace('-', '_',OutputFilter::stringURLSafe($item->name));
			$db->setQuery('SELECT Count(*) FROM #__djc2_items_extra_fields WHERE alias LIKE ' . $db->quote($db->escape('%' . $alias . '%')));
			$aliasesCount = $db->loadResult();


			$item->alias = $item->name . (($aliasesCount) ?  '-' . $aliasesCount : '') . '-' . $language;

			// Default values
			$item->published = 0;
			$item->language = $language;

			if($language_copy == 'n') {
				$item->associations = array();
			} else {
				$item->associations[$baseLang] = $pk;
			}




			$app->input->set('task', 'save2copy');
			$app->input->set('fieldtype', $newItemOpt);
			$success =$this->save( Joomla\Utilities\ArrayHelper::fromObject($item));

			if(!$success) {
				$error = $this->getError();
			}

			$message = '[' . $baseLang . '] ' . $baseName . ' (' . $move_copy . ') => ' . '[' . $language . ']' . $table->name . (($language_copy == 'y') ? ' (' . Text::_('COM_DJCATALOG2_BATCH_LANGUAGE_COPY_ASSIGNMENTS') . ')' : '');
		}

		if ($success) {
			$app = Factory::getApplication();
			$cid = $app->getUserState('com_djcatalog2.list.fields');

			unset($cid[$cursor]);
			$cid = array_values($cid);
			$app->setUserState('com_djcatalog2.list.fields', $cid);

		}

		return array(
			'success' => $success,
			'message' => $message,
			'error' => $error
		);

	}

}