index.php

   1 <!DOCTYPE html PUBLIC
   2     "-//W3C//DTD XHTML 1.1 plus MathML 2.0 plus SVG 1.1//EN"
   3     "http://www.w3.org/2002/04/xhtml-math-svg/xhtml-math-svg.dtd">
   4 <html xmlns="http://www.w3.org/1999/xhtml" xml:lang="en">
   5   <head>
   6      <title>e-Doko</title>
   7      <meta content="text/html; charset=ISO-8859-1" http-equiv="content-type" />
   8      <link rel="stylesheet" type="text/css" href="standard.css" />
   9   </head>
  10 <body>
  11 <div class="header">
  12 <h1> Welcome to E-Doko </h1>
  13 <?php
  14
  15 /*
  16  * config
  17  */
  18
  19 $host  = "http://doko.nubati.net/index.php";
  20 $wiki  = "http://wiki.nubati.net/index.php?title=EmailDoko";
  21 $debug = 0;
  22
  23 /*
  24  * end config
  25  */
  26
  27 /* helper function */
  28 function mymail($To,$Subject,$message)
  29 {
  30   global $debug;
  31
  32   if($debug)
  33     {
  34       $message = str_replace("\n","<br />",$message);
  35       echo "<br />To: $To<br />Subject: $Subject <br />$message<br />\n";
  36     }
  37   else
  38     mail($To,$Subject,$message);
  39   return;
  40 }
  41
  42 function parse_status()
  43 {
  44   global $game,$history,$player,$hash,$lines;
  45
  46   $game["init"]        = 0;
  47   $game["solo-who"]    = -1;
  48   $game["solo-what"]   = "todo";
  49   $game["wedding"]     = -1;
  50   $game["poverty"]     = "";
  51   $game["nines"]       = -1;
  52   $game["startplayer"] = 0;
  53
  54   for($i=0;$i<4;$i++)
  55     {
  56       $tmp = explode( ":",$lines[$i]);
  57       $hash[$i]   = $tmp[0];
  58       $player[$tmp[0]]["number"] = $i;
  59       $player[$tmp[0]]["hash"]   = $tmp[0];
  60       $player[$tmp[0]]["name"]   = $tmp[1];
  61       $player[$tmp[0]]["email"]  = $tmp[2];
  62       $player[$tmp[0]]["option"] = $tmp[3];
  63       $player[$tmp[0]]["points"] = $tmp[4];
  64       $player[$tmp[0]]["cards"]  = $tmp[5];
  65       if(ereg("s",$tmp[3])) $game["init"]++;       /* how many players are ready? */
  66       if(ereg("P",$tmp[3])) $game["poverty"].= $i; /* players with poverty, could be two, so use a string */
  67       if(ereg("N",$tmp[3])) $game["nines"]   = $i; /* the player with too many nines, only one possible */
  68       if(ereg("W",$tmp[3])) $game["wedding"] = $i; /* the player with the wedding, also only one possible */
  69       if(ereg("([OSQJCAH])",$tmp[3],$match) && ($game["solo-who"]<0) )
  70         {
  71           $game["solo-who"]    = $i;
  72           $game["startplayer"] = $i;
  73           switch($match[1])
  74             {
  75             case "O":
  76               $game["solo-what"] = "No Trump";
  77             case "S":
  78               $game["solo-what"] = "Trump";
  79             case "Q":
  80               $game["solo-what"] = "Queen";
  81             case "J":
  82               $game["solo-what"] = "Jack";
  83             case "C":
  84               $game["solo-what"] = "Club";
  85             case "A":
  86               $game["solo-what"] = "Spade";
  87             case "H":
  88               $game["solo-what"] = "Heart";
  89             }
  90         }
  91
  92     }
  93   /* save the game history */
  94   for($i=4;$i<sizeof($lines);$i++)
  95     {
  96       if(!ereg("^[[:space:]]*$",trim($lines[$i])))
  97         {
  98           $history[] = $lines[$i];
  99         }
 100     }
 101
 102   if(sizeof($history)==0 || (sizeof($history)==1 && strlen($history[0])==3 ))
 103     $history[0] = $game["startplayer"].":";
 104
 105   return;
 106 }
 107
 108 function count_nines($cards)
 109 {
 110   $card = explode(";",$cards);
 111
 112   $nines =0;
 113
 114   foreach($card as $c)
 115     {
 116       if($c == "25" || $c == "26") $nines++;
 117       else if($c == "33" || $c == "34") $nines++;
 118       else if($c == "41" || $c == "42") $nines++;
 119       else if($c == "47" || $c == "48") $nines++;
 120     }
 121
 122   return $nines;
 123 }
 124
 125 function check_wedding($cards)
 126 {
 127   $card = explode(";",$cards);
 128
 129   $count =0;
 130
 131   if( in_array("3",$card) && in_array("2",$card) )
 132     $count=1;
 133
 134   return $count;
 135 }
 136
 137 function count_trump($cards)
 138 {
 139   $card = explode(";",$cards);
 140
 141   $trump =0;
 142
 143   /* count each trump */
 144   foreach($card as $c)
 145     if( (int)($c) <27)
 146       $trump++;
 147
 148   /* subtract foxes */
 149   if( in_array("19",$card))
 150     $trump--;
 151   if( in_array("20",$card) )
 152     $trump--;
 153   /* add one, in case the player has both foxes (schweinchen) */
 154   if( in_array("19",$card) && in_array("20",$card) )
 155     $trump++;
 156
 157   return $trump;
 158 }
 159
 160 function card_to_name($card)
 161 {
 162   switch($card)
 163     {
 164       case 1:
 165       case 2:
 166         return "ten of hearts";
 167       case 3:
 168       case 4:
 169       return "queen of clubs";
 170       case 5:
 171       case 6:
 172       return "queen of spades";
 173       case 7:
 174       case 8:
 175       return "queen of hearts";
 176       case 9:
 177       case 10:
 178       return "queen of diamonds";
 179       case 11:
 180       case 12:
 181       return "jack of clubs";
 182       case 13:
 183       case 14:
 184       return "jack of spades";
 185       case 15:
 186       case 16:
 187       return "jack of hearts";
 188       case 17:
 189       case 18:
 190       return "jack of diamonds";
 191       case 19:
 192       case 20:
 193       return "ace of diamonds";
 194       case 21:
 195       case 22:
 196       return "ten of diamonds";
 197       case 23:
 198       case 24:
 199       return "king of diamonds";
 200       case 25:
 201       case 26:
 202       return "nine of diamonds";;
 203       case 27:
 204       case 28:
 205       return "ace of clubs";
 206       case 29:
 207       case 30:
 208       return "ten of clubs";
 209       case 31:
 210       case 32:
 211       return "king of clubs";
 212       case 33:
 213       case 34:
 214       return "nine of clubs";
 215       case 35:
 216       case 36:
 217       return "ace of spades";
 218       case 37:
 219       case 38:
 220       return "ten of spades";
 221       case 39:
 222       case 40:
 223       return "king of spades";
 224       case 41:
 225       case 42:
 226       return "nine of spades";
 227       case 43:
 228       case 44:
 229       return "ace of hearts";
 230       case 45:
 231       case 46:
 232       return "king of hearts";
 233       case 47:
 234       case 48:
 235       return "nine of hearts";
 236       default:
 237       return "something went wrong, please contact the admin";
 238     }
 239 }
 240
 241 function card_value($card)
 242 {
 243   switch($card-1)
 244     {
 245       case 0:
 246       case 1:
 247         return 10;
 248       case 2:
 249       case 3:
 250       case 4:
 251       case 5:
 252       case 6:
 253       case 7:
 254       case 8:
 255       case 9:
 256         return 3;
 257       case 10:
 258       case 11:
 259       case 12:
 260       case 13:
 261       case 14:
 262       case 15:
 263       case 16:
 264       case 17:
 265         return 2;
 266       case 18:
 267       case 19:
 268         return 11;
 269       case 20:
 270       case 21:
 271         return 10;
 272       case 22:
 273       case 23:
 274         return 4;
 275       case 24:
 276       case 25:
 277       return 0;
 278       case 26:
 279       case 27:
 280       return 11;
 281       case 28:
 282       case 29:
 283       return 10;
 284       case 30:
 285       case 31:
 286       return 4;
 287       case 32:
 288       case 33:
 289       return 0;
 290       case 34:
 291       case 35:
 292       return 11;
 293       case 36:
 294       case 37:
 295       return 10;
 296       case 38:
 297       case 39:
 298       return 4;
 299       case 40:
 300       case 41:
 301       return 0;
 302       case 42:
 303       case 43:
 304       return 11;
 305       case 44:
 306       case 45:
 307       return 4;
 308       case 46:
 309       case 47:
 310       return 0;
 311       default:
 312       echo "something went wrong, please contact the admin <br>";
 313       return 0;
 314     }
 315 }
 316
 317 function display_card($card)
 318 {
 319   if( $card/2 - (int)($card/2) == 0.5)
 320     echo "<img src=\"cards/".$card.".png\"  alt=\"".card_to_name($card)."\" />\n";
 321   else
 322     echo "<img src=\"cards/".($card-1).".png\"  alt=\"".card_to_name($card-1)."\" />\n";
 323   return;
 324 }
 325
 326 function display_link_card($card,$me)
 327 {
 328   if( $card/2 - (int)($card/2) == 0.5)
 329     echo "<a href=\"index.php?me=$me&amp;card=$card\"><img src=\"cards/".$card.".png\"  alt=\"".card_to_name($card)."\" /></a>\n";
 330   else
 331     echo "<a href=\"index.php?me=$me&amp;card=$card\"><img src=\"cards/".($card-1).".png\"  alt=\"".card_to_name($card-1)."\" /></a>\n";
 332   return;
 333 }
 334
 335 function save_status()
 336 {
 337   global $player,$game,$hash,$history;
 338
 339   $output = fopen("status.txt","w");
 340   if ($output)
 341     {
 342       foreach($hash as $key)
 343         {
 344           /* sorting the options, not sure why I do that actually */
 345           $tmp="";
 346           if( ereg("i",$player[$key]["option"]) )
 347             $tmp.="i";
 348           if( ereg("s",$player[$key]["option"]) )
 349             $tmp.="s";
 350           if( ereg("t",$player[$key]["option"]) )
 351             $tmp.="t";
 352           if( ereg("c",$player[$key]["option"]) )
 353             $tmp.="c";
 354           if( ereg("N",$player[$key]["option"]) )
 355             $tmp.="N";
 356           if( ereg("W",$player[$key]["option"]) )
 357             $tmp.="W";
 358           if( ereg("P",$player[$key]["option"]) )
 359             $tmp.="P";
 360           if( ereg("O",$player[$key]["option"]) )
 361             $tmp.="O";
 362           if( ereg("S",$player[$key]["option"]) )
 363             $tmp.="S";
 364           if( ereg("Q",$player[$key]["option"]) )
 365             $tmp.="Q";
 366           if( ereg("J",$player[$key]["option"]) )
 367             $tmp.="J";
 368           if( ereg("C",$player[$key]["option"]) )
 369             $tmp.="C";
 370           if( ereg("A",$player[$key]["option"]) )
 371             $tmp.="A";
 372           if( ereg("H",$player[$key]["option"]) )
 373             $tmp.="H";
 374           $player[$key]["option"]=$tmp;
 375
 376           /* saving the player stats */
 377           fwrite($output,"".$player[$key]["hash"].":" );
 378           fwrite($output,"".$player[$key]["name"].":" );
 379           fwrite($output,"".$player[$key]["email"].":" );
 380           fwrite($output,"".$player[$key]["option"].":" );
 381           fwrite($output,"".$player[$key]["points"].":" );
 382           fwrite($output,"".$player[$key]["cards"] .":");
 383           fwrite($output,"\n");
 384         }
 385       fwrite($output,"\n");
 386       foreach($history as $line)
 387         fwrite($output,$line);
 388
 389       fwrite($output,"\n");
 390       fclose($output);
 391     }
 392   else
 393     echo "can't open file for writing, please inform the admin.";
 394
 395   return;
 396 }
 397
 398 /*****************  M A I N **************************/
 399
 400 echo "<p>If you find bugs, please list them in the <a href=\"".$wiki."\">wiki</a>.</p>\n";
 401
 402 echo "<p> Names that are underlined have a comment, which you can access by hovering over the name with your mouse ;)</p>\n";
 403 echo "</div>\n";
 404
 405 /* end header */
 406
 407
 408 $history=array();
 409
 410 /* check for status file and read it, if possible */
 411
 412 if(file_exists("status.txt"))
 413   $lines = file("status.txt");
 414 else
 415   die("no file");
 416
 417 /* check if we want to start a new game */
 418 if( isset($_REQUEST["PlayerA"]) &&
 419     isset($_REQUEST["PlayerB"]) &&
 420     isset($_REQUEST["PlayerC"]) &&
 421     isset($_REQUEST["PlayerD"]) &&
 422     isset($_REQUEST["EmailA"]) &&
 423     isset($_REQUEST["EmailB"]) &&
 424     isset($_REQUEST["EmailC"]) &&
 425     isset($_REQUEST["EmailD"]) && sizeof($lines<2))
 426   {
 427     $PlayerA = $_REQUEST["PlayerA"];
 428     $PlayerB = $_REQUEST["PlayerB"];
 429     $PlayerC = $_REQUEST["PlayerC"];
 430     $PlayerD = $_REQUEST["PlayerD"];
 431     $EmailA  = $_REQUEST["EmailA"] ;
 432     $EmailB  = $_REQUEST["EmailB"] ;
 433     $EmailC  = $_REQUEST["EmailC"] ;
 434     $EmailD  = $_REQUEST["EmailD"] ;
 435
 436     $hashA = md5("AGameOfDoko".$PlayerA.$EmailA);
 437     $hashB = md5("AGameOfDoko".$PlayerB.$EmailB);
 438     $hashC = md5("AGameOfDoko".$PlayerC.$EmailC);
 439     $hashD = md5("AGameOfDoko".$PlayerD.$EmailD);
 440
 441     /* send out email, check for error with email */
 442
 443     $message = "\n".
 444       "you are invited to play a game of DoKo (that is to debug the program ;).\n".
 445       "Place comments and bug reports here:\n".
 446       "http://wiki.nubati.net/index.php?title=EmailDoko\n\n".
 447       "The whole round would consist of the following players:\n".
 448       "$PlayerA\n".
 449       "$PlayerB\n".
 450       "$PlayerC\n".
 451       "$PlayerD\n\n".
 452       "If you want to join this game, please follow this link:\n\n".
 453       " ".$host."?a=";
 454
 455     mymail($EmailA,"You are invited to a game of DoKo","Hello $PlayerA,\n".$message.$hashA);
 456     mymail($EmailB,"You are invited to a game of DoKo","Hello $PlayerB,\n".$message.$hashB);
 457     mymail($EmailC,"You are invited to a game of DoKo","Hello $PlayerC,\n".$message.$hashC);
 458     mymail($EmailD,"You are invited to a game of DoKo","Hello $PlayerD,\n".$message.$hashD);
 459
 460     /* read in random.txt */
 461     if(file_exists("random.txt"))
 462       $random = file("random.txt");
 463     else
 464       die("no random file");
 465
 466     $randomNR = explode( ":", $random[2] );
 467
 468     /* write initial status into file */
 469     $output = fopen("status.txt","w");
 470     if ($output)
 471       {
 472         fwrite($output, "$hashA:$PlayerA:$EmailA:::" );
 473         for($i=0;$i<11;$i++)
 474           fwrite($output,"$randomNR[$i];" );
 475         fwrite($output,"$randomNR[11]:" ); $i++;
 476         fwrite($output,"\n");
 477
 478         fwrite($output, "$hashB:$PlayerB:$EmailB:::" );
 479         for(;$i<23;$i++)
 480           fwrite($output,"$randomNR[$i];" );
 481         fwrite($output,"$randomNR[23]:" ); $i++;
 482         fwrite($output,"\n");
 483
 484         fwrite($output, "$hashC:$PlayerC:$EmailC:::" );
 485         for(;$i<35;$i++)
 486           fwrite($output,"$randomNR[$i];" );
 487         fwrite($output,"$randomNR[35]:" ); $i++;
 488         fwrite($output,"\n");
 489
 490         fwrite($output, "$hashD:$PlayerD:$EmailD:::");
 491         for(;$i<47;$i++)
 492           fwrite($output,"$randomNR[$i];" );
 493         fwrite($output,"$randomNR[47]:" );
 494         fwrite($output,"\n");
 495
 496         fclose($output);
 497       }
 498     else
 499       echo "can't open file for writing";
 500   };
 501 /* reread file */
 502 if(file_exists("status.txt"))
 503   $lines = file("status.txt");
 504  else
 505    die("no file");
 506
 507 /* test if a game is running, else output everything for a new game */
 508 if(sizeof($lines)<2)
 509   {
 510 ?>
 511     <p> no game in progress, please input 4 names and email addresses, please make sure that the addresses are correct! </p>
 512  <form action="index.php" method="post">
 513    Name:  <input name="PlayerA" type="text" size="10" maxlength="20" />
 514    Email: <input name="EmailA"  type="text" size="20" maxlength="30" /> <br />
 515
 516    Name:  <input name="PlayerB" type="text" size="10" maxlength="20" />
 517    Email: <input name="EmailB"  type="text" size="20" maxlength="30" /> <br />
 518
 519    Name:  <input name="PlayerC" type="text" size="10" maxlength="20" />
 520    Email: <input name="EmailC"  type="text" size="20" maxlength="30" /> <br />
 521
 522    Name:  <input name="PlayerD" type="text" size="10" maxlength="20" />
 523    Email: <input name="EmailD"  type="text" size="20" maxlength="30" /> <br />
 524
 525    <input type="submit" value="start game" />
 526  </form>
 527 <?php
 528    }
 529 else
 530   { /* load game status */
 531     parse_status();
 532 /*     **
 533  *    *  *
 534  *    ****
 535  *    *  *
 536  *
 537  * check if a player wants to accept a game
 538  */
 539     if(isset($_REQUEST["a"]))
 540       {
 541         $a = $_REQUEST["a"];
 542
 543         if( ereg("[is]",$player[$a]["option"]) &&  $game["init"]<4)
 544           {
 545             echo "just wait for the game to start";
 546           }
 547         else if( !ereg("[is]",$player[$a]["option"]) )
 548           {
 549  ?>
 550  <form action="index.php" method="post">
 551    Do you want to play a game of DoKo?
 552    yes<input type="radio" name="in" value="yes" />
 553    no<input type="radio" name="in" value="no" /> <br />
 554
 555    Do you want to get an email for every card played or only if it your move?
 556    every card<input type="radio" name="update" value="card" />
 557    only on my turn<input type="radio" name="update" value="turn" /> <br />
 558 <?php
 559              echo "<input type=\"hidden\" name=\"b\" value=\"$a\" />\n";
 560              echo "\n";
 561              echo "<input type=\"submit\" value=\"count me in\" />\n";
 562              echo " </form>\n";
 563            }
 564        }
 565 /*   ***
 566  *   *  *
 567  *   ***
 568  *   *  *
 569  *   ***
 570  * yes? email him his hand, ask for solo, poverty, email every move or every card?
 571  */
 572      if(isset($_REQUEST["b"]))
 573        {
 574          $b = $_REQUEST["b"];
 575
 576          if( ereg("s",$player[$b]["option"])  && $game["init"]<4)
 577            { /* the player already filled out everything */
 578              echo "just wait for the game to start";
 579            }
 580          else if( (!isset($_REQUEST["in"])|| !isset($_REQUEST["update"])) && !ereg("i",$player[$b]["option"]))
 581            { /* the player didn't fill out the form at "a" correctly */
 582              echo "go back to ";
 583              echo "<a href=\"index.php?a=$b\"> here and fill out the form </a> <br />\n";
 584            }
 585          else
 586            { /* show the hand and check if the player is sick*/
 587              if($_REQUEST["in"]=="no")
 588                { /* player doesn't want to play, cancel the game */
 589                  for($i=0;$i<4;$i++)
 590                    {
 591                      $message = "Hello ".$player[$hash[$i]]["name"].",\n\n".
 592                        "the game has been canceled due to the request of one of the players.\n";
 593                      mymail($player[$hash[$i]]["email"],"[DoKo-Debug] the game has been canceled",$message);
 594                    }
 595                  /* canceling the game is as easy as removing the contents of the status file*/
 596                  $output = fopen("status.txt","w");
 597                  if($output)
 598                    fclose($output);
 599                  else
 600                    echo "problem opening file";
 601                }
 602              else
 603                {
 604                  /* player wants to play, save information from "a"*/
 605                  if($_REQUEST["update"]=="card")
 606                    $player[$b]["option"] .= "c";
 607                  else
 608                    $player[$b]["option"] .= "t";
 609
 610                  $player[$b]["option"] .= "i"; /* player finished stage "a" */
 611
 612                  save_status();
 613
 614                  $allcards = $player[$b]["cards"];
 615                  $mycards  = explode(";",$allcards);
 616
 617                  sort($mycards);
 618                  echo "<p class=\"mycards\">your cards are: <br />\n";
 619                  foreach($mycards as $card)
 620                    display_card($card);
 621                  echo "</p>\n";
 622  ?>
 623  <p> 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 </p>
 624
 625  <form action="index.php" method="post">
 626
 627    do you want to play solo?
 628    <select name="solo" size="1">
 629      <option>No</option>
 630      <option>No trump</option>
 631      <option>Normal solo</option>
 632      <option>Queen solo</option>
 633      <option>Jack solo</option>
 634      <option>Club solo</option>
 635      <option>Spade solo</option>
 636      <option>Heart solo</option>
 637    </select>
 638    <br />
 639
 640 <?php
 641
 642                  echo "wedding?";
 643                  if(check_wedding($player[$b]["cards"]))
 644                    {
 645                      echo " yes<input type=\"radio\" name=\"wedding\" value=\"yes\" />";
 646                      echo " no <input type=\"radio\" name=\"wedding\" value=\"no\" /> <br />\n";
 647                    }
 648                  else
 649                    {
 650                      echo " no <input type=\"hidden\" name=\"wedding\" value=\"no\" /> <br />\n";
 651                    };
 652
 653                  echo "do you have poverty?";
 654                  if(count_trump($player[$b]["cards"])<4)
 655                    {
 656                      echo " yes<input type=\"radio\" name=\"poverty\" value=\"yes\" />";
 657                      echo " no <input type=\"radio\" name=\"poverty\" value=\"no\" /> <br />\n";
 658                    }
 659                  else
 660                    {
 661                      echo " no <input type=\"hidden\" name=\"poverty\" value=\"no\" /> <br />\n";
 662                    };
 663
 664                  echo "do you have too many nines?";
 665                  if(count_nines($player[$b]["cards"])>4)
 666                    {
 667                      echo " yes<input type=\"radio\" name=\"nines\" value=\"yes\" />";
 668                      echo " no <input type=\"radio\" name=\"nines\" value=\"no\" /> <br />\n";
 669                    }
 670                  else
 671                    {
 672                      echo " no <input type=\"hidden\" name=\"nines\" value=\"no\" /> <br />\n";
 673                    };
 674
 675                  echo "<input type=\"hidden\" name=\"c\" value=\"$b\" />\n";
 676                  echo "<input type=\"submit\" value=\"count me in\" />\n";
 677
 678                  echo "</form>\n";
 679                }
 680            }
 681        }
 682
 683      if(isset($_REQUEST["c"]))
 684        {
 685          $c = $_REQUEST["c"];
 686
 687
 688          if( ereg("s",$player[$c]["option"]) && $game["init"]<4 )
 689            { /* the player already filled out everything */
 690              echo "<p>just wait for the game to start</p>\n";
 691            }
 692          else if(!isset($_REQUEST["solo"])    ||
 693                  !isset($_REQUEST["wedding"]) ||
 694                  !isset($_REQUEST["poverty"]) ||
 695                  !isset($_REQUEST["nines"]) )
 696            {/* player still needs to fill out the form */
 697              echo "go back to ";
 698              echo "<a href=\"index.php?b=$c\"> here and fill out the form </a> <br />\n";
 699            }
 700          else if($game["init"]<4)
 701            { /* save information */
 702              if( $_REQUEST["solo"]!="No")
 703                {
 704                  switch($_REQUEST["solo"])
 705                    {
 706                    case "No trump":
 707                      $player[$c]["option"].="O";
 708                      break;
 709                    case "Normal solo":
 710                      $player[$c]["option"].="S";
 711                      break;
 712                    case "Queen solo":
 713                      $player[$c]["option"].="Q";
 714                      break;
 715                    case "Jack solo":
 716                      $player[$c]["option"].="J";
 717                      break;
 718                    case "Club solo":
 719                      $player[$c]["option"].="C";
 720                      break;
 721                    case "Spade solo":
 722                      $player[$c]["option"].="A";
 723                      break;
 724                    case "Hear solo":
 725                      $player[$c]["option"].="H";
 726                      break;
 727                    }
 728                }
 729              else if($_REQUEST["wedding"] == "yes")
 730                {
 731                  echo "wedding was chosen<br />\n";
 732                  $player[$c]["option"].="W";
 733                }
 734              else if($_REQUEST["poverty"] == "yes")
 735                {
 736                  echo "poverty was chosen<br />\n";
 737                  $player[$c]["option"].="P";
 738                }
 739              else if($_REQUEST["nines"] == "yes")
 740                {
 741                  echo "nines was chosen<br />\n";
 742                  $player[$c]["option"].="N";
 743                }
 744
 745              /* player finished setup */
 746              $player[$c]["option"].="s";
 747
 748              save_status();
 749              /* reread status file, to get the correct startplayer, etc */
 750              if(file_exists("status.txt"))
 751                $lines = file("status.txt");
 752              else
 753                die("no file");
 754              parse_status();
 755
 756              if($game["init"]==4 && $player[$c]["number"]==$game["startplayer"])
 757                {
 758                  echo "<p> The game can start now, it's your turn, please use this <a href=\"".
 759                    $host."?me=".$hash[$c]."\">link</a> to play a card.</p>\n";
 760                }
 761              else if($game["init"]==4)
 762                {
 763                  $message = "The game can start now, it's your turn, please use this link to play a card:\n".
 764                    $host."?me=".$hash[$game["startplayer"]]."\n";
 765                  mymail($player[$hash[$game["startplayer"]]]["email"],"[DoKo-debug] let's go",$message);
 766                  echo "<p> The game has started. An email has been sent out to the first player.</p>\n";
 767                }
 768              else
 769                {
 770                  echo "<p>You're in. Once everyone has filled out the form, ".
 771                    "the game will start and you'll get an eamil on your turn.</p>\n";
 772                }
 773            }
 774        }
 775      /* END SETUP */
 776
 777      /* the game */
 778      if($game["init"]==4)
 779        {
 780          /* check for sickness, only would need to do this on the first trick really...*/
 781          /***** someone has 5 nines and no one is playing solo => cancel game */
 782          if($game["nines"]>=0 && $game["solo-who"]<0)
 783            {
 784              $message = $player[$hash[$game["poverty"]]]["nines"]." has more than 4 nines. Game aborted!\n";
 785              for($i=0;$i<4;$i++)
 786                mymail($player[$hash[$i]]["email"],"[DoKo-debug] the game has been canceled",$message);
 787
 788              $output = fopen("status.txt","w");
 789              if($output)
 790                fclose($output);
 791              else
 792                echo "problem opening file";
 793            };
 794
 795          /* who is requesting this*/
 796          if(!isset($_REQUEST["me"]))
 797            {
 798              if(!isset($_REQUEST["recovery"]))
 799                {
 800                  echo "A game is in progress and kibitzing is not allowed. Sorry!.<br />\n";
 801                  echo "In case you are playing, but lost your email or can't access the game anymore, please input your email here:<br />\n";
 802                  ?>
 803  <form action="index.php" method="post">
 804    recorvery: <input name="recovery"  type="text" size="20" maxlength="30" /> <br />
 805    <input type="submit" value="get me back into the game" />
 806  </form>
 807 <?php
 808                }
 809              else
 810                {
 811                  $recovery = $_REQUEST["recovery"];
 812                  $ok = -1;
 813                  for($i=0;$i<4;$i++)
 814                    if(trim($recovery)==trim($player[$hash[$i]]["email"]))
 815                      $ok = $i;
 816                  if($ok>=0)
 817                    {
 818                      $message = "Please try this link: ".$host."?me=".$hash[$ok]."\n".
 819                        "\n if this doesn't work, contact the admin.\n";
 820                      mymail($recovery,"[DoKo-Debug] recovery ",$message);
 821                      echo "<p> An email with the game information has been sent.</p>\n";
 822                    }
 823                  else
 824                    {
 825                      echo "<p> can't find this email address, sorry.</p>\n";
 826                    };
 827                } /* end recovery */
 828            }
 829          else
 830            { /* $me is set */
 831              $me = $_REQUEST["me"];
 832
 833              /* output if we are playing a solo or a wedding */
 834              if($game["solo-who"]>=0)
 835                echo $player[$hash[$game["solo-who"]]]["name"]." is playing a ".$game["solo-what"]." solo!<br />\n";
 836              else if($game["wedding"]>=0)
 837                echo $player[$hash[$game["wedding"]]]["name"]." is playing a wedding!<br />\n";
 838
 839              /* show history */
 840              foreach($history as $play)
 841                {
 842                  $trick = explode(":",$play);
 843
 844                  $last=-2;
 845                  /* found old trick, display it */
 846                  if(sizeof($trick)==5)
 847                    echo "<div class=\"oldtrick background".$play[0]."\"><div class=\"table\">\n";
 848                  else
 849                    echo "<div class=\"trick back".$play[0]."\"><div class=\"table\">\n";
 850                  for($i=0;$i<sizeof($trick)-1;$i++)
 851                    {
 852                      $card = $trick[$i];
 853                      if(ereg("->",$card))
 854                        {
 855                          $tmp = explode("->",$card);
 856
 857                          echo "<div class=\"card".$tmp[0]."\">";
 858
 859                          if(strlen($tmp[2])>0)
 860                            echo "<span class=\"comment\">";
 861                          else
 862                            echo " <span>";
 863                          echo $player[$hash[$tmp[0]]]["name"];
 864                          /* check for comment */
 865                          if(strlen($tmp[2])>0)
 866                            echo " <span>".$tmp[2]."</span>";
 867                          echo " </span>\n  ";
 868
 869                          display_card($tmp[1]);
 870
 871                          $last = $tmp[0];
 872                          echo "</div>\n";
 873                        }
 874                    }
 875                  echo "</div></div>\n";
 876                }
 877
 878              /* figure out who needs to play next */
 879              $next = $last + 1;
 880              if ($next>=4)
 881                $next -= 4 ;
 882              if($last<0)
 883                $next = $history[sizeof($history)-1][0];
 884
 885              /* are we trying to play a card? */
 886              if(isset($_REQUEST["card"]))
 887                {
 888                  if($hash[$next]==$me)
 889                    {
 890                      $card    = $_REQUEST["card"];
 891                      $mycards = explode(";",$player[$me]["cards"]);
 892
 893                      /* do we have that card */
 894                      if(in_array($card,$mycards))
 895                        {
 896                          /* delete card from array */
 897                          $tmp = array();
 898                          foreach($mycards as $m)
 899                            if($m != $card)
 900                              $tmp[]=$m;
 901
 902                          $tmp2="";
 903                          for($i=0;$i<sizeof($tmp)-1;$i++)
 904                            {
 905                              $tmp2.=$tmp[$i].";";
 906                            }
 907                          $tmp2.=$tmp[$i];
 908                          $player[$me]["cards"]=$tmp2;
 909
 910                          /* add card to history, special case if this is the first card */
 911                          if($last<0)
 912                            {
 913                              $history[sizeof($history)-1]="".$player[$me]["number"]."->".$card.":\n";
 914                            }
 915                          else
 916                            {
 917                              $tmp = explode(":",$history[sizeof($history)-1]);
 918                              $tmp[sizeof($tmp)-1] = "".$player[$me]["number"]."->".$card.":";
 919                              $history[sizeof($history)-1]=join(":",$tmp);
 920                            }
 921                          save_status();
 922
 923                          echo "<div class=\"card\">";
 924                          echo " you played  <br />";
 925                          display_card($card);
 926                          echo "</div>\n";
 927
 928                          ?>
 929 <br clear="both" />
 930 <form action="index.php" method="post">
 931    A short comment:<input name="comment" type="text" size="30" maxlength="50" />
 932    <input type="hidden" name="me" value="<?php echo $me; ?>" />
 933    <input type="submit" value="submit comment" />
 934 </form>
 935 <?php
 936                          /* send out email to players who want/need to get informed */
 937                          /* check if we are in a trick, if trick is done, this needs to be handelt in the
 938                           * who-won-the-trick section further down */
 939                          $tmp = explode(":",$history[sizeof($history)-1]);
 940                          if(sizeof($tmp)<5)
 941                            for($i=0;$i<4;$i++)
 942                              {
 943                                $mynext = $next+1; if($mynext>3)$mynext-=4;
 944
 945                                if((ereg("c",$player[$hash[$i]]["option"]) || $i==$mynext) && $hash[$i]!=$me)
 946                                  {
 947                                    $message = " Hello ".$player[$hash[$i]]["name"].",\n\n";
 948
 949                                    if($i==$mynext)
 950                                      {
 951                                        $message .= "it's your turn  now.\n".
 952                                          "Use this link to play a card: ".$host."?me=".$hash[$i]."\n\n" ;
 953                                      }
 954                                    $message .= $player[$me]["name"]." has played the following card ".
 955                                      card_to_name($card)."\n";
 956
 957                                    if($game["solo-who"]>=0)
 958                                      $message .= $player[$hash[$game["solo-who"]]]["name"]." is playing a ".
 959                                        $game["solo-what"]." solo!\n";
 960
 961                                    mymail($player[$hash[$i]]["email"],"[DoKo-debug] a card has been played",$message);
 962
 963                                    if($debug)
 964                                      echo "<a href=\"index.php?me=".$hash[$mynext]."\"> next player </a> <br />\n";
 965                                  }
 966                              }
 967                        }
 968                      else
 969                        echo "seems like you don't have that card<br />\n";
 970
 971                    }
 972
 973                } /* end if card is set */
 974              else if(isset($_REQUEST["comment"]))
 975                { /*save comment */
 976                  $comment = $_REQUEST["comment"];
 977                  $tmp  = explode(":",$history[sizeof($history)-1]); /*last played trick */
 978                  $tmp2 = explode("->",$tmp[sizeof($tmp)-2]);        /*last played card */
 979
 980                  $comment = str_replace(":","",$comment);           /*can't have ":" in comments */
 981
 982                  if(sizeof($tmp2)<=2)
 983                    $tmp[sizeof($tmp)-2] .= "->".$comment;
 984                  $history[sizeof($history)-1]=join(":",$tmp);
 985
 986                  save_status();
 987                }
 988              else if(isset($_REQUEST["win"]) && strlen($history[sizeof($history)-1])>3)
 989                { /* count points, email winner */
 990                  $win = $_REQUEST["win"];
 991
 992                  if(strlen($player[$hash[0]]["cards"]))
 993                     $history[] = $win.":\n";
 994
 995                  /* email the player who needs to move next*/
 996                  for($i=0;$i<4;$i++)
 997                    {
 998                      if((ereg("c",$player[$hash[$i]]["option"]) || $i==$win) )
 999                        {
1000                          $message = " Hello ".$player[$hash[$i]]["name"].",\n\n";
1001
1002                          if($i == $win)
1003                            {
1004                              $message .= "You won the last trick,it's your turn  now.\n".
1005                                "Use this link to play a card: ".$host."?me=".$hash[$i]."\n\n" ;
1006                            }
1007                          else
1008                            $message .= $player[$hash[$win]]["name"]." has won the last trick\n".
1009                              "Use this link to look at the game: ".$host."?me=".$hash[$i]."\n\n" ;
1010
1011                          if($game["solo-who"]>=0)
1012                            $message.= $player[$hash[$game["solo-who"]]]["name"]." is playing a ".
1013                              $game["solo-what"]." solo!\n";
1014
1015                          mymail($player[$hash[$i]]["email"],"[DoKo-debug] a card has been played",$message);
1016
1017                          if($debug)
1018                            echo "<a href=\"index.php?me=".$hash[$win]."\"> next player </a> <br />\n";
1019                        }
1020                    }
1021
1022                  /* count points of the last trick */
1023                  $points = 0;
1024
1025                  $tmp = explode(":",$history[sizeof($history)-2]);
1026                  for($i=0;$i<4;$i++)
1027                    {
1028                      $tmp2 = explode("->",$tmp[$i]);
1029                      $c = $tmp2[1];
1030                      $points += card_value($c);
1031                    }
1032                  $player[$hash[$win]]["points"] += $points;
1033                  echo "<br />\n ".$player[$hash[$win]]["name"]." won: $points Points <br />\n";
1034
1035                  save_status();
1036                }; /* end if win is set */
1037              echo "<br />\n";
1038
1039              /* check last history entry: end of a trick? ask who won it, unless it was the last trick */
1040              $tmp = explode(":",$history[sizeof($history)-1]);
1041              if(sizeof($tmp)==5 && strlen($player[$hash[0]]["cards"]))
1042                {
1043                  ?>
1044 <form action="index.php" method="post">
1045 who won?
1046 <?php
1047    for($i=0;$i<4;$i++)
1048      echo $player[$hash[$i]]["name"]." <input type=\"radio\" name=\"win\" value=\"$i\" />";
1049    echo "<input type=\"hidden\" name=\"me\" value=\"$me\" />";
1050 ?>
1051 <input type="submit" value="submit" />
1052
1053 </form>
1054 <?php
1055                }
1056              else if(sizeof($tmp)<5 && 1<sizeof($tmp) && !isset($_REQUEST["card"]))
1057                {
1058                  if(sizeof($tmp)==2 && strlen($tmp[0])==1)
1059                    {
1060                      $next=$tmp[0];
1061
1062                      if($debug)
1063                        echo "DEBUG: the next move is for <a href=\"index.php?me=".$hash[$next]."\">the next player</a><br />\n";
1064                      if(strlen(trim($player[$me]["cards"]))==0)
1065                        {
1066                          echo "<br /> game over, count points <br />\n";
1067                          for($i=0;$i<4;$i++)
1068                            {
1069                              echo $player[$hash[$i]]["name"]." got ".$player[$hash[$i]]["points"]."<br />\n";
1070                            }
1071                        }
1072                    }
1073                  echo "<br />\n";
1074                } /* end check for winner */
1075
1076              /* do we still have cards? display them */
1077              if(strlen(trim($player[$me]["cards"]))>0 )
1078                {
1079                  $allcards = trim($player[$me]["cards"]);
1080                  $mycards  = explode(";",$allcards);
1081
1082                  sort($mycards);
1083
1084                  echo "<p class=\"mycards\">\n";
1085                  /* is it our turn? */
1086                  if($hash[$next]==$me && !isset($_REQUEST["card"]) && !isset($_REQUEST["win"]))
1087                    {
1088                      echo "ITS YOUR TURN!  <br />\n";
1089                      echo "Your cards are: <br />\n";
1090                      foreach($mycards as $card)
1091                        display_link_card($card,$me);
1092                    }
1093                  else
1094                    { /* not our turn, just show the hand */
1095                      echo "Your cards are: <br />\n";
1096                      foreach($mycards as $card)
1097                        display_card($card);
1098                    }
1099                  echo "</p>\n";
1100                }
1101            }
1102        }
1103
1104  }
1105
1106 ?>
1107 </body>
1108 </html>
1109
1110 <?php
1111 /*
1112  *Local Variables:
1113  *mode: php
1114  *mode: hs-minor
1115  *End:
1116  */
1117 ?>