<?php
/**
 * This file is part of the Adapto Toolkit.
 * Detailed copyright and licensing information can be found
 * in the doc/COPYRIGHT and doc/LICENSE files which should be
 * included in the distribution.
 *
 * @package adapto
 * @subpackage relations
 *
 * @copyright (c) 2000-2007 Ivo Jansch
 * @license http://www.achievo.org/atk/licensing ATK Open Source License
 *

 */

/** @internal includes and defines **/
userelation("atkmanytomanyrelation");
userelation('atkmanytoonerelation');

define('AF_MANYTOMANYSELECT_DETAILEDIT', AF_SPECIFIC_1);
define('AF_MANYTOMANYSELECT_DETAILADD', AF_SPECIFIC_2);
define('AF_MANYTOMANYSELECT_NO_AUTOCOMPLETE', AF_SPECIFIC_3);

/**
 * Many-to-many select relation.
 *
 * The relation shows allows you to add one record at a time to a many-to-many
 * relation using auto-completion or a select page. If a position attribute has
 * been set (setPositionAttribute) the order of the items can be changed using
 * simple drag & drop.
 *
 *
 * @author petercv
 * @package adapto
 * @subpackage relations
 */
class Adapto_Relation_ManyToManySelect extends Adapto_ManyToManyRelation
{
    const SEARCH_MODE_EXACT = atkManyToOneRelation::SEARCH_MODE_EXACT;
    const SEARCH_MODE_STARTSWITH = atkManyToOneRelation::SEARCH_MODE_STARTSWITH;
    const SEARCH_MODE_CONTAINS = atkManyToOneRelation::SEARCH_MODE_CONTAINS;

    /**
     * The many-to-one relation.
     *
     * @var atkManyToOneRelation
     */
    private $m_manyToOneRelation = null;

    /**
     * The name of the attribute/column where the position of the item in
     * the set should be stored.
     *
     * @var string
     */
    private $m_positionAttribute;

    /**
     * The html to be output next to a positional attribute label
     *
     * @var string
     */
    private $m_positionAttributeHtmlModifier;

    /**
     * Constructs a new many-to-many select relation.
     *
     * @param string $name        The name of the relation
     * @param string $link         The full name of the entity that is used as
     *                            intermediairy entity. The intermediairy entity is
     *                            assumed to have 2 attributes that are named
     *                            after the entitys at both ends of the relation.
     *                            For example, if entity 'project' has a M2M relation
     *                            with 'activity', then the intermediairy entity
     *                            'project_activity' is assumed to have an attribute
     *                            named 'project' and one that is named 'activity'.
     *                            You can set your own keys by calling setLocalKey()
     *                            and setRemoteKey()
     * @param string $destination The full name of the entity that is the other
     *                            end of the relation.
     * @param int $flags          Flags for the relation.
     */

    public function __construct($name, $link, $destination, $flags = 0)
    {
        parent::__construct($name, $link, $destination, $flags);

        $relation = new Adapto_ManyToOneRelation($this->fieldName() . '_m2msr_add', $this->m_destination, AF_MANYTOONE_AUTOCOMPLETE | AF_HIDE);
        $relation->setDisabledModes(DISABLED_VIEW | DISABLED_EDIT);
        $relation->setLoadType(NOLOAD);
        $relation->setStorageType(NOSTORE);
        $relation->setNoneLabel($this->text('list_null_value_obligatory'));
        $this->m_manyToOneRelation = $relation;
    }

    /**
     * Initialize.
     */

    public function init()
    {
        $this->getOwnerInstance()->add($this->getManyToOneRelation());
    }

    /**
     * Return the many-to-one relation we will use for the selection
     * of new records etc.
     *
     * @return atkManyToOneRelation
     */

    protected function getManyToOneRelation()
    {
        return $this->m_manyToOneRelation;
    }

    /**
     * Create the instance of the destination and copy the destination to
     * the the many to one relation
     *
     * If succesful, the instance is stored in the m_destInstance member variable.
     *
     * @return boolean true if succesful, false if something went wrong.
     */

    public function createDestination()
    {
        $result = parent::createDestination();
        $this->getManyToOneRelation()->m_destInstance = $this->m_destInstance;
        return $result;
    }

    /**
     * Order selected records in the same way as the selected keys. We only do
     * this if the position attribute has been set.
     *
     * @param array $selectedRecords selected records
     * @param array $selectedKey     selected keys
     */

    private function orderSelectedRecords(&$selectedRecords, $selectedKeys)
    {
        $orderedRecords = array();

        foreach ($selectedKeys as $key) {
            foreach ($selectedRecords as $record) {
                if ($key == $this->getDestination()->primaryKey($record)) {
                    $orderedRecords[] = $record;
                }
            }
        }

        $selectedRecords = $orderedRecords;
    }

