複数のproxyにも、情報を問い合わせ中。

書き込み代行業者であっても、同様に必ず告訴します。"); } elseif (eregi("u-navi.net",$comment)) { error("他人に迷惑かけなきゃ金も稼げない、ゴキブリ業者は
とっとと舌噛み切って死にましょう。

すべての接続IPとログは、毎回、警視庁ハイテク課に提出してるんで、お楽しみに。"); } elseif (eregi("2ch2.net",$comment)) { error("他人に迷惑かけなきゃ金も稼げない、ゴキブリ業者は
とっとと舌噛み切って死にましょう。

すべての接続IPとログは、毎回、警視庁ハイテク課に提出してるんで、お楽しみに。"); } elseif (eregi("adult-value.net",$comment)) { error("他人に迷惑かけなきゃ金も稼げない、ゴキブリ業者は
とっとと舌噛み切って死にましょう。

すべての接続IPとログは、毎回、警視庁ハイテク課に提出してるんで、お楽しみに。"); } elseif (eregi("blogs.yahoo.co.jp/miyu_kabu85",$comment)) { error("他人に迷惑かけなきゃ金も稼げない、ゴキブリは
とっとと舌噛み切って死にましょう。

すべての接続IPとログは、毎回、警視庁ハイテク課に提出してるんで、お楽しみに。"); } elseif (eregi("teenlifetime.com",$comment)) { error("hi, mother fucker. Many people hope you and your family are unhappy."); } elseif (eregi("koi-suppot.net",$comment)) { error("他人に迷惑かけなきゃ金も稼げないなら、
とっとと舌噛み切って死にましょう。

