HP自动检查html标签是否闭合

function HtmlClose($body) {
$strlen_var = strlen($body);
// 不包含 html 标签
if (strpos($body, '<') === false) {
return $body;
}
// html 代码标记
$html_tag = 0;
// 摘要字符串
$summary_string = ''; /**
* 数组用作记录摘要范围内出现的 html 标签
* 开始和结束分别保存在 left 和 right 键名下
* 如字符串为：<h3><p><b>a</b></h3>，假设 p 未闭合
* 数组则为：array('left' => array('h3', 'p', 'b'), 'right' => 'b', 'h3');
* 仅补全 html 标签，<? <% 等其它语言标记，会产生不可预知结果
*/
$html_array = array('left' => array(), 'right' => array());
for ($i = 0; $i < $strlen_var; ++$i) {
$current_var = substr($body, $i, 1); if ($current_var == '<') {
// html 代码开始
$html_tag = 1;
$html_array_str = '';
} else if ($html_tag == 1) {
// 一段 html 代码结束
if ($current_var == '>') {
/**
* 去除首尾空格，如 <br / > < img src="" / > 等可能出现首尾空格
*/
$html_array_str = trim($html_array_str); /**
* 判断最后一个字符是否为 /，若是，则标签已闭合，不记录
*/
if (substr($html_array_str, -1) != '/') { // 判断第一个字符是否 /，若是，则放在 right 单元
$f = substr($html_array_str, 0, 1);
if ($f == '/') {
// 去掉 /
$html_array['right'][] = str_replace('/', '', $html_array_str);
} else if ($f != '?') {
// 判断是否为 ?，若是，则为 PHP 代码，跳过 /**
* 判断是否有半角空格，若有，以空格分割，第一个单元为 html 标签
* 如 <h2 class="a"> <p class="a">
*/
if (strpos($html_array_str, ' ') !== false) {
// 分割成2个单元，可能有多个空格，如：<h2 class="" id="">
$html_array['left'][] = strtolower(current(explode(' ', $html_array_str, 2)));
} else {
/**
* * 若没有空格，整个字符串为 html 标签，如：<b> <p> 等
* 统一转换为小写
*/
$html_array['left'][] = strtolower($html_array_str);
}
}
} // 字符串重置
$html_array_str = '';
$html_tag = 0;
} else {
/**
* 将< >之间的字符组成一个字符串
* 用于提取 html 标签
*/
$html_array_str .= $current_var;
}
} else {
// 非 html 代码才记数
--$size;
} $ord_var_c = ord($body{$i}); switch (true) {
case (($ord_var_c & 0xE0) == 0xC0):
// 2 字节
$summary_string .= substr($body, $i, 2);
$i += 1;
break;
case (($ord_var_c & 0xF0) == 0xE0): // 3 字节
$summary_string .= substr($body, $i, 3);
$i += 2;
break;
case (($ord_var_c & 0xF8) == 0xF0):
// 4 字节
$summary_string .= substr($body, $i, 4);
$i += 3;
break;
case (($ord_var_c & 0xFC) == 0xF8):
// 5 字节
$summary_string .= substr($body, $i, 5);
$i += 4;
break;
case (($ord_var_c & 0xFE) == 0xFC):
// 6 字节
$summary_string .= substr($body, $i, 6);
$i += 5;
break;
default:
// 1 字节
$summary_string .= $current_var;
}
} if ($html_array['left']) {
/**
* 比对左右 html 标签，不足则补全
*/
/**
* 交换 left 顺序，补充的顺序应与 html 出现的顺序相反
* 如待补全的字符串为：<h2>abc<b>abc<p>abc
* 补充顺序应为：</p></b></h2>
*/
$html_array['left'] = array_reverse($html_array['left']); foreach ($html_array['left'] as $index => $tag) {
// 判断该标签是否出现在 right 中
$key = array_search($tag, $html_array['right']);
if ($key !== false) {
// 出现，从 right 中删除该单元
unset($html_array['right'][$key]);
} else {
// 没有出现，需要补全
$summary_string .= '</' . $tag . '>';
}
}
}
return $summary_string;
}

function sub($str,$start,$len) {//$str是指字符串，$start指字符串的起始位置，$len指字符串长度
$len=$len*3;
$strlen=$start+$len; //用$strlen存储字符串的总长度
$tmpstr='';
for($i=0;$i<$strlen;$i++) {
if(ord(substr($str,$i,1))>0xa0) { //如果字符串中出现汉字，也就是ASC码大于0xa0的。作出判断与英文字符不一样。
$tmpstr.=mb_substr($str,$i,2,'utf-8');
//$tmpstr.=substr($str,$i,2);
$i++;
}
else
$tmpstr.=mb_substr($str,$i,1,'utf-8');
}
return $tmpstr;
}