Welcome to E-DoKo

\n"; + +/* end header */ + /* helper function */ function mymail($To,$Subject,$message) { @@ -30,14 +62,81 @@ function mymail($To,$Subject,$message) if($debug) { - str_replace("\n","
",$message); - echo "
To: $To
Subject: $Subject
$message
"; + $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; @@ -46,7 +145,7 @@ function parse_status() $game["solo-who"] = -1; $game["solo-what"] = "todo"; $game["wedding"] = -1; - $game["poverty"] = -1; + $game["poverty"] = ""; $game["nines"] = -1; $game["startplayer"] = 0; @@ -61,25 +160,38 @@ function parse_status() $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"]++; - if(ereg("P",$tmp[3])) $game["poverty"] = $i; - if(ereg("N",$tmp[3])) $game["nines"] = $i; - if(ereg("W",$tmp[3])) $game["wedding"] = $i; - if(ereg("[OSQJCAH]",$tmp[3]) && ($game["solo-who"]<0) ) + 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"; + default: + echo "something went wrong, please contact the admin. ErrorCode: 2
"; 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 " $\"".card_to_name($card)."\"$ "; + echo " $\"".card_to_name($card)."\"$ \n"; else - echo " $\"".card_to_name($card-1)."\"$ "; + echo " $\"".card_to_name($card-1)."\"$ \n"; + return; } function display_link_card($card,$me) { if( $card/2 - (int)($card/2) == 0.5) - echo " $\"".card_to_name($card)."\"$ "; + echo " $\"\"$ \n"; else - echo " $\"".card_to_name($card-1)."\"$ "; + echo " $\"\"$ \n"; return; } @@ -370,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"]) && @@ -422,10 +527,10 @@ if( isset($_REQUEST["PlayerA"]) && "If you want to join this game, please follow this link:\n\n". " ".$host."?a="; - mymail($EmailA,"Invite for a game of DoKo","Hello $PlayerA,\n".$message.$hashA); - mymail($EmailB,"Invite for a game of DoKo","Hello $PlayerB,\n".$message.$hashB); - mymail($EmailC,"Invite for a game of DoKo","Hello $PlayerC,\n".$message.$hashC); - mymail($EmailD,"Invite for a game of DoKo","Hello $PlayerD,\n".$message.$hashD); + 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")) @@ -433,7 +538,7 @@ 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"); @@ -468,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) @@ -491,9 +601,9 @@ if(sizeof($lines)<2) \n"; } } - /* *** * * * * *** @@ -539,56 +646,59 @@ 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"])) && !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++) { $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 "

\n"; ?> -

aehm... at the moment please just answer everything with no, still need to implement this

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

- + do you want to play solo? "; - echo " no
"; + echo " no
\n"; } else { - echo " no
"; + echo " no
\n"; }; echo "do you have poverty?"; if(count_trump($player[$b]["cards"])<4) { echo " yes"; - echo " no
"; + echo " no
\n"; } else { - echo " no
"; + echo " no
\n"; }; echo "do you have too many nines?"; if(count_nines($player[$b]["cards"])>4) { echo " yes"; - echo " no
"; + echo " no
\n"; } else { - echo " no
"; + echo " no
\n"; }; echo "\n"; @@ -644,21 +754,26 @@ if(sizeof($lines)<2) } } } + if(isset($_REQUEST["c"])) { - $c=$_REQUEST["c"]; + $c = $_REQUEST["c"]; - if(!isset($_REQUEST["solo"])|| !isset($_REQUEST["wedding"])|| !isset($_REQUEST["poverty"]) || !isset($_REQUEST["nines"]) ) - { - echo "go back to "; - echo " here and fill out the form
"; + + if( ereg("s",$player[$c]["option"]) && $game["init"]<4 ) + { /* the player already filled out everything */ + echo "

just wait for the game to start

