<?php
/**
 * KindEditor PHP
 *
 * 本PHP程序是演示程序，建议不要直接在实际项目中使用。
 * 如果您确定直接使用本程序，使用之前请仔细确认相关安全设置。
 *
 */

require_once 'JSON.php';

$php_path = dirname(__FILE__) . '/';
$php_url = dirname($_SERVER['PHP_SELF']) . '/';

//文件保存目录路径
//$save_path = $php_path . '../attached/';
$save_path = $_SERVER['DOCUMENT_ROOT'].'/upload/editor/';
//文件保存目录URL
//$save_url = $php_url . '../attached/';
$save_url = '/upload/editor/';
//定义允许上传的文件扩展名
$ext_arr = array(
	'image' => array('gif', 'jpg', 'jpeg', 'png', 'bmp'),
	'flash' => array('swf', 'flv'),
	'media' => array('swf', 'flv', 'mp3', 'wav', 'wma', 'wmv', 'mid', 'avi', 'mpg', 'asf', 'rm', 'rmvb'),
	'file' => array('doc', 'docx', 'xls', 'xlsx', 'ppt', 'htm', 'html', 'txt', 'zip', 'rar', 'gz', 'bz2'),
);
//最大文件大小
$max_size = 1000000;

$save_path = realpath($save_path) . '/';

//PHP上传失败
if (!empty($_FILES['imgFile']['error'])) {
	switch($_FILES['imgFile']['error']){
		case '1':
			$error = '超过php.ini允许的大小。';
			break;
		case '2':
			$error = '超过表单允许的大小。';
			break;
		case '3':
			$error = '图片只有部分被上传。';
			break;
		case '4':
			$error = '请选择图片。';
			break;
		case '6':
			$error = '找不到临时目录。';
			break;
		case '7':
			$error = '写文件到硬盘出错。';
			break;
		case '8':
			$error = 'File upload stopped by extension。';
			break;
		case '999':
		default:
			$error = '未知错误。';
	}
	alert($error);
}

//有上传文件时
if (empty($_FILES) === false) {
	//原文件名
	$file_name = $_FILES['imgFile']['name'];
	//服务器上临时文件名
	$tmp_name = $_FILES['imgFile']['tmp_name'];
	//文件大小
	$file_size = $_FILES['imgFile']['size'];
	//检查文件名
	if (!$file_name) {
		alert("请选择文件。");
	}
	//检查目录
	if (@is_dir($save_path) === false) {
		alert("上传目录不存在。");
	}
	//检查目录写权限
	if (@is_writable($save_path) === false) {
		alert("上传目录没有写权限。");
	}
	//检查是否已上传
	if (@is_uploaded_file($tmp_name) === false) {
		alert("上传失败。");
	}
	//检查文件大小
	if ($file_size > $max_size) {
		alert("上传文件大小超过限制。");
	}
	//检查目录名
	$dir_name = empty($_GET['dir']) ? 'image' : trim($_GET['dir']);
	if (empty($ext_arr[$dir_name])) {
		alert("目录名不正确。");
	}
	//获得文件扩展名
	$temp_arr = explode(".", $file_name);
	$file_ext = array_pop($temp_arr);
	$file_ext = trim($file_ext);
	$file_ext = strtolower($file_ext);
	//检查扩展名
	if (in_array($file_ext, $ext_arr[$dir_name]) === false) {
		alert("上传文件扩展名是不允许的扩展名。\n只允许" . implode(",", $ext_arr[$dir_name]) . "格式。");
	}
	//创建文件夹
	if ($dir_name !== '') {
		$save_path .= $dir_name . "/";
		$save_url .= $dir_name . "/";
		if (!file_exists($save_path)) {
			mkdir($save_path);
		}
	}
	$ymd = date("Ymd");
	$save_path .= $ymd . "/";
	$save_url .= $ymd . "/";
	if (!file_exists($save_path)) {
		mkdir($save_path);
	}
	//新文件名
	$new_file_name = date("YmdHis") . '_' . rand(10000, 99999) . '.' . $file_ext;
	//移动文件
	$file_path = $save_path . $new_file_name;
	if (move_uploaded_file($tmp_name, $file_path) === false) {
		alert("上传文件失败。");
	}
	@chmod($file_path, 0644);
	$file_url = $save_url . $new_file_name;

	header('Content-type: text/html; charset=UTF-8');
	$json = new Services_JSON();
	
	 /* 水印配置开始 */
	require_once $_SERVER['DOCUMENT_ROOT'].'/config.php';//获取水印配置参数
	if($GLOBALS["wl_water"]["action"]==true){
	  $water_mark = 1;//1为加水印, 其它为不加
	  $water_pos = 9;//水印位置，10种状态【0为随机，1为顶端居左，2为顶端居中，3为顶端居右；4为中部居左，5为中部居中，6为中部居右；7为底端居左，8为底端居中，9为底端居】
	  $water_img = $_SERVER['DOCUMENT_ROOT'].'/upload/water/water.png';//水印图片,默认填写空,请将图片上传至网站根目录的upfiles下,例: water.gif 
	  $water_alpha = 80;//水印透明度
	  $water_text = '';//水印字符串,默认填写空;
	  //$water_fontfile = $_SERVER['DOCUMENT_ROOT'] .'/upfiles/fonts/arial.ttf';//文字水印使用的字体;
	  $min_image_w=$GLOBALS["wl_water"]["min_image_w"];//水印启用最小宽度
	  $min_image_h=$GLOBALS["wl_water"]["min_image_h"];//水印启用最小高度
	  if($water_mark == 1){
		  imageWaterMark($file_path, $water_pos, $water_img, $water_alpha, $water_text, $water_fontfile,$min_image_w,$min_image_h);
	  }
	}
    /* 水印配置结束 */
		
	$img_title=@$_POST['title'];
	if(empty($img_title)){$img_title='';}
	echo $json->encode(array('error' => 0, 'url' => $file_url,'title'=>$img_title));
	
	exit;
}

