的gazou.php、 双葉ちゃん的futaba.php所改寫之衍生著作程式，屬於自由軟體， 以Artistic License 2.0作為發佈授權條款。 您可以遵照Artistic License 2.0來自由使用、散播、修改或製成衍生著作。 更詳細的條款及定義請參考隨附"LICENSE"條款副本。 發佈這一程式的目的是希望它有用，但沒有任何擔保，甚至沒有適合特定目的而隱含的擔保。 關於此程式相關的問題請不要詢問レッツPHP!及双葉ちゃん。 如果您沒有隨著程式收到一份Artistic License 2.0副本， 請瀏覽http://pixmicat.openfoundry.org/license/以取得一份。 "Pixmicat!", "Pixmicat", 及"圖咪貓"是Pixmicat! Development Team的商標。 最低運行需求： PHP 5.3.0 / 30 June 2009 GD Version 2.0.28 / 21 July 2004 建議運行環境： PHP 5.3.0 或更高版本並開啟 GD 和 Zlib 支援，如支援 ImageMagick 建議使用 安裝 PHP 編譯快取套件 (如eAccelerator, XCache, APC) 或其他快取套件 (如memcached) 更佳 如伺服器支援 SQLite, MySQL, PostgreSQL 等請盡量使用 設置方法： 根目錄的權限請設為777， 首先將pixmicat.php執行過一遍，必要的檔案和資料夾權限皆會自動設定， 自動設定完成後請刪除或註解起來此檔案底部之init(); // ←■■！程式環境初始化(略)一行， 然後再執行一遍pixmicat.php，即完成初始化程序，可以開始使用。 細部的設定請打開config.php參考註解修改，另有 Wiki (http://pixmicat.wikidot.com/pmcuse:config) 說明條目可資參考。 */ require './config.php'; // 引入設定檔 require ROOTPATH . 'vendor/autoload.php'; require ROOTPATH . 'lib/lib_compatible.php'; // 引入相容函式庫 require ROOTPATH . 'lib/lib_common.php'; // 引入共通函式檔案 /* 更新記錄檔檔案／輸出討論串 */ function updatelog($resno = 0, $page_num = -1, $single_page = false) { global $LIMIT_SENSOR; $PIO = PMCLibrary::getPIOInstance(); $FileIO = PMCLibrary::getFileIOInstance(); $PTE = PMCLibrary::getPTEInstance(); $PMS = PMCLibrary::getPMSInstance(); $adminMode = adminAuthenticate('check') && $page_num != -1 && !$single_page; // 前端管理模式 $adminFunc = ''; // 前端管理選擇 if ($adminMode) { $adminFunc = ''; } $resno = intval($resno); // 編號數字化 $page_start = $page_end = 0; // 靜態頁面編號 $inner_for_count = 1; // 內部迴圈執行次數 $RES_start = $RES_amount = $hiddenReply = $tree_count = 0; $kill_sensor = $old_sensor = false; // 預測系統啟動旗標 $arr_kill = $arr_old = array(); // 過舊編號陣列 $pte_vals = array( '{$THREADFRONT}' => '', '{$THREADREAR}' => '', '{$SELF}' => PHP_SELF, '{$DEL_HEAD_TEXT}' => '' . _T('del_head'), '{$DEL_IMG_ONLY_FIELD}' => '', '{$DEL_IMG_ONLY_TEXT}' => _T('del_img_only'), '{$DEL_PASS_TEXT}' => ($adminMode ? $adminFunc : '') . _T('del_pass'), '{$DEL_PASS_FIELD}' => '', '{$DEL_SUBMIT_BTN}' => '' ); if ($resno) { $pte_vals['{$RESTO}'] = $resno; } if (!$resno) { if ($page_num == -1) { // remake模式 (PHP動態輸出多頁份) $threads = $PIO->fetchThreadList(); // 取得全討論串列表 $PMS->useModuleMethods('ThreadOrder', array($resno, $page_num, $single_page, &$threads)); // "ThreadOrder" Hook Point $threads_count = count($threads); $inner_for_count = $threads_count > PAGE_DEF ? PAGE_DEF : $threads_count; $page_end = ceil($threads_count / PAGE_DEF) - 1; // 頁面編號最後值 } else { // 討論串分頁模式 (PHP動態輸出一頁份) $threads_count = $PIO->threadCount(); // 討論串個數 if ($page_num < 0 || ($threads_count > 0 && ($page_num * PAGE_DEF) >= $threads_count)) { error(_T('page_not_found')); } // $page_num超過範圍 $page_start = $page_end = $page_num; // 設定靜態頁面編號 $threads = $PIO->fetchThreadList(); // 取得全討論串列表 $PMS->useModuleMethods('ThreadOrder', array($resno, $page_num, $single_page, &$threads)); // "ThreadOrder" Hook Point $threads = array_splice($threads, $page_num * PAGE_DEF, PAGE_DEF); // 取出分頁後的討論串首篇列表 $inner_for_count = count($threads); // 討論串個數就是迴圈次數 } } else { if (!$PIO->isThread($resno)) { error(_T('thread_not_found')); } $AllRes = isset($_GET['page_num']) && $_GET['page_num'] == 'all'; // 是否使用 ALL 全部輸出 // 計算回應分頁範圍 $tree_count = $PIO->postCount($resno) - 1; // 討論串回應個數 if ($tree_count && RE_PAGE_DEF) { // 有回應且RE_PAGE_DEF > 0才做分頁動作 if ($page_num === 'all') { // show all $page_num = 0; $RES_start = 1; $RES_amount = $tree_count; } else { if ($page_num === 'RE_PAGE_MAX') { $page_num = ceil($tree_count / RE_PAGE_DEF) - 1; } // 特殊值：最末頁 if ($page_num < 0) { $page_num = 0; } // 負數 if ($page_num * RE_PAGE_DEF >= $tree_count) { error(_T('page_not_found')); } $RES_start = $page_num * RE_PAGE_DEF + 1; // 開始 $RES_amount = RE_PAGE_DEF; // 取幾個 } } elseif ($page_num > 0) { error(_T('page_not_found')); } // 沒有回應的情況只允許page_num = 0 或負數 else { $RES_start = 1; $RES_amount = $tree_count; $page_num = 0; } // 輸出全部回應 if (USE_RE_CACHE && !$adminMode) { // 檢查快取是否仍可使用 / 頁面有無更動 $cacheETag = md5(($AllRes ? 'all' : $page_num) . '-' . $tree_count); // 最新狀態快取用 ETag $cacheFile = STORAGE_PATH . 'cache/' . $resno . '-' . ($AllRes ? 'all' : $page_num) . '.'; // 暫存快取檔位置 $cacheGzipPrefix = extension_loaded('zlib') ? 'compress.zlib://' : ''; // 支援 Zlib Compression Stream 就使用 $cacheControl = isset($_SERVER['HTTP_CACHE_CONTROL']) ? $_SERVER['HTTP_CACHE_CONTROL'] : ''; // 瀏覽器快取控制 if (isset($_SERVER['HTTP_IF_NONE_MATCH']) && $_SERVER['HTTP_IF_NONE_MATCH'] == '"' . $cacheETag . '"') { // 再度瀏覽而快取無更動 header('HTTP/1.1 304 Not Modified'); header('ETag: "' . $cacheETag . '"'); return; } elseif (file_exists($cacheFile . $cacheETag) && $cacheControl != 'no-cache') { // 有(更新的)暫存快取檔存在 (未強制no-cache) header('X-Cache: HIT from Pixmicat!'); header('ETag: "' . $cacheETag . '"'); header('Connection: close'); readfile($cacheGzipPrefix . $cacheFile . $cacheETag); return; } else { header('X-Cache: MISS from Pixmicat!'); } } } // 預測過舊文章和將被刪除檔案 if (PIOSensor::check('predict', $LIMIT_SENSOR)) { // 是否需要預測 $old_sensor = true; // 標記打開 $arr_old = array_flip(PIOSensor::listee('predict', $LIMIT_SENSOR)); // 過舊文章陣列 } $tmp_total_size = $FileIO->getCurrentStorageSize(); // 目前附加圖檔使用量 $tmp_STORAGE_MAX = STORAGE_MAX * (($tmp_total_size >= STORAGE_MAX) ? 1 : 0.95); // 預估上限值 if (STORAGE_LIMIT && STORAGE_MAX > 0 && ($tmp_total_size >= $tmp_STORAGE_MAX)) { $kill_sensor = true; // 標記打開 $arr_kill = $PIO->delOldAttachments($tmp_total_size, $tmp_STORAGE_MAX); // 過舊附檔陣列 } $PMS->useModuleMethods('ThreadFront', array(&$pte_vals['{$THREADFRONT}'], $resno)); // "ThreadFront" Hook Point $PMS->useModuleMethods('ThreadRear', array(&$pte_vals['{$THREADREAR}'], $resno)); // "ThreadRear" Hook Point // 生成靜態頁面一頁份內容 for ($page = $page_start; $page <= $page_end; $page++) { $dat = ''; $pte_vals['{$THREADS}'] = ''; head($dat, $resno); form($dat, $resno); // 輸出討論串內容 for ($i = 0; $i < $inner_for_count; $i++) { // 取出討論串編號 if ($resno) { $tID = $resno; } // 單討論串輸出 (回應模式) else { if ($page_num == -1 && ($page * PAGE_DEF + $i) >= $threads_count) { break; } // remake 超出索引代表已全部完成 $tID = ($page_start == $page_end) ? $threads[$i] : $threads[$page * PAGE_DEF + $i]; // 一頁內容 (一般模式) / 多頁內容 (remake模式) $tree_count = $PIO->postCount($tID) - 1; // 討論串回應個數 $RES_start = $tree_count - RE_DEF + 1; if ($RES_start < 1) { $RES_start = 1; } // 開始 $RES_amount = RE_DEF; // 取幾個 $hiddenReply = $RES_start - 1; // 被隱藏回應數 } // $RES_start, $RES_amount 拿去算新討論串結構 (分頁後, 部分回應隱藏) $tree = $PIO->fetchPostList($tID); // 整個討論串樹狀結構 $tree_cut = array_slice($tree, $RES_start, $RES_amount); array_unshift($tree_cut, $tID); // 取出特定範圍回應 $posts = $PIO->fetchPosts($tree_cut); // 取得文章架構內容 $pte_vals['{$THREADS}'] .= arrangeThread($PTE, $tree, $tree_cut, $posts, $hiddenReply, $resno, $arr_kill, $arr_old, $kill_sensor, $old_sensor, true, $adminMode); // 交給這個函式去搞討論串印出 } $pte_vals['{$PAGENAV}'] = '
'; // 換頁判斷 $prev = ($resno ? $page_num : $page) - 1; $next = ($resno ? $page_num : $page) + 1; if ($resno) { // 回應分頁 if (RE_PAGE_DEF > 0) { // 回應分頁開啟 $pte_vals['{$PAGENAV}'] .= '
'; $pte_vals['{$PAGENAV}'] .= ($prev >= 0) ? '' : _T('first_page'); $pte_vals['{$PAGENAV}'] .= ""; if ($tree_count == 0) { $pte_vals['{$PAGENAV}'] .= '[0] '; } // 無回應 else { for ($i = 0, $len = $tree_count / RE_PAGE_DEF; $i < $len; $i++) { if (!$AllRes && $page_num == $i) { $pte_vals['{$PAGENAV}'] .= '[' . $i . '] '; } else { $pte_vals['{$PAGENAV}'] .= '[' . $i . '] '; } } $pte_vals['{$PAGENAV}'] .= $AllRes ? '[' . _T('all_pages') . '] ' : ($tree_count > RE_PAGE_DEF ? '[' . _T('all_pages') . '] ' : ''); } $pte_vals['{$PAGENAV}'] .= ''; $pte_vals['{$PAGENAV}'] .= (!$AllRes && $tree_count > $next * RE_PAGE_DEF) ? '' . _T('next_page') . '' : _T('last_page'); $pte_vals['{$PAGENAV}'] .= '
' . "\n"; } } else { // 一般分頁 $pte_vals['{$PAGENAV}'] .= ''; if ($prev >= 0) { if (!$adminMode && $prev == 0) { $pte_vals['{$PAGENAV}'] .= ''; } else { $pte_vals['{$PAGENAV}'] .= ''; } $pte_vals['{$PAGENAV}'] .= ''; if ($threads_count > $next * PAGE_DEF) { if ($adminMode || (STATIC_HTML_UNTIL != -1) && ($next > STATIC_HTML_UNTIL)) { $pte_vals['{$PAGENAV}'] .= ''; } else { $pte_vals['{$PAGENAV}'] .= ''; } $pte_vals['{$PAGENAV}'] .= '
'; } else { if ($adminMode || (STATIC_HTML_UNTIL != -1) && ($prev > STATIC_HTML_UNTIL)) { $pte_vals['{$PAGENAV}'] .= '
'; } else { $pte_vals['{$PAGENAV}'] .= ''; } } $pte_vals['{$PAGENAV}'] .= '
' . _T('first_page') . ''; for ($i = 0, $len = $threads_count / PAGE_DEF; $i < $len; $i++) { if ($page == $i) { $pte_vals['{$PAGENAV}'] .= "[" . $i . "] "; } else { $pageNext = ($i == $next) ? ' rel="next"' : ''; if (!$adminMode && $i == 0) { $pte_vals['{$PAGENAV}'] .= '[0] '; } elseif ($adminMode || (STATIC_HTML_UNTIL != -1 && $i > STATIC_HTML_UNTIL)) { $pte_vals['{$PAGENAV}'] .= '[' . $i . '] '; } else { $pte_vals['{$PAGENAV}'] .= '[' . $i . '] '; } } } $pte_vals['{$PAGENAV}'] .= '
'; } else { $pte_vals['{$PAGENAV}'] .= '
'; } $pte_vals['{$PAGENAV}'] .= '
' . _T('last_page') . '
' . "\n"; } $pte_vals['{$PAGENAV}'] .= '
'; $dat .= $PTE->ParseBlock('MAIN', $pte_vals); foot($dat); // 存檔 / 輸出 if ($single_page || ($page_num == -1 && !$resno)) { // 靜態快取頁面生成 if ($page == 0) { $logfilename = PHP_SELF2; } else { $logfilename = $page . PHP_EXT; } $fp = fopen(STORAGE_PATH . $logfilename, 'w'); stream_set_write_buffer($fp, 0); fwrite($fp, $dat); fclose($fp); @chmod(STORAGE_PATH . $logfilename, 0666); if (STATIC_HTML_UNTIL != -1 && STATIC_HTML_UNTIL == $page) { break; } // 頁面數目限制 } else { // PHP 輸出 (回應模式/一般動態輸出) if (USE_RE_CACHE && !$adminMode && $resno && !isset($_GET['upseries'])) { // 更新快取 if ($oldCaches = glob($cacheFile . '*')) { foreach ($oldCaches as $o) { unlink($o); } // 刪除舊快取 } $fp = fopen($cacheGzipPrefix . $cacheFile . $cacheETag, 'w'); fwrite($fp, $dat); fclose($fp); @chmod($cacheFile . $cacheETag, 0666); header('ETag: "' . $cacheETag . '"'); header('Connection: close'); } echo $dat; break; } } } /* 輸出討論串架構 */ function arrangeThread( $PTE, $tree, $tree_cut, $posts, $hiddenReply, $resno = 0, $arr_kill, $arr_old, $kill_sensor, $old_sensor, $showquotelink = true, $adminMode = false ) { $PIO = PMCLibrary::getPIOInstance(); $FileIO = PMCLibrary::getFileIOInstance(); $PMS = PMCLibrary::getPMSInstance(); $thdat = ''; // 討論串輸出碼 $posts_count = count($posts); // 迴圈次數 if (gettype($tree_cut) == 'array') { $tree_cut = array_flip($tree_cut); } // array_flip + isset 搜尋法 if (gettype($tree) == 'array') { $tree_clone = array_flip($tree); } // $i = 0 (首篇), $i = 1～n (回應) for ($i = 0; $i < $posts_count; $i++) { $imgsrc = $img_thumb = $imgwh_bar = ''; $IMG_BAR = $REPLYBTN = $QUOTEBTN = $WARN_OLD = $WARN_BEKILL = $WARN_ENDREPLY = $WARN_HIDEPOST = ''; extract($posts[$i]); // 取出討論串文章內容設定變數 // 設定欄位值 $name = str_replace('&' . _T('trip_pre'), '&' . _T('trip_pre'), $name); // 避免 &#xxxx; 後面被視為 Trip 留下 & 造成解析錯誤 if (CLEAR_SAGE) { $email = preg_replace('/^sage( *)/i', '', trim($email)); } // 清除E-mail中的「sage」關鍵字 if (ALLOW_NONAME == 2) { // 強制砍名 $name = preg_match('/(\\' . _T('trip_pre') . '.{10})/', $name, $matches) ? '' . $matches[1] . '' : ''; if ($email) { $now = "$now"; } } else { $name = preg_replace('/(\\' . _T('trip_pre') . '.{10})/', '$1', $name); // Trip取消粗體 if ($email) { $name = "$name"; } } if (AUTO_LINK) { $com = auto_link($com); } $com = quoteLight($com); if (USE_QUOTESYSTEM && $i) { // 啟用引用瀏覽系統 if (preg_match_all('/((?:>|＞)+)(?:No\.)?(\d+)/i', $com, $matches, PREG_SET_ORDER)) { // 找尋>>No.xxx $matches_unique = array(); foreach ($matches as $val) { if (!in_array($val, $matches_unique)) { array_push($matches_unique, $val); } } foreach ($matches_unique as $val) { if (isset($tree_clone[$val[2]])) { $r_page = $tree_clone[$val[2]]; // 引用回應在整體討論串中的位置 // 在此頁顯示區間內，輸出錨點即可 if (isset($tree_cut[$val[2]])) { $com = str_replace($val[0], '' . $val[0] . '', $com); } // 非此頁顯示區間，輸出完整頁面位置 else { $com = str_replace($val[0], '' . $val[0] . '', $com); } } } } } // 設定附加圖檔顯示 if ($ext && $FileIO->imageExists($tim . $ext)) { $imageURL = $FileIO->getImageURL($tim . $ext); // image URL $thumbName = $FileIO->resolveThumbName($tim); // thumb Name $imgsrc = '' . $imgsize . ''; // 預設顯示圖樣式 (無預覽圖時) if ($tw && $th) { if ($thumbName != false) { // 有預覽圖 $thumbURL = $FileIO->getImageURL($thumbName); // thumb URL $img_thumb = '' . _T('img_sample') . ''; $imgsrc = '' . $imgsize . ''; } elseif ($ext == '.swf') { $imgsrc = ''; } // swf檔案不需預覽圖 } if (SHOW_IMGWH) { $imgwh_bar = ', ' . $imgw . 'x' . $imgh; } // 顯示附加圖檔之原檔長寬尺寸 $IMG_BAR = _T('img_filename') . '' . $tim . $ext . '-(' . $imgsize . $imgwh_bar . ') ' . $img_thumb; } // 設定回應 / 引用連結 if ($resno) { // 回應模式 if ($showquotelink) { $QUOTEBTN = 'No.' . $no . ''; } else { $QUOTEBTN = 'No.' . $no . ''; } } else { if (!$i) { $REPLYBTN = '[' . _T('reply_btn') . ']'; } // 首篇 $QUOTEBTN = 'No.' . $no . ''; } if ($adminMode) { // 前端管理模式 $modFunc = ''; $PMS->useModuleMethods('AdminList', array(&$modFunc, $posts[$i], $resto)); // "AdminList" Hook Point $QUOTEBTN .= $modFunc; } // 設定討論串屬性 if (STORAGE_LIMIT && $kill_sensor) { if (isset($arr_kill[$no])) { $WARN_BEKILL = '' . _T('warn_sizelimit') . '
' . "\n"; } } // 預測刪除過大檔 if (!$i) { // 首篇 Only if ($old_sensor) { if (isset($arr_old[$no])) { $WARN_OLD = '' . _T('warn_oldthread') . '
' . "\n"; } } // 快要被刪除的提示 $flgh = $PIO->getPostStatus($status); if ($flgh->exists('TS')) { $WARN_ENDREPLY = '' . _T('warn_locked') . '
' . "\n"; } // 被標記為禁止回應 if ($hiddenReply) { $WARN_HIDEPOST = '' . _T('notice_omitted', $hiddenReply) . '
' . "\n"; } // 有隱藏的回應 } // 對類別標籤作自動連結 if (USE_CATEGORY) { $ary_category = explode(',', str_replace(',', ',', $category)); $ary_category = array_map('trim', $ary_category); $ary_category_count = count($ary_category); $ary_category2 = array(); for ($p = 0; $p < $ary_category_count; $p++) { if ($c = $ary_category[$p]) { $ary_category2[] = '' . $c . ''; } } $category = implode(', ', $ary_category2); } else { $category = ''; } // 最終輸出處 if ($i) { // 回應 $arrLabels = array( '{$NO}' => $no, '{$SUB}' => $sub, '{$NAME}' => $name, '{$NOW}' => $now, '{$CATEGORY}' => $category, '{$QUOTEBTN}' => $QUOTEBTN, '{$IMG_BAR}' => $IMG_BAR, '{$IMG_SRC}' => $imgsrc, '{$WARN_BEKILL}' => $WARN_BEKILL, '{$NAME_TEXT}' => _T('post_name'), '{$CATEGORY_TEXT}' => _T('post_category'), '{$SELF}' => PHP_SELF, '{$COM}' => $com ); if ($resno) { $arrLabels['{$RESTO}'] = $resno; } $PMS->useModuleMethods('ThreadReply', array(&$arrLabels, $posts[$i], $resno)); // "ThreadReply" Hook Point $thdat .= $PTE->ParseBlock('REPLY', $arrLabels); } else { // 首篇 $arrLabels = array( '{$NO}' => $no, '{$SUB}' => $sub, '{$NAME}' => $name, '{$NOW}' => $now, '{$CATEGORY}' => $category, '{$QUOTEBTN}' => $QUOTEBTN, '{$REPLYBTN}' => $REPLYBTN, '{$IMG_BAR}' => $IMG_BAR, '{$IMG_SRC}' => $imgsrc, '{$WARN_OLD}' => $WARN_OLD, '{$WARN_BEKILL}' => $WARN_BEKILL, '{$WARN_ENDREPLY}' => $WARN_ENDREPLY, '{$WARN_HIDEPOST}' => $WARN_HIDEPOST, '{$NAME_TEXT}' => _T('post_name'), '{$CATEGORY_TEXT}' => _T('post_category'), '{$SELF}' => PHP_SELF, '{$COM}' => $com ); if ($resno) { $arrLabels['{$RESTO}'] = $resno; } $PMS->useModuleMethods('ThreadPost', array(&$arrLabels, $posts[$i], $resno)); // "ThreadPost" Hook Point $thdat .= $PTE->ParseBlock('THREAD', $arrLabels); } } $thdat .= $PTE->ParseBlock('THREADSEPARATE', ($resno) ? array('{$RESTO}' => $resno) : array()); return $thdat; } /* 寫入記錄檔 */ function regist() { global $BAD_STRING, $BAD_FILEMD5, $BAD_IPADDR, $LIMIT_SENSOR, $THUMB_SETTING; $PIO = PMCLibrary::getPIOInstance(); $FileIO = PMCLibrary::getFileIOInstance(); $PMS = PMCLibrary::getPMSInstance(); $dest = ''; $mes = ''; $up_incomplete = 0; $is_admin = false; $delta_totalsize = 0; // 總檔案大小的更動值 if ($_SERVER['REQUEST_METHOD'] != 'POST') { error(_T('regist_notpost')); } // 非正規POST方式 // 欄位陷阱 $FTname = isset($_POST['name']) ? $_POST['name'] : ''; $FTemail = isset($_POST['email']) ? $_POST['email'] : ''; $FTsub = isset($_POST['sub']) ? $_POST['sub'] : ''; $FTcom = isset($_POST['com']) ? $_POST['com'] : ''; $FTreply = isset($_POST['reply']) ? $_POST['reply'] : ''; if ($FTname != 'spammer' || $FTemail != 'foo@foo.bar' || $FTsub != 'DO NOT FIX THIS' || $FTcom != 'EID OG SMAPS' || $FTreply != '') { error(_T('regist_nospam')); } $name = isset($_POST[FT_NAME]) ? CleanStr($_POST[FT_NAME]) : ''; $email = isset($_POST[FT_EMAIL]) ? CleanStr($_POST[FT_EMAIL]) : ''; $sub = isset($_POST[FT_SUBJECT]) ? CleanStr($_POST[FT_SUBJECT]) : ''; $com = isset($_POST[FT_COMMENT]) ? $_POST[FT_COMMENT] : ''; $pwd = isset($_POST['pwd']) ? $_POST['pwd'] : ''; $category = isset($_POST['category']) ? CleanStr($_POST['category']) : ''; $resto = isset($_POST['resto']) ? intval($_POST['resto']) : 0; $upfile = isset($_FILES['upfile']['tmp_name']) ? $_FILES['upfile']['tmp_name'] : ''; $upfile_path = isset($_POST['upfile_path']) ? $_POST['upfile_path'] : ''; $upfile_name = isset($_FILES['upfile']['name']) ? $_FILES['upfile']['name'] : false; $upfile_status = isset($_FILES['upfile']['error']) ? $_FILES['upfile']['error'] : 4; $pwdc = isset($_COOKIE['pwdc']) ? $_COOKIE['pwdc'] : ''; $ip = getREMOTE_ADDR(); $host = gethostbyaddr($ip); $PMS->useModuleMethods('RegistBegin', array( &$name, &$email, &$sub, &$com, array( 'file' => &$upfile, 'path' => &$upfile_path, 'name' => &$upfile_name, 'status' => &$upfile_status ), array('ip' => $ip, 'host' => $host), $resto )); // "RegistBegin" Hook Point // 封鎖：IP/Hostname/DNSBL 檢查機能 $baninfo = ''; if (BanIPHostDNSBLCheck($ip, $host, $baninfo)) { error(_T('regist_ipfiltered', $baninfo)); } // 封鎖：限制出現之文字 foreach ($BAD_STRING as $value) { if (strpos($com, $value) !== false || strpos($sub, $value) !== false || strpos($name, $value) !== false || strpos($email, $value) !== false ) { error(_T('regist_wordfiltered')); } } // 檢查是否輸入櫻花日文假名 foreach (array($name, $email, $sub, $com) as $anti) { if (anti_sakura($anti)) { error(_T('regist_sakuradetected')); } } // 時間 $time = time(); $tim = $time . substr(microtime(), 2, 3); // 判斷上傳狀態 switch ($upfile_status) { case 1: error(_T('regist_upload_exceedphp')); break; case 2: error(_T('regist_upload_exceedcustom')); break; case 3: error(_T('regist_upload_incompelete')); break; case 6: error(_T('regist_upload_direrror')); break; case 4: // 無上傳 if (!$resto && !isset($_POST['noimg'])) { error(_T('regist_upload_noimg')); } break; case 0: // 上傳正常 default: } // 如果有上傳檔案則處理附加圖檔 if ($upfile && (@is_uploaded_file($upfile) || @is_file($upfile))) { // 一‧先儲存檔案 $dest = STORAGE_PATH . $tim . '.tmp'; @move_uploaded_file($upfile, $dest) or @copy($upfile, $dest); @chmod($dest, 0666); if (!is_file($dest)) { error(_T('regist_upload_filenotfound'), $dest); } // 二‧判斷上傳附加圖檔途中是否有中斷 $upsizeTTL = $_SERVER['CONTENT_LENGTH']; if (isset($_FILES['upfile'])) { // 有傳輸資料才需要計算，避免作白工 $upsizeHDR = 0; // 檔案路徑：IE附完整路徑，故得從隱藏表單取得 $tmp_upfile_path = $upfile_name; if ($upfile_path) { $tmp_upfile_path = get_magic_quotes_gpc() ? stripslashes($upfile_path) : $upfile_path; } list(, $boundary) = explode('=', $_SERVER['CONTENT_TYPE']); foreach ($_POST as $header => $value) { // 表單欄位傳送資料 $upsizeHDR += strlen('--' . $boundary . "\r\n"); $upsizeHDR += strlen('Content-Disposition: form-data; name="' . $header . '"' . "\r\n\r\n" . (get_magic_quotes_gpc() ? stripslashes($value) : $value) . "\r\n"); } // 附加圖檔欄位傳送資料 $upsizeHDR += strlen('--' . $boundary . "\r\n"); $upsizeHDR += strlen('Content-Disposition: form-data; name="upfile"; filename="' . $tmp_upfile_path . "\"\r\n" . 'Content-Type: ' . $_FILES['upfile']['type'] . "\r\n\r\n"); $upsizeHDR += strlen("\r\n--" . $boundary . "--\r\n"); $upsizeHDR += $_FILES['upfile']['size']; // 傳送附加圖檔資料量 // 上傳位元組差值超過 HTTP_UPLOAD_DIFF：上傳附加圖檔不完全 if (($upsizeTTL - $upsizeHDR) > HTTP_UPLOAD_DIFF) { if (KILL_INCOMPLETE_UPLOAD) { unlink($dest); die(_T('regist_upload_killincomp')); // 給瀏覽器的提示，假如使用者還看的到的話才不會納悶 } else { $up_incomplete = 1; } } } // 三‧檢查是否為可接受的檔案 $size = @getimagesize($dest); if (!is_array($size)) { // 檢查是否為WebM if (USE_WEBM && ($webm_info = Webm\Webm::isWebm($dest)) !== false) { $size = array( 0 => $webm_info['W'], 1 => $webm_info['H'], 2 => Webm\Webm::IMAGETYPE_WEBM ); } else { error(_T('regist_upload_notimage'), $dest); // $size不為陣列就不是圖檔 } } $imgsize = @filesize($dest); // 檔案大小 $imgsize = ($imgsize >= 1024) ? (int)($imgsize / 1024) . ' KB' : $imgsize . ' B'; // KB和B的判別 switch ($size[2]) { // 判斷上傳附加圖檔之格式 case 1: $ext = ".gif"; break; case 2: $ext = ".jpg"; break; case 3: $ext = ".png"; break; case 4: $ext = ".swf"; break; case 5: $ext = ".psd"; break; case 6: $ext = ".bmp"; break; case 13: $ext = ".swf"; break; case Webm\Webm::IMAGETYPE_WEBM: $ext = ".webm"; break; default: $ext = ".xxx"; error(_T('regist_upload_notsupport'), $dest); } $allow_exts = explode('|', strtolower(ALLOW_UPLOAD_EXT)); // 接受之附加圖檔副檔名 if (array_search(substr($ext, 1), $allow_exts) === false) { error(_T('regist_upload_notsupport'), $dest); } // 並無在接受副檔名之列 // 封鎖設定：限制上傳附加圖檔之MD5檢查碼 $md5chksum = md5_file($dest); // 檔案MD5 if (array_search($md5chksum, $BAD_FILEMD5) !== false) { error(_T('regist_upload_blocked'), $dest); } // 在封鎖設定內則阻擋 // 四‧計算附加圖檔圖檔縮圖顯示尺寸 $W = $imgW = $size[0]; $H = $imgH = $size[1]; $MAXW = $resto ? MAX_RW : MAX_W; $MAXH = $resto ? MAX_RH : MAX_H; if ($W > $MAXW || $H > $MAXH) { $W2 = $MAXW / $W; $H2 = $MAXH / $H; $key = ($W2 < $H2) ? $W2 : $H2; $W = ceil($W * $key); $H = ceil($H * $key); } $mes = _T('regist_uploaded', CleanStr($upfile_name)); } // 檢查表單欄位內容並修整 if (strlenUnicode($name) > INPUT_MAX) { error(_T('regist_nametoolong'), $dest); } if (strlenUnicode($email) > INPUT_MAX) { error(_T('regist_emailtoolong'), $dest); } if (strlenUnicode($sub) > INPUT_MAX) { error(_T('regist_topictoolong'), $dest); } if (strlenUnicode($resto) > INPUT_MAX) { error(_T('regist_longthreadnum'), $dest); } // E-mail / 標題修整 $email = str_replace("\r\n", '', $email); $sub = str_replace("\r\n", '', $sub); // 名稱修整 $name = str_replace(_T('trip_pre'), _T('trip_pre_fake'), $name); // 防止トリップ偽造 $name = str_replace(CAP_SUFFIX, _T('cap_char_fake'), $name); // 防止管理員キャップ偽造 $name = str_replace("\r\n", '', $name); $nameOri = $name; // 名稱 if (preg_match('/(.*?)[#＃](.*)/u', $name, $regs)) { // トリップ(Trip)機能 $name = $nameOri = $regs[1]; $cap = strtr($regs[2], array('&' => '&')); $salt = preg_replace('/[^\.-z]/', '.', substr($cap . 'H.', 1, 2)); $salt = strtr($salt, ':;<=>?@[\\]^_`', 'ABCDEFGabcdef'); $name = $name . _T('trip_pre') . substr(crypt($cap, $salt), -10); } if (CAP_ENABLE && preg_match('/(.*?)[#＃](.*)/', $email, $aregs)) { // 管理員キャップ(Cap)機能 $acap_name = $nameOri; $acap_pwd = strtr($aregs[2], array('&' => '&')); if ($acap_name == CAP_NAME && $acap_pwd == CAP_PASS) { $name = '' . $name . CAP_SUFFIX . ''; $is_admin = true; $email = $aregs[1]; // 去除 #xx 密碼 } } if (!$is_admin) { // 非管理員 $name = str_replace(_T('admin'), '"' . _T('admin') . '"', $name); $name = str_replace(_T('deletor'), '"' . _T('deletor') . '"', $name); } $name = str_replace('&' . _T('trip_pre'), '&' . _T('trip_pre'), $name); // 避免 &#xxxx; 後面被視為 Trip 留下 & 造成解析錯誤 // 內文修整 if ((strlenUnicode($com) > COMM_MAX) && !$is_admin) { error(_T('regist_commenttoolong'), $dest); } $com = CleanStr($com, $is_admin); // 引入$is_admin參數是因為當管理員キャップ啟動時，允許管理員依config設定是否使用HTML if (!$com && $upfile_status == 4) { error(_T('regist_withoutcomment')); } $com = str_replace(array("\r\n", "\r"), "\n", $com); $com = preg_replace("/\n((　| )*\n){3,}/", "\n", $com); if (!BR_CHECK || substr_count($com, "\n") < BR_CHECK) { $com = nl2br($com); } // 換行字元用
代替 $com = str_replace("\n", '', $com); // 若還有\n換行字元則取消換行 // 預設的內容 if (!$name || preg_match("/^[ |　|]*$/", $name)) { if (ALLOW_NONAME) { $name = DEFAULT_NONAME; } else { error(_T('regist_withoutname'), $dest); } } if (!$sub || preg_match("/^[ |　|]*$/", $sub)) { $sub = DEFAULT_NOTITLE; } if (!$com || preg_match("/^[ |　|\t]*$/", $com)) { $com = DEFAULT_NOCOMMENT; } // 修整標籤樣式 if ($category && USE_CATEGORY) { $category = explode(',', $category); // 把標籤拆成陣列 $category = ',' . implode(',', array_map('trim', $category)) . ','; // 去空白再合併為單一字串 (左右含,便可以直接以,XX,形式搜尋) } else { $category = ''; } if ($up_incomplete) { $com .= '

' . _T('notice_incompletefile') . ''; } // 上傳附加圖檔不完全的提示 // 密碼和時間的樣式 if ($pwd == '') { $pwd = ($pwdc == '') ? substr(rand(), 0, 8) : $pwdc; } $pass = $pwd ? substr(md5($pwd), 2, 8) : '*'; // 生成真正儲存判斷用的密碼 $youbi = array(_T('sun'), _T('mon'), _T('tue'), _T('wed'), _T('thu'), _T('fri'), _T('sat')); $yd = $youbi[gmdate('w', $time + TIME_ZONE * 60 * 60)]; $now = gmdate('y/m/d', $time + TIME_ZONE * 60 * 60) . '(' . (string)$yd . ')' . gmdate('H:i', $time + TIME_ZONE * 60 * 60); if (DISP_ID) { // 顯示ID if ($email && DISP_ID == 1) { $now .= ' ID:???'; } else { $now .= ' ID:' . substr(crypt(md5(getREMOTE_ADDR() . IDSEED . gmdate('Ymd', $time + TIME_ZONE * 60 * 60)), 'id'), -8); } } // 連續投稿 / 相同附加圖檔檢查 $checkcount = 50; // 預設檢查50筆資料 $pwdc = substr(md5($pwdc), 2, 8); // Cookies密碼 if ($PIO->isSuccessivePost($checkcount, $com, $time, $pass, $pwdc, $host, $upfile_name)) { error(_T('regist_successivepost'), $dest); } // 連續投稿檢查 if ($dest) { if ($PIO->isDuplicateAttachment($checkcount, $md5chksum)) { error(_T('regist_duplicatefile'), $dest); } } // 相同附加圖檔檢查 if ($resto) { $ThreadExistsBefore = $PIO->isThread($resto); } // 舊文章刪除處理 if (PIOSensor::check('delete', $LIMIT_SENSOR)) { $delarr = PIOSensor::listee('delete', $LIMIT_SENSOR); if (count($delarr)) { deleteCache($delarr); $PMS->useModuleMethods('PostOnDeletion', array($delarr, 'recycle')); // "PostOnDeletion" Hook Point $files = $PIO->removePosts($delarr); if (count($files)) { $delta_totalsize -= $FileIO->deleteImage($files); } // 更新 delta 值 } } // 附加圖檔容量限制功能啟動：刪除過大檔 if (STORAGE_LIMIT && STORAGE_MAX > 0) { $tmp_total_size = $FileIO->getCurrentStorageSize(); // 取得目前附加圖檔使用量 if ($tmp_total_size > STORAGE_MAX) { $files = $PIO->delOldAttachments($tmp_total_size, STORAGE_MAX, false); $delta_totalsize -= $FileIO->deleteImage($files); } } // 判斷欲回應的文章是不是剛剛被刪掉了 if ($resto) { if ($ThreadExistsBefore) { // 欲回應的討論串是否存在 if (!$PIO->isThread($resto)) { // 被回應的討論串存在但已被刪 // 提前更新資料來源，此筆新增亦不紀錄 $PIO->dbCommit(); updatelog(); error(_T('regist_threaddeleted'), $dest); } else { // 檢查是否討論串被設為禁止回應 (順便取出原討論串的貼文時間) $post = $PIO->fetchPosts($resto); // [特殊] 取單篇文章內容，但是回傳的$post同樣靠[$i]切換文章！ list($chkstatus, $chktime) = array($post[0]['status'], $post[0]['tim']); $chktime = substr($chktime, 0, -3); // 拿掉微秒 (後面三個字元) $flgh = $PIO->getPostStatus($chkstatus); if ($flgh->exists('TS')) { error(_T('regist_threadlocked'), $dest); } } } else { error(_T('thread_not_found'), $dest); } // 不存在 } // 計算某些欄位值 $no = $PIO->getLastPostNo('beforeCommit') + 1; isset($ext) ? 0 : $ext = ''; isset($imgW) ? 0 : $imgW = 0; isset($imgH) ? 0 : $imgH = 0; isset($imgsize) ? 0 : $imgsize = ''; isset($W) ? 0 : $W = 0; isset($H) ? 0 : $H = 0; isset($md5chksum) ? 0 : $md5chksum = ''; $age = false; $status = ''; if ($resto) { if (!stristr($email, 'sage') && ($PIO->postCount($resto) <= MAX_RES || MAX_RES == 0)) { if (!MAX_AGE_TIME || (($time - $chktime) < (MAX_AGE_TIME * 60 * 60))) { $age = true; } // 討論串並無過期，推文 } } $PMS->useModuleMethods('RegistBeforeCommit', array( &$name, &$email, &$sub, &$com, &$category, &$age, $dest, $resto, array($W, $H, $imgW, $imgH), &$status )); // "RegistBeforeCommit" Hook Point // 正式寫入儲存 $PIO->addPost($no, $resto, $md5chksum, $category, $tim, $ext, $imgW, $imgH, $imgsize, $W, $H, $pass, $now, $name, $email, $sub, $com, $host, $age, $status); $PIO->dbCommit(); $lastno = $PIO->getLastPostNo('afterCommit'); // 取得此新文章編號 $PMS->useModuleMethods('RegistAfterCommit', array($lastno, $resto, $name, $email, $sub, $com)); // "RegistAfterCommit" Hook Point // Cookies儲存：密碼與E-mail部分，期限是一週 setcookie('pwdc', $pwd, time() + 7 * 24 * 3600); setcookie('emailc', $email, time() + 7 * 24 * 3600); if ($dest && is_file($dest)) { $destFile = IMG_DIR . $tim . $ext; // 圖檔儲存位置 $thumbFile = THUMB_DIR . $tim . 's.' . $THUMB_SETTING['Format']; // 預覽圖儲存位置 if (USE_THUMB !== 0) { // 生成預覽圖 if (isset($webm_info)) { Webm\Webm::createThumbnail($dest, $thumbFile, $webm_info, $W, $H); } else { $thObj = PMCLibrary::getThumbInstance(); $thObj->setSourceConfig($dest, $imgW, $imgH); $thObj->setThumbnailConfig($W, $H, $THUMB_SETTING); $thObj->makeThumbnailtoFile($thumbFile); @chmod($thumbFile, 0666); unset($thObj); } } rename($dest, $destFile); if (file_exists($destFile)) { $FileIO->uploadImage($tim . $ext, $destFile, filesize($destFile)); $delta_totalsize += filesize($destFile); } if (file_exists($thumbFile)) { $FileIO->uploadImage($tim . 's.' . $THUMB_SETTING['Format'], $thumbFile, filesize($thumbFile)); $delta_totalsize += filesize($thumbFile); } } // delta != 0 表示總檔案大小有更動，須更新快取 if ($delta_totalsize != 0) { $FileIO->updateStorageSize($delta_totalsize); } updatelog(); // 引導使用者至新頁面 $RedirURL = PHP_SELF2 . '?' . $tim; // 定義儲存資料後轉址目標 if (isset($_POST['up_series'])) { // 勾選連貼機能 if ($resto) { $RedirURL = PHP_SELF . '?res=' . $resto . '&upseries=1'; } // 回應後繼續轉回此主題下 else { $RedirURL = PHP_SELF . '?res=' . $lastno . '&upseries=1'; // 新增主題後繼續轉到此主題下 } } $RedirforJS = strtr($RedirURL, array("&" => "&")); // JavaScript用轉址目標 echo <<< _REDIR_
_REDIR_; echo _T('regist_redirect', $mes, $RedirURL) . '
'; } /* 使用者刪除 */ function usrdel() { $PIO = PMCLibrary::getPIOInstance(); $FileIO = PMCLibrary::getFileIOInstance(); $PMS = PMCLibrary::getPMSInstance(); // $pwd: 使用者輸入值, $pwdc: Cookie記錄密碼 $pwd = isset($_POST['pwd']) ? $_POST['pwd'] : ''; $pwdc = isset($_COOKIE['pwdc']) ? $_COOKIE['pwdc'] : ''; $onlyimgdel = isset($_POST['onlyimgdel']) ? $_POST['onlyimgdel'] : ''; $delno = array(); reset($_POST); while ($item = each($_POST)) { if ($item[1] !== 'delete') { continue; } if (!is_numeric($item[0])) { continue; } array_push($delno, intval($item[0])); } $haveperm = passwordVerify($pwd) || adminAuthenticate('check'); $PMS->useModuleMethods('Authenticate', array($pwd, 'userdel', &$haveperm)); if ($haveperm && isset($_POST['func'])) { // 前端管理功能 $message = ''; $PMS->useModuleMethods('AdminFunction', array('run', &$delno, $_POST['func'], &$message)); // "AdminFunction" Hook Point if ($_POST['func'] != 'delete') { if (isset($_SERVER['HTTP_REFERER'])) { header('HTTP/1.1 302 Moved Temporarily'); header('Location: ' . $_SERVER['HTTP_REFERER']); } exit(); // 僅執行AdminFunction，終止刪除動作 } } if ($pwd == '' && $pwdc != '') { $pwd = $pwdc; } $pwd_md5 = substr(md5($pwd), 2, 8); $host = gethostbyaddr(getREMOTE_ADDR()); $search_flag = $delflag = false; if (!count($delno)) { error(_T('del_notchecked')); } $delposts = array(); // 真正符合刪除條件文章 $posts = $PIO->fetchPosts($delno); foreach ($posts as $post) { if ($pwd_md5 == $post['pwd'] || $host == $post['host'] || $haveperm) { $search_flag = true; // 有搜尋到 array_push($delposts, intval($post['no'])); } } if ($search_flag) { if (!$onlyimgdel) { $PMS->useModuleMethods('PostOnDeletion', array($delposts, 'frontend')); } // "PostOnDeletion" Hook Point $files = $onlyimgdel ? $PIO->removeAttachments($delposts) : $PIO->removePosts($delposts); $FileIO->updateStorageSize(-$FileIO->deleteImage($files)); // 更新容量快取 deleteCache($delposts); $PIO->dbCommit(); } else { error(_T('del_wrongpwornotfound')); } if (isset($_POST['func']) && $_POST['func'] == 'delete') { // 前端管理刪除文章返回管理頁面 if (isset($_SERVER['HTTP_REFERER'])) { header('HTTP/1.1 302 Moved Temporarily'); header('Location: ' . $_SERVER['HTTP_REFERER']); } exit(); } } /* 管理員密碼認證 */ function valid() { $PMS = PMCLibrary::getPMSInstance(); $pass = isset($_POST['pass']) ? $_POST['pass'] : ''; // 管理者密碼 $haveperm = false; $isCheck = adminAuthenticate('check'); // 登入是否正確 if (!$isCheck && $pass) { $haveperm = passwordVerify($pass); $PMS->useModuleMethods('Authenticate', array($pass, 'admin', &$haveperm)); if ($haveperm) { adminAuthenticate('login'); $isCheck = true; } else { error(_T('admin_wrongpassword')); } } $dat = ''; head($dat); $links = '[' . _T('return') . '] [' . _T('admin_remake') . '] [' . _T('admin_frontendmanage') . ']'; $PMS->useModuleMethods('LinksAboveBar', array(&$links, 'admin', $isCheck)); // LinksAboveBar hook point $dat .= '
'; echo $dat; if (!$isCheck) { echo '
' . _T('admin_manageposts') . ' ' . _T('admin_optimize') . ' ' . _T('admin_check') . ' ' . _T('admin_repair') . ' ' . _T('admin_export') . '
'; die("\n\n"); } elseif (!isset($_REQUEST['admin'])) { echo '
' . _T('admin_manageposts') . ' ' . _T('admin_optimize') . ' ' . _T('admin_check') . ' ' . _T('admin_repair') . ' ' . _T('admin_export') . ' ' . _T('admin_logout') . '
'; die("\n\n"); } } /* 管理文章模式 */ function admindel() { $PIO = PMCLibrary::getPIOInstance(); $FileIO = PMCLibrary::getFileIOInstance(); $PMS = PMCLibrary::getPMSInstance(); $pass = isset($_POST['pass']) ? $_POST['pass'] : ''; // 管理者密碼 $page = isset($_REQUEST['page']) ? $_REQUEST['page'] : 0; // 切換頁數 $onlyimgdel = isset($_POST['onlyimgdel']) ? $_POST['onlyimgdel'] : ''; // 只刪圖 $modFunc = ''; $delno = $thsno = array(); $delflag = isset($_POST['func']) && ($_POST['func'] == 'delete') && isset($_POST['clist']); // 是否有「刪除」勾選 $thsflag = isset($_POST['stop']); // 是否有「停止」勾選 $is_modified = false; // 是否改寫檔案 $message = ''; // 操作後顯示訊息 if (isset($_POST['func']) && isset($_POST['clist'])) { $PMS->useModuleMethods('AdminFunction', array('run', &$_POST['clist'], $_POST['func'], &$message)); } // "AdminFunction" Hook Point // 刪除文章區塊 if ($delflag) { $delno = array_merge($delno, $_POST['clist']); if ($onlyimgdel != 'on') { $PMS->useModuleMethods('PostOnDeletion', array($delno, 'backend')); } // "PostOnDeletion" Hook Point $files = ($onlyimgdel != 'on') ? $PIO->removePosts($delno) : $PIO->removeAttachments($delno); $FileIO->updateStorageSize(-$FileIO->deleteImage($files)); deleteCache($delno); $is_modified = true; } // 討論串停止區塊 if ($thsflag) { $thsno = array_merge($thsno, $_POST['stop']); $threads = $PIO->fetchPosts($thsno); // 取得文章 foreach ($threads as $th) { $flgh = $PIO->getPostStatus($th['status']); $flgh->toggle('TS'); $PIO->setPostStatus($th['no'], $flgh->toString()); } $is_modified = true; } if (($delflag || $thsflag) && $is_modified) { $PIO->dbCommit(); } // 無論如何都有檔案操作，回寫檔案 $line = $PIO->fetchPostList(0, $page * ADMIN_PAGE_DEF, ADMIN_PAGE_DEF); // 分頁過的文章列表 $posts_count = count($line); // 迴圈次數 $posts = $PIO->fetchPosts($line); // 文章內容陣列 echo '
' . _T('admin_notices') . '
' . $message . '
' . _T('admin_list_header') . ' '; for ($j = 0; $j < $posts_count; $j++) { $bg = ($j % 2) ? 'ListRow1_bg' : 'ListRow2_bg'; // 背景顏色 extract($posts[$j]); // 修改欄位樣式 $now = preg_replace('/.{2}\/(.{5})\(.+?\)(.{5}).*/', '$1 $2', $now); $name = htmlspecialchars(str_cut(html_entity_decode(strip_tags($name)), 8)); $sub = htmlspecialchars(str_cut(html_entity_decode($sub), 8)); if ($email) { $name = "$name"; } $com = str_replace('
', ' ', $com); $com = htmlspecialchars(str_cut(html_entity_decode($com), 20)); // 討論串首篇停止勾選框 及 模組功能 $modFunc = $THstop = ' '; $PMS->useModuleMethods('AdminList', array(&$modFunc, $posts[$j], $resto)); // "AdminList" Hook Point if ($resto == 0) { // $resto = 0 (即討論串首篇) $flgh = $PIO->getPostStatus($status); $THstop = '' . ($flgh->exists('TS') ? _T('admin_stop_btn') : ''); } // 從記錄抽出附加圖檔使用量並生成連結 if ($ext && $FileIO->imageExists($tim . $ext)) { $clip = '' . $tim . $ext . ''; $size = $FileIO->getImageFilesize($tim . $ext); $thumbName = $FileIO->resolveThumbName($tim); if ($thumbName != false) { $size += $FileIO->getImageFilesize($thumbName); } } else { $clip = $md5chksum = '--'; $size = 0; } // 印出介面 echo <<< _ADMINEOF_ _ADMINEOF_; } echo '
$modFunc$THstop$no$now$sub$name$com$host$clip ($size)
$md5chksum

