摘自织梦CMS的HTTP文件下载类


Posted in PHP onAugust 08, 2015

本文实例讲述了摘自织梦CMS的HTTP文件下载类。分享给大家供大家参考。具体如下:

<?php if(!defined('DEDEINC')) exit("Request Error!");
/**
 * 织梦HTTP下载类
 *
 * @version  $Id: dedehttpdown.class.php 1 11:42 2010年7月6日Z tianya $
 * @package  DedeCMS.Libraries
 * @copyright  Copyright (c) 2007 - 2010, DesDev, Inc.
 * @license  http://help.dedecms.com/usersguide/license.html
 * @link   http://www.dedecms.com
 */
@set_time_limit(0);
class DedeHttpDown
{
 var $m_url = '';
 var $m_urlpath = '';
 var $m_scheme = 'http';
 var $m_host = '';
 var $m_port = '80';
 var $m_user = '';
 var $m_pass = '';
 var $m_path = '/';
 var $m_query = '';
 var $m_fp = '';
 var $m_error = '';
 var $m_httphead = '';
 var $m_html = '';
 var $m_puthead = '';
 var $BaseUrlPath = '';
 var $HomeUrl = '';
 var $reTry = 0;
 var $JumpCount = 0;
 /**
  * 初始化系统
  *
  * @access public
  * @param  string $url 需要下载的地址
  * @return string
  */
 function PrivateInit($url)
 {
  if($url=='') {
   return ;
  }
  $urls = '';
  $urls = @parse_url($url);
  $this->m_url = $url;
  if(is_array($urls))
  {
   $this->m_host = $urls["host"];
   if(!empty($urls["scheme"]))
   {
    $this->m_scheme = $urls["scheme"];
   }
   if(!empty($urls["user"]))
   {
    $this->m_user = $urls["user"];
   }
   if(!empty($urls["pass"]))
   {
    $this->m_pass = $urls["pass"];
   }
   if(!empty($urls["port"]))
   {
    $this->m_port = $urls["port"];
   }
   if(!empty($urls["path"]))
   {
    $this->m_path = $urls["path"];
   }
   $this->m_urlpath = $this->m_path;
   if(!empty($urls["query"]))
   {
    $this->m_query = $urls["query"];
    $this->m_urlpath .= "?".$this->m_query;
   }
   $this->HomeUrl = $urls["host"];
   $this->BaseUrlPath = $this->HomeUrl.$urls["path"];
   $this->BaseUrlPath = preg_replace("/\/([^\/]*)\.(.*)$/","/",$this->BaseUrlPath);
   $this->BaseUrlPath = preg_replace("/\/$/","",$this->BaseUrlPath);
  }
 }
 /**
  * 重设各参数
  *
  * @access public
  * @return void
  */
 function ResetAny()
 {
  $this->m_url = "";
  $this->m_urlpath = "";
  $this->m_scheme = "http";
  $this->m_host = "";
  $this->m_port = "80";
  $this->m_user = "";
  $this->m_pass = "";
  $this->m_path = "/";
  $this->m_query = "";
  $this->m_error = "";
 }
 /**
  * 打开指定网址
  *
  * @access public
  * @param  string $url 地址
  * @param  string $requestType 请求类型
  * @return string
  */
 function OpenUrl($url,$requestType="GET")
 {
  $this->ResetAny();
  $this->JumpCount = 0;
  $this->m_httphead = Array() ;
  $this->m_html = '';
  $this->reTry = 0;
  $this->Close();
  //初始化系统
  $this->PrivateInit($url);
  $this->PrivateStartSession($requestType);
 }
 /**
  * 转到303重定向网址
  *
  * @access public
  * @param  string $url 地址
  * @return string
  */
 function JumpOpenUrl($url)
 {
  $this->ResetAny();
  $this->JumpCount++;
  $this->m_httphead = Array() ;
  $this->m_html = "";
  $this->Close();
  //初始化系统
  $this->PrivateInit($url);
  $this->PrivateStartSession('GET');
 }
 /**
  * 获得某操作错误的原因
  *
  * @access public
  * @return void
  */
 function printError()
 {
  echo "错误信息:".$this->m_error;
  echo "<br/>具体返回头:<br/>";
  foreach($this->m_httphead as $k=>$v){ echo "$k => $v <br/>\r\n"; }
 }
 /**
  * 判别用Get方法发送的头的应答结果是否正确
  *
  * @access public
  * @return bool
  */
 function IsGetOK()
 {
  if( preg_match("/^2/",$this->GetHead("http-state")) )
  {
   return TRUE;
  }
  else
  {
   $this->m_error .= $this->GetHead("http-state")." - ".$this->GetHead("http-describe")."<br/>";
   return FALSE;
  }
 }
 /**
  * 看看返回的网页是否是text类型
  *
  * @access public
  * @return bool
  */
 function IsText()
 {
  if( preg_match("/^2/",$this->GetHead("http-state")) && preg_match("/text|xml/i",$this->GetHead("content-type")) )
  {
   return TRUE;
  }
  else
  {
   $this->m_error .= "内容为非文本类型或网址重定向<br/>";
   return FALSE;
  }
 }
 /**
  * 判断返回的网页是否是特定的类型
  *
  * @access public
  * @param  string $ctype 内容类型
  * @return string
  */
 function IsContentType($ctype)
 {
  if(preg_match("/^2/",$this->GetHead("http-state"))
  && $this->GetHead("content-type")==strtolower($ctype))
  { return TRUE; }
  else
  {
   $this->m_error .= "类型不对 ".$this->GetHead("content-type")."<br/>";
   return FALSE;
  }
 }
 /**
  * 用Http协议下载文件
  *
  * @access public
  * @param  string $savefilename 保存文件名称
  * @return string
  */
 function SaveToBin($savefilename)
 {
  if(!$this->IsGetOK())
  {
   return FALSE;
  }
  if(@feof($this->m_fp))
  {
   $this->m_error = "连接已经关闭!"; return FALSE;
  }
  $fp = fopen($savefilename,"w");
  while(!feof($this->m_fp))
  {
   fwrite($fp, fread($this->m_fp, 1024));
  }
  fclose($this->m_fp);
  fclose($fp);
  return TRUE;
 }
 /**
  * 保存网页内容为Text文件
  *
  * @access public
  * @param  string $savefilename 保存文件名称
  * @return string
  */
 function SaveToText($savefilename)
 {
  if($this->IsText())
  {
   $this->SaveBinFile($savefilename);
  }
  else
  {
   return "";
  }
 }
 /**
  * 用Http协议获得一个网页的内容
  *
  * @access public
  * @return string
  */
 function GetHtml()
 {
  if(!$this->IsText())
  {
   return '';
  }
  if($this->m_html!='')
  {
   return $this->m_html;
  }
  if(!$this->m_fp||@feof($this->m_fp))
  {
   return '';
  }
  while(!feof($this->m_fp))
  {
   $this->m_html .= fgets($this->m_fp,256);
  }
  @fclose($this->m_fp);
  return $this->m_html;
 }
 /**
  * 开始HTTP会话
  *
  * @access public
  * @param  string $requestType 请求类型
  * @return string
  */
 function PrivateStartSession($requestType="GET")
 {
  if(!$this->PrivateOpenHost())
  {
   $this->m_error .= "打开远程主机出错!";
   return FALSE;
  }
  $this->reTry++;
  if($this->GetHead("http-edition")=="HTTP/1.1")
  {
   $httpv = "HTTP/1.1";
  }
  else
  {
   $httpv = "HTTP/1.0";
  }
  $ps = explode('?',$this->m_urlpath);
  $headString = '';
  //发送固定的起始请求头GET、Host信息
  if($requestType=="GET")
  {
   $headString .= "GET ".$this->m_urlpath." $httpv\r\n";
  }
  else
  {
   $headString .= "POST ".$ps[0]." $httpv\r\n";
  }
  $this->m_puthead["Host"] = $this->m_host;
  //发送用户自定义的请求头
  if(!isset($this->m_puthead["Accept"]))
  {
   $this->m_puthead["Accept"] = "*/*";
  }
  if(!isset($this->m_puthead["User-Agent"]))
  {
   $this->m_puthead["User-Agent"] = "Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.2)";
  }
  if(!isset($this->m_puthead["Refer"]))
  {
   $this->m_puthead["Refer"] = "http://".$this->m_puthead["Host"];
  }
  foreach($this->m_puthead as $k=>$v)
  {
   $k = trim($k);
   $v = trim($v);
   if($k!=""&&$v!="")
   {
    $headString .= "$k: $v\r\n";
   }
  }
  fputs($this->m_fp, $headString);
  if($requestType=="POST")
  {
   $postdata = "";
   if(count($ps)>1)
   {
    for($i=1;$i<count($ps);$i++)
    {
     $postdata .= $ps[$i];
    }
   }
   else
   {
    $postdata = "OK";
   }
   $plen = strlen($postdata);
   fputs($this->m_fp,"Content-Type: application/x-www-form-urlencoded\r\n");
   fputs($this->m_fp,"Content-Length: $plen\r\n");
  }
  //发送固定的结束请求头
  //HTTP1.1协议必须指定文档结束后关闭链接,否则读取文档时无法使用feof判断结束
  if($httpv=="HTTP/1.1")
  {
   fputs($this->m_fp,"Connection: Close\r\n\r\n");
  }
  else
  {
   fputs($this->m_fp,"\r\n");
  }
  if($requestType=="POST")
  {
   fputs($this->m_fp,$postdata);
  }
  //获取应答头状态信息
  $httpstas = explode(" ",fgets($this->m_fp,256));
  $this->m_httphead["http-edition"] = trim($httpstas[0]);
  $this->m_httphead["http-state"] = trim($httpstas[1]);
  $this->m_httphead["http-describe"] = "";
  for($i=2;$i<count($httpstas);$i++)
  {
   $this->m_httphead["http-describe"] .= " ".trim($httpstas[$i]);
  }
  //获取详细应答头
  while(!feof($this->m_fp))
  {
   $line = trim(fgets($this->m_fp,256));
   if($line == "")
   {
    break;
   }
   $hkey = "";
   $hvalue = "";
   $v = 0;
   for($i=0;$i<strlen($line);$i++)
   {
    if($v==1)
    {
     $hvalue .= $line[$i];
    }
    if($line[$i]==":")
    {
     $v = 1;
    }
    if($v==0)
    {
     $hkey .= $line[$i];
    }
   }
   $hkey = trim($hkey);
   if($hkey!="")
   {
    $this->m_httphead[strtolower($hkey)] = trim($hvalue);
   }
  }
  //如果连接被不正常关闭,重试
  if(feof($this->m_fp))
  {
   if($this->reTry > 10)
   {
    return FALSE;
   }
   $this->PrivateStartSession($requestType);
  }
  //判断是否是3xx开头的应答
  if(preg_match("/^3/",$this->m_httphead["http-state"]))
  {
   if($this->JumpCount > 3)
   {
    return;
   }
   if(isset($this->m_httphead["location"]))
   {
    $newurl = $this->m_httphead["location"];
    if(preg_match("/^http/i",$newurl))
    {
     $this->JumpOpenUrl($newurl);
    }
    else
    {
     $newurl = $this->FillUrl($newurl);
     $this->JumpOpenUrl($newurl);
    }
   }
   else
   {
    $this->m_error = "无法识别的答复!";
   }
  }
 }
 /**
  * 获得一个Http头的值
  *
  * @access public
  * @param  string $headname 头文件名称
  * @return string
  */
 function GetHead($headname)
 {
  $headname = strtolower($headname);
  return isset($this->m_httphead[$headname]) ? $this->m_httphead[$headname] : '';
 }
 /**
  * 设置Http头的值
  *
  * @access public
  * @param  string $skey 键
  * @param  string $svalue 值
  * @return string
  */
 function SetHead($skey,$svalue)
 {
  $this->m_puthead[$skey] = $svalue;
 }
 /**
  * 打开连接
  *
  * @access public
  * @return bool
  */
 function PrivateOpenHost()
 {
  if($this->m_host=="")
  {
   return FALSE;
  }
  $errno = "";
  $errstr = "";
  $this->m_fp = @fsockopen($this->m_host, $this->m_port, $errno, $errstr,10);
  if(!$this->m_fp)
  {
   $this->m_error = $errstr;
   return FALSE;
  }
  else
  {
   return TRUE;
  }
 }
 /**
  * 关闭连接
  *
  * @access public
  * @return void
  */
 function Close()
 {
  @fclose($this->m_fp);
 }
 /**
  * 补全相对网址
  *
  * @access public
  * @param  string $surl 需要不全的地址
  * @return string
  */
 function FillUrl($surl)
 {
  $i = 0;
  $dstr = "";
  $pstr = "";
  $okurl = "";
  $pathStep = 0;
  $surl = trim($surl);
  if($surl=="")
  {
   return "";
  }
  $pos = strpos($surl,"#");
  if($pos>0)
  {
   $surl = substr($surl,0,$pos);
  }
  if($surl[0]=="/")
  {
   $okurl = "http://".$this->HomeUrl.$surl;
  }
  else if($surl[0]==".")
  {
   if(strlen($surl)<=1)
   {
    return "";
   }
   else if($surl[1]=="/")
   {
    $okurl = "http://".$this->BaseUrlPath."/".substr($surl,2,strlen($surl)-2);
   }
   else
   {
    $urls = explode("/",$surl);
    foreach($urls as $u)
    {
     if($u=="..")
     {
      $pathStep++;
     }
     else if($i<count($urls)-1)
     {
      $dstr .= $urls[$i]."/";
     }
     else
     {
      $dstr .= $urls[$i];
     }
     $i++;
    }
    $urls = explode("/",$this->BaseUrlPath);
    if(count($urls) <= $pathStep)
    {
     return "";
    }
    else
    {
     $pstr = "http://";
     for($i=0;$i<count($urls)-$pathStep;$i++)
     {
      $pstr .= $urls[$i]."/";
     }
     $okurl = $pstr.$dstr;
    }
   }
  }
  else
  {
   if(strlen($surl)<7)
   {
    $okurl = "http://".$this->BaseUrlPath."/".$surl;
   }
   else if(strtolower(substr($surl,0,7))=="http://")
   {
    $okurl = $surl;
   }
   else
   {
    $okurl = "http://".$this->BaseUrlPath."/".$surl;
   }
  }
  $okurl = preg_replace("/^(http:\/\/)/i","",$okurl);
  $okurl = preg_replace("/\/{1,}/", "/", $okurl);
  return "http://".$okurl;
 }
}//End Class

