more emails during poverty, game number is displayed in email
[e-DoKo.git] / functions.php
index 7cc2826d2a41bc090bfd5c428e35ad209b23e4ab..f6a26d951aed27c60c58eb7338dcf742cd1a48e8 100644 (file)
@@ -6,7 +6,11 @@ function mymail($To,$Subject,$message)
 
   if($debug)
     {
-      $message = str_replace("\n","<br />",$message);
+      $message = str_replace("\n","<br />\n",$message);
+      $message = ereg_replace("[[:alpha:]]+://[^<>[:space:]]+[[:alnum:]/]",
+                     "<a href=\"\\0\">\\0</a>", $message);
+      //$message = ereg_replace("(http.*)[ <>]","<a href=\"\\1\">\\1 </a>",$message);
+      
       echo "<br />To: $To<br />Subject: $Subject <br />$message<br />\n";
     }
   else
@@ -14,89 +18,201 @@ function mymail($To,$Subject,$message)
   return;
 }
 
-function is_trump($c) { return (($c<27) ? 1:0);}
-function is_club($c)  { return (in_array($c,array('27','28','29','30','31','32','33','34')));}
-function is_spade($c) { return (in_array($c,array('35','36','37','38','39','40','41','42')));}
-function is_heart($c) { return (in_array($c,array('43','44','45','46','47','48')));}
+function myisset()
+{
+  /* returns 1 if all names passed as args are defined by a GET or POST statement,
+   * else return 0
+   */
+
+  $ok   = 1;
+  $args = func_get_args();
+  
+  foreach($args as $arg)
+    {
+      $ok = $ok * isset($_REQUEST[$arg]);
+      /*echo "$arg: ok = $ok <br />";
+       */ 
+    }
+  return $ok;
+}
+
+function pos_array($c,$arr)
+{
+  $ret = 0;
+
+  $i   = 0;
+  foreach($arr as $a)
+    {
+      $i++;
+      if($a == $c)
+       {
+         $ret = $i;
+         break;
+       }
+    }
+  return $ret;
+}
+
+function is_trump($c) 
+{ 
+  global $CARDS;
 
-function compare_cards($a,$b,$mode)
+  if(in_array($c,$CARDS["trump"]))
+    return 1;
+  else 
+    return 0;
+}
+
+function is_same_suite($c1,$c2) 
+{
+  global $CARDS;
+  
+  if(in_array($c1,$CARDS["trump"]   ) && in_array($c2,$CARDS["trump"]   ) ) return 1;
+  if(in_array($c1,$CARDS["clubs"]   ) && in_array($c2,$CARDS["clubs"]   ) ) return 1;
+  if(in_array($c1,$CARDS["hearts"]  ) && in_array($c2,$CARDS["hearts"]  ) ) return 1;
+  if(in_array($c1,$CARDS["spades"]  ) && in_array($c2,$CARDS["spades"]  ) ) return 1;
+  if(in_array($c1,$CARDS["diamonds"]) && in_array($c2,$CARDS["diamonds"]) ) return 1;
+  
+  return 0;
+}
+
+function compare_cards($a,$b,$game)
 {
   /* if "a" is higher than "b" return 1, else 0, "a" being the card first played */
 
-  /* don't think we need this */
+  global $CARDS;
+  global $RULES;
+  global $GAME;
+
+  /* first map all cards to the odd number, 
+   * this insure that the first card wins the trick 
+   * if they are the same card
+   */
   if( $a/2 - (int)($a/2) != 0.5)
     $a--;
   if( $b/2 - (int)($b/2) != 0.5)
     $b--;
-  
-  switch($mode)
+
+  /* some special cases */
+  switch($game)
     {
-    case "trumpless":
-      break;
-    case "jack":
-      break;
-    case "queen":
-      break;
+    case "normal":
+    case "silent":
+      if($RULES["schweinchen"]=="both" && $GAME["schweinchen"])
+       {
+         if($a == 19 || $a == 20 )
+           return 1;
+         if($b == 19 || $b == 20 )
+           return 0;
+       };
+      if($RULES["schweinchen"]=="second" && $GAME["schweinchen"]==3)
+       {
+         if($a == 19 || $a == 20 )
+           return 1;
+         if($b == 19 || $b == 20 )
+           return 0;
+       };
     case "trump":
-      break;
-    case "club":
-      break;
-    case "spade":
-      break;
     case "heart":
-      break;
-    case "normal":
-      /* first map all cards to the odd number */
-      if(is_trump($a) && $a<=$b)
-       return 1;
-      else if(is_trump($a) && $a>$b)
+    case "spade":
+    case "club":
+      if($RULES["dullen"]=="secondwins")
+       if($a==1 && $b==1) /* both 10 of hearts */
+         return 0;        /* second one wins.*/
+    }
+  
+  /* normal case */
+  if(is_trump($a) && is_trump($b) && $a<=$b)
+    return 1;
+  else if(is_trump($a) && is_trump($b) )
+    return 0;
+  else 
+    { /*$a is not a trump */
+      if(is_trump($b))
        return 0;
-      else 
-       { /*$a is not a trump */
-         if(is_trump($b))
-           return 0;
-         else
-           {
-             /* both clubs? */
-             if( is_club($a) && is_club($b))
-               if($a<=$b)
-                 return 1;
-               else
-                 return 0;
-             /* both spade? */
-             if( is_spade($a) && is_spade($b))
-               if($a<=$b)
-                 return 1;
-               else
-                 return 0;
-             /* both heart? */
-             if( is_heart($a) && is_heart($b))
-               if($a<=$b)
-                 return 1;
-               else
-                 return 0;
+      else
+       { /* both no trump */
+
+         /* both clubs? */
+         $posA = pos_array($a,$CARDS["clubs"]);
+         $posB = pos_array($b,$CARDS["clubs"]);
+         if($posA && $posB)
+           if($posA <= $posB)
              return 1;
-           }     
-       }
+           else
+             return 0;
+
+         /* both spades? */
+         $posA = pos_array($a,$CARDS["spades"]);
+         $posB = pos_array($b,$CARDS["spades"]);
+         if($posA && $posB)
+           if($posA <= $posB)
+             return 1;
+           else
+             return 0;
+
+         /* both hearts? */
+         $posA = pos_array($a,$CARDS["hearts"]);
+         $posB = pos_array($b,$CARDS["hearts"]);
+         if($posA && $posB)
+           if($posA <= $posB)
+             return 1;
+           else
+             return 0;
+
+         /* both diamonds? */
+         $posA = pos_array($a,$CARDS["diamonds"]);
+         $posB = pos_array($b,$CARDS["diamonds"]);
+         if($posA && $posB)
+           if($posA <= $posB)
+             return 1;
+           else
+             return 0;
+         
+         /* not the same suit and no trump: a wins */
+         return 1;
+       }         
     }
 } 
 
 function get_winner($p,$mode)
 {
-  /* get all 4 cards played in a trick */
-  $c1 = $p[1];
-  $c2 = $p[2];
-  $c3 = $p[3];
-  $c4 = $p[4];
+  /* get all 4 cards played in a trick, in the order they are played */
+  $tmp = $p[1];
+  $c1    = $tmp["card"];
+  $c1pos = $tmp["pos"]; 
 
-  /* find out who won */
+  $tmp = $p[2];
+  $c2    = $tmp["card"];
+  $c2pos = $tmp["pos"]; 
+
+  $tmp = $p[3];
+  $c3    = $tmp["card"];
+  $c3pos = $tmp["pos"]; 
+
+  $tmp = $p[4];
+  $c4    = $tmp["card"];
+  $c4pos = $tmp["pos"]; 
+
+  /* first card is better than all the rest */
   if( compare_cards($c1,$c2,$mode) && compare_cards($c1,$c3,$mode) && compare_cards($c1,$c4,$mode) )
-    return 1;
-  if( compare_cards($c2,$c3,$mode) && compare_cards($c2,$c4,$mode) )
-    return 2;
-  if( compare_cards($c3,$c4,$mode) )
-    return 3;
-  return 4;
+    return $c1pos; 
+
+  /* second card is better than first and better than the rest */
+  if( !compare_cards($c1,$c2,$mode) &&  compare_cards($c2,$c3,$mode) && compare_cards($c2,$c4,$mode) )
+    return $c2pos;
+
+  /* third card is better than first card and better than last */
+  if( !compare_cards($c1,$c3,$mode) &&  compare_cards($c3,$c4,$mode) )
+    /* if second card is better than first, third card needs to be even better */
+    if( !compare_cards($c1,$c2,$mode) && !compare_cards($c2,$c3,$mode) )
+      return $c3pos;
+    /* second is worse than first, e.g. not following suite */
+    else if (compare_cards($c1,$c2,$mode) )
+      return $c3pos;
+
+  /* non of the above */
+  return $c4pos;
 }
 
 function count_nines($cards)
