<?php

namespace app\admin\controller;

use Service\ResourcesService;

/**
 * 支付方式管理
 * @author   Devil
 * @blog     http://gong.gg/
 * @version  0.0.1
 * @datetime 2016-12-01T21:51:08+0800
 */
class Payment extends Common
{
    private $payment_dir;
    private $payment_business_type_all;
    private $cannot_deleted_list;

	/**
	 * 构造方法
	 * @author   Devil
	 * @blog     http://gong.gg/
	 * @version  0.0.1
	 * @datetime 2016-12-03T12:39:08+0800
	 */
	public function __construct()
	{
		// 调用父类前置方法
		parent::__construct();

		// 登录校验
		$this->Is_Login();

		// 权限校验
		$this->Is_Power();

        // 插件目录
        $this->payment_dir = APP_PATH.'Library'.DS.'Payment'.DS;

        // 支付业务类型
        $this->payment_business_type_all = config('payment_business_type_all');

        // 不删除的支付方式
        $this->cannot_deleted_list = ['DeliveryPayment', 'CashPayment'];
	}

	/**
     * [Index 支付方式列表]
     * @author   Devil
     * @blog     http://gong.gg/
     * @version  0.0.1
     * @datetime 2016-12-06T21:31:53+0800
     */
	public function Index()
	{
        $this->assign('list', $this->GetPaymentList());
        $this->assign('cannot_deleted_list', $this->cannot_deleted_list);
        $this->display('Index');
	}

    /**
     * 获取支付插件列表
     * @author   Devil
     * @blog    http://gong.gg/
     * @version 1.0.0
     * @date    2018-09-17
     * @desc    description
     */
    private function GetPaymentList()
    {
        $data = [];
        if(is_dir($this->payment_dir))
        {
            if($dh = opendir($this->payment_dir))
            {
                while(($temp_file = readdir($dh)) !== false)
                {
                    if(substr($temp_file, 0, 1) != '.')
                    {
                        // 获取模块配置信息
                        $payment = htmlentities(str_replace('.class.php', '', $temp_file));
                        $config = $this->GetPaymentConfig($payment);
                        if($config !== false)
                        {
                            // 数据组装
                            $temp = $this->DataAnalysis($config);
                            $temp['id'] = date('YmdHis').GetNumberCode(8);
                            $temp['payment'] = $payment;

                            // 获取数据库配置信息
                            $db_config = ResourcesService::PaymentList(['where'=>['payment'=>$payment]]);
                            if(!empty($db_config[0]))
                            {
                                $temp['is_install'] = 1;
                                $temp['id'] = $db_config[0]['id'];
                                $temp['name'] = $db_config[0]['name'];
                                $temp['logo'] = $db_config[0]['logo'];
                                $temp['apply_terminal'] = $db_config[0]['apply_terminal'];
                                $temp['config'] = $db_config[0]['config'];
                                $temp['is_enable'] = $db_config[0]['is_enable'];
                                $temp['is_open_user'] = $db_config[0]['is_open_user'];
                            }
                            $data[] = $temp;
                        }
                    }
                }
                closedir($dh);
            }
        }
        return $data;
    }

    /**
     * 数据解析
     * @author   Devil
     * @blog    http://gong.gg/
     * @version 1.0.0
     * @date    2018-09-17
     * @desc    description
     * @param   [array]          $data [插件配置信息]
     */
    private function DataAnalysis($data)
    {
        return [
            'name'          => isset($data['base']['name']) ? htmlentities($data['base']['name']) : $payment,
            'version'       => isset($data['base']['version']) ? htmlentities($data['base']['version']) : '',
            'apply_version' => isset($data['base']['apply_version']) ? htmlentities($data['base']['apply_version']) : '',
            'desc'          => isset($data['base']['desc']) ? $data['base']['desc'] : '',
            'author'        => isset($data['base']['author']) ? htmlentities($data['base']['author']) : '',
            'author_url'    => isset($data['base']['author_url']) ? htmlentities($data['base']['author_url']) : '',
            'element'       => isset($data['element']) ? $data['element'] : [],

            'logo'          => '',
            'is_enable'     => 0,
            'is_open_user'  => 0,
            'is_install'    => 0,
            'apply_terminal'=> array_column(lang('common_platform_type'), 'value'),
            'config'        => '',
        ];
    }

