="4.1.0"){ extract($_REQUEST); extract($_SERVER); } //-------------設定ここから------------- /* に入れるタイトル */ $title1 = '志賀高原観光協会|本日泊まれます'; /* <body>タグ */ $body = '<BODY bgcolor="#ffffff">'; /* ログ保存ファイル */ $logfile = '../admin/todayinn.log'; /* TOPページをHTMLに書き出すか (yes=1 no=0)*/ $htmlw = 0; /* 静的HTMLを書き出す場合のHTMLファイル */ $html_file = 'todayinn.html'; /* 戻り先(HOME)*/ $home = 'http://www.shigakogen.gr.jp/i/'; /* 一ページあたりの表示記事数 */ $page_def = 5; /* 最大記録件数 これを越えると古い物から過去ログへ移ります。*/ $max = 10; /* 文中で自動リンクするかどうか(yes=1 no=0)*/ $autolink = 1; /* HTMLタグを有効にするか(yes=1 no=0)*/ $tag = 0; /* タイトル無しで投稿された場合 */ $mudai = '(無題)'; /* 使用するファイルロックのタイプ(mkdir=1 flock=2 使わない=0)*/ define("LOCKEY", 2); //通常は2でOK /* mkdirロックを使う時はlockという名でディレクトリを作成して777にしてください */ define("LOCK" , "lock/plock"); //lockの中に作るロックファイル名 /* 過去ログ作成する? */ $past_key = 1; /* 過去ログ番号ファイル */ $past_no = "pastno.log"; /* 過去ログ作成ディレクトリ(書き込み権限必要) */ $past_dir = "./"; /* 過去ログ一つに書き込む行数 */ $past_line= "50"; //---------設定ここまで-------------- function head(&$dat){ //ヘッダー表示部 global $mode,$no,$PHP_SELF,$logfile,$title1,$body,$p_bbs,$htmlw,$max,$page_def; //クッキーを頂きます if (get_magic_quotes_gpc()) $p_bbs = stripslashes($p_bbs); if(!$htmlw) list($r_name,$r_mail) = explode(",", $p_bbs); if($mode == "resmsg"){ //レスの場合 $res = file($logfile); $flag = 0; while (list($key, $value) = each ($res)) { list($rno,$date,$name,$email,$sub,$com,$url) = explode("<>", $value); if ($no == "$rno"){ $flag=1; break; } } if ($flag == 0) error("該当記事が見つかりません"); if(ereg("Re\[([0-9]+)\]:", $sub, $reg)){ $reg[1]++; $r_sub=ereg_replace("Re\[([0-9]+)\]:", "Re[$reg[1]]:", $sub); }elseif(ereg("^Re:", $sub)){ $r_sub=ereg_replace("^Re:", "Re[2]:", $sub); }else{ $r_sub = "Re:$sub"; } $r_com = ">$com"; $r_com = eregi_replace("<br( /)?>","\r>",$r_com); } $head='<html><head> <META HTTP-EQUIV="Content-type" CONTENT="text/html; charset=Shift_JIS"> <title>'.$title1.' '; $dat=$head.$body.'
◆本日泊まれます◆

'; } function foot(&$dat){ //フッター表示部 global $PHP_SELF,$home,$past_key; $dat.='

HOME '; } function Main(&$dat){ //記事表示部 global $logfile,$page_def,$page,$PHP_SELF,$autolink,$re_color,$hostview; $view = file($logfile); $total = sizeof($view); $total2= $total; (isset($page)) ? $start = $page : $start = 0; $end = $start + $page_def; $st = $start + 1; for($s = $start;$s < $end;$s++){ if(!$view[$s]) break; list($no,$now,$name,$email,$sub,$com,$url, $host,$pw) = explode("<>", $view[$s]); if($url){ $url = "[HP]";} if($email){ $email = "$email";} // >がある時は色変更 $com = eregi_replace("(^|>)(>[^<]*)", "\\1\\2", $com); // URL自動リンク if ($autolink) { $com=auto_link($com); } // Host表示形式 if($hostview==1){ $host=""; } elseif($hostview==2){ $host="[ $host ]"; } else{ $host=""; } $dat.=''.$no.' '.$name.'
'.$com.'
夕付は '.$sub.' 迄に予約
'.$now.'
'.$email.' '.$url.'