@@ -117,7 +233,7 @@ function count_nines($cards)
 function check_wedding($cards)
 {
 
-  if( in_array("3",$cards) && in_array("2",$cards) )
+  if( in_array("3",$cards) && in_array("4",$cards) )
     return 1;
 
   return 0;
@@ -125,6 +241,8 @@ function check_wedding($cards)
 
 function count_trump($cards)
 {
+  global $RULES;
+
   $trump = 0;
 
   /* count each trump */
@@ -132,14 +250,23 @@ function count_trump($cards)
     if( (int)($c) <27) 
       $trump++;
 
-  /* subtract foxes */
-  if( in_array("19",$cards))
-    $trump--;
-  if( in_array("20",$cards) )
-    $trump--;
-  /* add one, in case the player has both foxes (schweinchen) */
-  if( in_array("19",$cards) && in_array("20",$cards) )
-    $trump++;
+  switch($RULES["schweinchen"])
+    {
+    case "none":
+      break;
+    case "second":
+    case "secondaftercall":
+      /* add one, in case the player has both foxes (schweinchen) */
+      if( in_array("19",$cards) && in_array("20",$cards) )
+       $trump++;
+    case "both":
+      /* subtract foxes */
+      if( in_array("19",$cards))
+       $trump--;
+      if( in_array("20",$cards) )
+       $trump--;
+      break;
+    }
 
   return $trump;
 }
@@ -221,7 +348,7 @@ function card_to_name($card)
       case 48:
       return "nine of hearts";
       default:
-      return "something went wrong, please contact the admin. Error: code1.";
+      return "something went wrong, please contact the admin. Error: code1. $card <br />";
     }
 }
 
