<?php
/**
 * modrefchange module
 *
 * @author PrestadevNL <support@prestadev.nl>
 * @copyright PrestadevNL
 * @license commercial license see license.txt
 * @license logo http://creativecommons.org/licenses/by/3.0/deed.nl Creative Commons
 * @category Prestashop
 * @category Module
 * @version 1.5.5.2
**/

if (!defined('_PS_VERSION_'))
    exit;

class Modrefchange extends Module
{
    private $_html = '';
    private $_postErrors = array();
    protected $_errors = array();

    public $ref_orderid;
    public $ref_cartid;
    public $ref_prefnulo;
    public $ref_prefnulnro;
    public $ref_prefnulnrc;
    public $ref_prefsigno;
    public $ref_prefnulc;
    public $ref_prefsignc;
    public $ref_prefsign;

    public $inv_orderid;
    public $inv_cartid;
    public $inv_prefsign;

    public function __construct()
    {
        $this->name = 'modrefchange';

        $this->tab = 'administration';

        $this->version = '1.5.5';
        $this->author = 'PrestadevNL';

        $config = Configuration::getMultiple(array('ORD_REF_ORDERID', 'ORD_REF_PREFIXNULO', 'ORD_REF_PREFIXNULNRO', 'ORD_REF_PREFIXSIGNO', 'ORD_REF_CARTID', 'ORD_REF_PREFIXNULC', 'ORD_REF_PREFIXNULNRC', 'ORD_REF_PREFIXSIGNC', 'ORD_REF_PREFIXSIGN', 'INV_REF_ORDERID', 'INV_REF_CARTID', 'INV_REF_PREFIXSIGN'));
        if (isset($config['ORD_REF_ORDERID']))
            $this->ref_orderid = $config['ORD_REF_ORDERID'];
        if (isset($config['ORD_REF_CARTID']))
            $this->ref_cartid = $config['ORD_REF_CARTID'];
        if (isset($config['ORD_REF_PREFIXNULO']))
            $this->ref_prefnulo = $config['ORD_REF_PREFIXNULO'];
        if (isset($config['ORD_REF_PREFIXNULNRO']))
            $this->ref_prefnulnro = $config['ORD_REF_PREFIXNULNRO'];
        if (isset($config['ORD_REF_PREFIXSIGNO']))
            $this->ref_prefsigno = $config['ORD_REF_PREFIXSIGNO'];
        if (isset($config['ORD_REF_PREFIXNULC']))
            $this->ref_prefnulc = $config['ORD_REF_PREFIXNULC'];
        if (isset($config['ORD_REF_PREFIXNULNRC']))
            $this->ref_prefnulnrc = $config['ORD_REF_PREFIXNULNRC'];
        if (isset($config['ORD_REF_PREFIXSIGNC']))
            $this->ref_prefsignc = $config['ORD_REF_PREFIXSIGNC'];
        if (isset($config['ORD_REF_PREFIXSIGN']))
            $this->ref_prefsign = $config['ORD_REF_PREFIXSIGN'];

        if (isset($config['INV_REF_ORDERID']))
            $this->inv_orderid = $config['INV_REF_ORDERID'];
        if (isset($config['INV_REF_CARTID']))
            $this->inv_cartid = $config['INV_REF_CARTID'];
        if (isset($config['INV_REF_PREFIXSIGN']))
            $this->inv_prefsign = $config['INV_REF_PREFIXSIGN'];
        parent::__construct();

        $this->displayName = $this->l('Order reference change mod');
        $this->description = $this->l('Mod to change the order reference');
    }

    /**
     * Install overrides files for the module
     *
     * @return bool
     */
    public function installXtraOverrides()
    {
        if (!is_dir(_PS_MODULE_DIR_.$this->name.'/_overrider/classes/order'))
            return true;

        if (file_exists(_PS_ROOT_DIR_.'/override/classes/order/OrderPayment.php') && is_writable(_PS_ROOT_DIR_.'/override/classes/order/OrderPayment.php'))
        {
            $searchfor = 'public static $definition = array(';
            // get the file contents, assuming the file to be readable (and exist)
            $contents = Tools::file_get_contents(_PS_ROOT_DIR_.'/override/classes/order/OrderPayment.php');
            // escape special characters in the query
            $pattern = preg_quote($searchfor, '/');
            // finalise the regular expression, matching the whole line
            $pattern = "/^.*$pattern.*\$/m";
            // search, and store all matching occurences in $matches
            if(preg_match_all($pattern, $contents, $matches))
                if(count($matches) >= 2)
                    copy(_PS_MODULE_DIR_.$this->name.'/override/classes/order/OrderPayment.php', _PS_ROOT_DIR_.'/override/classes/order/OrderPayment.php');
                else
                    return true;
        }

        $result = true;
        foreach (Tools::scandir(_PS_MODULE_DIR_.$this->name.'/_overrider/classes/order', 'php', '', true) as $file)
        {
            $class = basename($file, '.php');
            if (Autoload::getInstance()->getClassPath($class.'Core'))
                $result &= $this->addXtraOverride($class);
        }

        return $result;
    }

    /**
     * Uninstall overrides files for the module
     *
     * @return bool
     */
    public function uninstallXtraOverrides()
    {
        return copy(_PS_MODULE_DIR_.$this->name.'/override/classes/order/OrderPayment.php', _PS_ROOT_DIR_.'/override/classes/order/OrderPayment.php');
    }

