<?php
require_once P2_LIB_DIR . '/filectl.class.php';
require_once P2_LIB_DIR . '/BrdMenu.php';

/**
 * p2 - 板リストコントロールクラス for menu.php
 * staticメソッドで利用している
 *
 * BrdUtil に改名したい気分
 */
class BrdCtl
{
    /**
     * boardを全て読み込む
     *
     * @static
     * @access  public
     * @return  array
     */
    function readBrdMenus()
    {
        return array_merge(BrdCtl::readBrdLocal(), BrdCtl::readBrdOnline());
    }
    
    /**
     * ローカルのboardディレクトリを走査して読み込む
     *
     * @static
     * @access  private
     * @return  array
     */
    function readBrdLocal()
    {
        $brd_menus = array();
        $brd_dir = './board';
        
        if (is_dir($brd_dir) and $cdir = dir($brd_dir)) {
            while ($entry = $cdir->read()) {
                if (preg_match('/^\./', $entry)) {
                    continue;
                }
                $filepath = $brd_dir . '/' . $entry;
                if ($data = file($filepath)) {
                    $aBrdMenu = new BrdMenu;
                    $aBrdMenu->setBrdMatch($filepath);    // パターンマッチ形式を登録
                    $aBrdMenu->setBrdList($data);    // カテゴリーと板をセット
                    $brd_menus[] = $aBrdMenu;
                    
                } else {
                    P2Util::pushInfoHtml(
                        sprintf("<p>p2 error: 板リスト %s が読み込めませんでした。</p>\n", $entry)
                    );
                }
            }
            $cdir->close();
        }
        
        return $brd_menus;
    }
    
    /**
     * @access  public
     * @return  string
     */
    function getP2BrdFile($cachefile)
    {
        return $cachefile . '.p2.brd';
    }
    
    /**
     * オンライン板リストを読み込む
     *
     * @static
     * @access  private
     * @return  array
     */
    function readBrdOnline()
    {
        global $_conf;

        if (!$_conf['brdfile_online']) {
            return array();
        }
        
        $brd_menus = array();

        $cachefile = P2Util::cacheFileForDL($_conf['brdfile_online']);
        $noDL = false;
        $isNewDL = false;
        $read_html_flag = false;
        
        $p2brdfile = BrdCtl::getP2BrdFile($cachefile);
        
        // キャッシュがある場合
        if (file_exists($p2brdfile)) {
        
            // norefreshならDLしない
            if (!empty($_GET['nr'])) {
                $noDL = true;
                
            // キャッシュの更新が指定時間以内ならDLしない
            } elseif (filemtime($p2brdfile) > time() - 60 * 60 * $_conf['menu_dl_interval']) {
                $noDL = true;
            }
        }
        
        // DLしない
        if ($noDL) {
            ;
        // DLする
        } else {
            //echo "DL!<br>";//
            $brdfile_online_res = P2Util::fileDownload(
                $_conf['brdfile_online'], $cachefile,
                array('disp_error' => true, 'use_tmp_file' => true)
            );
            if ($brdfile_online_res and $brdfile_online_res->is_success() && $brdfile_online_res->code != '304') {
                $isNewDL = true;
            }
        }
        
        // html形式なら
        if (preg_match('/html?$/', $_conf['brdfile_online'])) {
        
            // 更新されていたら新規キャッシュ作成
            if ($isNewDL) {

                //echo "NEW!<br>"; //
                $aBrdMenu = new BrdMenu;
                $aBrdMenu->makeBrdFile($cachefile); // .p2.brdファイルを生成
                $brd_menus[] = $aBrdMenu;

                $read_html_flag = true;
            }
            
            if (file_exists($p2brdfile)) {
                $cache_brd = $p2brdfile;
            } else {
                $cache_brd = $cachefile;
            }
            
        } else {
            $cache_brd = $cachefile;
        }
        
        if (!$read_html_flag) {
            if ($data = file($cache_brd)) {
                $aBrdMenu = new BrdMenu;
                $aBrdMenu->setBrdMatch($cache_brd); // パターンマッチ形式を登録
                $aBrdMenu->setBrdList($data);       // カテゴリーと板をセット
                if ($aBrdMenu->num) {
                    $brd_menus[] = $aBrdMenu;
                } else {
                    P2Util::pushInfoHtml(
                        sprintf(
                            "<p>p2 error: %s から板メニューを生成することはできませんでした。</p>\n",
                            hs($cache_brd)
                        )
                    );
                }
            } else {
                P2Util::pushInfoHtml(sprintf("<p>p2 error: %s は読み込めませんでした。</p>\n", hs($cachefile)));
            }
        }
        
        return $brd_menus;
    }
    
    /**
     * 板検索（スレタイ検索）のwordクエリーがあればパースする
     * $GLOBALS['word'], $GLOBALS['words_fm'], $GLOBALS['word_fm'] をセットする
     *
     * @static
     * @access  public
     * @return  void
     */
    function parseWord()
    {
        $GLOBALS['word'] = null;
        $GLOBALS['words_fm'] = null;
        $GLOBALS['word_fm'] = null;
        
        if (isset($_GET['word'])) {
            $word = $_GET['word'];
        } elseif (isset($_POST['word'])) {
            $word = $_POST['word'];
        }

        if (!isset($word) || strlen($word) == 0) {
            return;
        }
        
        /*
        // 特別に除外する条件
        // 何でもマッチしてしまう正規表現
        if (preg_match('/^\.+$/', $word)) {
            return;
        }
        */
        
        require_once P2_LIB_DIR . '/StrCtl.php';
        // and検索でよろしく（正規表現ではない）
        $word_fm = StrCtl::wordForMatch($word, 'and');
        if (P2_MBREGEX_AVAILABLE == 1) {
            $GLOBALS['words_fm'] = mb_split('\s+', $word_fm);
            $GLOBALS['word_fm'] = mb_ereg_replace('\s+', '|', $word_fm);
        } else {
            $GLOBALS['words_fm'] = preg_split('/\s+/', $word_fm);
            $GLOBALS['word_fm'] = preg_replace('/\s+/', '|', $word_fm);
        }
    
        $GLOBALS['word'] = $word;
    }
    
    /**
     * 携帯用 板検索（スレタイ検索）のフォームHTMLを取得する
     *
     * @static
     * @access  public
     * @return  void
     */
    function getMenuKSearchFormHtml($action = null)
    {
        global $_conf;
        
        is_null($action) and $action = $_SERVER['SCRIPT_NAME'];
        
        $threti_ht = ''; // スレタイ検索は未対応
    
        $word_hs = isset($GLOBALS['word']) ? htmlspecialchars($GLOBALS['word'], ENT_QUOTES) : null;
    
        return <<<EOFORM
<form method="GET" action="{$action}" accept-charset="{$_conf['accept_charset']}">
    <input type="hidden" name="detect_hint" value="◎◇">
    {$_conf['k_input_ht']}
    <input type="hidden" name="nr" value="1">
    <input type="text" id="word" name="word" value="{$word_hs}" size="12">
    {$threti_ht}
    <input type="submit" name="submit" value="板検索">
</form>\n
EOFORM;
    }
}

/*
 * Local Variables:
 * mode: php
 * coding: cp932
 * tab-width: 4
 * c-basic-offset: 4
 * indent-tabs-mode: nil
 * End:
 */
// vim: set syn=php fenc=cp932 ai et ts=4 sw=4 sts=4 fdm=marker:
