<?php
/*
- * brisk - index_wr.php
+ * brisk - briskin5/index_wr.php
*
* Copyright (C) 2006-2012 Matteo Nastasi
* mailto: nastasi@alternativeoutput.it
$G_base = "../";
require_once("../Obj/brisk.phh");
-// require_once("../Obj/proxyscan.phh");
require_once("Obj/briskin5.phh");
-// Use of proxies isn't allowed.
-// if (is_proxy()) {
-// sleep(5);
-// exit;
-//}
-
/*
* MAIN
*/
-function bin5_index_wr_main(&$bri, $remote_addr_full, $get, $post, $cookie)
+function bin5_index_wr_main(&$bin5, $remote_addr_full, $get, $post, $cookie)
{
- GLOBAL $G_base, $G_dbasetype, $G_black_list;
+ GLOBAL $G_base, $G_dbasetype, $G_ban_list, $G_black_list;
$remote_addr = addrtoipv4($remote_addr_full);
- if (array_search($remote_addr, $G_black_list) !== FALSE) {
- // TODO: waiting async 5 sec before close
- return (FALSE);
- }
-
$curtime = time();
- if ($bri == NULL) {
+ if ($bin5 == NULL) {
return FALSE;
}
log_wr(0, 'bin::index_wr.php: COMM: '.xcapemesg($mesg));
- if (($user = &$bri->get_user($sess, &$idx)) == FALSE) {
+ if (($user = &$bin5->get_user($sess, &$idx)) == FALSE) {
echo "Get User Error";
log_wr("Get User Error");
return FALSE;
}
-
- if (array_search($user->ip, $G_black_list) !== FALSE) {
+ $bin5->brisk->sess_cur_set($user->sess);
+ if ( ( ! $user->is_auth() ) &&
+ $bin5->brisk->ban_check($user->ip)) {
// TODO: waiting async 5 sec before close
return (FALSE);
}
log_rd2("bin5/index_wr.php: AUTO LOGOUT.");
if ($user->stat == 'table') {
- $bri->table_wakeup($user);
+ $bin5->table_wakeup($user);
// to force the logout
$user->lacc = 0;
}
*********************/
else if ($user->stat == 'table') {
$user->laccwr = time();
- $table = $bri->table[$user->table];
+ $table = $bin5->table[$user->table];
if ($argz[0] == 'tableinfo') {
log_wr("PER DI TABLEINFO");
$user->comm[$user->step % COMM_N] = "gst.st = ".($user->step+1)."; ";
- $user->comm[$user->step % COMM_N] .= show_table_info(&$bri, &$table, $user->table_pos);
+ $user->comm[$user->step % COMM_N] .= show_table_info(&$bin5, &$table, $user->table_pos);
log_wr($user->comm[$user->step % COMM_N]);
$user->step_inc();
}
else if ($argz[0] == 'chatt') {
- $bri->chatt_send(&$user,$mesg);
+ $bin5->chatt_send(&$user,$mesg);
}
else if ($argz[0] == 'preferences_update') {
log_wr("PER DI PREFERENCES_UPDATE");
$logout_cont = TRUE;
if ($remcalc >= 3) {
- $lockcalc = $table->exitlock_calc(&$bri->user, $user->table_pos);
+ $lockcalc = $table->exitlock_calc(&$bin5->user, $user->table_pos);
if ($lockcalc < 3) {
$user->comm[$user->step % COMM_N] = "gst.st = ".($user->step+1)."; ";
- $user->comm[$user->step % COMM_N] .= $table->exitlock_show(&$bri->user, $user->table_pos);
+ $user->comm[$user->step % COMM_N] .= $table->exitlock_show(&$bin5->user, $user->table_pos);
$user->comm[$user->step % COMM_N] .= show_notify("<br>I dati presenti sul server non erano allineati con quelli inviati dal tuo browser, adesso lo sono. Riprova ora.", 2000, "torna alla partita.", 400, 100);
log_wr($user->comm[$user->step % COMM_N]);
}
else {
require_once("../Obj/hardban.phh");
- Hardbans::add(($user->flags & USER_FLAG_AUTH ? $user->name : FALSE),
+ Hardbans::add(($user->is_auth() ? $user->name : FALSE),
$user->ip, $user->sess, $user->laccwr + BAN_TIME);
}
// $user->bantime = $user->laccwr + BAN_TIME;
if ($logout_cont == TRUE) {
- $bri->table_wakeup(&$user);
+ $bin5->table_wakeup($user);
}
}
else if ($argz[0] == 'exitlock') {
if ($user->exitislock == TRUE) {
$user->exitislock = ($user->exitislock == TRUE ? FALSE : TRUE);
for ($ct = 0, $i = 0 ; $i < BIN5_PLAYERS_N ; $i++) {
- $user_cur[$i] = &$bri->user[$table->player[$i]];
+ $user_cur[$i] = &$bin5->user[$table->player[$i]];
if ($user_cur[$i]->exitislock == FALSE)
$ct++;
}
/* log_points($curtime, $user, "STAT:BRISKIN5:FINISH_GAME", $plist); */
/* } */
- /* $table->game_init(&$bri->user); */
+ /* $table->game_init(&$bin5->user); */
- if ($table->rules_engine(&$bri, BIN5_RULES_ABANDON, $user)) {
+ if ($table->rules_engine(&$bin5, $curtime, BIN5_RULES_ABANDON, $user)) {
for ($i = 0 ; $i < BIN5_PLAYERS_N ; $i++) {
- $user_cur = &$bri->user[$table->player[$i]];
+ $user_cur = &$bin5->user[$table->player[$i]];
$ret = sprintf('gst.st = %d;', $user_cur->step+1);
- $ret .= show_table(&$bri,&$user_cur,$user_cur->step+1, TRUE, TRUE);
+ $ret .= show_table(&$bin5,&$user_cur,$user_cur->step+1, TRUE, TRUE);
$user_cur->comm[$user_cur->step % COMM_N] = $ret;
$user_cur->step_inc();
}
}
}
-
-
if ($again) { // Qualcosa non andato bene, rifare
$ret = sprintf('gst.st = %d; asta_pnt_set(%d);', $user->step+1,
($table->asta_pnt > 60 ? $table->asta_pnt + 1 : 61) );
/* next step */
$showst = "show_astat(";
for ($i = 0 ; $i < BIN5_PLAYERS_N ; $i++) {
- $user_cur = &$bri->user[$table->player[$i]];
+ $user_cur = &$bin5->user[$table->player[$i]];
$showst .= sprintf("%s%d", ($i == 0 ? "" : ", "),
($user_cur->asta_card < 9 ? $user_cur->asta_card : $user_cur->asta_pnt));
}
$maxcard = -2;
for ($i = 0 ; $i < BIN5_PLAYERS_N ; $i++) {
- $user_cur = &$bri->user[$table->player[$i]];
+ $user_cur = &$bin5->user[$table->player[$i]];
if ($maxcard < $user_cur->asta_card)
$maxcard = $user_cur->asta_card;
}
for ($i = 0 ; $i < BIN5_PLAYERS_N ; $i++) {
- $user_cur = &$bri->user[$table->player[$i]];
+ $user_cur = &$bin5->user[$table->player[$i]];
$ret = sprintf('gst.st = %d; %s', $user_cur->step+1, $showst);
if ($user_cur->table_pos == ($table->gstart % BIN5_PLAYERS_N))
$ret .= sprintf('dispose_asta(%d,%d, %s); remark_on();',
else if ($table->asta_pla_n == 0) {
log_wr("PASSANO TUTTI!");
- if ($table->rules_engine(&$bri, BIN5_RULES_ALLPASS, $user)) {
+ if ($table->rules_engine(&$bin5, $curtime, BIN5_RULES_ALLPASS, $user)) {
for ($i = 0 ; $i < BIN5_PLAYERS_N ; $i++) {
- $user_cur = &$bri->user[$table->player[$i]];
+ $user_cur = &$bin5->user[$table->player[$i]];
$ret = sprintf('gst.st = %d;', $user_cur->step+1);
- $ret .= show_table(&$bri,&$user_cur,$user_cur->step+1, TRUE, TRUE);
+ $ret .= show_table(&$bin5,&$user_cur,$user_cur->step+1, TRUE, TRUE);
$user_cur->comm[$user_cur->step % COMM_N] = $ret;
$user_cur->step_inc();
}
$table->asta_win = $chooser;
for ($i = 0 ; $i < BIN5_PLAYERS_N ; $i++) {
- $user_cur = &$bri->user[$table->player[$i]];
+ $user_cur = &$bin5->user[$table->player[$i]];
$ret = sprintf('gst.st = %d; %s dispose_asta(%d, %d, false);', $user_cur->step+1, $showst,
$table->asta_card + 1,-($table->asta_pnt));
if ($table->asta_win > -1 &&
$user->table_pos == $table->asta_win) {
$a_brisco = $argz[1];
- if ($a_brisco >= 0 && $a_brisco < 40) {
+ if ($a_brisco >= 0 && $a_brisco < (BIN5_CARD_HAND * BIN5_PLAYERS_N)) {
$table->briscola = $a_brisco;
$table->friend = $table->card[$a_brisco]->owner;
log_wr("GSTART 2");
log_wr("Setta la briscola a ".$a_brisco);
$chooser = $table->asta_win;
- $user_chooser = &$bri->user[$table->player[$chooser]];
+ $user_chooser = &$bin5->user[$table->player[$chooser]];
for ($i = 0 ; $i < BIN5_PLAYERS_N ; $i++) {
- $user_cur = &$bri->user[$table->player[$i]];
+ $user_cur = &$bin5->user[$table->player[$i]];
$user_cur->subst = 'game';
$ret = sprintf('gst.st = %d; subst = "game";', $user_cur->step+1);
$ret .= sprintf('document.title = "Brisk - Tavolo %d";', $user->table_orig);
/* bg of caller cell */
- $ret .= briscola_show($bri, $table, $user_cur);
+ $ret .= briscola_show($bin5, $table, $user_cur);
/* first gamer */
if ($i == ($table->gstart % BIN5_PLAYERS_N))
$table->gstart = $winner;
$turn_nex = ($table->gstart + $table->turn) % BIN5_PLAYERS_N;
- log_wr(sprintf("The winner is: [%d] [%s]", $winner, $bri->user[$table->player[$winner]]->name));
+ log_wr(sprintf("The winner is: [%d] [%s]", $winner, $bin5->user[$table->player[$winner]]->name));
$card_take = sprintf("sleep(gst,2000);|cards_take(%d);|", $winner);
$player_cur = "remark_off();" . $card_take;
if ($turn_cur != $turn_nex)
log_wr(sprintf("Turn Cur %d Turn Nex %d",$turn_cur, $turn_nex));
for ($i = 0 ; $i < BIN5_PLAYERS_N ; $i++) {
- $user_cur = &$bri->user[$table->player[$i]];
+ $user_cur = &$bin5->user[$table->player[$i]];
$ret = sprintf('gst.st = %d; ', $user_cur->step+1);
if ($table->turn == (BIN5_PLAYERS_N * BIN5_CARD_HAND)) { /* game finished */
log_wr(sprintf("GIOCO FINITO !!!"));
-
- /* ************************************************ */
- /* PRIMA LA PARTE PER LO SHOW DI CHI HA VINTO */
- /* ************************************************ */
- /* $pt_cur = calculate_points(&$table); */
- /* $table->game_next(1); */
-
- /* $plist = "$table->table_token|$user->table_orig|$table->player_n"; */
- /* $ucodes = array(); */
- /* for ($i = 0 ; $i < BIN5_PLAYERS_N ; $i++) { */
- /* $user_cur = &$bri->user[$table->player[$i]]; */
- /* $plist .= '|'.xcapelt($user_cur->name).'|'.$pt_cur[$i]; */
- /* $ucodes[$i] = $user_cur->code_get(); */
- /* } */
- /* for ($i = 0 ; $i < BIN5_PLAYERS_N ; $i++) { */
- /* $plist .= '|'.xcapelt($ucodes[$i]); */
- /* } */
- /* log_legal($curtime, $user->ip, $user, "STAT:BRISKIN5:FINISH_GAME", $plist); */
- /* if ($user->table_orig < TABLES_AUTH_N) { */
- /* require_once("../Obj/dbase_".$G_dbasetype.".phh"); */
-
- /* if (($bdb = BriskDB::create()) != FALSE) { */
- /* $bdb->bin5_points_save($curtime, $table, $user->table_orig, $ucodes, $pt_cur); */
- /* unset($bdb); */
- /* } */
- /* else { */
- /* log_points($remote_addr, $curtime, $user, "STAT:BRISKIN5:FINISH_GAME", "DATABASE CONNECTION FAILED"); */
- /* } */
- /* log_points($curtime, $user, "STAT:BRISKIN5:FINISH_GAME", $plist); */
- /* } */
-
- /* $table->game_init(&$bri->user); */
-
- if ($table->rules_engine(&$bri, BIN5_RULES_FINISH, $user)) {
+ if ($table->rules_engine(&$bin5, $curtime, BIN5_RULES_FINISH, $user)) {
for ($i = 0 ; $i < BIN5_PLAYERS_N ; $i++) {
- $user_cur = &$bri->user[$table->player[$i]];
- $retar[$i] .= show_table(&$bri,&$user_cur,$user_cur->step+1,TRUE, TRUE);
+ $user_cur = &$bin5->user[$table->player[$i]];
+ $retar[$i] .= show_table(&$bin5,&$user_cur,$user_cur->step+1,TRUE, TRUE);
}
}
}
-
for ($i = 0 ; $i < BIN5_PLAYERS_N ; $i++) {
- $user_cur = &$bri->user[$table->player[$i]];
+ $user_cur = &$bin5->user[$table->player[$i]];
$user_cur->comm[$user_cur->step % COMM_N] = $retar[$i];
$user_cur->step_inc();
log_wr("NOSENSE");
}
}
- log_wr("before save data");
- log_wr($user->step, 'bin::index_wr.php: after save_data()');
return TRUE;
}
?>