2 /* Copyright 2006, 2007, 2008, 2009, 2010, 2011, 2012 Arun Persaud <arun@nubati.net>
4 * This file is part of e-DoKo.
6 * e-DoKo is free software: you can redistribute it and/or modify
7 * it under the terms of the GNU General Public License as published by
8 * the Free Software Foundation, either version 3 of the License, or
9 * (at your option) any later version.
11 * e-DoKo is distributed in the hope that it will be useful,
12 * but WITHOUT ANY WARRANTY; without even the implied warranty of
13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14 * GNU General Public License for more details.
16 * You should have received a copy of the GNU General Public License
17 * along with e-DoKo. If not, see <http://www.gnu.org/licenses/>.
21 /* make sure that we are not called from outside the scripts,
22 * use a variable defined in config.php to check this
27 function config_check()
29 global $EmailName,$EMAIL_REPLY,$ADMIN_NAME,$ADMIN_EMAIL,$DB_work;
31 /* check if some variables are set in the config file, else set defaults */
32 if(!isset($EmailName))
34 if(isset($EMAIL_REPLY))
36 ini_set("sendmail_from",$EMAIL_REPLY);
38 if(!isset($ADMIN_NAME))
41 echo "<h1>Setup not completed</h1>";
42 echo "You need to set \$ADMIN_NAME in config.php.";
46 if(!isset($ADMIN_EMAIL))
49 echo "<h1>Setup not completed</h1>";
50 echo "You need to set \$ADMIN_EMAIL in config.php. ".
51 "If something goes wrong an email will be send to this address.";
58 echo "<h1>Setup not completed</h1>";
59 echo "You need to set \$DB_work in config.php. ".
60 "If this is set to 1, the game will be suspended and one can work safely on the database.".
61 "The default should be 0 for the game to work.";
68 echo "Working on the database...please check back later.";
76 /* define possible status for email subsjects */
77 define("GAME_CANCELED", 0);
78 define("GAME_CANCELED_POVERTY", 1);
79 define("GAME_CANCELED_TIMEOUT", 2);
80 define("GAME_YOUR_TURN", 3);
81 define("GAME_READY", 4);
82 define("GAME_POVERTY", 5);
83 define("GAME_DPOVERTY", 6);
84 define("GAME_OVER", 7);
85 define("GAME_RECOVERY", 8);
86 define("GAME_REMINDER", 9);
87 define("GAME_NEW", 10);
89 /* define possible status for showing cards */
91 define("CARDS_EMPTY", 0); /* show player's hand*/
92 define("CARDS_SHOW", 1); /* show player's hand*/
93 define("CARDS_MYTURN", 2); /* show radiobuttons for cards that can be played*/
94 define("CARDS_EXCHANGE", 3); /* do we need to return cards to our partner in poverty?*/
95 define("CARDS_GAMEOVER_ME", 4); /* show all cards from everyone*/
96 define("CARDS_GAMEOVER", 5); /* show all cards from everyone (looking at someone else's game)*/
98 /* cards_status: SHOW show our hand
99 * MYTURN show radiobutton for cards that can be played
100 * EXCHANGE do we need to return cards to our partner in poverty?
101 * GAMEOVER show all cards from everyone
104 function mymail($uid,$gameid=0,$type,$message)
106 global $EmailName,$WIKI;
108 /* do we send the email right away or save it in the database? */
111 /* add standard header and footer */
112 $subject = "$EmailName ";
114 $game = DB_format_gameid($gameid);
121 $subject.=sprintf(_("Game %s canceled"),$game);
123 case GAME_CANCELED_POVERTY:
124 $subject.=sprintf(_("Game %s canceled (poverty not resolved)"),$game);
126 case GAME_CANCELED_TIMEOUT:
127 $subject.=sprintf(_("Game %s canceled (timed out)"),$game);
130 $subject.=sprintf(_("A card has been played in game %s"),$game);
133 $subject.=sprintf(_("Ready, set, go... (game %s)"),$game);
136 $subject.=sprintf(_("Poverty (game %s)"),$game);
139 $subject.=sprintf(_("Double poverty (game %s)"),$game);
142 $subject.=sprintf(_("Game over (game %s)"),$game);
145 $subject.=_("Recovery");
148 $subject.=sprintf(_("Reminder: game %s it's your turn"),$game);
151 $subject.=sprintf(_("You are invited to a game of DoKo (game %s)"),$game);
154 $subject.=sprintf(_("Problem with email, contact admin (errorcode %d)"),$gameid);
157 /* standard goodbye */
158 $footer = "\nHave a nice day\n".
159 " your E-Doko service department\n\n".
161 "You can change your mail delivery mode in the preference menu.\n".
162 'web: http://doko.nubati.net '.
163 "help, bugs, etc.: $WIKI";
167 /* send email to more than one person */
169 $header = "Hello all\n\n";
171 foreach($uid as $user)
173 $all[] = DB_get_email('userid',$user);
175 $To = implode(",",$all);
179 /* standard greeting */
180 $name = DB_get_name('userid',$uid);
181 $header = "Hello $name\n\n";
183 $To = DB_get_email('userid',$uid);
185 /* check if user wants email right away or if we should save it in
186 * the database for later delivery
189 $PREF = DB_get_PREF($uid);
190 if( $PREF['digest'] != 'digest-off' )
195 sendmail($To,$subject,$header.$message.$footer);
198 /* store email in database */
199 DB_digest_insert_email($To,$message,$type,$gameid);
203 function sendmail($To,$Subject,$message)
205 /* this function sends the mail or outputs to the screen in case of debugging */
206 global $debug,$EMAIL_REPLY;
210 if(isset($EMAIL_REPLY))
211 $header .= "From: e-DoKo daemon <$EMAIL_REPLY>\r\n";
215 /* display email on screen,
218 $message = str_replace("\n","<br />\n",$message);
219 $message = preg_replace("#(\w+://[^<>\s]+[\w/]*)#",
220 "<a href=\"$1\">$1</a>", $message);
222 echo "<br />To: $To<br />";
224 echo $header."<br />";
225 echo "Subject: $Subject <br />$message<br />\n";
229 mail($To,$Subject,$message,$header);
231 mail($To,$Subject,$message);
237 /* returns 1 if all names passed as args are defined by a GET or POST statement,
242 $args = func_get_args();
244 foreach($args as $arg)
246 $ok = $ok * isset($_REQUEST[$arg]);
247 /*echo "$arg: ok = $ok <br />";
253 function myerror($message)
255 echo "<span class=\"error\">".htmlspecialchars($message)."</span>\n";
256 sendmail($ADMIN_EMAIL,$EmailName." Error in Code",$message);
260 function pos_array($c,$arr)
277 function is_trump($c)
281 if(in_array($c,$CARDS["trump"]))
287 function is_same_suite($c1,$c2)
291 if(in_array($c1,$CARDS["trump"] ) && in_array($c2,$CARDS["trump"] ) ) return 1;
292 if(in_array($c1,$CARDS["clubs"] ) && in_array($c2,$CARDS["clubs"] ) ) return 1;
293 if(in_array($c1,$CARDS["hearts"] ) && in_array($c2,$CARDS["hearts"] ) ) return 1;
294 if(in_array($c1,$CARDS["spades"] ) && in_array($c2,$CARDS["spades"] ) ) return 1;
295 if(in_array($c1,$CARDS["diamonds"]) && in_array($c2,$CARDS["diamonds"]) ) return 1;
300 function compare_cards($a,$b,$game)
302 /* if "a" is higher than "b" return 1, else 0, "a" being the card first played */
308 /* first map all cards to the odd number,
309 * this insure that the first card wins the trick
310 * if they are the same card
312 if( $a/2 - (int)($a/2) != 0.5)
314 if( $b/2 - (int)($b/2) != 0.5)
317 /* check for schweinchen and ten of hearts*/
323 if($RULES['schweinchen']=='both' && $GAME['schweinchen-who'])
325 if($a == 19 || $a == 20 )
327 if($b == 19 || $b == 20 )
330 else if($RULES['schweinchen']=='second' && $GAME['schweinchen-second'])
332 if($a == 19 || $a == 20 )
334 if($b == 19 || $b == 20 )
337 else if($RULES['schweinchen']=='secondaftercall' && $GAME['schweinchen-who'] && $GAME['schweinchen-second'] )
339 /* check if a call was made either by the player or his partner. If so activate Schweinchen rule. */
340 if(DB_get_call_by_hash($GAME['schweinchen-who']) || DB_get_partner_call_by_hash($GAME['schweinchen-who']) )
342 if($a == 19 || $a == 20 )
344 if($b == 19 || $b == 20 )
347 /* if not, do nothing and the foxes are just handeled as normal trump */
353 /* check for ten of hearts rule */
354 if($RULES["dullen"]=="secondwins")
355 if($a==1 && $b==1) /* both 10 of hearts */
356 return 0; /* second one wins.*/
360 /* no special cases here */
364 if(is_trump($a) && is_trump($b) && $a<=$b)
366 else if(is_trump($a) && is_trump($b) )
369 { /*$a is not a trump */
373 { /* both no trump */
376 $posA = pos_array($a,$CARDS["clubs"]);
377 $posB = pos_array($b,$CARDS["clubs"]);
385 $posA = pos_array($a,$CARDS["spades"]);
386 $posB = pos_array($b,$CARDS["spades"]);
394 $posA = pos_array($a,$CARDS["hearts"]);
395 $posB = pos_array($b,$CARDS["hearts"]);
403 $posA = pos_array($a,$CARDS["diamonds"]);
404 $posB = pos_array($b,$CARDS["diamonds"]);
411 /* not the same suit and no trump: a wins */
417 function get_winner($p,$mode)
419 /* get all 4 cards played in a trick, in the order they are played */
422 $c1pos = $tmp["pos"];
426 $c2pos = $tmp["pos"];
430 $c3pos = $tmp["pos"];
434 $c4pos = $tmp["pos"];
436 /* first card is better than all the rest */
437 if( compare_cards($c1,$c2,$mode) && compare_cards($c1,$c3,$mode) && compare_cards($c1,$c4,$mode) )
440 /* second card is better than first and better than the rest */
441 if( !compare_cards($c1,$c2,$mode) && compare_cards($c2,$c3,$mode) && compare_cards($c2,$c4,$mode) )
444 /* third card is better than first card and better than last */
445 if( !compare_cards($c1,$c3,$mode) && compare_cards($c3,$c4,$mode) )
446 /* if second card is better than first, third card needs to be even better */
447 if( !compare_cards($c1,$c2,$mode) && !compare_cards($c2,$c3,$mode) )
449 /* second is worse than first, e.g. not following suite */
450 else if (compare_cards($c1,$c2,$mode) )
453 /* non of the above */
457 function count_nines($cards)
461 foreach($cards as $c)
463 if($c == "25" || $c == "26") $nines++;
464 else if($c == "33" || $c == "34") $nines++;
465 else if($c == "41" || $c == "42") $nines++;
466 else if($c == "47" || $c == "48") $nines++;
472 function check_wedding($cards)
475 if( in_array("3",$cards) && in_array("4",$cards) )
481 function count_trump($cards,$status='pregame')
487 /* count each trump, including the foxes, since this is used to determine poverty status */
488 foreach($cards as $c)
492 /* In case we really want to know the amount of trump, we can use the status variable.
493 * This is needed for example to figure out what icon to display on the table in case of
494 * trump given back in poverty */
495 if($status=='all') return $trump;
497 /* normally foxes don't count as trump, so we substract them here
498 * in case someone has schweinchen, one or two of them should count as trump
499 * though, so we need to add one trump for those cases */
502 if( in_array("19",$cards))
504 if( in_array("20",$cards) )
507 /* handle case where player has schweinchen */
508 if( in_array("19",$cards) && in_array("20",$cards) )
509 switch($RULES["schweinchen"])
512 /* add two, in case the player has both foxes (schweinchen) */
517 case "secondaftercall":
518 /* add one, in case the player has both foxes (schweinchen) */
528 function check_low_trump($cards)
532 if($RULES['lowtrump']=='none')
535 /* check if we have low trump */
538 foreach($cards as $card)
540 /* card a trump, but not a diamond? */
545 /* handle case where player has schweinchen */
546 if( in_array("19",$cards) && in_array("20",$cards) )
547 switch($RULES["schweinchen"])
551 case "secondaftercall":
561 function create_array_of_random_numbers($useridA,$useridB,$useridC,$useridD)
569 /* fix the hands; makes debugging easier; the following hands have lots of sicknesses,
570 * to make testing easier
572 $r[ 0]=1; $r[12]=47; $r[24]=13; $r[36]=37;
573 $r[ 1]=2; $r[13]=23; $r[25]=14; $r[37]=38;
574 $r[ 2]=3; $r[14]=27; $r[26]=15; $r[38]=39;
575 $r[ 3]=4; $r[15]=16; $r[27]=28; $r[39]=40;
576 $r[ 4]=5; $r[16]=17; $r[28]=29; $r[40]=21;
577 $r[ 5]=18; $r[17]=6; $r[29]=30; $r[41]=42;
578 $r[ 6]=41; $r[18]=7; $r[30]=31; $r[42]=43;
579 $r[ 7]=22; $r[19]=8; $r[31]=32; $r[43]=20;
580 $r[ 8]=45; $r[20]=9; $r[32]=33; $r[44]=19;
581 $r[ 9]=46; $r[21]=10; $r[33]=44; $r[45]=24;
582 $r[10]=35; $r[22]=11; $r[34]=48; $r[46]=25;
583 $r[11]=36; $r[23]=12; $r[35]=34; $r[47]=26;
587 /* check if we can find a game were non of the player was involved and return
590 $userstr = "'".implode("','",array($useridA,$useridB,$useridC,$useridD))."'";
591 $randomnumbers = DB_get_unused_randomnumbers($userstr);
592 $randomnumbers = explode(":",$randomnumbers);
594 if(sizeof($randomnumbers)==48)
595 return $randomnumbers;
597 /* need to create new numbers */
601 /* shuffle using a better random generator than the standard one */
602 for ($i = 0; $i <48; $i++)
604 $j = @mt_rand(0, $i);
614 function display_cards($me,$myturn)
619 function have_suit($cards,$c)
624 if(in_array($c,$CARDS["trump"]))
625 $suite = $CARDS["trump"];
626 else if(in_array($c,$CARDS["clubs"]))
627 $suite = $CARDS["clubs"];
628 else if(in_array($c,$CARDS["spades"]))
629 $suite = $CARDS["spades"];
630 else if(in_array($c,$CARDS["hearts"]))
631 $suite = $CARDS["hearts"];
632 else if(in_array($c,$CARDS["diamonds"]))
633 $suite = $CARDS["diamonds"];
635 foreach($cards as $card)
637 if(in_array($card,$suite))
644 function same_type($card,$c)
649 /* figure out what kind of card c is */
650 if(in_array($c,$CARDS["trump"]))
651 $suite = $CARDS["trump"];
652 else if(in_array($c,$CARDS["clubs"]))
653 $suite = $CARDS["clubs"];
654 else if(in_array($c,$CARDS["spades"]))
655 $suite = $CARDS["spades"];
656 else if(in_array($c,$CARDS["hearts"]))
657 $suite = $CARDS["hearts"];
658 else if(in_array($c,$CARDS["diamonds"]))
659 $suite = $CARDS["diamonds"];
661 /* card is the same suid return 1 */
662 if(in_array($card,$suite))
668 function set_gametype($gametype)
682 $CARDS["trump"] = array('1','2','3','4','5','6','7','8','9','10','11','12','13','14','15','16',
683 '17','18','19','20','21','22','23','24','25','26');
684 $CARDS["diamonds"] = array();
685 $CARDS["clubs"] = array('27','28','29','30','31','32','33','34');
686 $CARDS["spades"] = array('35','36','37','38','39','40','41','42');
687 $CARDS["hearts"] = array('43','44','45','46','47','48');
688 $CARDS["foxes"] = array('19','20');
689 if($RULES["dullen"]=='none')
691 $CARDS["trump"] = array('3','4','5','6','7','8','9','10','11','12','13','14','15','16',
692 '17','18','19','20','21','22','23','24','25','26');
693 $CARDS["hearts"] = array('43','44','1','2','45','46','47','48');
695 /* do we need to reorder for Schweinchen? need to search for it because of special case for dullen above*/
696 if($RULES['schweinchen']=='both'&& $GAME['schweinchen-who'])
698 /* find the fox and put them at the top of the stack */
699 foreach(array('19','20') as $fox)
702 $trump = $CARDS['trump'];
703 $key = array_keys($trump, $fox);
707 $foxa[]=$trump[$key[0]];
708 unset($trump[$key[0]]);
709 $trump = array_merge($foxa,$trump);
710 $CARDS['trump'] = $trump;
713 else if( ($RULES['schweinchen']=='second' || $RULES['schweinchen']=='secondaftercall')
714 && $GAME['schweinchen-who'])
716 /* find the fox and put them at the top of the stack */
717 $trump = $CARDS['trump'];
718 $key = array_keys($trump, '19');
722 $foxa[]=$trump[$key[0]];
723 unset($trump[$key[0]]);
724 $trump = array_merge($foxa,$trump);
725 $CARDS['trump'] = $trump;
729 $CARDS["trump"] = array('3','4','5','6','7','8','9','10');
730 $CARDS["clubs"] = array('27','28','29','30','31','32','11','12','33','34');
731 $CARDS["spades"] = array('35','36','37','38','39','40','13','14','41','42');
732 $CARDS["hearts"] = array('43','44', '1', '2','45','46','15','16','47','48');
733 $CARDS["diamonds"] = array('19','20','21','22','23','24','17','18','25','26');
734 $CARDS["foxes"] = array();
737 $CARDS["trump"] = array('11','12','13','14','15','16','17','18');
738 $CARDS["clubs"] = array('27','28','29','30','31','32','3', '4','33','34');
739 $CARDS["spades"] = array('35','36','37','38','39','40','5', '6','41','42');
740 $CARDS["hearts"] = array('43','44', '1', '2','45','46','7', '8','47','48');
741 $CARDS["diamonds"] = array('19','20','21','22','23','24','9','10','25','26');
742 $CARDS["foxes"] = array();
745 $CARDS["trump"] = array();
746 $CARDS["clubs"] = array('27','28','29','30','31','32','3', '4','11','12','33','34');
747 $CARDS["spades"] = array('35','36','37','38','39','40','5', '6','13','14','41','42');
748 $CARDS["hearts"] = array('43','44', '1', '2','45','46','7', '8','15','16','47','48');
749 $CARDS["diamonds"] = array('19','20','21','22','23','24','9','10','17','18','25','26');
750 $CARDS["foxes"] = array();
753 $CARDS["trump"] = array('1','2','3','4','5','6','7','8','9','10','11','12','13','14','15','16',
754 '17','18','27','28','29','30','31','32','33','34');
755 $CARDS["clubs"] = array();
756 $CARDS["spades"] = array('35','36','37','38','39','40','41','42');
757 $CARDS["hearts"] = array('43','44','45','46','47','48');
758 $CARDS["diamonds"] = array('19','20','21','22','23','24','25','26');
759 $CARDS["foxes"] = array();
760 if($RULES["dullen"]=='none')
762 $CARDS["trump"] = array('3','4','5','6','7','8','9','10','11','12','13','14','15','16',
763 '17','18','27','28','29','30','31','32','33','34');
764 $CARDS["hearts"] = array('43','44','1','2','45','46','47','48');
768 $CARDS["trump"] = array('1','2','3','4','5','6','7','8','9','10','11','12','13','14','15','16',
769 '17','18','35','36','37','38','39','40','41','42');
770 $CARDS["clubs"] = array('27','28','29','30','31','32','33','34');
771 $CARDS["spades"] = array();
772 $CARDS["hearts"] = array('43','44','45','46','47','48');
773 $CARDS["diamonds"] = array('19','20','21','22','23','24','25','26');
774 $CARDS["foxes"] = array();
775 if($RULES["dullen"]=='none')
777 $CARDS["trump"] = array('3','4','5','6','7','8','9','10','11','12','13','14','15','16',
778 '17','18','35','36','37','38','39','40','41','42');
779 $CARDS["hearts"] = array('43','44','1','2','45','46','47','48');
783 $CARDS["trump"] = array('1','2','3','4','5','6','7','8','9','10','11','12','13','14','15','16',
784 '17','18','43','44','45','46','47','48');
785 $CARDS["clubs"] = array('27','28','29','30','31','32','33','34');
786 $CARDS["spades"] = array('35','36','37','38','39','40','41','42');
787 $CARDS["hearts"] = array();
788 $CARDS["diamonds"] = array('19','20','21','22','23','24','25','26');
789 $CARDS["foxes"] = array();
790 if($RULES["dullen"]=='none')
792 $CARDS["trump"] = array('3','4','5','6','7','8','9','10','11','12','13','14','15','16',
793 '17','18','43','44','1','2','45','46','47','48');
799 function mysort($cards,$gametype)
802 if(isset($PREF['sorting']))
803 if($PREF['sorting']=='high-low')
804 usort ( $cards, 'sort_comp_high_low' );
806 usort ( $cards, 'sort_comp_low_high' );
808 usort ( $cards, 'sort_comp_high_low' );
812 function sort_comp_high_low($a,$b)
817 $ALL = array_merge($CARDS['trump'],$CARDS['diamonds'],$CARDS['clubs'],
818 $CARDS['hearts'],$CARDS['spades']);
820 return pos_array($a,$ALL)-pos_array($b,$ALL);
823 function sort_comp_low_high($a,$b)
828 $ALL = array_merge($CARDS['trump'],$CARDS['diamonds'],$CARDS['clubs'],
829 $CARDS['hearts'],$CARDS['spades']);
831 return -pos_array($a,$ALL)+pos_array($b,$ALL);
834 function can_call($what,$hash)
836 /* figure out if a person can make a call:
837 $what in 0,30,60,90,120 = points of the call
838 $hash = the hash of the person who wants to make the call
841 0 can't make that call
843 2 can make the call, but this is the last chance to do so...
848 /* get some information
850 $gameid = DB_get_gameid_by_hash($hash);
851 $gametype = DB_get_gametype_by_gameid($gameid);
852 $oldcall = DB_get_call_by_hash($hash); /* did the person already made a call? */
853 $pcall = DB_get_partner_call_by_hash($hash); /* did the partner already made a call */
856 /* you're call must be better than the one you or your partner already made
858 if( ($pcall!=NULL && ($what >= $pcall))
859 || ($oldcall!=NULL && ($what >=$oldcall)) )
864 /* for some rules we need to know how many cards people have
866 $NRcards = count(DB_get_hand($hash));
871 $user = DB_get_hash_from_game_and_pos($gameid,$i);
872 $NRallcards += count(DB_get_hand($user));
875 /* in case of a wedding, everything will be delayed by an offset
878 if($gametype=="wedding")
880 $offset = DB_get_sickness_by_gameid($gameid);
881 if ($offset <0) /* not resolved */
885 /* now check if the call is allowed depending on the rule set
887 switch ($RULES["call"])
890 /* calls can be made before/while you play your card...
891 * first card = 120, second card = 90, etc.
893 if( 4-($what/30) == 12 - ($NRcards + $offset))
895 if( 4-($what/30) > 12 - ($NRcards + $offset))
899 /* you can make the first call anytime during the first trick
901 if( 27+4*($what/30) == $NRallcards + $offset*4)
903 if( 27+4*($what/30) < $NRallcards + $offset*4)
907 /* you can call 120 with 12 cards, 90 with 9 or more cards, 60 with 6 or more, etc.
908 * you can't skip a call though
911 /* figure out last call
913 if($oldcall!=NULL && $pcall!=NULL)
914 $mincall = ($oldcall>$pcall) ? $pcall : $oldcall;
915 else if($oldcall!=NULL)
917 else if ($pcall!=NULL)
923 if( 12 == ($NRcards + $offset))
927 else if( 12 < ($NRcards + $offset))
931 else if ( 9 == ($NRcards + $offset))
933 if( ($mincall>=0 && $mincall<=120 && $what<=90 ) )
936 else if ( 9 < ($NRcards + $offset))
938 if( ($mincall>=0 && $mincall<=120 && $what<=90 ) )
941 else if ( 6 == ($NRcards + $offset))
943 if( ($mincall>=0 && $mincall<=90 && $what<=60 ) )
946 else if ( 6 < ($NRcards + $offset))
948 if( ($mincall>=0 && $mincall<=90 && $what<=60 ) )
951 else if ( 3 == ($NRcards + $offset))
953 if( ($mincall>=0 && $mincall<=60 && $what<=30 ) )
956 else if ( 3 < ($NRcards + $offset))
958 if( ($mincall>=0 && $mincall<=60 && $what<=30 ) )
961 else if ( 0 == ($NRcards + $offset))
963 if( ($mincall>=0 && $mincall<=30 && $what==0 ) )
966 else if ( 0 < ($NRcards + $offset))
968 if( ($mincall>=0 && $mincall<=30 && $what==0 ) )
977 function display_table_begin ()
979 global $gameid, $GT, $debug,$INDEX,$defaulttimezone,$session;
980 global $RULES,$GAME,$gametype;
982 $result = DB_query("SELECT User.fullname as name,".
983 " Hand.position as position, ".
985 " Hand.party as party, ".
986 " Hand.sickness as sickness, ".
987 " Hand.point_call, ".
988 " User.last_login, ".
993 "LEFT JOIN User ON User.id=Hand.user_id ".
994 "WHERE Hand.game_id='".$gameid."' ".
995 "ORDER BY position ASC");
997 $row0 = DB_fetch_array($result);
998 $row1 = DB_fetch_array($result);
999 $row2 = DB_fetch_array($result);
1000 $row3 = DB_fetch_array($result);
1002 echo "<div class=\"table\">\n";
1003 display_single_user($row1);
1004 echo "\n<div class=\"middle\">\n";
1005 display_single_user($row0,1); /* mark starting player in case re/contra is not set yet */
1006 echo " <img class=\"table\" src=\"pics/table.png\" alt=\"table\" />\n";
1007 display_single_user($row2);
1011 function display_table_end ()
1013 global $gameid, $GT, $debug,$INDEX,$defaulttimezone,$session;
1014 global $RULES,$GAME,$gametype;
1016 $result = DB_query("SELECT User.fullname as name,".
1017 " Hand.position as position, ".
1019 " Hand.party as party, ".
1020 " Hand.sickness as sickness, ".
1021 " Hand.point_call, ".
1022 " User.last_login, ".
1027 "LEFT JOIN User ON User.id=Hand.user_id ".
1028 "WHERE Hand.game_id='".$gameid."' ".
1029 "ORDER BY position ASC");
1031 $row0 = DB_fetch_array($result);
1032 $row1 = DB_fetch_array($result);
1033 $row2 = DB_fetch_array($result);
1034 $row3 = DB_fetch_array($result);
1037 display_single_user($row3);
1043 function display_single_user($r,$start=0)
1045 /* start=1, mark starting player, default=0, so the player on the left is not marked */
1047 global $gameid, $GT, $debug,$INDEX,$defaulttimezone,$session;
1048 global $RULES,$GAME,$gametype;
1059 $wins = DB_get_number_of_tricks($gameid,$pos);
1060 date_default_timezone_set($defaulttimezone);
1061 $lastlogin = strtotime($r[6]);
1062 date_default_timezone_set($timezone);
1063 $timenow = strtotime(date("Y-m-d H:i:s"));
1064 $gravatar = "$name<br />\n <img class=\"gravatar\" title=\"$name\" src=\"http://www.gravatar.com/avatar/".
1065 md5(strtolower(trim($email)))."?d=identicon\" alt=\"$name's gravatar\" />";
1067 echo " <div class=\"table".($pos-1)."\">\n";
1069 /* mark starting player */
1070 if($start && ! ($party=="re" || $party=="contra"))
1071 echo ' <span class="start">'._('Starting Player')."</span> <br />\n";
1074 echo " <a href=\"".$INDEX."?action=game&me=".$hash."\">";
1075 if($vacation = check_vacation($user))
1077 $start = $vacation[0];
1078 $stop = substr($vacation[1],0,10);
1079 $comment = $vacation[2];
1081 $title = "begin: $start end: $stop $comment";
1082 echo " <span class=\"vacation\" title=\"$title\">$gravatar (on vacation until $stop)</span> \n";
1085 echo " $gravatar \n";
1089 /* add hints for poverty, wedding, solo, etc */
1090 if( $gametype != "solo")
1091 if( $RULES["schweinchen"]=="both" && $GAME["schweinchen-who"]==$hash )
1092 echo " Schweinchen. <br />";
1094 if($GT=="poverty" && $party=="re")
1095 if($sickness=="poverty" || ($RULES['lowtrump']=='poverty' && $sickness=='lowtrump'))
1097 $userhash = DB_get_hash_from_gameid_and_userid($gameid,$user);
1098 $cards = DB_get_all_hand($userhash);
1099 $trumpNR = count_trump($cards,'all');
1101 echo " <img src=\"pics/button/poverty_trump_button.png\" class=\"button\" ".
1102 "alt=\"poverty - trump back\" title=\"poverty - trump back\" />\n";
1104 echo " <img src=\"pics/button/poverty_notrump_button.png\" class=\"button\" ".
1105 "alt=\"poverty - no trump back\" title=\"poverty - no trump back\" />\n";
1108 echo " <img src=\"pics/button/poverty_partner_button.png\" class=\"button\" ".
1109 "alt=\"poverty partner\" title=\"poverty partner\" />\n";
1113 if($sickness=="poverty" || ($RULES['lowtrump']=='poverty' && $sickness=='lowtrump'))
1115 $userhash = DB_get_hash_from_gameid_and_userid($gameid,$user);
1116 $cards = DB_get_all_hand($userhash);
1117 $trumpNR = count_trump($cards,'all');
1119 echo " <img src=\"pics/button/poverty_trump_button.png\" class=\"button\" ".
1120 "alt=\"poverty < trump back\" title=\"poverty - trump back\" />\n";
1122 echo " <img src=\"pics/button/poverty_notrump_button.png\" class=\"button\" ".
1123 "alt=\"poverty <\" title=\"poverty - no trump back\" />\n";
1126 echo " <img src=\"pics/button/poverty_partner_button.png\" class=\"button\" ".
1127 "alt=\"poverty >\" title=\"poverty partner\" />\n";
1129 if($sickness=="poverty" || ($RULES['lowtrump']=='poverty' && $sickness=='lowtrump'))
1131 $userhash = DB_get_hash_from_gameid_and_userid($gameid,$user);
1132 $cards = DB_get_all_hand($userhash);
1133 $trumpNR = count_trump($cards,'all');
1135 echo " <img src=\"pics/button/poverty2_trump_button.png\" class=\"button\" ".
1136 "alt=\"poverty2 < trump back\" title=\"poverty2 - trump back\"/>\n";
1138 echo " <img src=\"pics/button/poverty2_notrump_button.png\" class=\"button\" ".
1139 "alt=\"poverty2 <\" title=\"poverty2 - no trump back\" />\n";
1142 echo " <img src=\"pics/button/poverty2_partner_button.png\" class=\"button\" ".
1143 "alt=\"poverty2 >\" title=\"poverty2 partner\" />\n";
1145 if($GT=="wedding" && $party=="re")
1146 if($sickness=="wedding")
1147 echo " <img src=\"pics/button/wedding_button.png\" class=\"button\" alt=\"wedding\" title=\"wedding\" />\n";
1149 echo " <img src=\"pics/button/wedding_partner_button.png\" class=\"button\" ".
1150 "alt=\"wedding partner\" title=\"wedding partner\" />\n";
1152 if( (strpos($GT,"solo")!==false) && $party=="re")
1154 if(strpos($GT,"queen")!==false)
1155 echo " <img src=\"pics/button/queensolo_button.png\" class=\"button\" alt=\"$GT\" title=\"Queen solo\" />\n";
1156 else if(strpos($GT,"jack")!==false)
1157 echo " <img src=\"pics/button/jacksolo_button.png\" class=\"button\" alt=\"$GT\" title=\"Jack solo\" />\n";
1158 else if(strpos($GT,"club")!==false)
1159 echo " <img src=\"pics/button/clubsolo_button.png\" class=\"button\" alt=\"$GT\" title=\"Club solo\" />\n";
1160 else if(strpos($GT,"spade")!==false)
1161 echo " <img src=\"pics/button/spadesolo_button.png\" class=\"button\" alt=\"$GT\" title=\"Spade solo\" />\n";
1162 else if(strpos($GT,"heart")!==false)
1163 echo " <img src=\"pics/button/heartsolo_button.png\" class=\"button\" alt=\"$GT\" title=\"Heart solo\" />\n";
1164 else if(strpos($GT,"trumpless")!==false)
1165 echo " <img src=\"pics/button/notrumpsolo_button.png\" class=\"button\" alt=\"$GT\" title=\"Trumpless solo\" />\n";
1166 else if(strpos($GT,"trump")!==false)
1167 echo " <img src=\"pics/button/trumpsolo_button.png\" class=\"button\" alt=\"$GT\" title=\"Trump solo\" />\n";
1170 /* add point calls */
1174 echo " <img src=\"pics/button/re_button.png\" class=\"button\" alt=\"re\" title=\"Re\" />\n";
1176 echo " <img src=\"pics/button/contra_button.png\" class=\"button\" alt=\"contra\" title=\"Contra\" />\n";
1180 echo " <img src=\"pics/button/0_button.png\" class=\"button\" alt=\"0\" title=\"Call 0\" />\n";
1183 echo " <img src=\"pics/button/30_button.png\" class=\"button\" alt=\"30\" title=\"Call 30\" />\n";
1186 echo " <img src=\"pics/button/60_button.png\" class=\"button\" alt=\"60\" title=\"Call 60\" />\n";
1189 echo " <img src=\"pics/button/90_button.png\" class=\"button\" alt=\"90\" title=\"Call 90\" />\n";
1194 echo " <img src=\"pics/button/time-info.png\" class=\"button\" alt=\"time info\" ".
1195 "title=\"local time: ".date("Y-m-d H:i:s",$timenow). " ".
1196 "last login: ".date("Y-m-d H:i:s",$lastlogin)."\" />";
1198 echo " <br /><span class=\"numberoftricks\">";
1199 /* show how many tricks the person made */
1203 echo "#tricks 0"; break;
1205 echo "#tricks 1"; break;
1209 echo "#tricks few"; break;
1211 echo "#tricks many"; break;
1218 function display_user_menu($id, $skiphash=NULL)
1220 global $WIKI,$INDEX;
1223 $result = DB_query("SELECT Hand.hash,Hand.game_id,Game.player from Hand".
1224 " LEFT JOIN Game On Hand.game_id=Game.id".
1225 " WHERE Hand.user_id='$id'".
1226 " AND Hand.hash!='$skiphash'".
1227 " AND ( Game.player='$id' OR ISNULL(Game.player) )".
1228 " AND ( Game.status='pre' OR Game.status='play' )".
1229 " ORDER BY Game.session" );
1231 $result = DB_query("SELECT Hand.hash,Hand.game_id,Game.player from Hand".
1232 " LEFT JOIN Game On Hand.game_id=Game.id".
1233 " WHERE Hand.user_id='$id'".
1234 " AND ( Game.player='$id' OR ISNULL(Game.player) )".
1235 " AND ( Game.status='pre' OR Game.status='play' )".
1236 " ORDER BY Game.session" );
1239 while( $r = DB_fetch_array($result))
1243 echo "\n<div class=\"usermenu\">\n ";
1244 echo _('It\'s your turn in these games').":\n";
1252 echo " <a href=\"".$INDEX."?action=game&me=".$r[0].
1253 "\"> ".DB_format_gameid($r[1])." </a>\n";
1266 function generate_score_table($session)
1268 /* returns an array with N entries
1269 * $score[$i]["gameid"] = gameid
1270 * $score[$i]["players"] = array (id=>total points)
1271 * $score[$i]["points"] = points for this game
1272 * $score[$i]["solo"] = 1 or 0
1277 /* get all ids, scores and gametypes */
1278 $gameids = DB_get_gameids_of_finished_games_by_session($session);
1280 if($gameids == NULL)
1284 $player_party = array();
1286 /* get player id from the first game */
1287 $result = DB_query("SELECT user_id from Hand".
1288 " WHERE Hand.game_id=".$gameids[0][0]);
1289 while( $r = DB_fetch_array($result))
1292 /* get party of players for each game in the session */
1293 foreach($player as $id=>$points)
1294 $player_party[$id]=DB_get_party_by_session_and_userid($session,$id);
1296 /* get points and generate table */
1297 foreach($gameids as $gameid)
1299 $re_score = $gameid[1];
1300 $gametype = $gameid[2];
1301 foreach($player as $id=>$points)
1303 $party = $player_party[$id][$i][0];
1305 if($gametype=="solo")
1306 $player[$id] += 3*$re_score;
1308 $player[$id] += $re_score;
1309 else if ($party == "contra")
1310 $player[$id] -= $re_score;
1312 $score[$i]['gameid'] = $gameid[0] ;
1313 $score[$i]['players'] = $player;
1314 $score[$i]['points'] = abs($re_score);
1315 $score[$i]['solo'] = ($gametype=="solo");
1323 function generate_global_score_table()
1327 /* get all ids, scores and gametypes */
1328 $gameids = DB_get_gameids_of_finished_games_by_session(0);
1330 if($gameids == NULL)
1334 /* get player id, names... from the User table */
1335 $result = DB_query('SELECT User.id, User.fullname FROM User');
1337 /* save information in an array */
1338 while( $r = DB_fetch_array($result))
1339 $player[$r[0]] = array('name'=> $r[1], 'points' => 0 , 'nr' => 0, 'active' => 0,
1340 'response' => 0 , 'solo' => 0, 'soloavg' => 0);
1342 /* get points and generate table */
1343 foreach($gameids as $gameid)
1345 $re_score = $gameid[1];
1346 $gametype = $gameid[2];
1348 /* get players involved in this game */
1349 $result = DB_query('SELECT user_id FROM Hand WHERE game_id='.DB_quote_smart($gameid[0]));
1350 while($r = DB_fetch_array($result))
1353 $party = DB_get_party_by_gameid_and_userid($gameid[0],$id);
1355 if($gametype=='solo')
1356 $player[$id]['points'] += 3*$re_score;
1358 $player[$id]['points'] += $re_score;
1359 else if ($party == 'contra')
1360 $player[$id]['points'] -= $re_score;
1362 $player[$id]['nr']+=1;
1366 /* add number of active games */
1367 $result = DB_query_array_all("SELECT user_id, COUNT(*) as c " .
1369 " LEFT JOIN Game ON Game.id=game_id".
1370 " WHERE Game.status IN ('pre','play')".
1371 " GROUP BY user_id");
1373 foreach($result as $res)
1375 $player[$res[0]]['active'] = $res[1];
1378 /* response time of users*/
1379 $result = DB_query_array_all("SELECT user_id,".
1380 "IFNULL(AVG(if(P1.sequence in (2,3,4),".
1381 "-timestampdiff(MINUTE,mod_date,(select mod_date from Play P2 where P1.trick_id=P2.trick_id and P2.sequence=P1.sequence-1)),NULL )),1e9) as a ".
1383 "LEFT JOIN Hand_Card ON P1.hand_card_id=Hand_Card.id ".
1384 "LEFT JOIN Hand ON Hand.id=Hand_Card.hand_id ".
1385 "GROUP BY user_id ");
1387 foreach($result as $res)
1389 $player[$res[0]]['response'] = $res[1];
1393 $result = DB_query_array_all("SELECT user_id as uid,".
1395 " COUNT(*)/(SELECT COUNT(*) FROM Hand LEFT JOIN User ON User.id=Hand.user_id WHERE User.id=uid) as c ".
1397 " LEFT JOIN Hand ON Hand.position=startplayer AND Game.id=Hand.game_id ".
1398 " WHERE type='solo' AND Game.status='gameover' ".
1399 " GROUP BY user_id ");
1401 foreach($result as $res)
1403 $player[$res[0]]['solo'] = $res[1];
1404 $player[$res[0]]['soloavg'] = $res[2];
1408 /* sort everything nicely */
1412 if($a['nr']==0) return 1;
1413 if($b['nr']==0) return 1;
1415 $a=$a['points']/$a['nr'];
1416 $b=$b['points']/$b['nr'];
1420 return ($a > $b) ? -1 : 1;
1422 usort($player,'cmp');
1425 foreach($player as $pl)
1427 /* limit to players with at least 10 games */
1429 $return[] = array( $pl['name'], round($pl['points']/$pl['nr'],3), $pl['points'],$pl['nr'],$pl['active'],
1430 $pl['response'],$pl['solo'],$pl['soloavg']);
1436 function format_score_table_ascii($score)
1439 if(sizeof($score)==0)
1442 /* truncate table if we have too many games */
1443 $max = sizeof($score);
1444 if($max>6) $output.=" (table truncated to last 6 games)\n";
1447 foreach($score[0]['players'] as $id=>$points)
1449 $name = DB_get_name('userid',$id); /*TODO*/
1450 $output.= " ".substr($name,0,2)." |";
1453 $output.= "------+------+------+------+------+\n";
1455 /* output score for each game */
1457 foreach($score as $game)
1460 if($i-1<$max-6) continue;
1462 foreach($game['players'] as $id=>$points)
1463 $output.=str_pad($points,6," ",STR_PAD_LEFT)."|";
1464 $output.=str_pad($game['points'],4," ",STR_PAD_LEFT);
1466 /* check for solo */
1477 function format_score_table_html($score,$userid)
1481 if(sizeof($score)==0)
1484 $output = "<div class=\"scoretable\">\n<table class=\"score\">\n";
1488 $header.= " <thead>\n <tr>\n";
1489 $header.= " <th> No </th>";
1490 foreach($score[0]['players'] as $id=>$points)
1492 $name = DB_get_name('userid',$id); /*TODO*/
1493 $header.= "<th> ".substr($name,0,2)." </th>";
1495 $header.="<th>P</th>\n </tr>\n </thead>\n";
1497 /* use the same as footer */
1499 $footer.= " <tfoot>\n <tr>\n";
1500 $footer.= " <td> No </td>";
1501 foreach($score[0]['players'] as $id=>$points)
1503 $name = DB_get_name('userid',$id); /*TODO*/
1504 $footer.= "<td> ".substr($name,0,2)." </td>";
1506 $footer.="<td>P</td>\n </tr>\n </tfoot>\n";
1510 $body.= " <tbody>\n";
1512 foreach($score as $game)
1516 $userhash = DB_get_hash_from_gameid_and_userid($game['gameid'],$userid);
1517 /* create link to old games only if you are logged in and its your game*/
1518 if(isset($_SESSION['id']) && $_SESSION['id']==$userid)
1519 $body.=" <td> <a href=\"".$INDEX."?action=game&me=".$userhash."\">$i</a></td>";
1521 $body.=" <td>$i</td>";
1523 foreach($game['players'] as $id=>$points)
1524 $body.="<td>".$points."</td>";
1525 $body.="<td>".$game['points'];
1527 /* check for solo */
1530 $body.="</td></tr>\n";
1538 $output.=" </tbody>\n</table>\n</div>\n";
1543 function createCache($content, $cacheFile)
1545 $fp = fopen($cacheFile,"w");
1548 fwrite($fp,$content);
1552 echo "WARNING: couldn't create cache file";
1557 function getCache($cacheFile, $expireTime)
1559 if( file_exists($cacheFile) &&
1560 filemtime($cacheFile )>( time() - $expireTime ) )
1562 return file_get_contents($cacheFile);
1568 function check_vacation($userid)
1570 /* get start date */
1571 $result = DB_query_array("SELECT value FROM User_Prefs".
1572 " WHERE user_id='$userid' AND pref_key='vacation start'" );
1574 $start = $result[0];
1579 $result = DB_query_array("SELECT value FROM User_Prefs".
1580 " WHERE user_id='$userid' AND pref_key='vacation stop'" );
1587 $result = DB_query_array("SELECT value FROM User_Prefs".
1588 " WHERE user_id='$userid' AND pref_key='vacation comment'" );
1590 $comment = $result[0];
1594 /* check if user is on vacation. TODO: use user's timezone */
1595 if( (time() - strtotime($start) >0) &&
1596 (strtotime($stop) - time() >0))
1597 return array ($start,$stop,$comment);
1602 function cancel_game($why,$gameid)
1604 $gameid = DB_quote_smart($gameid);
1606 /* update the game table */
1610 DB_query("UPDATE Game SET status='cancel-timedout' WHERE id=$gameid");
1613 DB_query("UPDATE Game SET status='cancel-nines' WHERE id=$gameid");
1616 DB_query("UPDATE Game SET status='cancel-trump' WHERE id=$gameid");
1619 DB_query("UPDATE Game SET status='cancel-noplay' WHERE id=$gameid");
1622 DB_query("UPDATE Game SET status='cancel-lowtrump' WHERE id=$gameid");
1625 /* set each player to gameover */
1626 $result = DB_query("SELECT id FROM Hand WHERE game_id=".DB_quote_smart($gameid));
1627 while($r = DB_fetch_array($result))
1630 DB_query("UPDATE Hand SET status='gameover' WHERE id=".DB_quote_smart($id));
1636 function get_user_token($userid)
1641 $date = DB_get_user_creation_date($userid);
1642 $name = DB_get_name('userid',$userid);
1645 $token = md5("token".$name.$date);