<?php
/**
 * @package     Joomla.Administrator
 * @subpackage  com_modules
 *
 * @copyright   Copyright (C) 2005 - 2012 Open Source Matters, Inc. All rights reserved.
 * @license     GNU General Public License version 2 or later; see LICENSE.txt
 */

// No direct access.
defined('_JEXEC') or die;

jimport('joomla.application.component.modeladmin');

/**
 * Module model.
 *
 * @package     Joomla.Administrator
 * @subpackage  com_modules
 * @since       1.6
 */
class RokSprocketModelModule extends JModelAdmin
{

	/**
	 * @var RokCommon_Service_Container
	 */
	protected $container;

	/**
	 * @var RokCommon_Dispatcher
	 */
	protected $dispatcher;

	/**
	 * @var    string  The prefix to use with controller messages.
	 * @since  1.6
	 */
	protected $text_prefix = 'COM_MODULES';

	/**
	 * @var    string  The help screen key for the module.
	 * @since  1.6
	 */
	protected $helpKey = 'JHELP_EXTENSIONS_MODULE_MANAGER_EDIT';

	/**
	 * @var    string  The help screen base URL for the module.
	 * @since  1.6
	 */
	protected $helpURL;

	/**
	 * @param array $config
	 */
	public function __construct($config = array())
	{
		parent::__construct($config);

		$container = RokCommon_Service::getContainer();
		/** @var $dispatcher RokCommon_Dispatcher */
		$this->dispatcher = $container->roksprocket_dispatcher;
	}


	/**
	 * Method to auto-populate the model state.
	 *
	 * Note. Calling getState in this method will result in recursion.
	 *
	 * @return  void
	 *
	 * @since   1.6
	 */
	protected function populateState()
	{
		$app = JFactory::getApplication('administrator');

		// Load the User state.
		if (!($pk = (int)JRequest::getInt('id'))) {
			if ($extensionId = (int)$app->getUserState('com_modules.add.module.extension_id')) {
				$this->setState('extension.id', $extensionId);
			}
		}
		$this->setState('module.id', $pk);

		// Load the parameters.
		$params = JComponentHelper::getParams('com_modules');
		$this->setState('params', $params);
	}

	/**
	 * Method to perform batch operations on a set of modules.
	 *
	 * @param   array  $commands  An array of commands to perform.
	 * @param   array  $pks       An array of item ids.
	 * @param   array  $contexts  An array of item contexts.
	 *
	 * @return  boolean  Returns true on success, false on failure.
	 *
	 * @since   1.7
	 */
	public function batch($commands, $pks, $contexts)
	{
		// Sanitize user ids.
		$pks = array_unique($pks);
		JArrayHelper::toInteger($pks);

		// Remove any values of zero.
		if (array_search(0, $pks, true)) {
			unset($pks[array_search(0, $pks, true)]);
		}

		if (empty($pks)) {
			$this->setError(JText::_('JGLOBAL_NO_ITEM_SELECTED'));
			return false;
		}

		$done = false;

		if (!empty($commands['position_id'])) {
			$cmd = JArrayHelper::getValue($commands, 'move_copy', 'c');

			if (!empty($commands['position_id'])) {
				if ($cmd == 'c') {
					$result = $this->batchCopy($commands['position_id'], $pks, $contexts);
					if (is_array($result)) {
						$pks = $result;
					} else {
						return false;
					}
				} elseif ($cmd == 'm' && !$this->batchMove($commands['position_id'], $pks, $contexts)) {
					return false;
				}
				$done = true;
			}
		}

		if (!empty($commands['assetgroup_id'])) {
			if (!$this->batchAccess($commands['assetgroup_id'], $pks, $contexts)) {
				return false;
			}

			$done = true;
		}

		if (!empty($commands['language_id'])) {
			if (!$this->batchLanguage($commands['language_id'], $pks, $contexts)) {
				return false;
			}

			$done = true;
		}

		if (!$done) {
			$this->setError(JText::_('JLIB_APPLICATION_ERROR_INSUFFICIENT_BATCH_INFORMATION'));
			return false;
		}

		// Clear the cache
		$this->cleanCache();

		return true;
	}

