Setup not completed";
echo "You need to set \$ADMIN_NAME in config.php.";
output_footer();
exit();
}
if(!isset($ADMIN_EMAIL))
{
output_header();
echo "Setup not completed
";
echo "You need to set \$ADMIN_EMAIL in config.php. ".
"If something goes wrong an email will be send to this address.";
output_footer();
exit();
}
if(!isset($DB_work))
{
output_header();
echo "Setup not completed
";
echo "You need to set \$DB_work in config.php. ".
"If this is set to 1, the game will be suspended and one can work safely on the database.".
"The default should be 0 for the game to work.";
output_footer();
exit();
}
if($DB_work)
{
output_header();
echo "Working on the database...please check back later.";
output_footer();
exit();
}
return;
}
function mymail($To,$Subject,$message,$header="")
{
global $debug,$EMAIL_REPLY;
if(isset($EMAIL_REPLY))
$header .= "From: e-DoKo daemon <$EMAIL_REPLY>\r\n";
if($debug)
{
$message = str_replace("\n","
\n",$message);
$message = ereg_replace("[[:alpha:]]+://[^<>[:space:]]+[[:alnum:]/]",
"\\0", $message);
echo "
To: $To
";
if($header != "")
echo $header."
";
echo "Subject: $Subject
$message
\n";
}
else
if($header != "")
mail($To,$Subject,$message,$header);
else
mail($To,$Subject,$message);
return;
}
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
";
*/
}
return $ok;
}
function myerror($message)
{
echo "".htmlspecialchars($message)."\n";
mymail($ADMIN_EMAIL,$EmailName." Error in Code",$message);
return;
}
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;
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 */
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--;
/* some special cases */
switch($game)
{
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":
case "heart":
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
{ /* 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, in the order they are played */
$tmp = $p[1];
$c1 = $tmp["card"];
$c1pos = $tmp["pos"];
$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 $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)
{
$nines = 0;
foreach($cards as $c)
{
if($c == "25" || $c == "26") $nines++;
else if($c == "33" || $c == "34") $nines++;
else if($c == "41" || $c == "42") $nines++;
else if($c == "47" || $c == "48") $nines++;
}
return $nines;
}
function check_wedding($cards)
{
if( in_array("3",$cards) && in_array("4",$cards) )
return 1;
return 0;
}
function count_trump($cards)
{
global $RULES;
$trump = 0;
/* count each trump */
foreach($cards as $c)
if( (int)($c) <27)
$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;
}
function create_array_of_random_numbers($useridA,$useridB,$useridC,$useridD)
{
global $debug;
$r = array();
if($debug)
{
$r[ 0]=1; $r[12]=47; $r[24]=13; $r[36]=37;
$r[ 1]=2; $r[13]=48; $r[25]=14; $r[37]=38;
$r[ 2]=3; $r[14]=27; $r[26]=15; $r[38]=39;
$r[ 3]=4; $r[15]=16; $r[27]=28; $r[39]=40;
$r[ 4]=5; $r[16]=17; $r[28]=29; $r[40]=41;
$r[ 5]=18; $r[17]=6; $r[29]=30; $r[41]=42;
$r[ 6]=19; $r[18]=7; $r[30]=31; $r[42]=43;
$r[ 7]=20; $r[19]=8; $r[31]=32; $r[43]=44;
$r[ 8]=45; $r[20]=9; $r[32]=21; $r[44]=33;
$r[ 9]=46; $r[21]=10; $r[33]=22; $r[45]=34;
$r[10]=35; $r[22]=11; $r[34]=23; $r[46]=25;
$r[11]=36; $r[23]=12; $r[35]=24; $r[47]=26;
}
else
{
/* check if we can find a game were non of the player was involved and return
* cards insted
*/
$userstr = "'".implode("','",array($useridA,$useridB,$useridC,$useridD))."'";
$randomnumbers = DB_get_unused_randomnumbers($userstr);
$randomnumbers = explode(":",$randomnumbers);
if(sizeof($randomnumbers)==48)
return $randomnumbers;
/* need to create new numbers */
for($i=0;$i<48;$i++)
$r[$i]=$i+1;
/* shuffle using a better random generator than the standard one */
for ($i = 0; $i <48; $i++)
{
$j = @mt_rand(0, $i);
$tmp = $r[$i];
$r[$i] = $r[$j];
$r[$j] = $tmp;
}
};
return $r;
}
function display_cards($me,$myturn)
{
return;
}
function return_timezone($offset)
{
switch($offset)
{
case '1':
$zone = "Europe/Berlin";
break;
case '-8':
$zone = "America/Vancouver";
break;
case '13':
$zone = "Pacific/Auckland";
break;
default:
$zone = "Europe/London";
}
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)
{
global $RULES;
$gameid = DB_get_gameid_by_hash($hash);
$gametype = DB_get_gametype_by_gameid($gameid);
$oldcall = DB_get_call_by_hash($hash);
$pcall = DB_get_partner_call_by_hash($hash);
if( ($pcall!=NULL && $what >= $pcall) ||
($oldcall!=NULL && $what >=$oldcall) )
{
return 0;
}
$NRcards = count(DB_get_hand($hash));
$NRallcards = 0;
for ($i=1;$i<5;$i++)
{
$user = DB_get_hash_from_game_and_pos($gameid,$i);
$NRallcards += count(DB_get_hand($user));
};
/* in case of a wedding, everything will be delayed by an offset */
$offset = 0;
if($gametype=="wedding")
{
$offset = DB_get_sickness_by_gameid($gameid);
if ($offset <0) /* not resolved */
return 0;
};
switch ($RULES["call"])
{
case "1st-own-card":
if( 4-($what/30) >= 12 - ($NRcards + $offset))
return 1;
break;
case "5th-card":
if( 27+4*($what/30) <= $NRallcards + $offset*4)
return 1;
break;
case "9-cards":
if($oldcall!=NULL && $pcall!=NULL)
$mincall = ($oldcall>$pcall) ? $pcall : $oldcall;
else if($oldcall!=NULL)
$mincall = $oldcall;
else if ($pcall!=NULL)
$mincall = $pcall;
else
$mincall = -1;
if( 12 <= ($NRcards + $offset))
{
return 1;
}
else if ( 9 <= ($NRcards + $offset))
{
if( ($mincall>=0 && $mincall==120) )
return 1;
}
else if ( 6 <= ($NRcards + $offset))
{
if( ($mincall>=0 && $mincall<=90 && $what<=60 ) )
return 1;
}
else if ( 3 <= ($NRcards + $offset))
{
if( ($mincall>=0 && $mincall<=60 && $what<=30 ) )
return 1;
}
else if ( 0 <= ($NRcards + $offset))
{
if( ($mincall>=0 && $mincall<=30 && $what==0 ) )
return 1;
};
break;
}
return 0;
}
?>