<?php
if (!defined('sugarEntry') || !sugarEntry) {
    die('Not A Valid Entry Point');
}
/**
 *
 * SugarCRM Community Edition is a customer relationship management program developed by
 * SugarCRM, Inc. Copyright (C) 2004-2013 SugarCRM Inc.
 *
 * SuiteCRM is an extension to SugarCRM Community Edition developed by SalesAgility Ltd.
 * Copyright (C) 2011 - 2018 SalesAgility Ltd.
 *
 * This program is free software; you can redistribute it and/or modify it under
 * the terms of the GNU Affero General Public License version 3 as published by the
 * Free Software Foundation with the addition of the following permission added
 * to Section 15 as permitted in Section 7(a): FOR ANY PART OF THE COVERED WORK
 * IN WHICH THE COPYRIGHT IS OWNED BY SUGARCRM, SUGARCRM DISCLAIMS THE WARRANTY
 * OF NON INFRINGEMENT OF THIRD PARTY RIGHTS.
 *
 * This program is distributed in the hope that it will be useful, but WITHOUT
 * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
 * FOR A PARTICULAR PURPOSE. See the GNU Affero General Public License for more
 * details.
 *
 * You should have received a copy of the GNU Affero General Public License along with
 * this program; if not, see http://www.gnu.org/licenses or write to the Free
 * Software Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA
 * 02110-1301 USA.
 *
 * You can contact SugarCRM, Inc. headquarters at 10050 North Wolfe Road,
 * SW2-130, Cupertino, CA 95014, USA. or at email address contact@sugarcrm.com.
 *
 * The interactive user interfaces in modified source and object code versions
 * of this program must display Appropriate Legal Notices, as required under
 * Section 5 of the GNU Affero General Public License version 3.
 *
 * In accordance with Section 7(b) of the GNU Affero General Public License version 3,
 * these Appropriate Legal Notices must retain the display of the "Powered by
 * SugarCRM" logo and "Supercharged by SuiteCRM" logo. If the display of the logos is not
 * reasonably feasible for technical reasons, the Appropriate Legal Notices must
 * display the words "Powered by SugarCRM" and "Supercharged by SuiteCRM".
 */


/**
 * Predefined logic hooks
 * after_ui_frame
 * after_ui_footer
 * after_save
 * before_save
 * before_retrieve
 * after_retrieve
 * process_record
 * before_delete
 * after_delete
 * before_restore
 * after_restore
 * server_roundtrip
 * before_logout
 * after_logout
 * before_login
 * after_login
 * login_failed
 * after_session_start
 * after_entry_point
 *
 * @api
 */
class LogicHook
{
    public $bean = null;

    public function __construct()
    {
    }

    /**
     * @deprecated deprecated since version 7.6, PHP4 Style Constructors are deprecated and will be remove in 7.8, please update your code, use __construct instead
     */
    public function LogicHook()
    {
        $deprecatedMessage = 'PHP4 Style Constructors are deprecated and will be remove in 7.8, please update your code';
        if (isset($GLOBALS['log'])) {
            $GLOBALS['log']->deprecated($deprecatedMessage);
        } else {
            trigger_error($deprecatedMessage, E_USER_DEPRECATED);
        }
        self::__construct();
    }


    /**
     * Static Function which returns and instance of LogicHook
     *
     * @return unknown
     */
    public static function initialize()
    {
        if (empty($GLOBALS['logic_hook'])) {
            $GLOBALS['logic_hook'] = new LogicHook();
        }
        return $GLOBALS['logic_hook'];
    }

    public function setBean($bean)
    {
        $this->bean = $bean;
        return $this;
    }

    protected $hook_map = array();
    protected $hookscan = array();

    public function getHooksMap()
    {
        return $this->hook_map;
    }

    public function getHooksList()
    {
        return $this->hookscan;
    }

    public function scanHooksDir($extpath)
    {
        if (is_dir($extpath)) {
            $dir = dir($extpath);
            while ($entry = $dir->read()) {
                if ($entry != '.' && $entry != '..' && strtolower(substr($entry, -4)) == ".php" && is_file($extpath.'/'.$entry)) {
                    unset($hook_array);
                    include($extpath.'/'.$entry);
                    if (!empty($hook_array)) {
                        foreach ($hook_array as $type => $hookg) {
                            foreach ($hookg as $index => $hook) {
                                $this->hookscan[$type][] = $hook;
                                $idx = count($this->hookscan[$type])-1;
                                $this->hook_map[$type][$idx] = array("file" => $extpath.'/'.$entry, "index" => $index);
                            }
                        }
                    }
                }
            }
        }
    }