    /**
     * 获取支付模块配置信息
     * @author   Devil
     * @blog    http://gong.gg/
     * @version 1.0.0
     * @date    2018-09-17
     * @desc    description
     * @param   [string]          $payment [模块名称]
     */
    private function GetPaymentConfig($payment)
    {
        $payment = '\base\Payment\\'.$payment;
        if(class_exists($payment))
        {
            $obj = new $payment();
            if(method_exists($obj, 'Config') && method_exists($obj, 'Pay') && method_exists($obj, 'Respond'))
            {
                return $obj->Config();
            }
        }
        return false;
    }

    /**
     * [SaveInfo 添加/编辑页面]
     * @author   Devil
     * @blog     http://gong.gg/
     * @version  0.0.1
     * @datetime 2016-12-14T21:37:02+0800
     */
    public function SaveInfo()
    {
        // 轮播图片信息
        $data = empty($_REQUEST['id']) ? array() : db('Payment')->find(I('id'));
        $data['apply_terminal'] = empty($data['apply_terminal']) ? [] : json_decode($data['apply_terminal'], true);
        $data['element'] = empty($data['element']) ? [] : json_decode($data['element'], true);
        $data['config'] = empty($data['config']) ? [] : json_decode($data['config'], true);
        //print_r($data['config']);
        $this->assign('data', $data);

        // 适用平台
        $this->assign('common_platform_type', lang('common_platform_type'));

        // 参数
        $this->assign('param', array_merge($_POST, $_GET));

        $this->display('SaveInfo');
    }

	/**
	 * [Save 支付方式保存]
	 * @author   Devil
	 * @blog     http://gong.gg/
	 * @version  0.0.1
	 * @datetime 2016-12-25T22:36:12+0800
	 */
	public function Save()
	{
		// 是否ajax请求
		if(!IS_AJAX)
		{
			$this->error('非法访问');
		}

		// 图片
        $this->FileSave('logo', 'file_logo', 'payment');

		// id为空则表示是新增
		$m = D('Payment');

		// 公共额外数据处理
		$_POST['is_enable'] = intval(I('is_enable', 0));
        $_POST['is_open_user'] = intval(I('is_open_user', 0));

		// 编辑
		if($m->create($_POST, 2))
		{
			// 额外数据处理
			$m->upd_time 			= time();
			$m->apply_terminal 	    = empty($_POST['apply_terminal']) ? '' : json_encode(explode(',', I('apply_terminal')));
			$m->name 				= I('name');
            $m->sort                = intval(I('sort'));

            // 插件配置信息处理
            $m->config = json_encode($this->GetPlugConfig());

			// 移除 id
			unset($m->id);

			// 更新数据库
			if($m->where(array('id'=>I('id')))->save())
			{
				$this->ajaxReturn('编辑成功');
			} else {
				$this->ajaxReturn('编辑失败或数据未改变', -100);
			}
		} else {
            $this->ajaxReturn($m->getError(), -1);
        }
	}

    /**
     * @author   Devil
     * @blog    http://gong.gg/
     * @version 1.0.0
     * @date    2018-09-18
     * @desc    description
     */
    private function GetPlugConfig()
    {
        $data = [];
        foreach($_POST as $k=>$v)
        {
            if(substr($k, 0, 8) == 'plugins_')
            {
                $data[substr($k, 8)] = $v;
            }
        }
        return $data;
    }

	/**
     * [StatusUpdate 状态更新]
     * @author   Devil
     * @blog     http://gong.gg/
     * @version  0.0.1
     * @datetime 2017-01-12T22:23:06+0800
     */
    public function StatusUpdate()
    {
        if(!IS_AJAX)
        {
            $this->error('非法访问');
        }

        // 参数
        if(empty($_POST['id']) || !isset($_POST['state']))
        {
            $this->ajaxReturn('参数错误', -1);
        }
        $field = I('field', 'is_enable');

        // 数据更新
        if(db('Payment')->where(array('payment'=>I('id')))->save(array($field=>I('state'))))
        {
            $this->ajaxReturn('编辑成功');
        } else {
            $this->ajaxReturn('编辑失败或数据未改变', -100);
        }
    }

