<?php
/**
 * 2007-2016 PrestaShop
 *
 * NOTICE OF LICENSE
 *
 * This source file is subject to the Open Software License (OSL 3.0)
 * that is bundled with this package in the file LICENSE.txt.
 * It is also available through the world-wide-web at this URL:
 * http://opensource.org/licenses/osl-3.0.php
 * If you did not receive a copy of the license and are unable to
 * obtain it through the world-wide-web, please send an email
 * to license@prestashop.com so we can send you a copy immediately.
 *
 * DISCLAIMER
 *
 * Do not edit or add to this file if you wish to upgrade PrestaShop to newer
 * versions in the future. If you wish to customize PrestaShop for your
 * needs please refer to http://www.prestashop.com for more information.
 *
 * @author    PrestaShop SA <contact@prestashop.com>
 * @copyright 2007-2016 PrestaShop SA
 * @license   http://opensource.org/licenses/osl-3.0.php  Open Software License (OSL 3.0)
 * International Registered Trademark & Property of PrestaShop SA
 */

/*
 * Interface
 */
require_once(dirname(__FILE__) . '/IMondialRelayWSMethod.php');

/*
 * Allow to fetch relay point - 'WSI2_RecherchePointRelais'
 */

class MRGetRelayPoint implements IMondialRelayWSMethod
{
    /*Params is required if you use a pointer function*/
    private $_fields = array(
        'list' => array(
            'Enseigne'       => array(
                'required'        => true,
                'value'           => '',
                'regexValidation' => '#^[0-9A-Z]{2}[0-9A-Z ]{6}$#'
            ),
            'Pays'           => array(
                'required'        => true,
                'value'           => '',
                'regexValidation' => '#^[A-Z]{2}$#'
            ),
            'Ville'          => array(
                'required'        => false,
                'value'           => '',
                'regexValidation' => '#^[A-Z_\-\' 0-9]{2,25}$#'
            ),
            'CP'             => array(
                'required'         => false,
                'value'            => '',
                'params'           => array(),
                'methodValidation' => 'checkZipcodeByCountry'
            ),
            'Taille'         => array(
                'required'        => false,
                'value'           => '',
                'regexValidation' => '#^(XS|S|M|L|XL|XXL|3XL)$#'
            ),
            'Poids'          => array(
                'required'        => false,
                'value'           => '',
                'regexValidation' => '#^[0-9]{3,7}$#'
            ),
            'Latitude'       => array(
                'required'        => false,
                'value'           => '',
                'regexValidation' => '#^-?[0-9]{2}\.[0-9]{7}$#'
            ),
            'Longitude'      => array(
                'required'        => false,
                'value'           => '',
                'regexValidation' => '#^-?[0-9]{2}\.[0-9]{7}$#'
            ),
            'Action'         => array(
                'required'        => false,
                'value'           => '',
                'regexValidation' => '#^(REL|24R|ESP|DRI)$#'
            ),
            'DelaiEnvoi'     => array(
                'required'        => false,
                'value'           => '',
                'regexValidation' => '#^[0-9]{1,2}$#'
            ),
            'RayonRecherche' => array(
                'required'        => false,
                'value'           => '',
                'regexValidation' => '#^[0-9]{1,4}$#'
            ),
            'Security'       => array(
                'required'        => true,
                'value'           => '',
                'regexValidation' => '#^[0-9A-Z]{32}$#'
            )
        )
    );

    private $_id_address_delivery = 0;
    private $_weight = 0;
    private $_mode_liv = '';
    private $_webServiceKey = '';
    private $_mondialRelay = null;
    private $_id_carrier = 0;
    private $_id_delivery_country = 0;

    private $_resultList = array(
        'error'   => array(),
        'success' => array()
    );

    private $_webserviceURL;

    public function __construct($params, $object)
    {
        $this->_mondialRelay = $object;
        $this->_id_address_delivery = (int)($params['id_address_delivery']);
        $this->_id_carrier = (int)($params['id_carrier']);
        $this->_weight = (float)($params['weight']);
        $this->_mode_liv = $params['mode_liv'];
        $this->_webServiceKey = $this->_mondialRelay->account_shop['MR_KEY_WEBSERVICE'];
        $this->_webserviceURL = MondialRelay::MR_URL . 'webservice/Web_Services.asmx?WSDL';
    }