すべての接続IPとログは、毎回、警視庁ハイテク課に提出してるんで、お楽しみに。"); } elseif (eregi("member.php",$comment)) { error("hi, mother fucker. Many people hope you and your family are unhappy."); } elseif (eregi("drycounty.com",$comment)) { error("hi, mother fucker. Many people hope you and your family are unhappy."); } elseif (eregi("early",$comment)) { error("hi, mother fucker. Many people hope you and your family are unhappy."); } elseif (eregi("stage",$comment)) { error("hi, mother fucker. Many people hope you and your family are unhappy."); } elseif (eregi("virus",$comment)) { error("hi, mother fucker. Many people hope you and your family are unhappy."); } elseif (eregi("photos",$comment)) { error("hi, mother fucker. Many people hope you and your family are unhappy."); } elseif (eregi("url=",$comment)) { error("hi, mother fucker. Many people hope you and your family are unhappy."); } elseif (eregi("discovery",$comment)) { error("hi, mother fucker. Many people hope you and your family are unhappy."); } elseif (eregi("drug",$comment)) { error("hi, mother fucker. Many people hope you and your family are unhappy."); } elseif (eregi("medication",$comment)) { error("hi, mother fucker. Many people hope you and your family are unhappy."); } elseif (eregi("action",$comment)) { error("hi, mother fucker. Many people hope you and your family are unhappy."); } elseif (eregi("interaction",$comment)) { error("hi, mother fucker. Many people hope you and your family are unhappy."); } elseif (eregi("lawsuit",$comment)) { error("hi, mother fucker. Many people hope you and your family are unhappy."); } elseif (eregi("price",$comment)) { error("hi, mother fucker. Many people hope you and your family are unhappy."); } elseif (eregi("take",$comment)) { error("hi, mother fucker. Many people hope you and your family are unhappy."); } elseif (eregi("when",$comment)) { error("hi, mother fucker. Many people hope you and your family are unhappy."); } elseif (eregi("lycos",$comment)) { error("hi, mother fucker. Many people hope you and your family are unhappy."); } elseif (eregi("es",$comment)) { error("hi, mother fucker. Many people hope you and your family are unhappy."); } elseif (eregi("hole",$comment)) { error("hi, mother fucker. Many people hope you and your family are unhappy."); } elseif (eregi("buy",$comment)) { error("hi, mother fucker. Many people hope you and your family are unhappy."); } elseif (eregi("stock",$comment)) { error("hi, mother fucker. Many people hope you and your family are unhappy."); } elseif (eregi("ezgwa.com",$comment)) { error("hi, mother fucker. Always , I am sending Your IP and logs to ICPO."); } elseif (eregi("ticle",$comment)) { error("hi, mother fucker. Always , I am sending Your IP and logs to ICPO."); } elseif (eregi("nion",$comment)) { error("hi, mother fucker. Always , I am sending Your IP and logs to ICPO."); } elseif (eregi("online",$comment)) { error("hi, mother fucker. Always , I am sending Your IP and logs to ICPO."); } elseif (eregi("profile",$comment)) { error("hi, mother fucker. Always , I am sending Your IP and logs to ICPO."); } elseif (eregi("porn",$comment)) { error("hi, mother fucker. Always , I am sending Your IP and logs to ICPO."); } elseif (eregi("legg",$comment)) { error("hi, mother fucker. Always , I am sending Your IP and logs to ICPO."); } elseif (eregi("life",$comment)) { error("hi, mother fucker. Always , I am sending Your IP and logs to ICPO."); } elseif (eregi("info",$comment)) { error("hi, mother fucker. Always , I am sending Your IP and logs to ICPO."); } elseif (eregi("group",$comment)) { error("hi, mother fucker. Always , I am sending Your IP and logs to ICPO."); } elseif (eregi("us",$comment)) { error("hi, mother fucker. Always , I am sending Your IP and logs to ICPO."); } elseif (eregi("google.",$comment)) { error("hi, mother fucker. Always , I am sending Your IP and logs to ICPO."); } elseif (eregi("tube",$comment)) { error("hi, mother fucker. Always , I am sending Your IP and logs to ICPO."); } elseif (eregi("fora.pl",$comment)) { error("hi, mother fucker. Always , I am sending Your IP and logs to ICPO."); } elseif (eregi(".pl",$comment)) { error("hi, mother fucker. Always , I am sending Your IP and logs to ICPO."); } elseif (eregi("lab",$comment)) { error("hi, mother fucker. Always , I am sending Your IP and logs to ICPO."); } elseif (eregi("sudolabs",$comment)) { error("hi, mother fucker. Always , I am sending Your IP and logs to ICPO."); } elseif (eregi("market",$comment)) { error("hi, mother fucker. Always , I am sending Your IP and logs to ICPO."); } elseif (eregi("money",$comment)) { error("hi, mother fucker. Always , I am sending Your IP and logs to ICPO."); } elseif (eregi("hard",$comment)) { error("hi, mother fucker. Always , I am sending Your IP and logs to ICPO."); } elseif (eregi("fax",$comment)) { error("hi, mother fucker. Always , I am sending Your IP and logs to ICPO."); } elseif (eregi("they",$comment)) { error("hi, mother fucker. Always , I am sending Your IP and logs to ICPO."); } elseif (eregi("them",$comment)) { error("hi, mother fucker. Always , I am sending Your IP and logs to ICPO."); } elseif (eregi("qdgsx",$comment)) { error("hi, mother fucker. Always , I am sending Your IP and logs to ICPO."); } elseif (eregi("trans",$comment)) { error("hi, mother fucker. Always , I am sending Your IP and logs to ICPO."); } elseif (eregi("wire",$comment)) { error("hi, mother fucker. Always , I am sending Your IP and logs to ICPO."); } elseif (eregi("payment",$comment)) { error("hi, mother fucker. Always , I am sending Your IP and logs to ICPO."); } elseif (eregi("dgplaza",$comment)) { error("hi, mother fucker. Always , I am sending Your IP and logs to ICPO."); } elseif (eregi("sufireiki",$comment)) { error("hi, mother fucker. Always , I am sending Your IP and logs to ICPO."); } if ($in_email) { if ($email == "") { error("Eメールが入力されていません"); } elseif (!eregi("(.*)\@(.*)\.(.*)",$email)) { error("Eメールの入力内容が不正です"); } } $name = stripslashes($name); $sub = stripslashes($sub); $comment = stripslashes($comment); $name = htmlspecialchars ($name); $email = htmlspecialchars ($email); $url = htmlspecialchars ($url); $sub = htmlspecialchars ($sub); $url = str_replace ("http://","", $url); $cookval = implode(",", array($name,$email,$url,$pwd,$color)); setcookie ("JOYFUL", $cookval,time()+60*24*3600); list($c_name,$c_email,$c_url,$c_pwd,$c_color)=explode(",",$cookval); if ($tagkey) { $comment = str_replace("<>","<>",$comment); } else {$comment = htmlspecialchars ($comment);} list($name,$email,$url,$sub) = str_replace (array("\r","\n"),"",array($name,$email,$url,$sub)); $comment = str_replace (array("\r\n","\r","\n"),"
",$comment); $times = time(); $date = date("Y/m/d(D) H:i",$times); $lines = file ($logfile); $top = array_shift($lines); list($no,$ip,$time2) = explode("<>", $top); $no++; if ($REMOTE_ADDR == $ip && $wait > $times - $time2) { error("連続投稿はもうしばらく時間をおいて下さい"); } # 画像(ファイル)アップロード ここから # ------------------------------------------------------------------- if (file_exists($HTTP_POST_FILES['upfile']['tmp_name'])) { $pos = strrpos($HTTP_POST_FILES['upfile']['name'],"."); $tail = substr($HTTP_POST_FILES['upfile']['name'],$pos,strlen($HTTP_POST_FILES['upfile']['name'])-$pos+1); $tail = strtolower ($tail); if ($tail == ".jpeg") {$tail = ".jpg";} if ($tail == ".mpeg") {$tail = ".mpg";} if ($tail == ".midi") {$tail = ".mid";} $flag=0; if ($tail == ".gif" && $gif ) { $flag=1; } if ($tail == ".jpg" && $jpeg) { $flag=1; } if ($tail == ".png" && $png ) { $flag=1; } if ($tail == ".lzh" && $lha ) { $flag=1; } if ($tail == ".txt" && $text) { $flag=1; } if ($tail == ".zip" && $zip ) { $flag=1; } if ($tail == ".pdf" && $pdf ) { $flag=1; } if ($tail == ".mid" && $midi) { $flag=1; } if ($tail == ".doc" && $word) { $flag=1; } if ($tail == ".xls" && $excel) { $flag=1; } if ($tail == ".ppt" && $ppt ) { $flag=1; } if ($tail == ".ram" && $ram ) { $flag=1; } if ($tail == ".rm" && $rm ) { $flag=1; } if ($tail == ".mpg" && $mpeg) { $flag=1; } if ($tail == ".mp3" && $mp3 ) { $flag=1; } if ($flag) { copy($HTTP_POST_FILES['upfile']['tmp_name'], "$ImgDir$no$tail"); if ($tail == ".jpg" || $tail == ".gif" || $tail == ".png"){ ($size = GetImageSize ($HTTP_POST_FILES['upfile']['tmp_name'])) || error("画像ファイルが変です"); $W = $size[0]; $H = $size[1]; # 画像表示縮小 if ($W > $MaxW || $H > $MaxH) { $W2 = $MaxW / $W; $H2 = $MaxH / $H; ($W2 < $H2) ? $key = $W2 : $key = $H2; if ($tail == ".jpg") { system("./rejpeg $ImgDir$no$tail $ImgDir2$no$tail $key"); } if ($tail == ".png") { system("./repng $ImgDir$no$tail $ImgDir2$no$tail $key"); } if ($tail == ".gif") { system("./regif $ImgDir$no$tail $ImgDir2$no$tail $key"); } } } }elseif($clip_error){ error("アップロードできないファイル形式です"); } } # ------------------------------------------------------------------- # 画像(ファイル)アップロード ここまで if ($pwd != "") { $ango = crypt($pwd); } if ($reno == "") { $i=0; $stop=0; while (list (, $line) = each ($lines)) { list($no2,$reno2,$d,$n,$m,$s,$com, $u,$ho,$p,$c,$tail2,$w,$h,$chk) = explode("<>",$line); $i++; if ($i > $max-1 && $reno2 == "") { $stop=1; } if (!$stop) { $new .= $line; } else { if ($pastkey) { $data[] = $line; } if (file_exists ("$ImgDir$no2$tail2")) { unlink("$ImgDir$no2$tail2"); } if (file_exists ("$ImgDir2$no2$tail2")) { unlink("$ImgDir2$no2$tail2"); } } } $new = "$no<><>$date<>$name<>$email<>$sub<>$comment<>$url<>$host<>$ango<>$color<>$tail<>$W<>$H<>0<>\n".$new; $new = "$no<>$REMOTE_ADDR<>$times<>\n".$new; # 過去ログ更新 if ($data) { $past_flag=0; # 過去NOを開く $no = file($nofile); $count = $no[0]; # 過去ログのファイル名を定義 $pastfile = "$pastdir$count.dat"; # 過去ログを開く $past = file ($pastfile); # 規定の行数をオーバーすると次ファイルを自動生成 if (count($past) > $log_line) { $past_flag=1; # カウントファイル更新 $count++; $out = fopen($nofile,"w"); fputs ($out, $count); fclose($out); $pastfile = "$pastdir$count.dat"; $past = array(); } while (list(,$line) = each($data)) { list($pno,$preno,$pdate,$pname,$pmail,$psub,$pcom,$purl,$pho) = explode("<>",$line); if ($pmail) { $pname = "$pname"; } if ($purl) { $purl = "<HOME>"; } if ($preno) { $pno = "Res: $preno"; } # 保存スレッドをフォーマット $temp .= "
[$pno] $psub 投稿者:$pname 投稿日:$pdate $purl
$pcom
\n"; } # 過去ログを更新 $out = fopen ($pastfile,"w+"); fputs ($out,$temp); while (list(,$temp)=each($past)){ fputs($out,$temp); } fclose($out); } } # レススレッドの場合:トップソートあり elseif ($reno && $topsort) { $match=0; $new=""; $tmp=""; while (list (, $line) = each ($lines)) { list($no2,$reno2) = explode("<>",$line); if ($reno == $no2) { $match=1; $new .= $line; } elseif ($reno == $reno2) { $new .= $line; } elseif ($match == 1 && $reno == $reno2) { $match=2; $new .= "$no<>$reno<>$date<>$name<>$email<>$sub<>$comment<>$url<>$host<>$ango<>$color<>$tail<>$W<>$H<>0<>\n"; $tmp .= $line; } else { $tmp .= $line; } } if ($match == 1) { $new .= "$no<>$reno<>$date<>$name<>$email<>$sub<>$comment<>$url<>$host<>$ango<>$color<>$tail<>$W<>$H<>0<>\n"; } $new .= $tmp; # 更新 $new = "$no<>$REMOTE_ADDR<>$times<>\n".$new; } # レススレッドの場合:トップソートなし else { $match=0; $new=""; while (list (, $line) = each ($lines)) { list($no2,$reno2) = explode("<>",$line); if ($match == 0 && $reno == $no2) { $match=1; } elseif ($match == 1 && $reno != $reno2) { $match=2; $new .= "$no<>$reno<>$date<>$name<>$email<>$sub<>$comment<>$url<>$host<>$ango<>$color<>$tail<>$W<>$H<>0<>\n"; } $new .= $line; } if ($match == 1) { $new .= "$no<>$reno<>$date<>$name<>$email<>$sub<>$comment<>$url<>$host<>$ango<>$color<>$tail<>$W<>$H<>0<>\n"; } # 更新 $new = "$no<>$REMOTE_ADDR<>$times<>\n".$new; } # メール処理 if (($mailing == 2)||($mailing == 1 && $email != $mailto)) { # メールタイトルを定義 $MailSub = "[$title : $no] $sub"; # スレッドの改行・タグを復元 $com = eregi_replace("
","\n",$comment); $com = str_replace("<","<",$com); $com = str_replace(">",">",$com); $com = str_replace(""","\"",$com); # メール本文を定義 $MailBody = <<戻る]\n

