X-Git-Url: https://git.nubati.net/cgi-bin/gitweb.cgi?p=e-DoKo.git;a=blobdiff_plain;f=functions.php;h=f33dd1c19b128a29bc0373495c100d6c34f5c240;hp=1c7b29b6f239a7d9e592868f861a3a71d6d925ac;hb=3bcf4379ee051e83db6bdd80b1ff04ad4b41206a;hpb=e70edfecc1252420ceb06f55a97e1f14f76a767a diff --git a/functions.php b/functions.php index 1c7b29b..f33dd1c 100644 --- a/functions.php +++ b/functions.php @@ -1,100 +1,224 @@ ",$message); - echo "
To: $To
Subject: $Subject
$message
\n"; + $message = str_replace("\n","
\n",$message); + $message = ereg_replace("[[:alpha:]]+://[^<>[:space:]]+[[:alnum:]/]", + "\\0", $message); + //$message = ereg_replace("(http.*)[ <>]","\\1 ",$message); + + echo "
To: $To
"; + if($header != "") + echo $header."
"; + echo "Subject: $Subject
$message
\n"; } else - mail($To,$Subject,$message); + if($header != "") + mail($To,$Subject,$message,$header); + else + mail($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
"; + */ + } + return $ok; +} -function compare_cards($a,$b) +function pos_array($c,$arr) { - /* if a is higher than b return 1, else 0, a being the card first played */ + $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; - /* first map all cards to the odd number */ + 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.*/ + } - if(is_trump($a) && $a<=$b) + /* normal case */ + if(is_trump($a) && is_trump($b) && $a<=$b) return 1; - else if(is_trump($a) && $a>$b) + 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? */ - if( is_club($a) && is_club($b)) - if($a<=$b) + $posA = pos_array($a,$CARDS["clubs"]); + $posB = pos_array($b,$CARDS["clubs"]); + if($posA && $posB) + if($posA <= $posB) return 1; else return 0; - /* both spade? */ - if( is_spade($a) && is_spade($b)) - if($a<=$b) + + /* 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 heart? */ - if( is_heart($a) && is_heart($b)) - if($a<=$b) + + /* 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; - return 1; + + /* 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) +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]; - - /* find out who won */ - if( compare_cards($c1,$c2) && compare_cards($c1,$c3) && compare_cards($c1,$c4) ) - return 1; - if( compare_cards($c2,$c3) && compare_cards($c2,$c4) ) - return 2; - if( compare_cards($c3,$c4) ) - return 3; - return 4; + /* 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) @@ -115,7 +239,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; @@ -123,6 +247,8 @@ function check_wedding($cards) function count_trump($cards) { + global $RULES; + $trump = 0; /* count each trump */ @@ -130,14 +256,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; } @@ -219,7 +354,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
"; } } @@ -227,9 +362,6 @@ function card_value($card) { switch($card) { - case 1: /* heart */ - case 2: - return 10; case 3: /* clubes */ case 4: case 5: /* spades */ @@ -257,6 +389,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 */ @@ -283,148 +417,46 @@ function card_value($card) case 48: return 0; default: - echo "something went wrong, please contact the admin. ErrorCode: 2
"; + echo "something went wrong, please contact the admin. ErrorCode: 2 - $card
"; return 0; } } -function display_card($card) -{ - /* cards are only availabl for the odd values, e.g. 1.png, 3.png, ... - * convert even cards to the matching odd value */ - - if( $card/2 - (int)($card/2) == 0.5) - echo "\"".card_to_name($card)."\"\n"; - else - echo "\"".card_to_name($card-1)."\"\n"; - - return; -} - -function display_link_card($card) -{ - if( $card/2 - (int)($card/2) == 0.5) - echo "\"\"\n"; - else - echo "\"\"\n"; - return; -} 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); - - return $r; -} - -function check_want_to_play($me) -{ - ?> -
- Do you want to play a game of DoKo? - yes - no
- - Do you want to get an email for every card played or only if it your move? - every card - only on my turn
-\n"; - echo "\n"; - echo "\n"; - echo "
\n"; - - return; -} - -function check_for_sickness($me,$mycards) -{ - ?> -

nothing implemented so far, but give it a try anyway ;)

- -
- - do you want to play solo? - -
- - "; - echo " no
\n"; - } - else - { - echo " no
\n"; - }; - - echo "do you have poverty?"; - if(count_trump($mycards)<4) + if($debug) { - echo " yes"; - echo " no
\n"; + $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 { - echo " no
\n"; + for($i=0;$i<48;$i++) + $r[$i]=$i+1; + + shuffle($r); }; - echo "do you have too many nines?"; - if(count_nines($mycards)>4) - { - echo " yes"; - echo " no
\n"; - } - else - { - echo " no
\n"; - }; - - echo "\n"; - echo "\n"; - - echo "
\n"; - - return; + return $r; } -function display_status() -{ - echo "
"; - echo " is someone playing solo, etc?"; - echo "
"; - - return; -} -function display_news() -{ - global $wiki; - echo "
". - "Please hit shift+reload.

". - "New Database backend, lost a few features on the way.

". - "If you find more bugs, please list them in the wiki.
\n"; - return; -} + function display_cards($me,$myturn) { @@ -441,6 +473,9 @@ function return_timezone($offset) case '-8': $zone = "America/Vancouver"; break; + case '13': + $zone = "Pacific/Auckland"; + break; default: $zone = "Europe/London"; } @@ -448,4 +483,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