<?php
abstract class Lib_Images
{
    /**
     * 获取图片地址
     * 
     * @param string $url  图片的相对地址
     * @param string $type  图片的类型
     * @param string $project  图片模块分类名
     * @param string $crop  切图方式
     * @return string
     */
    public static function getImageUrl($url = '', $type = null, $project = null, $crop = 'customCrop')
    {
        /*** 判断图片地址的有效性 ***/
        if ('' === $url || 'boy' === $url || 'girl' === $url || !is_string($url) || !strpos($url, '.'))
        {
            // 地址: 新社区用户默认头像
            if ($project === 'headimg')
            {   
                $finds = ($url === 'boy') ? Config_Static::$headImgBoy : Config_Static::$headImgGirl;
                if (!isset($finds[$type]))
            	{
            		$type = key($finds);
            	}
                return (SITE_IMG . $finds[$type]);
            }
            
            return '';
        }
		
		/*** 判断图片地址是不是一个绝对地址  ***/
		if (0 === stripos($url, 'http://') || 0 === stripos($url, 'https://')) 
		{  
	        return $url;
		}
		
		/*** 判断图片地址是不是老社区用户的头像或用户相册的照片 ***/
		if (0 === stripos($url, '/user/') || 0 === stripos($url, '/photo/'))
		{
		    return OLD_SITE_MAIN . $url;
		}
		
		/*** 判断图片类型和所在的项目是否存在 ***/
		if (null === $project || !is_string($type) || true !== property_exists('Config_File_Upload', $project))
		{
			return '';
		}
		
		/*** 解析URL路径信息, 获取所在的服务器域名 ***/
		$urlParts = pathinfo($url);
		$sysKey = self::getSysKey($urlParts['basename']);
		if (!isset(Config_File_Image::$imageServerUrl[$sysKey]))
		{
		    return '';
		}
		$sourceUrl = Config_File_Image::$imageServerUrl[$sysKey];
		$targetUrl = Config_File_Image::$imageThumbUrl[$sysKey];
	    $config = Config_File_Upload::${$project};
		
	    /*** 判断是不是访问源图片文件 ***/
	    if ('source' === $type)
	    {
	        $sourceUrl .= $config['path'] . $url;
	        return $sourceUrl;
	    }
		
		/*** 格式化尺寸为"0000x0000"格式 ***/
		if (false !== strpos($type, 'x'))
		{
			$finds = explode('x', $type);
			$type = str_pad($finds[0], 4, '0', STR_PAD_LEFT) . 'x' . str_pad($finds[1], 4, '0', STR_PAD_LEFT);
		}
		
		/*** 生成需要的URL地址, 格式: "域名/项目名/年/月/日/时/{01|02}md5(32)-宽x高-切图方式.图片后缀" ***/
		$finds = Config_Static::$cropTypes;
		if (!isset($finds[$crop]))
		{
			$crop = key($finds);
		}
		$targetUrl .= $config['path'] . $urlParts['dirname'] . '/' . basename($url, '.' . $urlParts['extension']) . '-' . $type . '-' . $finds[$crop] . '.' . $urlParts['extension'];
		
		return $targetUrl;
	}
	
	/**
	 * 预处理图片
	 *
	 * @param string $imagePath  源图片相对路径
	 * @param array $project  图片所在项目
	 * @param array $config  项目的配置
	 * @param array $data  图片的信息
	 * @param bool $useFastdfs  是否使用fastDFS
	 * @return void
	 */
	public static function processImage($imagePath, $project, $config, &$data, $useFastdfs = false)
	{
		// 源图片在服务器上的路径
		$source = $config['serverPath'] . '/' . $imagePath;
		if (is_readable($source))
		{
			// 获取并保存图片信息
			$temp = @getimagesize($source);
			if ($temp !== false)
			{
				$md5 = @md5_file($source);
				$size = @filesize($source);
				$data = array('width' => $temp[0], 'height' => $temp[1], 'size' => $size, 'mine' => $temp['mime']);
				Facade_Common_File::setFile($md5, $imagePath, serialize($data), $project, time(), 0);
			}
			else
			{
			    $data = array('width' => 200, 'height' => 300, 'size' => 200000, 'mine' => 'image/jpeg',);
			}
				
			$projData = $project . 'Data';
			$projectData = Config_File_Upload::${$projData};
			if (is_array($projectData) && array_key_exists('format_str', $projectData))
			{
				$gmagick = new Util_Image_Gmagick($source);
				$method = $target = null;
				$parts = self::partPath($imagePath);
				
				foreach ($projectData['format_str'] as $thumb)
				{
					$method = strval($thumb['mode']);
					if (method_exists($gmagick, $method))
					{
						// 构建目标文件路径
						$target = $config['thumbPath'] . $parts['left'] . '-' . str_pad($thumb['w'], 4, '0', STR_PAD_LEFT) 
						        . 'x' . str_pad($thumb['h'], 4, '0', STR_PAD_LEFT) 
						        . '-' . Config_Static::$cropTypes[$method] . $parts['right'];
	
						// 检查是否目录存在, 不存在则生成
						if (true === self::createFolder($config['thumbPath'])) 
						{
    						try
    						{
    							// 尝试按尺寸切图并生成目标文件
    							$gmagick->flatten()->$method($thumb['w'], $thumb['h'])->compress(100)->save($target);
    						}
    						catch (Exception $e)
    						{
    							// 出现切图异常, 则中断继续切图
    							break;
    						}
						}
					}
					// 间隔2毫秒
					usleep(2000);
				}
			}
		}
	}
	
