<?php 

require_once(dirname(__FILE__)."/../include/config_base.php");

//require_once(dirname(__FILE__)."/../include/inc_arcsearch_view.php");


require_once(dirname(__FILE__)."/../include/inc_typelink.php");
require_once(dirname(__FILE__)."/../include/pub_dedetag.php");
require_once(dirname(__FILE__)."/../include/pub_splitword_www.php");
/******************************************************
//Copyright 2004-2006 by DedeCms.com itprato
//本类的用途是用于文档搜索
******************************************************/
@set_time_limit(0);
//-----------------------
//搜索类
//-----------------------
class SearchView
{
 var $dsql;
 var $dtp;
 var $dtp2;
 var $TypeID;
 var $TypeLink;
 var $PageNo;
 var $TotalPage;
 var $TotalResult;
 var $PageSize;
 var $ChannelType;
 var $TempInfos;
 var $Fields;
 var $PartView;
 var $StartTime;
 var $Keywords;
 var $OrderBy;
 var $SearchType;
 var $KType;
 var $Keyword;
 var $TempletsFile;
 var $result;
 var $cacheid;
 //-------------------------------
 //php5构造函数
 //-------------------------------
 function __construct($typeid, $keyword, $achanneltype=0, $searchtype="title",$kwtype=0, $cacheid=0)
  {
  $this->TypeID = $typeid;
  $this->Keyword = $keyword;
  $this->OrderBy = '#@__full_search.aid desc';
  $this->KType = $kwtype;
  $this->PageSize = 20;
  $this->ChannelType = $achanneltype;
  $this->TempletsFile = '';
  $this->SearchType = $searchtype;
  $this->result = '';
  $this->cacheid = $cacheid;

  $this->dsql = new DedeSql(false);
  $this->dtp = new DedeTagParse();
  $this->dtp->SetNameSpace("dede","{","}");
  $this->dtp2 = new DedeTagParse();
  $this->dtp2->SetNameSpace("field","[","]");
  $this->TypeLink = new TypeLink($typeid);
  //$this->Keywords = $this->GetKeywords($keyword);

   //设置一些全局参数的值
   foreach($GLOBALS['PubFields'] as $k=>$v) $this->Fields[$k] = $v;

   if(isset($GLOBALS['PageNo'])) $this->PageNo = $GLOBALS['PageNo'];
   else $this->PageNo = 1;
   $this->CountRecord();
/*
   $tempfile = $GLOBALS['cfg_basedir'].$GLOBALS['cfg_templets_dir']."/".$GLOBALS['cfg_df_style']."/search.htm";
   if(!file_exists($tempfile)||!is_file($tempfile)){
    $this->Close();
    echo "模板文件：'".$tempfile."' 不存在，无法解析！";
    exit();
   }
   $this->dtp->LoadTemplate($tempfile);
   $this->TempletsFile = ereg_replace("^".$GLOBALS['cfg_basedir'],'',$tempfile);
   $this->TempInfos['tags'] = $this->dtp->CTags;
   $this->TempInfos['source'] = $this->dtp->SourceString;

   if($this->PageSize=="") $this->PageSize = 20;
     $this->TotalPage = ceil($this->TotalResult/$this->PageSize);
     if($this->PageNo==1){
      $this->dsql->ExecuteNoneQuery("Update #@__search_keywords set result='".$this->TotalResult."' where keyword='".addslashes($keyword)."'; ");
     }
*/
  }
  //php4构造函数
  //---------------------------
  function SearchView($typeid,$keyword,$achanneltype=0,$searchtype="title",$kwtype=0, $cacheid=0)
  {
   $this->__construct($typeid,$keyword,$achanneltype,$searchtype,$kwtype, $cacheid=0);
  }
  //---------------------------
  //关闭相关资源
  //---------------------------
  function Close()
  {
   $this->dsql->Close();
   $this->TypeLink->Close();
  }
  //获得关键字的分词结果，并保存到数据库
  //--------------------------------
  function GetKeywords($keyword){
    $keyword = cn_substr($keyword,50);
    $row = $this->dsql->GetOne("Select spwords From #@__search_keywords where keyword='".addslashes($keyword)."'; ");
    if(!is_array($row)){
     if(strlen($keyword) > 16){
        $sp = new SplitWord();
         $keywords = $sp->SplitRMM($keyword);
         $sp->Clear();
         $keywords = ereg_replace("[ ]{1,}"," ",trim($keywords));
      }else{
         $keywords = $keyword;
      }
      $inquery = "INSERT INTO `#@__search_keywords`(`keyword`,`spwords`,`count`,`result`,`lasttime`)
          VALUES ('".addslashes($keyword)."', '".addslashes($keywords)."', '1', '0', '".time()."');
       ";
      $this->dsql->ExecuteNoneQuery($inquery);
   }else{
     $this->dsql->ExecuteNoneQuery("Update #@__search_keywords set count=count+1,lasttime='".time()."' where keyword='".addslashes($keyword)."'; ");
     $keywords = $row['spwords'];
   }
   return $keywords;
  }
  //----------------
  //获得关键字SQL
  //----------------
  function GetKeywordSql()
  {
   $where = $where1 = array();

   if($this->TypeID > 0){
    $where[] = "#@__full_search.typeid={$this->TypeID}";
   }
   if(!empty($this->ChannelType)){
    $where[] = "#@__full_search.channelid={$this->ChannelType}";
   }

   $ks = explode(' ',$this->Keywords);
   sort($ks);
  reset ($ks);
  $wherearr = array();
   foreach($ks as $k)
   {
    $kwsqlarr = array();
    $k = trim($k);
    if(strlen($k) < 3){
      continue;
      //echo '关键词过短，搜索程序终止程序执行';
      //exit;
    }
    $k = addslashes($k);

    if($this->SearchType != "titlekeyword"){
     $kwsqlarr[] = " #@__full_search.title like '%$k%' ";
    }else{
     $kwsqlarr[] = " #@__full_search.title like '%$k%' ";
     $kwsqlarr[] = " #@__full_search.addinfos like '%$k%' ";
     $kwsqlarr[] = " #@__full_search.keywords like '%$k%' ";
   }
   $wherearr[] = '('.implode(' OR ',$kwsqlarr).')';
   }
  if($this->KType==1){
   $where[] = '('.implode(' AND ',$wherearr).')';
  }else{
   $where[] = '('.implode(' OR ',$wherearr).')';
  }
  $wheresql = implode(' AND ',$where);

  $wheresql = 'arcrank > -1 and '.$wheresql;

   return $wheresql;
  }