    /**
     * Return a piece of html code to edit the attribute.
     *
     * @param array $record The record that holds the value for this attribute.
     * @param String $fieldprefix The fieldprefix to put in front of the name
     *                            of any html form element for this attribute.
     * @param String $mode The mode we're in ('add' or 'edit')
     *
     * @return string piece of html code
     */

    public function edit($record, $fieldprefix = "", $mode = "")
    {
        if ($this->hasFlag(AF_MANYTOMANYSELECT_NO_AUTOCOMPLETE)) {
            $this->getManyToOneRelation()->removeFlag(AF_MANYTOONE_AUTOCOMPLETE);
        }

        $this->createDestination();

        $this->createLink();

        $this->getOwnerInstance()->getPage()->register_script(Adapto_Config::getGlobal('atkroot') . 'atk/javascript/class.' . strtolower(__CLASS__) . '.js');
        $this->getOwnerInstance()->addStyle('atkmanytomanyselectrelation.css');

        $id = $this->getHtmlId($fieldprefix);
        $selectId = "{$id}_selection";

        $selectedKeys = $this->getSelectedKeys($record, $id);

        $selectedRecords = array();
        if (count($selectedKeys) > 0) {
            $selector = '(' . implode(') OR (', $selectedKeys) . ')';
            $selectedRecords = $this->getDestination()->select($selector)->includes($this->getDestination()->descriptorFields());
            $this->orderSelectedRecords($selectedRecords, $selectedKeys);
        }

        $result = '<input type="hidden" name="' . $this->getHtmlId($fieldprefix) . '" value="" />' . // Post an empty value if none selected (instead of not posting anything)
                '<div class="atkmanytomanyselectrelation">
      <ul id="' . $selectId . '" class="atkmanytomanyselectrelation-selection">';

        foreach ($selectedRecords as $selectedRecord) {
            $result .= $this->renderSelectedRecord($selectedRecord, $fieldprefix);
        }

        $result .= $this->renderAdditionField($record, $fieldprefix, $mode);

        $result .= '
      </ul>
      </div>';

        if (($this->hasFlag(AF_MANYTOMANYSELECT_DETAILADD)) && ($this->m_destInstance->allowed("add")))
            $result .= href(dispatch_url($this->m_destination, "add", array('atkfilter' => 'clear', "atkpkret" => $id . "_newsel")), $this->getAddLabel(),
                    SESSION_NESTED) . "\n";
        if ($this->hasPositionAttribute()) {
            $this->getOwnerInstance()->getPage()->register_loadscript("ATK.ManyToManySelectRelation.makeItemsSortable('{$selectId}');");
        }

        return $result;
    }

    /**
     * Return the selected keys for a given record
     *
     * @param array $record The record that holds the value for this attribute.
     * @param String $id is the html id of the relation
     * @param int $uniqueFilter is the type of array_unique filter to use on 
     *            the results. Use boolean false to dissable
     *
     * @return array of selected keys in the order they were submitted
     */

    public function getSelectedKeys($record, $id, $enforceUnique = true)
    {
        // Get Existing selected records
        $selectedKeys = $this->getSelectedRecords($record);

        // Get records added this time
        if (isset($record[$this->getManyToOneRelation()->fieldName()]) && is_array($record[$this->getManyToOneRelation()->fieldName()])) {
            $selectedKeys[] = $this->getDestination()->primaryKey($record[$this->getManyToOneRelation()->fieldName()]);
        }

        // Get New Selection records
        if (isset($this->getOwnerInstance()->m_postvars[$id . '_newsel'])) {
            $selectedKeys[] = $this->getOwnerInstance()->m_postvars[$id . '_newsel'];
        }

        // Ensure we're only adding an item once
        if ($enforceUnique && is_array($selectedKeys) && count($selectedKeys)) {
            $selectedKeys = array_unique($selectedKeys);
        }

        return $selectedKeys;
    }

    /**
     * Load function.
     *
     * @param atkDb  $db     database instance.
     * @param array  $record record
     * @param string $mode   load mode
     */

    public function load(atkDb $db, $record, $mode)
    {
        if (!$this->hasPositionAttribute()) {
            return parent::load($db, $record, $mode);
        }

        $this->createLink();
        $where = $this->_getLoadWhereClause($record);
        $link = &$this->getLink();
        return $link->select()->where($where)->orderBy($link->getTable() . '.' . $this->getPositionAttribute())->allRows();
    }

    /**
     * Perform the create action on a record that is new
     *
     * @param array $selectedKey the selected keys
     * @param array $selectedRecord the selected record
     * @param array $ownerRecord the owner record
     * @param int $index the index of the item in the set
     * @access protected
     * @return array the newly created record
     */