希望本文所述对大家的php程序设计有所帮助。

PHP 相关文章推荐
php获取当前网址url并替换参数或网址的方法
Jun 06 PHP
PHP加密扩展库Mcrypt安装和实例
Nov 10 PHP
CodeIgniter输出中文乱码的两种解决办法
Jun 12 PHP
php使用CURL伪造IP和来源实例详解
Jan 15 PHP
PHP下载生成的csv文件及问题总结
Aug 06 PHP
PHP浮点数的一个常见问题
Mar 10 PHP
Symfony模板的快捷变量用法实例
Mar 17 PHP
Yii2中关联查询简单用法示例
Aug 10 PHP
php递归函数怎么用才有效
Feb 24 PHP
php PDO属性设置与操作方法分析
Dec 27 PHP
对laravel in 查询的使用方法详解
Oct 09 PHP
PHP使用QR Code生成二维码实例
Jul 07 PHP
摘自织梦CMS中的图片处理类
Aug 08 #PHP
PHP模拟asp.net的StringBuilder类实现方法
Aug 08 #PHP
php自动识别文字编码并转换为目标编码的方法
Aug 08 #PHP
PHP模拟asp中response类实现方法
Aug 08 #PHP
PHP实现根据图片色界在不同位置加水印的方法
Aug 08 #PHP
PHP中使用curl伪造IP的简单方法
Aug 07 #PHP
smarty中常用方法实例总结
Aug 07 #PHP
You might like
PHP中,文件上传
2006/12/06 PHP
php连接oracle数据库的核心步骤
2016/05/26 PHP
PHP之十六个魔术方法详细介绍
2016/11/01 PHP
nodejs分页类代码分享
2014/06/17 NodeJs
jQuery DOM删除节点操作指南
2015/03/03 Javascript
jquery ui resize 中border-box的bug修正
2015/04/26 Javascript
创建一个类Person的简单实例
2016/05/17 Javascript
基于JavaScript实现跳转提示页面
2016/09/24 Javascript
jQuery实现限制文本框的输入长度
2017/01/11 Javascript
easyui-edatagrid.js实现回车键结束编辑功能的实例
2017/04/12 Javascript
JS实现点击拉拽轮播图pc端移动端适配
2018/09/05 Javascript
vue中v-for通过动态绑定class实现触发效果
2018/12/06 Javascript
一秒学会微信小程序制作table表格
2019/02/14 Javascript
Django模板继承 extend标签实例代码详解
2019/05/16 Javascript
Vue 的 v-model用法实例
2020/11/23 Vue.js
uniapp开发小程序实现滑动页面控制元素的显示和隐藏效果
2020/12/10 Javascript
[05:46]DOTA2英雄梦之声_第18期_陈
2014/06/20 DOTA
[38:32]DOTA2上海特级锦标赛A组资格赛#2 Secret VS EHOME第二局
2016/02/26 DOTA
Python3.x中自定义比较函数
2015/04/24 Python
Python中如何优雅的合并两个字典(dict)方法示例
2017/08/09 Python
Python实现文件信息进行合并实例代码
2018/01/17 Python
python中cPickle类使用方法详解
2018/08/27 Python
python+selenium实现简历自动刷新的示例代码
2019/05/20 Python
python 字典操作提取key,value的方法
2019/06/26 Python
Python如何把十进制数转换成ip地址
2020/05/25 Python
html5-canvas中使用clip抠出一个区域的示例代码
2018/05/25 HTML / CSS
精彩的推荐信范文
2013/11/26 职场文书
教师自我鉴定
2013/12/13 职场文书
作风大整顿心得体会
2014/09/10 职场文书
建筑横幅标语
2014/10/09 职场文书
天那边观后感
2015/06/09 职场文书
小学语文教师研修日志
2015/11/13 职场文书
初中美术教学反思
2016/02/17 职场文书
导游词之黄帝陵景区
2019/09/16 职场文书
goland设置颜色和字体的操作
2021/05/05 Golang
Django框架中表单的用法
2022/06/10 Python