荆棘鸟's Blog

这段PHP代码，可以获取远程动态链接地址，并将地址写入文件中，会产生文本文件，需定期删除。

<?php

function socketGet($url, &$ret){
 $urlArr = parse_url($url);
 $host = $urlArr['host'];
 $port = isset($urlArr['port'])?$urlArr['port']:80;
 $path = isset($urlArr['path'])?$urlArr['path']:"/";
 if(isset($urlArr['query']))
 $path .= "?".$urlArr['query'];

 //return true;

 $fp = fsockopen($host, $port, $errno, $errstr, 30);
 if (!$fp){
  echo "$errstr ($errno)<br />\n";
  return false;
 }else{
  $out = "GET $path HTTP/1.0\r\n";
  $out .= "Host: $host\r\n";
  $out .= "Connection: Close\r\n\r\n";

  $ret = "";
  fwrite($fp, $out);
  while (!feof($fp)){
   $ret .= fgets($fp, 128);
  }
  fclose($fp);
 }
 return true;
}

function socketPost($url, $data, &$ret){
 $urlArr = parse_url($url);
 $host = $urlArr['host'];
 $port = isset($urlArr['port'])?$urlArr['port']:80;
 $path = isset($urlArr['path'])?$urlArr['path']:"/";
 if(isset($urlArr['query']))
  $path .= "?".$urlArr['query'];

 $fp = fsockopen($host, $port, $errno, $errstr, 30);
 if (!$fp){
  echo "$errstr ($errno)<br />\n";
  return false;
 }else{
 $out = "POST $path HTTP/1.1\r\n";
 $out .= "Host: $host\r\n";
 $out .= "Content-Type: application/x-www-form-urlencoded\r\n";
 $out .= "Content-Length: ".strlen($data)."\r\n";
 $out .= "Connection: Keep-Alive\r\n\r\n";
 $out .= $data;

 $ret = "";
 fwrite($fp, $out);
 while (!feof($fp)){
  $ret .= fgets($fp, 128);
 }
 fclose($fp);
 }

 return true;
}

// 测试
$filename=date("Ymd");

if(!file_exists("$filename.txt")){
 socketGet('http://www.hnqx.gov.cn/videomanage.asp', &$ret);
 //print_r($ret);
 $line=$ret;
 $prov=$line;
 $city=$line;

 $head="<param name=\"URL\" value=\"/vod/";

 $star=mb_strpos($prov,$head);
 $prov=substr($prov,$star+30);

 $endtest="<param name=\"rate\" value=\"1\">";

 $endnum=strpos($prov,$endtest);
 $prov=substr($prov,0,$endnum-12);
 file_put_contents ($filename.'.txt',$prov);
}
include("$filename.txt");
//echo ($prov);
?>