/
   删除非站内链接
 
  @aess    public
  @param     strg  $body  内容
  @param     array  $allow_urls  允许的超链接
  @return    strg
 /
function Replace_Lks( &$body, $allow_urls=array()  )
{
    $host_rule = jo('|', $allow_urls);
    $host_rule = preg_replace("#[\n\r]#", '', $host_rule);
    $host_rule = str_replace('.', "\\.", $host_rule);
    $host_rule = str_replace('/', "\\/", $host_rule);
    $arr = '';
    preg_match_all("#<a([^>])>(.)<\/a>#iU", $body, $arr);
    if( is_array($arr[0]) )
    {
        $rparr = array();
        $tgarr = array();
        foreach($arr[0] as $i=>$v)
        {
            if( $host_rule != '' && preg_match('#'.$host_rule.'#i', $arr[1][$i]) )
            {
                contue;
            } else {
                $rparr[] = $v;
                $tgarr[] = $arr[2][$i];
            }
        }
        if( !empty($rparr) )
        {
            $body = str_replace($rparr, $tgarr, $body);
        }
    }
    $arr = $rparr = $tgarr = '';
    return $body;
}

//自动摘要

//删除非站内链接
$allow_urls = array($_SERVER['HTTP_HOST']);
// 读取允许的超链接设置
if(file_exists(DEDEDATA."/adm/allowurl.txt"))
{
	$allow_urls = array_merge($allow_urls, file(DEDEDATA."/adm/allowurl.txt"));
}
$body = Replace_Lks($body, $allow_urls);