gc-fallout - db stats
[anomen-overlay.git] / www-apps / gc-fallout / dev / toolbox.php
blob6e3c6159d8302428b2cee86bf7359566ec494487
1 <?php
3 require_once('custom.php');
4 require_once('token.php');
5 require_once('ipcheck.php');
6 require_once('stats.php');
9 function PORADI()
11 $numargs = func_num_args();
12 if ($numargs < 3) {
13 return false;
15 $vstup = func_get_arg(0);
17 $current = 1;
18 $current_val = func_get_arg($current);
19 foreach ($vstup as $v) {
20 if ($v == $current_val) {
21 $current ++;
22 if ($current >= $numargs) {
23 return true;
25 $current_val = func_get_arg($current);
28 return false;
31 function PRIDEJ_PERK(&$U)
33 $arg_list = func_get_args();
34 array_shift($arg_list);
35 foreach ($arg_list as $perk) {
36 if (!in_array($perk, $U['perky'])) {
37 array_push($U['perky'], $perk);
42 function ODEBER_PERK(&$U)
44 $arg_list = func_get_args();
45 array_shift($arg_list);
46 foreach ($arg_list as $perk) {
47 $key = array_search($perk, $U['perky']);
48 if ($key !== FALSE) {
49 unset($U['perky'][$key]);
54 function MA_KLICE()
56 $arg_list = func_get_args();
57 $U = array_shift($arg_list);
58 foreach ($arg_list as $klic) {
59 if (!in_array($klic, $U['keylist'])) {
60 return false;
63 return true;
66 function parse_keys($klice_str)
68 $keys = array();
69 $keys_nums = preg_match_all('/\b\d+\b/', $klice_str, $keys);
70 $klice = array();
72 foreach ($keys[0] as $k) {
73 // echo "<br />klic" . intval($k); // DEBUG
74 $klice[] = intval($k);
76 return $klice;
79 function ohodnot_hrace(&$U)
81 $U['keylist'] = parse_keys($U['klice']);
83 $U['perky'] = array();
84 vyhodnot_klice($U);
86 if(!over_platnost($U)) {
87 /// cheater
88 dbstats_update($U, '', 'cheater');
89 echo "cheater";
90 die();
92 spocti_skore($U);
95 /**
96 * Vrati pole obsahujici klice vstupniho pole, ktere maji hodnotu true.
98 * Example:
99 * $v = array( 1=>true, 2=>false, 13=>true);
100 * $res = array_keys_true($v);
101 * // $res == array(1, 13);
103 function array_keys_true($keys)
105 $res = array();
106 foreach ($keys as $k => $v) {
107 if ($v) {
108 $res[] = $k;
111 return $res;