    /**
     * [PowerCheck 权限校验]
     * @author   Devil
     * @blog     http://gong.gg/
     * @version  1.0.0
     * @datetime 2018-09-29T00:01:49+0800
     */
    private function PowerCheck()
    {
        // 主目录权限
        if(!is_writable(ROOT_PATH))
        {
            $this->ajaxReturn('服务器用户没操作权限'.'['.ROOT_PATH.']', -3);
        }

        // 插件权限
        if(!is_writable($this->payment_dir))
        {
            $this->ajaxReturn('服务器用户没操作权限'.'['.$this->payment_dir.']', -3);
        }
    }

    /**
     * 安装
     * @author   Devil
     * @blog    http://gong.gg/
     * @version 1.0.0
     * @date    2018-09-17
     * @desc    description
     */
    public function Install()
    {
        if(!IS_AJAX)
        {
            $this->error('非法访问');
        }

        // 权限
        $this->PowerCheck();

        // 参数
        if(empty($_POST['id']))
        {
            $this->ajaxReturn('参数错误', -1);
        }

        // 数据处理
        $payment = I('id');
        $config = $this->GetPaymentConfig($payment);
        if($config !== false)
        {
            $data = $this->DataAnalysis($config);
            $data['payment'] = $payment;
            $data['element'] = empty($data['element']) ? '' : json_encode($data['element']);
            $data['apply_terminal'] = empty($data['apply_terminal']) ? '' : json_encode($data['apply_terminal']);
            $data['add_time'] = time();

            // 开始安装
            $m = D('Payment');
            if($m->create($data, 1))
            {
                if($m->add($data))
                {
                    // 入口文件生成
                    $this->PaymentEntranceCreated($payment);

                    $this->ajaxReturn('安装成功');
                } else {
                    $this->ajaxReturn('安装失败', -100);
                }
            } else {
                $this->ajaxReturn($m->getError(), -1);
            }
        } else {
            $this->ajaxReturn('插件配置有误', -10);
        }
    }

    /**
     * 卸载
     * @author   Devil
     * @blog    http://gong.gg/
     * @version 1.0.0
     * @date    2018-09-17
     * @desc    description
     */
    public function Uninstall()
    {
        if(!IS_AJAX)
        {
            $this->error('非法访问');
        }

        // 参数
        if(empty($_POST['id']))
        {
            $this->ajaxReturn('参数错误', -1);
        }

        // 开始卸载
        $payment = I('id');
        if(db('Payment')->where(['payment'=>$payment])->delete())
        {
            // 删除入口文件
            $this->PaymentEntranceDelete($payment);

            $this->ajaxReturn('卸载成功');
        } else {
            $this->ajaxReturn('卸载失败', -100);
        }
    }

    /**
     * 删除插件
     * @author   Devil
     * @blog    http://gong.gg/
     * @version 1.0.0
     * @date    2018-09-17
     * @desc    description
     */
    public function Delete()
    {
        if(!IS_AJAX)
        {
            $this->error('非法访问');
        }

        // 权限
        $this->PowerCheck();

        // 参数
        if(empty($_POST['id']))
        {
            $this->ajaxReturn('参数错误', -1);
        }

        // 是否禁止删除
        $payment = I('id');
        if(in_array($payment, $this->cannot_deleted_list))
        {
            $this->ajaxReturn('该支付方式禁止删除', -10);
        }

        // 是否存在
        $file = $this->payment_dir.$payment.'.class.php';
        if(!file_exists($file))
        {
            $this->ajaxReturn('资源不存在或已被删除', -2);
        }
        // 权限
        if(!is_writable($file))
        {
            $this->ajaxReturn('服务器用户没操作权限', -3);
        }

        // 删除
        if(!@unlink($file))
        {
            $this->ajaxReturn('删除失败或资源不存在', -100);
        }

        // 删除入口文件
        $this->PaymentEntranceDelete($payment);

        $this->ajaxReturn('删除成功');
    }