	/**
	 * Batch copy modules to a new position or current.
	 *
	 * @param int   $value    The new value matching a module position.
	 * @param array $pks      An array of row IDs.
	 * @param array $contexts An array of item contexts.
	 *
	 * @return bool|mixed True if successful, false otherwise and internal error is set.@since   11.1
	 */
	protected function batchCopy($value, $pks, $contexts)
	{
		// Set the variables
		$user  = JFactory::getUser();
		$table = $this->getTable();
		$i     = 0;

		foreach ($pks as $pk) {
			if ($user->authorise('core.create', 'com_modules')) {
				$table->reset();
				$table->load($pk);

				// Set the new position
				if ($value == 'noposition') {
					$position = '';
				} elseif ($value == 'nochange') {
					$position = $table->position;
				} else {
					$position = $value;
				}
				$table->position = $position;

				// Alter the title if necessary
				$data         = $this->generateNewTitle(0, $table->title, $table->position);
				$table->title = $data['0'];

				// Reset the ID because we are making a copy
				$table->id = 0;

				// Unpublish the new module
				$table->published = 0;

				if (!$table->store()) {
					$this->setError($table->getError());
					return false;
				}

				// Get the new item ID
				$newId = $table->get('id');

				// Add the new ID to the array
				$newIds[$i] = $newId;
				$i++;

				// Now we need to handle the module assignments
				$db    = $this->getDbo();
				$query = $db->getQuery(true);
				$query->select($db->quoteName('menuid'));
				$query->from($db->quoteName('#__modules_menu'));
				$query->where($db->quoteName('moduleid') . ' = ' . $pk);
				$db->setQuery($query);
				$menus = $db->loadColumn();

				// Insert the new records into the table
				foreach ($menus as $menu) {
					$query->clear();
					$query->insert($db->quoteName('#__modules_menu'));
					$query->columns(array($db->quoteName('moduleid'), $db->quoteName('menuid')));
					$query->values($newId . ', ' . $menu);
					$db->setQuery($query);
					$db->query();
				}
			} else {
				$this->setError(JText::_('JLIB_APPLICATION_ERROR_BATCH_CANNOT_CREATE'));
				return false;
			}
		}

		// Clean the cache
		$this->cleanCache();

		return $newIds;
	}

	/**
	 * Batch move modules to a new position or current.
	 *
	 * @param   integer  $value      The new value matching a module position.
	 * @param   array    $pks        An array of row IDs.
	 * @param   array    $contexts   An array of item contexts.
	 *
	 * @return  boolean  True if successful, false otherwise and internal error is set.
	 *
	 * @since   11.1
	 */
	protected function batchMove($value, $pks, $contexts)
	{
		// Set the variables
		$user  = JFactory::getUser();
		$table = $this->getTable();
		$i     = 0;

		foreach ($pks as $pk) {
			if ($user->authorise('core.edit', 'com_modules')) {
				$table->reset();
				$table->load($pk);

				// Set the new position
				if ($value == 'noposition') {
					$position = '';
				} elseif ($value == 'nochange') {
					$position = $table->position;
				} else {
					$position = $value;
				}
				$table->position = $position;

				// Alter the title if necessary
				$data         = $this->generateNewTitle(0, $table->title, $table->position);
				$table->title = $data['0'];

				// Unpublish the moved module
				$table->published = 0;

				if (!$table->store()) {
					$this->setError($table->getError());
					return false;
				}
			} else {
				$this->setError(JText::_('JLIB_APPLICATION_ERROR_BATCH_CANNOT_EDIT'));
				return false;
			}
		}

		// Clean the cache
		$this->cleanCache();

		return true;
	}

	/**
	 * Method to delete rows.
	 *
	 * @param array $pks
	 *
	 * @throws Exception
	 * @return bool Returns true on success, false on failure.@since   1.6
	 */
	public function delete(&$pks)
	{
		// Initialise variables.
		$pks   = (array)$pks;
		$user  = JFactory::getUser();
		$table = $this->getTable();

		// Iterate the items to delete each one.
		foreach ($pks as $i => $pk) {
			if ($table->load($pk)) {
				// Access checks.
				if (!$user->authorise('core.delete', 'com_modules') || $table->published != -2) {
					JError::raiseWarning(403, JText::_('JERROR_CORE_DELETE_NOT_PERMITTED'));
					//	throw new Exception(JText::_('JERROR_CORE_DELETE_NOT_PERMITTED'));
					return;
				}

				if (!$table->delete($pk)) {
					throw new Exception($table->getError());
				} else {
					// Delete the menu assignments
					$db    = $this->getDbo();
					$query = $db->getQuery(true);
					$query->delete();
					$query->from('#__modules_menu');
					$query->where('moduleid=' . (int)$pk);
					$db->setQuery((string)$query);
					$db->query();
				}

				// Clear module cache
				parent::cleanCache($table->module, $table->client_id);
			} else {
				throw new Exception($table->getError());
			}
		}

		// Clear modules cache
		$this->cleanCache();

		return true;
	}

