Welcome to E-DoKo
\n"; + +/* end header */ + /* helper function */ +function mymail($To,$Subject,$message) +{ + global $debug; + + if($debug) + { + $message = str_replace("\n","",$message); + echo "
To: $To
Subject: $Subject
$message
\n"; + } + else + mail($To,$Subject,$message); + return; +} + +function is_trump($c) { return (($c<27) ? 1:0);} +function is_club($c) { return (in_array($c,array('27','28','29','30','31','32','33','34')));} +function is_spade($c) { return (in_array($c,array('35','36','37','38','39','40','41','42')));} +function is_heart($c) { return (in_array($c,array('43','44','45','46','47','48')));} + +function compare_cards($a,$b) +{ + /* if a is higher than b return 1, else 0, a being the card first played */ + + /* first map all cards to the odd number */ + if( $a/2 - (int)($a/2) != 0.5) + $a--; + if( $b/2 - (int)($b/2) != 0.5) + $b--; + + if(is_trump($a) && $a<=$b) + return 1; + else if(is_trump($a) && $a>$b) + return 0; + else + { /*$a is not a trump */ + if(is_trump($b)) + return 0; + else + { + /* both clubs? */ + if( is_club($a) && is_club($b)) + if($a<=$b) + return 1; + else + return 0; + /* both spade? */ + if( is_spade($a) && is_spade($b)) + if($a<=$b) + return 1; + else + return 0; + /* both heart? */ + if( is_heart($a) && is_heart($b)) + if($a<=$b) + return 1; + else + return 0; + return 1; + } + } + +} + +function get_winner($p) +{ + /* get all 4 cards played in a trick */ + $c1 = $p[0]; + $c2 = $p[1]; + $c3 = $p[2]; + $c4 = $p[3]; + + /* find out who won */ + if( compare_cards($c1,$c2) && compare_cards($c1,$c3) && compare_cards($c1,$c4) ) + return 0; + if( compare_cards($c2,$c3) && compare_cards($c2,$c4) ) + return 1; + if( compare_cards($c3,$c4) ) + return 2; + return 3; +} + +function parse_status() +{ + global $game,$history,$player,$hash,$lines; + + $game["init"] = 0; + $game["solo-who"] = -1; + $game["solo-what"] = "todo"; + $game["wedding"] = -1; + $game["poverty"] = ""; + $game["nines"] = -1; + $game["startplayer"] = 0; + + for($i=0;$i<4;$i++) + { + $tmp = explode( ":",$lines[$i]); + $hash[$i] = $tmp[0]; + $player[$tmp[0]]["number"] = $i; + $player[$tmp[0]]["hash"] = $tmp[0]; + $player[$tmp[0]]["name"] = $tmp[1]; + $player[$tmp[0]]["email"] = $tmp[2]; + $player[$tmp[0]]["option"] = $tmp[3]; + $player[$tmp[0]]["points"] = $tmp[4]; + $player[$tmp[0]]["cards"] = $tmp[5]; + if(ereg("s",$tmp[3])) $game["init"]++; /* how many players are ready? */ + if(ereg("P",$tmp[3])) $game["poverty"].= $i; /* players with poverty, could be two, so use a string */ + if(ereg("N",$tmp[3])) $game["nines"] = $i; /* the player with too many nines, only one possible */ + if(ereg("W",$tmp[3])) $game["wedding"] = $i; /* the player with the wedding, also only one possible */ + if(ereg("([OSQJCAH])",$tmp[3],$match) && ($game["solo-who"]<0) ) + { + $game["solo-who"] = $i; + $game["startplayer"] = $i; + switch($match[1]) + { + case "O": + $game["solo-what"] = "No Trump"; + case "S": + $game["solo-what"] = "Trump"; + case "Q": + $game["solo-what"] = "Queen"; + case "J": + $game["solo-what"] = "Jack"; + case "C": + $game["solo-what"] = "Club"; + case "A": + $game["solo-what"] = "Spade"; + case "H": + $game["solo-what"] = "Heart"; + } + } + + } + /* save the game history */ + for($i=4;$i
"; return 0; } } function display_card($card) { + /* cards are only availabl for the odd values, e.g. 1.png, 3.png, ... + * convert even cards to the matching odd value */ + if( $card/2 - (int)($card/2) == 0.5) - echo "
![](\"cards/".$card.".png\")
";
+ echo "![\"".card_to_name($card)."\"](\"".$base."cards/".$card.".png\")
\n";
else
- echo "![](\"cards/".($card-1).".png\")
";
+ echo "![\"".card_to_name($card-1)."\"](\"".$base."cards/".($card-1).".png\")
\n";
+
return;
}
- function display_link_card($card,$me)
+
+function display_link_card($card,$me)
{
if( $card/2 - (int)($card/2) == 0.5)
- echo "";
+ echo "\n";
else
- echo "";
+ echo "\n";
return;
}
@@ -195,6 +424,7 @@ function save_status()
{
foreach($hash as $key)
{
+ /* sorting the options, not sure why I do that actually */
$tmp="";
if( ereg("i",$player[$key]["option"]) )
$tmp.="i";
@@ -204,8 +434,29 @@ function save_status()
$tmp.="t";
if( ereg("c",$player[$key]["option"]) )
$tmp.="c";
+ if( ereg("N",$player[$key]["option"]) )
+ $tmp.="N";
+ if( ereg("W",$player[$key]["option"]) )
+ $tmp.="W";
+ if( ereg("P",$player[$key]["option"]) )
+ $tmp.="P";
+ if( ereg("O",$player[$key]["option"]) )
+ $tmp.="O";
+ if( ereg("S",$player[$key]["option"]) )
+ $tmp.="S";
+ if( ereg("Q",$player[$key]["option"]) )
+ $tmp.="Q";
+ if( ereg("J",$player[$key]["option"]) )
+ $tmp.="J";
+ if( ereg("C",$player[$key]["option"]) )
+ $tmp.="C";
+ if( ereg("A",$player[$key]["option"]) )
+ $tmp.="A";
+ if( ereg("H",$player[$key]["option"]) )
+ $tmp.="H";
$player[$key]["option"]=$tmp;
+ /* saving the player stats */
fwrite($output,"".$player[$key]["hash"].":" );
fwrite($output,"".$player[$key]["name"].":" );
fwrite($output,"".$player[$key]["email"].":" );
@@ -222,19 +473,21 @@ function save_status()
fclose($output);
}
else
- echo "can't open file for writing, please inform the admin.";
+ echo "can't open file for writing, please inform the admin.errorcode3";
return;
}
+/***************** M A I N **************************/
+
$history=array();
/* check for status file and read it, if possible */
if(file_exists("status.txt"))
$lines = file("status.txt");
- else
- die("no file");
+else
+ die("no file");
/* check if we want to start a new game */
if( isset($_REQUEST["PlayerA"]) &&
@@ -244,7 +497,7 @@ if( isset($_REQUEST["PlayerA"]) &&
isset($_REQUEST["EmailA"]) &&
isset($_REQUEST["EmailB"]) &&
isset($_REQUEST["EmailC"]) &&
- isset($_REQUEST["EmailD"]) )
+ isset($_REQUEST["EmailD"]) && sizeof($lines<2))
{
$PlayerA = $_REQUEST["PlayerA"];
$PlayerB = $_REQUEST["PlayerB"];
@@ -255,22 +508,29 @@ if( isset($_REQUEST["PlayerA"]) &&
$EmailC = $_REQUEST["EmailC"] ;
$EmailD = $_REQUEST["EmailD"] ;
+ $hashA = md5("AGameOfDoko".$PlayerA.$EmailA);
+ $hashB = md5("AGameOfDoko".$PlayerB.$EmailB);
+ $hashC = md5("AGameOfDoko".$PlayerC.$EmailC);
+ $hashD = md5("AGameOfDoko".$PlayerD.$EmailD);
+
/* send out email, check for error with email */
$message = "\n".
- "you are invited to play a game of DoKo.\n".
+ "you are invited to play a game of DoKo (that is to debug the program ;).\n".
+ "Place comments and bug reports here:\n".
+ "http://wiki.nubati.net/index.php?title=EmailDoko\n\n".
"The whole round would consist of the following players:\n".
"$PlayerA\n".
"$PlayerB\n".
"$PlayerC\n".
"$PlayerD\n\n".
"If you want to join this game, please follow this link:\n\n".
- " http://doko.nubati.net/index.php?a=hash";
+ " ".$host."?a=";
- mail($EmailA,"Invite for a game of DoKo","Hello $PlayerA,\n".$message."1");
- mail($EmailB,"Invite for a game of DoKo","Hello $PlayerB,\n".$message."2");
- mail($EmailC,"Invite for a game of DoKo","Hello $PlayerC,\n".$message."3");
- mail($EmailD,"Invite for a game of DoKo","Hello $PlayerD,\n".$message."4");
+ mymail($EmailA,"You are invited to a game of DoKo","Hello $PlayerA,\n".$message.$hashA);
+ mymail($EmailB,"You are invited to a game of DoKo","Hello $PlayerB,\n".$message.$hashB);
+ mymail($EmailC,"You are invited to a game of DoKo","Hello $PlayerC,\n".$message.$hashC);
+ mymail($EmailD,"You are invited to a game of DoKo","Hello $PlayerD,\n".$message.$hashD);
/* read in random.txt */
if(file_exists("random.txt"))
@@ -278,31 +538,31 @@ if( isset($_REQUEST["PlayerA"]) &&
else
die("no random file");
- $randomNR = explode( ":", $random[1] );
+ $randomNR = explode( ":", $random[4] );
/* write initial status into file */
$output = fopen("status.txt","w");
if ($output)
{
- fwrite($output, "hash1:$PlayerA:$EmailA:::" );
+ fwrite($output, "$hashA:$PlayerA:$EmailA:::" );
for($i=0;$i<11;$i++)
fwrite($output,"$randomNR[$i];" );
fwrite($output,"$randomNR[11]:" ); $i++;
fwrite($output,"\n");
- fwrite($output, "hash2:$PlayerB:$EmailB:::" );
+ fwrite($output, "$hashB:$PlayerB:$EmailB:::" );
for(;$i<23;$i++)
fwrite($output,"$randomNR[$i];" );
fwrite($output,"$randomNR[23]:" ); $i++;
fwrite($output,"\n");
- fwrite($output, "hash3:$PlayerC:$EmailC:::" );
+ fwrite($output, "$hashC:$PlayerC:$EmailC:::" );
for(;$i<35;$i++)
fwrite($output,"$randomNR[$i];" );
fwrite($output,"$randomNR[35]:" ); $i++;
fwrite($output,"\n");
- fwrite($output, "hash4:$PlayerD:$EmailD:::");
+ fwrite($output, "$hashD:$PlayerD:$EmailD:::");
for(;$i<47;$i++)
fwrite($output,"$randomNR[$i];" );
fwrite($output,"$randomNR[47]:" );
@@ -313,6 +573,11 @@ if( isset($_REQUEST["PlayerA"]) &&
else
echo "can't open file for writing";
};
+/* reread file */
+if(file_exists("status.txt"))
+ $lines = file("status.txt");
+ else
+ die("no file");
/* test if a game is running, else output everything for a new game */
if(sizeof($lines)<2)
@@ -321,80 +586,24 @@ if(sizeof($lines)<2)
no game in progress, please input 4 names and email addresses, please make sure that the addresses are correct!
\n"; } } - /* *** * * * * *** @@ -440,68 +646,107 @@ if(sizeof($lines)<2) */ if(isset($_REQUEST["b"])) { - $b=$_REQUEST["b"]; + $b = $_REQUEST["b"]; if( ereg("s",$player[$b]["option"]) && $game["init"]<4) - { + { /* the player already filled out everything */ echo "just wait for the game to start"; } - else if(!isset($_REQUEST["in"])|| !isset($_REQUEST["update"]) ) - { + else if( (!isset($_REQUEST["in"])|| !isset($_REQUEST["update"])) && !ereg("i",$player[$b]["option"])) + { /* the player didn't fill out the form at "a" correctly */ echo "go back to "; - echo " here and fill out the form"; + echo " here and fill out the form
\n"; } else - { /* show the hand */ + { /* show the hand and check if the player is sick*/ if($_REQUEST["in"]=="no") - { + { /* player doesn't want to play, cancel the game */ for($i=0;$i<4;$i++) { - echo "Hello ".$player[$hash[$i]]["name"].",\n"; - echo "\n"; - echo "the game has been cancled due to the request of one of the players.\n"; + $message = "Hello ".$player[$hash[$i]]["name"].",\n\n". + "the game has been canceled due to the request of one of the players.\n"; + mymail($player[$hash[$i]]["email"],"[DoKo-Debug] the game has been canceled",$message); } - $output = fopen("status.txt","w"); - if($output) - fclose($output); - else - echo "problem opening file"; + /* canceling the game is as easy as removing the contents of the status file*/ + $output = fopen("status.txt","w"); + if($output) + fclose($output); + else + echo "problem opening file"; } else { - if($_REQUEST["update"]=="card") $player[$b]["option"].="c"; - if($_REQUEST["update"]=="turn") $player[$b]["option"].="t"; + /* player wants to play, save information from "a"*/ + if($_REQUEST["update"]=="card") + $player[$b]["option"] .= "c"; + else + $player[$b]["option"] .= "t"; - $player[$b]["option"].="i"; + $player[$b]["option"] .= "i"; /* player finished stage "a" */ save_status(); $allcards = $player[$b]["cards"]; - $mycards = explode(";",$allcards); + $mycards = explode(";",$allcards); sort($mycards); - echo "your cards are
"; + echo "
your cards are:
\n";
foreach($mycards as $card)
- {
- display_card($card);
- }
- echo "
\n";
+ display_card($card);
+ echo "
aehm... at the moment poverty is not implented. so I guess you need to play a normal game, even if you have less than 3 trump :(...sorry
+ +=0) + { + $message = "Please try this link: ".$host."?me=".$hash[$ok]."\n". + "\n if this doesn't work, contact the admin.error4\n"; + mymail($recovery,"[DoKo-Debug] recovery ",$message); + echo "An email with the game information has been sent.
\n"; + } + else + { + echo "can't find this email address, sorry.
\n"; + }; + } /* end recovery */ + } else - { + { /* $me is set */ $me = $_REQUEST["me"]; - - echo "game in progress and you are in it"; - foreach($history as $play) + + /* show history */ + /* old tricks as list */ + echo "
- \n";
+ echo "
- History: \n"; + $j=0; + foreach($history as $play) { - echo "
- Trick $j\n \n
![\"table\"](\"".$base."pics/table".$play[0].".png\")
\n";
+ else
+ {
+ /* display current trick */
+ echo "- Current Trick\n
\n"; } - + echo "\n\n";
+ }
for($i=0;$i\n"; + + if(strlen($tmp[2])>0) + echo " "; + else + echo " "; + echo $player[$hash[$tmp[0]]]["name"]; + /* check for comment */ + if(strlen($tmp[2])>0) + echo "".$tmp[2].""; + echo "\n "; + display_card($tmp[1]); - $last=$tmp[0]; + + $last = $tmp[0]; + echo "\n"; } } + + echo "
\n"; + + echo ""; + + /* output if we are playing a solo or a wedding */ + echo ""; + if($game["solo-who"]>=0) + echo $player[$hash[$game["solo-who"]]]["name"]." is playing a ".$game["solo-what"]." solo!"; + echo "
\n"; + else if($game["wedding"]>=0) + echo $player[$hash[$game["wedding"]]]["name"]." is playing a wedding!
\n"; + echo "Poverty not working yet!\n"; + + + /* figure out who needs to play next */ $next = $last + 1; if ($next>=4) $next -= 4 ; - if($last<0) - { - $next=$history[sizeof($history)-1][0]; - } - + /* if no one has played yet or we are at the start of a new trick */ + if($last<0) + $next = $history[sizeof($history)-1][0]; + + /* are we trying to play a card? */ if(isset($_REQUEST["card"])) { if($hash[$next]==$me) { - $card=$_REQUEST["card"]; + $card = $_REQUEST["card"]; $mycards = explode(";",$player[$me]["cards"]); + $comment = $_REQUEST["comment"]; + $comment = str_replace(":","",$comment); /*can't have ":" in comments */ + + /* do we have that card */ if(in_array($card,$mycards)) { - $tmp=array(); + /* delete card from array */ + $tmp = array(); foreach($mycards as $m) - if($m!=$card) + if($m != $card) $tmp[]=$m; + $tmp2=""; for($i=0;$i
". + " Schweinchen not working yet
". + "Bug: at the end of the game the winner of the last trick can add more points to his score by reloading the page
". + "If you find more bugs, please list them in the wiki.Hit shift reload every now and then too."; + echo " you played\n"; + /* send out email to players who want/need to get informed */ - for($i=0;$i<4;$i++) + /* check if we are in a trick, if trick is done, this needs to be handelt in the + * who-won-the-trick section further down */ + $tmp = explode(":",$history[sizeof($history)-1]); + if(sizeof($tmp)<5) + for($i=0;$i<4;$i++) + { + $mynext = $next+1; if($mynext>3)$mynext-=4; + + if((ereg("c",$player[$hash[$i]]["option"]) || $i==$mynext) && $hash[$i]!=$me) + { + $message = " Hello ".$player[$hash[$i]]["name"].",\n\n"; + + if($i==$mynext) + { + $message .= "it's your turn now.\n". + "Use this link to play a card: ".$host."?me=".$hash[$i]."\n\n" ; + } + $message .= $player[$me]["name"]." has played the following card ". + card_to_name($card)."\n"; + + if($game["solo-who"]>=0) + $message .= $player[$hash[$game["solo-who"]]]["name"]." is playing a ". + $game["solo-what"]." solo!\n"; + + mymail($player[$hash[$i]]["email"],"[DoKo-debug] a card has been played",$message); + + if($debug) + echo " next player
"; display_card($card); + echo "
\n"; + } + } + } + else + echo "seems like you don't have that card
\n"; + } + } /* end if card is set */ + if(substr_count($history[sizeof($history)-1],":")==4) + { /* count points, email winner */ + $p = array(); + $c = array(); + + $tmp = explode(":",$history[sizeof($history)-1]); /*last played trick */ + + /* get player and cards of last trick */ + for($i=0;$i<4;$i++) + { + $tmp2 = explode("->",$tmp[$i]); + $p[] = $tmp2[0]; + $c[] = $tmp2[1]; + }; + + $win = $p[get_winner($c)]; + + if(strlen($player[$hash[0]]["cards"])) + $history[] = "\n".$win.":\n"; /* not sure why I need the first \n here */ + + /* check if game is done */ + $end = 1; + for($i=0;$i<4;$i++) + if(strlen(trim($player[$hash[$i]]["cards"]))!=0) + $end = 0; + + /* email the player who needs to move next*/ + if(!$end) + for($i=0;$i<4;$i++) + { + if((ereg("c",$player[$hash[$i]]["option"]) || $i==$win) ) + { + $message = " Hello ".$player[$hash[$i]]["name"].",\n\n"; + + if($i == $win) { - $mynext=$next+1; if($mynext>3)$mynext-=4; - if((ereg("c",$player[$hash[$i]]["option"]) || $i==$mynext) && $hash[$i]!=$me) - { - echo "
** $next** \n Hello ".$player[$hash[$i]]["name"].",\n"; - echo "\n"; - if($i==$mynext) - echo "it's your turn now.\n"; - echo $player[$me]["name"]. "has played the following card ".card_to_name($card)."\n"; - - echo " player 1
"; - echo " player 2
"; - echo " player 3
"; - echo " player 4
"; - - } + $message .= "You won the last trick,it's your turn now.\n". + "Use this link to play a card: ".$host."?me=".$hash[$i]."\n\n" ; } + else + $message .= $player[$hash[$win]]["name"]." has won the last trick\n". + "Use this link to look at the game: ".$host."?me=".$hash[$i]."\n\n" ; + + if($game["solo-who"]>=0) + $message.= $player[$hash[$game["solo-who"]]]["name"]." is playing a ". + $game["solo-what"]." solo!\n"; + + mymail($player[$hash[$i]]["email"],"[DoKo-debug] a card has been played",$message); + + if($debug) + echo " next player
\n"; } - else - echo "seems like you don't have that card
"; - } - } - else if(isset($_REQUEST["win"]) && strlen($history[sizeof($history)-1])>3) - { - $win=$_REQUEST["win"]; - $history[]=$win.":\n"; /* count points of the last trick */ - $points=0; - echo "
".$history[sizeof($history)-2]."is the last trick played
"; + $points = 0; + $tmp = explode(":",$history[sizeof($history)-2]); for($i=0;$i<4;$i++) { $tmp2 = explode("->",$tmp[$i]); $c = $tmp2[1]; $points += card_value($c); - echo "adding card value ".card_value($c)."
"; } - $player[$hash[$win]]["points"]+=$points; - echo "
".$player[$hash[$win]]["name"]." won: $points Points
"; - + $player[$hash[$win]]["points"] += $points; + echo "
\n ".$player[$hash[$win]]["name"]." won: $points Points
\n"; + save_status(); - } - echo "
"; - - $tmp = explode(":",$history[sizeof($history)-1]); + }; /* end if win is set */ + echo "
\n"; - if(sizeof($tmp)==5) + /* check if game is done */ + $end = 1; + for($i=0;$i<4;$i++) + if(strlen(trim($player[$hash[$i]]["cards"]))!=0) + $end = 0; + + if($end) + { + echo "
game over, count points
\n"; + for($i=0;$i<4;$i++) + { + echo $player[$hash[$i]]["name"]." got ".$player[$hash[$i]]["points"]."
\n"; + } + } + /* check end of game */ + + /* do we still have cards? display them */ + if(strlen(trim($player[$me]["cards"]))>0 ) { - ?> - - Current Trick\n
"; - + $j++; $trick = explode(":",$play); - $last=-2; /* found old trick, display it */ + if(sizeof($trick)==5) + echo "