"; print "- 以下は、スレッドNo. $no に関する 返信フォーム です -


\n"; $flag=0; while (list (, $line) = each ($in)) { list($no2,$reno,$date,$name,$mail,$sub,$com,$url) = explode("<>",$line); if (!$reno) { $com = "
$com
"; } if ($no == $no2 || $no == "$reno") { if ($no == $no2) { $resub = $sub; } if ($url) { $url = "<HOME>"; } if ($reno && !$flag) { print "
\n"; $flag=1; } print "$sub 投稿者:$name 投稿日:$date スレッドNo.$no2
$com\n

"; } } if ($flag) { print "

\n"; } print "
\n"; # タイトル名 if (!ereg("^Re:",$resub)) { $resub = "Re: $resub"; } print "\n"; if ($res_clip) { print "
\n"; } else { print "\n"; } print <<
EOL; if ($res_clip) { print "\n"; print "\n"; print "\n"; } print "\n"; print "
お名前
Eメール
タイトル
メッセージ
添付File
削除キー"; print "\n"; print "(自分のスレッドを削除時に使用。英数字で8文字以内)
文字色\n"; # クッキーの色情報がない場合 if ($c_color == "") { $c_color = $COLORS[0]; } while (list(, $value) = each ($COLORS)) { if ($c_color == $value) { print " "; print "\n"; } else { print " "; print "\n"; } } print "
\n"; print "
\n"; HtmlFooter(); exit(); } # # 管理モード admin # ====================================== if ($mode == "admin") { if ($pass == "") { HtmlHeader(); print "

