DedeBIZ
/
DedeV6
Sledovat 2
Oblíbit 0
Rozštěpit 0
Zdrojový kód Požadavky na natažení 0 Vydání 31 Aktivita
国内流行的内容管理系统（CMS）多端全媒体解决方案 https://www.dedebiz.com
Nelze vybrat více než 25 témat Téma musí začínat písmenem nebo číslem, může obsahovat pomlčky („-“) a může být dlouhé až 35 znaků.
2921 Revize
3 Větve
93MB
Strom: 389504f5d2
Větve Značky
${ item.name }
Vytvořit větev ${ searchTerm }
z „389504f5d2“
${ noResults }
DedeV6/src/system/libraries/splitword.class.php

1033 řádky
37KB
Surový Blame Historie 

  1. <?php

  2. if (!defined('DEDEINC')) exit('dedebiz');

  3. /**

  4.  * Unicode编码词典的php分词器

  5.  *

  6.  *  1、只适用于php5，必要函数 iconv

  7.  *  2、本程序是使用RMM逆向匹配算法进行分词的，词库需要特别编译，本类里提供了 MakeDict() 方法

  8.  *  3、简单操作流程：SetSource -> StartAnalysis -> Get***Result

  9.  *  4、对主词典使用特殊格式进行编码, 不需要载入词典到内存操作

  10.  *

  11.  * @version        $id:splitword.class.php 2 11:45 2011-2-14 itplato $

  12.  * @package        DedeBIZ.Libraries

  13.  * @copyright      Copyright (c) 2022 DedeBIZ.COM

  14.  * @license        GNU GPL v2 (https://www.dedebiz.com/license)

  15.  * @link           https://www.dedebiz.com

  16.  */

  17. //常量定义

  18. define('_SP_', chr(0xFF).chr(0xFE)); 

  19. define('UCS2', 'ucs-2be');

  20. class SplitWord

  21. {

  22.     //hash算法选项

  23.     var $mask_value = 0xFFFF;

  24.     //输入和输出的字符编码（只允许 utf-8、gbk/gb2312/gb18030、big5 三种类型）  

  25.     var $sourceCharSet = 'utf-8';

  26.     var $targetCharSet = 'utf-8';

  27.     //生成的分词结果数据类型 1 为全部，2为 词典词汇及单个中日韩简繁字符及英文，3 为词典词汇及英文

  28.     var $resultType = 1;

  29.     //句子长度小于这个数值时不拆分，notSplitLen = n(个汉字) * 2 + 1

  30.     var $notSplitLen = 5;

  31.     //把英文单词全部转小写

  32.     var $toLower = FALSE;

  33.     //使用最大切分模式对二元词进行消岐

  34.     var $differMax = FALSE;

  35.     //尝试合并单字

  36.     var $unitWord = TRUE;

  37.     //初始化类时直接加载词典

  38.     var $loadInit = TRUE;

  39.     //使用热门词优先模式进行消岐

  40.     var $differFreq = FALSE;

  41.     //被转换为unicode的源字符串

  42.     var $sourceString = '';

  43.     //附加词典

  44.     var $addonDic = array();

  45.     var $addonDicFile = 'data/words_addons.dic';

  46.     //主词典 

  47.     var $dicStr = '';

  48.     var $mainDic = array();

  49.     var $mainDicHand = FALSE;

  50.     var $mainDicInfos = array();

  51.     var $mainDicFile = 'data/base_dic_full.dic';

  52.     //是否直接载入词典（选是载入速度较慢，但解析较快；选否载入较快，但解析较慢，需要时才会载入特定的词条）

  53.     var $mainDicFileZip = 'data/base_dic_full.zip';

  54.     var $isLoadAll = FALSE;

  55.     var $isUnpacked = FALSE;

  56.     //主词典词语最大长度 x / 2

  57.     var $dicWordMax = 14;

  58.     //粗分后的数组（通常是截取句子等用途）

  59.     var $simpleResult = array();

  60.     //最终结果(用空格分开的词汇列表)

  61.     var $finallyResult = array();

  62.     //是否已经载入词典

  63.     var $isLoadDic = FALSE;

  64.     //系统识别或合并的新词

  65.     var $newWords = array();

  66.     var $foundWordStr = '';

  67.     //词库载入时间

  68.     var $loadTime = 0;

  69.     /**

  70.      * 构造函数

  71.      * @param $source_charset

  72.      * @param $target_charset

  73.      * @param $load_alldic 

  74.      * @param $source

  75.      *

  76.      * @return void

  77.      */

  78.     function __construct($source_charset='utf-8', $target_charset='utf-8', $load_all=TRUE, $source='')

  79.     {

  80.         $this->SetSource( $source, $source_charset, $target_charset );

  81.         $this->isLoadAll = $load_all;

  82.         if (file_exists(DEDEINC.'/'.$this->mainDicFile)) $this->isUnpacked = TRUE;

  83.         if ($this->loadInit) $this->LoadDict();

  84.     }

  85.     function SplitWord($source_charset='utf-8', $target_charset='utf-8', $load_all=TRUE, $source='')

  86.     {

  87.         $this->__construct($source_charset, $target_charset, $load_all, $source);

  88.     }

  89.     /**

  90.     * 析构函数

  91.     */

  92.     function __destruct()

  93.     {

  94.         if ( $this->mainDicHand !== FALSE )

  95.         {

  96.             @fclose( $this->mainDicHand );

  97.         }

  98.     }

  99.     /**

  100.      * 根据字符串计算key索引

  101.      * @param $key

  102.      * @return int int

  103.      */

  104.     function _get_index( $key )

  105.     {

  106.         $l = strlen($key);

  107.         $h = 0x238f13af;

  108.         while ($l--)

  109.         {

  110.             $h += ($h << 5);

  111.             $h ^= ord($key[$l]);

  112.             $h &= 0x7fffffff;

  113.         }

  114.         return ($h % $this->mask_value);

  115.     }

  116.     /**

  117.      * 从文件获得词

  118.      * @param $key

  119.      * @param $type (类型 word 或 key_groups)

  120.      * @return mixed int

  121.      */

  122.     function GetWordInfos( $key, $type='word' )

  123.     {

  124.         if ( !$this->mainDicHand )

  125.         {

  126.             $this->mainDicHand = fopen($this->mainDicFile, 'r');

  127.         }

  128.         $p = 0;

  129.         $keynum = (int)$this->_get_index( $key );

  130.         if ( isset($this->mainDicInfos[ $keynum ]) )

  131.         {

  132.             $data = $this->mainDicInfos[ $keynum ];

  133.         } else {

  134.             //rewind( $this->mainDicHand );

  135.             $move_pos = $keynum * 8;

  136.             fseek($this->mainDicHand, $move_pos, SEEK_SET);

  137.             $dat = fread($this->mainDicHand, 8);

  138.             $arr = unpack('I1s/n1l/n1c', $dat);

  139.             if ( $arr['l'] == 0 )

  140.             {

  141.                 return FALSE;

  142.             }

  143.             fseek($this->mainDicHand, $arr['s'], SEEK_SET);

  144.             $data = @unserialize(fread($this->mainDicHand, $arr['l']));

  145.             $this->mainDicInfos[ $keynum ] = $data;

  146.        }

  147.        if ( !is_array($data) || !isset($data[$key]) ) 

  148.        {

  149.            return FALSE;

  150.        }

  151.        return ($type=='word' ? $data[$key] : $data);

  152.     }

  153.     /**

  154.      * 设置源字符串

  155.      * @param $source

  156.      * @param $source_charset

  157.      * @param $target_charset

  158.      *

  159.      * @return bool

  160.      */

  161.     function SetSource( $source, $source_charset='utf-8', $target_charset='utf-8' )

  162.     {

  163.         $this->sourceCharSet = strtolower($source_charset);

  164.         $this->targetCharSet = strtolower($target_charset);

  165.         $this->simpleResult = array();

  166.         $this->finallyResult = array();

  167.         if ( $source != '' )

  168.         {

  169.             $rs = TRUE;

  170.             if ( preg_match("/^utf/", $source_charset) ) {

  171.                 $this->sourceString = @iconv('utf-8', UCS2, $source);

  172.             }

  173.             else if ( preg_match("/^gb/", $source_charset) ) {

  174.                 $this->sourceString = @iconv('utf-8', UCS2, iconv('gb18030', 'utf-8', $source));

  175.             }

  176.             else if ( preg_match("/^big/", $source_charset) ) {

  177.                 $this->sourceString = @iconv('utf-8', UCS2, iconv('big5', 'utf-8', $source));

  178.             } else {

  179.                 $rs = FALSE;

  180.             }

  181.         } else {

  182.            $rs = FALSE;

  183.         }

  184.         return $rs;

  185.     }

  186.     /**

  187.      * 设置结果类型(只在获取finallyResult才有效)

  188.      * @param $rstype 1 为全部，2去除特殊符号

  189.      *

  190.      * @return void

  191.      */

  192.     function SetResultType( $rstype )

  193.     {

  194.         $this->resultType = $rstype;

  195.     }

  196.     /**

  197.      * 载入词典

  198.      *

  199.      * @return void

  200.      */

  201.     function LoadDict( $maindic='' )

  202.     {

  203. 		$this->addonDicFile = DEDEINC.'/libraries/'.$this->addonDicFile;

  204. 		$this->mainDicFile = DEDEINC.'/libraries/'.$this->mainDicFile;

  205. 		$this->mainDicFileZip = DEDEINC.'/libraries/'.$this->mainDicFileZip;

  206.         $startt = microtime(TRUE);

  207.         //正常读取文件

  208.         $dicAddon = $this->addonDicFile;

  209.         if ($maindic=='' || !file_exists($maindic) )

  210.         {

  211.             $dicWords = $this->mainDicFile ;

  212.         } else {

  213.             $dicWords = $maindic;

  214.             $this->mainDicFile = $maindic;

  215.         }

  216.         //加载主词典（只打开）

  217.         if ($this->isUnpacked){

  218.         	$this->mainDicHand = fopen($dicWords, 'r');

  219.         }

  220.         //载入副词典

  221.         $hw = '';

  222.         $ds = file($dicAddon);

  223.         foreach($ds as $d)

  224.         {

  225.             $d = trim($d);

  226.             if ($d=='') continue;

  227.             $estr = substr($d, 1, 1);

  228.             if ( $estr==':' ) {

  229.                 $hw = substr($d, 0, 1);

  230.             } else {

  231.                 $spstr = _SP_;

  232.                 $spstr = iconv(UCS2, 'utf-8', $spstr);

  233.                 $ws = explode(',', $d);

  234.                 $wall = iconv('utf-8', UCS2, join($spstr, $ws));

  235.                 $ws = explode(_SP_, $wall);

  236.                 foreach($ws as $estr)

  237.                 {

  238.                     $this->addonDic[$hw][$estr] = strlen($estr);

  239.                 }

  240.             }

  241.         }

  242.         $this->loadTime = microtime(TRUE) - $startt;

  243.         $this->isLoadDic = TRUE;

  244.     }

  245.     /**

  246.     * 检测某个词是否存在

  247.     */

  248.     function IsWord( $word )

  249.     {

  250.          $winfos = $this->GetWordInfos( $word );

  251.          return ($winfos !== FALSE);

  252.     }

  253.     /**

  254.      * 获得某个词的词性及词频信息

  255.      * @parem $word unicode编码的词

  256.      * @return string

  257.      */

  258.     function GetWordProperty($word)

  259.     {

  260.         if ( strlen($word)<4 )

  261.         {

  262.             return '/s';

  263.         }

  264.         $infos = $this->GetWordInfos($word);

  265.         return isset($infos[1]) ? "/{$infos[1]}{$infos[0]}" : "/s";

  266.     }

  267.     /**

  268.      * 指定某词的词性信息（通常是新词）

  269.      * @parem $word unicode编码的词

  270.      * @parem $infos array('c' => 词频, 'm' => 词性);

  271.      * @return void;

  272.      */

  273.     function SetWordInfos($word, $infos)

  274.     {

  275.         if ( strlen($word)<4 )

  276.         {

  277.             return ;

  278.         }

  279.         if ( isset($this->mainDicInfos[$word]) )

  280.         {

  281.             $this->newWords[$word]++;

  282.             $this->mainDicInfos[$word]['c']++;

  283.         } else {

  284.             $this->newWords[$word] = 1;

  285.             $this->mainDicInfos[$word] = $infos;

  286.         }

  287.     }

  288.     /**

  289.      * 开始执行分析

  290.      * @parem bool optimize 是否对结果进行优化

  291.      * @return void

  292.      */

  293.     function StartAnalysis($optimize=TRUE)

  294.     {

  295.         if ( !$this->isLoadDic )

  296.         {

  297.             $this->LoadDict();

  298.         }

  299.         $this->simpleResult = $this->finallyResult = array();

  300.         $this->sourceString .= chr(0).chr(32);

  301.         $slen = strlen($this->sourceString);

  302.         $sbcArr = array();

  303.         $j = 0;

  304.         //全角与半角字符对照表

  305.         for($i=0xFF00; $i < 0xFF5F; $i++)

  306.         {

  307.             $scb = 0x20 + $j;

  308.             $j++;

  309.             $sbcArr[$i] = $scb;

  310.         }

  311.         //对字符串进行粗分

  312.         $onstr = '';

  313.         $lastc = 1; //1 中/韩/日文, 2 英文/数字/符号('.', '@', '#', '+'), 3 ANSI符号 4 纯数字 5 非ANSI符号或不支持字符

  314.         $s = 0;

  315.         $ansiWordMatch = "[0-9a-z@#%\+\.-]";

  316.         $notNumberMatch = "[a-z@#%\+]";

  317.         for($i=0; $i < $slen; $i++)

  318.         {

  319.             $c = $this->sourceString[$i].$this->sourceString[++$i];

  320.             $cn = hexdec(bin2hex($c));

  321.             $cn = isset($sbcArr[$cn]) ? $sbcArr[$cn] : $cn;

  322.             //ANSI字符

  323.             if ($cn < 0x80)

  324.             {

  325.                 if ( preg_match('/'.$ansiWordMatch.'/i', chr($cn)) )

  326.                 {

  327.                     if ( $lastc != 2 && $onstr != '') {

  328.                         $this->simpleResult[$s]['w'] = $onstr;

  329.                         $this->simpleResult[$s]['t'] = $lastc;

  330.                         $this->_deep_analysis($onstr, $lastc, $s, $optimize);

  331.                         $s++;

  332.                         $onstr = '';

  333.                     }

  334.                     $lastc = 2;

  335.                     $onstr .= chr(0).chr($cn);

  336.                 } else {

  337.                     if ( $onstr != '' )

  338.                     {

  339.                         $this->simpleResult[$s]['w'] = $onstr;

  340.                         if ( $lastc==2 )

  341.                         {

  342.                             if ( !preg_match('/'.$notNumberMatch.'/i', iconv(UCS2, 'utf-8', $onstr)) ) $lastc = 4;

  343.                         }

  344.                         $this->simpleResult[$s]['t'] = $lastc;

  345.                         if ( $lastc != 4 ) $this->_deep_analysis($onstr, $lastc, $s, $optimize);

  346.                         $s++;

  347.                     }

  348.                     $onstr = '';

  349.                     $lastc = 3;

  350.                     if ($cn < 31)

  351.                     {

  352.                         continue;

  353.                     } else {

  354.                         $this->simpleResult[$s]['w'] = chr(0).chr($cn);

  355.                         $this->simpleResult[$s]['t'] = 3;

  356.                         $s++;

  357.                     }

  358.                 }

  359.             }

  360.             //普通字符

  361.             else

  362.             {

  363.                 //正常文字

  364.                 if ( ($cn>0x3FFF && $cn < 0x9FA6) || ($cn>0xF8FF && $cn < 0xFA2D)

  365.                     || ($cn>0xABFF && $cn < 0xD7A4) || ($cn>0x3040 && $cn < 0x312B) )

  366.                 {

  367.                     if ( $lastc != 1 && $onstr != '')

  368.                     {

  369.                         $this->simpleResult[$s]['w'] = $onstr;

  370.                         if ( $lastc==2 )

  371.                         {

  372.                             if ( !preg_match('/'.$notNumberMatch.'/i', iconv(UCS2, 'utf-8', $onstr)) ) $lastc = 4;

  373.                         }

  374.                         $this->simpleResult[$s]['t'] = $lastc;

  375.                         if ( $lastc != 4 ) $this->_deep_analysis($onstr, $lastc, $s, $optimize);

  376.                         $s++;

  377.                         $onstr = '';

  378.                     }

  379.                     $lastc = 1;

  380.                     $onstr .= $c;

  381.                 }

  382.                 //特殊符号

  383.                 else

  384.                 {

  385.                     if ( $onstr != '' )

  386.                     {

  387.                         $this->simpleResult[$s]['w'] = $onstr;

  388.                         if ( $lastc==2 )

  389.                         {

  390.                             if ( !preg_match('/'.$notNumberMatch.'/i', iconv(UCS2, 'utf-8', $onstr)) ) $lastc = 4;

  391.                         }

  392.                         $this->simpleResult[$s]['t'] = $lastc;

  393.                         if ( $lastc != 4 ) $this->_deep_analysis($onstr, $lastc, $s, $optimize);

  394.                         $s++;

  395.                     }

  396.                     //检测书名

  397.                     if ( $cn == 0x300A )

  398.                     {

  399.                         $tmpw = '';

  400.                         $n = 1;

  401.                         $isok = FALSE;

  402.                         $ew = chr(0x30).chr(0x0B);

  403.                         while(TRUE)

  404.                         {

  405. 							if (!isset($this->sourceString[$i+$n]) && !isset($this->sourceString[$i+$n+1]))

  406. 							break;

  407.                             $w = $this->sourceString[$i+$n].$this->sourceString[$i+$n+1];

  408.                             if ( $w == $ew )

  409.                             {

  410.                                 $this->simpleResult[$s]['w'] = $c;

  411.                                 $this->simpleResult[$s]['t'] = 5;

  412.                                 $s++;

  413.                         

  414.                                 $this->simpleResult[$s]['w'] = $tmpw;

  415.                                 $this->newWords[$tmpw] = 1;

  416.                                 if ( !isset($this->newWords[$tmpw]) )

  417.                                 {

  418.                                     $this->foundWordStr .= $this->_out_string_encoding($tmpw).'/nb, ';

  419.                                     $this->SetWordInfos($tmpw, array('c'=>1, 'm'=>'nb'));

  420.                                 }

  421.                                 $this->simpleResult[$s]['t'] = 13;

  422.                                 $s++;

  423.                                 //最大切分模式对书名继续分词

  424.                                 if ( $this->differMax )

  425.                                 {

  426.                                     $this->simpleResult[$s]['w'] = $tmpw;

  427.                                     $this->simpleResult[$s]['t'] = 21;

  428.                                     $this->_deep_analysis($tmpw, $lastc, $s, $optimize);

  429.                                     $s++;

  430.                                 }

  431.                                 $this->simpleResult[$s]['w'] = $ew;

  432.                                 $this->simpleResult[$s]['t'] =  5;

  433.                                 $s++;

  434.                                 $i = $i + $n + 1;

  435.                                 $isok = TRUE;

  436.                                 $onstr = '';

  437.                                 $lastc = 5;

  438.                                 break;

  439.                             } else {

  440.                                 $n = $n+2;

  441.                                 $tmpw .= $w;

  442.                                 if ( strlen($tmpw) > 60 )

  443.                                 {

  444.                                     break;

  445.                                 }

  446.                             }

  447.                         }//while

  448.                         if ( !$isok )

  449.                         {

  450.                             $this->simpleResult[$s]['w'] = $c;

  451.                               $this->simpleResult[$s]['t'] = 5;

  452.                               $s++;

  453.                               $onstr = '';

  454.                             $lastc = 5;

  455.                         }

  456.                         continue;

  457.                     }

  458.                     $onstr = '';

  459.                     $lastc = 5;

  460.                     if ( $cn==0x3000 )

  461.                     {

  462.                         continue;

  463.                     } else {

  464.                         $this->simpleResult[$s]['w'] = $c;

  465.                         $this->simpleResult[$s]['t'] = 5;

  466.                         $s++;

  467.                     }

  468.                 }

  469.             }

  470.         }

  471.         //处理分词后的结果

  472.         $this->_sort_finally_result();

  473.     }

  474.     /**

  475.      * 深入分词

  476.      * @parem $str

  477.      * @parem $ctype (2 英文类，3 中/韩/日文类)

  478.      * @parem $spos   当前粗分结果游标

  479.      * @return void

  480.      */

  481.     function _deep_analysis( &$str, $ctype, $spos, $optimize=TRUE )

  482.     {

  483.         //中文句子

  484.         if ( $ctype==1 )

  485.         {

  486.             $slen = strlen($str);

  487.             //小于系统配置分词要求长度的句子

  488.             if ( $slen < $this->notSplitLen )

  489.             {

  490.                 $tmpstr = '';

  491.                 $lastType = 0;

  492.                 if ( $spos > 0 ) $lastType = $this->simpleResult[$spos-1]['t'];

  493.                 if ($slen < 5)

  494.                 {

  495.                       //echo iconv(UCS2, 'utf-8', $str).'<br>';

  496.                       if ( $lastType==4 && ( isset($this->addonDic['u'][$str]) || isset($this->addonDic['u'][substr($str, 0, 2)]) ) )

  497.                       {

  498.                             $str2 = '';

  499.                             if ( !isset($this->addonDic['u'][$str]) && isset($this->addonDic['s'][substr($str, 2, 2)]) )

  500.                             {

  501.                                 $str2 = substr($str, 2, 2);

  502.                                 $str  = substr($str, 0, 2);

  503.                             }

  504.                             $ww = $this->simpleResult[$spos - 1]['w'].$str;

  505.                             $this->simpleResult[$spos - 1]['w'] = $ww;

  506.                             $this->simpleResult[$spos - 1]['t'] = 4;

  507.                             if ( !isset($this->newWords[$this->simpleResult[$spos - 1]['w']]) )

  508.                             {

  509.                                 $this->foundWordStr .= $this->_out_string_encoding( $ww ).'/mu, ';

  510.                                 $this->SetWordInfos($ww, array('c'=>1, 'm'=>'mu'));

  511.                             }

  512.                             $this->simpleResult[$spos]['w'] = '';

  513.                             if ( $str2 != '' )

  514.                             {

  515.                                 $this->finallyResult[$spos-1][] = $ww;

  516.                                 $this->finallyResult[$spos-1][] = $str2;

  517.                             }

  518.                        } else {

  519.                               $this->finallyResult[$spos][] = $str;

  520.                        }

  521.                 } else {

  522.                       $this->_deep_analysis_cn( $str, $ctype, $spos, $slen, $optimize );

  523.                 }

  524.             }

  525.             //正常长度的句子，循环进行分词处理

  526.             else {

  527.                 $this->_deep_analysis_cn( $str, $ctype, $spos, $slen, $optimize );

  528.             }

  529.         }

  530.         //英文句子，转为小写

  531.         else {

  532.             if ( $this->toLower ) {

  533.                 $this->finallyResult[$spos][] = strtolower($str);

  534.             } else {

  535.                 $this->finallyResult[$spos][] = $str;

  536.             }

  537.         }

  538.     }

  539.     /**

  540.      * 中文的深入分词

  541.      * @parem $str

  542.      * @return void

  543.      */

  544.     function _deep_analysis_cn( &$str, $lastec, $spos, $slen, $optimize=TRUE )

  545.     {

  546.         $quote1 = chr(0x20).chr(0x1C);

  547.         $tmparr = array();

  548.         $hasw = 0;

  549.         //如果前一个词为“，并且字符串小于3个字符当成一个词处理

  550.         if ( $spos > 0 && $slen < 11 && $this->simpleResult[$spos-1]['w']==$quote1 )

  551.         {

  552.             $tmparr[] = $str;

  553.             if ( !isset($this->newWords[$str]) )

  554.             {

  555.                 $this->foundWordStr .= $this->_out_string_encoding($str).'/nq, ';

  556.                 $this->SetWordInfos($str, array('c'=>1, 'm'=>'nq'));

  557.             }

  558.             if ( !$this->differMax )

  559.             {

  560.                 $this->finallyResult[$spos][] = $str;

  561.                 return ;

  562.             }

  563.         }

  564.         //进行切分

  565.         for($i=$slen-1; $i > 0; $i -= 2)

  566.         {

  567.             //单个词

  568.             $nc = $str[$i-1].$str[$i];

  569.             //是否已经到最后两个字

  570.             if ( $i <= 2 )

  571.             {

  572.                 $tmparr[] = $nc;

  573.                 $i = 0;

  574.                 break;

  575.             }

  576.             $isok = FALSE;

  577.             $i = $i + 1;

  578.             for($k=$this->dicWordMax; $k>1; $k=$k-2)

  579.             {

  580.                 if ($i < $k) continue;

  581.                 $w = substr($str, $i-$k, $k);

  582.                 if ( strlen($w) <= 2 )

  583.                 {

  584.                     $i = $i - 1;

  585.                     break;

  586.                 }

  587.                 if ( $this->IsWord( $w ) )

  588.                 {

  589.                     $tmparr[] = $w;

  590.                     $i = $i - $k + 1;

  591.                     $isok = TRUE;

  592.                     break;

  593.                 }

  594.             }

  595.             //echo '<hr/>';

  596.             //没适合词

  597.             if (!$isok) $tmparr[] = $nc;

  598.         }

  599.         $wcount = count($tmparr);

  600.         if ( $wcount==0 ) return ;

  601.         $this->finallyResult[$spos] = array_reverse($tmparr);

  602.         //优化结果(岐义处理、新词、数词、人名识别等)

  603.         if ( $optimize )

  604.         {

  605.             $this->_optimize_result( $this->finallyResult[$spos], $spos );

  606.         }

  607.     }

  608.     /**

  609.     * 对最终分词结果进行优化（把simpleresult结果合并，并尝试新词识别、数词合并等）

  610.     * @parem $optimize 是否优化合并的结果

  611.     * @return void

  612.     */

  613.     //t = 1 中/韩/日文, 2 英文/数字/符号('.', '@', '#', '+'), 3 ANSI符号 4 纯数字 5 非ANSI符号或不支持字符

  614.     function _optimize_result( &$smarr, $spos )

  615.     {

  616.         $newarr = array();

  617.         $prePos = $spos - 1;

  618.         $arlen = count($smarr);

  619.         $i = $j = 0;

  620.         //检测数量词

  621.         if ( $prePos > -1 && !isset($this->finallyResult[$prePos]) )

  622.         {

  623.             $lastw = $this->simpleResult[$prePos]['w'];

  624.             $lastt = $this->simpleResult[$prePos]['t'];

  625.               if ( ($lastt==4 || isset( $this->addonDic['c'][$lastw] )) && isset( $this->addonDic['u'][$smarr[0]] ) )

  626.               {

  627.                  $this->simpleResult[$prePos]['w'] = $lastw.$smarr[0];

  628.                  $this->simpleResult[$prePos]['t'] = 4;

  629.                  if ( !isset($this->newWords[ $this->simpleResult[$prePos]['w'] ]) )

  630.                  {

  631.                      $this->foundWordStr .= $this->_out_string_encoding( $this->simpleResult[$prePos]['w'] ).'/mu, ';

  632.                      $this->SetWordInfos($this->simpleResult[$prePos]['w'], array('c'=>1, 'm'=>'mu'));

  633.                  }

  634.                  $smarr[0] = '';

  635.                  $i++;

  636.               }

  637.        }

  638.        for(; $i < $arlen; $i++)

  639.        {

  640.             

  641.             if ( !isset( $smarr[$i+1] ) )

  642.             {

  643.                 $newarr[$j] = $smarr[$i];

  644.                 break;

  645.             }

  646.             $cw = $smarr[$i];

  647.             $nw = $smarr[$i+1];

  648.             $ischeck = FALSE;

  649.             //检测数量词

  650.             if ( isset( $this->addonDic['c'][$cw] ) && isset( $this->addonDic['u'][$nw] ) )

  651.             {

  652.                 //最大切分时保留合并前的词

  653.                 if ($this->differMax)

  654.                 {

  655.                         $newarr[$j] = chr(0).chr(0x28);

  656.                         $j++;

  657.                         $newarr[$j] = $cw;

  658.                         $j++;

  659.                         $newarr[$j] = $nw;

  660.                         $j++;

  661.                         $newarr[$j] = chr(0).chr(0x29);

  662.                         $j++;

  663.                 }

  664.                 $newarr[$j] = $cw.$nw;

  665.                 if ( !isset($this->newWords[$newarr[$j]]) )

  666.                 {

  667.                     $this->foundWordStr .= $this->_out_string_encoding( $newarr[$j] ).'/mu, ';

  668.                     $this->SetWordInfos($newarr[$j], array('c'=>1, 'm'=>'mu'));

  669.                 }

  670.                 $j++; $i++; $ischeck = TRUE;

  671.             }

  672.             //检测前导词(通常是姓)

  673.             else if ( isset( $this->addonDic['n'][ $smarr[$i] ] ) )

  674.             {

  675.                 $is_rs = FALSE;

  676.                 //词语是副词或介词或频率很高的词不作为人名

  677.                 if ( strlen($nw)==4 )

  678.                 {

  679.                     $winfos = $this->GetWordInfos($nw);

  680.                     if (isset($winfos['m']) && ($winfos['m']=='r' || $winfos['m']=='c' || $winfos['c']>500) )

  681.                     {

  682.                          $is_rs = TRUE;

  683.                     }

  684.                 }

  685.                 if ( !isset($this->addonDic['s'][$nw]) && strlen($nw)<5 && !$is_rs )

  686.                 {

  687.                     $newarr[$j] = $cw.$nw;

  688.                     //echo iconv(UCS2, 'utf-8', $newarr[$j])."<br>";

  689.                     //尝试检测第三个词

  690.                     if ( strlen($nw)==2 && isset($smarr[$i+2]) && strlen($smarr[$i+2])==2 && !isset( $this->addonDic['s'][$smarr[$i+2]] ) )

  691.                     {

  692.                         $newarr[$j] .= $smarr[$i+2];

  693.                         $i++;

  694.                     }

  695.                     if ( !isset($this->newWords[$newarr[$j]]) )

  696.                     {

  697.                         $this->SetWordInfos($newarr[$j], array('c'=>1, 'm'=>'nr'));

  698.                         $this->foundWordStr .= $this->_out_string_encoding($newarr[$j]).'/nr, ';

  699.                     }

  700.                     //为了防止错误，保留合并前的姓名

  701.                     if (strlen($nw)==4)

  702.                     {

  703.                         $j++;

  704.                         $newarr[$j] = chr(0).chr(0x28);

  705.                         $j++;

  706.                         $newarr[$j] = $cw;

  707.                         $j++;

  708.                         $newarr[$j] = $nw;

  709.                         $j++;

  710.                         $newarr[$j] = chr(0).chr(0x29);

  711.                     }

  712.                     $j++; $i++; $ischeck = TRUE;

  713.                 }

  714.             }

  715.             //检测后缀词(地名等)

  716.             else if ( isset($this->addonDic['a'][$nw]) )

  717.             {

  718.                 $is_rs = FALSE;

  719.                 //词语是副词或介词不作为前缀

  720.                 if ( strlen($cw)>2 )

  721.                 {

  722.                     $winfos = $this->GetWordInfos($cw);

  723.                     if (isset($winfos['m']) && ($winfos['m']=='a' || $winfos['m']=='r' || $winfos['m']=='c' || $winfos['c']>500) )

  724.                     {

  725.                          $is_rs = TRUE;

  726.                     }

  727.                 }

  728.                 if ( !isset($this->addonDic['s'][$cw]) && !$is_rs )

  729.                 {

  730.                     $newarr[$j] = $cw.$nw;

  731.                     if ( !isset($this->newWords[$newarr[$j]]) )

  732.                     {

  733.                         $this->foundWordStr .= $this->_out_string_encoding($newarr[$j]).'/na, ';

  734.                         $this->SetWordInfos($newarr[$j], array('c'=>1, 'm'=>'na'));

  735.                     }

  736.                     $i++; $j++; $ischeck = TRUE;

  737.                 }

  738.             }

  739.             //新词识别（暂无规则）

  740.             else if ($this->unitWord)

  741.             {

  742.                 if (strlen($cw)==2 && strlen($nw)==2 

  743.                 && !isset($this->addonDic['s'][$cw]) && !isset($this->addonDic['t'][$cw]) && !isset($this->addonDic['a'][$cw]) 

  744.                 && !isset($this->addonDic['s'][$nw]) && !isset($this->addonDic['c'][$nw]))

  745.                 {

  746.                     $newarr[$j] = $cw.$nw;

  747.                     //尝试检测第三个词

  748.                     if ( isset($smarr[$i+2]) && strlen($smarr[$i+2])==2 && (isset( $this->addonDic['a'][$smarr[$i+2]] ) || isset( $this->addonDic['u'][$smarr[$i+2]] )) )

  749.                     {

  750.                         $newarr[$j] .= $smarr[$i+2];

  751.                         $i++;

  752.                     }

  753.                     if ( !isset($this->newWords[$newarr[$j]]) )

  754.                     {

  755.                         $this->foundWordStr .= $this->_out_string_encoding($newarr[$j]).'/ms, ';

  756.                         $this->SetWordInfos($newarr[$j], array('c'=>1, 'm'=>'ms'));

  757.                     }

  758.                     $i++; $j++; $ischeck = TRUE;

  759.                 }

  760.             }

  761.             //不符合规则

  762.             if ( !$ischeck )

  763.             {

  764.                 $newarr[$j] = $cw;

  765.                   //二元消岐处理——最大切分模式

  766.                 if ( $this->differMax && !isset($this->addonDic['s'][$cw]) && strlen($cw) < 5 && strlen($nw) < 7)

  767.                 {

  768.                     $slen = strlen($nw);

  769.                     $hasDiff = FALSE;

  770.                     for($y=2; $y <= $slen-2; $y=$y+2)

  771.                     {

  772.                         $nhead = substr($nw, $y-2, 2);

  773.                         $nfont = $cw.substr($nw, 0, $y-2);

  774.                         if ( $this->IsWord( $nfont.$nhead ) )

  775.                         {

  776.                             if ( strlen($cw) > 2 ) $j++;

  777.                             $hasDiff = TRUE;

  778.                             $newarr[$j] = $nfont.$nhead;

  779.                         }

  780.                     }

  781.                 }

  782.                 $j++;

  783.             }

  784.        }

  785.        $smarr =  $newarr;

  786.     }

  787.     /**

  788.     * 转换最终分词结果到 finallyResult 数组

  789.     * @return void

  790.     */

  791.     function _sort_finally_result()

  792.     {

  793.         $newarr = array();

  794.         $i = 0;

  795.         foreach($this->simpleResult as $k=>$v)

  796.         {

  797.             if ( empty($v['w']) ) continue;

  798.             if ( isset($this->finallyResult[$k]) && count($this->finallyResult[$k]) > 0 )

  799.             {

  800.                 foreach($this->finallyResult[$k] as $w)

  801.                 {

  802.                     if (!empty($w))

  803.                     {

  804.                         $newarr[$i]['w'] = $w;

  805.                         $newarr[$i]['t'] = 20;

  806.                         $i++;

  807.                     }

  808.                 }

  809.             }

  810.             else if ($v['t'] != 21)

  811.             {

  812.                 $newarr[$i]['w'] = $v['w'];

  813.                 $newarr[$i]['t'] = $v['t'];

  814.                 $i++;

  815.             }

  816.         }

  817.         

  818.         $this->finallyResult = $newarr;

  819.         $newarr = '';

  820.     }

  821.     /**

  822.      * 把uncode字符串转换为输出字符串

  823.      * @parem str

  824.      * return string

  825.      */

  826.     function _out_string_encoding( &$str )

  827.     {

  828.         $rsc = $this->_source_result_charset();

  829.         if ( $rsc==1 ) {

  830.             $rsstr = iconv(UCS2, 'utf-8', $str);

  831.         }

  832.         else if ( $rsc==2 ) {

  833.             $rsstr = iconv('utf-8', 'gb18030', iconv(UCS2, 'utf-8', $str) );

  834.         } else {

  835.             $rsstr = iconv('utf-8', 'big5', iconv(UCS2, 'utf-8', $str) );

  836.         }

  837.         return $rsstr;

  838.     }

  839.     /**

  840.      * 获取最终结果字符串（用空格分开后的分词结果）

  841.      * @return string

  842.      */

  843.     function GetFinallyResult($spword=' ', $word_meanings=FALSE)

  844.     {

  845.         $rsstr = '';

  846.         foreach($this->finallyResult as $v)

  847.         {

  848.             if ( $this->resultType==2 && ($v['t']==3 || $v['t']==5) )

  849.             {

  850.                 continue;

  851.             }

  852.             $m = '';

  853.             if ( $word_meanings )

  854.             {

  855.                 $m = $this->GetWordProperty($v['w']);

  856.             }

  857.             $w = $this->_out_string_encoding($v['w']);

  858.             if ( $w != ' ' )

  859.             {

  860.                 if ($word_meanings) {

  861.                     $rsstr .= $spword.$w.$m;

  862.                 } else {

  863.                     $rsstr .= $spword.$w;

  864.                 }

  865.             }

  866.         }

  867.         return $rsstr;

  868.     }

  869.     /**

  870.      * 获取粗分结果，不包含粗分属性

  871.      * @return array()

  872.      */

  873.     function GetSimpleResult()

  874.     {

  875.         $rearr = array();

  876.         foreach($this->simpleResult as $k=>$v)

  877.         {

  878.             if ( empty($v['w']) ) continue;

  879.             $w = $this->_out_string_encoding($v['w']);

  880.             if ( $w != ' ' ) $rearr[] = $w;

  881.         }

  882.         return $rearr;

  883.     }

  884.     /**

  885.      * 获取粗分结果，包含粗分属性（1中文词句、2 ANSI词汇（包括全角），3 ANSI标点符号（包括全角），4数字（包括全角），5 中文标点或无法识别字符）

  886.      * @return array()

  887.      */

  888.     function GetSimpleResultAll()

  889.     {

  890.         $rearr = array();

  891.         foreach($this->simpleResult as $k=>$v)

  892.         {

  893.             $w = $this->_out_string_encoding($v['w']);

  894.             if ( $w != ' ' )

  895.             {

  896.                 $rearr[$k]['w'] = $w;

  897.                 $rearr[$k]['t'] = $v['t'];

  898.             }

  899.         }

  900.         return $rearr;

  901.     }

  902.     /**

  903.      * 获取索引hash数组

  904.      * @return array('word'=>count,)

  905.      */

  906.     function GetFinallyIndex()

  907.     {

  908.         $rearr = array();

  909.         foreach($this->finallyResult as $v)

  910.         {

  911.             if ( $this->resultType==2 && ($v['t']==3 || $v['t']==5) )

  912.             {

  913.                 continue;

  914.             }

  915.             $w = $this->_out_string_encoding($v['w']);

  916.             if ( $w == ' ' )

  917.             {

  918.                 continue;

  919.             }

  920.             if ( isset($rearr[$w]) )

  921.             {

  922.                  $rearr[$w]++;

  923.             } else {

  924.                  $rearr[$w] = 1;

  925.             }

  926.         }

  927.         return $rearr;

  928.     }

  929.     /**

  930.      * 获得保存目标编码

  931.      * @return int

  932.      */

  933.     function _source_result_charset()

  934.     {

  935.         if ( preg_match("/^utf/", $this->targetCharSet) ) {

  936.            $rs = 1;

  937.         }

  938.         else if ( preg_match("/^gb/", $this->targetCharSet) ) {

  939.            $rs = 2;

  940.         }

  941.         else if ( preg_match("/^big/", $this->targetCharSet) ) {

  942.            $rs = 3;

  943.         }

  944.         else {

  945.             $rs = 4;

  946.         }

  947.         return $rs;

  948.     }

  949.      /**

  950.      * 编译词典

  951.      * @parem $sourcefile utf-8编码的文本词典数据文件<参见范例dict/not-build/base_dic_full.txt>

  952.      * 注意, 需要PHP开放足够的内存才能完成操作

  953.      * @return void

  954.      */

  955.     function MakeDict( $source_file, $target_file='' )

  956.     {

  957.         $target_file = ($target_file=='' ? $this->mainDicFile : $target_file);

  958.         $allk = array();

  959.         $fp = fopen($source_file, 'r');

  960.         while( $line = fgets($fp, 512) )

  961.         {

  962.             if ( $line[0]=='@' ) continue;

  963.             list($w, $r, $a) = explode(',', $line);

  964.             $a = trim( $a );

  965.             $w = iconv('utf-8', UCS2, $w);

  966.             $k = $this->_get_index( $w );

  967.             if ( isset($allk[ $k ]) )

  968.                 $allk[ $k ][ $w ] = array($r, $a);

  969.             else

  970.                 $allk[ $k ][ $w ] = array($r, $a);

  971.         }

  972.         fclose( $fp );

  973.         $fp = fopen($target_file, 'w');

  974.         $heade_rarr = array();

  975.         $alldat = '';

  976.         $start_pos = $this->mask_value * 8;

  977.         foreach( $allk as $k => $v )

  978.         {

  979.             $dat  = serialize( $v );

  980.             $dlen = strlen($dat);

  981.             $alldat .= $dat;

  982.             $heade_rarr[ $k ][0] = $start_pos;

  983.             $heade_rarr[ $k ][1] = $dlen;

  984.             $heade_rarr[ $k ][2] = count( $v );

  985.             $start_pos += $dlen;

  986.         }

  987.         unset( $allk );

  988.         for($i=0; $i < $this->mask_value; $i++)

  989.         {

  990.             if ( !isset($heade_rarr[$i]) )

  991.             {

  992.                 $heade_rarr[$i] = array(0, 0, 0);

  993.             }

  994.             fwrite($fp, pack("Inn", $heade_rarr[$i][0], $heade_rarr[$i][1], $heade_rarr[$i][2]));

  995.         }

  996.         fwrite( $fp, $alldat);

  997.         fclose( $fp );

  998.     } 

  999.      /**

  1000.      * 导出词典的词条

  1001.      * @parem $targetfile 保存位置

  1002.      * @return bool

  1003.      */

  1004.     function ExportDict( $targetfile )

  1005.     {

  1006.         if ( !$this->mainDicHand )

  1007.         {

  1008.             $this->mainDicHand = fopen($this->mainDicFile, 'rw');

  1009.         }

  1010.         $fp = fopen($targetfile, 'w');

  1011.         for($i=0; $i <= $this->mask_value; $i++)

  1012.         {

  1013.             $move_pos = $i * 8;

  1014.             fseek($this->mainDicHand, $move_pos, SEEK_SET);

  1015.             $dat = fread($this->mainDicHand, 8);

  1016.             $arr = unpack('I1s/n1l/n1c', $dat);

  1017.             if ( $arr['l'] == 0 )

  1018.             {

  1019.                 continue;

  1020.             }

  1021.             fseek($this->mainDicHand, $arr['s'], SEEK_SET);

  1022.             $data = @unserialize(fread($this->mainDicHand, $arr['l']));

  1023.             if ( !is_array($data) ) continue;

  1024.             foreach($data as $k => $v)

  1025.             {

  1026.                 $w = iconv(UCS2, 'utf-8', $k);

  1027.                 fwrite($fp, "{$w},{$v[0]},{$v[1]}\n");

  1028.             }

  1029.         }

  1030.         fclose( $fp );

  1031.         return TRUE;

  1032.      }

  1033. }