	/**
	 * 获取图片的信息
	 * 
     * @param string $url  文件存放地址
     * @param string $project  文件项目名
     * @return false | array(
     *     width => 宽度,
     *     height => 高度,
     *     size => 大小,
     *     mine => 'MINE'
     * )
     * 
     * @example 
     * Lib_Images::getImageInfo('/2013/03/06/17/019182a667143d313a18b16e4525235b4d.jpg', 'blogimg');
     * Lib_Images::getImageInfo('http://img03.res.yoho.cn/blogimg/2012/09/18/11/01167a11b8e7c0d913e789d75b2e52f433-0580x320-1.jpeg', 'blogimg');
	 */
	public static function getImageInfo($url, $project)
	{
	    if ($project != '' && $url != '' && is_string($url))
	    {
	        // 变量: 存放最终使用的URL地址
	        $finalUrl = $url;
	        $isAbs = true;
	        // 判断图片地址是相对还是绝对的
	        $isRela = stripos($url, 'http://') === false && stripos($url, 'https://') === false;
	        if ($isRela)
	        {
	            $isAbs = false;
	            // 检查并获取数据库表中已存在的图片信息, 不存在则返回false
    	        $result = Facade_Common_File::getFileInfoByUrl($url, $project);
    	        if ($result !== false)
    	        {
    	            return $result;
    	        }
	            if (stripos($url, '/User') !== 0 && stripos($url, '/Photo') !== 0)
	            {
	                $pos = strrpos($url, '/');
	                if ($pos)
	                {
	                    $path = ($project == 'fragmentimg') ? 'blogimg' : $project;
	                    $node = substr($url, $pos + 1, 2);
	                    switch ($node)
	                    {
	                    	case '01':
	                    	    $finalUrl = DATA_IMG01_SERVER . '/' . $path . $url;
	                    	    $accessUrl = sprintf('http://img%s.static.yoho.cn/%s%s', $node, $path, $url);
	                    	    break;
	                    	case '02':
	                    	    $finalUrl = DATA_IMG02_SERVER . '/' . $path . $url;
	                    	    $accessUrl = sprintf('http://img%s.static.yoho.cn/%s%s', $node, $path, $url);
	                    	    break;
	                    	default:
	                    	    return false;
	                    }
	                    if (!file_exists($finalUrl))
	                    {
	                        $isAbs = true;
	                    	$finalUrl = $accessUrl;
	                    }
	                }
	            }
	            else
	            {
	                $isAbs = true;
	                $finalUrl = 'http://www.yoho.cn' . $url;
	            }
	        }
	        // 老站的图片
	        elseif (strpos($url, 'http://p.yoho.cn') === 0 || strpos($url, 'http://photo.yoho.cn') === 0)
	        {
	            // 检查并获取数据库表中已存在的图片信息, 不存在则返回false
	            $result = Facade_Common_File::getFileInfoByUrl($url, $project);
	            if ($result !== false)
	            {
	            	return $result;
	            }
	            $isRela = true;
	        }
	        
	        // 读取图片, 返回一个字符串
	        $image = ($isAbs) ? Util_Curl::get($finalUrl) : file_get_contents($finalUrl);
	        if ($image != false && is_string($image) && stripos($image, '<html>') == false)
	        {
	        	$info = @getimagesize($finalUrl);
	        	if ($info !== false)
	        	{
	        	    $md5 = md5($image);
	        	    $size = strlen($image);
	        		$result = array('width' => $info[0], 'height' => $info[1], 'mine' => $info['mime'], 'size' => $size, );
	        		if ($isRela && $md5 != false)
	        		{
	        		    // 保存图片信息, 以备之后使用
	        			@Facade_Common_File::setFile($md5, $url, serialize($result), $project, time(), 0);
	        		}
	        		return $result;
	        	}
	        }
	    }
	    return false;
	}
	
	/**
	 * 分隔文件路径地址 (以文件后缀名"."符号分隔)
	 * 
	 * @param string $path (文件路径)
	 * @return array
	 */
	public static function partPath($path)
	{
	    $pos = strrpos($path, '.');
	    return array(
        	            'left' => substr($path, 0, $pos), 
        	            'right' => substr($path, $pos),
	                );
	}
	