パスワードを入力して下さい

\n"; print "
\n"; print "\n"; print "\n"; print ""; print "
\n"; print "
\n\n"; exit(); } if ($pass != $master) { error("パスワードが違います"); } HtmlHeader(); print "[掲示板に戻る]\n"; print "
\n"; print "管理モード\n"; print "
\n"; # 画像許可 if ($chk) { # 許可情報をマッチングし更新 $in = file($logfile); $top = array_shift($in); while (list (, $line) = each ($in)) { list($no,$reno,$d,$n,$m,$s,$com,$u,$ho,$p,$c,$t,$w,$h,$check) = explode("<>",$line); reset($chk); while (list(,$xx) = each($chk)) { if ($no == $xx) { $line = "$no<>$reno<>$d<>$n<>$m<>$s<>$com<>$u<>$ho<>$p<>$c<>$t<>$w<>$h<>1<>\n"; break; } } $new .= $line; } # 更新 $new = $top.$new; $fp = fopen($logfile,"w"); fputs($fp,$new); fclose($fp); } # 削除処理 if ($del) { # 削除情報をマッチングし更新 $in = file($logfile); $top = array_shift($in); while (list (, $line) = each ($in)) { $flag=0; list($no,$reno,$d,$n,$m,$s,$com,$u,$ho,$p,$c,$tail,$w,$h,$chk) = explode("<>",$line); reset($del); while (list(,$val) = each($del)) { if ($no == $val || $reno == $val) { if (file_exists ("$ImgDir$no$tail")) { unlink("$ImgDir$no$tail"); } if (file_exists ("$ImgDir2$no$tail")) { unlink("$ImgDir2$no$tail"); } $flag=1; break; } } if ($flag == 0) {$new .= $line; } } # 更新 $new = $top.$new; $fp = fopen($logfile,"w"); fputs($fp,$new); fclose($fp); } # 管理を表示 if ($page == "") { $page = 0; } print "

\n
    \n"; print "
  • スレッドを削除する場合は「削除」のチェックボックスにチェックを入れ「送信する」を押して下さい。\n"; print "
  • 画像許可を行なう場合は「画像許可」のチェックボックスにチェックを入れ「送信する」を押して下さい。\n"; print "
\n
\n"; print "
\n"; print "\n"; print "\n"; print "\n"; print "\n"; print ""; print "\n"; print "

