inc​/pico_autolink

  1
  2
  3
  4
  5
  6
  7
  8
  9
 10
 11
 12
 13
 14
 15
 16
 17
 18
 19
 20
 21
 22
 23
 24
 25
 26
 27
 28
 29
 30
 31
 32
 33
 34
 35
 36
 37
 38
 39
 40
 41
 42
 43
 44
 45
 46
 47
 48
 49
 50
 51
 52
 53
 54
 55
 56
 57
 58
 59
 60
 61
 62
 63
 64
 65
 66
 67
 68
 69
 70
 71
 72
 73
 74
 75
 76
 77
 78
 79
 80
 81
 82
 83
 84
 85
 86
 87
 88
 89
 90
 91
 92
 93
 94
 95
 96
 97
 98
 99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127

<?php
// xpwikiから　picoへの自動リンクを貼るための、アドオン
// 元ネタ：xpwikiから　xwordsへの自動リンクを貼るための、アドオン
// see http://xoops.hypweb.net/modules/forum/index.php?topic_id=2140 
// 小文字・大文字を区別しない？ (0 or 1)
define('PAGE_CASE_INSENSITIVE', 0);
 
global $xoopsDB;
 
$temp_txt = XOOPS_ROOT_PATH."/uploads/".$this->mydirname."/entries_temp.php";
$entries_dat = XOOPS_ROOT_PATH."/uploads/".$this->mydirname."/entries.php";
$ent_table = $xoopsDB -> prefix ("{$this->mydirname}_contents") ;
 
if ($fp1 = fopen($temp_txt, 'wb')) {
    $result_entries = $xoopsDB -> query( "SELECT subject FROM $ent_table" );
    while ( list( $entry_term ) = $xoopsDB -> fetchrow( $result_entries ) ) {
        if(mb_strlen($entry_term)>2) {fwrite($fp1, $entry_term."\n");
        }
    }
    fclose($fp1);
}
 
$dats = file($temp_txt);
$dat = get_matcher_regex_safe($dats);
if ($fp2 = fopen($entries_dat, 'wb')) {
    fwrite($fp2, $dat);
    fclose($fp2);
}
 
function get_matcher_regex_safe ($pages, $spliter = "\t", $array_fix = true, $nest = 0) {
    if ($array_fix) {
        $pages = array_map('trim', $pages);
        if (PAGE_CASE_INSENSITIVE) $pages = array_map('strtolower', $pages);
        $pages = array_unique($pages);
        foreach(array_keys($pages, '') as $key) {
            unset($pages[$key]);
        }
        sort($pages, SORT_STRING);
    }
    
    ++$nest;
    $reg = get_matcher_regex_safe_sub($pages);
    $regs = preg_split("/(\d+)\x08/", $reg, -1, PREG_SPLIT_DELIM_CAPTURE);
    $pats = array();
    $index = 0;
    reset($regs);
    while (list($key, $pat) = each($regs)) {
        list($key, $val) = each($regs);
        if (!$val) $val = count($pages);
        if (@ preg_match('/' . $pat. '/', '') === false) {
            if ($nest <= 10) {
                $count = $val - $index;
                $split = floor(($val - $index) / 2);
                $pages1 = array_slice($pages, $index, $split);
                $pages2 = array_slice($pages, $split, $count - $split);
                $pats[] = get_matcher_regex_safe($pages1, $spliter, false, $nest);
                $pats[] = get_matcher_regex_safe($pages2, $spliter, false, $nest);
                $index = $val;
            }
        } else {
            $pats[] = $pat;
        }
    }
    return join($spliter, $pats);
}
 
function get_matcher_regex_safe_sub (& $array, $offset = 0, $sentry = NULL, $pos = 0, $nest = 0)
{
    static $g_count = 0;
    
    ++$nest;
    $limit = 1024 * 32 - 10;
    
    if (empty($array)) return '(?!)'; // Zero
    if ($sentry === NULL) $sentry = count($array);
    
    // Too short. Skip this
    $skip = ($pos >= mb_strlen($array[$offset]));
    if ($skip) ++$offset;
 
    // Generate regex for each value
    $regex = '';
    $index = $offset;
    $multi = FALSE;
    $reglen = 0;
    while ($index < $sentry) {
        if ($index != $offset) {
            $multi = TRUE;
            if ($nest === 1 && strlen($regex) - $reglen > $limit) {
                $reglen = strlen($regex);
                $regex .= ')'.($index)."\x08(?:";
                $g_count = 1;
            } else {
                $regex .= '|'; // OR
            }
        }
 
        // Get one character from left side of the value
        $char = mb_substr($array[$index], $pos, 1);
 
        // How many continuous keys have the same letter
        // at the same position?
        for ($i = $index; $i < $sentry; $i++)
            if (mb_substr($array[$i], $pos, 1) != $char) break;
        
        if ($index < ($i - 1)) {
            // Some more keys found
            // Recurse
            $regex .= str_replace(' ', '\\ ', preg_quote($char, '/')) .
            get_matcher_regex_safe_sub($array, $index, $i, $pos + 1, $nest);
        } else {
            // Not found
            $regex .= str_replace(' ', '\\ ',
            preg_quote(mb_substr($array[$index], $pos), '/'));
        }
        $index = $i;
    }
    
    if ($skip || $multi){
        $g_count++;
        $regex = '(?:' . $regex . ')';
    }
    if ($skip) $regex .= '?'; // Match for $pages[$offset - 1]
    return $regex;
}
 
