电脑安全

您当前的位置:主页 > 电脑安全 >

php文章摘要 [源程序]-网络编程

来源:[db:来源]标题:   DIV    编辑:电脑技术全能网 时间:2019-09-23 12:34

原标题:php文章摘要 [源程序]-网络编程
   // PHP 4.3 or above neededdefine("BRIEF_LENGTH", 800);//Word amount of the Briefing of an Articlefunction 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;};

上一篇:PHP+DBM的同学录程序(2)-网络编程

下一篇:没有了