<?php
/*********************************
*
*;;作者: 徐祖宁 (唠叨)
*;;邮箱: czjsz_ah@stats.gov.cn
*;;开发: 2002.07
*
*
*;;函数: tags
*;;功能: 从文件中提取HTML标签
*
*;;入口:
*;;$filename 文件名
*;;$tag;;;;;;标签名
*;;返回:
*;;数组,每项为:
*;;;tagName;;;;String
*;;;Text;;;;;;;String
*;;;Attrs;;;;;;Array
*
*;;示例:
*;;print_r(tags("test1.htm","a"));
*;;print_r("http://localhost/index.htm","img");
*
*/

function tags($filename,$tag) {
;;$buffer = join("",file($filename));
;;$buffer = eregi_replace("rn","",$buffer);
;;$tagkey = sql_regcase($tag);
;;$buffer = eregi_replace("<$tagkey ","n<$tag ",$buffer);
;;$ar = split("n",$buffer);

;;foreach($ar as $v) {
;;;;if(! eregi("<$tagkey ",$v)) continue;
;;;;eregi("<$tagkey ([^>]*)((.*)</$tagkey)?",$v,$regs);
;;;;$p[tagName] = strtoupper($tag);
;;;;if($regs[3])
;;;;;;$p[Text] = $regs[3];
;;;;$s = trim(eregi_replace("[ t]+"," ",$regs[1]))." ";
;;;;$s = eregi_replace(" *= *","=",$s);

;;;;$a = split(" ",$s);
;;;;for($i=0;$i<count($a);$i++) {
;;;;;;$ch = array();
;;;;;;if(eregi("=["']",$a[$i])) {
$j = $i+1;
while(!eregi("["']$",$a[$i])) {
;;$a[$i] .= " ".$a[$j];
;;unset($a[$j]);
}
;;;;;;}
;;;;}
;;;;foreach($a as $k) {
;;;;;;$name = strtoupper(strtok($k,"="));
;;;;;;$value = strtok("");
;;;;;;if(eregi("^["']",$value))
$value = substr($value,1,-1);
;;;;;;if($name)
$p[Attrs][$name] = $value;
;;;;}
;;;;$pp[] = $p;
;;}
;;return $pp;
}

?>

标签：