php 仿asp xmlhttprequest請求資料代碼

類名 :httprequest($url="",$method="get",$usesocket=0)
//$url為請求的地址；預設要求方法為get；$usesocket預設為0，使用fsockopen方法，如果設定為1則使用socket_create方法

方法：
open($ip="",$port=-1) //開啟同伺服器的串連，預設不用設定這兩個參數（一個同事在linux用的時候，請求的不是hostname解析的ip，因此加了這兩個參數，以串連真實的伺服器ip）
settimeout($timeout=0) //設定擷取資料的逾時時間，必須在send方法調用之前設定才有效,單位秒，預設值0為不限制
setrequestheader($key,$value="") //佈建要求頭，必須在send方法調用之前設定才有效
removerequestheader($key,$value="") //移除指定索引值的要求標頭，必須在send方法調用之前調用才有效
send($data="") //發送資料$data到伺服器
getresponsebody() //擷取伺服器返回的文本
getallresponseheaders() //擷取伺服器響應的所有頭資訊
getresponseheader($key) //擷取伺服器響應的某個頭資訊，例如server,set_cookie等

屬性：
$url //要請求的url
$method //要求方法(post/get)
$port //請求的連接埠
$hostname //請求的主機名稱
$uri //url的檔案部分
$protocol //請求協議(http)(包括本屬性的以上5個屬性均由程式自動通過url分析)
$excption //異常資訊
$_headers=array() //要求標頭array("key"=>"value")
$_senddata //發送到伺服器的資料
$status //返回的狀態代碼
$statustext //狀態資訊
$httpprotocolversion //伺服器的http協議版本

注意：
host頭由程式自動化佈建，當用post方法請求時，content-length和content-type已被自動化佈建。
支援gzip壓縮的頁面

inc.http.php教程檔案

<?php

class httprequest{
 public $url,$method,$port,$hostname,$uri,$protocol,$excption,$_headers=array(),$_senddata,$status,$statustext,$httpprotocolversion;
 private $fp=0,$_buffer="",$responsebody,$responseheader,$timeout=0,$usesocket;
 //建構函式
 function __construct($url="",$method="get",$usesocket=0){
  $this->url = $url;
  $this->method = strtoupper($method);
  $this->usesocket = $usesocket;
  $this->setrequestheader("accept","*/*");
  $this->setrequestheader("accept-language","zh-cn");
  $this->setrequestheader("accept-encoding","gzip, deflate");
  $this->setrequestheader("user-agent","httprequest class 1.0");  //可調用setrequestheader來修改
 }
 
 //串連伺服器
 public function open($ip="",$port=-1){
  if(!$this->_geturlinfo()) return false;
  $this->setrequestheader("host",$this->hostname);
  $this->setrequestheader("connection","close");
  $ip = ($ip=="" ? $this->hostname : $ip);
  $port = ($port==-1 ? $this->port : $port);
  if($this->usesocket==1){
   if(!$this->fp=$socket=socket_create(af_inet,sock_stream,0)) {
    $this->excption="can not create socket";return false;
   }else{
    if(!socket_connect($this->fp,$ip, $port) ){
     $this->excption="can not connect to server " . $this->hostname . " on port" . $this->port;return false;
    }
   }
  }else{
   if(!$this->fp=fsockopen($ip, $port,$errno,$errstr,10)) {
    $this->excption="can not connect to server " . $this->hostname . " on port" . $this->port;return false;
   }
  }
  return true;
 }
 
 public function send($data=""){
  if(!$this->fp){$this->excption="is not a resource id";return false;}
  if($this->method=="get" && $data!=""){
   $s_str="?";
   if(strpos($this->uri,"?")>0) $s_str = "&";
   $this->uri.= $s_str . $data;
   $data="";
  }
  $senddata=$this->method . " " . $this->uri . " http/1.1rn";
  if($this->method=="post"){
   $this->setrequestheader("content-length",strlen($data));
   $this->setrequestheader("content-type", "application/x-www-form-urlencoded");
  }
  foreach($this->_headers as $keys => $value){
   $senddata .= "$keys: $valuern";
  }
  $senddata .= "rn";
  if($this->method=="post") $senddata .= $data;
  $this->_senddata = $senddata;
  if($this->usesocket==1){
   socket_write($this->fp,$this->_senddata);
   $buffer="";
   $timestart = time();
   do{
    if($this->timeout>0){
     if(time()-$timestart>$this->timeout){break;}
    }
    $this->_buffer.=$buffer;
    $buffer = socket_read($this->fp,4096);
   }while($buffer!="");
   socket_close($this->fp); 
  }else{
   fputs($this->fp, $senddata);
   $this->_buffer="";
   $timestart = time();
   while(!feof($this->fp))
   {
    if($this->timeout>0){
     if(time()-$timestart>$this->timeout){break;}
    }
    $this->_buffer.=fgets($this->fp,4096);
   }
   fclose($this->fp);   
  }
  $this->_splitcontent();
  $this->_getheaderinfo();
 }
 
