<?php
/**
 * 文件上传类
 * @author wangqs33 <wangqs33@126.com>   
 */

namespace common;

class UploadFile {//类定义开始

    private $config = array(
        'maxSizeArr' => -1,
        'maxSize' => -1, // 上传文件的最大值
        'supportMulti' => true, // 是否支持多文件上传
        'allowExts' => array(), // 允许上传的文件后缀 留空不作后缀检查
        'allowTypes' => array(), // 允许上传的文件类型 留空不做检查
        'thumb' => false, // 使用对上传图片进行缩略图处理
        //'imageClassPath' => 'ORG.Util.Image', // 图库类包路径
        'imageClassPath' => 'Image', // 图库类包路径
        'thumbMaxWidth' => '', // 缩略图最大宽度
        'thumbMaxHeight' => '', // 缩略图最大高度
        'thumbPrefix' => 'thumb_', // 缩略图前缀
        'thumbSuffix' => '',
        'thumbPath' => '', // 缩略图保存路径
        'thumbFile' => '', // 缩略图文件名
        'thumbExt' => '', // 缩略图扩展名        
        'thumbRemoveOrigin' => true, // 是否移除原图
        'zipImages' => false, // 压缩图片文件上传
        'autoSub' => false, // 启用子目录保存文件
        'subType' => 'hash', // 子目录创建方式 可以使用hash date custom
        'subDir' => '', // 子目录名称 subType为custom方式后有效
        'dateFormat' => 'Ymd',
        'hashLevel' => 1, // hash的目录层次
        'savePath' => '', // 上传文件保存路径
        'autoCheck' => true, // 是否自动检查附件
        'uploadReplace' => false, // 存在同名是否覆盖
        'saveRule' => '', // 上传文件命名规则
        'hashType' => 'md5_file', // 上传文件Hash规则函数名
        'ratio' => '1', //1:按比例缩放，6：裁切固定值大小
        'savefile' => '', //文件保存路径
    );
    // 错误信息
    private $error = '';
    // 上传成功的文件信息
    private $uploadFileInfo;

    public function __get($name) {
        if (isset($this->config[$name])) {
            return $this->config[$name];
        }
        return null;
    }

    public function __set($name, $value) {
        if (isset($this->config[$name])) {
            $this->config[$name] = $value;
        }
    }

    public function __isset($name) {
        return isset($this->config[$name]);
    }

    /**
     * 架构函数
     * @access public
     * @param array $config  上传参数
     */
    public function __construct($config = array()) {
        if (is_array($config)) {
            $this->config = array_merge($this->config, $config);
        }
    }