    /**
     * Add all methods in a module override to the override class
     *
     * @param string $classname
     * @return bool
     */
    public function addXtraOverride($classname)
    {
        $path = Autoload::getInstance()->getClassPath($classname.'Core');

        // Check if there is already an override file, if not, we just need to copy the file
        if (Autoload::getInstance()->getClassPath($classname))
        {
            // Check if override file is writable
            $override_path = _PS_ROOT_DIR_.'/'.Autoload::getInstance()->getClassPath($classname);
            if ((!file_exists($override_path) && !is_writable(dirname($override_path))) || (file_exists($override_path) && !is_writable($override_path)))
                throw new Exception(sprintf(Tools::displayError('file (%s) not writable'), $override_path));

            // Get a uniq id for the class, because you can override a class (or remove the override) twice in the same session and we need to avoid redeclaration
            do $uniq = uniqid();
            while (class_exists($classname.'OverrideOriginal_remove', false));

            // Make a reflection of the override class and the module override class
            $override_file = file($override_path);
            eval(preg_replace(array('#^\s*<\?php#', '#class\s+'.$classname.'\s+extends\s+([a-z0-9_]+)(\s+implements\s+([a-z0-9_]+))?#i'), array('', 'class '.$classname.'OverrideOriginal'.$uniq), implode('', $override_file)));
            $override_class = new ReflectionClass($classname.'OverrideOriginal'.$uniq);

            $module_file = file($this->getLocalPath().'_overrider'.DIRECTORY_SEPARATOR.$path);
            eval(preg_replace(array('#^\s*<\?php#', '#class\s+'.$classname.'(\s+extends\s+([a-z0-9_]+)(\s+implements\s+([a-z0-9_]+))?)?#i'), array('', 'class '.$classname.'Override'.$uniq), implode('', $module_file)));
            $module_class = new ReflectionClass($classname.'Override'.$uniq);

            // Check if none of the methods already exists in the override class
            foreach ($module_class->getMethods() as $method)
                if ($override_class->hasMethod($method->getName()))
                    throw new Exception(sprintf(Tools::displayError('The method %1$s in the class %2$s is already overriden.'), $method->getName(), $classname));

            // Check if none of the properties already exists in the override class
//			foreach ($module_class->getProperties() as $property)
//				if ($override_class->hasProperty($property->getName()))
//					throw new Exception(sprintf(Tools::displayError('The property %1$s in the class %2$s is already defined.'), $property->getName(), $classname));

            // Insert the methods from module override in override
            $copy_from = array_slice($module_file, $module_class->getStartLine() + 1, $module_class->getEndLine() - $module_class->getStartLine() - 2);
            array_splice($override_file, $override_class->getEndLine() - 1, 0, $copy_from);
            $code = implode('', $override_file);
            file_put_contents($override_path, $code);
        }
        else
        {
            $override_src = _PS_MODULE_DIR_.$this->name.'/_overrider/'.$path;
            $override_dest = _PS_ROOT_DIR_.DIRECTORY_SEPARATOR.'/override'.DIRECTORY_SEPARATOR.$path;
            if (!is_writable(dirname($override_dest)))
                throw new Exception(sprintf(Tools::displayError('directory (%s) not writable'), dirname($override_dest)));
            copy($override_src, $override_dest);
            // Re-generate the class index
            Autoload::getInstance()->generateIndex();
        }
        return true;
    }

    public function patchOverrides()
    {
        if (!is_dir($this->getLocalPath().'override'))
            return true;

        $result = true;
        foreach (Tools::scandir($this->getLocalPath().'override', 'php', '', true) as $file)
        {
            $class = basename($file, '.php');
            if (Autoload::getInstance()->getClassPath($class.'Core'))
                if(!$this->IsPatchedOverrides($class))
                    $result &= $this->addOverride($class);
                else
                    $result &= true;
        }
        return $result;
    }

