BUGFIX: couldn't unclick no90 call
[e-DoKo.git] / functions.php
1 <?php
2
3 function config_check()
4 {
5   global $EmailName,$EMAIL_REPLY,$ADMIN_NAME,$ADMIN_EMAIL,$DB_work;
6
7   /* check if some variables are set in the config file, else set defaults */
8   if(!isset($EmailName))
9     $EmailName="[DoKo] ";
10   if(isset($EMAIL_REPLY))
11     {
12       ini_set("sendmail_from",$EMAIL_REPLY);
13     }
14   if(!isset($ADMIN_NAME))
15     {
16       output_header();
17       echo "<h1>Setup not completed</h1>";
18       echo "You need to set \$ADMIN_NAME in config.php.";
19       output_footer();
20       exit();
21     }
22   if(!isset($ADMIN_EMAIL))
23     {
24       output_header();
25       echo "<h1>Setup not completed</h1>";
26       echo "You need to set \$ADMIN_EMAIL in config.php. ".
27         "If something goes wrong an email will be send to this address.";
28       output_footer();
29       exit();
30     }
31   if(!isset($DB_work))
32     {
33       output_header();
34       echo "<h1>Setup not completed</h1>";
35       echo "You need to set \$DB_work in config.php. ".
36         "If this is set to 1, the game will be suspended and one can work safely on the database.".
37         "The default should be 0 for the game to work.";
38       output_footer();
39       exit();
40     }
41   if($DB_work)
42     {
43       output_header();
44       echo "Working on the database...please check back later.";
45       output_footer();
46       exit();
47     }
48
49   return;
50 }
51
52 function mymail($To,$Subject,$message,$header="")
53 {
54   global $debug,$EMAIL_REPLY;
55
56   if(isset($EMAIL_REPLY))
57     $header .= "From: e-DoKo daemon <$EMAIL_REPLY>\r\n";
58
59   if($debug)
60     {
61       /* display email on screen,
62        * change txt -> html
63        */
64       $message = str_replace("\n","<br />\n",$message);
65       $message = ereg_replace("[[:alpha:]]+://[^<>[:space:]]+[[:alnum:]/]",
66                      "<a href=\"\\0\">\\0</a>", $message);
67
68       echo "<br />To: $To<br />";
69       if($header != "")
70         echo $header."<br />";
71       echo "Subject: $Subject <br />$message<br />\n";
72     }
73   else
74     if($header != "")
75       mail($To,$Subject,$message,$header);
76     else
77       mail($To,$Subject,$message);
78   return;
79 }
80
81 function myisset()
82 {
83   /* returns 1 if all names passed as args are defined by a GET or POST statement,
84    * else return 0
85    */
86
87   $ok   = 1;
88   $args = func_get_args();
89
90   foreach($args as $arg)
91     {
92       $ok = $ok * isset($_REQUEST[$arg]);
93       /*echo "$arg: ok = $ok <br />";
94        */
95     }
96   return $ok;
97 }
98
99 function myerror($message)
100 {
101   echo "<span class=\"error\">".htmlspecialchars($message)."</span>\n";
102   mymail($ADMIN_EMAIL,$EmailName." Error in Code",$message);
103   return;
104 }
105
106 function pos_array($c,$arr)
107 {
108   $ret = 0;
109
110   $i   = 0;
111   foreach($arr as $a)
112     {
113       $i++;
114       if($a == $c)
115         {
116           $ret = $i;
117           break;
118         }
119     }
120   return $ret;
121 }
122
123 function is_trump($c)
124 {
125   global $CARDS;
126
127   if(in_array($c,$CARDS["trump"]))
128     return 1;
129   else
130     return 0;
131 }
132
133 function is_same_suite($c1,$c2)
134 {
135   global $CARDS;
136
137   if(in_array($c1,$CARDS["trump"]   ) && in_array($c2,$CARDS["trump"]   ) ) return 1;
138   if(in_array($c1,$CARDS["clubs"]   ) && in_array($c2,$CARDS["clubs"]   ) ) return 1;
139   if(in_array($c1,$CARDS["hearts"]  ) && in_array($c2,$CARDS["hearts"]  ) ) return 1;
140   if(in_array($c1,$CARDS["spades"]  ) && in_array($c2,$CARDS["spades"]  ) ) return 1;
141   if(in_array($c1,$CARDS["diamonds"]) && in_array($c2,$CARDS["diamonds"]) ) return 1;
142
143   return 0;
144 }
145
146 function compare_cards($a,$b,$game)
147 {
148   /* if "a" is higher than "b" return 1, else 0, "a" being the card first played */
149
150   global $CARDS;
151   global $RULES;
152   global $GAME;
153
154   /* first map all cards to the odd number,
155    * this insure that the first card wins the trick
156    * if they are the same card
157    */
158   if( $a/2 - (int)($a/2) != 0.5)
159     $a--;
160   if( $b/2 - (int)($b/2) != 0.5)
161     $b--;
162
163   /* check for schweinchen and ten of hearts*/
164   switch($game)
165     {
166     case "normal":
167     case "silent":
168     case "trump":
169       if($RULES["schweinchen"]=="both" && $GAME["schweinchen"])
170         {
171           if($a == 19 || $a == 20 )
172             return 1;
173           if($b == 19 || $b == 20 )
174             return 0;
175         };
176       if($RULES["schweinchen"]=="second" && $GAME["schweinchen"]==3)
177         {
178           if($a == 19 || $a == 20 )
179             return 1;
180           if($b == 19 || $b == 20 )
181             return 0;
182         };
183     case "heart":
184     case "spade":
185     case "club":
186       /* check for ten of hearts rule */
187       if($RULES["dullen"]=="secondwins")
188         if($a==1 && $b==1) /* both 10 of hearts */
189           return 0;        /* second one wins.*/
190     case "trumpless":
191     case "jack":
192     case "queen":
193       /* no special cases here */
194     }
195
196   /* normal case */
197   if(is_trump($a) && is_trump($b) && $a<=$b)
198     return 1;
199   else if(is_trump($a) && is_trump($b) )
200     return 0;
201   else
202     { /*$a is not a trump */
203       if(is_trump($b))
204         return 0;
205       else
206         { /* both no trump */
207
208           /* both clubs? */
209           $posA = pos_array($a,$CARDS["clubs"]);
210           $posB = pos_array($b,$CARDS["clubs"]);
211           if($posA && $posB)
212             if($posA <= $posB)
213               return 1;
214             else
215               return 0;
216
217           /* both spades? */
218           $posA = pos_array($a,$CARDS["spades"]);
219           $posB = pos_array($b,$CARDS["spades"]);
220           if($posA && $posB)
221             if($posA <= $posB)
222               return 1;
223             else
224               return 0;
225
226           /* both hearts? */
227           $posA = pos_array($a,$CARDS["hearts"]);
228           $posB = pos_array($b,$CARDS["hearts"]);
229           if($posA && $posB)
230             if($posA <= $posB)
231               return 1;
232             else
233               return 0;
234
235           /* both diamonds? */
236           $posA = pos_array($a,$CARDS["diamonds"]);
237           $posB = pos_array($b,$CARDS["diamonds"]);
238           if($posA && $posB)
239             if($posA <= $posB)
240               return 1;
241             else
242               return 0;
243
244           /* not the same suit and no trump: a wins */
245           return 1;
246         }
247     }
248 }
249
250 function get_winner($p,$mode)
251 {
252   /* get all 4 cards played in a trick, in the order they are played */
253   $tmp = $p[1];
254   $c1    = $tmp["card"];
255   $c1pos = $tmp["pos"];
256
257   $tmp = $p[2];
258   $c2    = $tmp["card"];
259   $c2pos = $tmp["pos"];
260
261   $tmp = $p[3];
262   $c3    = $tmp["card"];
263   $c3pos = $tmp["pos"];
264
265   $tmp = $p[4];
266   $c4    = $tmp["card"];
267   $c4pos = $tmp["pos"];
268
269   /* first card is better than all the rest */
270   if( compare_cards($c1,$c2,$mode) && compare_cards($c1,$c3,$mode) && compare_cards($c1,$c4,$mode) )
271     return $c1pos;
272
273   /* second card is better than first and better than the rest */
274   if( !compare_cards($c1,$c2,$mode) &&  compare_cards($c2,$c3,$mode) && compare_cards($c2,$c4,$mode) )
275     return $c2pos;
276
277   /* third card is better than first card and better than last */
278   if( !compare_cards($c1,$c3,$mode) &&  compare_cards($c3,$c4,$mode) )
279     /* if second card is better than first, third card needs to be even better */
280     if( !compare_cards($c1,$c2,$mode) && !compare_cards($c2,$c3,$mode) )
281       return $c3pos;
282     /* second is worse than first, e.g. not following suite */
283     else if (compare_cards($c1,$c2,$mode) )
284       return $c3pos;
285
286   /* non of the above */
287   return $c4pos;
288 }
289
290 function count_nines($cards)
291 {
292   $nines = 0;
293
294   foreach($cards as $c)
295     {
296       if($c == "25" || $c == "26") $nines++;
297       else if($c == "33" || $c == "34") $nines++;
298       else if($c == "41" || $c == "42") $nines++;
299       else if($c == "47" || $c == "48") $nines++;
300     }
301
302   return $nines;
303 }
304
305 function check_wedding($cards)
306 {
307
308   if( in_array("3",$cards) && in_array("4",$cards) )
309     return 1;
310
311   return 0;
312 }
313
314 function count_trump($cards)
315 {
316   global $RULES;
317
318   $trump = 0;
319
320   /* count each trump, including the foxes */
321   foreach($cards as $c)
322     if( (int)($c) <27)
323       $trump++;
324
325   /* normally foxes don't count as trump, so we substract them here
326    * in case someone has schweinchen, one or two of them should count as trump 
327    * though, so we need to add one trump for those cases */
328   
329   /* subtract foxes */
330   if( in_array("19",$cards))
331     $trump--;
332   if( in_array("20",$cards) )
333     $trump--;
334
335   /* handle case where player has schweinchen */
336   if( in_array("19",$cards) && in_array("20",$cards) )
337     switch($RULES["schweinchen"])
338       {
339       case "both":
340         /* add two, in case the player has both foxes (schweinchen) */
341         $trump++;
342         $trump++;
343         break;
344       case "second":
345       case "secondaftercall":
346         /* add one, in case the player has both foxes (schweinchen) */
347         $trump++;
348         break;
349       case "none":
350         break;
351       }
352
353   return $trump;
354 }
355
356 function  create_array_of_random_numbers($useridA,$useridB,$useridC,$useridD)
357 {
358   global $debug;
359
360   $r = array();
361
362   if($debug)
363     {
364       $r[ 0]=1;     $r[12]=47;   $r[24]=13;       $r[36]=37;
365       $r[ 1]=2;     $r[13]=48;   $r[25]=14;       $r[37]=38;
366       $r[ 2]=3;     $r[14]=27;   $r[26]=15;       $r[38]=39;
367       $r[ 3]=4;     $r[15]=16;   $r[27]=28;       $r[39]=40;
368       $r[ 4]=5;     $r[16]=17;   $r[28]=29;       $r[40]=41;
369       $r[ 5]=18;    $r[17]=6;    $r[29]=30;       $r[41]=42;
370       $r[ 6]=19;    $r[18]=7;    $r[30]=31;       $r[42]=43;
371       $r[ 7]=20;    $r[19]=8;    $r[31]=32;       $r[43]=44;
372       $r[ 8]=45;    $r[20]=9;    $r[32]=21;       $r[44]=33;
373       $r[ 9]=46;    $r[21]=10;   $r[33]=22;       $r[45]=34;
374       $r[10]=35;    $r[22]=11;   $r[34]=23;       $r[46]=25;
375       $r[11]=36;    $r[23]=12;   $r[35]=24;       $r[47]=26;
376     }
377   else
378     {
379       /* check if we can find a game were non of the player was involved and return
380        * cards insted
381        */
382       $userstr = "'".implode("','",array($useridA,$useridB,$useridC,$useridD))."'";
383       $randomnumbers = DB_get_unused_randomnumbers($userstr);
384       $randomnumbers = explode(":",$randomnumbers);
385
386       if(sizeof($randomnumbers)==48)
387         return $randomnumbers;
388
389       /* need to create new numbers */
390       for($i=0;$i<48;$i++)
391         $r[$i]=$i+1;
392
393       /* shuffle using a better random generator than the standard one */
394       for ($i = 0; $i <48; $i++)
395         {
396           $j = @mt_rand(0, $i);
397           $tmp = $r[$i];
398           $r[$i] = $r[$j];
399           $r[$j] = $tmp;
400         }
401     };
402
403   return $r;
404 }
405
406 function display_cards($me,$myturn)
407 {
408   return;
409 }
410
411 function have_suit($cards,$c)
412 {
413   global $CARDS;
414   $suite = array();
415
416   if(in_array($c,$CARDS["trump"]))
417     $suite = $CARDS["trump"];
418   else if(in_array($c,$CARDS["clubs"]))
419     $suite = $CARDS["clubs"];
420   else if(in_array($c,$CARDS["spades"]))
421     $suite = $CARDS["spades"];
422   else if(in_array($c,$CARDS["hearts"]))
423     $suite = $CARDS["hearts"];
424   else if(in_array($c,$CARDS["diamonds"]))
425     $suite = $CARDS["diamonds"];
426
427   foreach($cards as $card)
428     {
429       if(in_array($card,$suite))
430         return 1;
431     }
432
433   return 0;
434 }
435
436 function same_type($card,$c)
437 {
438   global $CARDS;
439   $suite = "";
440
441   /* figure out what kind of card c is */
442   if(in_array($c,$CARDS["trump"]))
443     $suite = $CARDS["trump"];
444   else if(in_array($c,$CARDS["clubs"]))
445     $suite = $CARDS["clubs"];
446   else if(in_array($c,$CARDS["spades"]))
447     $suite = $CARDS["spades"];
448   else if(in_array($c,$CARDS["hearts"]))
449     $suite = $CARDS["hearts"];
450   else if(in_array($c,$CARDS["diamonds"]))
451     $suite = $CARDS["diamonds"];
452
453   /* card is the same suid return 1 */
454   if(in_array($card,$suite))
455     return 1;
456
457   return 0;
458 }
459
460 function set_gametype($gametype)
461 {
462   global $CARDS;
463   global $RULES;
464
465   switch($gametype)
466     {
467     case "normal":
468     case "wedding":
469     case "poverty":
470     case "dpoverty":
471     case "trump":
472     case "silent":
473       $CARDS["trump"]    = array('1','2','3','4','5','6','7','8','9','10','11','12','13','14','15','16',
474                                  '17','18','19','20','21','22','23','24','25','26');
475       $CARDS["diamonds"] = array();
476       $CARDS["clubs"]    = array('27','28','29','30','31','32','33','34');
477       $CARDS["spades"]   = array('35','36','37','38','39','40','41','42');
478       $CARDS["hearts"]   = array('43','44','45','46','47','48');
479       $CARDS["foxes"]    = array('19','20');
480       if($RULES["dullen"]=='none')
481         {
482           $CARDS["trump"]    = array('3','4','5','6','7','8','9','10','11','12','13','14','15','16',
483                                      '17','18','19','20','21','22','23','24','25','26');
484           $CARDS["hearts"]   = array('43','44','1','2','45','46','47','48');
485         }
486       break;
487     case "queen":
488       $CARDS["trump"]    = array('3','4','5','6','7','8','9','10');
489       $CARDS["clubs"]    = array('27','28','29','30','31','32','11','12','33','34');
490       $CARDS["spades"]   = array('35','36','37','38','39','40','13','14','41','42');
491       $CARDS["hearts"]   = array('43','44', '1', '2','45','46','15','16','47','48');
492       $CARDS["diamonds"] = array('19','20','21','22','23','24','17','18','25','26');
493       $CARDS["foxes"]    = array();
494       break;
495     case "jack":
496       $CARDS["trump"]    = array('11','12','13','14','15','16','17','18');
497       $CARDS["clubs"]    = array('27','28','29','30','31','32','3', '4','33','34');
498       $CARDS["spades"]   = array('35','36','37','38','39','40','5', '6','41','42');
499       $CARDS["hearts"]   = array('43','44', '1', '2','45','46','7', '8','47','48');
500       $CARDS["diamonds"] = array('19','20','21','22','23','24','9','10','25','26');
501       $CARDS["foxes"]    = array();
502       break;
503     case "trumpless":
504       $CARDS["trump"]    = array();
505       $CARDS["clubs"]    = array('27','28','29','30','31','32','3', '4','11','12','33','34');
506       $CARDS["spades"]   = array('35','36','37','38','39','40','5', '6','13','14','41','42');
507       $CARDS["hearts"]   = array('43','44', '1', '2','45','46','7', '8','15','16','47','48');
508       $CARDS["diamonds"] = array('19','20','21','22','23','24','9','10','17','18','25','26');
509       $CARDS["foxes"]    = array();
510       break;
511     case "club":
512       $CARDS["trump"]    = array('1','2','3','4','5','6','7','8','9','10','11','12','13','14','15','16',
513                                  '17','18','27','28','29','30','31','32','33','34');
514       $CARDS["clubs"]    = array();
515       $CARDS["spades"]   = array('35','36','37','38','39','40','41','42');
516       $CARDS["hearts"]   = array('43','44','45','46','47','48');
517       $CARDS["diamonds"] = array('19','20','21','22','23','24','25','26');
518       $CARDS["foxes"]    = array();
519       if($RULES["dullen"]=='none')
520         {
521           $CARDS["trump"]    = array('3','4','5','6','7','8','9','10','11','12','13','14','15','16',
522                                      '17','18','27','28','29','30','31','32','33','34');
523           $CARDS["hearts"]   = array('43','44','1','2','45','46','47','48');
524         }
525       break;
526     case "spade":
527       $CARDS["trump"]    = array('1','2','3','4','5','6','7','8','9','10','11','12','13','14','15','16',
528                                  '17','18','35','36','37','38','39','40','41','42');
529       $CARDS["clubs"]    = array('27','28','29','30','31','32','33','34');
530       $CARDS["spades"]   = array();
531       $CARDS["hearts"]   = array('43','44','45','46','47','48');
532       $CARDS["diamonds"] = array('19','20','21','22','23','24','25','26');
533       $CARDS["foxes"]    = array();
534       if($RULES["dullen"]=='none')
535         {
536           $CARDS["trump"]    = array('3','4','5','6','7','8','9','10','11','12','13','14','15','16',
537                                      '17','18','35','36','37','38','39','40','41','42');
538           $CARDS["hearts"]   = array('43','44','1','2','45','46','47','48');
539         }
540       break;
541     case "heart":
542       $CARDS["trump"]    = array('1','2','3','4','5','6','7','8','9','10','11','12','13','14','15','16',
543                                  '17','18','43','44','45','46','47','48');
544       $CARDS["clubs"]    = array('27','28','29','30','31','32','33','34');
545       $CARDS["spades"]   = array('35','36','37','38','39','40','41','42');
546       $CARDS["hearts"]   = array();
547       $CARDS["diamonds"] = array('19','20','21','22','23','24','25','26');
548       $CARDS["foxes"]    = array();
549       if($RULES["dullen"]=='none')
550         {
551           $CARDS["trump"]    = array('3','4','5','6','7','8','9','10','11','12','13','14','15','16',
552                             '17','18','43','44','1','2','45','46','47','48');
553         }
554       break;
555     }
556 }
557
558 function mysort($cards,$gametype)
559 {
560   usort ( $cards, "sort_comp" );
561   return $cards;
562 }
563
564 function sort_comp($a,$b)
565 {
566   global $CARDS;
567
568   $ALL = array();
569   $ALL = array_merge($CARDS["trump"],$CARDS["diamonds"],$CARDS["clubs"],
570                      $CARDS["hearts"],$CARDS["spades"],$CARDS["diamonds"]);
571
572   return pos_array($a,$ALL)-pos_array($b,$ALL);
573 }
574
575 function can_call($what,$hash)
576 {
577   global $RULES;
578
579   $gameid   = DB_get_gameid_by_hash($hash);
580   $gametype = DB_get_gametype_by_gameid($gameid);
581   $oldcall  = DB_get_call_by_hash($hash);
582   $pcall    = DB_get_partner_call_by_hash($hash);
583
584   if( ($pcall!=NULL && $what >= $pcall) ||
585       ($oldcall!=NULL && $what >=$oldcall) )
586     {
587       return 0;
588     }
589
590   $NRcards  = count(DB_get_hand($hash));
591
592   $NRallcards = 0;
593   for ($i=1;$i<5;$i++)
594     {
595       $user         = DB_get_hash_from_game_and_pos($gameid,$i);
596       $NRallcards  += count(DB_get_hand($user));
597     };
598
599   /* in case of a wedding, everything will be delayed by an offset */
600   $offset = 0;
601   if($gametype=="wedding")
602     {
603       $offset = DB_get_sickness_by_gameid($gameid);
604       if ($offset <0) /* not resolved */
605         return 0;
606     };
607
608   switch ($RULES["call"])
609     {
610     case "1st-own-card":
611       if( 4-($what/30) >= 12 - ($NRcards + $offset))
612         return 1;
613       break;
614     case "5th-card":
615       if( 27+4*($what/30) <= $NRallcards + $offset*4)
616         return 1;
617       break;
618     case "9-cards":
619
620       if($oldcall!=NULL && $pcall!=NULL)
621         $mincall = ($oldcall>$pcall) ? $pcall : $oldcall;
622       else if($oldcall!=NULL)
623         $mincall = $oldcall;
624       else if ($pcall!=NULL)
625         $mincall = $pcall;
626       else
627         $mincall = -1;
628
629       if( 12 <= ($NRcards + $offset))
630         {
631           return 1;
632         }
633       else if ( 9 <= ($NRcards + $offset))
634         {
635           if( ($mincall>=0 && $mincall==120) )
636             return 1;
637         }
638       else if ( 6 <= ($NRcards + $offset))
639         {
640           if( ($mincall>=0 && $mincall<=90 && $what<=60 ) )
641             return 1;
642         }
643       else if ( 3 <= ($NRcards + $offset))
644         {
645           if( ($mincall>=0 && $mincall<=60 && $what<=30 ) )
646             return 1;
647         }
648       else if ( 0 <= ($NRcards + $offset))
649         {
650           if( ($mincall>=0 && $mincall<=30 && $what==0 ) )
651             return 1;
652         };
653       break;
654     }
655
656   return 0;
657 }
658
659 function display_table ()
660 {
661   global $gameid, $GT, $debug,$INDEX,$defaulttimezone;
662
663   $result = mysql_query("SELECT  User.fullname as name,".
664                         "        Hand.position as position, ".
665                         "        User.id, ".
666                         "        Hand.party as party, ".
667                         "        Hand.sickness as sickness, ".
668                         "        Hand.point_call, ".
669                         "        User.last_login, ".
670                         "        Hand.hash,       ".
671                         "        User.timezone    ".
672                         "FROM Hand ".
673                         "LEFT JOIN User ON User.id=Hand.user_id ".
674                         "WHERE Hand.game_id='".$gameid."' ".
675                         "ORDER BY position ASC");
676
677   echo "<div class=\"table\">\n".
678     "  <img class=\"table\" src=\"pics/table.png\" alt=\"table\" />\n";
679   while($r = mysql_fetch_array($result,MYSQL_NUM))
680     {
681       $name  = $r[0];
682       $pos   = $r[1];
683       $user  = $r[2];
684       $party = $r[3];
685       $sickness  = $r[4];
686       $call      = $r[5];
687       $hash      = $r[7];
688       $timezone  = $r[8];
689       date_default_timezone_set($defaulttimezone);
690       $lastlogin = strtotime($r[6]);
691       date_default_timezone_set($timezone);
692       $timenow   = strtotime(date("Y-m-d H:i:s"));
693
694       echo "  <div class=\"table".($pos-1)."\">\n";
695       if(!$debug)
696         echo "   $name \n";
697       else
698         echo "   <a href=\"".$INDEX."?me=".$hash."\">$name</a>\n";
699
700       /* add hints for poverty, wedding, solo, etc */
701       if($GT=="poverty" && $party=="re")
702         if($sickness=="poverty")
703           {
704             $userhash = DB_get_hash_from_gameid_and_userid($gameid,$user);
705             $cards    = DB_get_all_hand($userhash);
706             $trumpNR  = count_trump($cards);
707             if($trumpNR)
708               echo "   <img src=\"pics/button/poverty_trump_button.png\" class=\"button\" alt=\"poverty < trump back\" />";
709             else
710               echo "   <img src=\"pics/button/poverty_notrump_button.png\" class=\"button\" alt=\"poverty <\" />";
711           }
712         else
713           echo "   <img src=\"pics/button/poverty_partner_button.png\" class=\"button\" alt=\"poverty >\" />";
714
715       if($GT=="dpoverty")
716         if($party=="re")
717           if($sickness=="poverty")
718             {
719               $userhash = DB_get_hash_from_gameid_and_userid($gameid,$user);
720               $cards    = DB_get_all_hand($userhash);
721               $trumpNR  = count_trump($cards);
722               if($trumpNR)
723                 echo "   <img src=\"pics/button/poverty_trump_button.png\" class=\"button\" alt=\"poverty < trump back\" />";
724               else
725                 echo "   <img src=\"pics/button/poverty_notrump_button.png\" class=\"button\" alt=\"poverty <\" />";
726             }
727           else
728             echo "   <img src=\"pics/button/poverty_partner_button.png\" class=\"button\" alt=\"poverty >\" />";
729         else
730           if($sickness=="poverty")
731             {
732               $userhash = DB_get_hash_from_gameid_and_userid($gameid,$user);
733               $cards    = DB_get_all_hand($userhash);
734               $trumpNR  = count_trump($cards);
735               if($trumpNR)
736                 echo "   <img src=\"pics/button/poverty2_trump_button.png\" class=\"button\" alt=\"poverty2 < trump back\" />";
737               else
738                 echo "   <img src=\"pics/button/poverty2_notrump_button.png\" class=\"button\" alt=\"poverty2 <\" />";
739             }
740           else
741             echo "   <img src=\"pics/button/poverty2_partner_button.png\" class=\"button\" alt=\"poverty2 >\" />";
742
743       if($GT=="wedding" && $party=="re")
744         if($sickness=="wedding")
745           echo "   <img src=\"pics/button/wedding_button.png\" class=\"button\" alt=\"wedding\" />";
746         else
747           echo "   <img src=\"pics/button/wedding_partner_button.png\" class=\"button\" alt=\"wedding partner\" />";
748
749       if(ereg("solo",$GT) && $party=="re")
750         {
751           if(ereg("queen",$GT))
752             echo "   <img src=\"pics/button/queensolo_button.png\" class=\"button\" alt=\"$GT\" />";
753           else if(ereg("jack",$GT))
754             echo "   <img src=\"pics/button/jacksolo_button.png\" class=\"button\" alt=\"$GT\" />";
755           else if(ereg("club",$GT))
756             echo "   <img src=\"pics/button/clubsolo_button.png\" class=\"button\" alt=\"$GT\" />";
757           else if(ereg("spade",$GT))
758             echo "   <img src=\"pics/button/spadesolo_button.png\" class=\"button\" alt=\"$GT\" />";
759           else if(ereg("heart",$GT))
760             echo "   <img src=\"pics/button/heartsolo_button.png\" class=\"button\" alt=\"$GT\" />";
761           else if(ereg("trumpless",$GT))
762             echo "   <img src=\"pics/button/notrumpsolo_button.png\" class=\"button\" alt=\"$GT\" />";
763           else if(ereg("trump",$GT))
764             echo "   <img src=\"pics/button/trumpsolo_button.png\" class=\"button\" alt=\"$GT\" />";
765         }
766
767       /* add point calls */
768       if($call!=NULL)
769         {
770           if($party=="re")
771             echo "  <img src=\"pics/button/re_button.png\" class=\"button\" alt=\"re\" />";
772           else
773             echo "  <img src=\"pics/button/contra_button.png\" class=\"button\" alt=\"contra\" />";
774           switch($call)
775             {
776             case "0":
777               echo "   <img src=\"pics/button/0_button.png\" class=\"button\" alt=\"0\" />";
778               break;
779             case "30":
780               echo "   <img src=\"pics/button/30_button.png\" class=\"button\" alt=\"30\" />";
781               break;
782             case "60":
783               echo "   <img src=\"pics/button/60_button.png\" class=\"button\" alt=\"60\" />";
784               break;
785             case "90":
786               echo "   <img src=\"pics/button/90_button.png\" class=\"button\" alt=\"90\" />";
787               break;
788             }
789         }
790
791       echo "    <br />\n";
792       echo "    <span title=\"".date("Y-m-d H:i:s",$timenow).  "\">local time</span>\n";
793       echo "    <span title=\"".date("Y-m-d H:i:s",$lastlogin)."\">last login</span>\n";
794       echo "   </div>\n";
795
796     }
797   echo  "</div>\n"; /* end output table */
798
799
800   return;
801 }
802
803
804 function display_user_menu()
805 {
806   global $WIKI,$myid,$INDEX,$STATS;
807   echo "<div class=\"usermenu\">\n".
808     "<a href=\"".$INDEX."\"> Go to my user page </a>";
809
810   $result = mysql_query("SELECT Hand.hash,Hand.game_id,Game.player from Hand".
811                         " LEFT JOIN Game On Hand.game_id=Game.id".
812                         " WHERE Hand.user_id='$myid'".
813                         " AND Game.player='$myid'".
814                         " AND Game.status<>'gameover'".
815                         " ORDER BY Game.session" );
816   if(mysql_num_rows($result))
817       echo "<hr />It's your turn in these games:<br />\n";
818
819   while( $r = mysql_fetch_array($result,MYSQL_NUM))
820     {
821       echo "<a href=\"".$INDEX."?me=".$r[0]."\">game ".DB_format_gameid($r[1])." </a><br />\n";
822     }
823
824   echo "<hr /> <a href=\"".$INDEX."?new\">Start a new game</a>\n";
825
826   echo "<hr /> <a href=\"".$STATS."\">Statistics</a>\n";
827
828   echo
829     "<hr />Report bugs in the <a href=\"".$WIKI."\">wiki</a>\n";
830   echo  "</div>\n";
831   return;
832 }
833
834 function generate_score_table($session)
835 {
836
837   /* get all ids */
838   $gameids = DB_get_gameids_of_finished_games_by_session($session);
839
840   if($gameids == NULL)
841     return "";
842
843   $output = "<div class=\"scoretable\">\n<table class=\"score\">\n <tr>\n";
844
845
846   /* get player id, names... from the first game */
847   $player = array();
848   $result = mysql_query("SELECT User.id, User.fullname from Hand".
849                         " LEFT JOIN User On Hand.user_id=User.id".
850                         " WHERE Hand.game_id=".$gameids[0]);
851   while( $r = mysql_fetch_array($result,MYSQL_NUM))
852     {
853       $player[] = array( 'id' => $r[0], 'points' => 0 );
854       $output.= "  <td> ".substr($r[1],0,2)." </td>\n";
855     }
856   $output.="  <td>P</td>\n </tr>\n";
857
858   /* get points and generate table */
859   foreach($gameids as $gameid)
860     {
861       $output.=" <tr>\n";
862
863       $re_score = DB_get_score_by_gameid($gameid);
864       foreach($player as $key=>$pl)
865         {
866           $party = DB_get_party_by_gameid_and_userid($gameid,$pl['id']);
867           if($party == "re")
868             if(DB_get_gametype_by_gameid($gameid)=="solo")
869               $player[$key]['points'] += 3*$re_score;
870             else
871               $player[$key]['points'] += $re_score;
872           else if ($party == "contra")
873             $player[$key]['points'] -= $re_score;
874
875           $output.="  <td>".$player[$key]['points']."</td>\n";
876         }
877       $output.="  <td>".abs($re_score);
878
879       /* check for solo */
880       if(DB_get_gametype_by_gameid($gameid)=="solo")
881         $output.= " S";
882       $output.="</td>\n </tr>\n";
883     }
884
885   $output.="</table></div>\n";
886
887   return $output;
888 }
889
890 ?>