    /**
     * 上传一个文件
     * @access public
     * @param mixed $name 数据
     * @param string $value  数据表名
     * @return string
     */
    private function save($file) {
        $filename = $file['savepath'] . $file['savename'];
        if (!$this->uploadReplace && is_file($filename)) {
            // 不覆盖同名文件
            $this->error = '文件已经存在！' . $filename;
            return false;
        }
        // 如果是图像文件 检测文件格式
        if (in_array(strtolower($file['extension']), array('gif', 'jpg', 'jpeg', 'bmp', 'png', 'swf'))) {
//            $info = getimagesize($$file['tmp_name']);
//            if (false == $info || ('gif' == strtolower($file['extension']) && empty($info['bits']))) {
//                $this->error = $info;//.'非法图像文件或无法获取临时文件读取权限（function error:getimagesize）.';
//                return false;
//            }
        }
        if (!move_uploaded_file($file['tmp_name'], $this->autoCharset($filename, 'utf-8', 'gbk'))) {
            $this->error = '文件上传保存错误！';
            return false;
        }
        if ($this->thumb && in_array(strtolower($file['extension']), array('gif', 'jpg', 'jpeg', 'bmp', 'png'))) {
            $image = getimagesize($filename);
            if (false !== $image) {
                //是图像文件生成缩略图
                $thumbWidth = explode(',', $this->thumbMaxWidth);
                $thumbHeight = explode(',', $this->thumbMaxHeight);
                $thumbPrefix = explode(',', $this->thumbPrefix);
                $thumbSuffix = explode(',', $this->thumbSuffix);
                $thumbFile = explode(',', $this->thumbFile);
                $ratio = explode(',', $this->ratio);
                $thumbPath = $this->thumbPath ? $this->thumbPath : dirname($filename) . '/';
                $thumbExt = $this->thumbExt ? $this->thumbExt : $file['extension']; //自定义缩略图扩展名
                // 生成图像缩略图
                // import($this->imageClassPath);
                for ($i = 0; $i < count($thumbWidth); $i++) {
                    if (!empty($thumbFile[$i])) {
                        $thumbname = $thumbFile[$i];
                    } else {
                        $prefix = isset($thumbPrefix[$i]) ? $thumbPrefix[$i] : $thumbPrefix[0];
                        $suffix = isset($thumbSuffix[$i]) ? $thumbSuffix[$i] : $thumbSuffix[0];
                    }
                    if ($ratio[$i] == 6) {
                        /////按固定值缩放/////////
                        if ($this->checkanimation($filename)) {
                            $thumbname = basename($filename, '.' . $file['extension']) . $suffix;
                            $thumbname = $thumbname . '1_thum';
                            $image = \think\Image::open($filename);
                            $image->thumb($thumbWidth[$i], $thumbHeight[$i], $ratio[$i])->save($thumbPath . $thumbname . '.' . $thumbExt);
                        } else {
                            $thumbname = basename($filename, '.' . $file['extension']) . '_' . $thumbWidth[$i] . 'x' . $thumbHeight[$i] . $suffix;
                            $gr = new \app\company\util\Gifresizer();
                            $gr->resize($filename, $thumbPath . $thumbname . '.' . $thumbExt, 200, 200);
                        }
                    } elseif ($ratio[$i] == 1) {
                        //////按比例缩放////////
                        $image = \think\Image::open($filename);
                        $oldw = $image->width(); // 返回图片的宽度
                        $oldh = $image->height(); // 返回图片的高度

                        if ($oldw >= $oldh) {
                            $newwidth = $thumbWidth[$i];
                            $newheight = round($oldh / $oldw * $thumbWidth[$i], 0);
                        } else {
                            $newheight = $thumbHeight[$i];
                            $newwidth = round($oldw / $oldh * $thumbHeight[$i], 0);
                        }
                        $thumbname = basename($filename, '.' . $file['extension']) . $suffix . '1';
                        if ($i == 0) {
                            $thumbname.='_thum';
                        }
                        $image->thumb($newwidth, $newheight, $ratio[$i])->save($thumbPath . $thumbname . '.' . $thumbExt);
                    }
                    $this->uploadFileInfo['savename'] = $this->getfileurl($thumbPath . $thumbname . '.' . $thumbExt);
                }
                if ($this->thumbRemoveOrigin) {
                    // 生成缩略图之后删除原图
                    unlink($filename);
                }
            }
        } else {
            $this->uploadFileInfo['savename'] = $this->getfileurl($filename);
        }
        if ($this->zipImags) {
            // TODO 对图片压缩包在线解压
        }
        return true;
    }

    public function getfileurl($str) {
        return str_replace('./', '/', $str);
    }