\n"; } - else if( ereg("s",$player[$c]["option"]) && $game["init"]<4 ) - { - echo "just wait for the game to start"; + else if(!isset($_REQUEST["solo"]) || + !isset($_REQUEST["wedding"]) || + !isset($_REQUEST["poverty"]) || + !isset($_REQUEST["nines"]) ) + {/* player still needs to fill out the form */ + echo "go back to "; + echo " here and fill out the form
\n"; } else if($game["init"]<4) - { + { /* save information */ if( $_REQUEST["solo"]!="No") { switch($_REQUEST["solo"]) @@ -688,66 +803,77 @@ if(sizeof($lines)<2) } else if($_REQUEST["wedding"] == "yes") { - echo "wedding was chosen
"; + echo "wedding was chosen
\n"; $player[$c]["option"].="W"; } else if($_REQUEST["poverty"] == "yes") { - echo "poverty was chosen
"; + echo "poverty was chosen
\n"; $player[$c]["option"].="P"; } else if($_REQUEST["nines"] == "yes") { - echo "nines was chosen
"; + echo "nines was chosen
\n"; $player[$c]["option"].="N"; } - $message = "you're in. once everyone has filled out the form,". - "the game will start and you'll get an eamil on your turn\n"; - mymail($player[$c]["email"],"[DoKo-debug] the game will start soon",$message); - + /* player finished setup */ $player[$c]["option"].="s"; + save_status(); + /* reread status file, to get the correct startplayer, etc */ if(file_exists("status.txt")) $lines = file("status.txt"); else die("no file"); parse_status(); - if($game["init"]==4) + if($game["init"]==4 && $player[$c]["number"]==$game["startplayer"]) + { + echo "

The game can start now, it's your turn, please use this link to play a card.

\n"; + } + else if($game["init"]==4) { $message = "The game can start now, it's your turn, please use this link to play a card:\n". $host."?me=".$hash[$game["startplayer"]]."\n"; mymail($player[$hash[$game["startplayer"]]]["email"],"[DoKo-debug] let's go",$message); + echo "

The game has started. An email has been sent out to the first player.

\n"; + } + else + { + echo "

You're in. Once everyone has filled out the form, ". + "the game will start and you'll get an eamil on your turn.

