<?php
/**
 * Niushop商城系统 - 团队十年电商经验汇集巨献!
 * =========================================================
 * Copy right 2019-2029 山西牛酷信息科技有限公司, 保留所有权利。
 * ----------------------------------------------
 * 官方网址: https://www.niushop.com.cn
 * 这不是一个自由软件！您只能在不用于商业目的的前提下对程序代码进行修改和使用。
 * 任何企业和个人不允许对程序代码以任何形式任何目的再发布。
 * =========================================================
 */
namespace app\admin\controller;

use app\Controller;
use app\model\upload\Upload as UploadModel;

/**
 * 百度编辑器上传
 */
class Ueditor extends Controller {
    public function index(){
        date_default_timezone_set("Asia/chongqing");
        error_reporting(E_ERROR);
        header("Content-Type: text/html; charset=utf-8");
    
        $CONFIG = json_decode(preg_replace("/\/\*[\s\S]+?\*\//", "", file_get_contents("./public/static/ext/ueditor/php/config.json")), true);
        $action = $_GET['action'];
    
        switch ($action) {
            case 'config':
                $result =  json_encode($CONFIG);
                break;
                /* 上传图片 */
            case 'uploadimage':
                $fieldName = $CONFIG['imageFieldName'];
                $result = $this->upImage($fieldName);
                break;
                /* 上传涂鸦 */
            case 'uploadscrawl':
                $config = array(
                "pathFormat" => $CONFIG['scrawlPathFormat'],
                "maxSize" => $CONFIG['scrawlMaxSize'],
                "allowFiles" => $CONFIG['scrawlAllowFiles'],
                "oriName" => "scrawl.png"
                    );
                    $fieldName = $CONFIG['scrawlFieldName'];
                    $base64 = "base64";
                    $result = $this->upBase64($config,$fieldName);
                    break;
                    /* 上传视频 */
            case 'uploadvideo':
                $fieldName = $CONFIG['videoFieldName'];
                $result = $this->upVideo($fieldName, $CONFIG['videoMaxSize']);
                break;
                /* 上传文件 */
            case 'uploadfile':
                $fieldName = $CONFIG['fileFieldName'];
                $result = $this->upFile($fieldName);
                break;
                /* 列出图片 */
            case 'listimage':
                $allowFiles = $CONFIG['imageManagerAllowFiles'];
                $listSize = $CONFIG['imageManagerListSize'];
                $path = $CONFIG['imageManagerListPath'];
                $get =$_GET;
                $result =$this->fileList($allowFiles,$listSize,$get);
                break;
                /* 列出文件 */
            case 'listfile':
                $allowFiles = $CONFIG['fileManagerAllowFiles'];
                $listSize = $CONFIG['fileManagerListSize'];
                $path = $CONFIG['fileManagerListPath'];
                $get = $_GET;
                $result = $this->fileList($allowFiles,$listSize,$get);
                break;
                /* 抓取远程文件 */
            case 'catchimage':
                $config = array(
                "pathFormat" => $CONFIG['catcherPathFormat'],
                "maxSize" => $CONFIG['catcherMaxSize'],
                "allowFiles" => $CONFIG['catcherAllowFiles'],
                "oriName" => "remote.png"
                    );
                    $fieldName = $CONFIG['catcherFieldName'];
                    /* 抓取远程图片 */
                    $list = array();
                    isset($_POST[$fieldName]) ? $source = $_POST[$fieldName] : $source = $_GET[$fieldName];
    
                    foreach($source as $imgUrl){
                        $info = json_decode($this->saveRemote($config,$imgUrl),true);
                        array_push($list, array(
                            "state" => $info["state"],
                            "url" => $info["url"],
                            "size" => $info["size"],
                            "title" => htmlspecialchars($info["title"]),
                            "original" => htmlspecialchars($info["original"]),
                            "source" => htmlspecialchars($imgUrl)
                        ));
                    }
    
                    $result = json_encode(array(
                        'state' => count($list) ? 'SUCCESS':'ERROR',
                        'list' => $list
                    ));
                    break;
            default:
                $result = json_encode(array(
                'state' => '请求地址出错'
                    ));
                    break;
        }
    
        /* 输出结果 */
        if(isset($_GET["callback"])){
            if(preg_match("/^[\w_]+$/", $_GET["callback"])){
                echo htmlspecialchars($_GET["callback"]).'('.$result.')';
            }else{
                echo json_encode(array(
                    'state' => 'callback参数不合法'
                ));
            }
        }else{
            echo $result;
        }
    }
    