 public function getresponsebody(){
  if($this->getresponseheader("content-encoding")=="gzip" && $this->getresponseheader("transfer-encoding")=="chunked"){
   return gzdecode_1(transfer_encoding_chunked_decode($this->responsebody));
  }else if($this->getresponseheader("content-encoding")=="gzip"){
   return gzdecode_1($this->responsebody);
  }else{
   return $this->responsebody;
  }
 }
 
 public function getallresponseheaders(){
  return  $this->responseheader;
 }
 
 public function getresponseheader($key){
  $key = str_replace("-","-",$key);
  $headerstr = $this->responseheader . "rn";
  $count = preg_match_all("/n$key:(.+?)r/is",$headerstr,$result,preg_set_order);
  if($count>0){
   $returnstr="";
   foreach($result as $key1=>$value){
    if(strtoupper($key)=="set-cookie"){
     $value[1] = substr($value[1],0,strpos($value[1],";"));
    }
    $returnstr .= ltrim($value[1]) . "; ";
   }
   $returnstr = substr($returnstr,0,strlen($returnstr)-2);
   return $returnstr;
  }else{return "";}
 }
 
 public function settimeout($timeout=0){
  $this->timeout = $timeout; 
 }
 
 public function setrequestheader($key,$value=""){
  $this->_headers[$key]=$value;
 }
 
 public function removerequestheader($key){
  if(count($this->_headers)==0){return;}
  $_temp=array();
  foreach($this->_headers as $keys => $value){
   if($keys!=$key){
    $_temp[$keys]=$value;
   }
  }
  $this->_headers = $_temp;
 }
 
 //拆分url
 private function _geturlinfo(){
  $url = $this->url;
  $count = preg_match("/^http://([^:/]+?)(:(d+))?/(.+?)$/is",$url,$result);
  if($count>0){
   $this->uri="/" . $result[4];
  }else{
   $count = preg_match("/^http://([^:/]+?)(:(d+))?(/)?$/is",$url,$result);
   if($count>0){
    $this->uri="/";
   }
  }
  if($count>0){
   $this->protocol="http";
   $this->hostname=$result[1];
   if(isset($result[2]) && $result[2]!="") {$this->port=intval($result[3]);}else{$this->port=80;}
   return true;
  }else{$this->excption="url format error";return false;}
 }
 
 private function _splitcontent(){
  $this->responseheader="";
  $this->responsebody="";
  $p1 = strpos($this->_buffer,"rnrn");
  if($p1>0){
   $this->responseheader = substr($this->_buffer,0,$p1);
   if($p1+4<strlen($this->_buffer)){
    $this->responsebody = substr($this->_buffer,$p1+4);
   }
  }
 }
 
 private function _getheaderinfo(){
  $headerstr = $this->responseheader;
  $count = preg_match("/^http/(.+?)s(d+)s(.+?)rn/is",$headerstr,$result);
  if($count>0){
   $this->httpprotocolversion = $result[1];
   $this->status = intval($result[2]);
   $this->statustext = $result[3];
  }
 }
}

//以下兩函數參考網路
function gzdecode_1 ($data) {
 $data = ($data);
 if (!function_exists ( 'gzdecode' )) {
  $flags = ord ( substr ( $data, 3, 1 ) );
  $headerlen = 10;
  $extralen = 0;
  $filenamelen = 0;
  if ($flags & 4) {
   $extralen = unpack ( 'v', substr ( $data, 10, 2 ) );
   $extralen = $extralen [1];
   $headerlen += 2 + $extralen;
  }
  if ($flags & 8) // filename
   $headerlen = strpos ( $data, chr ( 0 ), $headerlen ) + 1;
  if ($flags & 16) // comment
   $headerlen = strpos ( $data, chr ( 0 ), $headerlen ) + 1;
  if ($flags & 2) // crc at end of file
   $headerlen += 2;
  $unpacked = @gzinflate ( substr ( $data, $headerlen ) );
  if ($unpacked === false)
   $unpacked = $data;
  return $unpacked;
 }else{
  return gzdecode($data);
 }
}

