<?php
/**
 * Copyright 2012-2026 ShopeX (https://www.shopex.cn)
 *
 * Licensed under the Apache License, Version 2.0 (the "License");
 * you may not use this file except in compliance with the License.
 * You may obtain a copy of the License at
 *
 *     http://www.apache.org/licenses/LICENSE-2.0
 *
 * Unless required by applicable law or agreed to in writing, software
 * distributed under the License is distributed on an "AS IS" BASIS,
 * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
 * See the License for the specific language governing permissions and
 * limitations under the License.
 */


class app {

    static private $__instance     = array();
    static private $__language     = null;
    private        $__render       = null;
    private        $__router       = null;
    private        $__define       = null;
    private        $__taskrunner   = null;
    private        $__appConf      = array();
    private        $__checkVaryArr = array();
    private        $__appSetting   = array();
    private        $__langPack     = array();
    private        $__installed    = null;
    private        $__actived      = null;

    function __construct($app_id) {
        $this->app_id = $app_id;
        $this->app_dir = APP_DIR . '/' . $app_id;
        if (defined('APP_STATICS_HOST') && constant('APP_STATICS_HOST')) {
            $host_mirrors = preg_split('/[,;\s]+/', constant('APP_STATICS_HOST'));
            $host_url = $host_mirrors[array_rand($host_mirrors)];
            $this->res_url = $host_url . '/app/' . $app_id . '/statics';
            $this->res_full_url = $host_url . '/app/' . $app_id . '/statics';
            $this->lang_url = $host_url . '/app/' . $app_id . '/lang';
            $this->lang_full_url = $host_url . '/app/' . $app_id . '/lang';
        } else {
            $this->res_url = kernel::base_url() . '/app/' . $app_id . '/statics';
            $this->res_full_url = kernel::base_url(1) . '/app/' . $app_id . '/statics';
            $this->lang_url = kernel::base_url() . '/app/' . $app_id . '/lang';
            $this->lang_full_url = kernel::base_url(1) . '/app/' . $app_id . '/lang';
        }
        $this->res_dir = APP_DIR . '/' . $app_id . '/statics';
        $this->widgets_url = kernel::base_url() . '/app/' . $app_id . '/widgets';
        $this->widgets_full_url = kernel::base_url(1) . '/app/' . $app_id . '/widgets';
        $this->widgets_dir = APP_DIR . '/' . $app_id . '/widgets';
        $this->lang_dir = APP_DIR . '/' . $app_id . '/lang';
        $this->lang_resource = lang::get_res($app_id);  //todo: 得到语言包资源文件结构
    }
    static function cleanInstance() {
        self::$__instance = [];
    }
    /** @return app */
    static function get($app_id){
        if(!isset(self::$__instance[$app_id])){
            self::$__instance[$app_id] = new app($app_id);
        }

        return self::$__instance[$app_id];
    }

    public function _($key, $arg1 = null) {
        $args = func_get_args();
        array_shift($args);
        if (!isset($this->__langPack['language'][$key])) {
            $value = $this->lang('language', $key);
            $this->__langPack['language'][$key] = $value ? $value : $key;
        }
        if (count($args)) {
            array_unshift($args, $this->__langPack['language'][$key]);

            return call_user_func_array("sprintf", $args);
        } else {
            return $this->__langPack['language'][$key];
        }
    }//End Function

    public function lang($res = null, $key = null) {
        return lang::get_info($this->app_id, $res, $key);     //取得语言包数据
    }//End Function

    /**
     * @return base_render
     */
    public function render() {
        if (!$this->__render) {
            $this->__render = new base_render($this);
        }

        return $this->__render;
    }

    public function controller($controller) {
        return kernel::single($this->app_id . '_ctl_' . $controller, $this);
    }

    public function model($model) {
        return kernel::single($this->app_id . '_mdl_' . $model, $this);
    }

    /**
     * @return base_router
     */
    public function router() {
        if (!$this->__router) {
            if (file_exists($this->app_dir . '/lib/router.php')) {
                $class_name = $this->app_id . '_router';
                $this->__router = new $class_name($this);
            } else {
                $this->__router = new base_router($this);
            }
        }

        return $this->__router;
    }

    public function base_url($full = false) {
        $c = $full ? 'full' : 'part';
        if (!$this->base_url[$c]) {
            $part = kernel::$app_url_map[$this->app_id];
            $this->base_url[$c] = kernel::base_url($full) . kernel::url_prefix() . $part . ($part == '/' ? '' : '/');
        }

        return $this->base_url[$c];
    }

    public function get_parent_model_class() {
        $parent_model_class = $this->define('parent_model_class');

        return $parent_model_class ? $parent_model_class : 'base_db_model';
    }

    /**
     * define
     * @param mixed $path path
     * @return mixed 返回值
     */
    public function define($path = null) {
        if (!$this->__define) {
            if (is_dir($this->app_dir) && file_exists($this->app_dir . '/app.xml')) {
                $tags = array();
                $xml_content = file_get_contents($this->app_dir . '/app.xml');
                $this->__define = kernel::single('base_xml')->xml2array($xml_content, 'base_app');
            } else {
                $row = app::get('base')->model('apps')->getList('remote_config', array('app_id' => $this->app_id));
                $this->__define = $row[0]['remote_config'];
            }
        }
        if ($path) {
            return eval('return $this->__define["' . str_replace('/', '][', $path) . '"];');
        } else {
            return $this->__define;
        }
    }