    /**
     * 上传文件
     * @param unknown $fieldName
     */
    private function upFile($fieldName){
        $upload_service = new Upload();
        $upload_path = 'ueditor/file/'.date('Ymd');
        if(!empty($_FILES[$fieldName])){//上传成功
            $info = $upload_service->file($_FILES[$fieldName], $upload_path);
            if($info['code'] > 0){
                $data=array(
                    'state' => 'SUCCESS',
                    'url' => $info['data']['path'],
                    'title' => $info['data']['file_name'],
                    'original' => $info['data']['file_name'],
                    'type' => '.' . $info['data']['file_ext'],
                    'size' => $info['data']['size']
                );                
            }else{
                $data = array(
                    'state' => $info['message']
                );
            }	
        }else{
            $data = array(
                'state' => '上传文件为空',
            );
        }
        return json_encode($data);
    }
    
    /**
     * 上传图片
     * @param unknown $fieldName
     * @return string
     */
    private function upImage($fieldName){
        $upload_service = new UploadModel();
        $upload_path = 'ueditor/image/'.date('Ymd');
        if(!empty($_FILES[$fieldName])){//上传成功
            $info = $upload_service->setPath("common/images/".date("Ymd"). '/')->image([
                'name' => $fieldName,
                'thumb_type' => ''
            ]);
            if($info['code'] >= 0){
                $data=array(
                    'state' => 'SUCCESS',
                    'url' => $info['data']['pic_path'],
                    'title' => $info['data']['pic_name'],
                    'original' => $info['data']['pic_name'],
                    'type' => '.' . $info['data']['file_ext'],
                );
            }else{
                $data = array(
                    'state' => $info['message']
                );
            }
        }else{
            $data = array(
                'state' => '上传文件为空',
            );
        }
        return json_encode($data);
    }
    
    /**
     * 上传视频
     * @param unknown $fieldName
     */
    private function upVideo($fieldName, $size){
        $upload_service = new Upload();
        $upload_path = 'ueditor/video/'.date('Ymd');
        if(!empty($_FILES[$fieldName])){//上传成功
            $info = $upload_service->video($_FILES[$fieldName], $upload_path, $size);
            if($info['code'] > 0){
                $data=array(
                    'state' => 'SUCCESS',
                    'url' => $info['data']['path'],
                    'title' => $info['data']['file_name'],
                    'original' => $info['data']['file_name'],
                    'type' => '.' . $info['data']['file_ext'],
                    'size' => $info['data']['size']
                );
            }else{
                $data = array(
                    'state' => $info['message']
                );
            }
        }else{
            $data = array(
                'state' => '上传文件为空',
            );
        }
        return json_encode($data);
    }
    
    //列出图片
    private function fileList($allowFiles,$listSize,$get){
        $dirname = UPLOAD . '/ueditor/';
        $allowFiles = substr(str_replace(".","|",join("",$allowFiles)),1);
    
        /* 获取参数 */
        $size = isset($get['size']) ? htmlspecialchars($get['size']) : $listSize;
        $start = isset($get['start']) ? htmlspecialchars($get['start']) : 0;
        $end = $start + $size;
    
        /* 获取文件列表 */
        $path = $dirname;
        $files = $this->getFiles($path,$allowFiles);
        if(!count($files)){
            return json_encode(array(
                "state" => "no match file",
                "list" => array(),
                "start" => $start,
                "total" => count($files)
            ));
        }
    
        /* 获取指定范围的列表 */
        $len = count($files);
        for($i = min($end, $len) - 1, $list = array(); $i < $len && $i >= 0 && $i >= $start; $i--){
            $list[] = $files[$i];
        }
    
        /* 返回数据 */
        $result = json_encode(array(
            "state" => "SUCCESS",
            "list" => $list,
            "start" => $start,
            "total" => count($files)
        ));
    
        return $result;
    }
    
    /*
     * 遍历获取目录下的指定类型的文件
     * @param $path
     * @param array $files
     * @return array
     */
    private function getFiles($path,$allowFiles,&$files = array()){
        if(!is_dir($path)) return null;
        if(substr($path,strlen($path)-1) != '/') $path .= '/';
        $handle = opendir($path);
        	
        while(false !== ($file = readdir($handle))){
            if($file != '.' && $file != '..'){
                $path2 = $path.$file;
                if(is_dir($path2)){
                    $this->getFiles($path2,$allowFiles,$files);
                }else{
                    if(preg_match("/\.(".$allowFiles.")$/i",$file)){
                        $files[] = array(
                            'url' => $path2, //substr($path2,1),
                            'mtime' => filemtime($path2)
                        );
                    }
                }
            }
        }
    
        return $files;
    }
    