\n"; print ""; print ""; print "\n"; $line=9; if ($ImageCheck) { print ""; $line=10; } print "\n"; $in = file($logfile); $top = array_shift($in); $i=0; while (list(,$value) = each($in)) { $img_flag=0; list($no,$reno,$date,$name,$mail,$sub,$com, $url,$host,$pw,$color,$tail,$w,$h,$chk) = explode("<>",$value); if ($mail) { $name="$name"; } list($date,$dmy) = explode("\(", $date); htmlspecialchars($com); if (strlen($com) > 40) { $com = substr($com,0,38); $com .= "..."; } if (file_exists("$ImgDir$no$tail")) { if ($tail == ".gif" || $tail == ".jpg" || $tail == ".png") { $img_flag = 1; $File = "画像"; } else { $File = "File"; } $clip = "$File"; $size = filesize ("$ImgDir$no$tail"); $all += $size; } else { $clip = ""; $size = 0; } if ($reno == "") { print "\n"; } # チェックボックス print ""; print ""; print ""; print ""; print "\n"; # 画像許可 if ($ImageCheck) { if ($img_flag == 1 && $chk == 1) { print ""; } elseif ($img_flag == 1 && $chk != 1) { print ""; } else { print ""; } } print "\n"; } print "\n"; print "
削除スレッドNO投稿日タイトル投稿者URLコメントホスト名画像
(bytes)
画像
許可

$no$date$sub$name$url$com$host$clip
($size)
OK

\n"; $all = floor($all / 1024); print "【添付データ総数 : $all KB】\n"; print "
\n"; print "\n"; exit(); } # # ユーザスレッド削除 usr_del # ====================================== if ($mode == "usr_del") { if ($no == '' || $pwd == '') { error("スレッドNoまたは削除キーが入力モレです"); } $lines = file ($logfile); $top = array_shift($lines); $flag=0; while (list (, $line) = each ($lines)) { list($no2,$reno2,$date,$name,$mail,$sub,$com, $url,$host,$pw,$color,$tail,$w,$h,$chk) = explode("<>",$line); if ($flag == 0 && $no2 == $no) { if ($pw == '') { error("該当スレッドには削除キーが設定されていません"); } # 削除キーを照合 if (crypt($pwd,$pw) != $pw) { error("削除キーが違います"); } # 添付ファイル削除 if (file_exists ("$ImgDir$no$tail")) { unlink("$ImgDir$no$tail"); } if (file_exists ("$ImgDir2$no$tail")) { unlink("$ImgDir2$no$tail"); } if ($reno2 == "") { $flag=2; } else { $flag=1; } } elseif ($flag == 2 && $no == $reno2) { if (file_exists ("$ImgDir$no$tail")) { unlink("$ImgDir$no$tail"); } if (file_exists ("$ImgDir2$no$tail")) { unlink("$ImgDir2$no$tail"); } continue; } else { $new .= $line; } } if ($flag == 0) { error("該当スレッドが見当たりません"); } # 更新 $new = $top.$new; $fp = fopen ($logfile,"w"); fputs($fp,$new); fclose($fp); } # # スレッド修正処理 usr_edt # ====================================== if ($mode == "usr_edt") { if ($no == '' || $pwd == '') { error("スレッドNoまたはパスワードが入力モレです"); } if ($action == "edit") { $ref_url = urldecode ($HTTP_REFERER); if ($baseurl) { if (ereg($base_url,$ref_url)) { error("不正なアクセスです"); } } if ($name == "") { error("名前が入力されていません"); } if ($comment == "") { error("コメントが入力されていません"); } if ($in_email) { if ($email == "") { error("Eメールが入力されていません"); } elseif (!eregi("(.*)\@(.*)\.(.*)",$email)) { error("Eメールの入力内容が不正です"); } } $url = str_replace ("http://","", $url); } $flag=0; $lines = file ($logfile); $top = array_shift($lines); while (list (, $line) = each ($lines)) { list($no2,$reno,$date,$name2,$mail,$sub2,$com, $url2,$host,$pw,$color2,$tail,$w,$h,$chk) = explode("<>",$line); if ($no2 == $no) { $pw2 = $pw; $flag=1; if ($action != "edit") { break; } else { $name = htmlspecialchars ($name); $email = htmlspecialchars ($email); $url = htmlspecialchars ($url); $sub = htmlspecialchars ($sub); $comment = stripslashes($comment); if ($tagkey) { $comment = str_replace("<>","<>",$comment); } else {$comment = htmlspecialchars ($comment);} $comment = str_replace (array("\r\n","\r","\n"),"
",$comment); $line = "$no<>$reno<>$date<>$name<>$email<>$sub<>$comment<>$url<>$host<>$pw<>$color<>$tail<>$w<>$h<>$chk<>\n"; } } if ($action == "edit") { $new .= $line; } } if (!$flag) { error("該当のスレッドが見当たりません"); } if ($pw2 == "") { error("パスワードが設定されていません"); } if (crypt($pwd,$pw2) != $pw2) { error("パスワードが違います"); } if ($action == "edit") { $new = $top.$new; $fp = fopen ($logfile,"w"); fputs($fp,$new); fclose($fp); $cookval = implode(",", array($name,$email,$url,$pwd,$color)); setcookie ("JOYFUL", $cookval,time()+60*24*3600); if ($url) { $url = "http://$url"; } if ($email) { $email = "$email"; } HtmlHeader(); print "
\n"; print "- 以下のとおり修正が完了しました -\n"; print "

\n"; print "お名前:$name
\n"; print "Eメール:$email
\n"; print "題 名:$sub
\n"; print "URL:$url

\n"; print "$comment\n"; print "
\n"; print "

\n"; print "
\n"; print "
\n"; HtmlFooter(); exit(); } $com = str_replace("
","\n",$com); HtmlHeader(); print <<- 変更する部分のみ修正して送信ボタンを押して下さい -

EOL; print "
お名前
Eメール
題名
コメント
URL
文字色\n"; while (list(, $value) = each ($COLORS)) { if ($color2 == $value) { print " "; print "\n"; } else { print " "; print "\n"; } } print "
\n"; HtmlFooter(); exit(); } # # 掲示板の使い方メッセージ howto # ====================================== if ($mode == "howto") { if ($tagkey == 0) { $tag_msg = "投稿内容には、タグは一切使用できません。\n"; } else { $tag_msg = "コメント欄には、タグ使用をすることができます。\n"; } if ($in_email) { $eml_msg = "スレッドを投稿する上での必須入力項目は「お名前」「Eメール」「メッセージ」です。URL、題名、削除キーは任意です。"; } else { $eml_msg = "スレッドを投稿する上での必須入力項目は「お名前」「メッセージ」です。Eメール、URL、題名、削除キーは任意です。"; } $maxkb = floor($maxdata/1024); if ($gif) { $FILE .= "GIF, "; } if ($jpeg) { $FILE .= "JPEG, "; } if ($png) { $FILE .= "PNG, "; } if ($text) { $FILE .= "TEXT, "; } if ($lha) { $FILE .= "LHA, "; } if ($zip) { $FILE .= "ZIP, "; } if ($pdf) { $FILE .= "PDF, "; } if ($midi) { $FILE .= "MIDI, "; } if ($msword) { $FILE .= "WORD, "; } if ($excel) { $FILE .= "EXCEL, "; } if ($ppt) { $FILE .= "POWERPOINT, "; } if ($rm) { $FILE .= "RM, "; } if ($ram) { $FILE .= "RAM, "; } if ($mpeg) { $FILE .= "MPEG, "; } if ($mp3) { $FILE .= "MP3, "; } $FILE = substr($FILE,0,strlen($FILE)-2); HtmlHeader(); print "[ 新着スレッドに戻る ] [ スレッド一覧に戻る ]\n



"; print << 掲示板の利用上の注意

  1. この掲示板はクッキー対応です。1度スレッドを投稿いただくと、お名前、Eメール、URL、削除キーの情報は2回目以降は自動入力されます。(ただし利用者のブラウザがクッキー対応の場合)

  2. 画像などのバイナリーファイルをアップロードすることが可能です。

    • 添付可能ファイル : $FILE
    • 最大投稿データ量 : $maxkb KB
    • 画像は横 $MaxW ピクセル、縦 $MaxH ピクセルを超えると縮小表示されます。

  3. $tag_msg

  4. $eml_msg

  5. スレッドには、半角カナは一切使用しないで下さい。文字化けの原因となります。

  6. スレッドの投稿時に「削除キー」にパスワード(英数字で8文字以内)を入れておくと、そのスレッドは次回削除キーによって削除することができます。

  7. スレッドの保持件数は最大 $max 件です。それを超えると古い順に自動削除されます。

  8. 既存のスレッドに「返信」をすることができます。各スレッドの上部にある「返信」ボタンを押すと返信用フォームが現れます。

  9. 過去の投稿スレッドから「キーワード」によって簡易検索ができます。トップメニューの「ワード検索」のリンクをクリックすると検索モードとなります。

  10. 管理者が著しく不利益と判断するスレッドや他人を誹謗中傷するスレッドは予告なく削除することがあります。
EOL; HtmlFooter(); exit(); } # # 過去ログ past # ====================================== if ($mode == "past") { $no = file($nofile); $pastno = $no[0]; if (!$pastlog) { $pastlog = $pastno; } HtmlHeader(); print "[ 新着スレッドに戻る ] [ スレッド一覧に戻る ]\n