\n"; } - } } + /* END SETUP */ + + /* the game */ if($game["init"]==4) { - /* check for sickness*/ - /***** someone has 5 nines and no one is playing solo=> cance5Al game */ + /* check for sickness, only would need to do this on the first trick really...*/ + /***** someone has 5 nines and no one is playing solo => cancel game */ if($game["nines"]>=0 && $game["solo-who"]<0) { $message = $player[$hash[$game["poverty"]]]["nines"]." has more than 4 nines. Game aborted!\n"; for($i=0;$i<4;$i++) - { - mymail($player[$hash[$i]]["email"],"[DoKo-debug] the game has been canceled",$message); - } + 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"; - } - + }; + /* who is requesting this*/ if(!isset($_REQUEST["me"])) { if(!isset($_REQUEST["recovery"])) { - echo "a game is in progress, but you are not playing.
"; - echo "In case you are playing, but lost your email or can't access the game anymore, please input your email here:
"; + echo "A game is in progress and kibitzing is not allowed. Sorry!.
\n"; + echo "In case you are playing, but lost your email or can't access the game anymore, please input your email here:
\n"; ?> recorvery:
@@ -757,21 +883,21 @@ if(sizeof($lines)<2) } else { - $recovery=$_REQUEST["recovery"]; - $ok=-1; + $recovery = $_REQUEST["recovery"]; + $ok = -1; for($i=0;$i<4;$i++) if(trim($recovery)==trim($player[$hash[$i]]["email"])) - $ok=$i; + $ok = $i; if($ok>=0) { $message = "Please try this link: ".$host."?me=".$hash[$ok]."\n". - "\n if this doesn't work, contact the admin.\n"; + "\n if this doesn't work, contact the admin.error4\n"; mymail($recovery,"[DoKo-Debug] recovery ",$message); - echo "email has been sent."; + echo "

An email with the game information has been sent.

\n"; } else { - echo "can't find this email address, sorry."; + echo "

can't find this email address, sorry.

\n"; }; } /* end recovery */ } @@ -779,42 +905,81 @@ if(sizeof($lines)<2) { /* $me is set */ $me = $_REQUEST["me"]; - echo "game in progress and you are in it
"; - if($game["solo-who"]>=0) - echo $player[$hash[$game["solo-who"]]]["name"]." is playing a ".$game["solo-what"]." solo!
"; - else if($game["wedding"]>=0) - echo $player[$hash[$game["wedding"]]]["name"]." is playing a wedding!
"; - /* show history */ + /* old tricks as list */ + echo "

History:

Trick $j\n
\n $\"table\"$ \n"; + else + { + /* display current trick */ + echo "
Current Trick\n
\n $\"table\"$ "; + } for($i=0;$i",$card)) { $tmp = explode("->",$card); - echo $player[$hash[$tmp[0]]]["name"]." played "; + + echo "
\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

\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!
\n"; + else if($game["wedding"]>=0) + echo $player[$hash[$game["wedding"]]]["name"]." is playing a wedding!
\n"; + echo "

"; + echo "

Poverty not working yet!
". + " 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.

\n"; + + /* figure out who needs to play next */ $next = $last + 1; if ($next>=4) $next -= 4 ; + + /* 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]; - } + $next = $history[sizeof($history)-1][0]; /* are we trying to play a card? */ if(isset($_REQUEST["card"])) @@ -823,6 +988,8 @@ if(sizeof($lines)<2) { $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)) @@ -844,56 +1011,113 @@ if(sizeof($lines)<2) /* add card to history, special case if this is the first card */ if($last<0) { - $history[sizeof($history)-1]="".$player[$me]["number"]."->".$card.":\n"; + $history[sizeof($history)-1]="".$player[$me]["number"]."->".$card."->$comment:\n"; } else { $tmp = explode(":",$history[sizeof($history)-1]); - $tmp[sizeof($tmp)-1] = "".$player[$me]["number"]."->".$card.":"; + $tmp[sizeof($tmp)-1] = "".$player[$me]["number"]."->".$card."->$comment:"; $history[sizeof($history)-1]=join(":",$tmp); } save_status(); - echo " you played "; + echo "

"; + echo " you played
"; display_card($card); - + echo "

\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
\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) - { - $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"]]]." 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
"; - } + $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
"; - } - } /* end if card is set */ - 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; + $points = 0; $tmp = explode(":",$history[sizeof($history)-2]); for($i=0;$i<4;$i++) @@ -902,79 +1126,60 @@ if(sizeof($lines)<2) $c = $tmp2[1]; $points += 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(); }; /* end if win is set */ - echo "
"; - - $tmp = explode(":",$history[sizeof($history)-1]); - - /* check last history entry: end of a trick? ask who won it */ - if(sizeof($tmp)==5) - { - ?> - -who won? -"; - echo ""; -?> - + echo "
\n"; -

- game over, count points
\n"; + for($i=0;$i<4;$i++) { - $next=$tmp[0]; - - if($debug) - echo "DEBUG: the next move is for the next player
"; - - if(strlen(trim($player[$me]["cards"]))==0) - { - echo "
game over, count points
"; - for($i=0;$i<4;$i++) - { - echo $player[$hash[$i]]["name"]." got ".$player[$hash[$i]]["points"]."
"; - } - } + echo $player[$hash[$i]]["name"]." got ".$player[$hash[$i]]["points"]."
\n"; } - echo "
"; - } /* end check for winner */ - + } + /* check end of game */ + /* do we still have cards? display them */ if(strlen(trim($player[$me]["cards"]))>0 ) { $allcards = trim($player[$me]["cards"]); - $mycards = explode(";",$allcards); + $mycards = explode(";",$allcards); sort($mycards); + echo "

\n"; /* is it our turn? */ - if($hash[$next]==$me) + if($hash[$next]==$me && !isset($_REQUEST["card"])) { - echo "ITS YOUR TURN
"; - echo "your cards are:
"; + echo "Hello ".$player[$me]["name"].", it's your turn!
\n"; + echo "Your cards are:
\n"; + echo " +"; + echo "Your cards are:
\n"; foreach($mycards as $card) - { - display_card($card); - } + display_card($card); } - echo "
\n"; + echo "

\n"; } } } @@ -982,6 +1187,14 @@ who won? } ?> -

+ +

Welcome to E-Doko

Welcome to E-DoKo