#!/usr/local/bin/perl

$script = "geki.html";

require './lib/jcode.pl';
require './lib/teikei.pl';
require './lib/dbsetup.pl';


#◇ New!マーク 最近の発言につけるマーク
$newf ='<img src="images2/geki/new.gif" width=24 height=14 alt="NEW!" style="vertical-align: middle">';

#◇ New!マーク表示時間
$new  = 24 ;


&decode;

#----------------#
# 書込Cookie準備 #
#----------------#
$setcook1 = &setCookie("ID", $COOKIE{ID});

#------------------#
# ログインチェック #
#------------------#
&DBConnect;
$sth = $db->prepare("select ID from ppass where ID = \"$COOKIE{ID}\"");
if(!$sth->execute){ &error ("接続失敗2"); }
$data = $sth->fetchrow;
if ($data){ $LOGIN_FLAG = $data; }
else{ $LOGIN_FLAG = ""; }
&DBDisconnect;




$center .= '
<div id="center_main">
  <div class="center_msg"><img src="images2/geki/title02.jpg" width=460 height=110 alt="本日激ぱっち"></div>
  <div class="center_msg" id="s1212">ホールから直接提供の最新情報から表示する「本日激ぱっち」会員限定配信中です。</div>
';

#----------------#
# ホール情報分岐 #
#----------------#
if ($in{'area'} eq "tokyo"){
	$gekifile = "hall_tokyo";
	$imagedir = "./images/hall/tokyo";
	$mini_imagedir = "./images/hall/tokyo/mini";
	if ($in{'mode'} eq "all"){&all;}
	if ($in{'mode'} eq "shop"){&shop;}
}elsif ($in{'area'} eq "keihin"){
	$gekifile = "hall_keihin";
	$imagedir = "./images/hall/keihin";
	$mini_imagedir = "./images/hall/keihin/mini";
	if ($in{'mode'} eq "all"){&all;}
	if ($in{'mode'} eq "shop"){&shop;}
}elsif ($in{'area'} eq "osaka"){
	$gekifile = "hall_osaka";
	$imagedir = "./images/hall/osaka";
	$mini_imagedir = "./images/hall/osaka/mini";
	if ($in{'mode'} eq "all"){&all;}
	if ($in{'mode'} eq "shop"){&shop;}
}elsif ($in{'area'} eq "sapporo"){
	$gekifile = "hall_sapporo";
	$imagedir = "./images/hall/sapporo";
	$mini_imagedir = "./images/hall/sapporo/mini";
	if ($in{'mode'} eq "all"){&all;}
	if ($in{'mode'} eq "shop"){&shop;}
}else{

	$gekifile1 = "hall_tokyo";
	$gekifile2 = "hall_keihin";
	$gekifile3 = "hall_osaka";
	$gekifile4 = "hall_sapporo";




$center .= <<EOF;


<table border=0 cellpadding=0 cellspacing=0 class="center_msg">
  <tr>
    <td>
      <div class="geki_text" style="margin-bottom:3px; color:#00AC00;">東京エリアはこちらから</div>
      <a href="$script?area=tokyo&mode=all"><img src="images2/geki/tokyo01.jpg" width=225 height=147 border=0 alt="本日激ぱっち東京エリア！"></a><br>
    </td>
    <td>
      <div style="margin-left:4px;">
        <div class="geki_text" style="margin-bottom:3px; color:#247BE2">京浜エリアはこちらから</div>
        <a href="$script?area=keihin&mode=all"><img src="images2/geki/keihin01.jpg" width=225 height=147 border=0 alt="本日激ぱっち京浜エリア！"></a><br>
      </div>
    </td>
  </tr>
</table>

<table border=0 cellpadding=0 cellspacing=0 class="center_msg">
  <tr>
    <td>
      <div class="geki_text" style="margin-bottom:3px; color:#FF0722">大阪・阪神エリアはこちらから</div>
      <a href="$script?area=osaka&mode=all"><img src="images2/geki/osaka01.jpg" width=225 height=147 border=0 alt="本日激ぱっち大阪・阪神エリア！"></a><br>
    </td>

<!--
    <td>
      <div style="margin-left:4px;">
      <div class="geki_text" style="margin-bottom:3px; color:#A26EDF">札幌・道央エリアはこちらから</div>
        <a href="$script?area=sapporo&mode=all"><img src="images2/geki/sapporo01.jpg" width=225 height=147 border=0 alt="本日激ぱっち札幌・道央エリア！"></a><br>
      </div>
    </td>
-->

</tr>
</table>

<div class="center_msg"><hr size=1></div>

<div class="center_msg" align="center"><img src="images2/geki/QR_geki.gif" width=456 height=104 alt="携帯でアクセス！"></div>

</div>
EOF

}




&html;



