<?
// Copyright(C)MMI, Lin Zhemin.
// PHP HTML parser class
// Copyright declared according to GPLv2.
//
// GeOu{AhC
// GTp rowspan (vTj)
// G|B DTD, , CSS, PHP, ASP
$DEBUGLEVEL = 0; // T
$SHOWINDENT = 4; // Y
// HU http://www.w3.org/TR/html4/index/elements.html
// HTML n end tag (bWW End Tag = )
$HTMLbrac = array(
'a', 'abbr', 'acronym', 'address', 'applet',
'b', 'bdo', 'big', 'blockquote', 'button',
'caption', 'center', 'cite', 'code',
'del', 'dfn', 'dir', 'div', 'dl',
'em', 'fieldset', 'font', 'form', 'frameset',
'h1', 'h2', 'h3', 'h4', 'h5', 'h6',
'i', 'iframe', 'ins',
'kbd',
'label', 'legend',
'map', 'menu',
'noframes', 'noscript',
'object', 'ol', 'optgroup',
'pre',
'q',
's', 'samp', 'script', 'select', 'small', 'span', 'strike', 'strong', '
style', 'sub', 'sup',
'table', 'textarea', 'title', 'tt',
'u', 'ul',
'var',
'html', 'body', 'head' // oOvXRI
);
// HTML ]tO (WGEnd Tag = O)
// @w]tO
$HTMLcont = array_merge($HTMLbrac, array(
'colgroup', 'dd', 'dt', 'li', 'option', 'p',
'tbody', 'td', 'tfoot', 'th', 'thead', 'tr'
));
// HTML L]tO (WGEnd Tag = F, Empty = E)
$HTMLnocn = array(
'area', 'base', 'basefont', 'br', 'col', 'frame',
'hr', 'img', 'input', 'isindex', 'link', 'meta',
'param');
// NH
$HTMLCloseTag = array(
'p' => array('table')
);
function HTMLdebug($l, $s) {
global $DEBUGLEVEL;
if($l > $DEBUGLEVEL)
return;
echo "DEBUG: $s\n";
}
// Container
class Container {
var $obj = array();
var $iden;
var $cnt = 0; // obj
function push(&$o) {
HTMLdebug(5, ' Container::push');
$this->cnt++;
return array_push($this->obj, $o);
}
function pop() {
return array_pop($this->obj);
}
function show($in = 0) {
HTMLdebug(7, " Container::show($in)");
$r = "";
for($i = 0; $i < $this->cnt; $i++) {
$r .= $i.'C'.$this->obj[$i]->show($in);
}
return $r;
}
function out() {
HTMLdebug(7, ' Container::out');
$r[] = $this;
for($i = 0; $i < $this->cnt; $i++) {
$r[] = $this->obj[$i]->out();
}
return $r;
}
function type() {
return "Container";
}
}
class HTMLtxt {
var $txt;
function HTMLtxt(&$s) {
HTMLdebug(5, " HTMLtxt::HTMLtxt");
HTMLdebug(4, "HTMLtxt = $s");
$this->txt = trim($s);
}
function show($in = 0) {
HTMLdebug(7, " HTMLtxt::show($in)");
return 'r'.str_repeat(' ', $in).$this->txt."\n";
}
function out() {
HTMLdebug(7, ' HTMLtxt::out');
return $this->txt;
}
function iden() {
return "HTMLtxt";
}
function type() {
return "HTMLtxt";
}
}
// HTML Tag
class HTMLattr {
var $element;
var $property;
function HTMLattr($e, $p = "") {
HTMLdebug(5, " HTMLattr::HTMLattr");
$this->element = trim($e);
$this->property = trim($p);
}
function show($in = 0) {
HTMLdebug(7, " HTMLattr::show($in)");
return ''.str_repeat(' ', $in).$this->element.' = '.$this->property
."\n";
}
function out() { HTMLdebug(7, ' HTMLattr::out');
return $this;
}
function type() {
return "HTMLattr";
}
function iden() {
return "HTMLattr";
}
}
// HTML Tag class
class HTMLtag {
var $tag; function HTMLtag($t) {
HTMLdebug(5, " HTMLtag::HTMLtag");
if(!preg_match('/(\/?\w+)(.*)/', $t, $a)) {
die('_ tag');
}
$this->tag = strtolower($a[1]);
if(count($a) > 2) {
preg_match_all('/([\w-]+)(=\s*"?([^"]*)"?)?/', $a[2], $b);
for($i = 0; $i < count($b[0]); $i++) {
$attr = new HTMLattr($b[1][$i], $b[3][$i]);
$this->push($attr);
}
}
}
function push(&$attr) {
HTMLdebug(5, ' HTMLtag::push');
$this->cnt++;
array_push($this->attr, $attr);
} if($this->attr[$i]->element == $a) {
return $this->attr[$i]->property;
}
}
return NULL;
}
function show($in = 0) {
global $SHOWINDENT;
HTMLdebug(7, " HTMLtag::show($in)");
$r = ''.str_repeat(' ', $in).'['.$this->tag."]\n";
for($i = 0; $i < $this->cnt; $i++) {
$r .= $i.'T'.$this->attr[$i]->show($in + $SHOWINDENT);
}
return $r;
}
function out() {
HTMLdebug(7, ' HTMLtag::out');
$r[] = $this;
for($i = 0; $i < $this->cnt; $i++) {
$r[] = $this->attr[$i]->out();
}
return $r;
}
function iden() {
return $this->tag;
}
function type() {
return "HTMLtag";
}
}
// HTML para: hAtdh| container
// G
// $sup Whr
// $s nBzry
// $t yz
// $this->iden er
// $this->obj[0] eyz
// $this->obj[1..] subnodes
// $this->sup OWhr
class HTMLpara extends Container {
var $iden;
var $sup;
function HTMLpara($sup, $s, $t = "") {
HTMLdebug(5, " HTMLpara::HTMLpara, Wh [$sup]");
$this->sup = $sup;
if(is_object($t)) {
$this->push($t);
}
if($s) {
if(eregi('^<table', $s)) {
$this->fixtable($s);
}
$this->parse(&$s);
}
}
function iden() {
HTMLdebug(5, ' HTMLpara::iden');
return $this->iden;
}
function push(&$o) {
HTMLdebug(5, ' HTMLpara::push');
if(!isset($this->iden)) {
$this->iden = $o->iden();
HTMLdebug(3, 'eO ['.$this->iden.']');
}
if($o->type() == "HTMLpara") {
HTMLdebug(3, 'e ['.$this->iden.'] e ['.$o->iden().']');
} else {
HTMLdebug(3, 'e ['.$this->iden.'] ['.$o->iden().']');
}
$this->cnt++;
array_push($this->obj, $o);
}
function show($in = 0) {
global $SHOWINDENT;
HTMLdebug(7, " HTMLpara::show($in)");
$r = 'e'.str_repeat(' ', $in).'{'.$this->iden."}\n";
$r .= Container::show($in + $SHOWINDENT);
return $r;
}
function out() {
HTMLdebug(7, ' HTMLpara::out');
$r[] = $this;
for($i = 0; $i < $this->cnt; $i++) {
$r[] = $this->obj[$i]->out();
}
return $r;
}
function type() {
return "HTMLpara";
}
function parse($s) {
HTMLdebug(5, ' HTMLpara::parse');
while($s) {
$this->parsetxt($s);
$this->parsetag($s);
}
HTMLdebug(3, "[".$this->iden."] RF");
}
// RGr
function parsetxt(&$s) {
HTMLdebug(6, ' HTMLpara::parsetxt');
$TxtRe = '/^([^<]*)/';
if(preg_match($TxtRe, $s, $r)) {
$txt = trim($r[1]);
if(!empty($txt)) {
$t = new HTMLtxt($txt);
HTMLdebug(2, 'e ['.$this->iden.'] F ['.$t->iden().']
');
$this->push($t);
$s = trim(substr($s, strlen($r[1])));
HTMLdebug(8, 's = '.$s);
}
}
}
// R:
function parsetag(&$s) {
global $HTMLcont, $HTMLbrac;
HTMLdebug(6, ' HTMLpara::parsetag');
$TagRe = '/^<(\/?\w+[^>]*)>/';
if(preg_match($TagRe, $s, $r)) {
$tag = trim($r[1]);
$t = new HTMLtag($tag);
HTMLdebug(2, 'e ['.$this->iden.'] F ['.$t->iden().'] ')
;
// S]tOC
if(!in_array($t->tag, $HTMLcont)) {
HTMLdebug(4, "$t->tag ]tOA~ parse ");
$this->parsetagmono($s, $t, $tag);
return true;
}
// Y
$bndb = preg_quote(strtolower($tag), '/');
$bnde = explode(" ", $tag);
$bnde = strtolower($bnde[0]);
$bnde = preg_quote($bnde, '/');
// Bz
if(in_array($t->tag, $HTMLbrac)) {
HTMLdebug(4, "n [$tag]");
$ns = $this->parsetagbrac($s, $bndb, $bnde);
} else {
HTMLdebug(4, " [$tag]");
$ns = $this->parsetagunbrac($s, $tag, $bndb, $bnde);
}
$c = new HTMLpara($this->iden, trim($ns), $t);
// SBz
if($t->tag == 'table') {
$c->parsetable();
}
$this->push($c);
}
}
function parsetagmono(&$s, &$t, &$tag) {
HTMLdebug(6, ' HTMLpara::parsetagmono');
$s = trim(substr($s, strlen($tag) + 2));
$this->push($t);
HTMLdebug(8, 's = '.$s);
}
function parsetagbrac(&$s, &$bndb, &$bnde) {
HTMLdebug(6, ' HTMLpara::parsetagbrac');
$len = $this->parsebalance($s, $bnde);
$p = trim(substr($s, 0, $len));
$s = trim(substr($s, $len));
$re = '/(<'.$bndb.'>(.*)(<\/'.$bnde.'[^>]*>))/i';
// v
if(preg_match($re, $p, $q)) {
HTMLdebug(4, 'e: '.$q[2]);
HTMLdebug(8, 's = '.$s);
$ns = &$q[2];
} else {
HTMLdebug(0, '~Gregex = '.$re);
HTMLdebug(0, '~Gp = '.$p);
HTMLdebug(0, '~Gs = '.$s);
die('io '.__line__);
}
return $ns;
}
function parsetagunbrac(&$s, &$tag, &$bndb, &$bnde) {
global $HTMLbrac, $HTMLCloseTag;
HTMLdebug(6, ' HTMLpara::parsetagunbrac');
HTMLdebug(5, 'J '.$s);
HTMLdebug(5, 'tag = '.$tag);
$p = substr($s, strlen($tag) + 2);
$skip = 0;
while($p) {
// Dr
if(preg_match('/^([^<]+)/i', $p, $q)) {
HTMLdebug(7, '[^<]+ = '.$q[1]);
$k = strlen($q[1]);
$skip += $k;
$p = substr($p, $k);
}
//
if(preg_match('/^(<\/?([\w]+)[^>]*>[^<]*)/i', $p, $q)) {
$CloseTag = &$q[2];
HTMLdebug(7, 'q[2] = '.$CloseTag);
if($CloseTag == $bnde) {
break;
}
$ct = $HTMLCloseTag["$bnde"];
if(is_array($ct) && in_array($CloseTag, $ct)) {
break;
}
}
// L_
if(in_array($q[2], $HTMLbrac)) {
$len = $this->parsebalance($p, $q[2]);
$skip += $len;
$p = substr($p, $len);
continue;
}
$k= strlen($q[1]);
$p = substr($p, $k);
$skip += $k;
}
$re = '/(<'.$bndb.'>(.{'.$skip.'})(<\/?'.$bnde.'[^>]*>)?)/i';
HTMLdebug(5, 'regex = '.$re);
// v
if(preg_match($re, $s, $p)) {
HTMLdebug(4, "e: $p[2]");
if($p[3] == '</'.$bnde.'>') { // pGF
$s = trim(substr($s, strlen($p[1])));
} else {
$s = trim(substr($s, strlen($p[1]) - strlen($p[3])));
}
HTMLdebug(8, 's = '.$s);
$ns = &$p[2];
} else {
die('io, line: '.__line__);
}
return $ns;
}
// X
function parsebalance($s, $bnde) {
HTMLdebug(6, ' HTMLpara::parsebalance');
HTMLdebug(5, 'J '.$s.' / '.$bnde);
$tmp = $s;
$balance = 0;
$len = 0;
$re = '/^(<\/?(\w+)[^>]*>([^<]*))/i';
HTMLdebug(6, 'regex: '.$re);
do {
if(!preg_match($re, $tmp, $p)) {
HTMLdebug(6, ' regex F');
break;
}
if(strtolower($p[2]) != $bnde) {
$sl = strlen($p[1]);
$len += $sl;
$tmp = trim(substr($tmp, $sl));
continue;
}
if($p[1][1] == '/') {
$balance--;
} else {
$balance++;
}
$sl = strlen($p[1]);
$len += $sl;
$tmp = trim(substr($tmp, strlen($p[1])));
HTMLdebug(6, 'balance = '.$balance.' len = '.$len.' sl = '.$sl);
} while($balance != 0);
if($balance) {
HTMLdebug(0, 'R~: '.$s);
die('Line '.__line__);
}
$len -= strlen($p[3]);
return $len;
}
// ApC
function parsetable() {
// `NGSBz rowspan p
HTMLdebug(6, ' HTMLpara::parsetable');
$td = array();
$tr = 0;
for($i = 1; $i < $this->cnt; $i++) {
$o = &$this->obj[$i];
if($o->iden() == 'tr') {
$tr++;
$ttd = 0;
for($j = 1; $j < $o->cnt; $j++) {
$p = &$o->obj[$j];
if($p->iden() == 'td' || $p->iden() == 'th') {
if(($csp = $p->obj[0]->getattr('colspan')) != NULL) {
$ttd += $csp;
} else {
$ttd++;
}
}
}
$td[] = $ttd;
} }
$max = 0;
for($i = 0; $i < count($td); $i++) {
if($max < $td[$i]) {
HTMLdebug(4, "td[".$i."] = ".$td[$i]);
$max = $td[$i];
}
}
$td = $max;
HTMLdebug(3, ' '.$tr.' CA'.$td.'');
// oO table I
$this->obj[0]->push(new HTMLattr('rows', $tr));
$this->obj[0]->push(new HTMLattr('cols', $td));
}
// table
function fixtable(&$s) {
HTMLdebug(6, ' HTMLpara::fixtable');
HTMLdebug(8, 'JF '.$s);
$re = '/^(<(\/?\w+)[^>]*>[^<]*)/i';
$tmp = $s;
$tags = array();
$len = 0;
while(preg_match($re, $tmp, $p)) {
if($p[2] == 'td' || $p[2] == 'th') {
break;
}
$tags[] = $p[2];
$sl = strlen($p[1]);
$len += $sl;
$tmp = substr($tmp, $sl);
}
// [J@ <tr>
$r = substr($s, 0, $len);
if(!in_array('tr', $tags)) {
HTMLdebug(6, '[JF <tr> ');
$r .= '<tr>';
}
$oldlen = $len;
while(preg_match($re, $tmp, $p)) {
$ot = $tags;
$ol = $len;
$tags = $p[2]; $len = strlen($p[1]);
$tmp = substr($tmp, $len);
}
// h@ <tr>
if($ot == 'tr') {
HTMLdebug(5, 'F <tr> ');
$r .= substr($s, $oldlen, strlen($s) - $oldlen - $len - $ol) .
substr($s, strlen($s) - $len);
} else {
$r .= substr($s, $oldlen);
}
$s = trim($r);
}
}
// HTML J class
class HTMLin extends Container {
function HTMLin($s) {
HTMLdebug(5, " HTMLin::HTMLin()");
$s = strtr($s, "\n", ' ');
$s = strtr($s, "\r", '');
$s = preg_replace('/<!.*>/U', '', $s); // Bz DTD//CSS
$s = preg_replace('/<[?%].*[?%]>/U', '', $s); // Bz PHP/ASP
$s = preg_replace('/>\s+</U', '><', $s); // d
$s = strchr($s, '<'); // Bz@eF
$this->iden = "HTMLin";
$t = new HTMLtag("HTMLin");
$this->push(new HTMLpara($this->iden, $s, $t));
}
function show($in = 0) {
HTMLdebug(7, " HTMLin::show($in)");
$r = Container::show($in);
return $r;
}
function out() {
HTMLdebug(7, ' HTMLin::out');
for($i = 0; $i < $this->cnt; $i++) {
$r[] = $this->obj[$i]->out();
}
return $r;
}
function type() {
return "HTMLin";
}
function iden() {
return "HTMLin";
}
}
?>
function getattr($a) {
HTMLdebug(5, ' HTMLtag::getattr');
for($i = 0; $i < $this->cnt; $i++) {
var $attr = array();
var $cnt = 0; // attr
|
Download