	/**
	 * 创建文件夹
	 *
	 * @param string $path (文件路径)
	 * @return boolean
	 */
	public static function createFolder($path)
	{
	    return is_dir($path) || (self::createFolder(dirname($path)) && mkdir($path, 0755));
	}
	
	/**
	 * 发送指令处理图片 (通过服务器调度, 进行图片处理. 此方法已不再使用)
	 *
	 * @param string $source 源文件地址
	 * @param string $size 需要的尺寸
	 * @param string $crop 切图方式
	 * @param string $target 目标文件地址
	 * @return void
	 */
	public static function makeImage($source, $size, $crop, $target) 
	{
		list($w, $h) = explode('x', $size);
		$size = array('w' => $w, 'h' => $h );
		$data = array('source' => $source, 'target' => $target, 'size' => $size, 'mode' => $crop,);
		$c = Util_Gearman::client();
		$c->d(IMAGE_GMAGICK_FUNC, json_encode($data));
		$c->clones();
	}

	/**
	 * 获取文件存放的节点
	 *
	 * @return string ('01' | '02')
	 */
	public static function getRandNode()
	{
		$randNum = time() % 2;
		$randNum = ($randNum) ? $randNum : 2;
		return sprintf('%02d', $randNum);
	}
	
    /**
     * 获取图片系统键名
     * 
     * @param string $basename (文件名)
     * @return string ('img01' | 'img02')
     */
	public static function getSysKey($basename) 
	{
		return 'img'.substr($basename, 0, 2);
	}
	
	/**
	 * 生成上传密钥
	 * 
	 * @param string $porject (项目模块名称)
	 * @return string | false
	 */
	public static function genKey($porject)
	{
	    $projectData = $porject . 'Data';
	    if (true === property_exists('Config_File_Upload', $projectData))
	    {
	        $uploadConfig = Config_File_Upload::${$projectData};
	        return Util_Utils_Function::base64_str_encode(
	                   Util_Utils_AuthCode::encode(
	                       json_encode($uploadConfig), Config_File_Upload::$key
	                   )
	               );
	    }
	    return false;
	}
	
	/**
	 * 获取上传的配置
	 * 
	 * @param string $project (项目模块名称)
	 * @return array
	 */
	public static function genConfig($project)
	{
	    $config = array();
	    
	    if (true === property_exists('Config_File_Upload', $project))
	    {
	        $config = Config_File_Upload::${$project};
	        $config['randNode'] = Lib_Images::getRandNode();
	        $config['serverNode'] = 'img' . $config['randNode'];
	        $config['serverPath'] = Config_File_Image::$imageServer[$config['serverNode']] . $config['path'];
	        $config['thumbPath'] = Config_File_Image::$thumbPath[$config['serverNode']] . $config['path'];
	        $config['sourceUrl'] = Config_File_Image::$imageServerUrl[$config['serverNode']] . $config['path'];
	        $config['thumbUrl'] = Config_File_Image::$imageThumbUrl[$config['serverNode']] . $config['path'];
	    }
	    
	    return $config;
	}
	
	/**
	 * 保存图片
	 *
	 * @param $_FILE|filestream $file
	 * @param string $project( default: fragmentimg)
	 * @return string (返回相对图片路径)
	 */
	public static function saveImage($file, $project = 'fragmentimg')
	{
		if (!isset(Config_File_Upload::${$project}))
		{
			return '';
		}
		$_key_data = Config_File_Upload::${$project};
		/** 是否使用多节点 默认节点 (1)->img01 **/
		$randNode = self::getRandNode();
		$serverNode = 'img' . $randNode;
		$projectConfig = self::genConfig($project);
		if(is_array($file))
		{
			$up = new Util_Upload_File($file, $projectConfig['serverPath']);
			$key = key($file);
		}
 		else if(@file_exists($file) && is_file($file))//文件
 		{
 			$up = new Util_Upload_FileStream(@file_get_contents($file), $projectConfig['serverPath']);
 			$key = 0;
 		}
        // 2014/01/07 hf: 修改抓取外网图片抓不了的问题
		elseif (is_string($file) && isset($file[0]))
		{
		    $up = new Util_Upload_FileStream($file, $projectConfig['serverPath']);
		    $key = 0;
		    $file = null;
		}
		else
		{
			return '';
		}
		$up->setFormat($projectConfig['format'] );
		$up->setMaxFileSize($projectConfig['upload_max_size'] );
		$up->setPrefix($randNode);
		if(isset($_key_data['file_path']))
		{
			$up->setNewFileName($_key_data['file_path']);
		}
		$checkStatus = $up->check ();
		if ($checkStatus ['code'] == 0)
		{
			$checkStatus = $up->write ();
		}
		return isset($checkStatus ['result'] ['hit'][$key]['relaPath'])? $checkStatus ['result'] ['hit'][$key]['relaPath']: '';
	}
}