+$G_room_about = array( 'it' => '
![](\\"img/brisk_logo64.png\\"){kind=logo}
briscola chiamata in salsa ajax
version '.$G_brisk_version.'
-Copyright 2006-2008 Matteo Nastasi (aka mop)
'; +Copyright 2006-2012 Matteo Nastasi (aka mop)
', + 'en' => '
+
+
+ declaration briscola in ajax sauce (Beta)
+
+
+ declaration briscola in ajax sauce (Beta)
+version '.$G_brisk_version.'
+Copyright 2006-2012 Matteo Nastasi (aka mop)
'); + + +$G_PG_vow = array("a", "e", "i", "o", "u", "y"); +$G_PG_vow_n = 6; +$G_PG_cons = array( + "b", "bb", "bc", "bd", "bf", "bg", "bk", "bl", "bm", "bn", "bp", "br", "bs", "bt", "bv", "bw", "bz", + "c", "cb", "cc", "cd", "cf", "cg", "ck", "cl", "cm", "cn", "cp", "cq", "cr", "cs", "ct", "cv", "cw", "cx", "cz", + "d", "db", "dc", "dd", "df", "dg", "dk", "dl", "dm", "dn", "dp", "dr", "ds", "dt", "dv", "dw", "dx", "dz", + "f", "fb", "fc", "fd", "ff", "fg", "fk", "fl", "fm", "fn", "fp", "fr", "fs", "ft", "fv", "fw", "fx", "fz", + "g", "gb", "gc", "gd", "gf", "gg", "gk", "gl", "gm", "gn", "gp", "gr", "gs", "gt", "gv", "gw", "gx", "gz", + "j", "jb", "jc", "jd", "jf", "jg", "jk", "jl", "jm", "jn", "jp", "jq", "jr", "js", "jt", "jv", "jw", "jx", "jz", + "k", "kb", "kc", "kd", "kf", "kg", "kk", "kl", "km", "kn", "kp", "kr", "ks", "kt", "kv", "kw", "kx", "kz", + "l", "lb", "lc", "ld", "lf", "lg", "lk", "ll", "lm", "ln", "lp", "lr", "ls", "lt", "lv", "lw", "lx", "lz", + "m", "mb", "mc", "md", "mf", "mg", "mk", "ml", "mm", "mn", "mp", "mr", "ms", "mt", "mv", "mw", "mx", "mz", + "n", "nb", "nc", "nd", "nf", "ng", "nk", "nl", "nm", "nn", "np", "nr", "ns", "nt", "nv", "nw", "nx", "nz", + "p", "pb", "pc", "pd", "pf", "pg", "pk", "pl", "pm", "pn", "pp", "pr", "ps", "pt", "pv", "pw", "px", "pz", + "q", "qb", "qc", "qd", "qf", "qg", "qk", "ql", "qm", "qn", "qp", "qq", "qr", "qs", "qt", "qv", "qw", "qx", "qz", + "r", "rb", "rc", "rd", "rf", "rg", "rk", "rl", "rm", "rn", "rp", "rr", "rs", "rt", "rv", "rw", "rx", "rz", + "s", "sb", "sc", "sd", "sf", "sg", "sk", "sl", "sm", "sn", "sp", "sq", "sr", "ss", "st", "sv", "sw", "sx", "sz", + "t", "tb", "tc", "td", "tf", "tg", "tk", "tl", "tm", "tn", "tp", "tr", "ts", "tt", "tv", "tw", "tx", "tz", + "v", "vb", "vc", "vd", "vf", "vg", "vk", "vl", "vm", "vn", "vp", "vr", "vs", "vt", "vv", "vw", "vx", "vz", + "w", "wb", "wc", "wd", "wf", "wg", "wk", "wl", "wm", "wn", "wp", "wr", "ws", "wt", "wv", "ww", "wx", "wz", + "x", "xb", "xc", "xd", "xf", "xg", "xk", "xl", "xm", "xn", "xp", "xr", "xs", "xt", "xv", "xw", "xx", "xz", + "z", "zb", "zc", "zd", "zf", "zg", "zk", "zl", "zm", "zn", "zp", "zr", "zs", "zt", "zv", "zw", "zx", "zz", + ); +// $G_PG_cons_n = count($G_PG_cons); +// printf("N CONS: %d\n", $G_PG_cons_n); +$G_PG_cons_n = 345; + /* printf("%d %d\n", count($voc), count($cons)); */ + /* for ($i = 0 ; $i < 26 ; $i++) { */ + /* if (array_search(chr(ord('a') + $i), $voc) !== FALSE || $i == 7) */ + /* continue; */ + /* printf(' "%s", ', chr(ord('a') + $i)); */ + /* for ($e = 0 ; $e < 26 ; $e++) { */ + /* if (array_search(chr(ord('a') + $e), $voc) !== FALSE || $e == 7) */ + /* continue; */ + /* printf('"%s%s", ', chr(ord('a') + $i), chr(ord('a') + $e)); */ + /* } */ + /* printf("\n"); */ + /* } */ + +function ip2int($s) +{ + return (ip2long($s)); +} + +function int2ip($i) +{ + return (long2ip($i)); +} + +function int2four($l) +{ + if (PHP_INT_SIZE == 4) + return ($l); + + return ( ($l & 0x80000000 ? 0xffffffff00000000 : 0x00) | $l ); +} + +function four2int($s) +{ + return ($s & 0xffffffff); +} + +function ip2four($s) +{ + return int2four( ip2int($s) ); +} + +function four2ip($i) +{ + return int2ip( four2int($i) ); +} + +function nickserv_msg($dt, $msg) { + return sprintf('chatt_sub("%s",[0x040003,"%s"],"%s");', $dt, NICKSERV, $msg); +} + +function passwd_gen($seed = NULL) +{ + GLOBAL $G_PG_vow, $G_PG_vow_n, $G_PG_cons, $G_PG_cons_n; + + $pw = ""; + + if ($seed != NULL) + mt_srand($seed); + else + mt_srand(); + + for ($sil = 0 ; $sil < 7 ; $sil++) { + if (($sil % 2) == 0) { + // vowels + for ($n = 0 ; $n < mt_rand(1,2) ; $n++) { + if ($n == 0) { + $old = mt_rand(0, $G_PG_vow_n-1); + $pw .= $G_PG_vow[$old]; + } + else { + $new = mt_rand(0, $G_PG_vow_n-1); + if ($new == $old) + $new = ($new + mt_rand(0, $G_PG_vow_n-2)) % $G_PG_vow_n; + $pw .= $G_PG_vow[$new]; + } + } + } + else { + // consonants + $pw .= $G_PG_cons[mt_rand(0, $G_PG_cons_n-1)]; + } + } + + return $pw; +} + +function cmd_return($val, $desc) +{ + return array('val' => $val, 'desc' => $desc); +} + +function cmd_serialize($attrs) +{ + $ret = ""; + + $sep = ""; + foreach ($attrs as $key => $value) { + $ret .= $sep . $key . '=' . urlencode($value); + $sep = "&"; + } + return $ret; +} + +function cmd_deserialize($cmd) +{ + $ret = array(); + $a = explode('&', $cmd); + $i = 0; + while ($i < count($a)) { + $b = split('=', $a[$i]); + $ret[urldecode($b[0])] = urldecode($b[1]); + $i++; + } + + return $ret; +} + +// return values +// -1 v1 < v2 +// 0 equal +// 1 v1 > v2 +function versions_cmp($v1, $v2) +{ + // printf("V1: [%s]\nV2: [%s]\n", $v1, $v2); + if ($v1 == $v2) + return 0; + + $v1_ar = split('\.', $v1); + $v2_ar = split('\.', $v2); + + $v2_ct = count($v2_ar); + + for ($i = 0 ; $i < count($v1_ar) ; $i++) { + if (($v2_ct - 1) < $i) { + break; + } + // printf("here [%s] [%s]\n", $v1_ar[$i], $v2_ar[$i]); + if ($v1_ar[$i] != $v2_ar[$i]) { + if (strval($v1_ar[$i]) < strval($v2_ar[$i])) + return -1; + else + return 1; + } + } + return 0; +} + +// return string with IPV4 address +function addrtoipv4($addr) +{ + $ipv4addr_arr = explode(':' , $addr); + if (isset($ipv4addr_arr[3])) { + $ipv4addr = $ipv4addr_arr[3]; + } + else { + $ipv4addr = $addr; + } + return $ipv4addr; +} + +function mop_flush() +{ + for ($i = 0; $i < ob_get_level(); $i++) + ob_end_flush(); + ob_implicit_flush(1); + flush(); +} + +function force_no_cache(&$header_out) +{ + $header_out['Pragma'] = 'no-cache, must-revalidate'; + $header_out['Cache-Control'] = 'no-cache'; + $header_out['Expires'] = '-1'; +} + +function file_lock($fname, $is_exclusive) +{ + if (($res = @fopen($fname, "r+")) == FALSE) { + return (FALSE); + } + + if (flock($res, ($is_exclusive ? LOCK_EX : LOCK_SH)) == FALSE) { + fclose($res); + return (FALSE); + } + + return ($res); +} + +function file_unlock($res) +{ + if ($res != FALSE) { + flock($res, LOCK_UN); + fclose($res); + } +} +$escpush_from = array("\\", "\""); +$escpush_to = array("\\\\", "\\\""); +function escpush($s) +{ + GLOBAL $escpush_from, $escpush_to; + + return str_replace($escpush_from, $escpush_to, $s); +} + +$escinp_from = array( "\"" ); +$escinp_to = array( """ ); + +function escinput($s) +{ + GLOBAL $escinp_from, $escinp_to; + + return str_replace($escinp_from, $escinp_to, $s); +} + +function eschtml($s) +{ + return htmlentities($s, ENT_COMPAT, "UTF-8"); +} + +function esclfhtml($s) +{ + return str_replace(" ", " ", str_replace("\n", "
", htmlspecialchars($s))); +} + +function langtolng($lang) +{ + GLOBAL $G_lang; + + return ($G_lang == 'en' ? '-en' : ''); +} + +function csplitter($in, $sep) +{ + $st = 0; + $id = 0; + $out = array(); + $out[$id] = ""; + for ($i = 0 ; $i < strlen($in) ; $i++) { + $ini = substr($in, $i, 1); + if ($st == 0) { + if ($ini == '\\') + $st = 1; + else if ($ini == $sep) { + $id++; + $out[$id] = ""; + } + else { + $out[$id] .= $ini; + } + } + else if ($st == 1) { + $out[$id] .= $ini; + $st = 0; + } + } + + return ($out); +} function xcape($s) { @@ -132,235 +601,139 @@ function xcape($s) function xcapelt($s) { - $from = array ( '\\', '|' ); - $to = array ( '\\\\', '\\|' ); + $from = array ( '\\', '|', "\t", "\n"); + $to = array ( '\\\\', '\\|', "\\t", "\\n"); return (str_replace($from, $to, $s)); } -class Card { - var $value; /* 0 - 39 card value */ - var $stat; /* 'bunch', 'hand', 'table', 'take' */ - var $owner; /* (table position 0-4) */ - // var $pos; /* Pos in hand. */ - var $x; /* When played the X position on the table of the owner. */ - var $y; /* When played the Y position on the table of the owner. */ +function xcapemesg($s) +{ + $from = array ( "\n"); + $to = array ( "\\n"); - function Card($value, $stat, $owner) - { - $this->value = $value; - $this->stat = $stat; // Card stat - $this->owner = $owner; - } + return (str_replace($from, $to, $s)); +} - function assign($stat,$owner) - { - $this->stat = $stat; // Card stat - $this->owner = $owner; - } - function setpos($pos) - { - $this->pos = $pos; - } +class Vect { + function Vect($a) + { + $this->el = $a; + } - function play($x,$y) - { - $this->stat = 'table'; // Card stat - $this->x = $x; - $this->y = $y; - } + function getbyid($idx) + { + return ($this->el[$idx]); + } + + function setbyid($idx, $v) + { + $this->el[$idx] = $v; + } +} + +define('TABLE_AUTH_TY_PUBL', 0); +define('TABLE_AUTH_TY_AUTH', 1); +define('TABLE_AUTH_TY_CERT', 2); - function take($newown) - { - $this->stat = 'take'; // Card stat - $this->owner = $newown; - } -} // end class Card class Table { var $idx; var $player; var $player_n; - var $card; - var $mazzo; - var $gstart; - var $turn; - var $auth_only; + + var $auth_type; // required authorization to sit down var $wag_own; var $wag_com; var $wag_tout; - var $asta_pla; - var $asta_pla_n; - var $asta_card; - var $asta_pnt; - - var $mult; - var $points; // points array - var $points_n; // number of row of points - var $total; - - var $asta_win; - var $briscola; - var $friend; - - var $old_reason; - var $old_asta_pnt; - var $old_pnt; - var $old_win; - var $old_friend; - var $table_token; - var $table_start; + var $table_start; // information field var $wakeup_time; - function Table() + function Table() { } - - function &create($idx) - { - GLOBAL $G_false; - if (($thiz =& new Table()) == FALSE) - return ($G_false); + function create($idx) + { + if (($thiz = new Table()) == FALSE) + return (FALSE); $thiz->idx = $idx; $thiz->player = array(); $thiz->player_n = 0; - $thiz->card = FALSE; - $thiz->asta_pla = array(); // TRUE: in auction, FALSE: out of the auction - $thiz->asta_pla_n= -1; - $thiz->asta_card = -1; - $thiz->asta_pnt = -1; - $thiz->mult = 1; - - $thiz->auth_only = FALSE; - - $thiz->points = array( ); - $thiz->points_n = 0; - $thiz->total = array( 0, 0, 0, 0, 0); - $thiz->asta_win = -1; - $thiz->briscola = -1; - $thiz->friend = -1; - $thiz->turn = 0; - - $thiz->wag_own = NULL; + + if ($idx < TABLES_CERT_N) + $thiz->auth_type = TABLE_AUTH_TY_CERT; + else if ($idx < TABLES_AUTH_N) + $thiz->auth_type = TABLE_AUTH_TY_AUTH; + else + $thiz->auth_type = TABLE_AUTH_TY_PUBL; + + $thiz->wag_own = -1; $thiz->wag_com = ""; $thiz->wag_tout = 0; - $thiz->old_reason = ""; - $thiz->old_asta_pnt = -1; - $thiz->old_pnt = -1; - $thiz->old_win = -1; - $thiz->old_friend = -1; - $thiz->table_token = ""; $thiz->table_start = 0; - + $thiz->wakeup_time = 0; return ($thiz); } - function &clone(&$from) + function copy($from) { - GLOBAL $G_false; - - if (($thiz =& new Table()) == FALSE) - return ($G_false); - - $thiz->idx = $from->idx; - $thiz->player = array(); + $this->idx = $from->idx; + $this->player = array(); for ($i = 0 ; $i < $from->player_n ; $i++) - $thiz->player[$i] = $from->player[$i]; - $thiz->player_n = $from->player_n; - $thiz->card = $from->card; - $thiz->mazzo = $from->mazzo; // REVIEW - $thiz->gstart = $from->gstart; - $thiz->turn = $from->turn; - - $thiz->auth_only = $from->auth_only; - - $thiz->wag_own = $from->wag_own; - $thiz->wag_com = $from->wag_com; - $thiz->wag_tout = $from->wag_taut; - - $thiz->asta_pla = $from->asta_pla; - $thiz->asta_pla_n = $from->asta_pla_n; - $thiz->asta_card = $from->asta_card; - $thiz->asta_pnt = $from->asta_pnt; - - $thiz->mult = $from->mult; - $thiz->points = $from->points; - $thiz->points_n = $from->points_n; - $thiz->total = $from->total; - - $thiz->asta_win = $from->asta_win; - $thiz->briscola = $from->briscola; - $thiz->friend = $from->friend; - - $thiz->old_reason = $from->old_reason; - $thiz->old_asta_pnt = $from->old_asta_pnt; - $thiz->old_pnt = $from->old_pnt; - $thiz->old_win = $from->old_win; - $thiz->old_friend = $from->old_friend; + $this->player[$i] = $from->player[$i]; + $this->player_n = $from->player_n; - $thiz->table_token = $from->table_token; - $thiz->table_start = $from->table_start; + log_main("PLAYER_N - parent::copy.".$this->player_n); - $thiz->wakeup_time = $from->wakeup_time; + $this->auth_type = $from->auth_type; + + $this->wag_own = $from->wag_own; + $this->wag_com = $from->wag_com; + $this->wag_tout = $from->wag_tout; + + $this->table_token = $from->table_token; + $this->table_start = $from->table_start; + + $this->wakeup_time = $from->wakeup_time; + } + + function myclone($from) + { + if (($thiz = new Table()) == FALSE) + return (FALSE); + + $this->copy($from); return ($thiz); } - - function &spawn(&$from) + + function spawn($from) { - GLOBAL $G_false; - - if (($thiz =& new Table()) == FALSE) - return ($G_false); - + if (($thiz = new Table()) == FALSE) + return (FALSE); + $thiz->idx = $from->idx; + $thiz->player = array(); + for ($i = 0 ; $i < $from->player_n ; $i++) + $thiz->player[$i] = $i; $thiz->player_n = $from->player_n; - $thiz->card = &$thiz->bunch_create(); - $thiz->mazzo = $from->mazzo; - $thiz->gstart = $from->gstart; - $thiz->turn = $from->turn; - $thiz->auth_only = $from->auth_only; + $thiz->auth_type = $from->auth_type; $thiz->wag_own = $from->wag_own; $thiz->wag_com = $from->wag_com; - $thiz->wag_tout = $from->wag_taut; - - $thiz->asta_pla = $from->asta_pla; - $thiz->asta_pla_n = $from->asta_pla_n; - $thiz->asta_card = $from->asta_card; - $thiz->asta_pnt = $from->asta_pnt; - - $thiz->mult = $from->mult; - $thiz->points = $from->points; - $thiz->points_n = $from->points_n; - $thiz->total = $from->total; - - $thiz->asta_win = $from->asta_win; - $thiz->briscola = $from->briscola; - $thiz->friend = $from->friend; - - $thiz->old_reason = $from->old_reason; - $thiz->old_asta_pnt = $from->old_asta_pnt; - $thiz->old_pnt = $from->old_pnt; - $thiz->old_win = $from->old_win; - $thiz->old_friend = $from->old_friend; - - // players are rearranged in an dedicated array - $thiz->player = array(); - for ($i = 0 ; $i < $from->player_n ; $i++) - $thiz->player[$i] = $i; + $thiz->wag_tout = $from->wag_tout; $thiz->table_token = $from->table_token; $thiz->table_start = $from->table_start; @@ -369,24 +742,12 @@ class Table { return ($thiz); } - - function &bunch_create() - { - $ret = array(); - - for ($i = 0 ; $i < 40 ; $i++) { - $ret[$i] =& new Card($i, 'bunch', 'no_owner'); - } - $oret = &$ret; - return ($oret); - } - - function wag_set(&$user, $mesg) + function wag_set($user_idx, $mesg) { log_main("WAG_SET"); - $this->wag_own = &$user; + $this->wag_own = $user_idx; $this->wag_com = $mesg; $this->wag_tout = 0; } @@ -396,90 +757,17 @@ class Table { log_main("WAG_RESET"); unset($this->wag_own); - $this->wag_own = NULL; + $this->wag_own = -1; $this->wag_com = ""; $this->wag_tout = $timeout; } - function bunch_make() - { - $ct = array(0,0,0,0,0); - - mt_srand(make_seed()); - - for ($i = 39 ; $i >= 0 ; $i--) - $rest[$i] = $i; - - for ($i = 39 ; $i >= 0 ; $i--) { - $rn = rand(0, $i); - - if ($rn == 0) - log_main("RND ZERO"); - - $id = $rest[$rn]; - - $owner = $i % 5; - $this->card[$id]->assign('hand', $owner); - - $rest[$rn] = $rest[$i]; - // $pubbpos[$rn2] = $pubbpos[$i]; - } - } - - function init(&$userarr) - { - $this->mazzo = rand(0,PLAYERS_N-1); - $this->points_n = 0; - $this->mult = 1; - $this->old_win =-1; - $this->old_reason = ""; - for ($i = 0 ; $i < PLAYERS_N ; $i++) { - $this->total[$i] = 0; - $user_cur = &$userarr[$this->player[$i]]; - $user_cur->exitislock = TRUE; - } - - log_main("table::init: ci siamo"); - } - - function game_init(&$userarr) - { - log_rd2("GSTART 4"); - - $this->gstart = ($this->mazzo+1) % PLAYERS_N; - $this->bunch_make(); - - - $this->asta_pla_n = PLAYERS_N; - $this->asta_card = -1; - $this->asta_pnt = 60; - $this->asta_win = -1; - $this->briscola = -1; - $this->friend = -1; - $this->turn = 0; - - for ($i = 0 ; $i < PLAYERS_N ; $i++) { - $this->asta_pla[$i] = TRUE; - $user_cur = &$userarr[$this->player[$i]]; - $user_cur->subst = 'asta'; - $user_cur->asta_card = -2; - $user_cur->asta_pnt = -1; - $user_cur->handpt = $this->hand_points($i); - // SEE function calculate_points(&$table) - } - } - - function game_next() - { - $this->mazzo = ($this->mazzo + 1) % PLAYERS_N; - } - - function getPlayer($idx) + function player_get($idx) { return ($this->player[$idx]); } - function setPlayer($idx, $player) + function player_set($idx, $player) { $this->player[$idx] = $player; } @@ -488,22 +776,22 @@ class Table { { $this->player[$this->player_n] = $idx; $this->player_n++; - + return ($this->player_n - 1); } - - function user_rem(&$room, &$user) + + function user_rem($brisk, $user) { $tabpos = $user->table_pos; - + /* verifico la consistenza dei dati */ - if ($room->user[$this->player[$tabpos]] == $user) { - + if ($brisk->user[$this->player[$tabpos]] == $user) { + /* aggiorna l'array dei giocatori al tavolo. */ for ($i = $tabpos ; $i < $this->player_n-1 ; $i++) { - $this->player[$i] = $this->player[$i+1]; - $user_cur = &$room->user[$this->player[$i]]; - $user_cur->table_pos = $i; + $this->player[$i] = $this->player[$i+1]; + $user_cur = $brisk->user[$this->player[$i]]; + $user_cur->table_pos = $i; } $this->player_n--; } @@ -512,52 +800,8 @@ class Table { } } - function hand_points($idx) - { - GLOBAL $G_all_points; - - $tot = 0; - - for ($i = 0 ; $i < 40 ; $i++) { - if ($this->card[$i]->owner != $idx) - continue; - - $ctt = $this->card[$i]->value % 10; - $tot += $G_all_points[$ctt]; - } - - return ($tot); - } - - function exitlock_show(&$userarr, $table_pos) - { - $ct = $this->exitlock_calc(&$userarr, $table_pos); - - $ret = sprintf('exitlock_show(%d, %s);', $ct, - ($userarr[$this->player[$table_pos]]->exitislock ? 'true' : 'false')); - return ($ret); - } - - function exitlock_calc(&$userarr, $table_pos) - { - $ct = 0; - - for ($i = 0 , $ct = 0 ; $i < PLAYERS_N ; $i++) { - if ($userarr[$this->player[$i]]->exitislock == FALSE) - $ct++; - } - - return ($ct); - } - - - - - // $ret .= table_act_content(($user->subst == 'standup'), $this->table[$i]->player_n, $i, $user->table, - // ($this->table[$i]->auth_only == FALSE ? TRUE : $user->flags & USER_FLAG_AUTH)); - - // function act_content($isstanding, $sitted, $table, $cur_table, $allowed) - function act_content(&$user) + // Table->act_content - return 'id' of type of output required for table button + function act_content($user) { $ret = ""; $isstanding = ($user->subst == 'standup'); @@ -568,15 +812,23 @@ class Table { if ($isstanding) { if ($sitted < PLAYERS_N) { - if ($this->auth_only) { - if ($user->flags & USER_FLAG_AUTH) - $act = "sitreser"; - else - $act = 'reserved'; - } - else { - $act = 'sit'; - } + switch ($this->auth_type) { + case TABLE_AUTH_TY_CERT: + if ($user->is_cert() && !$user->is_appr()) + $act = "sitcert"; + else + $act = 'resercert'; + break; + case TABLE_AUTH_TY_AUTH: + if ($user->is_auth() && !$user->is_appr()) + $act = "sitreser"; + else + $act = 'reserved'; + break; + default: + $act = 'sit'; + break; + } } else { $act = 'none'; @@ -588,528 +840,622 @@ class Table { else $act = 'none'; } - + if ($act != '') $ret = sprintf('j_tab_act_cont(%d, \'%s\');', $table, $act); - + return ($ret); } +} // end class Table -} // end class Table - - -// User flags -define(USER_FLAG_AUTH, 0x02); - -// user status -define(USER_FLAG_S_NORM, 0x000); // done -define(USER_FLAG_S_PAU, 0x100); // done -define(USER_FLAG_S_OUT, 0x200); // done -define(USER_FLAG_S_DOG, 0x300); // done -define(USER_FLAG_S_EAT, 0x400); // done -define(USER_FLAG_S_WRK, 0x500); // done -define(USER_FLAG_S_SMK, 0x600); // done -define(USER_FLAG_S_EYE, 0x700); // done - -define(USER_FLAG_S_ALL, 0xf00); // done - -class User { - var $name; // name of the user - var $sess; // session of the user - var $ip; // ip of the user - var $lacc; // last access (for the cleanup) - var $laccwr; // last access (for the cleanup) - var $bantime; // timeout to temporary ban - var $stat; // status (outdoor, room, table, game, ...) - var $subst; // substatus for each status - var $step; // step of the current status - var $trans_step; // step to enable transition between pages (disable == -1) - var $comm; // commands array - var $asta_card; // - var $asta_pnt; // - var $handpt; // Total card points at the beginning of the current hand. - var $exitislock; // Player can exit from the table ? - var $table; // id of the current table (if in table state) - var $table_pos; // idx on the table - var $table_token;// token that identify a game on a table - var $flags; // Bitfield with: AUTHENTICATE: 0x02 - var $the_end; // Flag to change the end of the session - - var $chat_lst; // Last chat line - var $chattime; // Array of chat times - var $chat_cur; // Current chat line number - var $chat_ban; // Time for ban chat - var $chat_dlt; // Delta t for ban - function User() { - } +class Delay_Manager +{ + var $delta; + var $lastckeck; + var $triglevel; + + function Delay_Manager($triglevel) + { + $this->triglevel = $triglevel; + $this->delta = array(); + $this->lastcheck = 0; + } + + function delta_get($curtime) + { + // clean too old delta items + for ($i = 0 ; $i < count($this->delta) ; $i++) { + if ($this->delta[$i][0] < $curtime) { + array_splice($this->delta, $i, 1); + $i--; + } + } - function &create($name, $sess, $stat = "", $subst = "", $table = -1, $ip="0.0.0.0") { - GLOBAL $G_false; - - if (($thiz =& new User()) == FALSE) - return ($G_false); - - $thiz->name = $name; - $thiz->sess = $sess; - $thiz->ip = $ip; - $thiz->lacc = time(); - $thiz->laccwr = time(); - $thiz->bantime = 0; - $thiz->stat = $stat; - $thiz->subst = $subst; - $thiz->step = 1; - $thiz->trans_step = -1; - $thiz->comm = array(); - $thiz->asta_card = -2; - $thiz->asta_pnt = -1; - $thiz->handpt = -1; - $thiz->exitislock = TRUE; - - $thiz->flags = 0x00; - - $thiz->chattime = array_fill(0, CHAT_N, 0); - $thiz->chat_cur = 0; - $thiz->chat_lst = ""; - $thiz->chat_ban = 0; - $thiz->chat_dlt = 0; - - $thiz->table = $table; - $thiz->table_pos = -1; - $thiz->table_token = ""; + // add new delta items if delay exceeded $this->triglevel sec + if ($curtime > $this->lastcheck + $this->triglevel && $curtime < $this->lastcheck + 1200.0) { + $delta = $curtime - $this->lastcheck - $this->triglevel; + array_push($this->delta, array($curtime + $delta , $delta)); + // fprintf(STDERR, "DELTA: add new delta [%f] [%f] [%f]\n", $this->triglevel, $curtime + $delta, $delta); + } - return ($thiz); - } + // extract the maximum valid delta + $delta_max = 0.0; + for ($i = 0 ; $i < count($this->delta) ; $i++) { + $delta_cur = $this->delta[$i][1]; + if ($delta_max < $delta_cur) + $delta_max = $delta_cur; + } - function &clone(&$from) - { - GLOBAL $G_false; - - if (($thiz =& new User()) == FALSE) - return ($G_false); - - $thiz->name = $from->name; - $thiz->sess = $from->sess; - $thiz->ip = $from->ip; - $thiz->lacc = $from->lacc; - $thiz->laccwr = $from->laccwr; - $thiz->bantime = $from->bantime; - $thiz->stat = $from->stat; - $thiz->subst = $from->subst; - $thiz->step = $from->step; - $thiz->trans_step = $from->trans_step; - $thiz->comm = array(); - - $i_start = (1 > ($from->step - COMM_N) ? 1 : ($from->step - COMM_N)); - for ($i = $i_start ; $i < $from->step ; $i++) { - $ii = $i % COMM_N; - $thiz->comm[$ii] = $from->comm[$ii]; - } - $thiz->asta_card = $from->asta_card; - $thiz->asta_pnt = $from->asta_pnt; - $thiz->handpt = $from->handpt; - $thiz->exitislock = $from->exitislock; - - $thiz->flags = $from->flags; - - $thiz->chattime = array(); - for ($i = 0 ; $i < CHAT_N ; $i++) - $thiz->chattime[$i] = $from->chattime[$i]; - $thiz->chat_cur = $from->chat_cur; - $thiz->chat_lst = $from->chat_lst; - $thiz->chat_ban = $from->chat_ban; - $thiz->chat_dlt = $from->chat_dlt; - - $thiz->table = $from->table; - $thiz->table_pos = $from->table_pos; - $thiz->table_token = $from->table_token; - $thiz->the_end = $from->the_end; + // fprintf(STDERR, "DELTA: status %d, delta_max: %f\n", count($this->delta), $delta_max); - return ($thiz); - } - - function &spawn(&$from, $table, $table_pos) - { - GLOBAL $G_false; - - if (($thiz =& new User()) == FALSE) - return ($G_false); - - $thiz->name = $from->name; - $thiz->sess = $from->sess; - $thiz->ip = $from->ip; - $thiz->lacc = $from->lacc; - $thiz->laccwr = $from->laccwr; - $thiz->bantime = $from->bantime; - $thiz->stat = $from->stat; - $thiz->subst = $from->subst; - $thiz->step = $from->step; - $thiz->trans_step = $from->trans_step; - $thiz->comm = array(); - - /* - $i_start = (1 > ($from->step - COMM_N) ? 1 : ($from->step - COMM_N)); - for ($i = $i_start ; $i < $from->step ; $i++) { - log_wr("TRY PUSH:".$i); - $ii = $i % COMM_N; - $thiz->comm[$ii] = $from->comm[$ii]; - } - */ - $thiz->asta_card = $from->asta_card; - $thiz->asta_pnt = $from->asta_pnt; - $thiz->handpt = $from->handpt; - $thiz->exitislock = $from->exitislock; - $thiz->the_end = $from->the_end; - - $thiz->flags = $from->flags; - - $thiz->chattime = array_fill(0, CHAT_N, 0); - $thiz->chat_cur = 0; - $thiz->chat_lst = ""; - $thiz->chat_ban = 0; - $thiz->chat_dlt = 0; - - - $thiz->table = $table; - $thiz->table_pos = $table_pos; - $thiz->table_token = $from->table_token; + return ($delta_max); + } - return ($thiz); - } - - function stat_set($stat) { - log_main("sess: [".$this->sess. "] NEW STAT: [".$stat."]"); - $this->stat = "$stat"; - - /* - if (validate_sess($this->sess)) { - if (file_exists(PROXY_PATH) == FALSE) - mkdir(PROXY_PATH); - $fp = fopen(PROXY_PATH."/".$this->sess.".stat", 'w'); - fwrite($fp, sprintf("%s\n",$this->stat)); - fclose($fp); - } - */ - } + function lastcheck_set($curtime) + { + $this->lastcheck = $curtime; + } +} - function step_set($step) { - $this->step = $step; - - do { - if (validate_sess($this->sess) == FALSE) - break; - if (file_exists(PROXY_PATH) == FALSE) - mkdir(PROXY_PATH); - if (($fp = @fopen(PROXY_PATH."/".$this->sess.".step", 'w')) == FALSE) - break; - fwrite($fp, pack("l",$this->step), 4); - fclose($fp); - - return (TRUE); - } while (0); +class Client_prefs { + var $listen; + var $supp_comp; - return (FALSE); - } + function Client_prefs() + { + } - function step_inc($delta = 1) { - $this->step += $delta; - - if (validate_sess($this->sess)) { - if (file_exists(PROXY_PATH) == FALSE) - mkdir(PROXY_PATH); - $fp = fopen(PROXY_PATH."/".$this->sess.".step", 'w'); - fwrite($fp, pack("l",$this->step), 4); - fclose($fp); + static function from_user($user) + { + $thiz = new Client_prefs(); + $thiz->user_load($user); - return (TRUE); + return ($thiz); } - - return (FALSE); - } - function reset() { - $curtime = time(); - log_legal($curtime, $this->sess, $this->name, "STAT:LOGOUT", ''); - - $tmp_sess = $this->sess; - $this->sess = ""; - step_unproxy($tmp_sess); - $this->name = ""; // OK here - while (array_pop($this->comm) != NULL); - $this->step = 0; - $this->chattime = array_fill(0, CHAT_N, 0); - $this->chat_cur = 0; - $this->chat_lst = ""; - $this->chat_ban = 0; - $this->chat_dlt = 0; - $this->the_end = FALSE; - } -} // end class User + static function from_json($json) + { + $thiz = new Client_prefs(); + if ($thiz->json_load($json) == FALSE) { + unset($thiz); + return (FALSE); + } + return ($thiz); + } -function step_get($sess) { - $fp = FALSE; - do { - if (validate_sess($sess) == FALSE) - break; - - if (file_exists(PROXY_PATH) == FALSE) - mkdir(PROXY_PATH); - if (($fp = @fopen(PROXY_PATH."/".$sess.".step", 'rb')) == FALSE) - break; - if (($s = fread($fp, 4)) == FALSE) - break; - if (strlen($s) != 4) - break; - $arr = unpack('l', $s); - fclose($fp); + function user_load($user) + { + fprintf(STDERR, "QQ %s: %x\n", __FUNCTION__, $user->flags); + $this->listen = ($user->flags & USER_FLAG_MAP_AUTH) >> 2; + if ($user->rec != FALSE) { + $this->supp_comp = $user->rec->supp_comp_get(); + } + else { + $this->supp_comp = "000000000000"; + } - // log_rd2("A0: ".$arr[0]." A1: ".$arr[1]); - return ($arr[1]); - } while (0); + fprintf(STDERR, "QQ %s: LISTEN: %d\n", __FUNCTION__, $this->listen); + } - if ($fp != FALSE) - fclose($fp); + function json_load($json_s) + { + $ret = FALSE; - log_rd2("STEP_GET: return false "); + do { + if (gettype($json_s) == "string") { + if (($json = json_decode($json_s)) == FALSE) + break; + } + else { + $json = $json_s; + } + if ($this->listen < 0 || $this->listen > 2) + break; + $this->listen = $json->listen; - return (FALSE); + if (mb_strlen($json->supp_comp, "ASCII") != 12) + break; + + for ($i = 0, $idx = 0 ; $i < 12 ; $i++) { + if (($json->supp_comp[$i] >= '0' && $json->supp_comp[$i] <= '9') || + ($json->supp_comp[$i] >= 'a' && $json->supp_comp[$i] <= 'f')) + continue; + break; + } + if ($i < 12) + break; + $this->supp_comp = $json->supp_comp; + $ret = TRUE; + } while (FALSE); + + return ($ret); + } + + function store($user, $is_save) + { + // save into DB + fprintf(STDERR, "QQ %s::%s PRE: %x\n", __CLASS__, __FUNCTION__, + $user->flags & (~USER_FLAG_S_ALL & ~USER_FLAG_AUTH)); + $user->flags_set(($this->listen << 2), USER_FLAG_MAP_AUTH); + fprintf(STDERR, "QQ %s::%s %x\n", __CLASS__, __FUNCTION__, + $user->flags); + if ($user->is_supp_custom()) { + $user->rec->supp_comp_set($this->supp_comp); + } + if ($is_save) + $user->prefs_store(); + } } -function step_unproxy($sess) { - log_rd2("UNPROXY: ".PROXY_PATH."/".$sess.".step"); - if (file_exists(PROXY_PATH) == FALSE) - mkdir(PROXY_PATH); - @unlink(PROXY_PATH."/".$sess.".step"); +define('GHOST_SESS_TOUT', 1800); +define('GHOST_SESS_REAS_LOUT', 1); // logout +define('GHOST_SESS_REAS_ANOT', 2); // another user get session +define('GHOST_SESS_REAS_TOUT', 3); // room timeout +define('GHOST_SESS_REAS_TTOT', 4); // table timeout +define('GHOST_SESS_REAS_ANON', 5); // anonymizer access +define('GHOST_SESS_REAS_PROX', 6); // proxy access + +class GhostSessEl +{ + var $time; + var $sess; + var $reas; + + function GhostSessEl($time, $sess, $reas) + { + $this->time = $time + GHOST_SESS_TOUT; + $this->sess = $sess; + $this->reas = $reas; + } } +class GhostSess +{ + var $gs; -class Room { - var $user; - var $table; - var $comm; // commands for many people - var $step; // current step of the comm array - var $garbage_timeout; - var $shm_sz; + function GhostSess() + { + $this->gs = array(); + } - function Room () { - $this->user = array(); - $this->table = array(); + // push or update for this session + function push($time, $sess, $reas) + { + foreach($this->gs as $el) { + if ($el->sess == "$sess") { + $el->reas = $reas; + $el->time = $time + GHOST_SESS_TOUT; + return TRUE; + } + } - for ($i = 0 ; $i < MAX_PLAYERS ; $i++) { - $this->user[$i] =& User::create("", ""); + $this->gs[] = new GhostSessEl($time, $sess, $reas); + return TRUE; } - for ($i = 0 ; $i < TABLES_N ; $i++) { - $this->table[$i] =& Table::create($i); - if ($i < 12) { - $row = ( (((int)($i / 4)) % 2) == 0 ); - $col = ($i % 2 == 0); - $this->table[$i]->auth_only = (($row && $col) || (!$row && !$col)); - } - else { - $this->table[$i]->auth_only = FALSE; - } + function pop($sess) + { + foreach($this->gs as $key => $el) { + if ($el->sess == "$sess") { + $ret = $this->gs[$key]; + unset($this->gs[$key]); + return ($ret); + } + } + return FALSE; + } + + function garbage_manager($curtime) + { + foreach($this->gs as $key => $el) { + if ($el->time < $curtime) { + unset($this->gs[$key]); + } + } + } +} + +class Brisk +{ + static $delta_t; + + var $crystal_filename; + var $user; + var $table; + var $match; + var $comm; // commands for many people + var $step; // current step of the comm array + var $garbage_timeout; + var $shm_sz; + + var $ban_list; // ban list (authized allowed) + var $black_list; // black list (anti-dos, noone allowed) + var $cloud_smasher; // list of cloud ip ranges to be rejected + var $ghost_sess; + var $delay_mgr; + + var $cds; + + public static $sess_cur; + + function Brisk() + { + $this->cds = NULL; + } + + // constructor + static function create($crystal_filename, $ban_list, $black_list, $cloud_smasher) { + if (($brisk_ser = @file_get_contents($crystal_filename)) != FALSE) { + if (($brisk = unserialize($brisk_ser)) != FALSE) { + fprintf(STDERR, "ROOM FROM FILE\n"); + rename($crystal_filename, $crystal_filename.".old"); + + $brisk->reload(TRUE, $ban_list, $black_list, $cloud_smasher); + + return($brisk); + } + } + + fprintf(STDERR, "NEW ROOM\n"); + $thiz = new Brisk(); + + $thiz->crystal_filename = $crystal_filename; + $thiz->user = array(); + $thiz->table = array(); + $thiz->match = array(); + + $thiz->ban_list = IpClass::create(); + $thiz->black_list = IpClass::create(); + $thiz->cloud_smasher = IpClass::create(); + $thiz->ghost_sess = new GhostSess(); + + for ($i = 0 ; $i < MAX_PLAYERS ; $i++) { + $thiz->user[$i] = User::create($thiz, $i, "", ""); + } + + for ($i = 0 ; $i < TABLES_N ; $i++) { + $thiz->table[$i] = Table::create($i); + } + $thiz->garbage_timeout = 0; + $thiz->shm_sz = SHM_DIMS_MIN; + + $thiz->delay_mgr = new Delay_Manager(1.5); + + static::$sess_cur = FALSE; + + $thiz->reload(TRUE, $ban_list, $black_list, $cloud_smasher); + + return ($thiz); + } + + function reload($is_first, $ban_list, $black_list, $cloud_smasher) + { + fprintf(STDERR, "RELOAD STUFF (%d)(%d)(%d)\n", + count($ban_list), count($black_list), count($cloud_smasher)); + + if (defined('CURL_DE_SAC_VERS')) { + if (brisk_cds_reload($this) == FALSE) { + exit(12); + } + } + $this->ban_list->update($ban_list); + $this->black_list->update($black_list); + $this->cloud_smasher->update($cloud_smasher); + + if (!$is_first) { + $this->banned_kickoff(); + $this->garbage_manager(TRUE); + } + } + + function banned_kickoff() + { + $is_ban = FALSE; + + for ($table_idx = 0 ; $table_idx < TABLES_N ; $table_idx++) { + $table_cur = $this->table[$table_idx]; + // if the table is complete and exists we check users IP + + if ($table_cur->player_n == PLAYERS_N) { + if (isset($this->match[$table_idx]) && + $table_cur->table_token == $bin5->table_token) { + log_main("PLAYERS == N TABLE ".$table_idx); + + $bin5 = $this->match[$table_idx]; + + $is_ban |= $bin5->banned_kickoff(); + } + } + } + + for ($i = 0 ; $i < MAX_PLAYERS ; $i++) { + $user_cur = $this->user[$i]; + + if ($user_cur->is_active() == FALSE) + continue; + + // check if the IP is blacklisted + if ($this->black_check($user_cur->ip) || + $this->cloud_check($user_cur->ip)) { + $user_cur->lacc = 0; + $is_ban = TRUE; + continue; + } + + // if authorized not check if banlisted + if ($user_cur->is_auth()) { + continue; + } + + if ($this->ban_check($user_cur->ip)) { + $user_cur->lacc = 0; + $is_ban = TRUE; + } + } + + return $is_ban; + } + + function ban_check($ip_str) + { + return ($this->ban_list->check($ip_str)); + } + + function black_check($ip_str) + { + return ($this->black_list->check($ip_str)); + } + + function cloud_check($ip_str) + { + return ($this->cloud_smasher->check($ip_str)); + } + + function users_cleanup() + { + for ($i = 0 ; $i < MAX_PLAYERS ; $i++) { + $user_cur = $this->user[$i]; + + if ($user_cur->the_end) { + $user_cur->reset(); // users_cleanup, OK + } + } } - $this->garbage_timeout = 0; - } function garbage_manager($force) { + GLOBAL $G_lang, $mlang_brisk, $G_base; + $ismod = FALSE; log_rd2("garbage_manager START"); /* Garbage collector degli utenti in timeout */ - $curtime = time(); - if ($force || $this->garbage_timeout < $curtime) { - - // Before all align times with table timeout - for ($table_idx = 0 ; $table_idx < TABLES_N ; $table_idx++) { - $table_cur =& $this->table[$table_idx]; - // if the table is complete and exists its shared mem we get the info about users lacc - - if ($table_cur->player_n == PLAYERS_N) { - log_main("PLAYERS == N TABLE ".$table_idx); - - if (($sem = Briskin5::lock_data($table_idx)) != FALSE) { - log_main("bin5 lock data success"); - - $no_recovery = FALSE; - if (($bri = &Briskin5::load_data($table_idx)) != FALSE) { - if ($table_cur->table_token != $bri->table_token) { - log_main("ERROR: not matching table_token. Room: ".$table_cur->table_token." Table: ".$bri->table_token); - log_main("ERROR: not matching table_start. Room: ".$table_cur->table_start." Table: ".$bri->table_start); - $no_recovery = TRUE; - $bri = FALSE; - } - } - - if ($bri != FALSE) { - // - // SPAWN: JOIN - // - log_main("garbage_manager: bri loaded successfully."); - $bri->garbage_manager(TRUE); - - $bri_table = &$bri->table[0]; - - // is the end of the table - if ($bri->the_end == TRUE) { - /* - * DESTROY OF FINISHED TABLE && MOVE PLAYER TO ROOM AGAIN - */ - log_main("garbage_manager: INSIDE THE END."); - - $plist = "$table_cur->table_token|$user_cur->table|$table_cur->player_n"; - for ($i = 0 ; $i < $table_cur->player_n ; $i++) { - $plist .= '|'.$this->user[$table_cur->player[$i]]->sess; + $curtime = microtime(TRUE); + + $delta = $this->delay_mgr->delta_get($curtime); + + if (!$force && !($this->garbage_timeout < $curtime)) { + $this->delay_mgr->lastcheck_set($curtime); + return ($ismod); + } + + // Before all align times with table timeout + for ($table_idx = 0 ; $table_idx < TABLES_N ; $table_idx++) { + $table_cur = $this->table[$table_idx]; + // if the table is complete and exists its shared mem we get the info about users lacc + + if ($table_cur->player_n == PLAYERS_N) { + log_main("PLAYERS == N TABLE ".$table_idx); + + + $no_recovery = FALSE; + if (isset($this->match[$table_idx])) { + $bin5 = $this->match[$table_idx]; + + if ($table_cur->table_token != $bin5->table_token) { + log_main("ERROR: not matching table_token. Brisk: ".$table_cur->table_token." Table: ".$bin5->table_token); + log_main("ERROR: not matching table_start. Brisk: ".$table_cur->table_start." Table: ".$bin5->table_start); + $no_recovery = TRUE; + $bin5 = FALSE; } - for ($i = 0 ; $i < $bri_table->player_n ; $i++) { - // stat must be "table" by definition - $user_cur =& $this->user[$table_cur->player[$i]]; - $bri_user =& $bri->user[$i]; - - $user_cur->subst = $bri_user->subst; - $user_cur->step = $bri_user->step; - $user_cur->lacc = $bri_user->lacc; - $user_cur->laccwr = $bri_user->lacc; - $user_cur->bantime = $bri_user->bantime; - } - - log_legal($curtime, $user_cur->sess, $user_cur->name, "STAT:DESTROY_GAME", $plist); - - $this->room_join_wakeup(&$user_cur, FALSE, 0); - $table_cur->table_token = ""; - $table_cur->wakeup_time = $curtime + WAKEUP_TIME; - Briskin5::destroy_data($table_idx); - } - else { - log_main("gm:: save_data"); - - for ($i = 0 ; $i < $bri_table->player_n ; $i++) { - $this->user[$table_cur->player[$i]]->lacc = $bri->user[$i]->lacc; - } - - Briskin5::save_data(&$bri); - } - } // else if (($bri = &Briskin5::load_data($table_idx)) != FALSE) { - else if ($no_recovery == FALSE) { - log_crit("ERROR: table ".$table_idx." unrecoverable join"); - - for ($i = 0 ; $i < $table_cur->player_n ; $i++) { - $user_cur = &$this->user[$table_cur->player[$i]]; - $user_cur->subst = "shutdowner"; - $user_cur->step_inc(); - - $ret = sprintf('stat = "%s"; subst = "%s";', $user_cur->stat, $user_cur->subst); - $ret .= "gst.st = ".($user_cur->step+1)."; "; - $ret .= show_notify("
I dati del tavolo n° ".$user_cur->table." sono inconsistenti, verranno resettati.
Torni in piedi.
", 2000, "Chiudi.", 400, 110); - $user_cur->comm[$user_cur->step % COMM_N] = $ret; - $user_cur->step_inc(); - } - - $plist = "$table_cur->table_token|$user_cur->table|$table_cur->player_n"; - for ($i = 0 ; $i < $table_cur->player_n ; $i++) { - $plist .= '|'.$this->user[$table_cur->player[$i]]->sess; - } - log_legal($curtime, $user_cur->sess, $user_cur->name, "STAT:DESTROY_GAME(RECOVERY)", $plist); - - $this->room_join_wakeup(&$user_cur, TRUE, -2); - $table_cur->table_token = ""; - } - - Briskin5::unlock_data($sem); - } // bri::lock_data - } // if ($table_cur->player_n == PLAYERS_N) { - } // for ($table_idx = 0 ; $table_idx < TABLES_N ; $table_idx++) { - - log_rd2("out new loop."); - - for ($i = 0 ; $i < MAX_PLAYERS ; $i++) { - $user_cur = &$this->user[$i]; - - log_rd2("User: ".$user_cur->name." stat: ".$user_cur->stat." subst: ".$user_cur->subst); - - if ($user_cur->sess == "") - continue; - - if ($user_cur->lacc + EXPIRE_TIME_RD < $curtime) { - // Auto logout dell'utente - log_rd2("AUTO LOGOUT.".($user_cur->lacc + EXPIRE_TIME_RD)." curtime ".$curtime); - - if ($user_cur->stat == 'table' || $user_cur->stat == 'room') { - log_auth($user_cur->sess, "Autologout session."); - - $user_cur->reset(); - - log_rd2("AUTO LOGOUT."); - if ($user_cur->subst == 'sitdown' || $user_cur->stat == 'table') - $this->room_wakeup(&$user_cur); - else if ($user_cur->subst == 'standup') - $this->room_outstandup(&$user_cur); - else - log_rd2("LOGOUT FROM WHAT ???"); - } - } - - if ($user_cur->laccwr + EXPIRE_TIME_SMAMMA < $curtime) { // lo rimettiamo in piedi - if ($user_cur->stat == 'room' && $user_cur->subst == 'sitdown') { - $this->room_wakeup(&$user_cur); - $user_cur->comm[$user_cur->step % COMM_N] = "gst.st = ".($user_cur->step+1)."; "; - $user_cur->comm[$user_cur->step % COMM_N] .= show_notify("
Sei stato inattivo per ".(EXPIRE_TIME_SMAMMA/60.0)." minuti.
Quindi ritorni tra i Giocatori in piedi.", 0, "torna ai tavoli", 400, 100); - $user_cur->step_inc(); - } - } - } - log_rd2("GARBAGE UPDATED!"); - - $this->garbage_timeout = time() + GARBAGE_TIMEOUT; - $ismod = TRUE; + if ($bin5 != FALSE) { + // + // SPAWN: JOIN + // + log_main("garbage_manager: bri loaded successfully."); + $bin5->garbage_manager(TRUE); + + $bin5_table = $bin5->table[0]; + + // is the end of the table + + if ($bin5->the_end == TRUE) { + /* + * DESTROY OF FINISHED TABLE && MOVE PLAYER TO ROOM AGAIN + */ + log_main("garbage_manager: INSIDE THE END."); + + $plist = "$table_cur->table_token|$table_cur->idx|$table_cur->player_n"; + for ($i = 0 ; $i < $table_cur->player_n ; $i++) { + $plist .= '|'.$this->user[$table_cur->player[$i]]->sess; + } + + for ($i = 0 ; $i < $bin5_table->player_n ; $i++) { + // stat must be "table" by definition + $user_cur = $this->user[$table_cur->player[$i]]; + $bin5_user = $bin5->user[$i]; + + $user_cur->subst = $bin5_user->subst; + $user_cur->rd_step = $bin5_user->rd_step; + $user_cur->step = $bin5_user->step; + $user_cur->lacc = $bin5_user->lacc; + $user_cur->laccwr = $bin5_user->lacc; + $user_cur->bantime = $bin5_user->bantime; + $user_cur->the_end = $bin5_user->the_end; + if ($user_cur->the_end) { + $this->ghost_sess->push($curtime, $user_cur->sess, GHOST_SESS_REAS_TTOT); + } + } + + log_legal($curtime, $user_cur->ip, $user_cur, "STAT:DESTROY_GAME", $plist); + + $this->room_join_wakeup($user_cur, FALSE, 0); + $table_cur->table_token = ""; + $table_cur->wakeup_time = $curtime + WAKEUP_TIME; + + $this->match_del($table_idx); + } + else { + log_main("gm:: save_data"); + + for ($i = 0 ; $i < $bin5_table->player_n ; $i++) { + $this->user[$table_cur->player[$i]]->lacc = $bin5->user[$i]->lacc; + } + } + } // if ($bin5 == FALSE + else if ($no_recovery == FALSE) { + log_crit("ERROR: table ".$table_idx." unrecoverable join"); + + for ($i = 0 ; $i < $table_cur->player_n ; $i++) { + $user_cur = $this->user[$table_cur->player[$i]]; + $user_cur->subst = "shutdowner"; + $user_cur->step_inc(); + + $ret = sprintf('stat = "%s"; subst = "%s";', $user_cur->stat, $user_cur->subst); + $ret .= "gst.st = ".($user_cur->step+1)."; "; + // MLANG
I dati del tavolo n° ".$user_cur->table." sono inconsistenti, verranno resettati.
Torni in piedi.
+ $prestr = sprintf($mlang_brisk['tabincon'][$G_lang], $user_cur->table); + $ret .= show_notify($prestr, 2000, $mlang_brisk['btn_close'][$G_lang], 400, 110); + $user_cur->comm[$user_cur->step % COMM_N] = $ret; + $user_cur->step_inc(); + } + + $plist = "$table_cur->table_token|$user_cur->table|$table_cur->player_n"; + for ($i = 0 ; $i < $table_cur->player_n ; $i++) { + $plist .= '|'.$this->user[$table_cur->player[$i]]->sess; + } + log_legal($curtime, $user_cur->ip, $user_cur, "STAT:DESTROY_GAME(RECOVERY)", $plist); + + $this->room_join_wakeup($user_cur, TRUE, -2); + $table_cur->table_token = ""; + } + } + } // if ($table_cur->player_n == PLAYERS_N) { + } // for ($table_idx = 0 ; $table_idx < TABLES_N ; $table_idx++) { + + log_rd2("out new loop."); + + for ($i = 0 ; $i < MAX_PLAYERS ; $i++) { + $user_cur = $this->user[$i]; + + log_rd2("User: ".$user_cur->name." stat: ".$user_cur->stat." subst: ".$user_cur->subst); + + if ($user_cur->is_active() == FALSE) + continue; + + if ($user_cur->lacc + EXPIRE_TIME_RD < ($curtime - $delta)) { + // Auto logout dell'utente + log_rd2("AUTO LOGOUT.".($user_cur->lacc + EXPIRE_TIME_RD)." curtime - delta ".($curtime - $delta)); + + $this->ghost_sess->push($curtime, $user_cur->sess, GHOST_SESS_REAS_TOUT); + $user_cur->the_end = TRUE; + + log_rd2("AUTO LOGOUT."); + if ($user_cur->stat == 'table' || $user_cur->stat == 'room') { + log_auth($user_cur->sess, "Autologout session."); + + if ($user_cur->subst == 'sitdown' || $user_cur->stat == 'table') + $this->room_wakeup($user_cur); + else if ($user_cur->subst == 'standup') + $this->room_outstandup($user_cur); + else + log_rd2("LOGOUT FROM WHAT ???"); + } + } + + if ($user_cur->laccwr + EXPIRE_TIME_SMAMMA < ($curtime - $delta)) { // lo rimettiamo in piedi + if ($user_cur->stat == 'room' && $user_cur->subst == 'sitdown') { + $this->room_wakeup($user_cur); + $user_cur->comm[$user_cur->step % COMM_N] = "gst.st = ".($user_cur->step+1)."; "; + /* MLANG:
Sei stato inattivo per ".(EXPIRE_TIME_SMAMMA/60.0)." minuti.
Quindi ritorni tra i Giocatori in piedi.", "torna ai tavoli" */ + $user_cur->comm[$user_cur->step % COMM_N] .= show_notify($mlang_brisk['tabtout_a'][$G_lang].(EXPIRE_TIME_SMAMMA/60.0).$mlang_brisk['tabtout_b'][$G_lang], 0, $mlang_brisk['btn_backstand'][$G_lang], 400, 100); + $user_cur->step_inc(); + } + } } + log_rd2("GARBAGE UPDATED!"); + + $this->garbage_timeout = $curtime + GARBAGE_TIMEOUT; + $ismod = TRUE; + $this->ghost_sess->garbage_manager($curtime); + + $this->delay_mgr->lastcheck_set($curtime); return ($ismod); } - function show_room($user_step, &$user) + function show_room($user_step, $user) { + GLOBAL $G_lang, $mlang_brisk; log_main("show_room: username: ".$user->name); - - + $ret = sprintf('gst.st = %d; ', $user_step); + + $prefs = Client_prefs::from_user($user); + $ret .= sprintf('prefs_load(\'%s\', false, false);', json_encode($prefs)); + + if(false) { + if ($user->flags & USER_FLAG_ISOLAUTH) { + $ret .= 'list_set(\'isolation\', false, \''.$mlang_brisk['tit_onisol'][$G_lang].'\' ); '; + } + else if ($user->flags & USER_FLAG_LISTAUTH) { + $ret .= 'list_set(\'auth\', false, \''.$mlang_brisk['tit_onauth'][$G_lang].'\' ); '; + } + else { + $ret .= 'list_set(\'all\', false, \'\' ); '; + } + } + if ($user->subst == 'standup') $ret .= "tra.show(); "; else $ret .= "tra.hide(); "; $ret .= sprintf('stat = "%s";', $user->stat); - - $ret .= root_wellcome($user); + + $ret .= root_welcome($user); + if ($user->flags & USER_FLAG_DBFAILED) { + $ret .= "gst.st = ".($user->step+1)."; "; + $ret .= show_notify($mlang_brisk['db_failed'][$G_lang], 0, $mlang_brisk['btn_close'][$G_lang], 400, 140); + } + $ret .= sprintf('subst = "%s";', $user->subst); - $itin = ($user->flags & USER_FLAG_AUTH ? "" : ""); - $itou = ($user->flags & USER_FLAG_AUTH ? "" : ""); - $ret .= sprintf('$("myname").innerHTML = "%s%s%s";', $itin, xcape($user->name), $itou); + $ret .= $user->myname_innerHTML(); + for ($i = 0 ; $i < TABLES_N ; $i++) { + $ret .= $this->table_content($user, $i); - // $ret .= table_act_content(($user->subst == 'standup'), $this->table[$i]->player_n, $i, $user->table, - // ($this->table[$i]->auth_only == FALSE ? TRUE : $user->flags & USER_FLAG_AUTH)); + $ret .= $this->table[$i]->act_content($user); - if ($this->table[$i]->wag_own != NULL) - $ret .= sprintf('tra.add(%d, "%s: %s"); ', $i, $this->table[$i]->wag_own->name, $this->table[$i]->wag_com); - else + if ($this->table[$i]->wag_own != -1) + $ret .= sprintf('tra.add(%d, "%s: %s"); ', $i, $this->user[$this->table[$i]->wag_own]->name, $this->table[$i]->wag_com); + else $ret .= sprintf('tra.rem(%d); ', $i); } $ret .= $this->standup_content($user); - + $ret .= "setTimeout(preload_images, 0, g_preload_img_arr, g_imgct); "; + return ($ret); } - - function room_wakeup(&$user) + function room_wakeup($user) { $table_idx = $user->table; - $table = &$this->table[$table_idx]; + $table = $this->table[$table_idx]; log_main("WAKEUP: begin function table:".$table_idx." stat: ".$user->stat." subst: ".$user->subst); @@ -1117,81 +1463,75 @@ class Room { $from_table = ($user->stat == "table"); if ($from_table) { - log_main("WAKEUP: from table [".$user->table."] nplayers_n: ".$this->table[$user->table]->player_n); - - for ($i = 0 ; $i < $table->player_n ; $i++) { - $user_cur = &$this->user[$table->player[$i]]; - log_main("PREIMPOST: INLOOP name: ".$user_cur->name); - - if ($user_cur != $user) { - $user_cur->stat_set("room"); - $user_cur->subst = "sitdown"; - $user_cur->laccwr = $curtime; - } - else if ($user->sess != "") { - $user_cur->stat_set("room"); - $user_cur->subst = "standup"; - $user_cur->laccwr = $curtime; - $user_cur->table = -1; - } - } + log_main("WAKEUP: from table [".$user->table."] nplayers_n: ".$this->table[$user->table]->player_n); + + for ($i = 0 ; $i < $table->player_n ; $i++) { + $user_cur = $this->user[$table->player[$i]]; + log_main("PREIMPOST: INLOOP name: ".$user_cur->name); + + if ($user->idx_get() != $table->player[$i]) { + $user_cur->stat_set("room"); + $user_cur->subst = "sitdown"; + $user_cur->laccwr = $curtime; + } + else if ($user->is_active()) { + $user_cur->stat_set("room"); + $user_cur->subst = "standup"; + $user_cur->laccwr = $curtime; + $user_cur->table = -1; + } + } } else { - $user->stat_set("room"); - $user->subst = "standup"; - $user->laccwr = $curtime; + $user->stat_set("room"); + $user->subst = "standup"; + $user->laccwr = $curtime; } - - $remove_wagon = false; - if($table->wag_own == $user) { - $remove_wagon = true; - $table->wag_reset($curtime); - + + $remove_wagon = FALSE; + if($table->wag_own == $user->idx_get()) { + $table->wag_reset($curtime); + $remove_wagon = TRUE; } - /* aggiorna l'array dei giocatori al tavolo. */ - $table->user_rem(&$this, &$user); + $table->user_rem($this, $user); for ($i = 0 ; $i < MAX_PLAYERS ; $i++) { - $user_cur = &$this->user[$i]; - if ($user_cur->sess == '' || $user_cur->stat != 'room') - continue; - - log_main("VALORI: name: ".$user_cur->name."from_table: ".$from_table." tab: ".$user_cur->table." taix: ".$table_idx." ucur: ".$user_cur." us: ".$user); + $user_cur = $this->user[$i]; + if ($user_cur->is_active() == FALSE || $user_cur->stat != 'room') // is not active user or the stat isn't 'room' + continue; + + // log_main("VALORI: name: ".$user_cur->name."from_table: ".$from_table." tab: ".$user_cur->table." taix: ".$table_idx." ucur: ".$user_cur." us: ".$user); $ret = "gst.st = ".($user_cur->step+1)."; ".($remove_wagon ? sprintf("tra.rem(%d);",$table_idx) : ""); - if ($from_table && ($user_cur->table == $table_idx || $user_cur == $user)) { - $ret .= 'gst.st_loc++; the_end=true; window.onunload = null; window.onbeforeunload = null; document.location.assign("index.php");|'; - // $ret .= 'gst.st_loc++; document.location.assign("index.php");|'; - log_main("DOCUMENT.index.php: from table"); + if ($from_table && ($user_cur->table == $table_idx || $user->idx_get() == $i)) { + $ret .= 'gst.st_loc++; xstm.stop(); window.onunload = null; window.onbeforeunload = null; document.location.assign("index.php");|'; + // $ret .= 'gst.st_loc++; document.location.assign("index.php");|'; + log_main("DOCUMENT.index.php: from table"); } else if ($user_cur->stat == "room") { - log_main("DOCUMENT.index.php: from table"); - - $ret .= $this->table_content($user_cur, $table_idx); - $ret .= $this->standup_content($user_cur); - - // $ret .= table_act_content(FALSE, 0, $table_idx, $user->table, FALSE); - $ret .= $table->act_content($user); - - if ($user_cur == $user) { - // set the new status - $ret .= 'subst = "standup"; tra.show(); '; - // clean the action buttons in other tables - for ($e = 0 ; $e < TABLES_N ; $e++) { - if ($this->table[$e]->player_n < PLAYERS_N) { - // $ret .= table_act_content(TRUE, 0, $e, $user->table, - // ($this->table[$e]->auth_only == FALSE ? TRUE : $user->flags & USER_FLAG_AUTH)); + log_main("DOCUMENT.index.php: from table"); + + $ret .= $this->table_content($user_cur, $table_idx); + $ret .= $this->standup_content($user_cur); + + // $ret .= table_act_content(FALSE, 0, $table_idx, $user->table, FALSE); + $ret .= $table->act_content($user); + + if ($user->idx_get() == $i) { + // set the new status + $ret .= 'subst = "standup"; tra.show(); '; + // clean the action buttons in other tables + for ($e = 0 ; $e < TABLES_N ; $e++) { + if ($this->table[$e]->player_n < PLAYERS_N) { $ret .= $this->table[$e]->act_content($user); } - } - } - else { - // $ret .= table_act_content(($user_cur->subst == 'standup'), $table->player_n, $table_idx, $user_cur->table, - // ($table->auth_only == FALSE ? TRUE : $user_cur->flags & USER_FLAG_AUTH)); + } + } + else { $ret .= $table->act_content($user_cur); - } + } } log_wr("ROOM_WAKEUP: ".$ret); $user_cur->comm[$user_cur->step % COMM_N] = $ret; @@ -1199,11 +1539,11 @@ class Room { } } - function room_join_wakeup(&$user, $update_lacc = FALSE, $trans_delta) + function room_join_wakeup($user, $update_lacc = FALSE, $trans_delta) { $table_idx = $user->table; - $table = &$this->table[$table_idx]; - + $table = $this->table[$table_idx]; + log_main("JOIN_WAKEUP: begin function table:".$table_idx." stat: ".$user->stat." subst: ".$user->subst); $curtime = time(); @@ -1212,197 +1552,364 @@ class Room { $user_tab = array(); $user_tab_n = 0; log_main("JOIN WAKEUP: from table [".$user->table."] nplayers_n: ".$this->table[$user->table]->player_n); - + for ($i = 0 ; $i < $table->player_n ; $i++) { - $user_cur = &$this->user[$table->player[$i]]; - log_main("PREIMPOST INLOOP name: ".$user_cur->name); - if ($user_cur->sess != "") { - if ($update_lacc == TRUE) { - $user_cur->laccwr = $curtime; - } - log_main("cur: ".$user_cur->name." subst: ".$user_cur->subst); - if ($user_cur->subst == "shutdowned") { - $user_cur->stat_set("room"); - $user_cur->subst = "sitdown"; - } - else if ($user_cur->subst == "shutdowner") { - $user_cur->stat_set("room"); - $user_cur->subst = "standup"; - $user_cur->table = -1; - $user_wup[$user_wup_n++] = &$user_cur; - - $remove_wagon = false; - if($table->wag_own == $user_cur) { - $remove_wagon = true; - $table->wag_reset($curtime); - } - } - $user_tab[$user_tab_n++] = &$user_cur; - } + $user_cur = $this->user[$table->player[$i]]; + log_main("PREIMPOST INLOOP name: ".$user_cur->name); + if ($user_cur->is_empty()) { + continue; + } + if ($update_lacc == TRUE) { + $user_cur->laccwr = $curtime; + } + log_main("cur: ".$user_cur->name." subst: ".$user_cur->subst); + if ($user_cur->subst == "shutdowned") { + $user_cur->stat_set("room"); + $user_cur->subst = "sitdown"; + } + else if ($user_cur->subst == "shutdowner") { + $user_cur->stat_set("room"); + $user_cur->subst = "standup"; + $user_cur->table = -1; + $user_wup[$user_wup_n++] = $user_cur; + + $remove_wagon = FALSE; + if($table->wag_own == $table->player[$i]) { + $remove_wagon = TRUE; + $table->wag_reset($curtime); + } + } + $user_tab[$user_tab_n++] = $table->player[$i]; } for ($wup_idx = 0 ; $wup_idx < $user_wup_n ; $wup_idx++) - $table->user_rem(&$this, &$user_wup[$wup_idx]); + $table->user_rem($this, $user_wup[$wup_idx]); /* aggiorna l'array dei giocatori al tavolo. */ for ($i = 0 ; $i < MAX_PLAYERS ; $i++) { log_main("START LOOP"); - $user_cur = &$this->user[$i]; - if ($user_cur->sess == '' || $user_cur->stat != 'room') { - log_main("name: ".$user_cur->name."skip subst: ".$user_cur->subst); - continue; + $user_cur = $this->user[$i]; + if ($user_cur->is_active() == FALSE || $user_cur->stat != 'room') { // is not active user or the stat isn't 'room' + log_main("name: ".$user_cur->name."skip subst: ".$user_cur->subst); + continue; } log_main("___"); - log_main("VALORI name: ".$user_cur->name." tab: ".$user_cur->table." taix: ".$table_idx." ucur: ".$user_cur." us: ".$user); + log_main("VALORI name: ".$user_cur->name." tab: ".$user_cur->table." taix: ".$table_idx); $ret = "gst.st = ".($user_cur->step+1)."; ".($remove_wagon ? sprintf("tra.rem(%d);",$table_idx) : ""); if ($user_cur->stat == "room") { - log_main("DOCUMENT.index.php from table"); + log_main("DOCUMENT.index.php from table"); + + $ret .= $this->table_content($user_cur, $table_idx); + $ret .= $this->standup_content($user_cur); - $ret .= $this->table_content($user_cur, $table_idx); - $ret .= $this->standup_content($user_cur); - - // $ret .= table_act_content(FALSE, 0, $table_idx, $user_cur->table, - // ($table->auth_only == FALSE ? TRUE : $user_cur->flags & USER_FLAG_AUTH)); $ret .= $table->act_content($user_cur); - for ($tab_idx = 0 ; $tab_idx < $user_tab_n ; $tab_idx++) - if ($user_cur == $user_tab[$tab_idx]) - break; + for ($tab_idx = 0 ; $tab_idx < $user_tab_n ; $tab_idx++) + if ($user_tab[$tab_idx] == $i) + break; - // for users that wakeup the room will be reconstructed by index_rd.php - if ($tab_idx < $user_tab_n) { - log_main("PRE show_room username: ".$user_cur->name." STEP: ".$user_cur->step); + // for users that wakeup the room will be reconstructed by index_rd.php + if ($tab_idx < $user_tab_n) { + log_main("PRE show_room username: ".$user_cur->name." STEP: ".$user_cur->step); // ARRAY_POP DISABLED -// if ($trans_delta == 0) -// while (array_pop($user_cur->comm) != NULL); - - $user_cur->trans_step = $user_cur->step + 1 + $trans_delta; - $user_cur->comm[$user_cur->step % COMM_N] = ""; - $user_cur->step_inc(); - $user_cur->comm[$user_cur->step % COMM_N] = $this->show_room(($user_cur->step + 1), &$user_cur); - $user_cur->step_inc(); - log_main("POST show_room username: ".$user_cur->name." STEP: ".$user_cur->step); - - continue; - } - log_main("JOIN_WAKEUP wup_idx ".$wup_idx." wup_n ".$user_wup_n); - - log_main("JOIN_WAKEUP more"); - // $ret .= table_act_content(($user_cur->subst == 'standup'), $table->player_n, $table_idx, $user_cur->table, - // ($table->auth_only == FALSE ? TRUE : $user_cur->flags & USER_FLAG_AUTH)); - $ret .= $table->act_content($user_cur); +// if ($trans_delta == 0) +// while (array_pop($user_cur->comm) != NULL); - log_main("JOIN_WAKEUP end more"); - } - log_wr("ROOM_JOIN_WAKEUP: ".$ret); - $user_cur->comm[$user_cur->step % COMM_N] = $ret; - $user_cur->step_inc(); - } - } + $user_cur->trans_step = $user_cur->step + 1 + $trans_delta; + $user_cur->comm[$user_cur->step % COMM_N] = ""; + $user_cur->step_inc(); + $user_cur->comm[$user_cur->step % COMM_N] = $this->show_room(($user_cur->step + 1), $user_cur); + $user_cur->step_inc(); + log_main("POST show_room username: ".$user_cur->name." STEP: ".$user_cur->step); - function room_outstandup(&$user) - { - $this->room_sitdown(&$user, -1); - } - - function table_update(&$user) - { - log_main("table_update: pre - USER: ".$user->name); + continue; + } + log_main("JOIN_WAKEUP wup_idx ".$wup_idx." wup_n ".$user_wup_n); - $table_idx = $user->table; + log_main("JOIN_WAKEUP more"); - if ($table_idx > -1) - $table = &$this->table[$table_idx]; - - for ($i = 0 ; $i < MAX_PLAYERS ; $i++) { - $ret = ""; - $user_cur = &$this->user[$i]; - if ($user_cur->sess == '' || $user_cur->stat != 'room') - continue; - - $ret = "gst.st = ".($user_cur->step+1)."; "; - if ($table_idx > -1) - $ret .= $this->table_content($user_cur, $table_idx); - - if ($user_cur == $user) { - $itin = ($user->flags & USER_FLAG_AUTH ? "" : ""); - $itou = ($user->flags & USER_FLAG_AUTH ? "" : ""); - $ret .= sprintf('$("myname").innerHTML = "%s%s%s: ";', $itin, xcape($user->name), $itou); + $ret .= $table->act_content($user_cur); + + log_main("JOIN_WAKEUP end more"); } + log_wr("ROOM_JOIN_WAKEUP: ".$ret); $user_cur->comm[$user_cur->step % COMM_N] = $ret; $user_cur->step_inc(); } - - log_main("table_update: post"); } - function room_sitdown(&$user, $table_idx) - { - log_main("room_sitdown ".($user == FALSE ? "USER: FALSE" : "USER: ".$user->name)); + /* + function info_show($user, $target, $dt) - $train_app = ""; + if success return assoc. array with "ret" => 0 and other fields + else return an assoc. array with "ret: != 0 and "mesg" with an error description + */ + function info_show($user, $target, $dt) + { + GLOBAL $G_lang, $mlang_brisk, $G_base; - if ($table_idx > -1 && $table_idx < TABLES_N) { - $table = &$this->table[$table_idx]; + $mesg = ""; + $user_code = -1; + $ret = 0; - // wagon shutdown - if ($table->wag_own != NULL && $table->player_n == PLAYERS_N) { - for ($i = 0 ; $i < TABLES_N ; $i++) { - $user_cur =& $this->user[$table->player[$i]]; - if ($user_cur == $table->wag_own) { - $train_app = sprintf("tra.rem(%d); ", $table_idx); - $table->wag_reset(time()); - break; + do { + if ($target == "") { + $ret = 1; + break; } - } - } - } + if (($bdb = BriskDB::create()) == FALSE) { + $ret = 2; + break; + } + if ($target == $user->name) { + $ret = 3; + $mesg = sprintf($mlang_brisk['inf_self'][$G_lang]); + break; + } + if (($user_item = $bdb->getitem_bylogin($target, $user_code)) == FALSE) { + $ret = 4; + break; + } + if (($guar_item = $bdb->getitem_bycode($user_item->guar_code_get())) != FALSE) { + $guar_login = $guar_item->login_get(); + } + else { + $guar_login = ""; + } + $user_tos_vers = $user_item->tos_vers_get(); + + if (($usersnet_item = $bdb->usersnet_bycode($user->code, $user_item->code)) == FALSE) { + $usersnet_item = $bdb->usersnet_default($user->code, $user_item->code); + } + + if (versions_cmp($user_tos_vers, "1.2") < 0) { + $mesg = sprintf($mlang_brisk['tos_old'][$G_lang], xcape($target)); + } + else if ($guar_login == "") { + $mesg = sprintf($mlang_brisk['inf_nfd'][$G_lang], xcape($target)); + } + } while (0); + + if ($ret > 0 && $mesg == "") { + $mesg = sprintf($mlang_brisk['inf_err'][$G_lang], $ret); + } + + if ($ret != 0) { + $jret = json_encode(array("ret" => $ret, "mesg" => $mesg)); + } + else { + $jret = json_encode(array("ret" => 0, + "mesg" => "", + "login" => $target, + // FIXME: state internationalization + "state" => + ($user_item->type & USER_FLAG_TY_APPR ? "Apprendista" : + ($user_item->type & USER_FLAG_TY_CERT ? "Certificato" : + ($user_item->type & (USER_FLAG_TY_NORM | USER_FLAG_TY_SUPER) ? + "Normale" : "Stato sconosciuto"))), + "guar" => ($user_item->type & USER_FLAG_TY_APPR ? + "" : $guar_login), + "match" => (versions_cmp($user_tos_vers, "1.4") < 0 ? "non autorizzato" : $user_item->match_cnt) , + "game" => (versions_cmp($user_tos_vers, "1.4") < 0 ? "non autorizzato" : $user_item->game_cnt), + "friend" => usersnet_friend_getlabel($usersnet_item->friend), + "skill" => $usersnet_item->skill, + "trust" => $usersnet_item->trust)); + } + + return $jret; + } + + function info_save($user, $json_s) + { + GLOBAL $G_lang, $mlang_brisk, $G_base; + + $mesg = ""; + $user_code = -1; + $ret = 0; + + do { + if (($json = json_decode($json_s)) == FALSE) { + $ret = 1; + break; + } + + if (($bdb = BriskDB::create()) == FALSE) { + $ret = 2; + break; + } + + if (($user_item = $bdb->usersnet_save($user->code, $json)) != 0) { + $ret = 4000 + $user_item; + break; + } + } while(0); + + return ($ret); + } + + function room_outstandup($user) + { + $this->room_sitdown($user, -1); + } + + function table_update($user) + { + log_main("table_update: pre - USER: ".$user->name); + + $table_idx = $user->table; + + if ($table_idx > -1) + $table = $this->table[$table_idx]; for ($i = 0 ; $i < MAX_PLAYERS ; $i++) { $ret = ""; - $user_cur = &$this->user[$i]; - if ($user_cur->sess == '' || $user_cur->stat != 'room') - continue; - - $ret = "gst.st = ".($user_cur->step+1)."; ".$train_app; + $user_cur = $this->user[$i]; + if ($user_cur->is_active() == FALSE || $user_cur->stat != 'room') // is not active user or the stat isn't 'room' + continue; + + $ret = "gst.st = ".($user_cur->step+1)."; "; if ($table_idx > -1) - $ret .= $this->table_content($user_cur, $table_idx); - $ret .= $this->standup_content($user_cur); - - if ($user_cur == $user) { - $ret .= 'subst = "sitdown"; tra.hide(); '; - // clean the action buttons in other tables - for ($e = 0 ; $e < TABLES_N ; $e++) { - // $ret .= table_act_content(FALSE, 0, $e, $user_cur->table, FALSE); - $ret .= $this->table[$e]->act_content($user_cur); - } - } - else if ($table_idx > -1) { - if ($table->player_n == PLAYERS_N) { - // $ret .= table_act_content(($user_cur->subst == 'standup'), PLAYERS_N, $table_idx, $user_cur->table, - /// ($table->auth_only == FALSE ? TRUE : $user_cur->flags & USER_FLAG_AUTH)); - $ret .= $table->act_content($user_cur); - } + $ret .= $this->table_content($user_cur, $table_idx); + + if ($user->idx_get() == $i) { + $ret .= $user->myname_innerHTML(); } $user_cur->comm[$user_cur->step % COMM_N] = $ret; $user_cur->step_inc(); } + + log_main("table_update: post"); + } + + function room_sitdown($user, $table_idx) + { + log_main("room_sitdown ".($user == FALSE ? "USER: FALSE" : "USER: ".$user->name)); + + $train_app = ""; + + if ($table_idx > -1 && $table_idx < TABLES_N) { + $table = $this->table[$table_idx]; + + // wagon shutdown + if ($table->wag_own != -1 && $table->player_n == PLAYERS_N) { + for ($i = 0 ; $i < TABLES_N ; $i++) { + if ($table->wag_own == $table->player[$i]) { + $train_app = sprintf("tra.rem(%d); ", $table_idx); + $table->wag_reset(time()); + break; + } + } + } + } + + for ($i = 0 ; $i < MAX_PLAYERS ; $i++) { + $ret = ""; + $user_cur = $this->user[$i]; + if ($user_cur->is_active() == FALSE || $user_cur->stat != 'room') // is not active user or the stat isn't 'room' + continue; + + $ret = "gst.st = ".($user_cur->step+1)."; ".$train_app; + if ($table_idx > -1) + $ret .= $this->table_content($user_cur, $table_idx); + $ret .= $this->standup_content($user_cur); + + if ($user->idx_get() == $i) { + $ret .= 'subst = "sitdown"; tra.hide(); '; + // clean the action buttons in other tables + for ($e = 0 ; $e < TABLES_N ; $e++) { + $ret .= $this->table[$e]->act_content($user_cur); + } + } + else if ($table_idx > -1) { + if ($table->player_n == PLAYERS_N) { + + $ret .= $table->act_content($user_cur); + } + } + $user_cur->comm[$user_cur->step % COMM_N] = $ret; + $user_cur->step_inc(); + } + } + + function kickuser($user, $out_reas) + { + $curtime = time(); + + fprintf(STDERR, "MOP: GHOST_SESS: %d\n", $out_reas); + + $this->ghost_sess->push($curtime, $user->sess, $out_reas); + + fprintf(STDERR, "MOP: status out: %s %s %d\n", $user->stat, $user->subst, $user->idx); + if ($user->stat == 'table' && $user->subst != 'sitdown') { + $bin5 = &$this->match[$user->table]; + $user_bin5 = &$bin5->user[$user->table_pos]; + fprintf(STDERR, "MOP: status in: %s %s %d\n", $user_bin5->stat, $user_bin5->subst, $user_bin5->idx); + $bin5->table_wakeup($user_bin5); + $user->the_end = TRUE; + $this->room_wakeup($user); + return; + } + + if ($user->stat == 'table' || $user->stat == 'room') { + $user->the_end = TRUE; + if ($user->subst == 'sitdown' || $user->stat == 'table') { + $this->room_wakeup($user); + } + else if ($user->subst == 'standup') { + fprintf(STDERR, "MOP: KICK here [%s]\n", btrace_line(debug_backtrace())); + $this->room_outstandup($user); + } + else { + log_rd2("LOGOUT FROM WHAT ???"); + } + } + } + + function kickuser_by_name($name, $out_reas) + { + for ($i = 0 ; $i < MAX_PLAYERS ; $i++) { + $user_out = $this->user[$i]; + if (strcmp($user_out->name, $name) == 0) { + return ($this->kickuser($user_out, $out_reas)); + } + } + return FALSE; + } + + function kickuser_by_sess($sess, $out_reas) + { + for ($i = 0 ; $i < MAX_PLAYERS ; $i++) { + $user_out = $this->user[$i]; + if (strcmp($user_out->sess, $sess) == 0) { + return ($this->kickuser($user_out, $out_reas)); + } + } + return FALSE; + } + + function kickuser_by_idx($idx, $out_reas) + { + $user_out = $this->user[$idx]; + return ($this->kickuser($user_out, $out_reas)); } - function chatt_send(&$user, $mesg) + function chatt_send($user, $mesg) { - GLOBAL $G_alarm_passwd; + GLOBAL $G_base, $G_alarm_passwd, $mlang_brisk, $G_lang; $only_you = FALSE; - + + fprintf(STDERR, "WE ARE HERE: [%s]\n", $mesg); + // common settings - $msg = substr($mesg, 6, 128); + $msg = mb_substr($mesg, 6, 128, "UTF-8"); $curtime = time(); $dt = date("H:i ", $curtime); + $target = ""; // // Compute actions @@ -1412,22 +1919,26 @@ class Room { $to_all = FALSE; $to_room = FALSE; $to_tabl = FALSE; + $is_normchat = FALSE; + /* for old isolation management $is_ticker = FALSE; */ $update_room = FALSE; - if (strcmp($msg, "/tav") == 0 || + if (strcmp($msg, "/tav") == 0 || strncmp($msg, "/tav ", 5) == 0) { do { if ($user->stat != 'room' || $user->subst != 'sitdown') { - $msg = "
Per attivare il messaggio di segnalazione del tavolo occorre essere seduti.
"; + /* MLANG: "
Per attivare il messaggio di segnalazione del tavolo occorre essere seduti.
", "
Il messaggio di segnalazione del tavolo è già attivato.
", "
Il messaggio di segnalazione del tavolo
è disattivato ancora per %d second%s.
" */ + $msg = $mlang_brisk['tickmust'][$G_lang]; $to_user = show_notify($msg, 0, "chiudi", 400, 100); break; } - $table = &$this->table[$user->table]; - - if ($table->wag_own != NULL) { - $msg = "
Il messaggio di segnalazione del tavolo è già attivato.
"; + $table = $this->table[$user->table]; + + if ($table->wag_own != -1) { + // MLANG
Il messaggio di segnalazione del tavolo è già attivato.
+ $msg = $mlang_brisk['tickjust'][$G_lang]; $to_user = show_notify($msg, 0, "chiudi", 400, 100); break; @@ -1435,22 +1946,28 @@ class Room { $dtime = $curtime - $table->wag_tout; if ($dtime < EXPIRE_TIME_WAG) { - $msg = sprintf("
Il messaggio di segnalazione del tavolo
è disattivato ancora per %d second%s.
", - EXPIRE_TIME_WAG - $dtime, (EXPIRE_TIME_WAG - $dtime == 1 ? "o" : "i")); - $to_user = show_notify($msg, 0, "chiudi", 400, 100); + // MLANG -
Il messaggio di segnalazione del tavolo
è disattivato ancora per %d second%s.
+ $msg = sprintf($mlang_brisk['tickwait'][$G_lang], + EXPIRE_TIME_WAG - $dtime, (EXPIRE_TIME_WAG - $dtime == 1 ? ($G_lang == 'en' ? "" : "o") : ($G_lang == 'en' ? "s" : "i"))); + $to_user = show_notify($msg, 0, $mlang_brisk['btn_close'][$G_lang] , 400, 100); break; } - + $msg = substr($msg, 5); - - $table->wag_set($user, $msg); + + $table->wag_set($user->idx_get(), $msg); $to_user = sprintf('tra.add(%d, "%s");', $user->table, xcape(sprintf("%s: %s", $user->name, $msg))); $to_room = $to_user; - + /* for old isolation management $is_ticker = TRUE; */ } while (0); } // /tav chat command - + // just for development use currently + else if (FALSE && strncmp($msg, "/out ", 5) == 0) { + fprintf(STDERR, "MOP OUT\n"); + $target = substr($msg, 5); + $this->kickuser_by_name($target, GHOST_SESS_REAS_ANON); + } else if (strncmp($msg, "/alarm ", 7) == 0) { if (strncmp($msg, "/alarm to ", 10) == 0) { $sp_pos = strpos($msg, " ", 10); @@ -1463,74 +1980,130 @@ class Room { } do { if (strncmp($msg, $alarm_check, strlen($alarm_check)) != 0) { - $msg = "
La password digitata non è corretta.
"; - $to_user = show_notify($msg, 0, "chiudi", 400, 100); + /* MLANG: "
La password digitata non è corretta.
" */ + $msg = $mlang_brisk['alarpass'][$G_lang]; + $to_user = show_notify($msg, 0, $mlang_brisk['btn_close'][$G_lang], 400, 100); break; } - $to_user = sprintf('chatt_sub("%s", [2, "%s"],"Alarm %s inviato a %s.");', - $dt, NICKSERV, xcape(substr($msg, strlen($alarm_check))), - ($target == "" ? "tutti" : xcape($target)) ); + /* MLANG: "Alarm %s inviato a %s." */ + $prestr = sprintf($mlang_brisk['alarret'][$G_lang], xcape(substr($msg, strlen($alarm_check))), + ($target == "" ? $mlang_brisk['tit_all'][$G_lang] : xcape($target)) ); + $to_user = nickserv_msg($dt, $prestr); $msg = sprintf("
%s
%s
", $dt.NICKSERV, xcape(substr($msg, strlen($alarm_check)))); - $to_all = show_notify($msg, 0, "chiudi", 400, 120); + /* MLANG: "chiudi" */ + $to_all = show_notify($msg, 0, $mlang_brisk['btn_close'][$G_lang], 400, 120); } while (0); } // /alarm chat command - else if (strncmp($msg, "/garante", 8) == 0) { - if ($user->flags & USER_FLAG_AUTH) { - $to_user = sprintf('authbox(300,200);'); + else if (strncmp($msg, "/listen ", 8) == 0) { + $arg = substr($msg, 8); + + if (strcasecmp($arg, "isolation") == 0) { + $flags_old = 0; + if ($user->stat == 'room' && $user->subst == 'sitdown' && + $user->table >= TABLES_AUTH_N) { + $to_user = nickserv_msg($dt, $mlang_brisk['listmust'][$G_lang]); + + } + else { + $user->flags &= ~USER_FLAG_MAP_AUTH; + $user->flags |= USER_FLAG_ISOLAUTH; + $to_user = 'list_set(\'isolation\', true, \''.$mlang_brisk['tit_onisol'][$G_lang].'\'); '; + } + } + else if (strcasecmp($arg, "auth") == 0) { + $flags_old = $user->flags; + $user->flags &= ~USER_FLAG_MAP_AUTH; + $user->flags |= USER_FLAG_LISTAUTH; + $to_user = 'list_set(\'auth\', true, \''.$mlang_brisk['tit_onauth'][$G_lang].'\'); '; + } + else { + $flags_old = $user->flags; + $user->flags &= ~USER_FLAG_MAP_AUTH; + $to_user = 'list_set(\'all\', true, \'\'); '; + + } + // if from isolation redraw standup area + if (($flags_old ^ $user->flags) & USER_FLAG_ISOLAUTH) { + $to_user .= 'standup_data_old = null; '.$this->standup_content($user); + + } + } + else if (strcmp($msg, "/authreq") == 0) { + if ($user->is_cert()) { + $to_user = sprintf('authbox(300,200);'); + } + else { + /* MLANG: "Per autenticare qualcuno devi a tua volta essere autenticato.", "Il nickname deve contenere almeno una lettera dell\'alfabeto o una cifra.", "Nickname %s già in uso." */ + $to_user = nickserv_msg($dt, $mlang_brisk['authmust'][$G_lang]); + } + } + else if (strncmp($msg, "/mesgtoadm", 8) == 0) { + if ($user->is_auth()) { + $to_user = sprintf('mesgtoadmbox(500,300);'); } else { - $to_user = sprintf('chatt_sub("%s", [2, "%s"],"Per autenticare qualcuno devi a tua volta essere autenticato.");', $dt, NICKSERV); + /* MLANG: "Per inviare un messaggio devi essere autenticato." */ + $to_user = nickserv_msg($dt, $mlang_brisk['mesgmust'][$G_lang]); } } - else if (strncmp($msg, "/nick ", 6) == 0) { + else if (FALSE && strncmp($msg, "/nick ", 6) == 0) { log_main("chatt_send BEGIN"); do { if (($name_new = validate_name(substr($msg, 6))) == FALSE) { - $to_user = sprintf('chatt_sub("%s", [2,"%s"],"Il nickname deve contenere almeno una lettera dell\'alfabeto o una cifra.");', $dt, NICKSERV); + $to_user = nickserv_msg($dt, $mlang_brisk['nickmust'][$G_lang]); break; } $msg = "COMMAND ".$msg; for ($i = 0 ; $i < MAX_PLAYERS ; $i++) { - $user_cur = &$this->user[$i]; + $user_cur = $this->user[$i]; - if ($user_cur->sess == '') + if ($user_cur->is_active() == FALSE) continue; - if ($user_cur->name == $name_new) + if (strcasecmp($user_cur->name,$name_new) == 0) break; } if ($i < MAX_PLAYERS) { - $to_user = sprintf('chatt_sub("%s", [2, "%s"],"Nickname %s già in uso.");', $dt, NICKSERV, xcape($name_new)); + $prestr = sprintf($mlang_brisk['nickdupl'][$G_lang], xcape($name_new)); + $to_user = nickserv_msg($dt, $prestr); break; } - - if ($user->flags & USER_FLAG_AUTH) { + + /* MLANG: "Non puoi cambiare nick a un tavolo per soli autenticati.", "Il nickname \'%s\' è già registrato, se il suo proprietario si autentificherà verrai rinominato d\'ufficio come ghostN." */ + if ($user->is_auth()) { if (strcasecmp($user->name,$name_new) != 0) { - if ($user->subst == 'standup' || ($user->subst != 'standup' && $this->table[$user->table]->auth_only == FALSE)) { - $user->flags &= ~USER_FLAG_AUTH; // Remove auth if name changed + if (( ($user->flags & USER_FLAG_MAP_AUTH) != USER_FLAG_ISOLAUTH) && + ($user->subst == 'standup' || + ($user->subst != 'standup' && $this->table[$user->table]->auth_type == TABLE_AUTH_TY_PUBL) + ) + ) { + $user->flags &= ~(USER_FLAG_AUTH | USER_FLAG_TY_ALL); // Remove auth if name changed for ($i = 0 ; $i < TABLES_N ; $i++) { $to_user .= $this->table[$i]->act_content($user); } } else { - $to_user = sprintf('chatt_sub("%s", [2, "%s"],"Non puoi cambiare nick a un tavolo per soli autenticati.");', $dt, NICKSERV); + $to_user = nickserv_msg($dt, $mlang_brisk['authchan'][$G_lang]); break; } } } - $user->name = $name_new; // OK - nick changed - + $user->name = $name_new; // OK - nick changed /* se nome gia' in uso, segnala cosa potrebbe capitare */ - if (($user->flags & USER_FLAG_AUTH) == 0) { - $userdb = new LoginDB(); - if ($userdb->login_exists($name_new)) { - $to_user .= sprintf('chatt_sub("%s", [2, "%s"],"Il nickname \'%s\' è già registrato, se il suo proprietario si autentificherà verrai rinominato d\'ufficio come ghostN.");', $dt, NICKSERV, xcape($name_new)); - } + if ( ! $user->is_auth() ) { + if (($bdb = BriskDB::create()) != FALSE) { + $bdb->users_load(); + /* MLANG: "Il nickname \'%s\' è già registrato, se il suo proprietario si autentificherà verrai rinominato d\'ufficio come ghostN." */ + if ($bdb->login_exists(strtolower($name_new))) { + $prestr = sprintf($mlang_brisk['nickjust'][$G_lang], xcape($name_new)); + $to_user .= nickserv_msg($dt, $prestr); + } + } } log_main("chatt_send start set"); @@ -1538,13 +2111,17 @@ class Room { $update_room = TRUE; } while (0); } // nick chat command + else if (strncmp($msg, "/info ", 6) == 0) { + $info_user = substr($msg, 6); + echo $this->info_show($user, urldecode($info_user), $dt); + } else if (strncmp($msg, "/st ", 4) == 0) { log_main("chatt_send BEGIN"); do { $st_str = substr($msg, 4); - + if (strcasecmp($st_str, "normale") == 0) { $st = USER_FLAG_S_NORM; } @@ -1569,8 +2146,33 @@ class Room { else if (strcasecmp($st_str, "presente") == 0) { $st = USER_FLAG_S_EYE; } + else if (strcasecmp($st_str, "coniglio") == 0) { + $st = USER_FLAG_S_RABB; + } + else if (strcasecmp($st_str, "calcio") == 0) { + $st = USER_FLAG_S_SOCC; + } + else if (strcasecmp($st_str, "pupo") == 0) { + $st = USER_FLAG_S_BABY; + } + else if (strcasecmp($st_str, "pulizie") == 0) { + $st = USER_FLAG_S_MOP; + } + else if (strcasecmp($st_str, "babbo") == 0) { + $st = USER_FLAG_S_BABBO; + } + else if (strcasecmp($st_str, "renna") == 0) { + $st = USER_FLAG_S_RENNA; + } + else if (strcasecmp($st_str, "pupazzo") == 0) { + $st = USER_FLAG_S_PUPAZ; + } + else if (strcasecmp($st_str, "vischio") == 0) { + $st = USER_FLAG_S_VISCH; + } else { - $to_user = sprintf('chatt_sub("%s", [2,"%s"],"Questo stato non esiste.");', $dt, NICKSERV); + /* MLANG: "Questo stato non esiste." */ + $to_user = nickserv_msg($dt, $mlang_brisk['statunkn'][$G_lang]); break; } @@ -1583,15 +2185,16 @@ class Room { } // nick chat command else { // normal chat line - if ($curtime < ($user->chat_ban + $user->chat_dlt)) { + $is_normchat = TRUE; + if (CHAT_ENABLED && $curtime < ($user->chat_ban + $user->chat_dlt)) { $only_you = TRUE; - $user->chat_dlt = $user->chat_dlt * 2; + $user->chat_dlt = $user->chat_dlt * 2; if ($user->chat_dlt > 120) - $user->chat_dlt = 120; + $user->chat_dlt = 120; } else if ($user->chat_lst == $msg) $only_you = TRUE; - else if ($curtime - $user->chattime[($user->chat_cur + 1) % CHAT_N] < CHAT_ILL_TIME) { + else if (CHAT_ENABLED && $curtime - $user->chattime[($user->chat_cur + 1) % CHAT_N] < CHAT_ILL_TIME) { $user->chat_ban = $curtime; $user->chat_dlt = 5; $only_you = TRUE; @@ -1602,18 +2205,39 @@ class Room { } if ($only_you) { - $to_user = sprintf('chatt_sub("%s", [%d, "%s"],"%s");', $dt, $user->flags, xcape($user->name), xcape("== chat ban ==")); + $to_user = sprintf('chatt_sub("%s",[%d,"%s"],"%s");', $dt, $user->flags, xcape($user->name), xcape("== chat ban ==")); } else { - $to_user = sprintf('chatt_sub("%s", [%d, "%s"],"%s");', $dt, $user->flags, xcape($user->name), xcape($msg)); - // temporary silentiation for troll (will became array check) - if (strcasecmp($user->name,'JackRokka') != 0 && $user->sess != '47ea653f602e8') - $to_room = $to_user; + // TEMPORARY DISABLED UNTIL test user option will be available + // if ( TRUE && (!$user->is_auth() || $user->is_appr()) ) { + if (!$user->is_auth()) { + $to_user = nickserv_msg($dt, xcape("Visto l'elevato numero di molestatori che ultimamente hanno preso dimora su Brisk abbiamo deciso")); + $to_user .= nickserv_msg($dt, xcape("di disattivare temporaneamente la chat in room per i non registrati, non ce ne vogliate e buone feste.")); + if (FALSE) { + $aug_head = array("Tanti", "Tantissimi", "Un enormità ", "Un milione", "Un' esagerazione"); + $aug_body = array("a tutti gli utenti", "a tutti gli uomini", "a tutte le donne", "a tutti gli utenti"); + $aug_tail = array("di Brisk", "del sito", "della ciurma", "della comitiva", "del gruppo"); + + $auguri = sprintf("%s auguri %s %s.", + $aug_head[mt_rand(0, count($aug_head)-1)], + $aug_body[mt_rand(0, count($aug_body)-1)], + $aug_tail[mt_rand(0, count($aug_tail)-1)]); + + $to_room = sprintf('chatt_sub("%s",[%d,"%s"],"%s");', $dt, $user->flags, xcape($user->name), + xcape($auguri)); + } + } + else { + $to_user = sprintf('chatt_sub("%s",[%d,"%s"],"%s");', $dt, $user->flags, xcape($user->name), xcape($msg)); + // temporary silentiation for troll (will became array check) + // if (strcasecmp($user->name,'JackRokka') != 0 && $user->sess != '47ea653f602e8') + $to_room = $to_user; + } } - log_legal($curtime, $user->sess, $user->name, - ($user->stat == 'room' ? 'room' : 'table '.$user->table),$msg); - + log_legal($curtime, $user->ip, $user, + ($user->stat == 'room' ? 'room' : 'table '.$user->table),$msg); + $user->chat_lst = "$msg"; $user->chattime[$user->chat_cur % CHAT_N] = $curtime; $user->chat_cur++; @@ -1636,67 +2260,67 @@ class Room { if ($to_room != FALSE) { for ($i = 0 ; $i < MAX_PLAYERS ; $i++) { - $user_cur = &$this->user[$i]; + $user_cur = $this->user[$i]; if ($target != "" && $user_cur->name != $target) continue; - // if ($user_cur->sess == '' || $user_cur->stat != 'room') - if ($user_cur->sess == '' || $user_cur->stat == 'table' || $user_cur == $user) + if ($user_cur->is_active() == FALSE // is not active user + || $user_cur->stat == 'table' // or stat is 'table' + || $user->idx_get() == $i) // or the $user idx is equal to current var continue; - + + if ($is_normchat == TRUE) { + // use MAP_AUTH to check if auth or isolation + if ($user_cur->flags & USER_FLAG_MAP_AUTH) { + if ( ! $user->is_auth() ) { + continue; + } + } + } + /* + else if ($is_ticker) { + if (($user_cur->flags & USER_FLAG_MAP_AUTH) == USER_FLAG_ISOLAUTH) { + if ($user->table >= TABLES_AUTH_N) + continue; + } + } + */ $user_cur->comm[$user_cur->step % COMM_N] = "gst.st = ".($user_cur->step+1)."; "; - $user_cur->comm[$user_cur->step % COMM_N] .= $to_room; + $user_cur->comm[$user_cur->step % COMM_N] .= $to_room; $user_cur->step_inc(); } } - + if ($to_tabl) { - // Before all align times with table timeout - for ($table_idx = 0 ; $table_idx < TABLES_N ; $table_idx++) { - $table_cur =& $this->table[$table_idx]; - // if the table is complete and exists its shared mem we get the info about users lacc - - if ($table_cur->player_n == PLAYERS_N) { - log_main("PLAYERS == N TABLE ".$table_idx); - - if (($sem = Briskin5::lock_data($table_idx)) != FALSE) { - log_main("bin5 lock data success"); - - $no_recovery = FALSE; - if (($bri = &Briskin5::load_data($table_idx)) != FALSE) { - if ($table_cur->table_token != $bri->table_token) { - log_main("ERROR: not matching table_token. Room: ".$table_cur->table_token." Table: ".$bri->table_token); - $bri = FALSE; - } - } - - if ($bri != FALSE) { - $bri_table = &$bri->table[0]; - for ($i = 0 ; $i < $bri_table->player_n ; $i++) { - // stat must be "table" by definition - $bri_user =& $bri->user[$i]; - - if ($target != "" && $bri_user->name != $target) - continue; - log_main("writa: ".$user_mesg); - $bri_user->comm[$bri_user->step % COMM_N] = "gst.st = ".($bri_user->step+1)."; "; - $bri_user->comm[$bri_user->step % COMM_N] .= $to_tabl; - $bri_user->step_inc(); - } - Briskin5::save_data(&$bri); - } - Briskin5::unlock_data($sem); - } // bri::lock_data - } // if ($table_cur->player_n == PLAYERS_N) { - } // for ($table_idx = 0 ; $table_idx < TABLES_N ; $table_idx++) { + // FIXME BRISK4: include for each kind of table + require_once("${G_base}briskin5/Obj/briskin5.phh"); + // Before all align times with table timeout + for ($table_idx = 0 ; $table_idx < TABLES_N ; $table_idx++) { + if (isset($this->match[$table_idx])) { + $bin5 = $this->match[$table_idx]; + + $bin5_table = $bin5->table[0]; + for ($i = 0 ; $i < $bin5_table->player_n ; $i++) { + // stat must be "table" by definition + $bin5_user = $bin5->user[$i]; + + if ($target != "" && $bin5_user->name != $target) + continue; + log_main("writa: ".$user_mesg); + $bin5_user->comm[$bin5_user->step % COMM_N] = "gst.st = ".($bin5_user->step+1)."; "; + $bin5_user->comm[$bin5_user->step % COMM_N] .= $to_tabl; + $bin5_user->step_inc(); + } + } // if (isset($this->match + } // for ($table_idx = 0 ; $table_idx < TABLES_N ; $table_idx++) { } // if ($to_tabl == true ... if ($update_room) { if ($user->stat == 'room' && $user->subst == 'standup') { - $this->standup_update(&$user); + $this->standup_update($user); } else if ($user->stat == 'room' && $user->subst == 'sitdown') { log_main("chatt_send pre table update"); - $this->table_update(&$user); + $this->table_update($user); log_main("chatt_send post table update"); } } // if ($update_room ... @@ -1704,34 +2328,34 @@ class Room { return; } // function chatt_send( ... - function &get_user($sess, &$idx) + function get_user($sess, &$idx) { - GLOBAL $PHP_SELF, $G_false; + GLOBAL $PHP_SELF; - if (validate_sess($sess)) { - for ($i = 0 ; $i < MAX_PLAYERS ; $i++) { - if (strcmp($sess, $this->user[$i]->sess) == 0) { - // find it - $idx = $i; - $ret = &$this->user[$i]; - return ($ret); - } + if (validate_sess($sess)) { + for ($i = 0 ; $i < MAX_PLAYERS ; $i++) { + if ($this->user[$i]->is_empty()) + continue; + if (strcmp($sess, $this->user[$i]->sess) == 0) { + // find it + $idx = $i; + $ret = $this->user[$i]; + return ($ret); + } + } + log_main(sprintf("get_user: Wrong sess from page [%s]",$PHP_SELF)); + // for ($i = 0 ; $i < MAX_PLAYERS ; $i++) + // log_main(sprintf("get_user: Wrong sess compared with [%s]",$this->user[$i]->sess)); + } + else { + log_main(sprintf("get_user: Wrong strlen [%s]",$sess)); } - log_main(sprintf("get_user: Wrong sess from page [%s]",$PHP_SELF)); - // for ($i = 0 ; $i < MAX_PLAYERS ; $i++) - // log_main(sprintf("get_user: Wrong sess compared with [%s]",$this->user[$i]->sess)); - } - else { - log_main(sprintf("get_user: Wrong strlen [%s]",$sess)); - } - return ($G_false); + return (FALSE); } - - /* - * function &add_user(&$room, &$sess, &$idx, $name, $pass, $ip) + * function add_user(&$brisk, &$sess, &$idx, $name, $pass, $ip, $header, $cookie) * * RETURN VALUE: * if ($idx > -1 && ret == FALSE) => duplicated nick @@ -1739,105 +2363,125 @@ class Room { * if ($idx == -3 && ret == FALSE) => wrong password * if ($idx == -1 && ret == FALSE) => no space left * if ($idx == 0 && ret == user) => SUCCESS - * if ($idx == -$idx && ret == user) => SUCCESS (but the login exists in the auth db + * if ($idx == -($idx + 1) && ret == user) => SUCCESS (but the login exists in the auth db) */ - - - function &add_user(&$sess, &$idx, $name, $pass, $ip) + function add_user(&$sess, &$idx, $name, $pass, $ip, $header, $cookie) { - GLOBAL $G_false; + GLOBAL $G_base; $idx = 0; $authenticate = FALSE; + $user_type = 0; $login_exists = FALSE; $ghost = -1; $ghost_auth = FALSE; $idx = -1; $idfree = -1; - + $code = FALSE; + if (($name_new = validate_name($name)) == FALSE) { $idx = -2; - return ($G_false); + return (FALSE); } log_auth("XXX", sprintf("ARRIVA: [%s] pass:[%s]", $sess, ($pass == FALSE ? "FALSE" : $pass))); - if (validate_sess($sess) == FALSE) + if (validate_sess($sess) == FALSE) $sess = ""; /* if pass != FALSE verify the login with pass */ log_auth("XXX", "auth1"); - $userdb = new LoginDB(); - if ($pass != FALSE) { - log_auth("XXX", "auth2"); - $authenticate = $userdb->login_verify($name_new, $pass); - log_auth("XXX", "authenticate: ".($authenticate == TRUE ? "TRUE" : "FALSE")); - - if ($authenticate == FALSE) { - $idx = -3; - return ($G_false); - } + + if (($bdb = BriskDB::create()) != FALSE) { + $bdb->users_load(); + if ($pass != FALSE) { // TODO: here add a method to $bdb to check if the db is available. + log_auth("XXX", "auth2"); + $authenticate = $bdb->login_verify(strtolower($name_new), $pass, $code); + log_auth("XXX", "authenticate: ".($authenticate != FALSE ? "TRUE" : "FALSE")); + + if ($authenticate != FALSE) { + $user_type = $authenticate->type_get(); + } + else { + $idx = -3; + return (FALSE); + } + } + else { + $login_exists = $bdb->login_exists(strtolower($name_new)); + } } else { - $login_exists = $userdb->login_exists($name_new); + // if db is down, send a warning and verify only current users + // no actions at this moment } for ($i = 0 ; $i < MAX_PLAYERS ; $i++) { - /* free user ? */ - if (strcmp($sess, $this->user[$i]->sess) == 0) { - if ($idx == -1) - $idx = $i; - } - if ($idfree == -1 && strcmp("", $this->user[$i]->sess) == 0) { - $idfree = $i; - continue; // NOTE: CHECK IT !! - } - if (strcasecmp($this->user[$i]->name, $name_new) == 0) { - if ($authenticate == FALSE) { - $idx = $i; - break; + /* free user ? */ + if ($this->user[$i]->is_empty()) { + if ($idfree == -1) { + $idfree = $i; + } + continue; } - else { - $ghost = $i; - $ghost_auth = ($this->user[$i]->flags & USER_FLAG_AUTH); + if (strcmp($sess, $this->user[$i]->sess) == 0) { + if ($idx == -1) { + $idx = $i; + } + } + if (strcasecmp($this->user[$i]->name, $name_new) == 0) { + if ($authenticate != FALSE) { + $ghost = $i; + $ghost_auth = $this->user[$i]->is_auth(); + } + else { + $idx = $i; + break; + } } - } } if ($idx == -1) $idx = $idfree; log_auth("XXX", sprintf("TROVATO A QUESTO PUNTO [%d] sess [%s] name [%s]", $idx, $sess, $name_new)); - if ($ghost > -1 && $authenticate) { + /* there is another user logged with your account and you and him have authenticated => new user + get the session of the old user */ + if ($ghost > -1 && $ghost_auth && ($authenticate != FALSE)) { /* swap session */ - $ghost_user =& $this->user[$ghost]; + $ghost_user = $this->user[$ghost]; $curtime = time(); + $this->ghost_sess->push($curtime, $ghost_user->sess, GHOST_SESS_REAS_ANOT); + $ghost_user->comm[$ghost_user->step % COMM_N] = ""; $ghost_user->step_inc(); if ($sess == "") { - $sess = uniqid(""); + $sess = uniqid(""); $ghost_user->sess = $sess; } else { $ghost_user->sess = $sess; } - + // If user at the table we need to update the table data too $table_idx = $ghost_user->table; if ($ghost_user->stat == "table" && $this->table[$table_idx]->player_n == PLAYERS_N) { - if (($brisem = Briskin5::lock_data($table_idx)) != FALSE) { - if (($bri = &Briskin5::load_data($table_idx)) != FALSE) { - if ($bri->the_end != TRUE) { - $bri->user[$ghost_user->table_pos]->step_inc(); - $bri->user[$ghost_user->table_pos]->sess = $sess; - Briskin5::save_data(&$bri); - } + require_once("${G_base}briskin5/Obj/briskin5.phh"); + if (isset($this->match[$table_idx])) { + $bin5 = $this->match[$table_idx]; + + if ($bin5->the_end != TRUE) { + $bin5->user[$ghost_user->table_pos]->comm[$bin5->user[$ghost_user->table_pos]->step % COMM_N] = ""; + $bin5->user[$ghost_user->table_pos]->step_inc(); + $bin5->user[$ghost_user->table_pos]->sess = $sess; + } } - Briskin5::unlock_data($brisem); - } } $idx = $ghost; + if (defined('CURL_DE_SAC_VERS')) { + brisk_cds_execute($this, $ghost, $idx, $sess, $ip, $authenticate, $header); + } return ($this->user[$ghost]); } else if ($idx != -1 && $i == MAX_PLAYERS) { @@ -1845,10 +2489,10 @@ class Room { $curtime = time(); if ($sess == "") { $sess = uniqid(""); - $this->user[$idx]->sess = $sess; + $this->user[$idx]->sess = $sess; } else { - $this->user[$idx]->sess = $sess; + $this->user[$idx]->sess = $sess; } $this->user[$idx]->name = $name_new; // OK - add new user $this->user[$idx]->stat_set("room"); @@ -1860,20 +2504,50 @@ class Room { $this->user[$idx]->bantime = 0; $this->user[$idx]->ip = $ip; - $this->user[$idx]->flags = ($authenticate ? USER_FLAG_AUTH : 0x00); - + $this->user[$idx]->rec = $authenticate; + $this->user[$idx]->flags = $user_type; + $this->user[$idx]->flags |= ($authenticate != FALSE ? USER_FLAG_AUTH : 0x00); + $this->user[$idx]->flags |= ( ($pass != FALSE && $bdb == FALSE) ? USER_FLAG_DBFAILED : 0x00); + log_auth("XXX", sprintf("FLAGS: [%x]", $this->user[$idx]->flags)); + + if ($authenticate != FALSE) { + $this->user[$idx]->code = $authenticate->code_get(); + if (0 == 1) { + // all this part is included in the db server + $this->user[$idx]->flags |= USER_FLAG_LISTAUTH; + + if (isset($cookie['CO_list'])) { + fprintf(STDERR, "QQ: %s CO_list: [%s]\n", __FUNCTION__, $cookie['CO_list']); + if (strcmp($cookie['CO_list'], "auth") == 0) { + $this->user[$idx]->flags &= ~USER_FLAG_MAP_AUTH; + $this->user[$idx]->flags |= USER_FLAG_LISTAUTH; + } + if (strcmp($cookie['CO_list'], "isolation") == 0) { + $this->user[$idx]->flags &= ~USER_FLAG_MAP_AUTH; + $this->user[$idx]->flags |= USER_FLAG_ISOLAUTH; + } + else { + $this->user[$idx]->flags &= ~USER_FLAG_MAP_AUTH; + } + } + } + else { + fprintf(STDERR, "QQ: CO_list not set flags: %x\n", __FUNCTION__, $this->user[$idx]->flags); + } + } + fprintf(STDERR, "QQ %s: flag %x\n", __FUNCTION__, $this->user[$idx]->flags); if ($ghost > -1) { log_main("ghost: rename!"); - $ghost_user =& $this->user[$ghost]; + $ghost_user = $this->user[$ghost]; if ($ghost_auth == FALSE) { for ($sfx = 1 ; $sfx <= MAX_PLAYERS ; $sfx++) { $ghostname = 'ghost'.$sfx; for ($i = 0 ; $i < MAX_PLAYERS ; $i++) { - if (strcmp("", $this->user[$i]->sess) == 0) + if (strcmp("", $this->user[$i]->sess) == 0) continue; - - if (strcmp($this->user[$i]->name, $ghostname) == 0) { + + if (strcasecmp($this->user[$i]->name, $ghostname) == 0) { $ghostname = ''; break; } @@ -1881,15 +2555,15 @@ class Room { if ($ghostname != '') break; } - + $ghost_user->name = $ghostname; - + if ($ghost_user->stat == 'room' && $ghost_user->subst == 'standup') { - $this->standup_update(&$ghost_user); + $this->standup_update($ghost_user); } else { log_main("chatt_send pre table update"); - $this->table_update(&$ghost_user); + $this->table_update($ghost_user); log_main("chatt_send post table update"); } } // if ($ghost_auth == FALSE @@ -1901,242 +2575,93 @@ class Room { } } // if ($ghost > -1) { - log_main(sprintf("TROVATO LIBERO A [%d] sess [%s] name [%s]", $idx, $sess, $name_new)); $real_idx = $idx; if ($login_exists) $idx = -($idx + 1); - return ($this->user[$real_idx]); + log_main(sprintf("TROVATO LIBERO A [%d] sess [%s] name [%s] count [%d] name [%s] code [%s]", $idx, $sess, $name_new, count($this->user),$this->user[$real_idx]->name, $this->user[$real_idx]->code)); + + $ret = $this->user[$real_idx]; + if (defined('CURL_DE_SAC_VERS')) { + brisk_cds_execute($this, $ghost, $real_idx, $sess, $ip, $authenticate, $header); + } + return ($ret); } - return ($G_false); + return (FALSE); } - - function standup_update(&$user) + + function standup_update($user) { for ($i = 0 ; $i < MAX_PLAYERS ; $i++) { - $user_cur = &$this->user[$i]; - if ($user_cur->sess == '') - continue; + $user_cur = $this->user[$i]; + if ($user_cur->is_active() == FALSE) + continue; log_main("STANDUP START: ".$user_cur->stat); - - if ($user_cur->stat == 'room') { - $user_cur->comm[$user_cur->step % COMM_N] = "gst.st = ".($user_cur->step+1)."; ".$this->standup_content($user_cur); - if ($user_cur == $user) { - $itin = ($user->flags & USER_FLAG_AUTH ? "" : ""); - $itou = ($user->flags & USER_FLAG_AUTH ? "" : ""); - - $user_cur->comm[$user_cur->step % COMM_N] .= sprintf('$("myname").innerHTML = "%s%s%s: ";', - $itin, xcape($user->name), $itou); - } - log_main("FROM STANDUP: NAME: ".$user_cur->name." SENDED: ".$user_cur->comm[$user_cur->step % COMM_N]); - - $user_cur->step_inc(); - } - } - } - // Static functions - function &init_data() - { - $room =& new Room(); - - return $room; - } - + if ($user_cur->stat == 'room') { + $user_cur->comm[$user_cur->step % COMM_N] = "gst.st = ".($user_cur->step+1)."; ".$this->standup_content($user_cur); + if ($user->idx_get() == $i) { + $user_cur->comm[$user_cur->step % COMM_N] .= $user->myname_innerHTML(); + } + log_main("FROM STANDUP: NAME: ".$user_cur->name." SENDED: ".$user_cur->comm[$user_cur->step % COMM_N]); - function &load_data() - { - GLOBAL $G_false, $sess; - $doexit = FALSE; - do { - if (($tok = @ftok(FTOK_PATH."/main", "B")) == -1) { - log_main("ftok failed"); - $doexit = TRUE; - break; - } - - if (($shm_sz = sharedmem_sz($tok)) == -1) { - log_main("shmop_open failed"); - } - - if ($shm_sz == -1) - $shm_sz = SHM_DIMS_MIN; - - if ($shm = shm_attach($tok, $shm_sz)) { - $room = @shm_get_var($shm, $tok); - - log_only("bri == ".($room == FALSE ? "FALSE" : "TRUE")." bri === ".($room === FALSE ? "FALSE" : "TRUE")." bri isset ".(isset($room) ? "TRUE" : "FALSE")); - if (isset($room)) - log_only("bri count ".count($room)); - - if ($room == FALSE) { - log_only("INIT MAIN DATA"); - - $room =& Room::init_data(); - if (@shm_put_var($shm, $tok, $room) == FALSE) { - log_only("PUT_VAR FALLITA ".strlen(serialize($room))); - log_only(serialize($room)); - } - } - $room->shm_sz = $shm_sz; - - shm_detach($shm); + $user_cur->step_inc(); } - $ret = &$room; - return ($ret); - } while (0); - - if ($doexit) - exit(); - - return ($G_false); + } } - - function save_data(&$room) + function dump_data() { - GLOBAL $sess; - - $shm = FALSE; - - // var_dump($room); - - if (($tok = @ftok(FTOK_PATH."/main", "B")) == -1) - return (FALSE); - - while ($room->shm_sz < SHM_DIMS_MAX) { - if (($shm = shm_attach($tok, $room->shm_sz)) == FALSE) - break; - - // log_only("PUT_VAR DI ".strlen(serialize($room))); - if (shm_put_var($shm, $tok, $room) != FALSE) { - shm_detach($shm); - return (TRUE); + $brisk_ser = serialize($this); + $brisk_ser_len = mb_strlen($brisk_ser, "ASCII"); + if (file_put_contents($this->crystal_filename, $brisk_ser) == $brisk_ser_len) { + return (TRUE); } - if (shm_remove($shm) === FALSE) { - log_only("REMOVE FALLITA"); - break; - } - shm_detach($shm); - $room->shm_sz += SHM_DIMS_DLT; - } - - if ($shm) - shm_detach($shm); - - return (FALSE); - } - function lock_data() - { - GLOBAL $sess; - - // echo "LOCK: ".FTOK_PATH."/main"; - // exit; - if (($tok = @ftok(FTOK_PATH."/main", "B")) == -1) { - echo "FTOK FAILED"; - exit; - } - // echo "FTOK ".$tok."
"; - if (($res = sem_get($tok)) == FALSE) { - echo "SEM_GET FAILED"; - exit; - } - if (sem_acquire($res)) { - log_lock("LOCK room"); - return ($res); - } - else return (FALSE); } - - function unlock_data($res) - { - GLOBAL $sess; - - log_lock("UNLOCK room"); - - return (sem_release($res)); - } - function standup_content($user) { $ret = ""; - $content = ""; - + if ($user->stat != 'room') return; - - for ($e = 0 , $ct = 0 ; $ct < 4 && $e < MAX_PLAYERS ; $e++) { - if ($this->user[$e]->sess == "" || $this->user[$e]->stat != "room" || $this->user[$e]->name == "") - continue; - $ct++; - } - - // $content .= sprintf('
| '); - - // Names. - for ($i = 0 ; $i < PLAYERS_N ; $i++) - $noty .= sprintf(' | %s | ', xcape($room->user[$table->player[$i]]->name)); - $noty .= sprintf("
|---|---|
| %d | ', $i+1); - for ($e = 0 ; $e < PLAYERS_N ; $e++) - $noty .= sprintf('%d | ', $table->points[$i % MAX_POINTS][$e]); - $noty .= "
| Tot. | '; - for ($e = 0 ; $e < PLAYERS_N ; $e++) - $noty .= sprintf('%d | ', $table->total[$e]); - $noty .= "
%s
", xcape($table->old_reason)); - } + $sess = Brisk::sess_cur_get(); + if (isset($sess) == FALSE) + $ssess = "XXXX"; + else + $ssess = $sess; - if ($table->old_win != -1) { - $win = $table->player[$table->old_win]; - $fri = $table->player[$table->old_friend]; + if (( (BRISK_DEBUG | ($ssess == BRISK_SINGLE_SESS ? BRISK_SINGLE_DEBUG : 0) ) & DBG_REA2) == 0) + return; - $wol = game_result($table->old_asta_pnt, $table->old_pnt); + if ((BRISK_DEBUG | ($ssess == BRISK_SINGLE_SESS ? BRISK_SINGLE_DEBUG : 0) ) & DBG_TRAC) + $btrace = btrace_line(debug_backtrace()); + else + $btrace = ""; - if ($win != $fri) { - $noty .= sprintf("
Nell'ultima mano ha chiamato %s, il socio era %s,
", - xcape($room->user[$win]->name), - xcape($room->user[$fri]->name)); - if ($table->old_pnt == 120) { - $noty .= sprintf("hanno fatto cappotto EBBRAVI!.
"); - } - else { - $noty .= sprintf("dovevano fare %s punti e ne hanno fatti %d: hanno %s.
", - ($table->old_asta_pnt > 61 ? "almeno ".$table->old_asta_pnt : - 'più di 60'), $table->old_pnt, - ($wol == 1 ? "vinto" : ($wol == 0 ? "pareggiato" : "perso"))); - } - } - else { - $noty .= sprintf("
Nell'ultima mano %s si è chiamato in mano,
", - xcape($room->user[$win]->name)); - if ($table->old_pnt == 120) { - $noty .= sprintf("ha fatto cappotto EBBRAVO!.
"); - } - else { - $noty .= sprintf("doveva fare %s punti e ne ha fatti %d: ha %s.
", - ($table->old_asta_pnt > 61 ? "almeno ".$table->old_asta_pnt : - 'più di 60'), $table->old_pnt, - ($wol == 1 ? "vinto" : ($wol == 0 ? "pareggiato" : "perso"))); - } + if (($fp = @fopen(LEGAL_PATH."/brisk.log", 'a')) != FALSE) { + fwrite($fp, sprintf("REA2: [%s] [%s] [%s]\n", $ssess, $log, $btrace)); + fclose($fp); } - } - if ($table->mazzo == $table_pos) - $noty .= "Fai tu il mazzo,"; - else { - $unam = xcape($room->user[$table->player[$table->mazzo]]->name); - $noty .= "Il mazzo a $unam,"; - } +} - if ($user->subst == 'asta') { - if ($table->asta_win == -1) // auction case - $curplayer = $table->gstart % PLAYERS_N; - else - $curplayer = $table->asta_win; - } - else if ($user->subst == 'game') { - $curplayer = ($table->gstart + $table->turn) % PLAYERS_N; - } +function log_send($log) +{ + GLOBAL $PHP_SELF; + if (BRISK_SINGLE_SESS == "" && (BRISK_DEBUG & DBG_SEND) == 0) + return; - if ($curplayer == $table_pos) { - $noty .= " tocca a te giocare."; - } - else { - $unam = xcape($room->user[$table->player[$curplayer]]->name); - $noty .= " tocca a $unam giocare."; - } - - if ($table->mult > 1) { - $noty .= sprintf(" La partita vale %s.", multoval($table->mult)); - } - $noty .= "
"; - $ret .= show_notify($noty, 3000, "torna alla partita", 500, 400); - /* NOTE: show_notify($noty, 3000, "torna alla partita", 500, - * 130 + ($table->points_n > 0 ? 50 : 0) + - * (120 * ($table->points_n / MAX_POINTS))); - * will be used when we refact notify js function following - * photoo class logic - */ - - return ($ret); + $sess = Brisk::sess_cur_get(); + if (isset($sess) == FALSE) + $ssess = "XXXX"; + else + $ssess = $sess; + + if (( (BRISK_DEBUG | ($ssess == BRISK_SINGLE_SESS ? BRISK_SINGLE_DEBUG : 0) ) & DBG_SEND) == 0) + return; + + if ((BRISK_DEBUG | ($ssess == BRISK_SINGLE_SESS ? BRISK_SINGLE_DEBUG : 0) ) & DBG_TRAC) + $btrace = btrace_line(debug_backtrace()); + else + $btrace = ""; + if (($fp = @fopen(LEGAL_PATH."/brisk.log", 'a')) != FALSE) { + fwrite($fp, sprintf("SEND: [%s] [%s] [%s]\n", $ssess, $log, $btrace)); + fclose($fp); + } } -function root_wellcome($user) +function log_lock($log) { - GLOBAL $root_wellarr; - $ret = ""; + GLOBAL $PHP_SELF; - $curtime = time(); - $dt = date("H:i ", $curtime); - - for ($i = 0 ; $i < count($root_wellarr) ; $i++) - $ret .= sprintf('chatt_sub("%s", [2, "%s"],"%s");', $dt, NICKSERV, str_replace('"', '\"', $root_wellarr[$i])); + if (BRISK_SINGLE_SESS == "" && (BRISK_DEBUG & DBG_LOCK) == 0) + return; - return ($ret); + $sess = Brisk::sess_cur_get(); + if (isset($sess) == FALSE) + $ssess = "XXXX"; + else + $ssess = $sess; + + if (( (BRISK_DEBUG | ($ssess == BRISK_SINGLE_SESS ? BRISK_SINGLE_DEBUG : 0) ) & DBG_LOCK) == 0) + return; + + if ((BRISK_DEBUG | ($ssess == BRISK_SINGLE_SESS ? BRISK_SINGLE_DEBUG : 0) ) & DBG_TRAC) + $btrace = btrace_line(debug_backtrace()); + else + $btrace = ""; + if (($fp = @fopen(LEGAL_PATH."/brisk.log", 'a')) != FALSE) { + fwrite($fp, sprintf("LOCK: [%s] [%s] [%s]\n", $ssess, $log, $btrace)); + fclose($fp); + } } -function table_wellcome($user) +function log_wr($log) { - GLOBAL $table_wellarr; - $ret = ""; + GLOBAL $PHP_SELF; - for ($i = 0 ; $i < count($table_wellarr) ; $i++) - $ret .= sprintf('chatt_sub("%s", [2, "ChanServ: "],"%s");', "", str_replace('"', '\"', $table_wellarr[$i])); + if (BRISK_SINGLE_SESS == "" && (BRISK_DEBUG & DBG_WRIT) == 0) + return; - return ($ret); + $sess = Brisk::sess_cur_get(); + if (isset($sess) == FALSE) + $ssess = "XXXX"; + else + $ssess = $sess; + + if (( (BRISK_DEBUG | ($ssess == BRISK_SINGLE_SESS ? BRISK_SINGLE_DEBUG : 0) ) & DBG_WRIT) == 0) + return; + + if ((BRISK_DEBUG | ($ssess == BRISK_SINGLE_SESS ? BRISK_SINGLE_DEBUG : 0) ) & DBG_TRAC) + $btrace = btrace_line(debug_backtrace()); + else + $btrace = ""; + if (($fp = @fopen(LEGAL_PATH."/brisk.log", 'a')) != FALSE) { + fwrite($fp, sprintf("WRIT: [%s] [%s] [%s]\n", $ssess, $log, $btrace)); + fclose($fp); + } } +function log_load($log) +{ + GLOBAL $PHP_SELF; + + if (BRISK_SINGLE_SESS == "" && (BRISK_DEBUG & DBG_LOAD) == 0) + return; + $sess = Brisk::sess_cur_get(); + if (isset($sess) == FALSE) + $ssess = "XXXX"; + else + $ssess = $sess; -/* show table -is_transition (is from room to table ?) -is_again (is another game) + if (( (BRISK_DEBUG | ($ssess == BRISK_SINGLE_SESS ? BRISK_SINGLE_DEBUG : 0) ) & DBG_LOAD) == 0) + return; -Examples of $is_transition, $is_again: - from reload of the page: FALSE, FALSE - from sitdown in room: TRUE, FALSE - from table: asta cmd e tutti passano: TRUE, TRUE - from table: fine partita: TRUE, TRUE - */ -function show_table(&$room, &$user, $sendstep, $is_transition, $is_again) + if ((BRISK_DEBUG | ($ssess == BRISK_SINGLE_SESS ? BRISK_SINGLE_DEBUG : 0) ) & DBG_TRAC) + $btrace = btrace_line(debug_backtrace()); + else + $btrace = ""; + if (($fp = @fopen(LEGAL_PATH."/brisk.log", 'a')) != FALSE) { + fwrite($fp, sprintf("LOAD: [%s] [%s] [%s]\n", $ssess, $log, $btrace)); + fclose($fp); + } +} + +function log_auth($sess, $log) { - $table_idx = $user->table; - $table = &$room->table[$table_idx]; - $table_pos = $user->table_pos; - - $ret = "table_init();"; - $ret .= $table->exitlock_show(&$room->user, $table_pos); - if (!$is_again) { - /* GENERAL STATUS */ - $ret .= sprintf( 'gst.st = %d; stat = "%s"; subst = "%s"; table_pos = %d;', - $sendstep, $user->stat, $user->subst, $table_pos); - - log_rd(sprintf( 'SHOW_TABLE: gst.st = %d; stat = "%s"; subst = "%s"; table_pos = %d;', - $sendstep, $user->stat, $user->subst, $table_pos)); - - /* BACKGROUND */ - $ret .= "background_set();"; - - /* USERS INFO */ - $itin = ($user->flags & USER_FLAG_AUTH ? "" : ""); - $itou = ($user->flags & USER_FLAG_AUTH ? "" : ""); - - $ret .= sprintf('$("myname").innerHTML = "%s%s%s";', $itin, xcape($user->name), $itou); - $ret .= sprintf('set_names([%d, "%s"], [%d, "%s"], [%d, "%s"], [%d, "%s"], [%d, "%s"]); ', - $room->user[$table->player[($table_pos)%PLAYERS_N]]->flags, - xcape($room->user[$table->player[($table_pos)%PLAYERS_N]]->name), - - $room->user[$table->player[($table_pos+1)%PLAYERS_N]]->flags, - xcape($room->user[$table->player[($table_pos+1)%PLAYERS_N]]->name), - - $room->user[$table->player[($table_pos+2)%PLAYERS_N]]->flags, - xcape($room->user[$table->player[($table_pos+2)%PLAYERS_N]]->name), - - (PLAYERS_N == 3 ? 0 : $room->user[$table->player[($table_pos+3)%PLAYERS_N]]->flags), - (PLAYERS_N == 3 ? "" : xcape($room->user[$table->player[($table_pos+3)%PLAYERS_N]]->name)), - - (PLAYERS_N == 3 ? 0 : $room->user[$table->player[($table_pos+4)%PLAYERS_N]]->flags), - (PLAYERS_N == 3 ? "" : xcape($room->user[$table->player[($table_pos+4)%PLAYERS_N]]->name))); - } - /* NOTIFY FOR THE CARD MAKER */ - if ($is_transition) { // && $user->subst == "asta" superfluo - $ret .= show_table_info(&$room, &$table, $table_pos); - } - if (!$is_again) - $ret .= table_wellcome($user); + GLOBAL $PHP_SELF; - if ($is_transition && !$is_again) { // appena seduti al tavolo, play della mucca - $ret .= playsound("cow.mp3"); - } + if (BRISK_SINGLE_SESS == "" && (BRISK_DEBUG & DBG_AUTH) == 0) + return; + if (( (BRISK_DEBUG | ($sess == BRISK_SINGLE_SESS ? BRISK_SINGLE_DEBUG : 0) ) & DBG_AUTH) == 0) + return; - /* CARDS */ - if ($is_transition) { // && $user->subst == "asta" superfluo - $ret .= "|"; - - for ($i = 0 ; $i < 8 ; $i++) { - for ($e = 0 ; $e < PLAYERS_N ; $e++) { - $ct = 0; - for ($o = 0 ; $o < 40 && $ct < $i+1 ; $o++) { - if ($table->card[$o]->owner == (($e + $table->gstart) % PLAYERS_N)) { - $ct++; - if ($ct == $i+1) - break; - } - } - log_rd("O ".$o." VAL ".$table->card[$o]->value." Owner: ".$table->card[$o]->owner); - - $ret .= sprintf( ' card_send(%d,%d,%d,%8.2f,%d);|', ($table->gstart + $e) % PLAYERS_N, - $i, ((($e + PLAYERS_N - $table_pos + $table->gstart) % PLAYERS_N) == 0 ? - $table->card[$o]->value : -1), - ($i == 7 && $e == (PLAYERS_N - 1) ? 1 : 0.5),$i+1); - } - } - } - else { - $taked = array(0,0,0,0,0); - $inhand = array(0,0,0,0,0); - $ontabl = array(-1,-1,-1,-1,-1); - $cards = array(); - - for ($i = 0 ; $i < 40 ; $i++) { - if ($table->card[$i]->stat == 'hand') { - if ($table->card[$i]->owner == $table_pos) { - $cards[$inhand[$table->card[$i]->owner]] = $table->card[$i]->value; - } - $inhand[$table->card[$i]->owner]++; - } - else if ($table->card[$i]->stat == 'take') { - log_main("Card taked: ".$table->card[$i]->value."OWN: ".$table->card[$i]->owner); - $taked[$table->card[$i]->owner]++; - } - else if ($table->card[$i]->stat == 'table') { - $ontabl[$table->card[$i]->owner] = $i; - } - } - $logg = "\n"; - for ($i = 0 ; $i < PLAYERS_N ; $i++) { - $logg .= sprintf("INHAND: %d IN TABLE %d TAKED %d\n", $inhand[$i], $ontabl[$i], $taked[$i]); - } - log_main("Stat table: ".$logg); - - /* Set ours cards. */ - $oursarg = ""; - for ($i = 0 ; $i < $inhand[$table_pos] ; $i++) - $oursarg .= ($i == 0 ? "" : ", ").$cards[$i]; - for ($i = $inhand[$table_pos] ; $i < 8 ; $i++) - $oursarg .= ($i == 0 ? "" : ", ")."-1"; - $ret .= sprintf('card_setours(%s);', $oursarg); - - /* Dispose all cards */ - for ($i = 0 ; $i < PLAYERS_N ; $i++) { - /* Qui sotto al posto di + 1 c'era + ->gstart ... credo in modo errato */ - $ret .= sprintf('cards_dispose(%d,%d,%d);', $i, - $inhand[$i], $taked[$i]); - - if ($ontabl[$i] != -1) { - $ret .= sprintf('card_place(%d,%d,%d,%d,%d);',$i, $inhand[$i], - $table->card[$ontabl[$i]]->value, - $table->card[$ontabl[$i]]->x, $table->card[$ontabl[$i]]->y); - } + if ((BRISK_DEBUG | ($sess == BRISK_SINGLE_SESS ? BRISK_SINGLE_DEBUG : 0) ) & DBG_TRAC) + $btrace = btrace_line(debug_backtrace()); + else + $btrace = ""; + if (($fp = @fopen(LEGAL_PATH."/brisk.log", 'a')) != FALSE) { + fwrite($fp, sprintf("LOAD: [%s] [%d] [%s] [%s]\n", $sess, time(), $log, $btrace)); + fclose($fp); } - } +} - /* Show auction */ - if ($user->subst == 'asta') { +function log_shme($log) +{ + GLOBAL $PHP_SELF; - /* show users auction status */ - $showst = ""; - for ($i = 0 ; $i < PLAYERS_N ; $i++) { - $user_cur = &$room->user[$table->player[$i]]; - $showst .= sprintf("%s%d", ($i == 0 ? "" : ", "), - ($user_cur->asta_card < 9 ? $user_cur->asta_card : $user_cur->asta_pnt)); - } - if (PLAYERS_N == 3) - $showst .= ",-2,-2"; - $ret .= sprintf('show_astat(%s);', $showst); + if (BRISK_SINGLE_SESS == "" && (BRISK_DEBUG & DBG_SHME) == 0) + return; - if ($table->asta_win != -1 && $table->asta_win == $table_pos) { - /* show card chooser */ - $ret .= sprintf('choose_seed(%s); $("astalascio").style.visibility = ""; $("asta").style.visibility = "hidden";', - $table->asta_card); - } - else { - /* show auction */ - if ($table_pos == ($table->gstart % PLAYERS_N) && - $table->asta_win == -1) - $ret .= sprintf('dispose_asta(%d,%d, %s);', - $table->asta_card + 1, $table->asta_pnt+1, ($user->handpt <= 2 ? "true" : "false")); - else - $ret .= sprintf('dispose_asta(%d,%d, %s);', - $table->asta_card + 1, -($table->asta_pnt+1), ($user->handpt <= 2 ? "true" : "false")); - } + $sess = Brisk::sess_cur_get(); + if (isset($sess) == FALSE) + $ssess = "XXXX"; + else + $ssess = $sess; - /* Remark */ - if ($table->asta_win == -1) { // auction case - if ($table_pos == ($table->gstart % PLAYERS_N)) - $ret .= "remark_on();"; - else - $ret .= "remark_off();"; - } - else { // chooseed case - if ($table_pos == $table->asta_win) - $ret .= "remark_on();"; - else - $ret .= "remark_off();"; - } - } - else if ($user->subst == 'game') { - /* HIGHLIGHT */ - if (($table->gstart + $table->turn) % PLAYERS_N == $table_pos) - $ret .= "is_my_time = true; remark_on();"; + if (( (BRISK_DEBUG | ($ssess == BRISK_SINGLE_SESS ? BRISK_SINGLE_DEBUG : 0) ) & DBG_SHME) == 0) + return; + + if ((BRISK_DEBUG | ($ssess == BRISK_SINGLE_SESS ? BRISK_SINGLE_DEBUG : 0) ) & DBG_TRAC) + $btrace = btrace_line(debug_backtrace()); else - $ret .= "remark_off();"; - - /* WHO CALL AND WATH */ - $ret .= briscola_show($room, $table, $user); - - } - return ($ret); -} // end function show_table(... + $btrace = ""; + if (($fp = @fopen(LEGAL_PATH."/brisk.log", 'a')) != FALSE) { + fwrite($fp, sprintf("SHME: [%s] [%s] [%s]\n", $ssess, $log, $btrace)); + fclose($fp); + } +} + + -function calculate_winner(&$table) +// function log_legal($curtime, $sess, $name, $where, $mesg) +function log_legal($curtime, $addr, $user, $where, $mesg) { - $briontab = FALSE; - $ontab = array(); - $ontid = array(); - $cur_win = -1; - $cur_val = 100; - $cur_seed = $table->briscola - ($table->briscola % 10); - - for ($i = 0 ; $i < 40 ; $i++) { - if ($table->card[$i]->stat != "table") - continue; - - log_wr(sprintf("Card On table: [%d]", $i)); - - $v = $table->card[$i]->value; - $ontab[$table->card[$i]->owner] = $v; - $ontid[$table->card[$i]->owner] = $i; - /* se briscola setto il flag */ - if (($v - ($v % 10)) == $cur_seed) - $briontab = TRUE; - } - if ($briontab == FALSE) { - $cur_win = $table->gstart; - $cur_val = $ontab[$cur_win]; - $cur_seed = $cur_val - ($cur_val % 10); + if (($fp = @fopen(LEGAL_PATH."/legal.log", 'a')) != FALSE) { + /* Unix time | session | nickname | IP | where was | mesg */ + fwrite($fp, sprintf("%ld|%s|%s|%s|%s|%s|%s|\n", $curtime, $user->sess, + ($user->is_auth() ? 'A' : 'N'), + $user->name, $addr, $where , $mesg)); + fclose($fp); } +} - for ($i = 0 ; $i < PLAYERS_N ; $i++) { - if (($ontab[$i] - ($ontab[$i] % 10)) == $cur_seed) { - if ($ontab[$i] < $cur_val) { - $cur_val = $ontab[$i]; - $cur_win = $i; - } +function table_act_content($isstanding, $sitted, $table, $cur_table, $allowed) +{ + $ret = ""; + + if ($isstanding) { + if ($sitted < PLAYERS_N) { + if ($allowed) + $act = 'sit'; + else + $act = 'reserved'; } } - - for ($i = 0 ; $i < PLAYERS_N ; $i++) { - $table->card[$ontid[$i]]->owner = $cur_win; - $table->card[$ontid[$i]]->stat = "take"; // Card stat + else { + if ($table == $cur_table) + $act = 'wake'; + else + $act = 'none'; } - return ($cur_win); + + if ($act != '') + $ret = sprintf('j_tab_act_cont(%d, \'%s\');', $table, $act); + + return ($ret); } -function calculate_points(&$table) +function show_notify($text, $tout, $butt, $w, $h) { - GLOBAL $G_all_points; - - $pro = 0; + log_main("SHOW_NOTIFY: ".$text); + return sprintf('var noti = new notify(gst,"%s",%d,"%s",%d,%d);', $text, $tout, $butt, $w, $h); +} - if ($table->asta_pnt == 60) - $table->asta_pnt = 61; +function show_notify_ex($text, $tout, $butt, $w, $h, $is_opaque, $block_time) +{ + log_main("SHOW_NOTIFY OPAQUE: ".$text); + return sprintf('var noti = new notify_ex(gst,"%s",%d,"%s",%d,%d, %s, %d);', $text, $tout, $butt, $w, $h, ($is_opaque ? "true" : "false"), $block_time); +} - $table->old_reason = ""; - $table->old_win = $table->asta_win; - $table->old_friend = $table->friend; - $table->old_asta_pnt = $table->asta_pnt; +function show_notify_document($text, $tout, $butt_arr, $confirm_func, $confirm_func_args, $w, $h, $is_opaque, $block_time) +{ + log_main("SHOW_NOTIFY OPAQUE: ".$text); - for ($i = 0 ; $i < 40 ; $i++) { - $ctt = $table->card[$i]->value % 10; - $own = $table->card[$i]->owner; - if ($own == $table->asta_win || $own == $table->friend) - $pro += $G_all_points[$ctt]; + $butts = ""; + for ($i = 0 ; $i < count($butt_arr) ; $i++) { + $butts .= sprintf("%s'%s'", ($i == 0 ? "" : ","), $butt_arr[$i]); } - log_wr(sprintf("PRO: [%d]", $pro)); - - - if ($table->asta_pnt == 61 && $pro == 60) { // PATTA ! - $table->points[$table->points_n % MAX_POINTS] = array(); - for ($i = 0 ; $i < PLAYERS_N ; $i++) - $table->points[$table->points_n % MAX_POINTS][$i] = 0; - $table->points_n++; - $table->old_pnt = $pro; - $table->mult *= 2; + return sprintf('g_nd = new notify_document(gst, "%s", %d, [ %s ], %s, %s, %d, %d, %s, %d);|', + escpush($text), $tout, $butts, ($confirm_func == NULL ? "null" : $confirm_func), (($confirm_func == NULL|| $confirm_func_args == NULL) ? "[]" : $confirm_func_args), $w, $h, ($is_opaque ? "true" : "false"), $block_time); +} - return; - } - if ($pro >= $table->asta_pnt) - $sig = 1; - else - $sig = -1; - - $table->points[$table->points_n % MAX_POINTS] = array(); - for ($i = 0 ; $i < 5 ; $i++) { - if ($i == $table->asta_win) - $pt = ($i == $table->friend ? 4 : 2); - else if ($i == $table->friend) - $pt = 1; - else - $pt = -1; +function root_welcome($user) +{ + GLOBAL $root_wellarr, $G_lang; + $ret = ""; - log_wr(sprintf("PRO: pt[%d][%d] = %d", $table->points_n % MAX_POINTS, $i, $pt)); + $curtime = time(); + $dt = date("H:i ", $curtime); - $pt = $pt * $sig * $table->mult * ($pro == 120 ? 2 : 1); + for ($i = 0 ; $i < count($root_wellarr[$G_lang]) ; $i++) + $ret .= nickserv_msg($dt, str_replace('"', '\"', $root_wellarr[$G_lang][$i])); - log_wr(sprintf("PRO:[%d][%d][%d]", $sig, $table->mult, ($pro == 120 ? 2 : 1))); - - $table->points[$table->points_n % MAX_POINTS][$i] = $pt; - $table->total[$i] += $pt; - } - $table->points_n++; - $table->old_pnt = $pro; - $table->mult = 1; + return ($ret); } -function validate_sess($sess) + + +function validate_sess($sess) { - if (strlen($sess) == SESS_LEN) + if (strlen($sess) == SESS_LEN) return (TRUE); else return (FALSE); } -function validate_name($name) +function validate_name($name) { - $name_new = str_replace(' ', '_', substr(trim($name),0,12)); + $name_new = str_replace(' ', '_', mb_substr(trim($name),0,12, "UTF-8")); - for ($i = 0 ; $i < strlen($name_new) ; $i++) { + for ($i = 0 ; $i < mb_strlen($name_new) ; $i++) { $c = $name_new[$i]; if (($c >= "a" && $c <= "z") || ($c >= "A" && $c <= "Z") || ($c >= "0" && $c <= "9")) return ($name_new); @@ -3000,14 +3406,26 @@ function playsound($filename) function secstoword($secs) { + GLOBAL $G_lang; + + $ret = ""; + $mins = floor($secs / 60); $secs = $secs % 60; - if ($mins > 0) - $ret = sprintf("%d minut%s%s", $mins, ($mins > 1 ? "i" : "o"), ($secs > 0 ? " e " : "")); - - if ($secs > 0) - $ret .= sprintf("%d second%s", $secs, ($secs > 1 ? "i" : "o")); - + if ($G_lang == 'en') { + if ($mins > 0) + $ret = sprintf("%d minute%s%s", $mins, ($mins > 1 ? "s" : ""), ($secs > 0 ? " and " : "")); + + if ($secs > 0) + $ret .= sprintf("%d second%s", $secs, ($secs > 1 ? "s" : "")); + } + else { + if ($mins > 0) + $ret = sprintf("%d minut%s%s", $mins, ($mins > 1 ? "i" : "o"), ($secs > 0 ? " e " : "")); + + if ($secs > 0) + $ret .= sprintf("%d second%s", $secs, ($secs > 1 ? "i" : "o")); + } return ($ret); } @@ -3019,42 +3437,72 @@ function sharedmem_sz($tok) } $shm_sz = shmop_size($shm_id); shmop_close($shm_id); - - log_main("shm_sz: ".$shm_sz." SHM_DIMS: ".SHM_DIMS); + + // log_main("shm_sz: ".$shm_sz." SHM_DIMS: ".SHM_DIMS); return ($shm_sz); -} +} class Warrant { - function lock_data() + static $delta_t; + + static function lock_data($is_exclusive) { - GLOBAL $sess; - - if (($tok = @ftok(FTOK_PATH."/warrant", "B")) == -1) { - echo "FTOK FAILED"; - exit; - } - // echo "FTOK ".$tok."
"; - if (($res = sem_get($tok)) == FALSE) { - echo "SEM_GET FAILED"; - exit; - } - if (sem_acquire($res)) { - log_lock("LOCK room"); - return ($res); - } - else + if (($res = file_lock(FTOK_PATH."/warrant", $is_exclusive)) != FALSE) { + self::$delta_t = microtime(TRUE); + log_lock("LOCK warrant [".self::$delta_t."]"); + + return ($res); + } + return (FALSE); } - - function unlock_data($res) + + static function unlock_data($res) { - GLOBAL $sess; - - log_lock("UNLOCK room"); - - return (sem_release($res)); + GLOBAL $sess; + + log_lock("UNLOCK warrant [".(microtime(TRUE) - (self::$delta_t))."]"); + + file_unlock($res); } +} + +class Poll { + static $delta_t; + + static function lock_data($is_exclusive) + { + if (($res = file_lock(FTOK_PATH."/poll", $is_exclusive)) != FALSE) { + self::$delta_t = microtime(TRUE); + log_lock("LOCK poll [".self::$delta_t."]"); - + return ($res); + } + + return (FALSE); + } + + static function unlock_data($res) + { + GLOBAL $sess; + + log_lock("UNLOCK poll [".(microtime(TRUE) - (self::$delta_t))."]"); + + file_unlock($res); + } +} + +function carousel_top() +{ + $what = rand(1,2); + if ($what == 1) { + $rn = rand(1, 3); + return (sprintf('
', $rn));
+ }
+ else {
+ return (sprintf('
'));
+ }
}
+
+
?>