[]

' . _T('admin_totalsize', $FileIO->getCurrentStorageSize()) . '

'; $countline = $PIO->postCount(); // 總文章數 $page_max = ceil($countline / ADMIN_PAGE_DEF) - 1; // 總頁數 echo ' '; if ($page) { echo ''; } else { echo ''; } echo ''; if ($page < $page_max) { echo ''; } else { echo ''; } die('
' . _T('prev_page') . '' . _T('first_page') . ''; for ($i = 0; $i <= $page_max; $i++) { if ($i == $page) { echo '[' . $i . '] '; } else { echo '[' . $i . '] '; } } echo '' . _T('next_page') . '' . _T('last_page') . '


'); } /** * 計算目前附加圖檔使用容量 (單位：KB) * * @deprecated Use FileIO->getCurrentStorageSize() / FileIO->updateStorageSize($delta) instead */ function total_size($delta = 0) { $FileIO = PMCLibrary::getFileIOInstance(); return $FileIO->getCurrentStorageSize($delta); } /* 搜尋(全文檢索)功能 */ function search() { $PIO = PMCLibrary::getPIOInstance(); $FileIO = PMCLibrary::getFileIOInstance(); $PTE = PMCLibrary::getPTEInstance(); $PMS = PMCLibrary::getPMSInstance(); if (!USE_SEARCH) { error(_T('search_disabled')); } $searchKeyword = isset($_POST['keyword']) ? trim($_POST['keyword']) : ''; // 欲搜尋的文字 $dat = ''; head($dat); $links = '[' . _T('return') . ']'; $PMS->useModuleMethods('LinksAboveBar', array(&$links, 'search')); $dat .= ' '; echo $dat; if ($searchKeyword == '') { echo '
'; } else { $searchField = $_POST['field']; // 搜尋目標 (no:編號, name:名稱, sub:標題, com:內文) $searchMethod = $_POST['method']; // 搜尋方法 $searchKeyword = preg_split('/(　| )+/', trim($searchKeyword)); // 搜尋文字用空格切割 $hitPosts = $PIO->searchPost($searchKeyword, $searchField, $searchMethod); // 直接傳回符合的文章內容陣列 echo '
'; $resultlist = ''; foreach ($hitPosts as $post) { extract($post); if (USE_CATEGORY) { $ary_category = explode(',', str_replace(',', ',', $category)); $ary_category = array_map('trim', $ary_category); $ary_category_count = count($ary_category); $ary_category2 = array(); for ($p = 0; $p < $ary_category_count; $p++) { if ($c = $ary_category[$p]) { $ary_category2[] = '' . $c . ''; } } $category = implode(', ', $ary_category2); } else { $category = ''; } $arrLabels = array( '{$NO}' => '' . $no . '', '{$SUB}' => $sub, '{$NAME}' => $name, '{$NOW}' => $now, '{$COM}' => $com, '{$CATEGORY}' => $category, '{$NAME_TEXT}' => _T('post_name'), '{$CATEGORY_TEXT}' => _T('post_category') ); $resultlist .= $PTE->ParseBlock('SEARCHRESULT', $arrLabels); } echo $resultlist ? $resultlist : '
' . _T('search_notfound') . '
' . _T('search_back') . '
'; echo "
"; } echo "\n"; } /* 利用類別標籤搜尋符合的文章 */ function searchCategory() { $PIO = PMCLibrary::getPIOInstance(); $FileIO = PMCLibrary::getFileIOInstance(); $PTE = PMCLibrary::getPTEInstance(); $PMS = PMCLibrary::getPMSInstance(); $category = isset($_GET['c']) ? strtolower(strip_tags(trim($_GET['c']))) : ''; // 搜尋之類別標籤 if (!$category) { error(_T('category_nokeyword')); } $category_enc = urlencode($category); $category_md5 = md5($category); $page = isset($_GET['p']) ? @intval($_GET['p']) : 1; if ($page < 1) { $page = 1; } // 目前瀏覽頁數 $isrecache = isset($_GET['recache']); // 是否強制重新生成快取 // 利用Session快取類別標籤出現篇別以減少負擔 session_start(); // 啟動Session if (!isset($_SESSION['loglist_' . $category_md5]) || $isrecache) { $loglist = $PIO->searchCategory($category); $_SESSION['loglist_' . $category_md5] = serialize($loglist); } else { $loglist = unserialize($_SESSION['loglist_' . $category_md5]); } $loglist_count = count($loglist); $page_max = ceil($loglist_count / PAGE_DEF); if ($page > $page_max) { $page = $page_max; } // 總頁數 // 分割陣列取出適當範圍作分頁之用 $loglist_cut = array_slice($loglist, PAGE_DEF * ($page - 1), PAGE_DEF); // 取出特定範圍文章 $loglist_cut_count = count($loglist_cut); $dat = ''; head($dat); $links = '[' . _T('return') . '][' . _T('category_recache') . ']'; $PMS->useModuleMethods('LinksAboveBar', array(&$links, 'category')); $dat .= "
$links
\n"; for ($i = 0; $i < $loglist_cut_count; $i++) { $posts = $PIO->fetchPosts($loglist_cut[$i]); // 取得文章內容 $dat .= arrangeThread($PTE, ($posts[0]['resto'] ? $posts[0]['resto'] : $posts[0]['no']), null, $posts, 0, $loglist_cut[$i], array(), array(), false, false, false); // 逐個輸出 (引用連結不顯示) } $dat .= ''; if ($page > 1) { $dat .= ''; } else { $dat .= ''; } $dat .= ''; if ($page < $page_max) { $dat .= ''; } else { $dat .= ''; } $dat .= '
' . _T('first_page') . ''; for ($i = 1; $i <= $page_max; $i++) { if ($i == $page) { $dat .= "[" . $i . "] "; } else { $dat .= '[' . $i . '] '; } } $dat .= '
' . _T('last_page') . '
' . "\n"; foot($dat); echo $dat; } /* 顯示已載入模組資訊 */ function listModules() { $PMS = PMCLibrary::getPMSInstance(); $dat = ''; head($dat); $links = '[' . _T('return') . ']'; $PMS->useModuleMethods('LinksAboveBar', array(&$links, 'modules')); $dat .= '
'; /* Module Loaded */ $dat .= _T('module_loaded') . '
\n"; /* Module Infomation */ $dat .= _T('module_info') . '
'; foot($dat); echo $dat; } /* 刪除舊頁面快取檔 */ function deleteCache($no) { foreach ($no as $n) { if ($oldCaches = glob('./cache/' . $n . '-*')) { foreach ($oldCaches as $o) { @unlink($o); } } } } /* 顯示系統各項資訊 */ function showstatus() { global $LIMIT_SENSOR, $THUMB_SETTING; $PIO = PMCLibrary::getPIOInstance(); $FileIO = PMCLibrary::getFileIOInstance(); $PTE = PMCLibrary::getPTEInstance(); $PMS = PMCLibrary::getPMSInstance(); $countline = $PIO->postCount(); // 計算投稿文字記錄檔目前資料筆數 $counttree = $PIO->threadCount(); // 計算樹狀結構記錄檔目前資料筆數 $tmp_total_size = $FileIO->getCurrentStorageSize(); // 附加圖檔使用量總大小 $tmp_ts_ratio = STORAGE_MAX > 0 ? $tmp_total_size / STORAGE_MAX : 0; // 附加圖檔使用量 // 決定「附加圖檔使用量」提示文字顏色 if ($tmp_ts_ratio < 0.3) { $clrflag_sl = '235CFF'; } elseif ($tmp_ts_ratio < 0.5) { $clrflag_sl = '0CCE0C'; } elseif ($tmp_ts_ratio < 0.7) { $clrflag_sl = 'F28612'; } elseif ($tmp_ts_ratio < 0.9) { $clrflag_sl = 'F200D3'; } else { $clrflag_sl = 'F2004A'; } // 生成預覽圖物件資訊及功能是否正常 $func_thumbWork = '' . _T('info_nonfunctional') . ''; $func_thumbInfo = '(No thumbnail)'; if (USE_THUMB !== 0) { $thObj = PMCLibrary::getThumbInstance(); if ($thObj->isWorking()) { $func_thumbWork = '' . _T('info_functional') . ''; } $func_thumbInfo = $thObj->getClass(); unset($thObj); } // PIOSensor if (count($LIMIT_SENSOR)) { $piosensorInfo = nl2br(PIOSensor::info($LIMIT_SENSOR)); } $dat = ''; head($dat); $links = '[' . _T('return') . '] [' . _T('module_info_top') . ']'; $PMS->useModuleMethods('LinksAboveBar', array(&$links, 'status')); $dat .= ' '; $dat .= '
' . (isset($piosensorInfo) ? '' : '') . ''; if (STORAGE_LIMIT) { $dat .= ' '; } else { $dat .= ' '; } $dat .= '
' . _T('info_basic') . '
' . _T('info_basic_ver') . ' ' . PIXMICAT_VER . '
' . _T('info_basic_pio') . ' ' . PIXMICAT_BACKEND . ' : ' . $PIO->pioVersion() . '
' . _T('info_basic_threadsperpage') . ' ' . PAGE_DEF . ' ' . _T('info_basic_threads') . '
' . _T('info_basic_postsperpage') . ' ' . RE_DEF . ' ' . _T('info_basic_posts') . '
' . _T('info_basic_postsinthread') . ' ' . RE_PAGE_DEF . ' ' . _T('info_basic_posts') . ' ' . _T('info_basic_posts_showall') . '
' . _T('info_basic_bumpposts') . ' ' . MAX_RES . ' ' . _T('info_basic_posts') . ' ' . _T('info_basic_0disable') . '
' . _T('info_basic_bumphours') . ' ' . MAX_AGE_TIME . ' ' . _T('info_basic_hours') . ' ' . _T('info_basic_0disable') . '
' . _T('info_basic_urllinking') . ' ' . AUTO_LINK . ' ' . _T('info_0no1yes') . '
' . _T('info_basic_com_limit') . ' ' . COMM_MAX . _T('info_basic_com_after') . '
' . _T('info_basic_anonpost') . ' ' . ALLOW_NONAME . ' ' . _T('info_basic_anonpost_opt') . '
' . _T('info_basic_del_incomplete') . ' ' . KILL_INCOMPLETE_UPLOAD . ' ' . _T('info_0no1yes') . '
' . _T('info_basic_use_sample', $THUMB_SETTING['Quality']) . ' ' . USE_THUMB . ' ' . _T('info_0notuse1use') . '
' . _T('info_basic_useblock') . ' ' . BAN_CHECK . ' ' . _T('info_0disable1enable') . '
' . _T('info_basic_showid') . ' ' . DISP_ID . ' ' . _T('info_basic_showid_after') . '
' . _T('info_basic_cr_limit') . ' ' . BR_CHECK . _T('info_basic_cr_after') . '
' . _T('info_basic_timezone') . ' GMT ' . TIME_ZONE . '
' . _T('info_basic_theme') . ' ' . $PTE->BlockValue('THEMENAME') . ' ' . $PTE->BlockValue('THEMEVER') . '
by ' . $PTE->BlockValue('THEMEAUTHOR') . '
' . _T('info_dsusage_top') . '
' . _T('info_basic_threadcount') . ' ' . $counttree . ' ' . _T('info_basic_threads') . '' . $piosensorInfo . '
' . _T('info_dsusage_count') . '' . $countline . '
' . _T('info_fileusage_top') . STORAGE_LIMIT . ' ' . _T('info_0disable1enable') . '
' . _T('info_fileusage_limit') . '' . STORAGE_MAX . ' KB' . _T('info_dsusage_usage') . '
' . substr(($tmp_ts_ratio * 100), 0, 6) . ' %
' . _T('info_fileusage_count') . '' . $tmp_total_size . ' KB
' . _T('info_fileusage_count') . '' . $tmp_total_size . ' KB' . _T('info_dsusage_usage') . '
' . _T('info_fileusage_unlimited') . '
' . _T('info_server_top') . '
' . $func_thumbInfo . '' . $func_thumbWork . '
' . "\n"; foot($dat); echo $dat; } $errorHandler = new ErrorHandler(); $errorHandler->register(); if (defined('USE_WEBM') && USE_WEBM) { Webm\Webm::checkEnvironment(); } /*-----------程式各項功能主要判斷-------------*/ if (GZIP_COMPRESS_LEVEL && ($Encoding = CheckSupportGZip())) { ob_start(); ob_implicit_flush(0); } // 支援且開啟Gzip壓縮就設緩衝區 $mode = isset($_GET['mode']) ? $_GET['mode'] : (isset($_POST['mode']) ? $_POST['mode'] : ''); // 目前執行模式 (GET, POST) switch ($mode) { case 'regist': regist(); break; case 'admin': $admin = isset($_REQUEST['admin']) ? $_REQUEST['admin'] : ''; // 管理者執行模式 valid(); $PIO = PMCLibrary::getPIOInstance(); switch ($admin) { case 'del': admindel(); break; case 'logout': adminAuthenticate('logout'); header('HTTP/1.1 302 Moved Temporarily'); header('Location: ' . fullURL() . PHP_SELF2 . '?' . time()); break; case 'optimize': case 'check': case 'repair': case 'export': if (!$PIO->dbMaintanence($admin)) { echo _T('action_main_notsupport'); } else { echo _T('action_main_' . $admin) . (($mret = $PIO->dbMaintanence($admin, true)) ? _T('action_main_success') : _T('action_main_failed')) . (is_bool($mret) ? '' : '
' . $mret); } die("\n"); break; default: } break; case 'search': search(); break; case 'status': showstatus(); break; case 'category': searchCategory(); break; case 'module': $PMS = PMCLibrary::getPMSInstance(); $loadModule = isset($_GET['load']) ? $_GET['load'] : ''; if ($PMS->onlyLoad($loadModule)) { $PMS->getModuleInstance($loadModule)->ModulePage(); } else { echo '404 Not Found'; } break; case 'moduleloaded': listModules(); break; case 'usrdel': usrdel(); case 'remake': updatelog(); header('HTTP/1.1 302 Moved Temporarily'); header('Location: ' . fullURL() . PHP_SELF2 . '?' . time()); break; default: header('Content-Type: text/html; charset=utf-8'); $res = isset($_GET['res']) ? $_GET['res'] : 0; // 欲回應編號 if ($res) { // 回應模式輸出 $page = isset($_GET['page_num']) ? $_GET['page_num'] : 'RE_PAGE_MAX'; if (!($page == 'all' || $page == 'RE_PAGE_MAX')) { $page = intval($_GET['page_num']); } updatelog($res, $page); // 實行分頁 } elseif (isset($_GET['page_num']) && intval($_GET['page_num']) > -1) { // PHP動態輸出一頁 updatelog(0, intval($_GET['page_num'])); } else { // 導至靜態庫存頁 if (!is_file(PHP_SELF2)) { updatelog(); } header('HTTP/1.1 302 Moved Temporarily'); header('Location: ' . fullURL() . PHP_SELF2 . '?' . time()); } } if (GZIP_COMPRESS_LEVEL && $Encoding) { // 有啟動Gzip // 沒內容不必壓縮 if (!ob_get_length()) { exit; } header('Content-Encoding: ' . $Encoding); header('X-Content-Encoding-Level: ' . GZIP_COMPRESS_LEVEL); header('Vary: Accept-Encoding'); print gzencode(ob_get_clean(), GZIP_COMPRESS_LEVEL); // 壓縮內容 }