    public function IspatchedOverrides($classname)
    {
        switch($classname){
            case 'Order':
                $path = Autoload::getInstance()->getClassPath($classname.'Core');

                // Check if there is already an override file, if not, we just need to copy the file
                if (Autoload::getInstance()->getClassPath($classname))
                {
                    // Check if override file is writable
                    $override_path = _PS_ROOT_DIR_.'/'.Autoload::getInstance()->getClassPath($classname);
                    if (file_exists($override_path) && !is_writable($override_path))
                        throw new Exception(sprintf(Tools::displayError('file (%s) not writable'), $override_path));

                    // Get a uniq id for the class, because you can override a class (or remove the override) twice in the same session and we need to avoid redeclaration
                    do $uniq = uniqid();
                    while (class_exists($classname.'OverrideOriginal_remove', false));

                    // Make a reflection of the override class and the module override class
                    $override_file = file($override_path);
                    eval(preg_replace(array('#^\s*<\?php#', '#class\s+'.$classname.'\s+extends\s+([a-z0-9_]+)(\s+implements\s+([a-z0-9_]+))?#i'), array('', 'class '.$classname.'OverrideOriginal'.$uniq), implode('', $override_file)));
                    $override_class = new ReflectionClass($classname.'OverrideOriginal'.$uniq);

                    $module_file = file($this->getLocalPath().'override'.DIRECTORY_SEPARATOR.$path);
                    eval(preg_replace(array('#^\s*<\?php#', '#class\s+'.$classname.'(\s+extends\s+([a-z0-9_]+)(\s+implements\s+([a-z0-9_]+))?)?#i'), array('', 'class '.$classname.'Override'.$uniq), implode('', $module_file)));
                    $module_class = new ReflectionClass($classname.'Override'.$uniq);

                    // Check if none of the methods already exists in the override class
                    $methodpatched = array(
                        'add'=>array(
                            'patched'=>false,
                            'method'=>'
    public function add($autodate = true, $null_values = true)
    {
        $cart = new Cart($this->id_cart);
        Hook::exec(\'actionBeforeAddOrder\', array(\'order\'=>$this,\'cart\'=>$cart));

        if (ObjectModel::add($autodate, $null_values))
            return SpecificPrice::deleteByIdCart($this->id_cart);
        return false;
    }
'
                        ),
                        'setLastInvoiceNumber'=>array(
                            'patched'=>false,
                            'method'=>'
    public static function setLastInvoiceNumber($order_invoice_id, $id_shop)
    {
        if (!$order_invoice_id)
            return false;

        $number = Configuration::get(\'PS_INVOICE_START_NUMBER\', null, null, $id_shop);
        // If invoice start number has been set, you clean the value of this configuration
        if ($number)
            Configuration::updateValue(\'PS_INVOICE_START_NUMBER\', false, false, null, $id_shop);
            
        $order_invoice = new OrderInvoice($order_invoice_id);
        $order = new Order($order_invoice->id_order);
        $cart = new Cart($order->id_cart);
        
        if($ref = Hook::exec(\'actionBeforeAddOrderInvoice\', array(\'order_invoice\'=>$order_invoice,\'order\'=>$order,\'cart\'=>$cart)))
            $number = $ref;

        $sql = \'UPDATE `\'._DB_PREFIX_.\'order_invoice` SET number =\';

        if ($number)
            $sql .= (int)$number;
        else
            $sql .= \'(SELECT new_number FROM (SELECT (MAX(`number`) + 1) AS new_number
            FROM `\'._DB_PREFIX_.\'order_invoice`) AS result)\';

        $sql .=\' WHERE `id_order_invoice` = \'.(int)$order_invoice_id;

        return Db::getInstance()->execute($sql);
    }
                            '
                        ),
                        'setDeliveryNumber'=>array(
                            'patched'=>false,
                            'method'=>'
    public function setDeliveryNumber($order_invoice_id, $id_shop)
    {
        if (!$order_invoice_id)
            return false;
        
        $id_shop = shop::getTotalShops() > 1 ? $id_shop : null;

        $number = Configuration::get(\'PS_DELIVERY_NUMBER\', null, null, $id_shop);
        // If invoice start number has been set, you clean the value of this configuration
        if ($number)
            Configuration::updateValue(\'PS_DELIVERY_NUMBER\', false, false, null, $id_shop);
            
        $order_invoice = new OrderInvoice($order_invoice_id);
        $order = new Order($order_invoice->id_order);
        $cart = new Cart($order->id_cart);
        
        if($ref = Hook::exec(\'actionBeforeAddDeliveryNumber\', array(\'order\'=>$order,\'cart\'=>$cart,\'number\'=>$number)))
            $number = $ref;

        $sql = \'UPDATE `\'._DB_PREFIX_.\'order_invoice` SET delivery_number =\';

        if ($number)
            $sql .= (int)$number;
        else
            $sql .= \'(SELECT new_number FROM (SELECT (MAX(`delivery_number`) + 1) AS new_number
            FROM `\'._DB_PREFIX_.\'order_invoice`) AS result)\';

        $sql .=\' WHERE `id_order_invoice` = \'.(int)$order_invoice_id;

        return Db::getInstance()->execute($sql);
    }
                            '
                        )
                    );
                    foreach ($module_class->getMethods() as $method)
                        if ($override_class->hasMethod($method->getName()))
                            $methodpatched[$method->getName()]['patched'] = true;


                    // Insert the methods from module override in override
                    $copy_from = array();
                    foreach($methodpatched as $patched){
                        if(!$patched['patched'])
                            $copy_from[] = $patched['method'];
                    }
                    array_splice($override_file, $override_class->getEndLine() - 1, 0, $copy_from);
                    $code = implode('', $override_file);
                    file_put_contents($override_path, $code);
                    return true;
                }
                else
                    return false;
            break;
            case 'OrderInvoice':
                if(file_exists(_PS_OVERRIDE_DIR_.'classes/Order/OrderInvoice.php')){
                    $cont = Tools::file_get_contents(_PS_OVERRIDE_DIR_.'classes/Order/OrderInvoice.php');
                    if(strpos($cont, 'actionBeforeAddOrderInvoice') === false)
                        return false;
                    else
                        return true;
                } else
                    return false;
            break;
            case 'OrderPayment':
                if(file_exists(_PS_OVERRIDE_DIR_.'classes/Order/OrderPayment.php')){
                    $cont = Tools::file_get_contents(_PS_OVERRIDE_DIR_.'classes/Order/OrderPayment.php');
                    if(strpos($cont, '\'order_reference\' => 	array(\'type\' => self::TYPE_STRING, \'validate\' => \'isAnything\', \'size\' => 100),') === false)
                        return false;
                    else
                        return true;
                } else
                    return false;
            break;
            default:
                return false;
        }
    }

    public function install()
    {
        $hook = new Hook(Hook::getIdByName('actionBeforeAddOrder'));
        $hook->delete();
        unset($hook);
        $hook2 = new Hook(Hook::getIdByName('actionBeforeAddOrderInvoice'));
        $hook2->delete();
        unset($hook2);
        $hook3 = new Hook(Hook::getIdByName('actionBeforeAddDeliveryNumber'));
        $hook3->delete();
        unset($hook3);

        if(!Hook::getIdByName('actionBeforeAddOrder')){
            $hook = new Hook();
            $hook->name = 'actionBeforeAddOrder';
            $hook->title = 'Execute actions before order is added to database';
            $hook->description = 'Custom hook for Order Add function';
            $hook->position = true;
            $hook->live_edit = false;
            if(!$hook->add())
                return $this->_abortInstall('Error while adding hook actionBeforeAddOrder', 0);
            unset ($hook);
        }
        if(!Hook::getIdByName('actionBeforeAddOrderInvoice')){
            $hook2 = new Hook();
            $hook2->name = 'actionBeforeAddOrderInvoice';
            $hook2->title = 'Execute actions before invoice is added to database';
            $hook2->description = 'Custom hook for OrderInvoice Add function';
            $hook2->position = true;
            $hook2->live_edit = false;
            if(!$hook2->add())
                return $this->_abortInstall('Error while adding hook actionBeforeAddOrderInvoice', 1);
            unset ($hook2);
        }
        if(!Hook::getIdByName('actionBeforeAddDeliveryNumber')){
            $hook3 = new Hook();
            $hook3->name = 'actionBeforeAddDeliveryNumber';
            $hook3->title = 'Execute actions before delivery number is added to database';
            $hook3->description = 'Custom hook for Order setDeliveryNumber function';
            $hook3->position = true;
            $hook3->live_edit = false;
            if(!$hook3->add())
                return $this->_abortInstall('Error while adding hook actionBeforeAddDeliveryNumber', 2);
        }
        if(!$this->installDB())
            return $this->_abortInstall('Error while installing module database settings', 3);
        if(!parent::install())
            return $this->_abortInstall('Error while installing module class', 4);
        if(!$this->installXtraOverrides())
            return $this->_abortInstall('Error while installing OrderPayment definition override', 5);
        if(!$this->registerHook('actionBeforeAddOrder'))
            return $this->_abortInstall('Error while adding module to hook actionBeforeAddOrder', 6);
        if(!$this->registerHook('actionBeforeAddOrderInvoice'))
            return $this->_abortInstall('Error while adding module to hook actionBeforeAddOrderInvoice', 7);
        if(!$this->registerHook('actionBeforeAddDeliveryNumber'))
            return $this->_abortInstall('Error while adding module to hook actionBeforeAddDeliveryNumber', 8);
        if(!Configuration::updateValue('ORD_REF_ORDERID', 0))
            return $this->_abortInstall('Error while adding configuration setting ORD_REF_ORDERID', 9);
        if(!Configuration::updateValue('ORD_REF_PREFIXNULO', 0))
            return $this->_abortInstall('Error while adding configuration setting ORD_REF_PREFIXNULO', 10);
        if(!Configuration::updateValue('ORD_REF_PREFIXNULNRO', 9))
            return $this->_abortInstall('Error while adding configuration setting ORD_REF_PREFIXNULNRO', 11);
        if(!Configuration::updateValue('ORD_REF_PREFIXNULNRC', 9))
            return $this->_abortInstall('Error while adding configuration setting ORD_REF_PREFIXNULNRC', 12);
        if(!Configuration::updateValue('ORD_REF_PREFIXSIGNO', ''))
            return $this->_abortInstall('Error while adding configuration setting ORD_REF_PREFIXSIGNO', 13);
        if(!Configuration::updateValue('ORD_REF_CARTID', 0))
            return $this->_abortInstall('Error while adding configuration setting ORD_REF_PREFIX_CARTID', 14);
        if(!Configuration::updateValue('ORD_REF_PREFIXNULC', 0))
            return $this->_abortInstall('Error while adding configuration setting ORD_REF_PREFIXNULC', 15);
        if(!Configuration::updateValue('ORD_REF_PREFIXSIGNC', ''))
            return $this->_abortInstall('Error while adding configuration setting ORD_REF_PREFIXSIGNC', 16);
        if(!Configuration::updateValue('ORD_REF_PREFIXSIGN', ''))
            return $this->_abortInstall('Error while adding configuration setting ORD_REF_PREFIXSIGN', 17);
        if(!Configuration::updateValue('INV_REF_ORDERID', 0))
            return $this->_abortInstall('Error while adding configuration setting INV_REF_ORDERID', 18);
        if(!Configuration::updateValue('INV_REF_CARTID', 0))
            return $this->_abortInstall('Error while adding configuration setting INV_REF_CARTID', 19);
        if(!Configuration::updateValue('INV_REF_PREFIXSIGN', 0))
            return $this->_abortInstall('Error while adding configuration setting INV_REF_PREFIXSIGN', 20);

        $classindex = realpath(dirname(__FILE__).'/../..').'/cache/class_index.php';
        $tempnam = realpath(dirname(__FILE__).'/../..').'/cache/'.time().'.bak';
        rename($classindex, $tempnam);
        unlink($tempnam);

        if(version_compare(_PS_VERSION_, '1.6', '>='))
            PrestashopAutoload::getInstance()->generateIndex();
        else
            Autoload::getInstance()->generateIndex();

        return true;
    }

    public function installDB(){
        $return = true;
        if(!Db::getInstance()->execute('ALTER TABLE `'._DB_PREFIX_.'orders` CHANGE `reference` `reference` VARCHAR( 100 ) CHARACTER SET utf8 COLLATE utf8_general_ci NULL DEFAULT NULL '))
            $return &= $this->_abortInstall('Error while altering `'._DB_PREFIX_.'orders`');
        if(!Db::getInstance()->execute('ALTER TABLE `'._DB_PREFIX_.'order_payment` CHANGE `order_reference` `order_reference` VARCHAR( 100 ) CHARACTER SET utf8 COLLATE utf8_general_ci NULL DEFAULT NULL '))
            $return &= $this->_abortInstall('Error while altering `'._DB_PREFIX_.'order_payments`');
        return $return;
    }

    public function uninstall()
    {
        $return = true;

        copy(_PS_MODULE_DIR_.$this->name.'/override/classes/order/OrderPayment.php', _PS_ROOT_DIR_.'/override/classes/order/OrderPayment.php');
        if(!parent::uninstall())
            $return &= $this->_abortInstall('Error while uninstalling class from modules');
        $hook = new Hook(Hook::getIdByName('actionBeforeAddOrder'));
        if(!$hook->delete())
            $return &= $this->_abortInstall('Error while removing hook actionBeforeAddOrder');
        unset($hook);
        $hook2 = new Hook(Hook::getIdByName('actionBeforeAddOrderInvoice'));
        if(!$hook2->delete())
            $return &= $this->_abortInstall('Error while removing hook actionBeforeAddOrderInvoice');
        unset($hook2);
        $hook3 = new Hook(Hook::getIdByName('actionBeforeAddDeliveryNumber'));
        if(!$hook3->delete())
            $return &= $this->_abortInstall('Error while removing hook actionBeforeAddDeliveryNumber');
        unset($hook3);
        if(!Configuration::deleteByName('ORD_REF_ORDERID'))
            $return &= $this->_abortInstall('Error while removing configuration setting ORD_REF_ORDERID');
        if(!Configuration::deleteByName('ORD_REF_PREFIXNULO'))
            $return &= $this->_abortInstall('Error while removing configuration setting ORD_REF_PREFIXNULO');
        if(!Configuration::deleteByName('ORD_REF_PREFIXNULNRO'))
            $return &= $this->_abortInstall('Error while removing configuration setting ORD_REF_PREFIXNULNRO');
        if(!Configuration::deleteByName('ORD_REF_PREFIXNULNRC'))
            $return &= $this->_abortInstall('Error while removing configuration setting ORD_REF_PREFIXNULNRC');
        if(!Configuration::deleteByName('ORD_REF_PREFIXSIGNO'))
            $return &= $this->_abortInstall('Error while removing configuration setting ORD_REF_PREFIXSIGNO');
        if(!Configuration::deleteByName('ORD_REF_CARTID'))
            $return &= $this->_abortInstall('Error while removing configuration setting ORD_REF_PREFIXNULO');
        if(!Configuration::deleteByName('ORD_REF_PREFIXNULC'))
            $return &= $this->_abortInstall('Error while removing configuration setting ORD_REF_PREFIXNULC');
        if(!Configuration::deleteByName('ORD_REF_PREFIXSIGNC'))
            $return &= $this->_abortInstall('Error while removing configuration setting ORD_REF_PREFIXSIGNC');
        if(!Configuration::deleteByName('ORD_REF_PREFIXSIGN'))
            $return &= $this->_abortInstall('Error while removing configuration setting ORD_REF_PREFIXSIGN');
        if(!Configuration::deleteByName('INV_REF_ORDERID'))
            $return &= $this->_abortInstall('Error while removing configuration setting INV_REF_ORDERID');
        if(!Configuration::deleteByName('INV_REF_CARTID'))
            $return &= $this->_abortInstall('Error while removing configuration setting INV_REF_ORDERID');
        if(!Configuration::deleteByName('INV_REF_PREFIXSIGN'))
            $return &= $this->_abortInstall('Error while removing configuration setting INV_REF_ORDERID');

        return $return;
    }

    protected function _revertInstall($step)
    {
        if($step >= 1){
            $hook = new Hook(Hook::getIdByName('actionBeforeAddOrder'));
            $hook->delete();
            unset($hook);
        }
        if($step >= 2){
            $hook2 = new Hook(Hook::getIdByName('actionBeforeAddOrderInvoice'));
            $hook2->delete();
            unset($hook2);
        }
        if($step >= 3){
            $hook3 = new Hook(Hook::getIdByName('actionBeforeAddDeliveryNumber'));
            $hook3->delete();
            unset($hook3);
        }
        // if($step >= 4)
            // Uninstall DB changes
        if($step >= 5)
            parent::uninstall;
        if($step >= 6)
            $this->uninstallXtraOverrides();
        if($step >= 7)
            $this->unregisterHook('actionBeforeAddOrder');
        if($step >= 8)
            $this->unregisterHook('actionBeforeAddOrderInvoice');
        if($step >= 9)
            $this->unregisterHook('actionBeforeAddDeliveryNumber');
        if($step >= 10)
            Configuration::deleteByName('ORD_REF_ORDERID');
        if($step >= 11)
            Configuration::deleteByName('ORD_REF_PREFIXNULO');
        if($step >= 12)
            Configuration::deleteByName('ORD_REF_PREFIXNULNRO');
        if($step >= 13)
            Configuration::deleteByName('ORD_REF_PREFIXNULNRC');
        if($step >= 14)
            Configuration::deleteByName('ORD_REF_PREFIXSIGNO');
        if($step >= 15)
            Configuration::deleteByName('ORD_REF_CARTID');
        if($step >= 16)
            Configuration::deleteByName('ORD_REF_PREFIXNULC');
        if($step >= 17)
            Configuration::deleteByName('ORD_REF_PREFIXSIGNC');
        if($step >= 18)
            Configuration::deleteByName('ORD_REF_PREFIXSIGN');
        if($step >= 19)
            Configuration::deleteByName('INV_REF_ORDERID');
        if($step >= 20)
            Configuration::deleteByName('INV_REF_CARTID');
    }

    /**
    * Set installation errors and return false
    *
    * @param string $error Installation abortion reason
    * @return boolean Always false
    */
    protected function _abortInstall($error, $step = 0)
    {
        $this->_revertInstall($step);

        if (version_compare(_PS_VERSION_, '1.5.0.0 ', '>='))
            $this->_errors[] = $error;
        else
            echo '<div class="error">'.strip_tags($error).'</div>';

        return false;
    }

    private function _postProcess()
    {
        $inv_prefixsign = Tools::getValue('inv_prefixsign');
        $dtpattern = '/(\w*)((%[aAdejuwUVWbBhmCgGyYHklIMpPrRSTXZzcDFsxnt])+)(\w*)/';
        preg_match_all($dtpattern, Tools::getValue('inv_prefixsign'), $matchesinv);
        preg_match_all($dtpattern, Tools::getValue('ref_prefixsigno'), $matchesord);
        preg_match_all($dtpattern, Tools::getValue('ref_prefixsignc'), $matchescart);
        preg_match_all($dtpattern, Tools::getValue('ref_prefixsign'), $matchesref);

        if(!Configuration::updateValue('ORD_REF_ORDERID', Tools::getValue('ref_orderid')))
            $this->_errors[] = $this->l('Error while updating setting ref_orderid');
        if(!Configuration::updateValue('ORD_REF_PREFIXNULO', Tools::getValue('ref_prefixnulo')))
            $this->_errors[] = $this->l('Error while updating setting ref_prefixnulo');
        if(!Configuration::updateValue('ORD_REF_PREFIXNULNRO', Tools::getValue('ref_prefixnulnro')))
            $this->_errors[] = $this->l('Error while updating setting ref_prefixnulnro');
        if(!empty($matchesord[2]) || empty($ref_prefixsigno)){
            if(!Configuration::updateValue('ORD_REF_PREFIXSIGNO', Tools::getValue('ref_prefixsigno')))
                $this->_errors[] = $this->l('Error while updating setting ref_prefixsigno');
        } else {
            $this->_errors[] = $this->l('Invalid date/time format for setting prefix on Order ID');
        }
        if(!Configuration::updateValue('ORD_REF_CARTID', Tools::getValue('ref_cartid')))
            $this->_errors[] = $this->l('Error while updating setting ref_cartid');
        if(!Configuration::updateValue('ORD_REF_PREFIXNULC', Tools::getValue('ref_prefixnulc')))
            $this->_errors[] = $this->l('Error while updating setting ref_prefixnulc');
        if(!Configuration::updateValue('ORD_REF_PREFIXNULNRC', Tools::getValue('ref_prefixnulnrc')))
            $this->_errors[] = $this->l('Error while updating setting ref_prefixnulnrc');
        if(!empty($matchescart[2]) || empty($ref_prefixsignc)){
            if(!Configuration::updateValue('ORD_REF_PREFIXSIGNC', Tools::getValue('ref_prefixsignc')))
                $this->_errors[] = $this->l('Error while updating setting ref_prefixsignc');
        } else {
            $this->_errors[] = $this->l('Invalid date/time format for setting prefix on Cart ID');
        }
        if(!empty($matchesref[2]) || empty($ref_prefixsign)){
            if(!Configuration::updateValue('ORD_REF_PREFIXSIGN', Tools::getValue('ref_prefixsign')))
                $this->_errors[] = $this->l('Error while updating setting ref_prefixsign');
        } else {
            $this->_errors[] = $this->l('Invalid date/time format for setting prefix on Reference');
        }
        if(!Configuration::updateValue('INV_REF_ORDERID', Tools::getValue('inv_orderid')))
            $this->_errors[] = $this->l('Error while updating setting inv_orderid');
        if(!Configuration::updateValue('INV_REF_CARTID', Tools::getValue('inv_cartid')))
            $this->_errors[] = $this->l('Error while updating setting inv_cartid');
        if(!empty($matchesinv[2]) || empty($inv_prefixsign)){
            if(!Configuration::updateValue('INV_REF_PREFIXSIGN', Tools::getValue('inv_prefixsign')))
                $this->_errors[] = $this->l('Error while updating setting inv_prefixsign');
        } else {
            $this->_errors[] = $this->l('Invalid date/time format for setting prefix on invoice and delivery slip number');
        }
    }

    public function getContent()
    {
        $conf = null;

        if(version_compare(_PS_VERSION_, '1.6', '>='))
            $this->bootstrap = true;

        if (Tools::isSubmit('submit'.Tools::ucfirst($this->name)))
        {
            $this->_postProcess();
            if(!empty($this->_errors))
                $conf = $this->displayError($this->_errors);
        }

        $donatebut = 'https://www.paypalobjects.com/';
        if ($this->context->language->iso_code == 'nl') {
            $donatebut .= 'nl_NL/NL';
        } else {
            $donatebut .= 'en_EN/EN';
        }
        $donatebut .= '/i/btn/btn_donate_SM.gif';
        $donatepix = 'https://www.paypalobjects.com/';
        if ($this->context->language->iso_code == 'nl') {
            $donatepix .= 'nl_NL';
        } else {
            $donatepix .= 'en_EN';
        }
        $donatepix .= '/i/scr/pixel.gif';

        $this->context->smarty->assign('request_uri', Tools::safeOutput($_SERVER['REQUEST_URI']));
        $this->context->smarty->assign('path', $this->_path);
        $this->context->smarty->assign('displayname', $this->displayName);
        $this->context->smarty->assign('donatebut', $donatebut);
        $this->context->smarty->assign('donatepix', $donatepix);
        $this->context->smarty->assign('ref_orderid', pSQL(Tools::getValue('ref_orderid', Configuration::get('ORD_REF_ORDERID'))));
        $this->context->smarty->assign('ref_prefixnulo', pSQL(Tools::getValue('ref_prefixnulo', Configuration::get('ORD_REF_PREFIXNULO'))));
        $this->context->smarty->assign('ref_prefixnulnro', pSQL(Tools::getValue('ref_prefixnulnro', Configuration::get('ORD_REF_PREFIXNULNRO'))));
        $this->context->smarty->assign('ref_prefixsigno', pSQL(Tools::getValue('ref_prefixsigno', Configuration::get('ORD_REF_PREFIXSIGNO'))));
        $this->context->smarty->assign('ref_cartid', pSQL(Tools::getValue('ref_cartid', Configuration::get('ORD_REF_CARTID'))));
        $this->context->smarty->assign('ref_prefixnulc', pSQL(Tools::getValue('ref_prefixnulc', Configuration::get('ORD_REF_PREFIXNULC'))));
        $this->context->smarty->assign('ref_prefixnulnrc', pSQL(Tools::getValue('ref_prefixnulnrc', Configuration::get('ORD_REF_PREFIXNULNRC'))));
        $this->context->smarty->assign('ref_prefixsignc', pSQL(Tools::getValue('ref_prefixsignc', Configuration::get('ORD_REF_PREFIXSIGNC'))));
        $this->context->smarty->assign('ref_prefixsign', pSQL(Tools::getValue('ref_prefixsign', Configuration::get('ORD_REF_PREFIXSIGN'))));
        $this->context->smarty->assign('inv_orderid', pSQL(Tools::getValue('inv_orderid', Configuration::get('INV_REF_ORDERID'))));
        $this->context->smarty->assign('inv_cartid', pSQL(Tools::getValue('inv_cartid', Configuration::get('INV_REF_CARTID'))));
        $this->context->smarty->assign('inv_prefixsign', pSQL(Tools::getValue('inv_prefixsign', Configuration::get('INV_REF_PREFIXSIGN'))));
        $this->context->smarty->assign('submitName', 'submit'.Tools::ucfirst($this->name));
        $this->context->smarty->assign('conf', $conf);

        if(version_compare(_PS_VERSION_, '1.6', '>='))
            return $this->display(__FILE__, 'views/templates/admin/configure16.tpl');
        else
            return $this->display(__FILE__, 'views/templates/admin/configure.tpl');
    }

    private function _getLastOrder()
    {
        $statrows = Db::getInstance()->executeS('SHOW TABLE STATUS LIKE \''._DB_PREFIX_.'orders\'');
        return $statrows[0]['Auto_increment'];
    }

    public function generateReferenceFromID($id_order = NULL, $id_cart = NULL, $reference = NULL, $sequence = 0)
    {
        $reforder = '';
        $refcart = '';
        $ref = '';

        if(!$id_order)
            $id_order = (int)$this->_getLastOrder();

        if($this->ref_orderid){
            $reforder = $id_order;
            if($this->ref_prefnulo)
                $reforder = sprintf('%0'.$this->ref_prefnulnro.'d', $reforder);
            if($this->ref_prefsigno){
                if (strpos($this->ref_prefsigno, '%') !== false) {
                    $str = strftime($this->ref_prefsigno, time()).''.$reforder;
                } else {
                    $reforder = $this->ref_prefsigno.$reforder;
                }
            }
        }

        if($this->ref_cartid){
            $refcart = $id_cart;
            if($this->ref_prefnulc)
                $refcart = sprintf('%0'.$this->ref_prefnulnrc.'d', $refcart);
            if($this->ref_prefsignc){
                if (strpos($this->ref_prefsignc, '%') !== false) {
                    $refcart = strftime($this->ref_prefsignc, time()).''.$refcart;
                } else {
                    $refcart = $this->ref_prefsignc.''.$refcart;
                }
            }
        }

        if($reforder && !$refcart){
            $ref = $reforder;
        } elseif($reforder && $refcart){
            $ref = $reforder.''.$refcart;
        } elseif(!$reforder && $refcart){
            $ref = $refcart;
        } elseif(!$reforder && !$refcart){
            $ref = $reference;
        } else {
            $ref = $reference;
        }

        if($this->ref_prefsign){
            if (strpos($this->ref_prefsign, '%') !== false) {
                $ref = strftime($this->ref_prefsign, time()).''.$ref;
            } else {
                $ref = $this->ref_prefsign.''.$ref;
            }
        }

        if($sequence)
            $ref = $ref.$sequence;

        $sequence++;

        // First find if an order reference with the defined Order ID
        if($result = Db::getInstance()->getValue('SELECT reference FROM '._DB_PREFIX_.'orders WHERE reference = \''.$ref.'\' ORDER BY id_order DESC'))
            return $this->generateReferenceFromID($ref, $id_cart, $reference, $sequence);
        else
            return $ref;
    }

    public function generateInvFromID($id_order = NULL, $id_cart = NULL, $reference = NULL, $type = 'invoice', $sequence = 0)
    {
        $invorder = '';
        $invcart = '';
        $inv = '';

        if(!$id_order)
            $id_order = (int)$this->_getLastOrder();

        if($this->inv_orderid)
            $invorder = $id_order;
        if($this->inv_cartid)
            $invcart = $id_cart;

        if($invorder && !$invcart){
            $inv = $invorder;
        } elseif($invorder && $invcart){
            $inv = $invorder.$invcart;
        } elseif(!$invorder && $invcart){
            $inv = $invcart;
        } elseif(!$invorder && !$invcart){
            $inv = $reference;
        }

        if($this->inv_prefsign){
            if (strpos($this->inv_prefsign, '%') !== false) {
                $inv = strftime($this->inv_prefsign, time()).$inv;
            } else {
                $inv = $this->inv_prefsign.''.$inv;
            }
        }

        if($sequence)
            $inv = $inv.''.$sequence;

        $sequence++;

        // First find if an order reference with the defined Order ID already exists, if so repeat with sequence. Else return generated ref.
        switch($type){
            case 'invoice':
                if($result = Db::getInstance()->getValue('SELECT invoice_number FROM '._DB_PREFIX_.'orders WHERE invoice_number = \''.$inv.'\' ORDER BY id_order DESC'))
                    return $this->generateInvFromID($inv, $id_cart, $reference, $type, $sequence);
                else
                    return $inv;
            break;
            case 'slip':
                return $inv;
            break;
        }
    }

    public function hookactionBeforeAddOrder($params)
    {
        if (!$this->active)
            return false;

        if($this->ref_orderid OR $this->ref_cartid OR $this->ref_prefsign){
            $order_payment = new OrderPayment();
            $transaction_id = $order_payment->getByOrderReference($params['order']->reference);
            if($ref = $this->generateReferenceFromID($params['order']->id, $params['cart']->id, $params['order']->reference))
                $params['order']->reference = $ref;

            if(count($transaction_id)){
                foreach($transaction_id as $transaction){
                    $transaction->order_reference = $params['order']->reference;
                    $transaction->update();
                }
            }
            return $ref;
        } else {
            return false;
        }
    }

    public function hookactionBeforeAddOrderInvoice($params)
    {
        if (!$this->active)
            return false;

        if($this->inv_orderid OR $this->inv_cartid OR $this->inv_prefsign){
            if($ref = $this->generateInvFromID($params['order']->id, $params['cart']->id, $params['order_invoice']->number)){
                return $ref;
            } else {
                return false;
            }
        } else {
            return false;
        }
    }

    public function hookactionBeforeAddDeliveryNumber($params)
    {
        if (!$this->active)
            return false;

        if($this->inv_orderid OR $this->inv_cartid OR $this->inv_prefsign){
            if($ref = $this->generateInvFromID($params['order']->id, $params['cart']->id, $params['number'], 'slip')){
                return $ref;
            } else {
                return false;
            }
        } else {
            return false;
        }
    }

    /**
     * Uninstall overrides files for the module
     *
     * @return bool
     */
    public function uninstallOldOverrides()
    {
        if (!is_dir(_PS_MODULE_DIR_.$this->name.'/old_override/classes'))
            return true;

        $result = true;
        foreach (Tools::scandir(_PS_MODULE_DIR_.$this->name.'/old/classes', 'php', '', true) as $file)
        {
            $class = basename($file, '.php');
            if (Autoload::getInstance()->getClassPath($class.'Core'))
                $result &= $this->removeOldOverride($class);
        }
        return $result;
    }

    /**
     * Remove all methods in a module override from the override class
     *
     * @param string $classname
     * @return bool
     */
    public function removeOldOverride($classname)
    {
        $path = Autoload::getInstance()->getClassPath($classname.'Core');

        if (!Autoload::getInstance()->getClassPath($classname))
            return true;

        // Check if override file is writable
        $override_path = _PS_ROOT_DIR_.'/'.Autoload::getInstance()->getClassPath($classname);
        if (!is_writable($override_path))
            return false;

        // Get a uniq id for the class, because you can override a class (or remove the override) twice in the same session and we need to avoid redeclaration
        do $uniq = uniqid();
        while (class_exists($classname.'OverrideOriginal_remove', false));

        // Make a reflection of the override class and the module override class
        $override_file = file($override_path);
        eval(preg_replace(array('#^\s*<\?php#', '#class\s+'.$classname.'\s+extends\s+([a-z0-9_]+)(\s+implements\s+([a-z0-9_]+))?#i'), array('', 'class '.$classname.'OverrideOriginal_remove'.$uniq), implode('', $override_file)));
        $override_class = new ReflectionClass($classname.'OverrideOriginal_remove'.$uniq);

        $module_file = file($this->getLocalPath().'old/classes'.$path);
        eval(preg_replace(array('#^\s*<\?php#', '#class\s+'.$classname.'(\s+extends\s+([a-z0-9_]+)(\s+implements\s+([a-z0-9_]+))?)?#i'), array('', 'class '.$classname.'Override_remove'.$uniq), implode('', $module_file)));
        $module_class = new ReflectionClass($classname.'Override_remove'.$uniq);

        // Remove methods from override file
        $override_file = file($override_path);
        foreach ($module_class->getMethods() as $method)
        {
            if (!$override_class->hasMethod($method->getName()))
                continue;

            $method = $override_class->getMethod($method->getName());
            $length = $method->getEndLine() - $method->getStartLine() + 1;
            array_splice($override_file, $method->getStartLine() - 1, $length, array_pad(array(), $length, '#--remove--#'));
        }

        // Remove properties from override file
        foreach ($module_class->getProperties() as $property)
        {
            if (!$override_class->hasProperty($property->getName()))
                continue;

            // Remplacer la ligne de declaration par "remove"
            foreach ($override_file as $line_number => &$line_content)
                if (preg_match('/(public|private|protected|const)\s+(static\s+)?(\$)?'.$property->getName().'/i', $line_content))
                {
                    $line_content = '#--remove--#';
                    break;
                }
        }

        // Rewrite nice code
        $code = '';
        foreach ($override_file as $line)
        {
            if ($line == '#--remove--#')
                continue;

            $code .= $line;
        }
        file_put_contents($override_path, $code);

        return true;
    }
}