/*
* ============================== 截取含有 html标签的字符串 =========================
* @param (string) $str   待截取字符串
* @param (int)  $lenth  截取长度
* @param (string) $repalce 超出的内容用$repalce替换之（该参数可以为带有html标签的字符串）
* @param (string) $anchor 截取锚点，如果截取过程中遇到这个标记锚点就截至该锚点处
* @return (string) $result 返回值
* @demo  $res = cut_html_str($str, 256, \'...\'); //截取256个长度，其余部分用\'...\'替换
* -------------------------------------------------------------------------------
* $ Author: Wang Jian.	|	Email: wj@yurendu.com	|	Date: 2014/03/16
* ===============================================================================
*/ 
function cut_html_str($str, $lenth, $replace=\'\', $anchor=\'<!-- break -->\'){ 
	$_lenth = mb_strlen($str, \"utf-8\");	// 统计字符串长度（中、英文都算一个字符）
	if($_lenth <= $lenth){
		return $str;	// 传入的字符串长度小于截取长度，原样返回
	}
	$strlen_var = strlen($str); 	// 统计字符串长度（UTF8编码下-中文算3个字符，英文算一个字符）
	if(strpos($str, \'<\') === false){ 
		return mb_substr($str, 0, $lenth);	// 不包含 html 标签 ，直接截取
	} 
	if($e = strpos($str, $anchor)){ 
		return mb_substr($str, 0, $e);	// 包含截断标志，优先
	} 
	$html_tag = 0; 	// html 代码标记 
	$result = \'\'; 	// 摘要字符串
	$html_array = array(\'left\' => array(), \'right\' => array()); //记录截取后字符串内出现的 html 标签，开始=>left,结束=>right
	/*
	* 如字符串为：<h3><p><b>a</b></h3>，假设p未闭合，数组则为：array(\'left\'=>array(\'h3\',\'p\',\'b\'), \'right\'=>\'b\',\'h3\');
	* 仅补全 html 标签，<? <% 等其它语言标记，会产生不可预知结果
	*/ 
	for($i = 0; $i < $strlen_var; ++$i) { 
		if(!$lenth) break;	// 遍历完之后跳出
		$current_var = substr($str, $i, 1); // 当前字符
		if($current_var == \'<\'){ // html 代码开始 
			$html_tag = 1; 
			$html_array_str = \'\'; 
		}else if($html_tag == 1){ // 一段 html 代码结束 
			if($current_var == \'>\'){ 
				$html_array_str = trim($html_array_str); //去除首尾空格，如 <br / > < img src=\"\" / > 等可能出现首尾空格
				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_array_str .= $current_var; //将< >之间的字符组成一个字符串,用于提取 html 标签
			} 
		}else{ 
			--$lenth; // 非 html 代码才记数
		} 
		$ord_var_c = ord($str{$i}); 
		switch (true) { 
			case (($ord_var_c & 0xE0) == 0xC0): // 2 字节 
				$result .= substr($str, $i, 2); 
				$i += 1; break; 
			case (($ord_var_c & 0xF0) == 0xE0): // 3 字节
				$result .= substr($str, $i, 3); 
				$i += 2; break; 
			case (($ord_var_c & 0xF8) == 0xF0): // 4 字节
				$result .= substr($str, $i, 4); 
				$i += 3; break; 
			case (($ord_var_c & 0xFC) == 0xF8): // 5 字节 
				$result .= substr($str, $i, 5); 
				$i += 4; break; 
			case (($ord_var_c & 0xFE) == 0xFC): // 6 字节
				$result .= substr($str, $i, 6); 
				$i += 5; break; 
			default: // 1 字节 
				$result .= $current_var; 
		} 
	} 
	if($html_array[\'left\']){ //比对左右 html 标签，不足则补全
		$html_array[\'left\'] = array_reverse($html_array[\'left\']); //翻转left数组，补充的顺序应与 html 出现的顺序相反
		foreach($html_array[\'left\'] as $index => $tag){ 
			$key = array_search($tag, $html_array[\'right\']); // 判断该标签是否出现在 right 中
			if($key !== false){ // 出现，从 right 中删除该单元
				unset($html_array[\'right\'][$key]); 
			}else{ // 没有出现，需要补全 
				$result .= \'</\'.$tag.\'>\'; 
			} 
		} 
	} 
	return $result.$replace; 
}