?>

75
76
77
78
79
80
81
82
83
84
85

    if( $cat_data['post_auto_approved'] ) {
               include_once( dirname(dirname(__FILE__)).'/include/entries_write.php' );    //naao
        // Notify for new content 'global'
        pico_main_trigger_event( $this->mydirname , 'global' , 0 , 'newcontent' , $extra_tags , $users2notify , 0 ) ;
        // Notify for new content 'category' of all parental categories
        foreach( array_keys( $cat_data['paths_raw'] ) as $cat_id ) {
            pico_main_trigger_event( $this->mydirname , 'category' , $cat_id , 'newcontent' , $extra_tags , $users2notify , 0 ) ;
        }
        // message "registered"
        redirect_header( $ret_uri4html , 2 , _MD_PICO_MSG_CONTENTMADE ) ;
    } else {

74
75
76
77
78
79

    if( $cat_data['post_auto_approved'] ) {
               include_once( dirname(dirname(__FILE__)).'/include/entries_write.php' );    //naao
               
        // message "modified"
        redirect_header( $ret_uri4html , 2 , _MD_PICO_MSG_CONTENTUPDATED ) ;
    } else {

76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94

    } else if( @$_GET['cat_id'] !== '0' && ( $this->config['show_menuinmoduletop'] || @$_GET['page'] == 'menu' ) ) {
        $this->request['controller'] = 'menu' ;
        $this->request['view'] = 'menu' ;
    } else if( @$_GET['subject'] ) {
        $xoopsDB =& Database::getInstance() ;
        $content_table = $xoopsDB->prefix($this->mydirname."_contents");
        $sql = "SELECT content_id FROM ".$content_table." WHERE subject='".addslashes(@$_GET['subject'])."'"  ;
        $db_ret = $xoopsDB->query($sql);
            if( $xoopsDB->getRowsNum( $db_ret ) ) {
            list( $content_id ) = $xoopsDB->fetchRow($db_ret);
            $this->request['view'] = 'detail' ;
        } else {
            $this->request['controller'] = 'category' ;
            $this->request['view'] = 'list' ;
        }
    } else {
        $this->request['controller'] = 'category' ;
        $this->request['view'] = 'list' ;
    }

  1
  2
  3
  4
  5
  6
  7
  8
  9
 10
 11
 12
 13
 14
 15
 16
 17
 18
 19
 20
 21
 22
 23
 24
 25
 26
 27
 28
 29
 30
 31
 32
 33
 34
 35
 36
 37
 38
 39
 40
 41
 42
 43
 44
 45
 46
 47
 48
 49
 50
 51
 52
 53
 54
 55
 56
 57
 58
 59
 60
 61
 62
 63
 64
 65
 66
 67
 68
 69
 70
 71
 72
 73
 74
 75
 76
 77
 78
 79
 80
 81
 82
 83
 84
 85
 86
 87
 88
 89
 90
 91
 92
 93
 94
 95
 96
 97
 98
 99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143

<?php
 
if( ! defined( 'XOOPS_ROOT_PATH' ) ) exit ;
 
class PicoSubjectRegexHook extends XCube_ActionFilter
{
    function preBlockFilter()
    {
        $this->mRoot->mDelegateManager->add( 'ModuleClass.Pico.Contentman.InsertSuccess' , array( &$this , 'hook' ) ) ;
        $this->mRoot->mDelegateManager->add( 'ModuleClass.Pico.Contentman.UpdateSuccess' , array( &$this , 'hook' ) ) ;
    }
 
    function hook( $mydirname , $content_id , $cat_data , $ret_uri4html )
    {
    // xpwikiから　picoへの自動リンクを貼るための、アドオン
    // 元ネタ：xpwikiから　xwordsへの自動リンクを貼るための、アドオン
    // see http://xoops.hypweb.net/modules/forum/index.php?topic_id=2140 
    // 小文字・大文字を区別しない？ (0 or 1)
    define('PAGE_CASE_INSENSITIVE', 0);
 
    global $xoopsDB;
 
    $temp_txt = XOOPS_ROOT_PATH."/uploads/".$mydirname."/entries_temp.php";
    $entries_dat = XOOPS_ROOT_PATH."/uploads/".$mydirname."/entries.php";
    $ent_table = $xoopsDB -> prefix ("{$mydirname}_contents") ;
 
    if ($fp1 = fopen($temp_txt, 'wb')) {
        $result_entries = $xoopsDB -> query( "SELECT subject FROM $ent_table" );
        while ( list( $entry_term ) = $xoopsDB -> fetchrow( $result_entries ) ) {
            if(mb_strlen($entry_term)>2) {fwrite($fp1, $entry_term."\n");
            }
        }
        fclose($fp1);
    }
 
    $dats = file($temp_txt);
    $dat = $this->get_matcher_regex_safe($dats);
    if ($fp2 = fopen($entries_dat, 'wb')) {
        fwrite($fp2, $dat);
        fclose($fp2);
    }
 
    }    //end of function
 
    function get_matcher_regex_safe ($pages, $spliter = "\t", $array_fix = true, $nest = 0) {
        if ($array_fix) {
            $pages = array_map('trim', $pages);
            if (PAGE_CASE_INSENSITIVE) $pages = array_map('strtolower', $pages);
            $pages = array_unique($pages);
            foreach(array_keys($pages, '') as $key) {
                unset($pages[$key]);
            }
            sort($pages, SORT_STRING);
        }
    
        ++$nest;
        $reg = $this->get_matcher_regex_safe_sub($pages);
        $regs = preg_split("/(\d+)\x08/", $reg, -1, PREG_SPLIT_DELIM_CAPTURE);
        $pats = array();
        $index = 0;
        reset($regs);
        while (list($key, $pat) = each($regs)) {
            list($key, $val) = each($regs);
            if (!$val) $val = count($pages);
            if (@ preg_match('/' . $pat. '/', '') === false) {
                if ($nest <= 10) {
                    $count = $val - $index;
                    $split = floor(($val - $index) / 2);
                    $pages1 = array_slice($pages, $index, $split);
                    $pages2 = array_slice($pages, $split, $count - $split);
                    $pats[] = $this->get_matcher_regex_safe($pages1, $spliter, false, $nest);
                    $pats[] = $this->get_matcher_regex_safe($pages2, $spliter, false, $nest);
                    $index = $val;
                }
            } else {
                $pats[] = $pat;
            }
        }
        return join($spliter, $pats);
    }    //end of function
 
    function get_matcher_regex_safe_sub (& $array, $offset = 0, $sentry = NULL, $pos = 0, $nest = 0)
    {
        static $g_count = 0;
        ++$nest;
        $limit = 1024 * 32 - 10;
        
        if (empty($array)) return '(?!)'; // Zero
        if ($sentry === NULL) $sentry = count($array);
        
        // Too short. Skip this
        $skip = ($pos >= mb_strlen($array[$offset]));
        if ($skip) ++$offset;
     
        // Generate regex for each value
        $regex = '';
        $index = $offset;
        $multi = FALSE;
        $reglen = 0;
        while ($index < $sentry) {
            if ($index != $offset) {
                $multi = TRUE;
                if ($nest === 1 && strlen($regex) - $reglen > $limit) {
                    $reglen = strlen($regex);
                    $regex .= ')'.($index)."\x08(?:";
                    $g_count = 1;
                } else {
                    $regex .= '|'; // OR
                }
            }
 
            // Get one character from left side of the value
            $char = mb_substr($array[$index], $pos, 1);
 
            // How many continuous keys have the same letter
            // at the same position?
        for ($i = $index; $i < $sentry; $i++)
                if (mb_substr($array[$i], $pos, 1) != $char) break;
 
            if ($index < ($i - 1)) {
                // Some more keys found
                // Recurse
                $regex .= str_replace(' ', '\\ ', preg_quote($char, '/')) .
                $this->get_matcher_regex_safe_sub($array, $index, $i, $pos + 1, $nest);
            } else {
                // Not found
                $regex .= str_replace(' ', '\\ ',
                preg_quote(mb_substr($array[$index], $pos), '/'));
            }
            $index = $i;
        }
    
        if ($skip || $multi){
            $g_count++;
            $regex = '(?:' . $regex . ')';
        }
        if ($skip) $regex .= '?'; // Match for $pages[$offset - 1]
            return $regex;
    }    //end of function
 
}    //end of class
 
?>

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
20
21
22
23

<?php
require ( $root->mytrustdirpath."/ini/".basename(__FILE__) );
 
//　：　中略
 
//// picoへのオートリンク
$root->ext_autolinks[] = array(
    'target'  => '' ,         // Target pages split with '&' (prefix search)
    'priority'=> 40 ,        // Priority (Intenal AutoLink = 50)
    'url'   => XOOPS_URL.'/uploads/pico/entries.php' ,  // 空白（'')で自己xpWiki, 'ディレクトリ名' は自サイト内の別のxpWiki.
    'urldat'=> 1 ,              // urlはオートリンクデータそのもの(0:No, 1:Yes)
    'case_i'  => 1 ,        // Case insensitive
    'base'  => '' ,        // ベースページ名 (''[空白] ですべてのページ)
    'len'   => 6 ,                // オートリンクを有効にする文字数
    'enc'   => 'EUC-JP' ,        // 相手先の文字エンコーディング
    'cache' => 10 ,                //キャッシュする分数 (最小値: 10分)
    'title' => 'pico:[KEY]' ,    // <a>タグのtitle属性 ([KEY] は対象語句に置換されます)
    'pat'   => '/modules/pico/index.php?subject=[URL_ENCODE]' ,      // リンクパターン. ([URL_ENCODE], [WIKI_ENCODE], [EWORDS_ENCODE]が使用可能)
); 
 
//　：　中略
 
?>