'; $p++; } //end for $prev = $page - $page_def; $next = $page + $page_def; $dat.= sprintf("
Page:[ ",$st,$st+$p-1); ($page > 0) ? $dat.="<< " : $dat.=" "; $p_no=1;$p_li=0; while ($total > 0) { if ($page == $p_li) { $dat.="$p_no "; }else{ $dat.="$p_no "; } $p_no++; $p_li = $p_li + $page_def; $total = $total - $page_def; } ($total2 > $next) ? $dat.=" >>" : $dat.=" "; $dat.=" ]\n"; } function regist(){ //ログ書き込み global $name,$email,$sub,$com,$url,$tag,$past_key,$maxn,$maxs,$maxv,$maxline; global $password,$html_url,$logfile,$jisa,$max,$w_regist,$autolink,$mudai, $PHP_SELF,$REQUEST_METHOD,$no_word; $times = time(); $check = file($logfile); $tail = sizeof($check); list($tno,$tdate,$tname,$tmail,$tsub,$tcom,,,$tpw,$ttime) = explode("<>", $check[0]); if($name == $tname && $com == $tcom) error("二重投稿は禁止です"); if ($w_regist && $times - $ttime < $w_regist) error("連続投稿はもうしばらく時間を置いてからお願い致します"); // 記事Noを採番 $no = $tno + 1; // ホスト名を取得 $host = getenv("REMOTE_HOST"); $addr = getenv("REMOTE_ADDR"); if($host == "" || $host == $addr){//gethostbyddrが使えるか $host=@gethostbyaddr($addr); } // 削除キーを暗号化 if ($password) { $PW = crypt(($password),aa); } $now = gmdate( "m/d(D) H:i",time()+9*60*60); $url = ereg_replace( "^http://", "",$url); if (get_magic_quotes_gpc()) {//\を削除 $com = stripslashes($com); $sub = stripslashes($sub); $name = stripslashes($name); $email = stripslashes($email); $url = stripslashes($url); } if ($tag == 0){ $sub = htmlspecialchars($sub);//タグっ禁止 $name = htmlspecialchars($name); $com = htmlspecialchars($com); $email = htmlspecialchars($email); $url = htmlspecialchars($url); $com = str_replace("&", "&", $com); } $com = str_replace( "\r\n", "\r", $com); //改行文字の統一。 $com = str_replace( "\r", "\n", $com); /* \n数える(substr_countの代わり)*/ $temp = str_replace("\n", "\n"."a",$com); $str_cnt=strlen($temp)-strlen($com); if($str_cnt > $maxline){ error("行数が長すぎますっ!"); } $com = ereg_replace("\n(( | |\t)*\n){3,}","\n",$com);//連続する空行を一行 $com = nl2br($com); //改行文字の前に
を代入する。 $com = ereg_replace( "\n", "", $com); //\nを文字列から消す。 $new_msg="$no<>$now<>$name<>$email<>$sub<>$com<>$url<>$host<>$PW<>$times\n"; //クッキー保存 $cookvalue = implode(",", array($name,$email)); setcookie ("p_bbs", $cookvalue,time()+14*24*3600); /* 2週間で期限切れ */ $old_log = file($logfile); $line = sizeof($old_log); $new_log[0] = $new_msg;//先頭に新記事 if($past_key && $line >= $max){//はみ出した記事を過去ログへ for($s=$max; $s<=$line; $s++){//念の為複数行対応 past_log($old_log[$s-1]); } } for($i=1; $i<$max; $i++) {//最大記事数処理 $new_log[$i] = $old_log[$i-1]; } renewlog($new_log);//ログ更新 } function usrdel(){ //ユーザー削除 global $pwd,$no,$logfile; if ($no == "" || $pwd == "") { error("削除Noまたは削除キーが入力モレです"); } $logall = file($logfile); $flag=0; while(list(,$lines)=each($logall)){ list($ono,$dat,$name,$email,$sub,$com,$url,$host,$opas) = explode("<>",$lines); if ($no == "$ono") { $flag=1; $pass=$opas; } else { $pushlog[]=$lines; } } if ($flag == 0) { error("該当記事が見当たりません"); } if ($pass == "") { error("該当記事には削除キーが設定されていません"); } // 削除キーを照合 $match = crypt(($pwd),aa); if (($match != $pass)) { error("削除キーが違います"); } // ログを更新 renewlog($pushlog); } function lock_dir($name=""){//ディレクトリロック if($name=="") $name="lock"; // 3分以上前のディレクトリなら解除失敗とみなして削除 if ((file_exists($name))&&filemtime($name) < time() - 180) { @RmDir($name); } do{ if (@MkDir($name,0777)){ return 1; } sleep(1);// 一秒待って再トライ $i++; }while($i < 5); return 0; } function unlock_dir($name=""){//ロック解除 if($name=="") $name="lock"; @rmdir($name); } function renewlog($arrline){//ログ更新 入力:配列 global $logfile; if(LOCKEY==1){ lock_dir(LOCK) or error("ロックエラー
しばらく待ってからにして下さい"); } $rp = fopen($logfile, "w"); if(LOCKEY==2){ flock($rp, 2); } while(list(,$val)=each($arrline)){ fputs($rp,$val); } fclose($rp); if(LOCKEY==1){ unlock_dir(LOCK); } } function MakeHtml(){ //HTML生成 global $html_file; head($buf); Main($buf); foot($buf); $hp = @fopen ($html_file,"w"); flock($hp,2); fputs($hp, $buf); fclose($hp); } function ShowHtml(){ head($buf); Main($buf); foot($buf); echo $buf; } function past_log($data){//過去ログ作成 global $past_no,$past_dir,$past_line,$autolink; $fc = @fopen($past_no, "r") or die(__LINE__.$past_no."が開けません"); $count = fgets($fc, 10); fclose($fc); $pastfile = $past_dir."index".$count.".html"; if(file_exists($pastfile)) $past = file($pastfile); if(sizeof($past) > $past_line){ $count++; $pf = fopen($past_no, "w"); fputs($pf, $count); fclose($pf); $pastfile = $past_dir."index".$count.".html"; $past = ""; } list($pno,$pdate,$pname,$pemail,$psub, $pcom,$purl,$pho,$ppw) = explode("<>", $data); if($purl){ $purl = "HP";} if($pemail){ $pname = "$pname";} // >がある時は色変更 $pcom = eregi_replace("(>)([^<]*)", "\\1\\2", $pcom); // URL自動リンク if ($autolink) { $pcom=auto_link($pcom); } $dat.="
[$pno] $psub Name:$pname Date:$pdate $purl
    $pcom