    //抓取远程图片
    private function saveRemote($config,$fieldName){
        $imgUrl = htmlspecialchars($fieldName);
        $imgUrl = str_replace("&amp;","&",$imgUrl);
    
        //http开头验证
        if(strpos($imgUrl,"http") !== 0){
            $data=array(
                'state' => '链接不是http链接',
            );
            return json_encode($data);
        }
        //获取请求头并检测死链
        $heads = get_headers($imgUrl);
        if(!(stristr($heads[0],"200") && stristr($heads[0],"OK"))){
            $data=array(
                'state' => '链接不可用',
            );
            return json_encode($data);
        }
        //格式验证(扩展名验证和Content-Type验证)
        $fileType = strtolower(strrchr($imgUrl,'.'));
        if(!in_array($fileType,$config['allowFiles']) || stristr($heads['Content-Type'],"image")){
            $data=array(
                'state' => '链接contentType不正确',
            );
            return json_encode($data);
        }
    
        //打开输出缓冲区并获取远程图片
        ob_start();
        $context = stream_context_create(
            array('http' => array(
                'follow_location' => false // don't follow redirects
            ))
        );
        readfile($imgUrl,false,$context);
        $img = ob_get_contents();
        ob_end_clean();
        preg_match("/[\/]([^\/]*)[\.]?[^\.\/]*$/",$imgUrl,$m);
    
        $dirname = UPLOAD . '/ueditor/image/'.date('Ymd');
        $file['oriName'] = $m ? $m[1] : "";
        $file['filesize'] = strlen($img);
        $file['ext'] = strtolower(strrchr($config['oriName'],'.'));
        $file['name'] = uniqid().$file['ext'];
        $file['fullName'] = $dirname.'/'.$file['name'];
        $fullName = $file['fullName'];
    
        //检查文件大小是否超出限制
        if($file['filesize'] >= ($config["maxSize"])){
  		    $data=array(
  		        'state' => '文件大小超出网站限制',
  		    );
  		    return json_encode($data);
        }
    
        //创建目录失败
        if(!file_exists($dirname) && !mkdir($dirname,0777,true)){
  		    $data=array(
  		        'state' => '目录创建失败',
  		    );
  		    return json_encode($data);
        }else if(!is_writeable($dirname)){
  		    $data=array(
  		        'state' => '目录没有写权限',
  		    );
  		    return json_encode($data);
        }
    
        //移动文件
        if(!(file_put_contents($fullName, $img) && file_exists($fullName))){ //移动失败
  		    $data=array(
  		        'state' => '写入文件内容错误',
  		    );
  		    return json_encode($data);
        }else{ 
            //先拉取到本地在上传到云端
            $upload_service = new Upload();
            $info = $upload_service->fileStore($dirname, $file['name']);
            if($info['code'] > 0){
                $file['fullName'] = $info['path'];
            }else{
                $data=array(
                    'state' => $info['message'],
                );
                return json_encode($data);
            }    
            $data=array(
                'state' => 'SUCCESS',
                'url' => $file['fullName'],
                'title' => $file['name'],
                'original' => $file['oriName'],
                'type' => $file['ext'],
                'size' => $file['filesize'],
            );
        }
    
        return json_encode($data);
    }
    
    /*
     * 处理base64编码的图片上传
     * 例如：涂鸦图片上传
     */
    private function upBase64($config,$fieldName){
        $base64Data = $_POST[$fieldName];
        $img = base64_decode($base64Data);
    
        $dirname = UPLOAD . '/ueditor/scrawl/'.date('Ymd');
        $file['filesize'] = strlen($img);
        $file['oriName'] = $config['oriName'];
        $file['ext'] = strtolower(strrchr($config['oriName'],'.'));
        $file['name'] = uniqid().$file['ext'];
        $file['fullName'] = $dirname.'/'.$file['name'];
        $fullName = $file['fullName'];
    
        //检查文件大小是否超出限制
        if($file['filesize'] >= ($config["maxSize"])){
  		    $data=array(
  		        'state' => '文件大小超出网站限制',
  		    );
  		    return json_encode($data);
        }
    
        //创建目录失败
        if(!file_exists($dirname) && !mkdir($dirname,0777,true)){
            $data=array(
                'state' => '目录创建失败',
            );
            return json_encode($data);
        }else if(!is_writeable($dirname)){
            $data=array(
                'state' => '目录没有写权限',
            );
            return json_encode($data);
        }
    
        //移动文件
        if(!(file_put_contents($fullName, $img) && file_exists($fullName))){ //移动失败
            $data=array(
                'state' => '写入文件内容错误',
            );
        }else{
            //先拉取到本地在上传到云端
            $upload_service = new Upload();
            $info = $upload_service->fileStore($dirname, $file['name']);
            if($info['code'] > 0){
                $file['fullName'] = $info['path'];
            }else{
                $data=array(
                    'state' => $info['message'],
                );
                return json_encode($data);
            }  
            $data=array(
                'state' => 'SUCCESS',
                'url' => substr($file['fullName'],1),
                'title' => $file['name'],
                'original' => $file['oriName'],
                'type' => $file['ext'],
                'size' => $file['filesize'],
            );
        }
    
        return json_encode($data);
    }
}