"; print << 過去ログ[$pastlog]

\n"; print "\n"; print "
過去ログ:\n
\n"; print "
\n"; print "\n"; print "\n"; print "ワード検索:\n"; print "条件:\n"; print "表示:\n
\n"; # 表示ログを定義 $file = "$pastdir$pastlog.dat"; if ($page == "") { $page = 0; } # ワード検索処理 if ($word != "") { $word = str_replace(" "," ",$word); $word = ereg_replace("[[:space:]]+"," ",$word); $word = ltrim($word); $pairs = explode(" ", $word); $in = file($file); while (list (,$line) = each($in)) { $flag=0; reset($pairs); while (list(,$value) = each ($pairs)) { if (strpos($line,$value,0)) { $flag=1; if ($cond == 'OR') { break; } } else { if ($cond == 'AND') { $flag=0; break; } } } if ($flag) { $new[] = $line; } } $count = count($new); print "検索結果:$count件\n"; $end_data = count($new) - 1; $page_end = $page + $view - 1; if ($page_end >= $end_data) { $page_end = $end_data; } $next_line = $page_end + 1; $back_line = $page - $view; $enwd = urlencode($word); if ($back_line >= 0) { print "[前の $view 件]\n"; } if ($page_end != "$end_data") { print "[次の $view 件]\n"; } # 表示開始 $i = $page; while ($i <= $page_end) { print $new[$i]; $i ++; } print "


\n"; HtmlFooter(); exit(); } # ページ区切り処理 $start = $page + 1; $end = $page + $p_log; $i=0; $in = file($file); while (list(,$line) = each($in)) { $flag=0; if (eregi("^
\[[0-9]+\<\/b\>\]",$line)) { $flag=1; $i++; } if ($i < $start) { continue; } if ($i > $end) { break; } if ($flag) { print $line; } else { $line = eregi_replace("
","",$line); print "
$line
\n"; } } print "
\n"; $next_page = $page + $p_log; $back_page = $page - $p_log; print "\n"; if ($back_page >= 0) { print "\n"; } if ($next_page < $i) { print "\n"; } print "
\n"; print "\n"; print "\n"; print "\n"; print "\n"; print "
\n"; print "\n"; print "\n"; print "\n"; print "\n"; print "
\n"; HtmlFooter(); exit(); } # # ワード検索処理 find # ====================================== if ($mode =="find") { HtmlHeader(); print "[ 新着スレッドに戻る ] [ スレッド一覧に戻る ]\n



"; print << ワード検索

  • 検索したいキーワードを入力し、「条件」「表示」を選択して「検索」ボタンを押して下さい。
  • キーワードは「半角スペース」で区切って複数指定することができます。

    キーワード: 条件:\n"; print "表示:\n"; print "
    \n
