LAYOUT: added an icon for the time information
[e-DoKo.git] / include / functions.php
1 <?php
2 /* make sure that we are not called from outside the scripts,
3  * use a variable defined in config.php to check this
4  */
5 if(!isset($HOST))
6   exit;
7
8 function config_check()
9 {
10   global $EmailName,$EMAIL_REPLY,$ADMIN_NAME,$ADMIN_EMAIL,$DB_work;
11
12   /* check if some variables are set in the config file, else set defaults */
13   if(!isset($EmailName))
14     $EmailName="[DoKo] ";
15   if(isset($EMAIL_REPLY))
16     {
17       ini_set("sendmail_from",$EMAIL_REPLY);
18     }
19   if(!isset($ADMIN_NAME))
20     {
21       output_header();
22       echo "<h1>Setup not completed</h1>";
23       echo "You need to set \$ADMIN_NAME in config.php.";
24       output_footer();
25       exit();
26     }
27   if(!isset($ADMIN_EMAIL))
28     {
29       output_header();
30       echo "<h1>Setup not completed</h1>";
31       echo "You need to set \$ADMIN_EMAIL in config.php. ".
32         "If something goes wrong an email will be send to this address.";
33       output_footer();
34       exit();
35     }
36   if(!isset($DB_work))
37     {
38       output_header();
39       echo "<h1>Setup not completed</h1>";
40       echo "You need to set \$DB_work in config.php. ".
41         "If this is set to 1, the game will be suspended and one can work safely on the database.".
42         "The default should be 0 for the game to work.";
43       output_footer();
44       exit();
45     }
46   if($DB_work)
47     {
48       output_header();
49       echo "Working on the database...please check back later.";
50       output_footer();
51       exit();
52     }
53
54   return;
55 }
56
57 function mymail($To,$Subject,$message,$header="")
58 {
59   global $debug,$EMAIL_REPLY;
60
61   if(isset($EMAIL_REPLY))
62     $header .= "From: e-DoKo daemon <$EMAIL_REPLY>\r\n";
63
64   if($debug)
65     {
66       /* display email on screen,
67        * change txt -> html
68        */
69       $message = str_replace("\n","<br />\n",$message);
70       $message = ereg_replace("[[:alpha:]]+://[^<>[:space:]]+[[:alnum:]/]",
71                      "<a href=\"\\0\">\\0</a>", $message);
72
73       echo "<br />To: $To<br />";
74       if($header != "")
75         echo $header."<br />";
76       echo "Subject: $Subject <br />$message<br />\n";
77     }
78   else
79     if($header != "")
80       mail($To,$Subject,$message,$header);
81     else
82       mail($To,$Subject,$message);
83   return;
84 }
85
86 function myisset()
87 {
88   /* returns 1 if all names passed as args are defined by a GET or POST statement,
89    * else return 0
90    */
91
92   $ok   = 1;
93   $args = func_get_args();
94
95   foreach($args as $arg)
96     {
97       $ok = $ok * isset($_REQUEST[$arg]);
98       /*echo "$arg: ok = $ok <br />";
99        */
100     }
101   return $ok;
102 }
103
104 function myerror($message)
105 {
106   echo "<span class=\"error\">".htmlspecialchars($message)."</span>\n";
107   mymail($ADMIN_EMAIL,$EmailName." Error in Code",$message);
108   return;
109 }
110
111 function pos_array($c,$arr)
112 {
113   $ret = 0;
114
115   $i   = 0;
116   foreach($arr as $a)
117     {
118       $i++;
119       if($a == $c)
120         {
121           $ret = $i;
122           break;
123         }
124     }
125   return $ret;
126 }
127
128 function is_trump($c)
129 {
130   global $CARDS;
131
132   if(in_array($c,$CARDS["trump"]))
133     return 1;
134   else
135     return 0;
136 }
137
138 function is_same_suite($c1,$c2)
139 {
140   global $CARDS;
141
142   if(in_array($c1,$CARDS["trump"]   ) && in_array($c2,$CARDS["trump"]   ) ) return 1;
143   if(in_array($c1,$CARDS["clubs"]   ) && in_array($c2,$CARDS["clubs"]   ) ) return 1;
144   if(in_array($c1,$CARDS["hearts"]  ) && in_array($c2,$CARDS["hearts"]  ) ) return 1;
145   if(in_array($c1,$CARDS["spades"]  ) && in_array($c2,$CARDS["spades"]  ) ) return 1;
146   if(in_array($c1,$CARDS["diamonds"]) && in_array($c2,$CARDS["diamonds"]) ) return 1;
147
148   return 0;
149 }
150
151 function compare_cards($a,$b,$game)
152 {
153   /* if "a" is higher than "b" return 1, else 0, "a" being the card first played */
154
155   global $CARDS;
156   global $RULES;
157   global $GAME;
158
159   /* first map all cards to the odd number,
160    * this insure that the first card wins the trick
161    * if they are the same card
162    */
163   if( $a/2 - (int)($a/2) != 0.5)
164     $a--;
165   if( $b/2 - (int)($b/2) != 0.5)
166     $b--;
167
168   /* check for schweinchen and ten of hearts*/
169   switch($game)
170     {
171     case "normal":
172     case "silent":
173     case "trump":
174       if($RULES['schweinchen']=='both' && $GAME['schweinchen-who'])
175         {
176           if($a == 19 || $a == 20 )
177             return 1;
178           if($b == 19 || $b == 20 )
179             return 0;
180         }
181       else if($RULES['schweinchen']=='second' && $GAME['schweinchen-second'])
182         {
183           if($a == 19 || $a == 20 )
184             return 1;
185           if($b == 19 || $b == 20 )
186             return 0;
187         }
188       else if($RULES['schweinchen']=='secondaftercall' && $GAME['schweinchen-who'] && $GAME['schweinchen-second'] )
189         {
190           /* check if a call was made either by the player or his partner. If so activate Schweinchen rule. */
191           if(DB_get_call_by_hash($GAME['schweinchen-who']) || DB_get_partner_call_by_hash($GAME['schweinchen-who']) )
192             {
193               if($a == 19 || $a == 20 )
194                 return 1;
195               if($b == 19 || $b == 20 )
196                 return 0;
197             }
198           /* if not, do nothing and the foxes are just handeled as normal trump */
199         }
200         ;
201     case "heart":
202     case "spade":
203     case "club":
204       /* check for ten of hearts rule */
205       if($RULES["dullen"]=="secondwins")
206         if($a==1 && $b==1) /* both 10 of hearts */
207           return 0;        /* second one wins.*/
208     case "trumpless":
209     case "jack":
210     case "queen":
211       /* no special cases here */
212     }
213
214   /* normal case */
215   if(is_trump($a) && is_trump($b) && $a<=$b)
216     return 1;
217   else if(is_trump($a) && is_trump($b) )
218     return 0;
219   else
220     { /*$a is not a trump */
221       if(is_trump($b))
222         return 0;
223       else
224         { /* both no trump */
225
226           /* both clubs? */
227           $posA = pos_array($a,$CARDS["clubs"]);
228           $posB = pos_array($b,$CARDS["clubs"]);
229           if($posA && $posB)
230             if($posA <= $posB)
231               return 1;
232             else
233               return 0;
234
235           /* both spades? */
236           $posA = pos_array($a,$CARDS["spades"]);
237           $posB = pos_array($b,$CARDS["spades"]);
238           if($posA && $posB)
239             if($posA <= $posB)
240               return 1;
241             else
242               return 0;
243
244           /* both hearts? */
245           $posA = pos_array($a,$CARDS["hearts"]);
246           $posB = pos_array($b,$CARDS["hearts"]);
247           if($posA && $posB)
248             if($posA <= $posB)
249               return 1;
250             else
251               return 0;
252
253           /* both diamonds? */
254           $posA = pos_array($a,$CARDS["diamonds"]);
255           $posB = pos_array($b,$CARDS["diamonds"]);
256           if($posA && $posB)
257             if($posA <= $posB)
258               return 1;
259             else
260               return 0;
261
262           /* not the same suit and no trump: a wins */
263           return 1;
264         }
265     }
266 }
267
268 function get_winner($p,$mode)
269 {
270   /* get all 4 cards played in a trick, in the order they are played */
271   $tmp = $p[1];
272   $c1    = $tmp["card"];
273   $c1pos = $tmp["pos"];
274
275   $tmp = $p[2];
276   $c2    = $tmp["card"];
277   $c2pos = $tmp["pos"];
278
279   $tmp = $p[3];
280   $c3    = $tmp["card"];
281   $c3pos = $tmp["pos"];
282
283   $tmp = $p[4];
284   $c4    = $tmp["card"];
285   $c4pos = $tmp["pos"];
286
287   /* first card is better than all the rest */
288   if( compare_cards($c1,$c2,$mode) && compare_cards($c1,$c3,$mode) && compare_cards($c1,$c4,$mode) )
289     return $c1pos;
290
291   /* second card is better than first and better than the rest */
292   if( !compare_cards($c1,$c2,$mode) &&  compare_cards($c2,$c3,$mode) && compare_cards($c2,$c4,$mode) )
293     return $c2pos;
294
295   /* third card is better than first card and better than last */
296   if( !compare_cards($c1,$c3,$mode) &&  compare_cards($c3,$c4,$mode) )
297     /* if second card is better than first, third card needs to be even better */
298     if( !compare_cards($c1,$c2,$mode) && !compare_cards($c2,$c3,$mode) )
299       return $c3pos;
300     /* second is worse than first, e.g. not following suite */
301     else if (compare_cards($c1,$c2,$mode) )
302       return $c3pos;
303
304   /* non of the above */
305   return $c4pos;
306 }
307
308 function count_nines($cards)
309 {
310   $nines = 0;
311
312   foreach($cards as $c)
313     {
314       if($c == "25" || $c == "26") $nines++;
315       else if($c == "33" || $c == "34") $nines++;
316       else if($c == "41" || $c == "42") $nines++;
317       else if($c == "47" || $c == "48") $nines++;
318     }
319
320   return $nines;
321 }
322
323 function check_wedding($cards)
324 {
325
326   if( in_array("3",$cards) && in_array("4",$cards) )
327     return 1;
328
329   return 0;
330 }
331
332 function count_trump($cards,$status='pregame')
333 {
334   global $RULES;
335
336   $trump = 0;
337
338   /* count each trump, including the foxes, since this is used to determine poverty status */
339   foreach($cards as $c)
340     if( (int)($c) <27)
341       $trump++;
342
343   /* In case we really want to know the amount of trump, we can use the status variable.
344    * This is needed for example to figure out what icon to display on the table in case of
345    * trump given back in poverty */
346   if($status=='all') return $trump;
347
348   /* normally foxes don't count as trump, so we substract them here
349    * in case someone has schweinchen, one or two of them should count as trump
350    * though, so we need to add one trump for those cases */
351
352   /* subtract foxes */
353   if( in_array("19",$cards))
354     $trump--;
355   if( in_array("20",$cards) )
356     $trump--;
357
358   /* handle case where player has schweinchen */
359   if( in_array("19",$cards) && in_array("20",$cards) )
360     switch($RULES["schweinchen"])
361       {
362       case "both":
363         /* add two, in case the player has both foxes (schweinchen) */
364         $trump++;
365         $trump++;
366         break;
367       case "second":
368       case "secondaftercall":
369         /* add one, in case the player has both foxes (schweinchen) */
370         $trump++;
371         break;
372       case "none":
373         break;
374       }
375
376   return $trump;
377 }
378
379 function  create_array_of_random_numbers($useridA,$useridB,$useridC,$useridD)
380 {
381   global $debug;
382
383   $r = array();
384
385   if($debug)
386     {
387       $r[ 0]=1;     $r[12]=47;   $r[24]=13;       $r[36]=37;
388       $r[ 1]=2;     $r[13]=23;   $r[25]=14;       $r[37]=38;
389       $r[ 2]=3;     $r[14]=27;   $r[26]=15;       $r[38]=39;
390       $r[ 3]=4;     $r[15]=16;   $r[27]=28;       $r[39]=40;
391       $r[ 4]=5;     $r[16]=17;   $r[28]=29;       $r[40]=41;
392       $r[ 5]=18;    $r[17]=6;    $r[29]=30;       $r[41]=42;
393       $r[ 6]=21;    $r[18]=7;    $r[30]=31;       $r[42]=43;
394       $r[ 7]=22;    $r[19]=8;    $r[31]=32;       $r[43]=44;
395       $r[ 8]=45;    $r[20]=9;    $r[32]=19;       $r[44]=33;
396       $r[ 9]=46;    $r[21]=10;   $r[33]=20;       $r[45]=24;
397       $r[10]=35;    $r[22]=11;   $r[34]=48;       $r[46]=25;
398       $r[11]=36;    $r[23]=12;   $r[35]=34;       $r[47]=26;
399     }
400   else
401     {
402       /* check if we can find a game were non of the player was involved and return
403        * cards insted
404        */
405       $userstr = "'".implode("','",array($useridA,$useridB,$useridC,$useridD))."'";
406       $randomnumbers = DB_get_unused_randomnumbers($userstr);
407       $randomnumbers = explode(":",$randomnumbers);
408
409       if(sizeof($randomnumbers)==48)
410         return $randomnumbers;
411
412       /* need to create new numbers */
413       for($i=0;$i<48;$i++)
414         $r[$i]=$i+1;
415
416       /* shuffle using a better random generator than the standard one */
417       for ($i = 0; $i <48; $i++)
418         {
419           $j = @mt_rand(0, $i);
420           $tmp = $r[$i];
421           $r[$i] = $r[$j];
422           $r[$j] = $tmp;
423         }
424     };
425
426   return $r;
427 }
428
429 function display_cards($me,$myturn)
430 {
431   return;
432 }
433
434 function have_suit($cards,$c)
435 {
436   global $CARDS;
437   $suite = array();
438
439   if(in_array($c,$CARDS["trump"]))
440     $suite = $CARDS["trump"];
441   else if(in_array($c,$CARDS["clubs"]))
442     $suite = $CARDS["clubs"];
443   else if(in_array($c,$CARDS["spades"]))
444     $suite = $CARDS["spades"];
445   else if(in_array($c,$CARDS["hearts"]))
446     $suite = $CARDS["hearts"];
447   else if(in_array($c,$CARDS["diamonds"]))
448     $suite = $CARDS["diamonds"];
449
450   foreach($cards as $card)
451     {
452       if(in_array($card,$suite))
453         return 1;
454     }
455
456   return 0;
457 }
458
459 function same_type($card,$c)
460 {
461   global $CARDS;
462   $suite = "";
463
464   /* figure out what kind of card c is */
465   if(in_array($c,$CARDS["trump"]))
466     $suite = $CARDS["trump"];
467   else if(in_array($c,$CARDS["clubs"]))
468     $suite = $CARDS["clubs"];
469   else if(in_array($c,$CARDS["spades"]))
470     $suite = $CARDS["spades"];
471   else if(in_array($c,$CARDS["hearts"]))
472     $suite = $CARDS["hearts"];
473   else if(in_array($c,$CARDS["diamonds"]))
474     $suite = $CARDS["diamonds"];
475
476   /* card is the same suid return 1 */
477   if(in_array($card,$suite))
478     return 1;
479
480   return 0;
481 }
482
483 function set_gametype($gametype)
484 {
485   global $CARDS;
486   global $RULES;
487   global $GAME;
488
489   switch($gametype)
490     {
491     case "normal":
492     case "wedding":
493     case "poverty":
494     case "dpoverty":
495     case "trump":
496     case "silent":
497       $CARDS["trump"]    = array('1','2','3','4','5','6','7','8','9','10','11','12','13','14','15','16',
498                                  '17','18','19','20','21','22','23','24','25','26');
499       $CARDS["diamonds"] = array();
500       $CARDS["clubs"]    = array('27','28','29','30','31','32','33','34');
501       $CARDS["spades"]   = array('35','36','37','38','39','40','41','42');
502       $CARDS["hearts"]   = array('43','44','45','46','47','48');
503       $CARDS["foxes"]    = array('19','20');
504       if($RULES["dullen"]=='none')
505         {
506           $CARDS["trump"]    = array('3','4','5','6','7','8','9','10','11','12','13','14','15','16',
507                                      '17','18','19','20','21','22','23','24','25','26');
508           $CARDS["hearts"]   = array('43','44','1','2','45','46','47','48');
509         }
510       /* do we need to reorder for Schweinchen? need to search for it because of special case for dullen above*/
511       if($RULES['schweinchen']=='both'&& $GAME['schweinchen-who'])
512         {
513           /* find the fox and put them at the top of the stack */
514           foreach(array('19','20') as $fox)
515             {
516               /* search for fox */
517               $trump = $CARDS['trump'];
518               $key = array_keys($trump, $fox);
519
520               /* reorder */
521               $foxa = array();
522               $foxa[]=$trump[$key[0]];
523               unset($trump[$key[0]]);
524               $trump = array_merge($foxa,$trump);
525               $CARDS['trump'] = $trump;
526             }
527         }
528       else if( ($RULES['schweinchen']=='second' || $RULES['schweinchen']=='secondaftercall')
529                && $GAME['schweinchen-who'])
530         {
531           /* find the fox and put them at the top of the stack */
532           $trump = $CARDS['trump'];
533           $key = array_keys($trump, '19');
534
535           /* reorder */
536           $foxa = array();
537           $foxa[]=$trump[$key[0]];
538           unset($trump[$key[0]]);
539           $trump = array_merge($foxa,$trump);
540           $CARDS['trump'] = $trump;
541         }
542       break;
543     case "queen":
544       $CARDS["trump"]    = array('3','4','5','6','7','8','9','10');
545       $CARDS["clubs"]    = array('27','28','29','30','31','32','11','12','33','34');
546       $CARDS["spades"]   = array('35','36','37','38','39','40','13','14','41','42');
547       $CARDS["hearts"]   = array('43','44', '1', '2','45','46','15','16','47','48');
548       $CARDS["diamonds"] = array('19','20','21','22','23','24','17','18','25','26');
549       $CARDS["foxes"]    = array();
550       break;
551     case "jack":
552       $CARDS["trump"]    = array('11','12','13','14','15','16','17','18');
553       $CARDS["clubs"]    = array('27','28','29','30','31','32','3', '4','33','34');
554       $CARDS["spades"]   = array('35','36','37','38','39','40','5', '6','41','42');
555       $CARDS["hearts"]   = array('43','44', '1', '2','45','46','7', '8','47','48');
556       $CARDS["diamonds"] = array('19','20','21','22','23','24','9','10','25','26');
557       $CARDS["foxes"]    = array();
558       break;
559     case "trumpless":
560       $CARDS["trump"]    = array();
561       $CARDS["clubs"]    = array('27','28','29','30','31','32','3', '4','11','12','33','34');
562       $CARDS["spades"]   = array('35','36','37','38','39','40','5', '6','13','14','41','42');
563       $CARDS["hearts"]   = array('43','44', '1', '2','45','46','7', '8','15','16','47','48');
564       $CARDS["diamonds"] = array('19','20','21','22','23','24','9','10','17','18','25','26');
565       $CARDS["foxes"]    = array();
566       break;
567     case "club":
568       $CARDS["trump"]    = array('1','2','3','4','5','6','7','8','9','10','11','12','13','14','15','16',
569                                  '17','18','27','28','29','30','31','32','33','34');
570       $CARDS["clubs"]    = array();
571       $CARDS["spades"]   = array('35','36','37','38','39','40','41','42');
572       $CARDS["hearts"]   = array('43','44','45','46','47','48');
573       $CARDS["diamonds"] = array('19','20','21','22','23','24','25','26');
574       $CARDS["foxes"]    = array();
575       if($RULES["dullen"]=='none')
576         {
577           $CARDS["trump"]    = array('3','4','5','6','7','8','9','10','11','12','13','14','15','16',
578                                      '17','18','27','28','29','30','31','32','33','34');
579           $CARDS["hearts"]   = array('43','44','1','2','45','46','47','48');
580         }
581       break;
582     case "spade":
583       $CARDS["trump"]    = array('1','2','3','4','5','6','7','8','9','10','11','12','13','14','15','16',
584                                  '17','18','35','36','37','38','39','40','41','42');
585       $CARDS["clubs"]    = array('27','28','29','30','31','32','33','34');
586       $CARDS["spades"]   = array();
587       $CARDS["hearts"]   = array('43','44','45','46','47','48');
588       $CARDS["diamonds"] = array('19','20','21','22','23','24','25','26');
589       $CARDS["foxes"]    = array();
590       if($RULES["dullen"]=='none')
591         {
592           $CARDS["trump"]    = array('3','4','5','6','7','8','9','10','11','12','13','14','15','16',
593                                      '17','18','35','36','37','38','39','40','41','42');
594           $CARDS["hearts"]   = array('43','44','1','2','45','46','47','48');
595         }
596       break;
597     case "heart":
598       $CARDS["trump"]    = array('1','2','3','4','5','6','7','8','9','10','11','12','13','14','15','16',
599                                  '17','18','43','44','45','46','47','48');
600       $CARDS["clubs"]    = array('27','28','29','30','31','32','33','34');
601       $CARDS["spades"]   = array('35','36','37','38','39','40','41','42');
602       $CARDS["hearts"]   = array();
603       $CARDS["diamonds"] = array('19','20','21','22','23','24','25','26');
604       $CARDS["foxes"]    = array();
605       if($RULES["dullen"]=='none')
606         {
607           $CARDS["trump"]    = array('3','4','5','6','7','8','9','10','11','12','13','14','15','16',
608                             '17','18','43','44','1','2','45','46','47','48');
609         }
610       break;
611     }
612 }
613
614 function mysort($cards,$gametype)
615 {
616   global $PREF;
617   if(isset($PREF['sorting']))
618     if($PREF['sorting']=='high-low')
619       usort ( $cards, 'sort_comp_high_low' );
620     else
621       usort ( $cards, 'sort_comp_low_high' );
622   else
623     usort ( $cards, 'sort_comp_high_low' );
624   return $cards;
625 }
626
627 function sort_comp_high_low($a,$b)
628 {
629   global $CARDS;
630
631   $ALL = array();
632   $ALL = array_merge($CARDS['trump'],$CARDS['diamonds'],$CARDS['clubs'],
633                      $CARDS['hearts'],$CARDS['spades']);
634
635   return pos_array($a,$ALL)-pos_array($b,$ALL);
636 }
637
638 function sort_comp_low_high($a,$b)
639 {
640   global $CARDS;
641
642   $ALL = array();
643   $ALL = array_merge($CARDS['trump'],$CARDS['diamonds'],$CARDS['clubs'],
644                      $CARDS['hearts'],$CARDS['spades']);
645
646   return -pos_array($a,$ALL)+pos_array($b,$ALL);
647 }
648
649 function can_call($what,$hash)
650 {
651   global $RULES;
652
653   $gameid   = DB_get_gameid_by_hash($hash);
654   $gametype = DB_get_gametype_by_gameid($gameid);
655   $oldcall  = DB_get_call_by_hash($hash);
656   $pcall    = DB_get_partner_call_by_hash($hash);
657
658   if( ($pcall!=NULL && $what >= $pcall) ||
659       ($oldcall!=NULL && $what >=$oldcall) )
660     {
661       return 0;
662     }
663
664   $NRcards  = count(DB_get_hand($hash));
665
666   $NRallcards = 0;
667   for ($i=1;$i<5;$i++)
668     {
669       $user         = DB_get_hash_from_game_and_pos($gameid,$i);
670       $NRallcards  += count(DB_get_hand($user));
671     };
672
673   /* in case of a wedding, everything will be delayed by an offset */
674   $offset = 0;
675   if($gametype=="wedding")
676     {
677       $offset = DB_get_sickness_by_gameid($gameid);
678       if ($offset <0) /* not resolved */
679         return 0;
680     };
681
682   switch ($RULES["call"])
683     {
684     case "1st-own-card":
685       if( 4-($what/30) >= 12 - ($NRcards + $offset))
686         return 1;
687       break;
688     case "5th-card":
689       if( 27+4*($what/30) <= $NRallcards + $offset*4)
690         return 1;
691       break;
692     case "9-cards":
693
694       if($oldcall!=NULL && $pcall!=NULL)
695         $mincall = ($oldcall>$pcall) ? $pcall : $oldcall;
696       else if($oldcall!=NULL)
697         $mincall = $oldcall;
698       else if ($pcall!=NULL)
699         $mincall = $pcall;
700       else
701         $mincall = -1;
702
703       if( 12 <= ($NRcards + $offset))
704         {
705           return 1;
706         }
707       else if ( 9 <= ($NRcards + $offset))
708         {
709           if( ($mincall>=0 && $mincall==120) )
710             return 1;
711         }
712       else if ( 6 <= ($NRcards + $offset))
713         {
714           if( ($mincall>=0 && $mincall<=90 && $what<=60 ) )
715             return 1;
716         }
717       else if ( 3 <= ($NRcards + $offset))
718         {
719           if( ($mincall>=0 && $mincall<=60 && $what<=30 ) )
720             return 1;
721         }
722       else if ( 0 <= ($NRcards + $offset))
723         {
724           if( ($mincall>=0 && $mincall<=30 && $what==0 ) )
725             return 1;
726         };
727       break;
728     }
729
730   return 0;
731 }
732
733 function display_table ()
734 {
735   global $gameid, $GT, $debug,$INDEX,$defaulttimezone,$session;
736   global $RULES,$GAME,$gametype;
737
738   $result = DB_query("SELECT  User.fullname as name,".
739                      "        Hand.position as position, ".
740                      "        User.id, ".
741                      "        Hand.party as party, ".
742                      "        Hand.sickness as sickness, ".
743                      "        Hand.point_call, ".
744                      "        User.last_login, ".
745                      "        Hand.hash,       ".
746                      "        User.timezone    ".
747                      "FROM Hand ".
748                      "LEFT JOIN User ON User.id=Hand.user_id ".
749                      "WHERE Hand.game_id='".$gameid."' ".
750                      "ORDER BY position ASC");
751
752   echo "<div class=\"table\">\n".
753     "  <img class=\"table\" src=\"pics/table.png\" alt=\"table\" />\n";
754   while($r = DB_fetch_array($result))
755     {
756       $name  = $r[0];
757       $pos   = $r[1];
758       $user  = $r[2];
759       $party = $r[3];
760       $sickness  = $r[4];
761       $call      = $r[5];
762       $hash      = $r[7];
763       $timezone  = $r[8];
764       date_default_timezone_set($defaulttimezone);
765       $lastlogin = strtotime($r[6]);
766       date_default_timezone_set($timezone);
767       $timenow   = strtotime(date("Y-m-d H:i:s"));
768
769       echo "  <div class=\"table".($pos-1)."\">\n";
770
771       if($debug)
772         echo "   <a href=\"".$INDEX."?action=game&amp;me=".$hash."\">";
773       if($vacation = check_vacation($user))
774         {
775           $start   = $vacation[0];
776           $stop    = substr($vacation[1],0,10);
777           $comment = $vacation[2];
778
779               $title = "begin: $start  end: $stop $comment";
780               echo "   <span class=\"vacation\" title=\"$title\">$name (on vacation until $stop)</span> \n";
781         }
782       else
783         echo "   $name \n";
784       if($debug)
785         echo"</a>\n";
786
787       /* add hints for poverty, wedding, solo, etc */
788       if( $gametype != "solo")
789         if( $RULES["schweinchen"]=="both" && $GAME["schweinchen-who"]==$hash )
790           echo " Schweinchen. <br />";
791
792       if($GT=="poverty" && $party=="re")
793         if($sickness=="poverty")
794           {
795             $userhash = DB_get_hash_from_gameid_and_userid($gameid,$user);
796             $cards    = DB_get_all_hand($userhash);
797             $trumpNR  = count_trump($cards,'all');
798             if($trumpNR)
799               echo "   <img src=\"pics/button/poverty_trump_button.png\" class=\"button\" alt=\"poverty < trump back\" title=\"poverty - trump back\" />";
800             else
801               echo "   <img src=\"pics/button/poverty_notrump_button.png\" class=\"button\" alt=\"poverty <\" title=\"poverty - no trump back\" />";
802           }
803         else
804           echo "   <img src=\"pics/button/poverty_partner_button.png\" class=\"button\" alt=\"poverty >\" title=\"poverty partner\" />";
805
806       if($GT=="dpoverty")
807         if($party=="re")
808           if($sickness=="poverty")
809             {
810               $userhash = DB_get_hash_from_gameid_and_userid($gameid,$user);
811               $cards    = DB_get_all_hand($userhash);
812               $trumpNR  = count_trump($cards,'all');
813               if($trumpNR)
814                 echo "   <img src=\"pics/button/poverty_trump_button.png\" class=\"button\" alt=\"poverty < trump back\" title=\"poverty - trump back\" />";
815               else
816                 echo "   <img src=\"pics/button/poverty_notrump_button.png\" class=\"button\" alt=\"poverty <\" title=\"poverty - no trump back\" />";
817             }
818           else
819             echo "   <img src=\"pics/button/poverty_partner_button.png\" class=\"button\" alt=\"poverty >\" title=\"poverty partner\" />";
820         else
821           if($sickness=="poverty")
822             {
823               $userhash = DB_get_hash_from_gameid_and_userid($gameid,$user);
824               $cards    = DB_get_all_hand($userhash);
825               $trumpNR  = count_trump($cards,'all');
826               if($trumpNR)
827                 echo "   <img src=\"pics/button/poverty2_trump_button.png\" class=\"button\" alt=\"poverty2 < trump back\" title=\"poverty2 - trump back\"/>";
828               else
829                 echo "   <img src=\"pics/button/poverty2_notrump_button.png\" class=\"button\" alt=\"poverty2 <\" title=\"poverty2 - no trump back\" />";
830             }
831           else
832             echo "   <img src=\"pics/button/poverty2_partner_button.png\" class=\"button\" alt=\"poverty2 >\" title=\"poverty2 partner\" />";
833
834       if($GT=="wedding" && $party=="re")
835         if($sickness=="wedding")
836           echo "   <img src=\"pics/button/wedding_button.png\" class=\"button\" alt=\"wedding\" title=\"wedding\" />";
837         else
838           echo "   <img src=\"pics/button/wedding_partner_button.png\" class=\"button\" alt=\"wedding partner\" title=\"wedding partner\" />";
839
840       if(ereg("solo",$GT) && $party=="re")
841         {
842           if(ereg("queen",$GT))
843             echo "   <img src=\"pics/button/queensolo_button.png\" class=\"button\" alt=\"$GT\" title=\"Queen solo\" />";
844           else if(ereg("jack",$GT))
845             echo "   <img src=\"pics/button/jacksolo_button.png\" class=\"button\" alt=\"$GT\" title=\"Jack solo\" />";
846           else if(ereg("club",$GT))
847             echo "   <img src=\"pics/button/clubsolo_button.png\" class=\"button\" alt=\"$GT\" title=\"Club solo\" />";
848           else if(ereg("spade",$GT))
849             echo "   <img src=\"pics/button/spadesolo_button.png\" class=\"button\" alt=\"$GT\" title=\"Spade solo\" />";
850           else if(ereg("heart",$GT))
851             echo "   <img src=\"pics/button/heartsolo_button.png\" class=\"button\" alt=\"$GT\" title=\"Heart solo\" />";
852           else if(ereg("trumpless",$GT))
853             echo "   <img src=\"pics/button/notrumpsolo_button.png\" class=\"button\" alt=\"$GT\" title=\"Trumpless solo\" />";
854           else if(ereg("trump",$GT))
855             echo "   <img src=\"pics/button/trumpsolo_button.png\" class=\"button\" alt=\"$GT\" title=\"Trump solo\" />";
856         }
857
858       /* add point calls */
859       if($call!=NULL)
860         {
861           if($party=="re")
862             echo "  <img src=\"pics/button/re_button.png\" class=\"button\" alt=\"re\" title=\"Re\" />";
863           else
864             echo "  <img src=\"pics/button/contra_button.png\" class=\"button\" alt=\"contra\" title=\"Contra\" />";
865           switch($call)
866             {
867             case "0":
868               echo "   <img src=\"pics/button/0_button.png\" class=\"button\" alt=\"0\" title=\"Call 0\" />";
869               break;
870             case "30":
871               echo "   <img src=\"pics/button/30_button.png\" class=\"button\" alt=\"30\" title=\"Call 30\" />";
872               break;
873             case "60":
874               echo "   <img src=\"pics/button/60_button.png\" class=\"button\" alt=\"60\" title=\"Call 60\" />";
875               break;
876             case "90":
877               echo "   <img src=\"pics/button/90_button.png\" class=\"button\" alt=\"90\" title=\"Call 90\" />";
878               break;
879             }
880         }
881
882       echo "    <br />\n";
883       echo "    <span title=\"local time: ".date("Y-m-d H:i:s",$timenow).  " ".
884                              "last login: ".date("Y-m-d H:i:s",$lastlogin)."\">".
885                              "<img src=\"pics/button/time-info.png\" class=\"button\" alt-\"time info\" />".
886                              "</span>\n";
887       echo "   </div>\n";
888
889     }
890   echo  "</div>\n"; /* end output table */
891
892
893   return;
894 }
895
896
897 function display_user_menu($id)
898 {
899   global $WIKI,$INDEX;
900
901   $result = DB_query("SELECT Hand.hash,Hand.game_id,Game.player from Hand".
902                      " LEFT JOIN Game On Hand.game_id=Game.id".
903                      " WHERE Hand.user_id='$id'".
904                      " AND ( Game.player='$id' OR ISNULL(Game.player) )".
905                      " AND Game.status<>'gameover'".
906                      " ORDER BY Game.session" );
907
908   $i=0;
909   while( $r = DB_fetch_array($result))
910     {
911       if($i==0)
912         {
913           echo "<div class=\"usermenu\">\n";
914           echo "It's your turn in these games:<br />\n";
915         }
916
917       $i++;
918       echo "<a href=\"".$INDEX."?action=game&amp;me=".$r[0].
919         "\">game ".DB_format_gameid($r[1])." </a><br />\n";
920       if($i>4)
921         {
922           echo "...<br />\n";
923           break;
924         }
925     }
926
927   if($i)
928     echo  "</div>\n";
929   return;
930 }
931
932 function generate_score_table($session)
933 {
934   /* returns an array with N entries
935    * $score[$i]["gameid"]   = gameid
936    * $score[$i]["players"] = array (id=>total points)
937    * $score[$i]["points"]   = points for this game
938    * $score[$i]["solo"]     = 1 or 0
939    */
940   $score = array();
941   $i=0;
942
943   /* get all ids */
944   $gameids = DB_get_gameids_of_finished_games_by_session($session);
945
946   if($gameids == NULL)
947     return $score;
948
949   /* get player id, names... from the first game */
950   $player = array();
951   $result = DB_query("SELECT User.id, User.fullname from Hand".
952                      " LEFT JOIN User On Hand.user_id=User.id".
953                      " WHERE Hand.game_id=".$gameids[0]);
954   while( $r = DB_fetch_array($result))
955     $player[$r[0]] = 0;
956
957   /* get points and generate table */
958   foreach($gameids as $gameid)
959     {
960       $re_score = DB_get_score_by_gameid($gameid);
961       $gametype = DB_get_gametype_by_gameid($gameid);
962       foreach($player as $id=>$points)
963         {
964           $party = DB_get_party_by_gameid_and_userid($gameid,$id);
965           if($party == "re")
966             if($gametype=="solo")
967               $player[$id] += 3*$re_score;
968             else
969               $player[$id] += $re_score;
970           else if ($party == "contra")
971             $player[$id] -= $re_score;
972         }
973       $score[$i]['gameid']  = $gameid ;
974       $score[$i]['players'] = $player;
975       $score[$i]['points']  = abs($re_score);
976       $score[$i]['solo']    = ($gametype=="solo");
977
978       $i++;
979     }
980
981   return $score;
982 }
983
984 function generate_global_score_table()
985 {
986   $return = array();
987
988   /* get all ids */
989   $gameids = DB_get_gameids_of_finished_games_by_session(0);
990
991   if($gameids == NULL)
992     return '';
993
994   /* get player id, names... from the User table */
995   $player = array();
996   $result = DB_query('SELECT User.id, User.fullname FROM User');
997
998   /* save information in an array */
999   while( $r = DB_fetch_array($result))
1000     $player[$r[0]] = array('name'=> $r[1], 'points' => 0 ,'nr' => 0);
1001
1002   /* get points and generate table */
1003   foreach($gameids as $gameid)
1004     {
1005       $re_score = DB_get_score_by_gameid($gameid);
1006       $gametype = DB_get_gametype_by_gameid($gameid);
1007
1008       /* get players involved in this game */
1009       $result = DB_query('SELECT user_id FROM Hand WHERE game_id='.DB_quote_smart($gameid));
1010       while($r = DB_fetch_array($result))
1011         {
1012           $id = $r[0];
1013           $party = DB_get_party_by_gameid_and_userid($gameid,$id);
1014           if($party == 're')
1015             if($gametype=='solo')
1016               $player[$id]['points'] += 3*$re_score;
1017             else
1018               $player[$id]['points'] += $re_score;
1019           else if ($party == 'contra')
1020             $player[$id]['points'] -= $re_score;
1021           if($party)
1022             $player[$id]['nr']+=1;
1023         }
1024     }
1025
1026   function cmp($a,$b)
1027   {
1028     if($a['nr']==0 ) return 1;
1029     if($b['nr']==0) return 1;
1030
1031     $a=$a['points']/$a['nr'];
1032     $b=$b['points']/$b['nr'];
1033
1034     if ($a == $b)
1035       return 0;
1036     return ($a > $b) ? -1 : 1;
1037   }
1038   usort($player,'cmp');
1039
1040   foreach($player as $pl)
1041     {
1042       /* limit to players with at least 10 games */
1043       if($pl['nr']>10)
1044         $return[] = array( $pl['name'], round($pl['points']/$pl['nr'],3), $pl['points'],$pl['nr']);
1045     }
1046
1047   return $return;
1048 }
1049
1050 function format_score_table_ascii($score)
1051 {
1052   $output="";
1053   if(sizeof($score)==0)
1054     return "";
1055
1056   /* truncate table if we have too many games */
1057   $max = sizeof($score);
1058   if($max>6) $output.=" (table truncated to last 6 games)\n";
1059
1060   /* output header */
1061   foreach($score[0]['players'] as $id=>$points)
1062     {
1063       $name = DB_get_name('userid',$id); /*TODO*/
1064       $output.= "  ".substr($name,0,2)."  |";
1065     }
1066   $output.="  P   |\n";
1067   $output.= "------+------+------+------+------+\n";
1068
1069   /* output score for each game */
1070   $i=0;
1071   foreach($score as $game)
1072     {
1073       $i++;
1074       if($i-1<$max-6) continue;
1075
1076       foreach($game['players'] as $id=>$points)
1077         $output.=str_pad($points,6," ",STR_PAD_LEFT)."|";
1078       $output.=str_pad($game['points'],4," ",STR_PAD_LEFT);
1079
1080       /* check for solo */
1081       if($game['solo'])
1082         $output.= " S|";
1083       else
1084         $output.= "  |";
1085
1086       $output.="\n";
1087     }
1088   return $output;
1089 }
1090
1091 function format_score_table_html($score,$userid)
1092 {
1093   global $INDEX;
1094
1095   if(sizeof($score)==0)
1096     return "";
1097
1098   $output = "<div class=\"scoretable\">\n<table class=\"score\">\n";
1099
1100   /* output header */
1101   $header = "";
1102   $header.= " <thead>\n  <tr>\n";
1103   $header.= "   <th> No </th>";
1104   foreach($score[0]['players'] as $id=>$points)
1105     {
1106       $name = DB_get_name('userid',$id); /*TODO*/
1107       $header.= "<th> ".substr($name,0,2)." </th>";
1108     }
1109   $header.="<th>P</th>\n  </tr>\n </thead>\n";
1110
1111   /* use the same as footer */
1112   $footer = "";
1113   $footer.= " <tfoot>\n  <tr>\n";
1114   $footer.= "   <td> No </td>";
1115   foreach($score[0]['players'] as $id=>$points)
1116     {
1117       $name = DB_get_name('userid',$id); /*TODO*/
1118       $footer.= "<td> ".substr($name,0,2)." </td>";
1119     }
1120   $footer.="<td>P</td>\n  </tr>\n </tfoot>\n";
1121
1122   /* body */
1123   $body = "";
1124   $body.= " <tbody>\n";
1125   $i=0;
1126   foreach($score as $game)
1127     {
1128       $i++;
1129       $body.="  <tr>";
1130       $userhash = DB_get_hash_from_gameid_and_userid($game['gameid'],$userid);
1131       /* create link to old games only if you are logged in and its your game*/
1132       if(isset($_SESSION['id']) && $_SESSION['id']==$userid)
1133         $body.="  <td> <a href=\"".$INDEX."?action=game&amp;me=".$userhash."\">$i</a></td>";
1134       else
1135         $body.="  <td>$i</td>";
1136
1137       foreach($game['players'] as $id=>$points)
1138         $body.="<td>".$points."</td>";
1139       $body.="<td>".$game['points'];
1140
1141       /* check for solo */
1142       if($game['solo'])
1143         $body.= " S";
1144       $body.="</td></tr>\n";
1145     }
1146
1147   $output.=$header;
1148   if($i>12)
1149     $output.=$footer;
1150   $output.=$body;
1151
1152   $output.=" </tbody>\n</table>\n</div>\n";
1153
1154   return $output;
1155 }
1156
1157 function createCache($content, $cacheFile)
1158 {
1159   $fp = fopen($cacheFile,"w");
1160   if($fp)
1161     {
1162       fwrite($fp,$content);
1163       fclose($fp);
1164     }
1165   else
1166     echo "WARNING: couldn't create cache file";
1167
1168   return;
1169 }
1170
1171 function getCache($cacheFile, $expireTime)
1172 {
1173   if( file_exists($cacheFile) &&
1174       filemtime($cacheFile )>( time() - $expireTime ) )
1175     {
1176       return file_get_contents($cacheFile);
1177     }
1178
1179   return false;
1180 }
1181
1182 function check_vacation($userid)
1183 {
1184   /* get start date */
1185   $result = DB_query_array("SELECT value FROM User_Prefs".
1186                      " WHERE user_id='$userid' AND pref_key='vacation start'" );
1187   if($result)
1188     $start = $result[0];
1189   else
1190     return NULL;
1191
1192   /* get end date */
1193   $result = DB_query_array("SELECT value FROM User_Prefs".
1194                      " WHERE user_id='$userid' AND pref_key='vacation stop'" );
1195   if($result)
1196     $stop = $result[0];
1197   else
1198     return NULL;
1199
1200   /* get comment */
1201   $result = DB_query_array("SELECT value FROM User_Prefs".
1202                      " WHERE user_id='$userid' AND pref_key='vacation comment'" );
1203   if($result)
1204     $comment = $result[0];
1205   else
1206     $comment = '';
1207
1208   /* check if user is on vacation. TODO: use user's timezone */
1209   if( (time() - strtotime($start) >0) &&
1210       (strtotime($stop) - time()  >0))
1211     return array ($start,$stop,$comment);
1212   else
1213     return NULL;
1214 }
1215
1216 ?>