    protected function _createRecord($selectedKey, $selectedRecord, $ownerRecord, $index)
    {
        $record = parent::_createRecord($selectedKey, $selectedRecord, $ownerRecord, $index);

        if ($this->hasPositionAttribute()) {
            $record[$this->getPositionAttribute()] = $index + 1;
        }

        return $record;
    }

    /**
     * Perform the update action on a record that's been changed
     *
     * @param array $record the record that has been changed
     * @param int $index the index of the item in the set
     * @access protected
     * @return boolean true if the update was performed successfuly, false if there were issues
     */

    protected function _updateRecord($record, $index)
    {
        // If the parent class didn't manage to update the record
        // then don't attempt to perform this update
        if (!parent::_updateRecord($record, $index)) {
            return false;
        }

        if ($this->hasPositionAttribute()) {
            $record[$this->getPositionAttribute()] = $index + 1;
            if (!$this->getLink()->updateDb($record, true, '', array($this->getPositionAttribute()))) {
                return false;
            }
        }

        return true;
    }

    /**
     * Render selected record.
     *
     * @param array  $record      selected record
     * @param string $fieldprefix field prefix
     */

    protected function renderSelectedRecord($record, $fieldprefix)
    {
        $name = $this->getHtmlId($fieldprefix) . '[][' . $this->getRemoteKey() . ']';
        $key = $record[$this->getDestination()->primaryKeyField()];

        // Get the descriptor and ensure it's presentible
        $descriptor = nl2br(Adapto_htmlentities($this->getdestination()->descriptor($record)));

        // Build the record
        $result = '
      <li class="atkmanytomanyselectrelation-selected">
      <input type="hidden" name="' . $name . '" value="' . Adapto_htmlentities($key) . '"/>
      <span>' . $descriptor . '</span>
      ' . $this->renderSelectedRecordActions($record) . '
      </li>
      ';

        return $result;
    }

    /*
     * Renders the action links for a given record
     *
     * @param array $record is the selected record
     * @return string the actions in their html link form
     */

    protected function renderSelectedRecordActions($record)
    {
        $actions = array();
        if ($this->hasFlag(AF_MANYTOMANYSELECT_DETAILEDIT) && $this->getDestination()->allowed('edit', $record)) {
            $actions[] = 'edit';
        }

        if (!$this->getLink()->hasFlag(EF_NO_DELETE)) {
            $actions[] = 'delete';
        }

        $this->recordActions($record, $actions);

        // Call the renderButton action for those actions
        $actionLinks = array();
        foreach ($actions as $action) {
            $actionLink = $this->getActionLink($action, $record);
            if ($actionLink != null)
                $actionLinks[] = $actionLink;
        }

        $htmlActionLinks = '';
        if (count($actionLink)) {
            $htmlActionLinks = '(' . implode(' / ', $actionLinks) . ')';
        }
        return $htmlActionLinks;
    }

    /**
     * This method returns the HTML for the link of a certain action
     *
     * @param string $action
     * @param array $record
     * @return string
     */

    protected function getActionLink($action, $record)
    {
        $actionMethod = "get{$action}ActionLink";

        if (method_exists($this, $actionMethod)) {
            return $this->$actionMethod($record);
        } else {
            atkwarning('Missing ' . $actionMethod . ' method on manytomanyselectrelation. ');
        }

    }

    /**
     * The default edit link
     *
     * @param array $record
     * @return string
     */

    protected function getEditActionLink($record)
    {
        return href(dispatch_url($this->getdestination()->atkentitytype(), 'edit', array('atkselector' => $this->getdestination()->primarykey($record))),
                $this->text('edit'), SESSION_NESTED, true);
    }

    /**
     * The default delete link
     *
     * @param array $record
     * @return string
     */

    protected function getDeleteActionLink($record)
    {
        return '<a href="javascript:void(0)" onclick="ATK.ManyToManySelectRelation.deleteItem(this); return false;">' . $this->text('delete') . '</a>';
    }

    /**
     * Function that is called for each record in a recordlist, to determine
     * what actions may be performed on the record.
     *
     * @param array $record The record for which the actions need to be
     *                      determined.
     * @param array &$actions Reference to an array with the already defined
     *                  actions.
     */
    function recordActions($record, &$actions)
    {
    }

    /**
     * Render addition field.
     *
     * @param string $fieldprefix field prefix
     * @param string $mode
     */