    public function __destruct()
    {
        unset($this->_mondialRelay);
    }

    public function init()
    {
        $address = new Address($this->_id_address_delivery);
        $weight = $this->_mondialRelay->account_shop['MR_WEIGHT_COEFFICIENT'] * $this->_weight;

        if (!$address) {
            throw new Exception($this->_mondialrelay->l('Customer address can\'t be found'));
        }

        $this->_fields['list']['Enseigne']['value'] = $this->_mondialRelay->account_shop['MR_ENSEIGNE_WEBSERVICE'];
        $this->_fields['list']['Poids']['value'] = ($weight < 100) ? 100 : $weight;
        $this->_fields['list']['Pays']['value'] = trim(Country::getIsoById($address->id_country));
        $this->_fields['list']['Ville']['value'] = trim($address->city);
        $this->_fields['list']['CP']['value'] = trim($address->postcode);
        $this->_fields['list']['CP']['params']['id_country'] = $address->id_country;
        $this->_fields['list']['Action']['value'] = $this->_mode_liv;

        if ($this->_mode_liv == "DRI" || $this->_mode_liv == "24R") {
            $this->_fields['list']['Latitude']['value'] = null;
            $this->_fields['list']['Longitude']['value'] = null;
            $this->_fields['list']['DelaiEnvoi']['value'] = "0";

            if ($this->_mode_liv == "DRI") {
                $this->_fields['list']['RayonRecherche']['value'] = "200";
            } else {
                $this->_fields['list']['RayonRecherche']['value'] = null;
            }
        }

        $this->_generateMD5SecurityKey();
        unset($address);
    }

    /*
     * Generate the MD5 key for each param list
     */
    private function _generateMD5SecurityKey()
    {
        $concatenationValue = '';
        foreach ($this->_fields['list'] as $paramName => &$valueDetailed) {
            if ($paramName != 'Texte' && $paramName != 'Security') {
                // Mac server make an empty string instead of a cleaned string
                // TODO : test on windows and linux server
                $cleanedString = MRTools::removeAccents($valueDetailed['value']);
                $valueDetailed['value'] = !empty($cleanedString) ? Tools::strtoupper($cleanedString) : Tools::strtoupper($valueDetailed['value']);

                $valueDetailed['value'] = Tools::strtoupper($valueDetailed['value']);
                // Call a pointer function if exist to do different test
                if (
                    isset($valueDetailed['methodValidation'])
                    && method_exists('MRTools', $valueDetailed['methodValidation'])
                    && isset($valueDetailed['params'])
                    && MRTools::$valueDetailed['methodValidation']($valueDetailed['value'], $valueDetailed['params'])
                ) {
                    $concatenationValue .= $valueDetailed['value'];
                } else { // Use simple Regex test given by MondialRelay
                    if (
                        isset($valueDetailed['regexValidation'])
                        && preg_match($valueDetailed['regexValidation'], $valueDetailed['value'], $matches)
                    ) {
                        $concatenationValue .= $valueDetailed['value'];
                    } elseif ((!Tools::strlen($valueDetailed['value']) && $valueDetailed['required']) || Tools::strlen($valueDetailed['value'])) { // If the key is required, we set an error, else it's skipped
                        $error = $this->_mondialRelay->l('This key') . ' [' . $paramName . '] ' .
                            $this->_mondialRelay->l('hasn\'t a valide value format') . ' : ' . $valueDetailed['value'];
                        $this->_resultList['error'][] = $error;
                    }
                }
            }
        }
        $concatenationValue .= $this->_webServiceKey;
        $this->_fields['list']['Security']['value'] = Tools::strtoupper(md5($concatenationValue));
    }

    /*
     * Get the values with associated fields name
     * @fields : array containing multiple values information
     */
    private function _getSimpleParamArray($fields)
    {
        $params = array();

        foreach ($fields as $keyName => $valueDetailed) {
            $params[$keyName] = $valueDetailed['value'];
        }

        return $params;
    }