\n"; # ワード検索の実行と結果表示 if ($word != "") { # 入力内容を整理 $word = str_replace(" "," ",$word); $word = ereg_replace("[[:space:]]+"," ",$word); $word = ltrim($word); $pairs = explode(" ", $word); # ファイルを読み込み $in = file($logfile); $top = array_shift($in); while (list(,$line) = each($in)) { $flag=0; reset($pairs); while (list(,$value) = each ($pairs)) { if (strpos($line,$value,0)) { $flag=1; if ($cond == 'OR') { break; } } else { if ($cond == 'AND') { $flag=0; break; } } } if ($flag) { $new[] = $line; } } # 検索終了 $count = count($new); print "検索結果:$count件\n"; if ($page == '') { $page = 0; } $end_data = count($new) - 1; $page_end = $page + $view - 1; if ($page_end >= $end_data) { $page_end = $end_data; } $next_line = $page_end + 1; $back_line = $page - $view; $enwd = urlencode($word); if ($back_line >= 0) { print "[前の $view 件]\n"; } if ($page_end != "$end_data") { print "[次の $view 件]\n"; } print "[検索やり直し]\n"; $i = $page; while ($i <= $page_end) { list($no,$reno,$date,$name,$email,$sub,$com,$url) = explode("<>", $new[$i]); if ($email) { $name = "$name"; } if ($url) { $url = "<HOME>"; } if ($reno) { $no = "$renoへのレス"; } # 結果を表示 print "
[$no] $sub"; print " 投稿者:$name 投稿日:$date
\n"; print "
$com
\n"; $i ++; } print "
\n"; } HtmlFooter(); exit(); } # # スレッド単独表示処理 show # ====================================== if ($mode =="show") { # ログを読み込み $in = file($logfile); $in2 = preg_grep("/^$no<><>|^[0-9][0-9]*<>$no<>/", $in); $top = array_shift($in); $cnt = count($in2) - 1; # ヘッダを出力 HtmlHeader(); # 関連スレッド出力 print "[ 新着スレッドに戻る ] [ スレッド一覧に戻る ]\n



"; $flag = 0; while (list (, $line) = each ($in2)) { list($no2,$reno,$date,$name,$mail,$sub,$comment,$url2,$host,$pw,$color2,$tail,$w,$h,$chk) = explode("<>",$line); if ($mail) { $name = "$name"; } if (!$reno) { print "スレッドNo. $no $sub ( {$cnt}件のレス )

\n"; print "
\n"; } if ($no == $no2) { $resub = $sub; } if ($url2) { $url2 = "<HOME>"; } if ($reno) { $bq_fm = ""; $bq_to = ""; if ($flag) { print "
\n"; } else { print "

\n"; } $flag = 1; } else{ $bq_fm = "
"; $bq_to = "
"; } # 自動リンク if ($autolink) { $comment = auto_link($comment); } # タイトル等表示 print "\n"; print "\n"; print "
$sub 投稿者:$name 投稿日:$date スレッドNo.$no2
\n"; # コメント枠ここから print "\n"; print "\n"; print "
$bq_fm\n"; # 画像表示 if (is_file("$ImgDir$no2$tail")) { if ($tail == ".gif" || $tail == ".jpg" || $tail == ".png") { if ($ImageCheck && $chk != 1) { print "

\n"; } elseif (($w < $MaxW) && ($h < $MaxH)) { print "

\n"; } else { print "

\n"; } } else { print "

Download:$no2$tail $no2$tail\n"; } } # コメント表示 print "$comment\n"; # コメント枠ここまで print "$bq_to

\n"; } print "


\n"; # タイトル名 if (!ereg("^Re:",$resub)) { $resub = "Re: $resub"; } print "\n"; if ($res_clip) { print "
\n"; } else { print "\n"; } print <<
EOL; if ($res_clip) { print "\n"; print "\n"; print "\n"; } print "\n"; print "
お名前
Eメール
タイトル
メッセージ
添付File
削除キー"; print "\n"; print "(自分のスレッドを削除時に使用。英数字で8文字以内)
文字色\n"; # クッキーの色情報がない場合 if ($c_color == "") { $c_color = $COLORS[0]; } while (list(, $value) = each ($COLORS)) { if ($c_color == $value) { print " "; print "\n"; } else { print " "; print "\n"; } } print "
\n"; print "
\n"; HtmlFooter(); exit(); } # # スレッド表示部 # ====================================== # ヘッダ表示 HtmlHeader(); # カウンタ Counter(); # タイトル表示 print "
\n"; if ($banner1 != "") { print "$banner1\n"; } if ($title_gif == '') { print "$title\n"; } else { print "\"$title\"\n"; } # 最上段メニュー表示 print << [ トップに戻る ] [ 使いかた ] [ ワード検索 ] EOL; # 過去ログのリンク部を表示 if ($pastkey) { print "[ 過去ログ ]\n"; } print <<管理用 ]

EOL; # 全スレッド一覧表示 ここから # ------------------------------------ if ($mode =="all") { $start = $page + 1; $end = $page + $l_all; $in = file("$logfile"); $top = array_shift($in); $i = 0; $c = 1; // スレッドの数 $flag = 0; print "
- $title スレッド一覧 -

\n"; while (list(, $line) = each($in)) { list($no,$reno,$date,$name,$mail,$sub,$comment,$url2,$host,$pw,$color2,$tail,$w,$h,$chk) = explode("<>",$line); if (!$reno) { if ($i > ($start - 1) && $i <= $end) { print "($c)
\n "; } $c = 1; $i++; } else { $c++; // 子スレッドがあったら件数を増やす continue; } if ($i < $start) { continue; } if ($i > $end) { continue; } if (!$sub) { $sub = "題名なし"; } if (strlen($sub) > ($sub_len * 2)) { $sub = substr($sub,0,$sub_len*2); $sub .= "..."; } $flag = 1; print "$i. $sub "; } if (count($in) == 0) { print "スレッドなし"; } print "