    ///////////判断是不是动画///////////////////
    private function checkanimation($image_file) {
        $fp = fopen($image_file, 'rb');
        $image_head = fread($fp, 1024);
        fclose($fp);
        return preg_match("/" . chr(0x21) . chr(0xff) . chr(0x0b) . 'NETSCAPE2.0' . "/", $image_head) ? true : false;
    }
    /**
     * 上传所有文件 支持多附件
     * @access public
     * @param string $savePath  上传文件保存路径
     * @return string
     */
    public function uploadmore($savePath = '') {
        //如果不指定保存文件名，则由系统默认
        if (empty($savePath))
            $savePath = $this->savePath;
        // 检查上传目录
        if (!is_dir($savePath)) {
            // 尝试创建目录
            if (!mkdir($savePath, 0777, true)) {
                $this->error = '上传目录' . $savePath . '不存在';
                return false;
            }
        } else {
            if (!is_writeable($savePath)) {
                $this->error = '上传目录' . $savePath . '不可写';
                return false;
            }
        }
        //过滤无效的上传
        $files = $this->dealFiles($_FILES);
        if ($files) {
            foreach ($files as $key => $file) {
                //过滤无效的上传
                if (!empty($file['name'])) {
                    //登记上传文件的扩展信息
                    $file['extension'] = $this->getExt($file['name']);

                    if (is_array($this->maxSizeArr)) {
                        ///////上传不同类型文件时的不同判断标准时////////////
                        $dir_name = $this->getsavefile($file['extension']);
                        if ($dir_name) {
                            $file['savepath'] = $savePath . $dir_name . '/';
                            $file['dir_name'] = $dir_name;
                            $this->maxSize = $this->maxSizeArr[$dir_name];
                        }
                    } else {
                        $file['savepath'] = $savePath;
                    }
                    $file['savename'] = $this->getSaveName($file);

                    $this->uploadFileInfo = $file;
                    // 自动检查附件
                    if ($this->autoCheck) {
                        if (!$this->check($file))
                            return false;
                    }
                    //保存上传文件
                    if (!$this->save($file))
                        return false;
                    if (function_exists($this->hashType)) {
                        $fun = $this->hashType;
                        $file['hash'] = $fun($this->autoCharset($file['savepath'] . $file['savename'], 'utf-8', 'gbk'));
                    }
                    //上传成功后保存文件信息，供其他地方调用
                    unset($file['tmp_name'], $file['error']);
                    $file['savename'] = $this->uploadFileInfo['savename'];
                    $info[] = $file;
                }
            }
        } else {
            $this->error = '没有选择上传文件';
            return false;
        }

        return $info;
    }

    /**
     * 获取文件保存文件夹
     * @access private
     * @param string $type 数据
     * @return boolean
     */
    private function getsavefile($ext) {
        if (!empty($this->allowExts)) {
            foreach ($this->allowExts as $key => $value) {
                if (in_array(strtolower($ext), $value, true)) {
                    return $key;
                }
            }
            return '';
        }
        return '';
    }

    /**
     * 转换上传文件数组变量为正确的方式
     * @access private
     * @param array $files  上传的文件变量
     * @return array
     */
    private function dealFiles($files) {
        $fileArray = array();
        $n = 0;
        foreach ($files as $key => $file) {
            if (is_array($file['name'])) {
                $keys = array_keys($file);
                $count = count($file['name']);
                for ($i = 0; $i < $count; $i++) {
                    $fileArray[$n]['key'] = $key;
                    foreach ($keys as $_key) {
                        $fileArray[$n][$_key] = $file[$_key][$i];
                    }
                    $n++;
                }
            } else {
                $fileArray[$key] = $file;
            }
        }
        return $fileArray;
    }

    /**
     * 获取错误代码信息
     * @access public
     * @param string $errorNo  错误号码
     * @return void
     */
    protected function error($errorNo) {
        switch ($errorNo) {
            case 1:
                $this->error = '上传的文件超过了 php.ini 中 upload_max_filesize 选项限制的值';
                break;
            case 2:
                $this->error = '上传文件的大小超过了 HTML 表单中 MAX_FILE_SIZE 选项指定的值';
                break;
            case 3:
                $this->error = '文件只有部分被上传';
                break;
            case 4:
                $this->error = '没有文件被上传';
                break;
            case 6:
                $this->error = '找不到临时文件夹';
                break;
            case 7:
                $this->error = '文件写入失败';
                break;
            default:
                $this->error = '未知上传错误！';
        }
        return;
    }

    /**
     * 根据上传文件命名规则取得保存文件名
     * @access private
     * @param string $filename 数据
     * @return string
     */
    private function getSaveName($filename) {
        $rule = $this->saveRule;
        if (empty($rule)) {//没有定义命名规则，则保持文件名不变
            //$saveName = $filename['name'];
            $saveName = date("YmdHis") . '_' . rand(10000, 99999) . '.' . $filename['extension'];
        } else {
            if (function_exists($rule)) {
                //使用函数生成一个唯一文件标识号
                $saveName = $rule() . "." . $filename['extension'];
            } else {
                //使用给定的文件名作为标识号
                $saveName = $rule . "." . $filename['extension'];
            }
        }
        if ($this->autoSub) {
            // 使用子目录保存文件
            $filename['savename'] = $saveName;
            $saveName = $this->getSubName($filename) . $saveName;
        }
        return $saveName;
    }

