527 lines
14 KiB
PHP
527 lines
14 KiB
PHP
|
<?php
|
|||
|
|
/**
|
|||
|
|
* Zeed Platform Project
|
|||
|
|
* Based on Zeed Framework & Zend Framework.
|
|||
|
|
*
|
|||
|
|
* BTS - Billing Transaction Service
|
|||
|
|
* CAS - Central Authentication Service
|
|||
|
|
*
|
|||
|
|
* LICENSE
|
|||
|
|
* http://www.zeed.com.cn/license/
|
|||
|
|
*
|
|||
|
|
* @category Zeed
|
|||
|
|
* @package Zeed_File
|
|||
|
|
* @copyright Copyright (c) 2010 Zeed Technologies PRC Inc. (http://www.zeed.com.cn)
|
|||
|
|
* @author Zeed Team (http://blog.zeed.com.cn)
|
|||
|
|
* @since 2010-6-30
|
|||
|
|
* @version SVN: $Id: View.php 6709 2010-09-08 13:47:02Z xsharp $
|
|||
|
|
*/
|
|||
|
|
|
|||
|
|
/**
|
|||
|
|
* Zeed_File
|
|||
|
|
*
|
|||
|
|
* @todo 增加检测HTTP/FTP文件是否存在
|
|||
|
|
*
|
|||
|
|
* @category Zeed
|
|||
|
|
* @package Zeed_Misc
|
|||
|
|
* @subpackage Util
|
|||
|
|
* @author xSharp ( GTalk/Email: xSharp@gmail.com | MSN: xSharp@msn.com )
|
|||
|
|
*/
|
|||
|
|
class Zeed_File
|
|||
|
|
{
|
|||
|
|
/**
|
|||
|
|
* 大小写不敏感
|
|||
|
|
*
|
|||
|
|
* @param String $filename
|
|||
|
|
* @return Array 返回文件列表数组
|
|||
|
|
*/
|
|||
|
|
public static function file_exists($filename)
|
|||
|
|
{
|
|||
|
|
return glob(dirname($filename) . '/' . sql_regcase(basename($filename)), GLOB_NOSORT);
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/**
|
|||
|
|
* 自动更名
|
|||
|
|
*/
|
|||
|
|
public static function autoRenameFile($filename, $i = 1)
|
|||
|
|
{
|
|||
|
|
if (file_exists($filename)) {
|
|||
|
|
$pos = strrpos($filename, '.');
|
|||
|
|
$fileExt = substr($filename, $pos);
|
|||
|
|
$fileNameAbs = substr($filename, 0, $pos);
|
|||
|
|
if (false != $pos = strrpos($fileNameAbs, '_')) {
|
|||
|
|
$fileNameAbs = substr($fileNameAbs, 0, $pos);
|
|||
|
|
}
|
|||
|
|
$filename = $fileNameAbs . '_' . $i . $fileExt;
|
|||
|
|
return self::autoRenameFile($filename, ++ $i);
|
|||
|
|
} else {
|
|||
|
|
return $filename;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/**
|
|||
|
|
* 获取文件的内容, 支HTTP文件
|
|||
|
|
*/
|
|||
|
|
public static function file_get_contents($filename)
|
|||
|
|
{
|
|||
|
|
if (preg_match('/(http|https|ftp|file){1}(:\/\/)/i', $filename)) {
|
|||
|
|
return self::getUrlFile($filename);
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
return file_get_contents($filename);
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/**
|
|||
|
|
* 获取HTTP文件数据
|
|||
|
|
*
|
|||
|
|
* @param String $filename
|
|||
|
|
* @param String $retureType
|
|||
|
|
* @return Zend_Http_Response|String|Null
|
|||
|
|
*/
|
|||
|
|
public static function getUrlFile($filename, $retureType = null)
|
|||
|
|
{
|
|||
|
|
try {
|
|||
|
|
$client = new Zend_Http_Client($filename);
|
|||
|
|
$response = $client->request();
|
|||
|
|
return is_null($retureType) ? $response->getBody() : $response;
|
|||
|
|
} catch (Exception $e) {
|
|||
|
|
trigger_error($e->getMessage(), E_USER_NOTICE);
|
|||
|
|
return null;
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/**
|
|||
|
|
* 获取URL Headers
|
|||
|
|
*
|
|||
|
|
* @param String $url
|
|||
|
|
* @return Array|Null
|
|||
|
|
*/
|
|||
|
|
public static function getUrlHeader($url)
|
|||
|
|
{
|
|||
|
|
$fp = @fopen($url, 'r');
|
|||
|
|
if ($fp) {
|
|||
|
|
$meta = stream_get_meta_data($fp);
|
|||
|
|
fclose($fp);
|
|||
|
|
|
|||
|
|
$headers = array();
|
|||
|
|
while (list(, $v) = each($meta['wrapper_data'])) {
|
|||
|
|
$_tmp = explode(':', $v);
|
|||
|
|
$key = trim($_tmp[0]);
|
|||
|
|
$val = trim(substr($v, strlen($_tmp[0]) + 1));
|
|||
|
|
|
|||
|
|
$headers[$key] = $val;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
return $headers;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
return null;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/**
|
|||
|
|
* 检查URL是否可用(200)
|
|||
|
|
*
|
|||
|
|
* @param String $url_file
|
|||
|
|
* @return Boolean
|
|||
|
|
*/
|
|||
|
|
public static function url_exists($url_file)
|
|||
|
|
{
|
|||
|
|
//检测输入
|
|||
|
|
$url_file = trim($url_file);
|
|||
|
|
if (empty($url_file)) {
|
|||
|
|
return false;
|
|||
|
|
}
|
|||
|
|
$url_arr = parse_url($url_file);
|
|||
|
|
if (! is_array($url_arr) || empty($url_arr)) {
|
|||
|
|
return false;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
//获取请求数据
|
|||
|
|
$host = $url_arr['host'];
|
|||
|
|
$path = $url_arr['path'] . "?" . $url_arr['query'];
|
|||
|
|
$port = isset($url_arr['port']) ? $url_arr['port'] : "80";
|
|||
|
|
|
|||
|
|
//连接服务器
|
|||
|
|
@$fp = fsockopen($host, $port, $err_no, $err_str, 10);
|
|||
|
|
if (! $fp) {
|
|||
|
|
return false;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
//构造请求协议
|
|||
|
|
$request_str = "GET " . $path . " HTTP/1.1\r\n";
|
|||
|
|
$request_str .= "Host: " . $host . "\r\n";
|
|||
|
|
$request_str .= "Connection: Close\r\n\r\n";
|
|||
|
|
|
|||
|
|
//发送请求
|
|||
|
|
fwrite($fp, $request_str);
|
|||
|
|
$first_header = fgets($fp, 1024);
|
|||
|
|
fclose($fp);
|
|||
|
|
|
|||
|
|
//判断文件是否存在
|
|||
|
|
if (trim($first_header) == "") {
|
|||
|
|
return false;
|
|||
|
|
}
|
|||
|
|
if (! preg_match("/200/", $first_header)) {
|
|||
|
|
return false;
|
|||
|
|
}
|
|||
|
|
return true;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/**
|
|||
|
|
* 缓存网上的图片
|
|||
|
|
*
|
|||
|
|
* @param String $fileUrl
|
|||
|
|
* @return String|Boolean 磁盘路径
|
|||
|
|
*/
|
|||
|
|
public static function snatchFile($fileUrl, $saveToDir)
|
|||
|
|
{
|
|||
|
|
// 处理空格
|
|||
|
|
$fileUrl = str_replace(array(
|
|||
|
|
' '), array(
|
|||
|
|
'%20'), $fileUrl);
|
|||
|
|
|
|||
|
|
$saveToDir = (substr($saveToDir, - 1) == '/') ? $saveToDir : $saveToDir . '/';
|
|||
|
|
$outputDir = $saveToDir;
|
|||
|
|
$filename = md5($fileUrl);
|
|||
|
|
|
|||
|
|
$outputFile = $outputDir . substr($filename, 0, 2) . '/' . substr($filename, 2, 2) . '/' . $filename;
|
|||
|
|
$failMeta = $outputFile . '-failmeta';
|
|||
|
|
$failMetaData = array();
|
|||
|
|
|
|||
|
|
/**
|
|||
|
|
* 文件已经存在,下列情况有效:
|
|||
|
|
* 1.大于0
|
|||
|
|
* 2.等于0,但是无 $failMeta
|
|||
|
|
*/
|
|||
|
|
if (file_exists($outputFile) or file_exists($failMeta)) {
|
|||
|
|
if (file_exists($failMeta)) {
|
|||
|
|
$failMetaData = unserialize(file_get_contents($failMeta));
|
|||
|
|
// 失败超过3次不再抓取
|
|||
|
|
if (count($failMetaData) >= 3) {
|
|||
|
|
return false;
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
if (file_exists($outputFile)) {
|
|||
|
|
return $outputFile;
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/**
|
|||
|
|
* 当Header Status不等于200时记录
|
|||
|
|
*/
|
|||
|
|
$requestObj = self::getUrlFile($fileUrl, 'obj');
|
|||
|
|
if (! $requestObj instanceof Zend_Http_Response) {
|
|||
|
|
$body = '';
|
|||
|
|
$headers = array();
|
|||
|
|
$code = '';
|
|||
|
|
} else {
|
|||
|
|
$body = $requestObj->getBody();
|
|||
|
|
$headers = $requestObj->getHeaders();
|
|||
|
|
$code = $requestObj->getStatus();
|
|||
|
|
}
|
|||
|
|
if ($code == '200') {
|
|||
|
|
// 成功
|
|||
|
|
if (file_exists($failMeta)) {
|
|||
|
|
@unlink($failMeta);
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
return (self::file_put_contents($outputFile, $body)) ? $outputFile : false;
|
|||
|
|
} else {
|
|||
|
|
// 失败
|
|||
|
|
$failMetaData[] = array(
|
|||
|
|
'time' => date('Y-m-d H:i:s'),
|
|||
|
|
'url' => $fileUrl,
|
|||
|
|
'code' => $code,
|
|||
|
|
'headers' => $headers);
|
|||
|
|
self::file_put_contents($failMeta, serialize($failMetaData));
|
|||
|
|
|
|||
|
|
return $outputFile;
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/**
|
|||
|
|
* PHP内置 file_put_contents 函数的增强
|
|||
|
|
* 增加了自动创建不存在的目录(路径)
|
|||
|
|
*
|
|||
|
|
* @see file_put_contents
|
|||
|
|
* @param String $filename
|
|||
|
|
* @param String $data
|
|||
|
|
* @param String $mode
|
|||
|
|
* @return Integer
|
|||
|
|
*/
|
|||
|
|
public static function file_put_contents($filename, $data, $mode = null)
|
|||
|
|
{
|
|||
|
|
$filename = str_replace(array('\\', '/'), DIRECTORY_SEPARATOR, $filename);
|
|||
|
|
$filename_dir = dirname($filename);
|
|||
|
|
if (! is_dir($filename_dir)) {
|
|||
|
|
Zeed_Util::mkpath($filename_dir);
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
if (is_null($mode)) {
|
|||
|
|
$mode = 'w';
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
if (! file_exists($filename) || is_writable($filename)) {
|
|||
|
|
if (! $handle = fopen($filename, $mode)) {
|
|||
|
|
return false;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
if (fwrite($handle, $data) === FALSE) {
|
|||
|
|
return false;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
fclose($handle);
|
|||
|
|
@chmod($filename, 0666);
|
|||
|
|
} else {
|
|||
|
|
return false;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
return true;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
public static function writeSync($filename, $data)
|
|||
|
|
{
|
|||
|
|
self::file_put_contents($filename, $data);
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/**
|
|||
|
|
* Remove a file or dir,empty or nonempty
|
|||
|
|
*
|
|||
|
|
* @param String $f
|
|||
|
|
* @return Boolean
|
|||
|
|
*/
|
|||
|
|
public static function unlink($f)
|
|||
|
|
{
|
|||
|
|
if (substr($f, - 1) == '/')
|
|||
|
|
$folder = substr($f, 0, - 1);
|
|||
|
|
|
|||
|
|
if (is_dir($f) && ! is_link($f)) {
|
|||
|
|
foreach (scandir($f) as $item) {
|
|||
|
|
if (! strcmp($item, '.') || ! strcmp($item, '..'))
|
|||
|
|
continue;
|
|||
|
|
if (! Zeed_File::unlink($f . "/" . $item))
|
|||
|
|
return false;
|
|||
|
|
}
|
|||
|
|
if (! @rmdir($f))
|
|||
|
|
return false;
|
|||
|
|
} else {
|
|||
|
|
if (! @unlink($f))
|
|||
|
|
return false;
|
|||
|
|
}
|
|||
|
|
return true;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/**
|
|||
|
|
* Filename Security
|
|||
|
|
*
|
|||
|
|
* @access public
|
|||
|
|
* @param string
|
|||
|
|
* @return string
|
|||
|
|
*/
|
|||
|
|
public static function filename_security($str)
|
|||
|
|
{
|
|||
|
|
$bad = array(
|
|||
|
|
"+",
|
|||
|
|
"（",
|
|||
|
|
"）",
|
|||
|
|
"../",
|
|||
|
|
"./",
|
|||
|
|
"<!--",
|
|||
|
|
"-->",
|
|||
|
|
"<",
|
|||
|
|
">",
|
|||
|
|
"'",
|
|||
|
|
'"',
|
|||
|
|
'&',
|
|||
|
|
'$',
|
|||
|
|
'#',
|
|||
|
|
'{',
|
|||
|
|
'}',
|
|||
|
|
'[',
|
|||
|
|
']',
|
|||
|
|
'=',
|
|||
|
|
';',
|
|||
|
|
'?',
|
|||
|
|
"%20",
|
|||
|
|
"%22",
|
|||
|
|
"%3c", // <
|
|||
|
|
"%253c", // <
|
|||
|
|
"%3e", // >
|
|||
|
|
"%0e", // >
|
|||
|
|
"%28", // (
|
|||
|
|
"%29", // )
|
|||
|
|
"%2528", // (
|
|||
|
|
"%26", // &
|
|||
|
|
"%24", // $
|
|||
|
|
"%3f", // ?
|
|||
|
|
"%3b", // ;
|
|||
|
|
"%3d"); // =
|
|||
|
|
|
|||
|
|
$repalce = array('_');
|
|||
|
|
|
|||
|
|
$str = stripslashes(str_replace($bad, $repalce, $str));
|
|||
|
|
|
|||
|
|
$c = Zeed_Util_Zh::isUGB($str);
|
|||
|
|
if ($c != '') {
|
|||
|
|
$str = Zeed_Util_Zh::pinyin(iconv($c, 'GBK', $str));
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
// 变态的字符统统去掉
|
|||
|
|
$str = preg_replace('/[^\w\.\(\)\-\,]/', '_', $str);
|
|||
|
|
|
|||
|
|
return $str;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/**
|
|||
|
|
* Check if $dir is a directory and it is empty
|
|||
|
|
*
|
|||
|
|
* @param string $dirname
|
|||
|
|
* @return boolean
|
|||
|
|
*/
|
|||
|
|
public static function is_empty_dir($dirname)
|
|||
|
|
{
|
|||
|
|
$result = false;
|
|||
|
|
if (is_dir($dirname)) {
|
|||
|
|
$result = true;
|
|||
|
|
$handle = opendir($dirname);
|
|||
|
|
while (($name = readdir($handle)) !== false) {
|
|||
|
|
if ($name != "." && $name != "..") {
|
|||
|
|
$result = false;
|
|||
|
|
break;
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
closedir($handle);
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
return $result;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/**
|
|||
|
|
* @var finfo
|
|||
|
|
*/
|
|||
|
|
private static $_finfo;
|
|||
|
|
|
|||
|
|
/**
|
|||
|
|
* @return finfo
|
|||
|
|
*/
|
|||
|
|
public static function finfo()
|
|||
|
|
{
|
|||
|
|
if (is_null(self::$_finfo)) {
|
|||
|
|
if (DIRECTORY_SEPARATOR == '/') {
|
|||
|
|
// *nix
|
|||
|
|
$magicPath = self::findNixMagicFile();
|
|||
|
|
} else {
|
|||
|
|
// win
|
|||
|
|
$magicPath = ZEED_PATH_DATA . '/mime/win/magic';
|
|||
|
|
}
|
|||
|
|
self::$_finfo = new finfo(FILEINFO_MIME, $magicPath);
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
return self::$_finfo;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/**
|
|||
|
|
* Return information about a file
|
|||
|
|
*
|
|||
|
|
* @param String $file
|
|||
|
|
* @return String
|
|||
|
|
*/
|
|||
|
|
public static function mime($file)
|
|||
|
|
{
|
|||
|
|
if (class_exists('finfo')) {
|
|||
|
|
return self::finfo()->file($file);
|
|||
|
|
} else {
|
|||
|
|
if (DIRECTORY_SEPARATOR == '/') {
|
|||
|
|
// *nix
|
|||
|
|
$fileBin = '/usr/bin/file';
|
|||
|
|
$magicPath = self::findNixMagicFile();
|
|||
|
|
} else {
|
|||
|
|
// win
|
|||
|
|
$fileBin = PP_ROOT . '/../shell/win/file.exe';
|
|||
|
|
$magicPath = ZEED_PATH_DATA . '/mime/win/magic';
|
|||
|
|
}
|
|||
|
|
$cmd = $fileBin . ' -i -b -m ' . $magicPath . ' ' . $file;
|
|||
|
|
$info = array();
|
|||
|
|
exec($cmd, $info);
|
|||
|
|
|
|||
|
|
return $info[0];
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
die('Get file\'s MimeType Fail.');
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/**
|
|||
|
|
* @return string
|
|||
|
|
*/
|
|||
|
|
private static function findNixMagicFile()
|
|||
|
|
{
|
|||
|
|
$magicPath = ZEED_PATH_DATA . '/mime/linux/magic';
|
|||
|
|
$searchpaths = array();
|
|||
|
|
$searchpaths[] = '/usr/share/file/magic'; // debian
|
|||
|
|
$searchpaths[] = '/usr/share/magic'; // centos
|
|||
|
|
foreach ($searchpaths as $_spath) {
|
|||
|
|
if (file_exists($_spath)) {
|
|||
|
|
$magicPath = $_spath;
|
|||
|
|
break;
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
return $magicPath;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/**
|
|||
|
|
* 直接从内容中获取其MIMETYPE信息
|
|||
|
|
*
|
|||
|
|
* @param string $buffer
|
|||
|
|
* @return string
|
|||
|
|
*/
|
|||
|
|
public static function mimeBuffer($buffer)
|
|||
|
|
{
|
|||
|
|
return self::finfo()->buffer($buffer);
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/**
|
|||
|
|
* Return icon url of a certain file
|
|||
|
|
*
|
|||
|
|
* @param String $filename
|
|||
|
|
* @param String $size
|
|||
|
|
* @return String
|
|||
|
|
*/
|
|||
|
|
public static function icon($filename, $size = "S")
|
|||
|
|
{
|
|||
|
|
$ext = substr($filename, strrpos($filename, '.') + 1);
|
|||
|
|
$icon = "/static/common/icons/" . $ext . ".gif";
|
|||
|
|
if (file_exists(ZEED_PATH_VIEW . $icon)) {
|
|||
|
|
return $icon;
|
|||
|
|
}
|
|||
|
|
return "/static/common/icons/default.icon.gif";
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/**
|
|||
|
|
* 获取文件行数
|
|||
|
|
*
|
|||
|
|
* @param string $filename
|
|||
|
|
* @return integer file line number
|
|||
|
|
*/
|
|||
|
|
public static function getFileLines($filename)
|
|||
|
|
{
|
|||
|
|
if (!is_readable($filename)) {
|
|||
|
|
throw new Zeed_Exception("file $filename can not readable.");
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
$lineNum = 0;
|
|||
|
|
|
|||
|
|
if ($stream = fopen($filename, 'r')) {
|
|||
|
|
while (!feof($stream)) {
|
|||
|
|
fgets($stream); // Burn a line so feof will work correctly.
|
|||
|
|
$lineNum++; // This will increment even for blank lines and even if the very last line is blank.
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
return $lineNum;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
// End ^ LF ^ UTF-8
|