    /*
    ** Get detail information for each relay
    */
    private function _getRelayPointDetails($relayPointList)
    {
        $relayPointNumList = array();
        foreach ($relayPointList as $relayPoint) {
            $relayPointNumList[] = $relayPoint['Num'];
        }
        $MRRelayDetail = new MRRelayDetail(array(
            'relayPointNumList'   => $relayPointNumList,
            'id_address_delivery' => $this->_id_address_delivery
        ));
        $MRRelayDetail->init();
        $MRRelayDetail->send();

        return $MRRelayDetail->getResult();
    }

    /*
    ** Generate a perman link to view relay detail on their website
    */
    private function _addLinkHoursDetail(&$relayPointList)
    {
        $relayPointNumList = array();
        foreach ($relayPointList as $relayPoint) {
            $relayPointNumList[] = $relayPoint->Num;
        }
        $permaList = MRRelayDetail::getPermaLink($relayPointNumList, $this->_id_address_delivery);
        foreach ($relayPointList as &$relayPoint) {
            $relayPoint->permaLinkDetail = '';
            if (array_key_exists($relayPoint->Num, $permaList)) {
                $relayPoint->permaLinkDetail = $permaList[$relayPoint->Num];
            }
        }

        return $relayPointList;
    }

    /*
     * Manage the return value of the webservice, handle the errors or build the
     * succeed message
     */
    private function _parseResult($client, $result, $params)
    {
        $errors = array();
        $success = array();

        if ($this->_mode_liv == 'DRI' || $this->_mode_liv == "24R") {
            $result = $result->WSI3_PointRelais_RechercheResult;
        } else {
            $result = $result->WSI2_RecherchePointRelaisResult;
        }

        if (($errorNumber = $result->STAT) != 0) {
            $errors[] = $this->_mondialRelay->l('There is an error number : ') . $errorNumber;
            $errors[] = $this->_mondialRelay->l('Details : ') .
                $this->_mondialRelay->getErrorCodeDetail($errorNumber);
        } else {
            unset($result->STAT);


            if ($this->_mode_liv == 'DRI' || $this->_mode_liv == "24R") {
                $list = $result->PointsRelais->PointRelais_Details;
                if (!is_array($list)) {
                    $list = array($list);
                }
            } else {
                $list = $result;
            }

            // Clean Content
            foreach ($list as $num => &$relayPoint) {
                $totalEmptyFields = 0;
                foreach ($relayPoint as &$value) {
                    if (is_string($value)) {
                        $value = trim($value);
                        if (empty($value)) {
                            ++$totalEmptyFields;
                        }
                    } else {
                        if (is_array($value) && count($value)) {
                            $value = array_map('trim', $value);
                            ++$totalEmptyFields;
                        }
                    }
                }

                if ($totalEmptyFields == count($relayPoint)) {
                    unset($list[$num]);
                }
            }

            if (!count($result)) {
                $errors[] = $this->_mondialRelay->l('MondialRelay can\'t find any relay point near your address. Maybe your address isn\'t properly filled ?');
            } else {
                $this->_addLinkHoursDetail($list);

                // Fetch detail info using webservice (not used anymore)
                // $this->_generateLinkHoursDetail($result);
                // $result = (count($relayDetail['success'])) ? $relayDetail['success'] : $result;
            }
            $success = $list;
        }
        $this->_resultList['error'] = $errors;
        $this->_resultList['success'] = $success;
    }

    /*
    * Send one or multiple request to the webservice
    */
    public function send()
    {
        if ($client = new SoapClient($this->_webserviceURL, array('trace' => 1))) {
            $client->soap_defencoding = 'UTF-8';
            $client->decode_utf8 = false;

            $params = $this->_getSimpleParamArray($this->_fields['list']);

            if ($this->_mode_liv == 'DRI' || $this->_mode_liv == "24R") {
                $result = $client->WSI3_PointRelais_Recherche($params);
            } else {
                $result = $client->WSI2_RecherchePointRelais($params);
            }

            $this->_parseResult($client, $result, $params);
            unset($client);
        } else {
            throw new Exception($this->_mondialRelay->l('The Mondial Relay webservice isn\'t currently reliable'));
        }
    }

    /*
     * Get the values with associated fields name
     */
    public function getFieldsList()
    {
        return $this->_fieldsList['list'];
    }

    /*
     * Get the result of one or multiple send request
     */
    public function getResult()
    {
        return $this->_resultList;
    }
}