    /**
     * 获取Conf
     * @param mixed $key key
     * @return mixed 返回结果
     */
    public function getConf($key) {
        if (!isset($this->__appConf[$key])) {
            if (base_kvstore::instance('setting/' . $this->app_id)->fetch($key, $val) === false) {
                if (!isset($this->__appSetting[$this->app_dir])) {
                    if (defined('CUSTOM_CORE_DIR') && file_exists(CUSTOM_CORE_DIR . '/' . $this->app->app_id . '/setting.php')) {
                        $setingDir = CUSTOM_CORE_DIR . '/' . $this->app->app_id . '/setting.php';
                    } else {
                        $setingDir = $this->app_dir . '/setting.php';
                    }
                    if (@include($setingDir)) {
                        $this->__appSetting[$this->app_dir] = $setting;
                    } else {
                        $this->__appSetting[$this->app_dir] = false;
                    }
                }
                if ($this->__appSetting[$this->app_dir] && isset($this->__appSetting[$this->app_dir][$key]['default'])) {
                    $val = $this->__appSetting[$this->app_dir][$key]['default'];
                    $this->setConf($key, $val);
                } else {
                    return null;
                }
            }
            $this->__appConf[$key] = $val;
        }//todo: 缓存已经取到的conf，当前PHP进程有效
        if (cachemgr::enable() && cachemgr::check_current_co_depth() > 0) {
            $this->check_expires($key, true);
        }//todo：如果存在缓存检查，进行conf检查
        return $this->__appConf[$key];
    }

    /**
     * 设置Conf
     * @param mixed $key key
     * @param mixed $value value
     * @return mixed 返回操作结果
     */
    public function setConf($key, $value) {
        if (base_kvstore::instance('setting/' . $this->app_id)->store($key, $value)) {
            $this->__appConf[$key] = $value;    //todo：更新当前进程缓存
            $this->set_modified($key);

            return true;
        } else {
            return false;
        }
    }

    /**
     * 设置_modified
     * @param mixed $key key
     * @return mixed 返回操作结果
     */
    public function set_modified($key) {
        return;
        $vary_name = strtoupper(md5($this->app_id . $key));
        $now = time();
        $db = kernel::database();
        $db->exec('REPLACE INTO sdb_base_cache_expires (`type`, `name`, `app`, `expire`) VALUES ("CONF", "' . $vary_name . '", "' . $this->app_id . '", ' . $now . ')', true);
        if ($db->affect_row()) {
            cachemgr::set_modified('CONF', $vary_name, $now);
        }
    }//End Function

    /**
     * 检查_expires
     * @param mixed $key key
     * @param mixed $force force
     * @return mixed 返回验证结果
     */
    public function check_expires($key, $force = false) {
        if ($force || (cachemgr::enable() && cachemgr::check_current_co_depth() > 0)) {
            if (!isset($this->__checkVaryArr[$key])) {
                $this->__checkVaryArr[$key] = strtoupper(md5($this->app_id . $key));
            }
            if (!cachemgr::check_current_co_objects_exists('CONF', $this->__checkVaryArr[$key])) {
                cachemgr::check_expires('CONF', $this->__checkVaryArr[$key]);
            }
        }
    }//End Function

    function runtask($method, $option = null) {
        if ($this->__taskrunner === null) {
            $this->__taskrunner = false;
            if (defined('CUSTOM_CORE_DIR') && file_exists(CUSTOM_CORE_DIR . '/' . $this->app_id . '/task.php')) {
                $taskDir = CUSTOM_CORE_DIR . '/' . $this->app_id . '/task.php';
            } else {
                $taskDir = $this->app_dir . '/task.php';
            }
            if (file_exists($taskDir)) {
                $traitDir = TRAIT_DIR . '/' . $this->app_id . '/task.php';
                if(file_exists($traitDir)) {
                    require_once $traitDir;
                }
                require($taskDir);
                $class_name = $this->app_id . '_task';
                if (class_exists($class_name)) {
                    $this->__taskrunner = new $class_name($this);
                }
            }
        }
        if (is_object($this->__taskrunner) && method_exists($this->__taskrunner, $method)) {
            return $this->__taskrunner->$method($option);
        } else {
            return true;
        }
    }

    function status() {
        if (kernel::is_online()) {
            if ($this->app_id == 'base') {
                if (!kernel::database()->select('SHOW TABLES LIKE "' . kernel::database()->prefix . 'base_apps"')) {
                    return 'uninstalled';
                }
            }
            $row = @kernel::database()->selectrow('select status from sdb_base_apps where app_id="' . $this->app_id . '"');

            return $row ? $row['status'] : 'uninstalled';
        } else {
            return 'uninstalled';
        }
    }

    function is_installed() {
        if (is_null($this->__installed)) {
            $this->__installed = ($this->status() != 'uninstalled') ? true : false;
        }

        return $this->__installed;
    }//End Function

    function is_actived() {
        if (is_null($this->__actived)) {
            $this->__actived = ($this->status() == 'active') ? true : false;
        }

        return $this->__actived;
    }//End Function

    function remote($node_id) {
        return new base_rpc_caller($this, $node_id);
    }

    function matrix($node_id = 1, $version = 1) {
        return new base_rpc_caller($this, $node_id, $version);
    }

    function docs($dir = null) {
        $docs = array();
        if (!$dir) {
            $dir = $this->app_dir . '/docs';
        }
        if (is_dir($dir)) {
            if ($dh = opendir($dir)) {
                while (($file = readdir($dh)) !== false) {
                    if ($file[0] != '.' && isset($file[5]) && substr($file, -4, 4) == '.t2t' && is_file($dir . '/' . $file)) {
                        $rs = fopen($dir . '/' . $file, 'r');
                        $docs[$file] = fgets($rs, 1024);
                        fclose($rs);
                    }
                }
                closedir($dh);
            }
        }

        return $docs;
    }

}