  //-------------------
  //获得相关的关键字
  //-------------------
  function GetLikeWords($num=8){
   $ks = explode(" ",$this->Keywords);
   $lsql = "";
   foreach($ks as $k){
    $k = trim($k);
      if(strlen($k)<2) continue;
    if(ord($k[0])>0x80 && strlen($k)<3) continue;
    $k = addslashes($k);
    if($lsql=="") $lsql = $lsql." CONCAT(spwords,' ') like '%$k %' ";
    else $lsql = $lsql." Or CONCAT(spwords,' ') like '%$k %' ";
   }
   if($lsql=="") return "";
   else{
    $likeword = "";
    $lsql = "(".$lsql.") And Not(keyword like '".addslashes($this->Keyword)."') ";
    $this->dsql->SetQuery("Select keyword,count From #@__search_keywords where $lsql order by lasttime desc limit 0,$num; ");
    $this->dsql->Execute('l');
    while($row=$this->dsql->GetArray('l')){
      if($row['count']>1000) $fstyle=" style='font-size:11pt;color:red'";
      else if($row['count']>300) $fstyle=" style='font-size:10pt;color:green'";
      else $style = "";
      $likeword .= '　<a href="search.php?keyword='.urlencode($row['keyword']).'"'.$style."><u>".$row['keyword']."</u></a> ";
    }
    return $likeword;
   }
  }
  //----------------
  //加粗关键字
  //----------------
  function GetRedKeyWord($fstr)
  {
   $ks = explode(" ",$this->Keywords);
   $kwsql = "";
   $words = array();
   foreach($ks as $k){
    $k = trim($k);
    if($k=="") continue;
    if(ord($k[0])>0x80 && strlen($k)<3) continue;
    //$fstr = str_replace($k,"<font color='red'>$k</font>",$fstr);
    $words[] = $k;
   }
   $fstr = highlight($fstr, $words);
   return $fstr;
  }
  //------------------
  //统计列表里的记录
  //------------------
  function CountRecord()
  {
  global $cfg_search_maxlimit, $cfg_search_cachetime;
  $cfg_search_cachetime = max(1,intval($cfg_search_cachetime));
  $expiredtime = time() - $cfg_search_cachetime * 3600;
  if(empty($cfg_search_maxlimit)) $cfg_search_maxlimit = 500;
  if(empty($this->cacheid)){
   //$where = $this->GetKeywordSql();
   $where=" arcrank > -1 and  #@__full_search.title='".$this->Keyword."' ";
   $query = "Select aid from #@__full_search where $where limit $cfg_search_maxlimit";

   
   
   $md5 = md5($query);
   $timestamp = time();
   $cachequery = $this->dsql->getone("select * from #@__search_cache where md5='$md5' And addtime > $expiredtime limit 1");
   if(is_array($cachequery))
   {
    $nums = $cachequery['nums'];
    $result = $cachequery['result'];
    $this->result = $result;
    $this->TotalResult = $nums;
    $this->cacheid = $cachequery['cacheid'];

   }else{
   
    $this->dsql->SetQuery($query);
    $this->dsql->execute();
    $aidarr = array();
    $aidarr[] = 0;
    while($row = $this->dsql->getarray()){
     $aidarr[] = $row['aid'];
    }
    $nums = count($aidarr)-1;
   
    $aids = implode(',', $aidarr);
    $delete = "delete from #@__search_cache where addtime < $expiredtime;";
    $this->dsql->SetQuery($delete);
    $this->dsql->executenonequery();
    $insert = "insert into #@__search_cache(`nums`, `md5`, `result`, `usetime`, `addtime`)
     values('$nums', '$md5', '$aids','$timestamp', '$timestamp')";
    $this->dsql->SetQuery($insert);
    $this->dsql->executenonequery();
    $this->result = $aids;
    $this->TotalResult = $nums;
    $this->cacheid = $this->dsql->GetLastID();
   }
  }else{
   $cachequery = $this->dsql->getone("select * from #@__search_cache where cacheid=".$this->cacheid." limit 1");
  
   if(is_array($cachequery)){
    $nums = $cachequery['nums'];
    $result = $cachequery['result'];
    $this->dsql->setquery($update);
    $this->dsql->executenonequery();
    $this->result = $result;
    $this->TotalResult = $nums;
   }else
   {
    ShowMsg("系统出错，请与管理员联系！","javascript:;");
    $this->Close();
    exit();
   }
  }
 }

