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

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

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);
  }
 }
 
 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 = "";
 }
 
 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);
 }
 
 function JumpOpenUrl($url)
 {
  $this->ResetAny();
  $this->JumpCount++;
  $this->m_httphead = Array() ;
  $this->m_html = "";
  $this->Close();
  //初始化系统
  $this->PrivateInit($url);
  $this->PrivateStartSession('GET');
 }
 
 function printError()
 {
  echo "错误信息：".$this->m_error;
  echo "
具体返回头：
";
  foreach($this->m_httphead as $k=>$v){ echo "$k => $v 
rn"; }
 }
 
 function IsGetOK()
 {
  if( preg_match("/^2/",$this->GetHead("http-state")) )
  {
   return TRUE;
  }
  else
  {
   $this->m_error .= $this->GetHead("http-state")." - ".$this->GetHead("http-describe")."
";
   return FALSE;
  }
 }
 
 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 .= "内容为非文本类型或网址重定向
";
   return FALSE;
  }
 }
 
 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")."
";
   return FALSE;
  }
 }
 
 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;
 }
 
 function SaveToText($savefilename)
 {
  if($this->IsText())
  {
   $this->SaveBinFile($savefilename);
  }
  else
  {
   return "";
  }
 }
 
 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;
 }
 
 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." $httpvrn";
  }
  else
  {
   $headString .= "POST ".$ps[0]." $httpvrn";
  }
  $this->m_puthead["Host"] = $this->m_host;
  //发送用户自定义的请求头
  if(!isset($this->m_puthead["Accept"]))
  {
   $this->m_puthead["Accept"] = "*
 function GetHead($headname)
 {
  $headname = strtolower($headname);
  return isset($this->m_httphead[$headname]) ? $this->m_httphead[$headname] : '';
 }
 
 function SetHead($skey,$svalue)
 {
  $this->m_puthead[$skey] = $svalue;
 }
 
 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;
  }
 }
 
 function Close()
 {
  @fclose($this->m_fp);
 }
 
 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($ibaseUrlPath);
    if(count($urls) <= $pathStep)
    {
     return "";
    }
    else
    {
     $pstr = "http://";
     for($i=0;$ibaseUrlPath."/".$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程序设计有所帮助。