"; print "
\n"; # ページ区切り $next = $page + $l_all; $back = $page - $l_all; $p_flag = 0; print "
\n"; print "\n"; if ($back >= 0) { $p_flag = 1; print "\n"; } if ($next < $i) { $p_flag=1; print "\n"; } # ページ移動ボタン表示 if ($p_flag) { print "\n"; } print "
\n"; print "\n"; print "\n"; print "
\n"; print "\n"; print "\n"; print "
[直接移動]\n"; $x = 1; $y = 0; while ($i > 0) { if ($page == $y) { print "[$x]\n"; } else { print "[$x]\n"; } $x++; $y = $y + $l_all; $i = $i - $l_all; } print "
\n"; print "
\n"; # ------------------------------------ # 全スレッド一覧表示 ここまで } else { # 投稿フォーム表示 ここから # ------------------------------------ print <<
お名前
Eメール
題名
コメント
添付File
削除キー (自分のスレッドを削除時に使用。英数字で8文字以内)
文字色 EOL; if ($c_color == "") { $c_color = $COLORS[0]; } while (list(, $value) = each ($COLORS)) { if ($c_color == $value) { print " "; print "\n"; } else { print " "; print "\n"; } } print "
"; if ($ImageCheck) { print "・画像は管理者が許可するまで「COMING SOON」のアイコンが表示されます。
\n"; } # ------------------------------------ # 投稿フォーム表示 ここまで print "

\n"; # 新着スレッド一覧表示 ここから # ------------------------------------ $start = 1; $end = $l_log; $in = file("$logfile"); $top = array_shift($in); $i = 0; $c = 1; // スレッドの数 $flag = 0; print "
- 新着スレッド -

\n"; while (list(, $line) = each($in)) { list($no,$reno,$date,$name,$mail,$sub,$comment,$url2,$host,$pw,$color2,$tail,$w,$h,$chk) = explode("<>",$line); if (!$reno && $i <= $end) { if ($i > 0) { print "($c) "; } $c = 1; $i++; } else { $c++; // 子スレッドがあったら件数を増やす continue; } if ($i < $start) { continue; } if ($i > $end) { continue; } if (!$sub) { $sub = "題名なし"; } if (strlen($sub) > ($sub_len * 2)) { $sub = substr($sub,0,$sub_len*2); $sub .= "..."; } $flag = 1; print "$i: $sub "; } if (count($in) == 0) { print "スレッドなし"; } print "


"; print "
\n"; # ------------------------------------ # 新着スレッド一覧表示 ここまで print "



\n"; print "
\n"; # スレッド表示 ここから # ------------------------------------ $start = $page + 1; $end = $page + $p_log; $in = file("$logfile"); $top = array_shift ($in); $i = 0; $flag = 0; while (list(, $line) = each($in)) { list($no,$reno,$date,$name,$mail,$sub,$comment,$url2,$host,$pw,$color2,$tail,$w,$h,$chk) = explode("<>",$line); if ($reno == "") { $i++; } if ($i < $start) { continue; } if ($i > $end) { continue; } if (strlen($sub) > ($sub_len * 2)) { $sub = substr($sub,0,$sub_len*2); $sub .= "..."; } if ($mail) { $name = "$name"; } if (!$reno && $flag) { print "

\n"; $flag = 1; } if (!$reno) { print "
\n"; $flag=1; } if ($reno) { print "
\n"; } print "\n"; if ($reno) { print ""; } print ""; print "\n"; } else { print "
\n"; } print "

$sub "; if (!$reno) { print "投稿者:$name 投稿日:$date "; } else { print "$name - $date "; } print "スレッドNo.$no\n"; if (!$reno) { print "
\n"; print "\n"; print "\n"; print "
\n"; if ($reno) { print "\n"; } print "

"; if (!$reno) { print "
\n"; } # 自動リンク if ($autolink) { $comment = auto_link($comment); } if (is_file("$ImgDir$no$tail")) { if ($tail == ".gif" || $tail == ".jpg" || $tail == ".png") { if ($ImageCheck && $chk != 1) { print "

\n"; } elseif (($w < $MaxW) && ($h < $MaxH)) { print "

\n"; } else { print "

\n"; } } else { print "

Download:$no$tail $no$tail\n"; } } print "$comment"; if (!$reno) { print "

\n"; } print "
\n"; } print "
\n"; # ------------------------------------ # スレッド表示 ここまで # ページ区切り $next = $page + $p_log; $back = $page - $p_log; $p_flag=0; print "

\n"; if ($back >= 0) { $p_flag=1; print "\n"; } if ($next < $i) { $p_flag=1; print "\n"; } # ページ移動ボタン表示 if ($p_flag) { print "\n"; } # 修正・削除フォーム表示 print <<
\n"; print "\n"; print "
\n"; print "\n"; print "
[直接移動]\n"; $x=1; $y=0; while ($i > 0) { if ($page == $y) { print "[$x]\n"; } else { print "[$x]\n"; } $x++; $y = $y + $p_log; $i = $i - $p_log; } print "


- 以下のフォームから自分の投稿スレッドを修正・削除することができます -
処理 スレッドNo パスワード
$banner2\n
EOL; } # フッタ表示 HtmlFooter(); exit(); ?>