  //------------------
  //显示列表
  //------------------
  function Display()
  {
   foreach($this->dtp->CTags as $tagid=>$ctag){
    $tagname = $ctag->GetName();
    if($tagname=="list"){
     $limitstart = ($this->PageNo-1) * $this->PageSize;
     $row = $this->PageSize;
     if(trim($ctag->GetInnerText())==""){ $InnerText = GetSysTemplets("list_fulllist.htm"); }
     else{ $InnerText = trim($ctag->GetInnerText()); }
     $this->dtp->Assign($tagid,
           $this->GetArcList($limitstart,
           $row,
           $ctag->GetAtt("col"),
           $ctag->GetAtt("titlelen"),
           $ctag->GetAtt("infolen"),
           $ctag->GetAtt("imgwidth"),
           $ctag->GetAtt("imgheight"),
           $this->ChannelType,
           $this->OrderBy,
           $InnerText,
           $ctag->GetAtt("tablewidth"))
     );
    }
    else if($tagname=="pagelist"){
     $list_len = trim($ctag->GetAtt("listsize"));
     if($list_len=="") $list_len = 3;
     $this->dtp->Assign($tagid,$this->GetPageListDM($list_len));
    }
    else if($tagname=="likewords"){
     $this->dtp->Assign($tagid,$this->GetLikeWords($ctag->GetAtt('num')));
    }
    else if($tagname=="hotwords"){
     $this->dtp->Assign($tagid,
     GetHotKeywords($this->dsql,$ctag->GetAtt('num'),$ctag->GetAtt('subday'),$ctag->GetAtt('maxlength')));
    }
    else if($tagname=="field") //类别的指定字段
    {
      if(isset($this->Fields[$ctag->GetAtt('name')]))
        $this->dtp->Assign($tagid,$this->Fields[$ctag->GetAtt('name')]);
      else
        $this->dtp->Assign($tagid,"");
    }
    else if($tagname=="channel")//下级频道列表
    {
       if($this->TypeID>0){
        $typeid = $this->TypeID; $reid = $this->TypeLink->TypeInfos['reID'];
       }
       else{ $typeid = 0; $reid=0; }

       $this->dtp->Assign($tagid,
           $this->TypeLink->GetChannelList($typeid,
               $reid,
               $ctag->GetAtt("row"),
               $ctag->GetAtt("type"),
               $ctag->GetInnerText()
           )
       );
    }//End if
    }
    $this->Close();
   $this->dtp->Display();
  }
  //----------------------------------
  //获得文档列表
//---------------------------------
  function GetArcList($limitstart=0,$perpage=10,$col=1,$titlelen=30,$infolen=250,
  $imgwidth=120,$imgheight=90,$achanneltype="all",$orderby=" aid desc ",$innertext="",$tablewidth="100")
  {

     $typeid=$this->TypeID;
     if($perpage=="") $perpage = 10;
  if($limitstart=="") $limitstart = 0;
  if($titlelen=="") $titlelen = 30;
  if($infolen=="") $infolen = 250;
     if($achanneltype=="") $achanneltype = "0";
  $innertext = trim($innertext);
  if($innertext=="") $innertext = GetSysTemplets("search_list.htm");
  $ordersql = "order by ".$this->OrderBy;

  $query = "select * from #@__full_search left join #@__arctype on #@__arctype.ID=#@__full_search.typeid
    where aid in ($this->result) $ordersql limit $limitstart,$perpage ";

  $this->dsql->SetQuery($query);
  $this->dsql->Execute("al");
     $artlist = "";
     $this->dtp2->LoadSource($innertext);
  $tt = 0;
     for($i=0;$i<$perpage;$i++)
  {
         if($row = $this->dsql->GetArray("al"))
         {
           //处理一些特殊字段
           $row["arcurl"] = $row["url"];
           $row["description"] = $this->GetRedKeyWord(cn_substr($row["addinfos"],$infolen));
           $row["title"] = $this->GetRedKeyWord(cn_substr($row["title"],$titlelen));
           $row["id"] =  $row["aid"];
           if($row["litpic"]=="") $row["litpic"] = $GLOBALS["cfg_plus_dir"]."/img/dfpic.gif";
           $row["picname"] = $row["litpic"];
           $row["typeurl"] = $this->GetListUrl($row["typeid"],$row["typedir"],$row["isdefault"],$row["defaultname"],$row["ispart"],$row["namerule2"],$row["siteurl"]);
           $row["info"] = $row["description"];
           $row["filename"] = $row["arcurl"];
           $row["stime"] = GetDateMK($row["uptime"]);
           $row["textlink"] = "<a href='".$row["filename"]."'>".$row["title"]."</a>";
           $row["typelink"] = "[<a href='".$row["typeurl"]."'>".$row["typename"]."</a>]";
           $row["imglink"] = "<a href='".$row["filename"]."'><img src='".$row["picname"]."' border='0' width='$imgwidth' height='$imgheight'></a>";
           $row["image"] = "<img src='".$row["picname"]."' border='0' width='$imgwidth' height='$imgheight'>";
           $row["phpurl"] = $GLOBALS["cfg_plus_dir"];
      $row["templeturl"] = $GLOBALS["cfg_templets_dir"];
      $row["memberurl"] = $GLOBALS["cfg_member_dir"];
           //---------------------------
           if(is_array($this->dtp2->CTags)){
             foreach($this->dtp2->CTags as $k=>$ctag){
              if(isset($row[$ctag->GetName()])) $this->dtp2->Assign($k,$row[$ctag->GetName()]);
              else $this->dtp2->Assign($k,"");
            }
           }
           $artlist .= $this->dtp2->GetResult();
           $tt = 1;
         }//if hasRow
         else{
          if($tt == 0 && $this->KType == 1){
      $sp1 = new SearchView($this->TypeID,$this->Keyword,$this->ChannelType,$this->SearchType,0,$this->cacheid);
      $sp1->Display();
      $sp1->Close();
      exit;
         }else{
          $artlist .= '';
         }
         }
     }//Loop Line
     $this->dsql->FreeResult("al");
     return $artlist;
  }
  //---------------------------------
  //获取动态的分页列表
  //---------------------------------
 function GetPageListDM($list_len)
 {
  global $id;
  $prepage="";
  $nextpage="";
  $prepagenum = $this->PageNo-1;
  $nextpagenum = $this->PageNo+1;
  if($list_len==""||ereg("[^0-9]",$list_len)) $list_len=3;
  $totalpage = ceil($this->TotalResult/$this->PageSize);
  if($totalpage<=1 && $this->TotalResult>0) return "共1页/".$this->TotalResult."条";
  if($this->TotalResult == 0) return "共0页/".$this->TotalResult."条";

  $purl = $this->GetCurUrl();
  $geturl = "keyword=".urlencode($this->Keyword)."&searchtype=".$this->SearchType;
  $geturl .= "&channeltype=".$this->ChannelType;
  $geturl .= "&kwtype=".$this->KType."&pagesize=".$this->PageSize;
  $geturl .= "&typeid=".$this->TypeID."&cacheid=".$this->cacheid."&";

  $hidenform = "<input type='hidden' name='typeid' value='".$this->TypeID."'>\r\n";
  $hidenform .= "<input type='hidden' name='TotalResult' value='".$this->TotalResult."'>\r\n";

  $purl .= "?".$geturl;

  //获得上一页和下一页的链接
  if($this->PageNo != 1){
   $prepage.="<a href='".$purl."PageNo=$prepagenum'>上一页</a>\r\n";
   $indexpage="<a href='".$purl."PageNo=1'>首页</a>\r\n";
  }
  else{
   $indexpage="<a>首页</a>\r\n";
  }

  if($this->PageNo!=$totalpage && $totalpage>1){
   $nextpage.="<a href='".$purl."PageNo=$nextpagenum'>下一页</a>\r\n";
   $endpage="<a href='".$purl."PageNo=$totalpage'>末页</a>\r\n";
  }
  else{
   $endpage="<a>末页</a>\r\n";
  }
  //获得数字链接
  $listdd="";
  $total_list = $list_len * 2 + 1;
  if($this->PageNo >= $total_list) {
      $j = $this->PageNo-$list_len;
      $total_list = $this->PageNo+$list_len;
      if($total_list>$totalpage) $total_list=$totalpage;
  }
  else{
      $j=1;
      if($total_list>$totalpage) $total_list=$totalpage;
  }
  for($j;$j<=$total_list;$j++)
  {
     if($j==$this->PageNo) $listdd.= "<strong>$j</strong>\r\n";
     else $listdd.="<a href='".$purl."PageNo=$j'>".$j."</a>\r\n";
  }
  $plist  =  "";
  $plist .= "<form name='pagelist' action='".$this->GetCurUrl()."'>$hidenform";
  $plist .= $indexpage;
  $plist .= $prepage;
  $plist .= $listdd;
  $plist .= $nextpage;
  $plist .= $endpage;
  if($totalpage>$total_list){
   $plist.="<input type='text' name='PageNo' style='width:30px;height:18px' value='".$this->PageNo."'>\r\n";
   $plist.="<input type='submit' name='plistgo' value='GO' style='width:24px;height:18px;font-size:9pt'>\r\n";
  }
  $plist .= "</form>\r\n";
  return $plist;
 }
  //--------------------------
  //获得一个指定的频道的链接
  //--------------------------
  function GetListUrl($typeid,$typedir,$isdefault,$defaultname,$ispart,$namerule2)
  {
   return GetTypeUrl($typeid,MfTypedir($typedir),$isdefault,$defaultname,$ispart,$namerule2);
  }
  //---------------
  //获得当前的页面文件的url
  //----------------
  function GetCurUrl()
 {
  if(!empty($_SERVER["REQUEST_URI"])){
   $nowurl = $_SERVER["REQUEST_URI"];
   $nowurls = explode("?",$nowurl);
   $nowurl = $nowurls[0];
  }
  else
  { $nowurl = $_SERVER["PHP_SELF"]; }
  return $nowurl;
 }
}//End Class