@@ -229,9 +356,6 @@ function card_value($card)
 {
   switch($card)
     {
-    case 1:      /* heart */
-    case 2:
-      return 10;
     case 3:     /* clubes */    
     case 4:                     
     case 5:     /* spades */    
@@ -259,6 +383,8 @@ function card_value($card)
     case 43:    /* hearts */   
     case 44:                   
       return 11;
+    case 1:      /* heart */
+    case 2:
     case 21:    /* diamonds */    
     case 22:
     case 29:    /* clubs */
@@ -285,7 +411,7 @@ function card_value($card)
     case 48:                  
       return 0;
     default:
-      echo "something went wrong, please contact the admin. ErrorCode: 2<br>";
+      echo "something went wrong, please contact the admin. ErrorCode: 2 - $card<br>";
       return 0;
     }
 }
@@ -293,14 +419,36 @@ function card_value($card)
 
 function  create_array_of_random_numbers()
 {
+  global $debug;
+
   $r = array();
   $a = array();
   
-  for($i=1;$i<49;$i++)
-    $a[$i]=$i;
-  
-  $r = array_rand($a,48);
-   
+  if($debug)
+    {
+      $a[ 0]=1;     $a[12]=47;   $a[24]=13;       $a[36]=37;
+      $a[ 1]=2;     $a[13]=48;   $a[25]=14;      $a[37]=38;
+      $a[ 2]=3;     $a[14]=27;   $a[26]=15;      $a[38]=39;
+      $a[ 3]=4;     $a[15]=16;   $a[27]=28;      $a[39]=40;
+      $a[ 4]=5;     $a[16]=17;   $a[28]=29;      $a[40]=41;
+      $a[ 5]=18;    $a[17]=6;    $a[29]=30;      $a[41]=42;
+      $a[ 6]=19;    $a[18]=7;    $a[30]=31;      $a[42]=43;
+      $a[ 7]=20;    $a[19]=8;    $a[31]=32;      $a[43]=44;
+      $a[ 8]=45;    $a[20]=9;    $a[32]=21;      $a[44]=33;
+      $a[ 9]=46;    $a[21]=10;   $a[33]=22;      $a[45]=34;
+      $a[10]=35;    $a[22]=11;   $a[34]=23;      $a[46]=25;
+      $a[11]=36;    $a[23]=12;   $a[35]=24;      $a[47]=26;
+
+      $r = $a;             
+    }
+  else
+    {
+      for($i=0;$i<48;$i++)
+       $a[$i]=$i+1;
+      
+      $r = shuffle($a);
+    };
+
   return $r;
 }
 
