快捷導(dǎo)航

自動生成文章摘要的代碼[PHP 版本]

更新時間：2007年03月20日 00:00:00 作者：

實現(xiàn)內(nèi)容：截斷一段含有HTML代碼的文本，但是不會出現(xiàn)圍堵標(biāo)記沒有封閉的問題。
說明：這是PHP版的，用于在服務(wù)器端使用，如果你需要一個客戶端版的，請閱讀下一篇
我們在寫B(tài)LOG這樣的程序時經(jīng)常需要顯示文章前一部分的，但是又怕不恰當(dāng)?shù)慕財嗥茐姆忾]標(biāo)簽以造成整個文檔結(jié)構(gòu)破壞，使用我的函數(shù)可以在要求不高的情況下解決這個問題。
大家應(yīng)該考慮這個函數(shù)在服務(wù)端應(yīng)用還是在客戶端應(yīng)用。因為我考慮這個函數(shù)可能運行起來比較費機器，所以安全性要求不高的情況下可以放在客戶端上。
最好數(shù)據(jù)表中單獨一個字段放這個摘要，這樣相應(yīng)的數(shù)據(jù)庫查詢也優(yōu)化了。犧牲一點點空間換很多時間還是劃算的。
再聊一下安全性問題，主要是內(nèi)容安全性。如果客戶端意圖更改正常的摘要信息的話，一般都是BLOG的主人才有這個權(quán)力，那么他使得摘要和原文的一致性破壞就是他自己的事了。內(nèi)容以外的安全性都可以在服務(wù)端解決。所以還是推薦在客戶端使用本函數(shù)。
核心代碼

復(fù)制代碼代碼如下:

// PHP 4.3 or above needed  
define("BRIEF_LENGTH", 800);     //Word amount of the Briefing of an Article  
function Generate_Brief($text){  
  global $Briefing_Length;  
  if(strlen($text) <= BRIEF_LENGTH ) return $text;     
  $Foremost = substr($text, 0, BRIEF_LENGTH);  
  $re = "/<(\/?)(P|DIV|H1|H2|H3|H4|H5|H6|ADDRESS|PRE|TABLE|TR|TD|TH|INPUT|SELECT|TEXTAREA|OBJECT|A|UL|OL|LI|BASE|META|LINK|HR|BR|PARAM|IMG|AREA|INPUT|SPAN)[^>]*(>?)/i";  
  $Single = "/BASE|META|LINK|HR|BR|PARAM|IMG|AREA|INPUT/i";     
  $Stack = array(); $posStack = array();  
  preg_match_all($re,$Foremost,$matches, PREG_SET_ORDER | PREG_OFFSET_CAPTURE);  
  /*   [Child-matching Specification]:  
    $matches[$i][1] : A "/" charactor indicating whether current "<...>" Friction is Closing Part  
    $matches[$i][2] : Element Name.  
    $matches[$i][3] : Right > of a "<...>" Friction   */  
  for($i = 0 ; $i < count($matches); $i++){  
    if($matches[$i][1][0] == ""){  
        $Elem = $matches[$i][2][0];  
        if(preg_match($Single,$Elem) && $matches[$i][3][0] !=""){  
          continue;  
        }  
        array_push($Stack, strtoupper($matches[$i][2][0]));  
        array_push($posStack, $matches[$i][2][1]);           
        if($matches[$i][3][0] =="") break;  
    }else{  
        $StackTop = $Stack[count($Stack)-1];  
        $End = strtoupper($matches[$i][2][0]);  
        if(strcasecmp($StackTop,$End)==0){  
          array_pop($Stack);  
          array_pop($posStack);  
          if($matches[$i][3][0] ==""){  
            $Foremost = $Foremost.">";  
          }  
        }  
    }       
  }  
  $cutpos = array_shift($posStack) - 1;     
  $Foremost = substr($Foremost,0,$cutpos);  
  return $Foremost;  
}; 

若遇到問題（發(fā)現(xiàn)上面的函數(shù)對多字節(jié)字符集支持得不好）不煩試試下面的這個！

復(fù)制代碼代碼如下:

function Generate_Brief($text){  
  global $Briefing_Length;  
  mb_regex_encoding("UTF-8");  
  if(mb_strlen($text) <= BRIEF_LENGTH ) return $text;     
  $Foremost = mb_substr($text, 0, BRIEF_LENGTH);  
  $re = "<(\/?)(P|DIV|H1|H2|H3|H4|H5|H6|ADDRESS|PRE|TABLE|TR|TD|TH|INPUT|SELECT|TEXTAREA|OBJECT|A|UL|OL|LI|BASE|META|LINK|HR|BR|PARAM|IMG|AREA|INPUT|SPAN)[^>]*(>?)";  
  $Single = "/BASE|META|LINK|HR|BR|PARAM|IMG|AREA|INPUT|BR/i";     
  $Stack = array(); $posStack = array();  
  mb_ereg_search_init($Foremost, $re, 'i');  
  while($pos = mb_ereg_search_pos()){  
    $match = mb_ereg_search_getregs();  
    /*   [Child-matching Formulation]:  
        $matche[1] : A "/" charactor indicating whether current "<...>" Friction is Closing Part  
        $matche[2] : Element Name.  
        $matche[3] : Right > of a "<...>" Friction     
    */  
    if($match[1]==""){  
        $Elem = $match[2];  
        if(mb_eregi($Single, $Elem) && $match[3] !=""){  
          continue;  
        }  
        array_push($Stack, mb_strtoupper($Elem));  
        array_push($posStack, $pos[0]);           
    }else{  
        $StackTop = $Stack[count($Stack)-1];  
        $End = mb_strtoupper($match[2]);  
        if(strcasecmp($StackTop,$End)==0){  
          array_pop($Stack);  
          array_pop($posStack);  
          if($match[3] ==""){  
            $Foremost = $Foremost.">";  
          }  
        }  
    }  
  }  
  $cutpos = array_shift($posStack) - 1;     
  $Foremost = mb_substr($Foremost,0,$cutpos,"UTF-8");  
  return $Foremost;  
}; 