$channelid = isset($channelid) && is_numeric($channelid) ? $channelid : 0;

if(empty($typeid)) $typeid = 0;
else $typeid = ereg_replace("[^0-9]","",$typeid);

if($typeid){
 $channelid = 0;
}

$searchtype = "title";

$cacheid = isset($cacheid) && is_numeric($cacheid) ? $cacheid : 0;
//$kwtype = isset($kwtype) && $kwtype == 0 ? 0 : 1;
$kwtype = 0;
$keyword = stripslashes($keyword);
$keyword=addslashes($keyword);
/*if(ereg("[><]",$keyword)){
 echo("[err]你的关键词输入不合法！[/err]");
 exit();
}
$keyword = ereg_replace("[\|\"\r\n\f\t%\*\?\(\)\$;,'%-><]"," ",trim($keyword));
*/
if( ($cfg_notallowstr!='' && eregi($cfg_notallowstr,$keyword)) || ($cfg_replacestr!='' && eregi($cfg_replacestr,$keyword)) ){
 echo "[err]你的信息中存在非法内容，被系统禁止！[/err]"; exit();
}

if($keyword=="" || strlen($keyword) < 3 ){
 ShowMsg("[err]关键字不能小于3个字！[/err]");
 exit();
}


$sp = new SearchView($typeid,$keyword,$channelid,$searchtype,$kwtype,$cacheid);
if ($sp->TotalResult==0)
 echo("0");
else
 echo("1");
 
$sp->Close();
?>