function transfer_encoding_chunked_decode($in) {
 $out = "";
 while ( $in !="") {
  $lf_pos = strpos ( $in, "12" );
  if ($lf_pos === false) {
   $out .= $in;
   break;
  }
  $chunk_hex = trim ( substr ( $in, 0, $lf_pos ) );
  $sc_pos = strpos ( $chunk_hex, ';' );
  if ($sc_pos !== false)
   $chunk_hex = substr ( $chunk_hex, 0, $sc_pos );
  if ($chunk_hex =="") {
   $out .= substr ( $in, 0, $lf_pos );
   $in = substr ( $in, $lf_pos + 1 );
   continue;
  }
  $chunk_len = hexdec ( $chunk_hex );
  if ($chunk_len) {
   $out .= substr ( $in, $lf_pos + 1, $chunk_len );
   $in = substr ( $in, $lf_pos + 2 + $chunk_len );
  } else {
   $in = "";
  }
 }
 return $out;
}
function utf8togb($str){
 return iconv("utf-8","gbk",$str);
}

function gbtoutf8($str){
 return iconv("gbk","utf-8",$str);
}
?>

response.asp教程檔案

<%
response.cookies("a") = "anlige"
response.cookies("a").expires = dateadd("yyyy",1,now())
response.cookies("b")("c") = "wsdasdadsa"
response.cookies("b")("d") = "ddd"
response.cookies("b").expires = dateadd("yyyy",1,now())
response.write "querystring : " & request.querystring & "<br />"
for each v in request.querystring
 response.write v & "=" & request.querystring(v) & "<br />"
next
response.write "<br />form : " &  request.form  & "<br />"
for each v in request.form
 response.write v & "=" & request.form(v) & "<br />"
next
response.write "<br />url : " &  request.servervariables("url")  & "<br />"
response.write "referer : " &  request.servervariables("http_referer")  & "<br />"
response.write "host : " &  request.servervariables("http_host")  & "<br />"
response.write "user-agent : " &  request.servervariables("http_user_agent")  & "<br />"
response.write "cookie" & request.servervariables("http_cookie")
%>

index.php檔案

<a href="?action=get">get傳資料</a>
<a href="?action=post">post傳資料</a>
<a href="?action=header_referer">向伺服器發送來路資訊</a>
<a href="?action=header_useragent">向伺服器發送user-agent</a>
<a href="?action=status">擷取伺服器返回的狀態</a>
<a href="?action=get_headers">擷取伺服器回應標頭</a>
<a href="?action=get_image">儲存圖片</a><br /><br /><br />
<?php
include("inc_http.php");
$responseurl = "http://dev.mo.cn/aiencode/http/response.asp";

$act = isset($_get["action"]) ? $_get["action"] : "";
if($act == "get"){  //get傳資料

 $myhttp = new httprequest("$responseurl?a=text");
 $myhttp->open();
 $myhttp->send("name=anlige&city=" . urlencode("杭州"));
 echo($myhttp->getresponsebody()); 
 
}else if($act == "post"){ //post傳資料

 $myhttp = new httprequest("$responseurl?a=text","post");
 $myhttp->open();
 $myhttp->send("name=anlige&city=" . urlencode("杭州"));
 echo($myhttp->getresponsebody());
 
}else if($act == "header_referer"){  //向伺服器發送來路資訊

 $myhttp = new httprequest("$responseurl?a=text","post");
 $myhttp->open();
 $myhttp->setrequestheader("referer","http://www.baidu.com");
 $myhttp->send("name=anlige&city=" . urlencode("杭州"));
 echo($myhttp->getresponsebody()); 
 
}else if($act == "header_useragent"){  //向伺服器發送user-agent

 $myhttp = new httprequest("$responseurl?a=text","post");
 $myhttp->open();
 $myhttp->setrequestheader("referer","http://www.baidu.com");
 $myhttp->setrequestheader("user-agent","mozilla/4.0 (compatible; msie 7.0; windows nt 6.0; trident/4.0)");
 $myhttp->send("name=anlige&city=" . urlencode("杭州"));
 echo($myhttp->getresponsebody()); 
 
}else if($act == "status"){   //擷取伺服器返回的狀態

 $myhttp = new httprequest("$responseurl?a=text","post");
 $myhttp->open();
 $myhttp->send("name=anlige&city=" . urlencode("杭州"));
 echo($myhttp->status . " " . $myhttp->statustext ."<br /><br />"); 
 echo($myhttp->getresponsebody());
 
}else if($act == "get_headers"){  //擷取伺服器回應標頭

 $myhttp = new httprequest("$responseurl?a=text","get");
 $myhttp->open();
 $myhttp->send("name=anlige&city=" . urlencode("杭州"));
 echo($myhttp->getallresponseheaders()."<br /><br />");  
 echo($myhttp->getresponseheader("server")."<br /><br />"); 
 
}else if($act == "get_image"){
 
 $myhttp = new httprequest("http://www.baidu.com/img/baidu_logo.gif");
 $myhttp->open();
 $myhttp->send(); 
 $fp = @fopen("demo.gif","w");
 fwrite($fp,$myhttp->getresponsebody());
 fclose($fp);
 echo("<img src="demo.gif" />");
}

?>