function alert($msg) {
	header('Content-type: text/html; charset=UTF-8');
	$json = new Services_JSON();
	echo $json->encode(array('error' => 1, 'message' => $msg));
	exit;
}

/*
    * 功能：PHP图片水印，水印支持图片或文字
    * 参数：
    * $groundImage 背景图片，即需要加水印的图片，暂只支持GIF,JPG,PNG格式；
    * $waterPos 水印位置，有10种状态，0为随机位置；
    *   1为顶端居左，2为顶端居中，3为顶端居右；
    *   4为中部居左，5为中部居中，6为中部居右；
    *   7为底端居左，8为底端居中，9为底端居右；
    * $waterImage 图片水印，即作为水印的图片，暂只支持GIF,JPG,PNG格式；
    * $alpha 水印透明度，取值1-100；
    * $waterText 文字水印，即把文字作为为水印，支持ASCII码，不支持中文；
    * $textFont 文字大小，值为1、2、3、4或5，默认为5；
    * $textColor 文字颜色，值为十六进制颜色值，默认为#FF0000(红色)；
    * min_image_w 水印图片最小宽度
	* min_image_h 水印图片最小高度
	*
    * $waterImage 和 $waterText 最好不要同时使用，选其中之一即可，优先使用 $waterImage。
    * 当$waterImage有效时，参数$waterString、$stringFont、$stringColor均不生效。
    * 加水印后的图片的文件名和 $groundImage 一
	样。
*/
function imageWaterMark($groundImage, $waterPos=0, $waterImage='', $alpha=80, $waterText='', $water_fontfile, $textFont=9, $textColor='#FF0000',$min_image_w=300,$min_image_h=200){

    $isWaterImage = FALSE;
    $formatMsg = '不支持该图片格式！请使用GIF、JPG、PNG格式的图片。';
    $fontFile = $water_fontfile;
    //读取水印文件
    if(!empty($waterImage) && file_exists($waterImage)){
        $isWaterImage = TRUE;
        $water_info = getimagesize($waterImage);
        $water_w = $water_info[0];//取得水印图片的宽
        $water_h = $water_info[1];//取得水印图片的高
        switch($water_info[2]){//取得水印图片的格式
            case 1:$water_im = imagecreatefromgif($waterImage);break;
            case 2:$water_im = imagecreatefromjpeg($waterImage);break;
            case 3:$water_im = imagecreatefrompng($waterImage);break;
            default:die($formatMsg);
        }
    }
    //读取背景图片
    if(!empty($groundImage) && file_exists($groundImage)){
        $ground_info = getimagesize($groundImage);
        $ground_w = $ground_info[0];//取得背景图片的宽
        $ground_h = $ground_info[1];//取得背景图片的高
        switch($ground_info[2]){//取得背景图片的格式
            case 1:$ground_im = imagecreatefromgif($groundImage);break;
            case 2:$ground_im = imagecreatefromjpeg($groundImage);break;
            case 3:$ground_im = imagecreatefrompng($groundImage);break;
            default:die($formatMsg);
        }
    }else{
        alert("水印图片不存在！");
    }
    //水印位置
    if($isWaterImage){//图片水印
        $w = $water_w;
        $h = $water_h;
        $label = "图片的";
    }else{//文字水印
        $temp = imagettfbbox($textFont, 0, $fontFile, $waterText);//取得使用 TrueType 字体的文本的范围
        $w = $temp[2] - $temp[6];
        $h = $temp[3] - $temp[7];
        unset($temp);
        $label = "文字区域";
    }
    if(($ground_w<$w) || ($ground_h<$h)){
       // echo "需要加水印的图片的长度或宽度比水印".$label."还小，无法生成水印！";
        return;
    }
	
	 if(($ground_w<$min_image_w) || ($ground_h<$min_image_h)){
       // echo "小于最低背景图片的高和宽";
        return;
    }
	
    switch($waterPos){
        case 0://随机
        $posX = rand(0,($ground_w - $w));
        $posY = rand(0,($ground_h - $h));
        break;
        case 1://1为顶端居左
        $posX = 0;
        $posY = 0;
        break;
        case 2://2为顶端居中
        $posX = ($ground_w - $w) / 2;
        $posY = 0;
        break;
        case 3://3为顶端居右
        $posX = $ground_w - $w;
        $posY = 0;
        break;
        case 4://4为中部居左
        $posX = 0;
        $posY = ($ground_h - $h) / 2;
        break;
        case 5://5为中部居中
        $posX = ($ground_w - $w) / 2;
        $posY = ($ground_h - $h) / 2;
        break;
        case 6://6为中部居右
        $posX = $ground_w - $w;
        $posY = ($ground_h - $h) / 2;
        break;
        case 7://7为底端居左
        $posX = 0;
        $posY = $ground_h - $h;
        break;
        case 8://8为底端居中
        $posX = ($ground_w - $w) / 2;
        $posY = $ground_h - $h;
        break;
        case 9://9为底端居右
        $posX = $ground_w - $w;
        $posY = $ground_h - $h;
        if(!$isWaterImage){
        $posY = $ground_h - $h-20;
        }
        break;
        default://随机
        $posX = rand(0,($ground_w - $w));
        $posY = rand(0,($ground_h - $h));
        break;
    }
    //设定图像的混色模式
    imagealphablending($ground_im, true);
    if($isWaterImage){//图片水印
        imagecopy($ground_im, $water_im, $posX, $posY, 0, 0, $water_w,$water_h);//拷贝水印到目标文件
        //生成混合图像
        //imagecopymerge($ground_im, $water_im, $posX, $posY, 0, 0, $water_w, $water_h, $alpha);
    } else {//文字水印
        if( !empty($textColor) && (strlen($textColor)==7)){
            $R = hexdec(substr($textColor,1,2));
            $G = hexdec(substr($textColor,3,2));
            $B = hexdec(substr($textColor,5));
        } else {
            die("水印文字颜色格式不正确！");
        }
        imagestring($ground_im, $textFont, $posX, $posY, $waterText, imagecolorallocate($ground_im, $R, $G, $B));
    }
    //生成水印后的图片
    @unlink($groundImage);
    switch($ground_info[2]){//取得背景图片的格式
        case 1:imagegif($ground_im,$groundImage);break;
        case 2:imagejpeg($ground_im,$groundImage);break;
        case 3:imagepng($ground_im,$groundImage);break;
        default:die($errorMsg);
    }
    //释放内存
    if(isset($water_info)) unset($water_info);
    if(isset($water_im)) imagedestroy($water_im);
    unset($ground_info);
    imagedestroy($ground_im);
}