	/**
	 * Method to duplicate modules.
	 *
	 * @param   array  &$pks  An array of primary key IDs.
	 *
	 * @return  boolean  True if successful.
	 *
	 * @since   1.6
	 * @throws  Exception
	 */
	public function duplicate(&$pks)
	{
		// Initialise variables.
		$user = JFactory::getUser();
		$db   = $this->getDbo();

		// Access checks.
		if (!$user->authorise('core.create', 'com_modules')) {
			throw new Exception(JText::_('JERROR_CORE_CREATE_NOT_PERMITTED'));
		}

		$table = $this->getTable();

		foreach ($pks as $pk) {
			if ($table->load($pk, true)) {
				// Reset the id to create a new record.
				$table->id = 0;

				// Alter the title.
				$m = null;
				if (preg_match('#\((\d+)\)$#', $table->title, $m)) {
					$table->title = preg_replace('#\(\d+\)$#', '(' . ($m[1] + 1) . ')', $table->title);
				} else {
					$table->title .= ' (2)';
				}
				// Unpublish duplicate module
				$table->published = 0;

				if (!$table->check() || !$table->store()) {
					throw new Exception($table->getError());
				}

				// $query = 'SELECT menuid'
				//	. ' FROM #__modules_menu'
				//	. ' WHERE moduleid = '.(int) $pk
				//	;

				$query = $db->getQuery(true);
				$query->select('menuid');
				$query->from('#__modules_menu');
				$query->where('moduleid=' . (int)$pk);

				$this->_db->setQuery((string)$query);
				$rows = $this->_db->loadColumn();

				foreach ($rows as $menuid) {
					$tuples[] = '(' . (int)$table->id . ',' . (int)$menuid . ')';
				}

				if ($table->module == 'mod_roksprocket') {
					$this->dispatcher->connect('roksprocket.module.duplicate', array(
					                                                                $this, 'duplicatePerItemsForModule'
					                                                           ), 5);
				}
				// Give Addons a chance to load the menu item
				$this->dispatcher->notify(new RokCommon_Event($this, 'roksprocket.module.duplicate', array(
				                                                                                          'old_pk'  => $pk,
				                                                                                          'new_pk'  => $table->id
				                                                                                     )));
				if ($table->module == 'mod_roksprocket') {
					$this->dispatcher->disconnect('roksprocket.module.duplicate', array(
					                                                                $this, 'duplicatePerItemsForModule'
					                                                           ), 5);
				}
			} else {
				throw new Exception($table->getError());
			}
		}

		if (!empty($tuples)) {
			// Module-Menu Mapping: Do it in one query
			$query = 'INSERT INTO #__modules_menu (moduleid,menuid) VALUES ' . implode(',', $tuples);
			$this->_db->setQuery($query);

			if (!$this->_db->query()) {
				return JError::raiseWarning(500, $this->_db->getErrorMsg());
			}
		}

		// Clear modules cache
		$this->cleanCache();

		return true;
	}

	/**
	 * Method to change the title.
	 *
	 * @param   integer $category_id  The id of the category. Not used here.
	 * @param   string  $title        The title.
	 * @param   string  $position     The position.
	 *
	 * @return    array  Contains the modified title.
	 *
	 * @since    2.5
	 */
	protected function generateNewTitle($category_id, $title, $position)
	{
		// Alter the title & alias
		$table = $this->getTable();
		while ($table->load(array(
		                         'position'  => $position,
		                         'title'     => $title
		                    ))) {
			$title = JString::increment($title);
		}

		return array($title);
	}

	/**
	 * Method to get the client object
	 *
	 * @return  void
	 *
	 * @since   1.6
	 */
	function &getClient()
	{
		return $this->_client;
	}

	/**
	 * Method to get the record form.
	 *
	 * @param   array    $data      Data for the form.
	 * @param   boolean  $loadData  True if the form is to load its own data (default case), false if not.
	 *
	 * @return  JForm  A JForm object on success, false on failure
	 *
	 * @since   1.6
	 */
	public function getForm($data = array(), $loadData = true)
	{
		// The folder and element vars are passed when saving the form.
		if (empty($data)) {
			$item     = $this->getItem();
			$clientId = $item->client_id;
			$module   = $item->module;
		} else {
			$clientId = JArrayHelper::getValue($data, 'client_id');
			$module   = JArrayHelper::getValue($data, 'module');
		}

		// These variables are used to add data from the plugin XML files.
		$this->setState('item.client_id', $clientId);
		$this->setState('item.module', $module);

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

		$form->setFieldAttribute('position', 'client', $this->getState('item.client_id') == 0 ? 'site' : 'administrator');

		// Modify the form based on access controls.
		if (!$this->canEditState((object)$data)) {
			// Disable fields for display.
			$form->setFieldAttribute('ordering', 'disabled', 'true');
			$form->setFieldAttribute('published', 'disabled', 'true');
			$form->setFieldAttribute('publish_up', 'disabled', 'true');
			$form->setFieldAttribute('publish_down', 'disabled', 'true');

			// Disable fields while saving.
			// The controller has already verified this is a record you can edit.
			$form->setFieldAttribute('ordering', 'filter', 'unset');
			$form->setFieldAttribute('published', 'filter', 'unset');
			$form->setFieldAttribute('publish_up', 'filter', 'unset');
			$form->setFieldAttribute('publish_down', 'filter', 'unset');
		}

		return $form;
	}