\n"; $np = fopen($pastfile, "w"); fputs($np, $dat); if($past){ while(list(, $val)=each($past)){ fputs($np, $val); } } fclose($np); } function past_view(){ global $past_no,$past_dir,$past_line,$body,$pno; $pno = htmlspecialchars($pno); $fc = @fopen($past_no, "r") or die(__LINE__.$past_no."が開けません"); $count = fgets($fc, 10); fclose($fc); if(!$pno) $pno = $count; echo '■ 過去ログ '.$pno.' ■ '.$body.'[掲示板に戻る]
■ 過去ログ '.$pno.' ■

new← '; $pastkey = $count; while ($pastkey > 0) { if ($pno == $pastkey) { echo "[$pastkey]"; } else { echo "[$pastkey]"; } $pastkey--; } echo ' →old

'.$past_line.'件ずつ表示'; $pastfile = $past_dir."index".$pno.".html"; if(!file_exists($pastfile)) error("
過去ログがみつかりません"); include($pastfile); die(""); } function auto_link($proto){//自動リンク5/25修正 $proto = ereg_replace("(https?|ftp|news)(://[[:alnum:]\+\$\;\?\.%,!#~*/:@&=_-]+)","\\1\\2",$proto); return $proto; } function error($mes){ //エラーフォーマット global $body; ?>







"; break; case 'admin': admin(); break; case 'usrdel': usrdel(); if($htmlw) MakeHtml(); ShowHtml(); break; case 'past': past_view(); break; default: ShowHtml(); break; endswitch; ?>