    protected function renderAdditionField($record, $fieldprefix, $mode)
    {
        if ($this->getLink()->hasFlag(EF_NO_ADD)) {
            return '';
        }

        $url = partial_url($this->getOwnerInstance()->atkEntityType(), $mode, 'attribute.' . $this->fieldName() . '.selectedrecord',
                array('fieldprefix' => $fieldprefix));

        $relation = $this->getManyToOneRelation();

        $hasPositionAttribute = $this->hasPositionAttribute() ? 'true' : 'false';
        $relation->addOnChangeHandler("ATK.ManyToManySelectRelation.add(el, '{$url}', {$hasPositionAttribute});");

        return '<li class="atkmanytomanyselectrelation-addition">' . $relation->edit($record, $fieldprefix, $mode) . '</li>';
    }

    /**
     * Partial selected record.
     */

    public function partial_selectedrecord()
    {
        $this->createDestination();
        $this->createLink();

        $fieldprefix = $this->getOwnerInstance()->m_postvars['fieldprefix'];
        $selector = $this->getOwnerInstance()->m_postvars['selector'];

        if (empty($selector))
            return '';

        $record = $this->getDestination()->select($selector)->includes($this->getDestination()->descriptorFields())->firstRow();

        return $this->renderSelectedRecord($record, $fieldprefix);
    }

    /**
     * Set the searchfields for the autocompletion. By default the
     * descriptor fields are used.
     *
     * @param array $searchFields
     */

    public function setAutoCompleteSearchFields($searchFields)
    {
        $this->getManyToOneRelation()->setAutoCompleteSearchFields($searchFields);
    }

    /**
     * Set the searchmode for the autocompletion:
     * exact, startswith(default) or contains.
     *
     * @param array $mode
     */

    public function setAutoCompleteSearchMode($mode)
    {
        $this->getManyToOneRelation()->setAutoCompleteSearchMode($mode);
    }

    /**
     * Set the case-sensitivity for the autocompletion search (true or false).
     *
     * @param array $caseSensitive
     */

    public function setAutoCompleteCaseSensitive($caseSensitive)
    {
        $this->getManyToOneRelation()->setAutoCaseSensitive($caseSensitive);
    }

    /**
     * Sets the minimum number of characters before auto-completion kicks in.
     *
     * @param int $chars
     */

    public function setAutoCompleteMinChars($chars)
    {
        $this->getManyToOneRelation()->setAutoCompleteMinChars($chars);
    }

    /**
     * Adds a filter value to the destination filter.
     *
     * @param string $filter
     */

    public function addDestinationFilter($filter)
    {
        return $this->getManyToOneRelation()->addDestinationFilter($filter);
    }

    /**
     * Sets the destination filter.
     *
     * @param string $filter
     */

    public function setDestinationFilter($filter)
    {
        return $this->getManyToOneRelation()->setDestinationFilter($filter);
    }

    /**
     * Set the positional attribute/column of the many to many join. It is the column
     * in the join table that denotes the position of the item in the set.
     *
     * @param string $attr the position attribute/column name of the join
     * @param string $htmlIdentifier is the html string to add to the end of the label. 
     *        Defaults to an up down image.
     * @return void
     */

    public function setPositionAttribute($attr, $htmlIdentifier = null)
    {
        $this->m_positionAttribute = $attr;
        $this->m_positionAttributeHtmlModifier = $htmlIdentifier;
    }

    /**
     * Get the positional attribute of the many to many join. It is the column
     * in the join table that denotes the position of the item in the set.
     *
     * @access public
     * @return string the position column name of the join
     */

    public function getPositionAttribute()
    {
        return $this->m_positionAttribute;
    }

    /**
     * Check if positon attribute is set
     *
     * @return boolean true if the position attribute has been set
     */

    public function hasPositionAttribute()
    {
        return $this->getPositionAttribute() != null;
    }

    /**
     * Get the HTML label of the attribute.
     *
     * The difference with the label() method is that the label method always
     * returns the HTML label, while the getLabel() method is 'smart', by
     * taking the AF_NOLABEL and AF_BLANKLABEL flags into account.
     *
     * @param array $record The record holding the value for this attribute.
     * @param string $mode The mode ("add", "edit" or "view")
     * @return String The HTML compatible label for this attribute, or an
     *                empty string if the label should be blank, or NULL if no
     *                label at all should be displayed.
     */
    function getLabel($record = array(), $mode = '')
    {
        $additional = '';
        if ($this->hasPositionAttribute()) {
            if (is_null($this->m_positionAttributeHtmlModifier)) {
                $additional = ' <img src="' . Adapto_Config::getGlobal('atkroot')
                        . 'atk/images/up-down.gif" 
          width="10" height="10" 
          alt="Sortable Ordering" 
          title="Sortable Ordering" />';
            } else {
                $additional = $this->m_positionAttributeHtmlModifier;
            }

        }

        return parent::getLabel($record, $mode) . $additional;
    }
}