	/**
	 * Method to get the data that should be injected in the form.
	 *
	 * @return  mixed  The data for the form.
	 *
	 * @since   1.6
	 */
	protected function loadFormData()
	{
		$app = JFactory::getApplication();

		// Check the session for previously entered form data.
		$data = JFactory::getApplication()->getUserState('com_modules.edit.module.data', array());

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

			// This allows us to inject parameter settings into a new module.
			$params = $app->getUserState('com_modules.add.module.params');
			if (is_array($params)) {
				$data->set('params', $params);
			}
		}

		return $data;
	}

	/**
	 * Method to get a single record.
	 *
	 * @param   integer  $pk  The id of the primary key.
	 *
	 * @return  mixed  Object on success, false on failure.
	 *
	 * @since   1.6
	 */
	public function getItem($pk = null)
	{


		// Initialise variables.
		$pk = (!empty($pk)) ? (int)$pk : (int)$this->getState('module.id');
		$db = $this->getDbo();

		if (!isset($this->_cache[$pk])) {

			// Give Addons a chance to load the menu item
			$event     = new RokCommon_Event($this, 'roksprocket.module.get');
			$passed_pk = ($pk != 0) ? $pk : null;
			$this->dispatcher->filter($event, array(
			                                       'primary_key'  => $passed_pk,
			                                       'menu_item'    => null,
			                                       'extension_id' => (int)$this->getState('extension.id')
			                                  ));
			$addonreturn = $event->getReturnValue();
			if ($event->isProcessed()) {
				$this->_cache[$pk] = $addonreturn['menu_item'];
			}
			if (!isset($this->_cache[$pk]) || null == $this->_cache[$pk]) {
				$false = false;

				// Get a row instance.
				$table = $this->getTable();

				// Attempt to load the row.
				$return = $table->load($pk);

				// Check for a table object error.
				if ($return === false && $error = $table->getError()) {
					$this->setError($error);
					return $false;
				}

				// Check if we are creating a new extension.
				if (empty($pk)) {
					if ($extensionId = (int)$this->getState('extension.id')) {
						$query = $db->getQuery(true);
						$query->select('element, client_id');
						$query->from('#__extensions');
						$query->where('extension_id = ' . $extensionId);
						$query->where('type = ' . $db->quote('module'));
						$db->setQuery($query);

						$extension = $db->loadObject();
						if (empty($extension)) {
							if ($error = $db->getErrorMsg()) {
								$this->setError($error);
							} else {
								$this->setError('COM_MODULES_ERROR_CANNOT_FIND_MODULE');
							}
							return false;
						}

						// Extension found, prime some module values.
						$table->module    = $extension->element;
						$table->client_id = $extension->client_id;
					} else {
						$app = JFactory::getApplication();
						$app->redirect(JRoute::_(sprintf('index.php?option=%s&view=modules', RokSprocket_Helper::getRedirectionOption()), false));
						return false;
					}
				}

				// Convert to the JObject before adding other data.
				$properties        = $table->getProperties(1);
				$this->_cache[$pk] = JArrayHelper::toObject($properties, 'JObject');

				// Convert the params field to an array.
				$registry = new JRegistry;
				$registry->loadString($table->params);
				$this->_cache[$pk]->params = $registry->toArray();

				// Determine the page assignment mode.
				$db->setQuery('SELECT menuid' . ' FROM #__modules_menu' . ' WHERE moduleid = ' . $pk);
				$assigned = $db->loadColumn();

				if (empty($pk)) {
					// If this is a new module, assign to all pages.
					$assignment = 0;
				} elseif (empty($assigned)) {
					// For an existing module it is assigned to none.
					$assignment = '-';
				} else {
					if ($assigned[0] > 0) {
						$assignment = +1;
					} elseif ($assigned[0] < 0) {
						$assignment = -1;
					} else {
						$assignment = 0;
					}
				}

				$this->_cache[$pk]->assigned   = $assigned;
				$this->_cache[$pk]->assignment = $assignment;

				// Get the module XML.
				$client = JApplicationHelper::getClientInfo($table->client_id);
				$path   = JPath::clean($client->path . '/modules/' . $table->module . '/' . $table->module . '.xml');

				if (file_exists($path)) {
					$this->_cache[$pk]->xml = simplexml_load_file($path);
				} else {
					$this->_cache[$pk]->xml = null;
				}

				$this->_cache[$pk]->edit_display_options = new RokCommon_Registry();
			}
		}

		return $this->_cache[$pk];
	}

	/**
	 * Get the necessary data to load an item help screen.
	 *
	 * @return  object  An object with key, url, and local properties for loading the item help screen.
	 *
	 * @since   1.6
	 */
	public function getHelp()
	{
		return (object)array(
			'key' => $this->helpKey,
			'url' => $this->helpURL
		);
	}

	/**
	 * Returns a reference to the a Table object, always creating it.
	 *
	 * @param   string  $type    The table type to instantiate
	 * @param   string  $prefix  A prefix for the table class name. Optional.
	 * @param   array   $config  Configuration array for model. Optional.
	 *
	 * @return  JTable  A database object
	 *
	 * @since   1.6
	 */
	public function getTable($type = 'Module', $prefix = 'JTable', $config = array())
	{
		return JTable::getInstance($type, $prefix, $config);
	}

	/**
	 * Prepare and sanitise the table prior to saving.
	 *
	 * @param   JTable  &$table  The database object
	 *
	 * @return  void
	 *
	 * @since   1.6
	 */
	protected function prepareTable(&$table)
	{
		$date = JFactory::getDate();
		$user = JFactory::getUser();

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

		if (empty($table->id)) {
			// Set the values
			//$table->created	= $date->toSql();
		} else {
			// Set the values
			//$table->modified	= $date->toSql();
			//$table->modified_by	= $user->get('id');
		}
	}

	/**
	 * Method to preprocess the form
	 *
	 * @param   JForm   $form   A form object.
	 * @param   mixed   $data   The data expected for the form.
	 * @param   string  $group  The name of the plugin group to import (defaults to "content").
	 *
	 * @return  void
	 *
	 * @since   1.6
	 * @throws  Exception if there is an error loading the form.
	 */
	protected function preprocessForm(JForm $form, $data, $group = 'content')
	{
		jimport('joomla.filesystem.file');
		jimport('joomla.filesystem.folder');

		// Initialise variables.
		$lang     = JFactory::getLanguage();
		$clientId = $this->getState('item.client_id');
		$module   = $this->getState('item.module');

		$client   = JApplicationHelper::getClientInfo($clientId);
		$formFile = JPath::clean($client->path . '/modules/' . $module . '/' . $module . '.xml');

		// Load the core and/or local language file(s).
		$lang->load($module, $client->path, null, false, false) || $lang->load($module, $client->path . '/modules/' . $module, null, false, false) || $lang->load($module, $client->path, $lang->getDefault(), false, false) || $lang->load($module, $client->path . '/modules/' . $module, $lang->getDefault(), false, false);

		if (file_exists($formFile)) {
			// Get the module form.
			if (!$form->loadFile($formFile, false, '//config')) {
				throw new Exception(JText::_('JERROR_LOADFILE_FAILED'));
			}

			// Attempt to load the xml file.
			if (!$xml = simplexml_load_file($formFile)) {
				throw new Exception(JText::_('JERROR_LOADFILE_FAILED'));
			}

			// Get the help data from the XML file if present.
			$help = $xml->xpath('/extension/help');
			if (!empty($help)) {
				$helpKey = trim((string)$help[0]['key']);
				$helpURL = trim((string)$help[0]['url']);

				$this->helpKey = $helpKey ? $helpKey : $this->helpKey;
				$this->helpURL = $helpURL ? $helpURL : $this->helpURL;
			}

		}

		// Trigger the default form events.
		parent::preprocessForm($form, $data, $group);
	}

	/**
	 * Loads ContentHelper for filters before validating data.
	 *
	 * @param   object  $form  The form to validate against.
	 * @param   array   $data  The data to validate.
	 *
	 * @return  mixed  Array of filtered data if valid, false otherwise.
	 *
	 * @since   1.1
	 */
	function validate($form, $data, $group = null)
	{
		require_once JPATH_ADMINISTRATOR . '/components/com_content/helpers/content.php';

		return parent::validate($form, $data, $group);
	}

	/**
	 * Method to save the form data.
	 *
	 * @param   array  $data  The form data.
	 *
	 * @return  boolean  True on success.
	 *
	 * @since   1.6
	 */
	public function save($data)
	{
		$original_data = $data;
		// Initialise variables;
		$app        = JFactory::getApplication();
		$dispatcher = JDispatcher::getInstance();
		$table      = $this->getTable();
		$pk         = (!empty($data['id'])) ? $data['id'] : (int)$this->getState('module.id');
		$isNew      = true;
		$input      = $app->input;
		$task       = $input->get('task', null, 'cmd');

		// Include the content modules for the onSave events.
		JPluginHelper::importPlugin('extension');

		// Load the row if saving an existing record.
		if ($pk > 0) {
			$table->load($pk);
			$isNew = false;
		}


		// Alter the title and published state for Save as Copy
		if ($task == 'save2copy') {
			$orig_data  = $input->post->get('jform', array(), 'array');
			$orig_table = clone($this->getTable());
			$orig_table->load((int)$orig_data['id']);

			if ($data['title'] == $orig_table->title) {
				$data['title'] .= ' ' . JText::_('JGLOBAL_COPY');
				$data['published'] = 0;
			}
		}

		// Bind the data.
		if (!$table->bind($data)) {
			$this->setError($table->getError());
			return false;
		}

		// Prepare the row for saving
		$this->prepareTable($table);

		// Check the data.
		if (!$table->check()) {
			$this->setError($table->getError());
			return false;
		}

		// Trigger the onExtensionBeforeSave event.
		$result = $dispatcher->trigger('onExtensionBeforeSave', array('com_modules.module', &$table, $isNew));
		if (in_array(false, $result, true)) {
			$this->setError($table->getError());
			return false;
		}

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

		//
		// Process the menu link mappings.
		//

		$assignment = isset($data['assignment']) ? $data['assignment'] : 0;

		// Delete old module to menu item associations
		// $db->setQuery(
		//	'DELETE FROM #__modules_menu'.
		//	' WHERE moduleid = '.(int) $table->id
		// );

		$db    = $this->getDbo();
		$query = $db->getQuery(true);
		$query->delete();
		$query->from('#__modules_menu');
		$query->where('moduleid = ' . (int)$table->id);
		$db->setQuery((string)$query);
		$db->query();

		if (!$db->query()) {
			$this->setError($db->getErrorMsg());
			return false;
		}

		// If the assignment is numeric, then something is selected (otherwise it's none).
		if (is_numeric($assignment)) {
			// Variable is numeric, but could be a string.
			$assignment = (int)$assignment;

			// Logic check: if no module excluded then convert to display on all.
			if ($assignment == -1 && empty($data['assigned'])) {
				$assignment = 0;
			}

			// Check needed to stop a module being assigned to `All`
			// and other menu items resulting in a module being displayed twice.
			if ($assignment === 0) {
				// assign new module to `all` menu item associations
				// $this->_db->setQuery(
				//	'INSERT INTO #__modules_menu'.
				//	' SET moduleid = '.(int) $table->id.', menuid = 0'
				// );

				$query->clear();
				$query->insert('#__modules_menu');
				$query->columns(array($db->quoteName('moduleid'), $db->quoteName('menuid')));
				$query->values((int)$table->id . ', 0');
				$db->setQuery((string)$query);
				if (!$db->query()) {
					$this->setError($db->getErrorMsg());
					return false;
				}
			} elseif (!empty($data['assigned'])) {
				// Get the sign of the number.
				$sign = $assignment < 0 ? -1 : +1;

				// Preprocess the assigned array.
				$tuples = array();
				foreach ($data['assigned'] as &$pk) {
					$tuples[] = '(' . (int)$table->id . ',' . (int)$pk * $sign . ')';
				}

				$this->_db->setQuery('INSERT INTO #__modules_menu (moduleid, menuid) VALUES ' . implode(',', $tuples));

				if (!$db->query()) {
					$this->setError($db->getErrorMsg());
					return false;
				}
			}
		}


		// Trigger the onExtensionAfterSave event.
		$dispatcher->trigger('onExtensionAfterSave', array('com_modules.module', &$table, $isNew));

		// Compute the extension id of this module in case the controller wants it.
		$query = $db->getQuery(true);
		$query->select('extension_id');
		$query->from('#__extensions AS e');
		$query->leftJoin('#__modules AS m ON e.element = m.module');
		$query->where('m.id = ' . (int)$table->id);
		$db->setQuery($query);

		$extensionId = $db->loadResult();

		if ($error = $db->getErrorMsg()) {
			JError::raiseWarning(500, $error);
			return;
		}

		$this->setState('module.extension_id', $extensionId);
		$this->setState('module.id', $table->id);

		// Add the per item custom settings
		$items = $input->post->get('items', array(), 'array');


		$old_moduleid = (int)$table->id;
		if ($task == 'save2copy') {
			$old_moduleid = (int)$orig_table->id;
		}
		// get the old set of items for the module
		$query      = $db->getQuery(true);
		$item_table = JTable::getInstance('Item', 'RokSprocketTable');
		$query->select("*")->from("#__roksprocket_items")->where('module_id = ' . $old_moduleid);
		$db->setQuery((string)$query);

		$raw_old_items = $db->loadAssocList();
		if ($db->getErrorNum()) {
			$this->setError($db->getErrorMsg());
			return false;
		}

		$old_items = array();
		foreach ($raw_old_items as $raw_old_item) {
			/** @var $old_item_table RokSprocketTableItem */
			$old_item_table = JTable::getInstance('Item', 'RokSprocketTable');
			$old_item_table->bind($raw_old_item);
			if (isset($old_item_table->params)) {
				$old_item_table->params = RokCommon_Utils_ArrayHelper::fromObject(RokCommon_JSON::decode($old_item_table->params));
			} else {
				$old_item_table->params = array();
			}
			$old_items[$old_item_table->provider . '-' . $old_item_table->provider_id] = $old_item_table;

		}

		$all_new_items = $this->getArticles((int)$table->id, $table->params);

		if ($task != 'save2copy') {
			// delete old items per module
			$query = $db->getQuery(true);
			$query->delete();
			$query->from('#__roksprocket_items');
			$query->where('module_id = ' . (int)$table->id);
			$db->setQuery((string)$query);
			if (!$db->query()) {
				$this->setError($db->getErrorMsg());
				return false;
			}

			// Pass to addons to save if needed
			if (empty($original_data['id'])) {
				$original_data['id'] = (int)$table->id;
			}
			$event = new RokCommon_Event($this, 'roksprocket.module.save');
			$this->dispatcher->filter($event, array(
			                                       'data'       => $original_data,
			                                       'save_result'=> null
			                                  ));
			$addonreturn = $event->getReturnValue();
			if ($event->isProcessed()) {
				if (!$addonreturn['save_result']) {
					return false;
				}
			}
		}
		$per_item_form = $this->getPerItemsForm();

		// Save the Showing Items
		$last_ordernumber = 0;
		foreach ($items as $item_id => $item_settings) {
			$item_settings['module_id'] = (int)$table->id;
			list($item_settings['provider'], $item_settings['provider_id']) = explode('-', $item_id);
			/** @var $item_table RokSprocketTableItem */
			$item_table = JTable::getInstance('Item', 'RokSprocketTable');

			$fields = $per_item_form->getFieldsetWithGroup('peritem');
			foreach ($fields as $field) {
				if (!array_key_exists($field->fieldname, $item_settings['params'])) {
					if (!empty($old_items) && isset($old_items[$item_id]) && array_key_exists($field->fieldname, $old_items[$item_id]->params)) {
						$item_settings['params'][$field->fieldname] = $old_items[$item_id]->params[$field->fieldname];
					} else {
						$item_settings['params'][$field->fieldname] = $per_item_form->getFieldAttribute($field->fieldname, 'default', null, 'params');
					}
				}
			}

			// Bind the data.
			if (!$item_table->bind($item_settings)) {
				$this->setError($item_table->getError());
				return false;
			}
			// Trigger the onExtensionBeforeSave event.
			$result = $dispatcher->trigger('onExtensionBeforeSave', array(
			                                                             'com_roksprocket.module', &$item_table, true
			                                                        ));
			if (in_array(false, $result, true)) {
				$this->setError($item_table->getError());
				return false;
			}

			// Store the data.
			if (!$item_table->store()) {
				$this->setError($item_table->getError());
				return false;
			}
			$last_ordernumber = $item_table->order;
			if (isset($old_items[$item_id])) unset($old_items[$item_id]);
			if (isset($all_new_items[$item_id])) unset($all_new_items[$item_id]);
		}

		//Save the remaining items  (Not Shown)
		foreach ($all_new_items as $item_id => $unseen_item) {
			$item_settings              = array();
			$item_settings['module_id'] = (int)$table->id;
			list($item_settings['provider'], $item_settings['provider_id']) = explode('-', $item_id);
			$item_settings['order'] = ++$last_ordernumber;
			if (isset($old_items[$item_id]) && $old_items[$item_id]->params != null) {
				$item_settings['params'] = $old_items[$item_id]->params;
			} elseif (isset($all_new_items[$item_id]) && $all_new_items[$item_id]->getParams() != null) {
				$item_settings['params'] = RokCommon_JSON::encode($all_new_items[$item_id]->getParams());
			}


			/** @var $item_table RokSprocketTableItem */
			$item_table = JTable::getInstance('Item', 'RokSprocketTable');

			// Bind the data.
			if (!$item_table->bind($item_settings)) {
				$this->setError($item_table->getError());
				return false;
			}
			// Trigger the onExtensionBeforeSave event.
			$result = $dispatcher->trigger('onExtensionBeforeSave', array(
			                                                             'com_roksprocket.module', &$item_table, true
			                                                        ));
			if (in_array(false, $result, true)) {
				$this->setError($item_table->getError());
				return false;
			}

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

		// Clear modules cache
		$this->cleanCache();

		// Clean module cache
		parent::cleanCache($table->module, $table->client_id);

		$app->setUserState('com_roksprocket.module_id', $table->id);
		return true;
	}

	/**
	 * A protected method to get a set of ordering conditions.
	 *
	 * @param   object  $table  A record object.
	 *
	 * @return  array  An array of conditions to add to add to ordering queries.
	 *
	 * @since   1.6
	 */
	protected function getReorderConditions($table)
	{
		$condition   = array();
		$condition[] = 'client_id = ' . (int)$table->client_id;
		$condition[] = 'position = ' . $this->_db->Quote($table->position);

		return $condition;
	}

	/**
	 * Custom clean cache method for different clients
	 *
	 * @param null|string $group
	 * @param int         $client_id
	 *
	 * @return void
	 */
	protected function cleanCache($group = null, $client_id = 0)
	{
		parent::cleanCache('com_modules', $this->getClient());
	}


	public function getArticles($module_id, $params)
	{
		return RokSprocket::getItemsWithParams($module_id, new RokCommon_Registry($params), false, true);
	}

	/**
	 * @param $type
	 *
	 * @return \RokCommon_Config_Form
	 */
	public function getPerItemsForm($type = null)
	{
		$options   = new RokCommon_Options();
		$container = RokCommon_Service::getContainer();
		// load up the layouts

		if (null == $type) {
			foreach ($container['roksprocket.layouts'] as $type => $layoutinfo) {
				$this->addPerItemsOptionsForLayout($type, $options);
			}
		} else {
			$this->addPerItemsOptionsForLayout($type, $options);
		}

		$rcform    = $rcform = new RokCommon_Config_Form(new JForm('roksprocket_peritem'));
		$xml       = $options->getJoinedXml();
		$jxml      = new JXMLElement($xml->asXML());
		$fieldsets = $jxml->xpath('/config/fields[@name = "params"]/fieldset');
		foreach ($fieldsets as $fieldset) {
			$overwrite = ((string)$fieldset['overwrite'] == 'true') ? true : false;
			$rcform->load($fieldset, $overwrite, '/config');
		}

		JForm::addFieldPath(JPATH_SITE . '/components/com_roksprocket/fields');
		return $rcform;
	}

	protected function addPerItemsOptionsForLayout($type, RokCommon_Options &$options)
	{
		$container  = RokCommon_Service::getContainer();
		$layoutinfo = $container['roksprocket.layouts.' . $type];
		if (isset($layoutinfo->options->peritem)) {
			$section = new RokCommon_Options_Section('peritem_' . $type, $layoutinfo->options->peritem);
			foreach ($layoutinfo->paths as $layoutpath) {
				$section->addPath($layoutpath);
			}
			$options->addSection($section);
		}
	}

	public function duplicatePerItemsForModule(RokCommon_Event $event)
	{

		$db        = JFactory::getDbo();
		$arguments = $event->getParameters();
		$old_pk    = $arguments['old_pk'];
		$new_pk    = $arguments['new_pk'];

		$query = $db->getQuery(true);
		$query->select('*')->from('#__roksprocket_items')->where('module_id = ' . $db->quote($old_pk));
		$db->setQuery($query);
		$old_module_item_entries = $db->loadObjectList();
		if ($db->getErrorNum()) {
			$this->setError($db->getErrorMsg());
			return false;
		}

		if ($old_module_item_entries) {
			foreach ($old_module_item_entries as $old_module_item_entry) {
				$old_module_item_entry->id        = null;
				$old_module_item_entry->module_id = $new_pk;
				$db->insertObject('#__roksprocket_items', $old_module_item_entry);
			}

		}
	}
}