    /**
     * 上传插件
     * @author   Devil
     * @blog    http://gong.gg/
     * @version 1.0.0
     * @date    2018-09-17
     * @desc    description
     */
    public function Upload()
    {
        // 是否ajax
        if(!IS_AJAX)
        {
            $this->error('非法访问');
        }

        // 权限
        $this->PowerCheck();

        // 文件上传校验
        $error = FileUploadError('file');
        if($error !== true)
        {
            $this->ajaxReturn($error, -1);
        }

        // 文件格式化校验
        $type = array('text/php');
        if(!in_array($_FILES['file']['type'], $type))
        {
            $this->ajaxReturn('文件格式有误，必须php文件', -2);
        }

        // 是否已有存在插件
        if(file_exists($this->payment_dir.$_FILES['file']['name']))
        {
            $this->ajaxReturn('已存在相同插件', -3);
        }

        // 存储文件
        if(!move_uploaded_file($_FILES['file']['tmp_name'], $this->payment_dir.$_FILES['file']['name']))
        {
            $this->ajaxReturn('上传失败', -100);
        }

        // 文件校验
        $payment = htmlentities(str_replace('.class.php', '', $_FILES['file']['name']));
        $config = $this->GetPaymentConfig($payment);
        if($config === false)
        {
            @unlink($this->payment_dir.$_FILES['file']['name']);
            $this->ajaxReturn('插件编写有误，请参考文档编写', -10);
        }
        $this->ajaxReturn('上传成功');
    }

    /**
     * [PaymentEntranceCreated 入口文件创建]
     * @author   Devil
     * @blog     http://gong.gg/
     * @version  1.0.0
     * @datetime 2018-09-28T23:38:52+0800
     * @param    [string]        $payment [支付唯一标记]
     */
    private function PaymentEntranceCreated($payment)
    {
        // 批量创建
        foreach($this->payment_business_type_all as $v)
        {
// 异步
$notify=<<<php
<?php

/**
 * {$v['desc']}支付异步入口
 */

// 默认绑定模块
\$_GET['m'] = 'Api';
\$_GET['c'] = '{$v['name']}Notify';
\$_GET['a'] = 'Notify';

// 支付模块标记
define('PAYMENT_TYPE', '{$payment}');

// 引入公共入口文件
require './core.php';

// 引入ThinkPHP入口文件
require './ThinkPHP/ThinkPHP.php';

?>
php;

// 同步
$respond=<<<php
<?php

/**
 * {$v['desc']}支付同步入口
 */

// 默认绑定模块
\$_GET['m'] = 'Home';
\$_GET['c'] = '{$v['name']}';
\$_GET['a'] = 'Respond';

// 支付模块标记
define('PAYMENT_TYPE', '{$payment}');

// 引入公共入口文件
require './core.php';

// 引入ThinkPHP入口文件
require './ThinkPHP/ThinkPHP.php';

?>
php;
            $name = strtolower($v['name']);
            @file_put_contents(ROOT_PATH.'payment_'.$name.'_'.strtolower($payment).'_respond.php', $respond);

            // 线下支付不生成异步入口文件
            if(!in_array($payment, config('under_line_list')))
            {
                @file_put_contents(ROOT_PATH.'payment_'.$name.'_'.strtolower($payment).'_notify.php', $notify);
            }
        }
    }

    /**
     * [PaymentEntranceDelete 入口文件删除]
     * @author   Devil
     * @blog     http://gong.gg/
     * @version  1.0.0
     * @datetime 2018-09-28T23:38:52+0800
     * @param    [string]        $payment [支付唯一标记]
     */
    private function PaymentEntranceDelete($payment)
    {
        $payment = strtolower($payment);
        foreach($this->payment_business_type_all as $v)
        {
            $name = strtolower($v['name']);
            if(file_exists(ROOT_PATH.'payment_'.$name.'_'.$payment.'_notify.php'))
            {
                @unlink(ROOT_PATH.'payment_'.$name.'_'.$payment.'_notify.php');
            }
            if(file_exists(ROOT_PATH.'payment_'.$name.'_'.$payment.'_respond.php'))
            {
                @unlink(ROOT_PATH.'payment_'.$name.'_'.$payment.'_respond.php');
            }
        }
    }
}
?>