    protected static $hooks = array();

    public static function refreshHooks()
    {
        self::$hooks = array();
    }

    public function loadHooks($module_dir)
    {
        $hook_array = array();
        if (!empty($module_dir)) {
            $custom = "custom/modules/$module_dir";
        } else {
            $custom = "custom/modules";
        }
        if (file_exists("$custom/logic_hooks.php")) {
            if (isset($GLOBALS['log'])) {
                $GLOBALS['log']->debug('Including module specific hook file for '.$custom);
            }
            include("$custom/logic_hooks.php");
        }
        if (empty($module_dir)) {
            $custom = "custom/application";
        }
        if (file_exists("$custom/Ext/LogicHooks/logichooks.ext.php")) {
            if (isset($GLOBALS['log'])) {
                $GLOBALS['log']->debug('Including Ext hook file for '.$custom);
            }
            include("$custom/Ext/LogicHooks/logichooks.ext.php");
        }
        return $hook_array;
    }

    public function getHooks($module_dir, $refresh = false)
    {
        if ($refresh || !isset(self::$hooks[$module_dir])) {
            self::$hooks[$module_dir] = $this->loadHooks($module_dir);
        }
        return self::$hooks[$module_dir];
    }

    /**
     * Provide a means for developers to create upgrade safe business logic hooks.
     * If the bean is null, then we assume this call was not made from a SugarBean Object and
     * therefore we do not pass it to the method call.
     *
     * @param string $module_dir
     * @param string $event
     * @param array $arguments
     * @param SugarBean $bean
     */
    public function call_custom_logic($module_dir, $event, $arguments = null)
    {
        // declare the hook array variable, it will be defined in the included file.
        $hook_array = null;
        if (isset($GLOBALS['log'])) {
            $GLOBALS['log']->debug("Hook called: $module_dir::$event");
        }
        if (!empty($module_dir)) {
            // This will load an array of the hooks to process
            $hooks = $this->getHooks($module_dir);
            if (!empty($hooks)) {
                $this->process_hooks($hooks, $event, $arguments);
            }
        }
        $hooks = $this->getHooks('');
        if (!empty($hooks)) {
            $this->process_hooks($hooks, $event, $arguments);
        }
    }

    /**
     * This is called from call_custom_logic and actually performs the action as defined in the
     * logic hook. If the bean is null, then we assume this call was not made from a SugarBean Object and
     * therefore we do not pass it to the method call.
     *
     * @param array $hook_array
     * @param string $event
     * @param array $arguments
     * @param SugarBean $bean
     */
    public function process_hooks($hook_array, $event, $arguments)
    {
        // Now iterate through the array for the appropriate hook
        if (!empty($hook_array[$event])) {

            // Apply sorting to the hooks using the sort index.
            // Hooks with matching sort indexes will be processed in no particular order.
            $sorted_indexes = array();
            foreach ($hook_array[$event] as $idx => $hook_details) {
                $order_idx = $hook_details[0];
                $sorted_indexes[$idx] = $order_idx;
            }
            asort($sorted_indexes);

            $process_order = array_keys($sorted_indexes);

            foreach ($process_order as $hook_index) {
                $hook_details = $hook_array[$event][$hook_index];
                if (!file_exists($hook_details[2])) {
                    if (isset($GLOBALS['log'])) {
                        $GLOBALS['log']->error('Unable to load custom logic file: '.$hook_details[2]);
                    }
                    continue;
                }
                include_once($hook_details[2]);
                $hook_class = $hook_details[3];
                $hook_function = $hook_details[4];

                // Make a static call to the function of the specified class
                //TODO Make a factory for these classes.  Cache instances accross uses
                if ($hook_class == $hook_function) {
                    if (isset($GLOBALS['log'])) {
                        $GLOBALS['log']->debug('Creating new instance of hook class '.$hook_class.' with parameters');
                    }
                    if (!is_null($this->bean)) {
                        $class = new $hook_class($this->bean, $event, $arguments);
                    } else {
                        $class = new $hook_class($event, $arguments);
                    }
                } else {
                    if (isset($GLOBALS['log'])) {
                        $GLOBALS['log']->debug('Creating new instance of hook class '.$hook_class.' without parameters');
                    }
                    $class = new $hook_class();
                    if (!is_null($this->bean)) {
                        $class->$hook_function($this->bean, $event, $arguments);
                    } else {
                        $class->$hook_function($event, $arguments);
                    }
                }
            }
        }
    }
}
