crypt($olpass,"pb")) {
$admin_mode = 2;
} else {
$admin_mode = 3;
if (($n1pass <> "" && $n2pass <> "") && ($n1pass == $n2pass)) {
if (file_exists ($admin_file)) {
$admin_data = file($admin_file);
}
$write_adm = crypt($n1pass,"pb") . " | \n";
unset($admin_data[0]);
$admin_data[0] = $write_adm;
$adm_file_data = join($admin_data,"");
$fp = fopen($admin_file ,"w");
fwrite($fp,$adm_file_data);
fclose($fp);
$admin_mode = 9;
} else if ($n1pass <> $n2pass) {
$admin_mode = 4;
}
}
}
// 書き込み削除部分
if ($pwd <> "") {
$crypt_pwd = crypt($pwd,"pb");
if (file_exists ($file)) {
$data = file($file);
}
while ( list( $num, $line ) = each( $data ) ) {
$bbsdata = explode(" | ", $line);
if (($bbsdata[0] == $target) && (($bbsdata[9] == $crypt_pwd) || ($admin_passwd <> crypt($olpass,"pb")))){
unset($data[$num]);
$file_data = join($data,"");
$fp = fopen($file ,"w");
fwrite($fp,$file_data);
fclose($fp);
}
}
}
// レス対応 Added Ver1.30
if ($name <> "" && $subject <> "" && $passwd <> "" && $res <> "") {
if (file_exists ($file)) {
$data = file($file);
}
$repl_cnt = 0;
$res_search = 0;
while ( list( $num, $line ) = each( $data ) ) {
$bbsdata = explode(" | ", $line);
if ($bbsdata[0] == $res) {
$repl = $num;
}
if ($bbsdata[0] == $res - $res_search) {
$res_search = $res_search + 1;
$repl_cnt = $repl_cnt + 1;
}
}
$value2 = ereg_replace( "\r|\n", "", nl2br(htmlspecialchars($value)));
$write_bbs = $res - $repl_cnt. " | " . $name . " | " . $subject . " | " . $value2 . " | " . $url . " | " . date("Y年n月j日 G時i分") . " | " . $email . " | " . $REMOTE_HOST . " | " . $HTTP_USER_AGENT . " | " . crypt($passwd,"pb") . " | " . time() . " | \n";
$data[] = $write_bbs;
$file_data = join($data,"");
$fp = fopen($file ,"w");
fwrite($fp,$file_data);
fclose($fp);
// Ver 1.41 Added
// mail送付ルーチン
if ($from_address <> "" && $mail_address <> "") {
$to = ereg_replace("\n", ",", $mail_address);
$mail_subject = $title . "に書き込まれました";
$from = $from_address;
$mes = $mes . "$name さんより";
$mes = $mes . "\n";
$mes = $mes . "$subject について、書き込みされました。";
$mes = $mes . "\n";
// Ver 1.42 Added
if ($mail_body == 1) {
$mes = $mes . "-------------------------------------------------------\n";
$mes = $mes . "$value";
}
$mes = $mes . "\n-------------------------------------------------------\n";
$mes = $mes . "\n";
$mes = $mes . "$mail_footer";
$mes = $mes . "$top_url";
mail($to,$mail_subject,ereg_replace("\r", "", $mes),"From: $from\nX-Mailer: PHP/" .phpversion());
}
}
// 入力書き込み部分
if ($name <> "" && $subject <> "" && $passwd <> "" && $res == "") {
if (file_exists ($file)) {
$data = file($file);
}
$value2 = ereg_replace( "\r|\n", "", nl2br(htmlspecialchars($value)));
$write_bbs = time() . " | " . $name . " | " . $subject . " | " . $value2 . " | " . $url . " | " . date("Y年n月j日 G時i分") . " | " . $email . " | " . $REMOTE_HOST . " | " . $HTTP_USER_AGENT . " | " . crypt($passwd,"pb") . " | | \n";
$data[] = $write_bbs;
$file_data = join($data,"");
$fp = fopen($file ,"w");
fwrite($fp,$file_data);
fclose($fp);
// Ver 1.41 Added
// mail送付ルーチン
if ($from_address <> "" && $mail_address <> "") {
$to = ereg_replace("\n", ",", $mail_address);
$mail_subject = $title . "に書き込まれました";
$from = $from_address;
$mes = $mes . "$name さんより";
$mes = $mes . "\n";
$mes = $mes . "$subject について、書き込みされました。";
$mes = $mes . "\n";
// Ver 1.42 Added
if ($mail_body == 1) {
$mes = $mes . "-------------------------------------------------------\n";
$mes = $mes . "$value";
}
$mes = $mes . "\n-------------------------------------------------------\n";
$mes = $mes . "\n";
$mes = $mes . "$mail_footer";
$mes = $mes . "$top_url";
mail($to,$mail_subject,ereg_replace("\r", "", $mes),"From: $from\nX-Mailer: PHP/" .phpversion());
}
}
// 設定内容書き込み部分
if ($conf_title <> "") {
if (file_exists ($conf_file)) {
$data = file($conf_file);
}
$rep_mail_address = ereg_replace("\n", "," , $conf_mail_address);
$write_conf = $conf_title . " | " . $conf_disp_max . " | " . $conf_top_url . " | " . $conf_bgcolor . " | " . $conf_subject_color . " | " . $conf_txtcolor . " | " . $conf_lnkcolor . " | " . $rep_mail_address . " | " . $conf_from_address . " | \n";
unset($conf_data[0]);
$conf_data[0] = $write_conf;
$conf_file_data = join($conf_data,"");
$fp = fopen($conf_file ,"w");
fwrite($fp,$conf_file_data);
fclose($fp);
$admin_mode = 9;
}
// BROWSERの判別
if (ereg("Palmscape",$HTTP_USER_AGENT)) {
print ("\n");
// 書き込み表示部分
if (file_exists ($file)) {
$data = file($file);
rsort($data);
$bbs_cnt = count($data) + 1;
while ( list( $num, $line ) = each( $data ) ) {
$bbsdata = explode(" | ", $line);
$bbs_cnt = $bbs_cnt - 1;
//表示部分Main
if ($log_cnt < $disp_max) {
print ("
\n");
//題名
print ("
\n");
//投稿日
print("投稿日\n");
print ("$bbsdata[5]
\n");
//投稿者
print ("投稿者\n");
print ("$bbsdata[1]\n");
//Remote Host
// print ("[$bbsdata[7]]\n");
if (ereg("DoCoMo",$bbsdata[8])) {
print ("(i-mode)\n");
} elseif (ereg("J-PHONE",$bbsdata[8])) {
print ("(J-PHONE)\n");
} elseif (ereg("UP\.Browser",$bbsdata[8])) {
print ("(EZweb)\n");
} elseif (ereg("Windows NT 5\.0",$bbsdata[8])) {
print ("(Windows2000)\n");
} elseif (ereg("Windows NT 5\.1",$bbsdata[8])) { // Ver1.34 added
print ("(WindowsXP)\n");
} elseif (ereg("Windows NT",$bbsdata[8])) {
print ("(WindowsNT)\n");
} elseif ((ereg("Windows Me",$bbsdata[8])) || (ereg("Win 9x 4.90",$bbsdata[8]))) {
print ("(WindowsMe)\n");
} elseif (ereg("Windows 95",$bbsdata[8])) {
print ("(Windows95)\n");
} elseif (ereg("Windows 98",$bbsdata[8])) {
print ("(Windows98)\n");
} elseif ((ereg("Macintosh\; I\; PPC",$bbsdata[8])) || (ereg("Mac_PowerPC",$bbsdata[8]))) {
print ("(Power Macintosh)\n");
} elseif (ereg("Macintosh",$bbsdata[8])) {
print ("(Macintosh)\n");
} elseif (ereg("SunOS",$bbsdata[8])) {
print ("(Solaris)\n");
} elseif (ereg("DreamPassport",$bbsdata[8])) {
print ("(DreamCast)\n");
} else {
print ("(etc.)\n");
}
print ("\n");
//内容
print ("$bbsdata[3]
\n");
print ("
\n");
$log_cnt = $log_cnt + 1;
}
}
}
print ("
\n");
} else if (ereg("UP\.Browser",$HTTP_USER_AGENT)) {
header ("Content-type: text/x-hdml;charset=Shift_JIS");
print ("\n");
if ($write_mode == "") {
if (file_exists ($file)) {
$data = file($file);
rsort($data);
if ($bno == "") {
print ("\n");
print ("");
print ("$title EZ
\n");
while ( list( $num, $line ) = each( $data ) ) {
$bbsdata = explode(" | ", $line);
//表示部分Main
if ($bno == "") {
//題名
if ($page == "") $page = 0;
if ($num >= $page && $num <= $page + 7){
print ("$bbsdata[2]\n");
}
if ($num == $page + 7) {
$next_page = $page + 8;
print ("次のﾍﾟｰｼﾞへ\n");
}
}
}
if ($bno == "") {
print ("新規書き込み\n");
}
print("\n");
} else {
print ("\n");
while ( list( $num, $line ) = each( $data ) ) {
$bbsdata = explode(" | ", $line);
if ($bno == $num) {
//題名
print ("$bbsdata[2]
\n");
//内容
print ("$bbsdata[3]
\n");
//投稿日
print ("$bbsdata[5]
\n");
//投稿者
print ("投稿者:\n");
print ("$bbsdata[1]\n");
}
}
print("\n");
}
}
} else {
print ("\n");
print ("投稿者： \$name");
print ("題名： \$subject");
print ("内容： \$value");
print ("削除ｷｰ： \$passwd");
print ("書き込み\n");
print ("\n");
print("\n");
print("\n");
print("投稿者名を入力してください\n");
print("\n");
print("\n");
print("\n");
print("題名を入力してください\n");
print("\n");
print("\n");
print("\n");
print("内容を入力してください\n");
print("\n");
print("\n");
print("\n");
print("削除ｷｰを入力してください\n");
print("\n");
}
print("");
} else {
// 入力フォーム表示部分
print("\n");
print("
\n");
print("$title\n");
print ("\n");
print ("\n");
if (ereg("DoCoMo",$HTTP_USER_AGENT)) {
// i-mode用HTML
if ($write_mode == "") {
// 書き込み表示用
if (file_exists ($file)) {
$data = file($file);
rsort($data);
if ($bno == "") {
print ("$title 掠\n");
}
while ( list( $num, $line ) = each( $data ) ) {
$bbsdata = explode(" | ", $line);
//表示部分Main
if ($bno == "") {
//題名
if ($page == "") $page = 0;
if ($num >= $page && $num <= $page + 7){
$key = $num - $page + 1;
$chr_key = $num - $page + 63879;
if ($bbsdata[10] == "") {
print ("&#$chr_key;$bbsdata[2]
\n");
} else {
print (" &#$chr_key;$bbsdata[2]
\n");
}
}
if ($num == $page + 7) {
$next_page = $page + 8;
print ("憐次のﾍﾟｰｼﾞへ
\n");
}
} else {
if ($bno == $num) {
//題名
print ("
$bbsdata[2]\n");
//内容
print ("$bbsdata[3]
\n");
//投稿日
print ("$bbsdata[5]
\n");
//投稿者
print ("投稿者:\n");
if ($bbsdata[6] <> "" && ereg("@",$bbsdata[6])) {
print ("\n");
}
print ("$bbsdata[1]\n");
print ("
\n");
}
}
}
if ($bno == "") {
print ("戀新規書き込み
\n");
}
}
} else {
print ("");
}
} else if (ereg("J-PHONE",$HTTP_USER_AGENT) || ereg("skyweb.jp",$REMOTE_HOST)) {
// Skyweb用HTML
if ($write_mode == "") {
// 書き込み表示用
if (file_exists ($file)) {
$data = file($file);
rsort($data);
if ($bno == "") {
print ("$title Sky\n");
}
while ( list( $num, $line ) = each( $data ) ) {
$bbsdata = explode(" | ", $line);
//表示部分Main
if ($bno == "") {
//題名
if ($page == "") $page = 0;
if ($num >= $page && $num <= $page + 7){
$key = $num - $page + 1;
if ($bbsdata[10] == "") {
print ("$bbsdata[2]
\n");
} else {
print (" $bbsdata[2]
\n");
}
}
if ($num == $page + 7) {
$next_page = $page + 8;
print ("次のﾍﾟｰｼﾞへ
\n");
}
} else {
if ($bno == $num) {
//題名
print ("
$bbsdata[2]\n");
//内容
print ("$bbsdata[3]
\n");
//投稿日
print ("$bbsdata[5]
\n");
//投稿者
print ("投稿者:\n");
if ($bbsdata[6] <> "" && ereg("@",$bbsdata[6])) {
print ("\n");
}
print ("$bbsdata[1]\n");
print ("
\n");
}
}
}
if ($bno == "" && ereg("J-PHONE/3\.0",$HTTP_USER_AGENT)) {
print ("新規書き込み
\n");
}
}
} else {
print ("");
}
} else {
// PC用HTML
if ($admin_mode == "") {
print ("\n");
print ("\n");
print ("$title
");
/* print ("");
print ("■投稿時には、この記事を削除する時に利用する削除キーを設定してください.
");
*/
// 書き込み表示部分
print ("