<?php
extract ($HTTP_SERVER_VARS);
#====================================================
# 初期情報の取得（設定ファイル）
#====================================================
#設定ファイルを読む
$set_pass = "../SETTING.TXT";
if(file_exists ($set_pass)) {
$set_str = file ($set_pass);
foreach ($set_str as $tmp){
$tmp = chop($tmp);
$tmp = rawurldecode($tmp);
list ($name, $value) = explode("=", $tmp);
$SETTING[$name] = $value;
}
}else{
#設定ファイルがない（ERROR)
DispError("ＥＲＲＯＲ：ユーザー設定が消失しています！");
}
function DispError($msg) {
echo "<HTML><BODY>$msg</BODY></HTML>";
exit;
}
?>
<html>
<head>
<meta HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=Shift_JIS">
<title>２ちゃんねる 過去ログ倉庫 <?=$SETTING[BBS_TITLE]?></title>
</head>
<body TEXT="#000000" BGCOLOR="#FFFFFF" link="#0000FF" alink="#FF0000" vlink="#660099" background="ba.gif">
<center>
<h1>２ちゃんねる 過去ログ倉庫</h1><p>
<h2><?=$SETTING[BBS_TITLE]?></h2><p>
</center>
<a HREF="../../../">トップ に戻る。</a>
<p>
<a HREF="../../kakolog.html">過去ログ倉庫めにゅー に戻る。</a>
<p>
<a HREF="../"><?=$SETTING[BBS_TITLE]?> に戻る。</a>
<p>
<table BORDER=2>
<tr><td>倉庫番号</td><td>スレッド数</td><td>スピード</td></tr>
<?php
chdir ("..");
$bbs = getcwd();
$bbs = str_replace("\\", "/", $bbs);
$bbs = preg_replace("/.*\/(.*)$/", "$1", $bbs);
chdir("kako");
$dir = array();
$handle=opendir(".");
while ($file = readdir($handle)) {
if ($file != "." && $file != ".." && is_dir($file)) {
$dir[count($dir)] = $file;
}
}
closedir($handle);
sort($dir);
foreach($dir as $dir1) {
$count = 1;
$speed = $count*864/1000;
echo "<tr><td><a TARGET=\"_blank\" HREF=\"$dir1/\">#$bbs$dir1</a></td><td align=right>$count</td><td align=right> $speed</td></tr>\n";
}
?>
</table>
</center>
<hr>
問題等、なんかあったら<a HREF="http://www.maido3click.com/2ch/kako/">倉庫番</a>へお願いします。
</body>
</html>