@@ -332,4 +480,173 @@ function return_timezone($offset)
   return $zone;
 }
 
+function have_suit($cards,$c)
+{
+  global $CARDS;
+  $suite = array();
+
+  if(in_array($c,$CARDS["trump"]))
+    $suite = $CARDS["trump"];
+  else if(in_array($c,$CARDS["clubs"]))
+    $suite = $CARDS["clubs"];
+  else if(in_array($c,$CARDS["spades"]))
+    $suite = $CARDS["spades"];
+  else if(in_array($c,$CARDS["hearts"]))
+    $suite = $CARDS["hearts"];
+  else if(in_array($c,$CARDS["diamonds"]))
+    $suite = $CARDS["diamonds"];
+
+  foreach($cards as $card)
+    {
+      if(in_array($card,$suite))
+       return 1;
+    }
+
+  return 0;
+}
+
+function same_type($card,$c)
+{
+  global $CARDS;
+  $suite = "";
+
+  /* figure out what kind of card c is */
+  if(in_array($c,$CARDS["trump"]))
+    $suite = $CARDS["trump"];
+  else if(in_array($c,$CARDS["clubs"]))
+    $suite = $CARDS["clubs"];
+  else if(in_array($c,$CARDS["spades"]))
+    $suite = $CARDS["spades"];
+  else if(in_array($c,$CARDS["hearts"]))
+    $suite = $CARDS["hearts"];
+  else if(in_array($c,$CARDS["diamonds"]))
+    $suite = $CARDS["diamonds"];
+
+  /* card is the same suid return 1 */ 
+  if(in_array($card,$suite))
+    return 1;
+  
+  return 0;
+}
+
+function set_gametype($gametype)
+{
+  global $CARDS;
+  global $RULES;
+
+  switch($gametype)
+    {
+    case "normal":
+    case "wedding":
+    case "poverty":
+    case "dpoverty":
+    case "trump":
+    case "silent":
+      $CARDS["trump"]    = array('1','2','3','4','5','6','7','8','9','10','11','12','13','14','15','16', 
+                                '17','18','19','20','21','22','23','24','25','26');
+      $CARDS["diamonds"] = array();
+      $CARDS["clubs"]    = array('27','28','29','30','31','32','33','34');
+      $CARDS["spades"]   = array('35','36','37','38','39','40','41','42');
+      $CARDS["hearts"]   = array('43','44','45','46','47','48');
+      $CARDS["foxes"]    = array('19','20');
+      if($RULES["dullen"]=='none')
+       {
+         $CARDS["trump"]    = array('3','4','5','6','7','8','9','10','11','12','13','14','15','16', 
+                                    '17','18','19','20','21','22','23','24','25','26');
+         $CARDS["hearts"]   = array('43','44','1','2','45','46','47','48');
+       }
+      break;
+    case "queen":
+      $CARDS["trump"]    = array('3','4','5','6','7','8','9','10');
+      $CARDS["clubs"]    = array('27','28','29','30','31','32','11','12','33','34');
+      $CARDS["spades"]   = array('35','36','37','38','39','40','13','14','41','42');
+      $CARDS["hearts"]   = array('43','44', '1', '2','45','46','15','16','47','48');
+      $CARDS["diamonds"] = array('19','20','21','22','23','24','17','18','25','26');
+      $CARDS["foxes"]    = array();
+      break;
+    case "jack":
+      $CARDS["trump"]    = array('11','12','13','14','15','16','17','18');
+      $CARDS["clubs"]    = array('27','28','29','30','31','32','3', '4','33','34');
+      $CARDS["spades"]   = array('35','36','37','38','39','40','5', '6','41','42');
+      $CARDS["hearts"]   = array('43','44', '1', '2','45','46','7', '8','47','48');
+      $CARDS["diamonds"] = array('19','20','21','22','23','24','9','10','25','26');
+      $CARDS["foxes"]    = array();
+      break;
+    case "trumpless":
+      $CARDS["trump"]    = array();
+      $CARDS["clubs"]    = array('27','28','29','30','31','32','3', '4','11','12','33','34');
+      $CARDS["spades"]   = array('35','36','37','38','39','40','5', '6','13','14','41','42');
+      $CARDS["hearts"]   = array('43','44', '1', '2','45','46','7', '8','15','16','47','48');
+      $CARDS["diamonds"] = array('19','20','21','22','23','24','9','10','17','18','25','26');
+      $CARDS["foxes"]    = array();
+      break;
+    case "club":
+      $CARDS["trump"]    = array('1','2','3','4','5','6','7','8','9','10','11','12','13','14','15','16', 
+                                '17','18','27','28','29','30','31','32','33','34');
+      $CARDS["clubs"]    = array();
+      $CARDS["spades"]   = array('35','36','37','38','39','40','41','42');
+      $CARDS["hearts"]   = array('43','44','45','46','47','48');
+      $CARDS["diamonds"] = array('19','20','21','22','23','24','25','26');
+      $CARDS["foxes"]    = array();
+      if($RULES["dullen"]=='none')
+       {
+         $CARDS["trump"]    = array('3','4','5','6','7','8','9','10','11','12','13','14','15','16', 
+                                    '17','18','27','28','29','30','31','32','33','34');
+         $CARDS["hearts"]   = array('43','44','1','2','45','46','47','48');
+       }
+      break;
+    case "spade":
+      $CARDS["trump"]    = array('1','2','3','4','5','6','7','8','9','10','11','12','13','14','15','16', 
+                                '17','18','35','36','37','38','39','40','41','42');
+      $CARDS["clubs"]    = array('27','28','29','30','31','32','33','34');
+      $CARDS["spades"]   = array();
+      $CARDS["hearts"]   = array('43','44','45','46','47','48');
+      $CARDS["diamonds"] = array('19','20','21','22','23','24','25','26');
+      $CARDS["foxes"]    = array();
+      if($RULES["dullen"]=='none')
+       {
+         $CARDS["trump"]    = array('3','4','5','6','7','8','9','10','11','12','13','14','15','16', 
+                                    '17','18','35','36','37','38','39','40','41','42');
+         $CARDS["hearts"]   = array('43','44','1','2','45','46','47','48');
+       }
+      break;
+    case "heart":
+      $CARDS["trump"]    = array('1','2','3','4','5','6','7','8','9','10','11','12','13','14','15','16', 
+                                '17','18','43','44','45','46','47','48');
+      $CARDS["clubs"]    = array('27','28','29','30','31','32','33','34');
+      $CARDS["spades"]   = array('35','36','37','38','39','40','41','42');
+      $CARDS["hearts"]   = array();
+      $CARDS["diamonds"] = array('19','20','21','22','23','24','25','26');
+      $CARDS["foxes"]    = array();
+      if($RULES["dullen"]=='none')
+       {
+         $CARDS["trump"]    = array('3','4','5','6','7','8','9','10','11','12','13','14','15','16', 
+                           '17','18','43','44','1','2','45','46','47','48');
+       }
+      break;
+    }
+}
+
+function mysort($cards,$gametype)
+{
+  usort ( $cards, "sort_comp" );
+  return $cards;
+}
+
+function sort_comp($a,$b)
+{
+  global $CARDS;
+
+  $ALL = array();
+  $ALL = array_merge($CARDS["trump"],$CARDS["diamonds"],$CARDS["clubs"],
+                    $CARDS["hearts"],$CARDS["spades"],$CARDS["diamonds"]);
+
+  return pos_array($a,$ALL)-pos_array($b,$ALL);
+}
+
+function can_call($what,$hash)
+{
+  return 1;
+}
+
 ?>
\ No newline at end of file