#----------#
# 全件表示 #
#----------#
sub all {
&count;
if ($in{'area'} eq "tokyo"){
	$center .= '
<div class="center_msg"><table border=0 cellpadding=4 cellspacing=0 bgcolor="#00BC6A" width=460><tr><td align="left"><font color="#ffffff">東京エリア</font></td><td align="right"></td></tr></table></div>
';
}elsif ($in{'area'} eq "keihin"){
	$center .= '
<div class="center_msg"><table border=0 cellpadding=4 cellspacing=0 bgcolor="#0081BC" width=460><tr><td align="left"><font color="#ffffff">京浜エリア</font></td><td align="right"></td></tr></table></div>
';
}elsif ($in{'area'} eq "osaka"){
	$center .= '
<div class="center_msg"><table border=0 cellpadding=4 cellspacing=0 bgcolor="#FF2623" width=460><tr><td align="left"><font color="#ffffff">大阪・阪神エリア</font></td><td align="right"></td></tr></table></div>
';
}elsif ($in{'area'} eq "sapporo"){
	$center .= '
<div class="center_msg"><table border=0 cellpadding=4 cellspacing=0 bgcolor="#A26EDF" width=460><tr><td align="left"><font color="#ffffff">札幌・道央エリア</font></td><td align="right"></td></tr></table></div>
';
}

	$center .= "<div class=\"center_msg\">\n";




		$center .= '<table border=0 cellpadding=0 cellspacing=0 width=458>';



	&DBConnect;
	$loopcount = 0;
	$arinashi = 0;
	$sth = $db->prepare("select ID, hall_name, view_flag, photo1, write_time, photo3 from $gekifile where view_flag = 1 and msg != \"\"");
	if(!$sth->execute){ &error ("接続失敗2"); }
	while(@res = $sth->fetchrow) {
		foreach(@res){
			jcode::convert(\$_, 'sjis');
		}

		$write_time = $res[4];
		($geki_sec,$geki_min,$geki_hour,$geki_mday,$geki_mon,$geki_year,$geki_wday,$geki_dmy) = localtime($write_time);
		($sec,$min,$hour,$mday,$mon,$year,$wday,$dmy) = localtime(time);
		$mon++;
		$geki_mon++;

		if (($geki_mday == $mday) && ($res[4] ne "") && ($geki_mon == $mon)){

#		if ($geki_mday == $mday) {



			$arinashi++;
			# 1列3個表示。
			if ($loopcount == 0){
				$tr = '<tr valign="top" align="left" height=81 valign=\"bottom\">';
				$tdwidth = 154;
				$loopcount++;
			}elsif($loopcount == 2){
				$tr = '';
				$tdwidth = 150;
				$loopcount = 0;
			}else{
				$tdwidth = 154;
				$tr = '';
				$loopcount++;
			}


			# ログインしているか判定
			if ( !$LOGIN_FLAG ){
				$gekilink = "hall.html?mode=shop&SN=$res[0]&ref=all&area=$in{'area'}&r=$in{'r'}";
			}else{
				$gekilink = "hall.html?mode=shop&SN=$res[0]&ref=all&area=$in{'area'}&r=$in{'r'}";
			}
			# 画像
			$thm_img = "";
			if ($res[5]){
				$thm_img = "<tr><td bgcolor=\"#ffffff\" height=148 valign=\"middle\" align=\"center\"><a href=\"$gekilink\"><img src=\"$mini_imagedir/$res[5]\" border=0></a></td></tr>";
			}else{
				$thm_img = "<tr><td bgcolor=\"#ffffff\" height=148 valign=\"middle\" align=\"center\"><a href=\"$gekilink\"><img src=\"images2/event/noimage.jpg\" border=0 width=99 height=75></a></td></tr>";
			}



			$center .= <<EOF;
$tr
<td width=$tdwidth align="left">
<table cellpadding=0 cellspacing=1 border=0 bgcolor="#f89a36" width=150 id="s1212" style=\"margin-top:4px;\">
  <tr><td bgcolor="#fff0e0" valign="top" height=35><img src="images2/geki/head.gif" width=148 height=35 alt=""></td></tr>
  $thm_img
  <tr><td bgcolor="#fff7ed" valign="top" height=36><a href="$gekilink" id="hall_link"><div style="font-size:12px;margin:3px;">$res[1]</a></div></td></tr>
</table>
</td>
EOF

		}

	}
	&DBDisconnect;

	if ($loopcount == 2){
		$center .= "<td width=150></td>\n";
	}
	$center .= "</table>\n";
	$center .= "</div>\n";

	if ($arinashi == 0){
		$center .= "<div class=\"center_msg\"><hr size=1 color=\"#F9A243\"></div>\n<div class=\"center_msg\"><span id=\"s1212\">現在、本激中のホールはございません。</span></div>\n";
	}

	$center .= '<div class="center_msg"><hr size=1 color="#F9A243"></div>';
	$center .= "<div class=\"center_msg\"><a href=\"$script\" id=\"i_link\">エリア選択へ戻る</a></div><p>\n</div>";


}


#----------#
# カウンタ #
#----------#
sub count {
	# カウントファイル
	$log = "count/geki.dat";

	# ロックファイル名
	$lockfile = 'count/lock/geki.lock';

	&lock;

	#カウントファイル読込み
	open(IN,"$log");
	$in_line = <IN>;
	close(IN);
	
	#カウント１増やす
	$in_line++;
	
	#カウントファイル書込み	
	open(OUT,">$log");
	print OUT $in_line;
	close(OUT);

	&unlock;

}

sub lock {

	# ロックファイル名
	$lockfile = 'count/lock/geki.lock';

	local($retry) = 5;
	while (!mkdir($lockfile, 0755)) {
		sleep(1);
	}
}

sub unlock {

	# ロックファイル名
	$lockfile = 'count/lock/geki.lock';

	rmdir($lockfile);
}