    /**
     * 获取子目录的名称
     * @access private
     * @param array $file  上传的文件信息
     * @return string
     */
    private function getSubName($file) {
        switch ($this->subType) {
            case 'custom':
                //$dir = $this->subDir;
                $dir = date("YmdHis") . '_' . rand(10000, 99999);
                break;
            case 'date':
                $dir = date($this->dateFormat, time()) . '/';
                break;
            case 'hash':
            default:
                $name = md5($file['savename']);
                $dir = '';
                for ($i = 0; $i < $this->hashLevel; $i++) {
                    $dir .= $name[$i] . '/';
                }
                break;
        }
        if (!is_dir($file['savepath'] . $dir)) {
            mkdir($file['savepath'] . $dir, 0777, true);
        }
        return $dir;
    }

    /**
     * 检查上传的文件
     * @access private
     * @param array $file 文件信息
     * @return boolean
     */
    private function check($file) {
        if ($file['error'] !== 0) {
            //文件上传失败
            //捕获错误代码
            $this->error($file['error']);
            return false;
        }
        //文件上传成功，进行自定义规则检查
        //检查文件类型
        if (!$this->checkExt($file['extension'])) {
            $this->error = '上传文件类型不允许';
            return false;
        }
        //检查文件大小
        if (!$this->checkSize($file['size'])) {
            $this->error = '上传文件大小不符！';
            return false;
        }

        //检查文件Mime类型
        if (!$this->checkType($file['type'])) {
            $this->error = '上传文件MIME类型不允许！';
            return false;
        }

        //检查是否合法上传
        if (!$this->checkUpload($file['tmp_name'])) {
            $this->error = '非法上传文件！';
            return false;
        }
        return true;
    }

    // 自动转换字符集 支持数组转换
    private function autoCharset($fContents, $from = 'gbk', $to = 'utf-8') {
        $from = strtoupper($from) == 'UTF8' ? 'utf-8' : $from;
        $to = strtoupper($to) == 'UTF8' ? 'utf-8' : $to;
        if (strtoupper($from) === strtoupper($to) || empty($fContents) || (is_scalar($fContents) && !is_string($fContents))) {
            //如果编码相同或者非字符串标量则不转换
            return $fContents;
        }
        if (function_exists('mb_convert_encoding')) {
            return mb_convert_encoding($fContents, $to, $from);
        } elseif (function_exists('iconv')) {
            return iconv($from, $to, $fContents);
        } else {
            return $fContents;
        }
    }

    /**
     * 检查上传的文件类型是否合法
     * @access private
     * @param string $type 数据
     * @return boolean
     */
    private function checkType($type) {
        if (!empty($this->allowTypes))
            return in_array(strtolower($type), $this->allowTypes);
        return true;
    }

    /**
     * 检查上传的文件后缀是否合法
     * @access private
     * @param string $ext 后缀名
     * @return boolean
     */
    private function checkExt($ext) {
        if (!empty($this->allowExts)) {
            if (is_array($this->maxSizeArr)) {
                foreach ($this->allowExts as $value) {
                    if (in_array(strtolower($ext), $value, true)) {
                        return true;
                    }
                }
                return false;
            } else {
                return in_array(strtolower($ext), $this->allowExts, true);
            }
        }
        return true;
    }

    /**
     * 检查文件大小是否合法
     * @access private
     * @param integer $size 数据
     * @return boolean
     */
    private function checkSize($size) {
        return !($size > $this->maxSize) || (-1 == $this->maxSize);
    }

    /**
     * 检查文件是否非法提交
     * @access private
     * @param string $filename 文件名
     * @return boolean
     */
    private function checkUpload($filename) {
        return is_uploaded_file($filename);
    }

    /**
     * 取得上传文件的后缀
     * @access private
     * @param string $filename 文件名
     * @return boolean
     */
    private function getExt($filename) {
        $pathinfo = pathinfo($filename);
        return $pathinfo['extension'];
    }

    /**
     * 取得上传文件的信息
     * @access public
     * @return array
     */
    public function getUploadFileInfo() {
        return $this->uploadFileInfo;
    }

    /**
     * 取得最后一次错误信息
     * @access public
     * @return string
     */
    public function getErrorMsg() {
        return $this->error;
    }

}