/*
* brisk - index_wr.php
*
- * Copyright (C) 2006 matteo.nastasi@milug.org
+ * Copyright (C) 2006-2008 Matteo Nastasi
+ * mailto: nastasi@alternativeoutput.it
+ * matteo.nastasi@milug.org
+ * web: http://www.alternativeoutput.it
*
* This program is free software; you can redistribute it and/or modify
* it under the terms of the GNU General Public License as published by
*
*/
-require_once("brisk.phh");
+require_once("Obj/brisk.phh");
+require_once("Obj/auth.phh");
+// require_once("Obj/proxyscan.phh");
+require_once("briskin5/Obj/briskin5.phh");
+
+// Use of proxies isn't allowed.
+// if (is_proxy()) {
+// sleep(5);
+// exit;
+// }
+log_load("index_wr.php");
+
if (DEBUGGING == "local" && $_SERVER['REMOTE_ADDR'] != '127.0.0.1') {
echo "Debugging time!";
exit;
}
-log_load($sess, "LOAD: index_wr.php");
-
/*
* MAIN
*/
-log_wr($sess, 'COMM: '.$mesg);
-
-$sem = lock_data();
-$bri = &load_data();
-if (($user = &$bri->get_user($sess, &$idx)) == FALSE) {
- echo "Get User Error";
- log_wr($sess, "Get User Error");
- unlock_data($sem);
+
+/* if the IP is banned, exit without do nothing */
+if (array_search($_SERVER['REMOTE_ADDR'], $G_black_list) !== FALSE) {
+ sleep(5);
+ exit;
+}
+
+$is_spawn = FALSE;
+
+log_wr('COMM: '.$mesg);
+
+$sem = Room::lock_data();
+if (($room = &Room::load_data()) == FALSE) {
+ echo "Load data error";
+ log_wr("Load data error");
+ Room::unlock_data($sem);
+ exit;
+}
+if (($user = &$room->get_user($sess, &$idx)) == FALSE) {
+ Room::unlock_data($sem);
+ $argz = explode('|', $mesg);
+
+ if ($argz[0] == 'getchallenge') {
+ if (($a_sem = Challenges::lock_data()) != FALSE) {
+ log_main("chal lock data success");
+
+ if (($chals = &Challenges::load_data()) != FALSE) {
+ $curtime = time();
+
+ $token = uniqid("");
+ // echo '2|'.$argz[1].'|'.$token.'|'.$_SERVER['REMOTE_ADDR'].'|'.$curtime.'|';
+ // exit;
+
+ if (($login_new = validate_name($argz[1])) != FALSE) {
+ if ($chals->add($login_new, $token, $_SERVER['REMOTE_ADDR'], $curtime) != FALSE) {
+ echo '0|'.$token;
+ }
+ else {
+ echo '1|';
+ }
+ }
+ else {
+ echo '1|';
+ }
+ if ($chals->ismod()) {
+ Challenges::save_data(&$chals);
+ }
+ }
+
+
+ Challenges::unlock_data($a_sem);
+ }
+ }
+ else if ($argz[0] == 'auth') {
+ printf("challenge|ok");
+ }
+ else if ($argz[0] == 'help') {
+ echo show_notify(str_replace("\n", " ", $G_room_help), 0, "torna ai tavoli", 600, 500);
+ }
+ else if ($argz[0] == 'about') {
+ echo show_notify(str_replace("\n", " ", $G_room_about), 0, "torna ai tavoli", 400, 200);
+ }
+ else if ($argz[0] == 'roadmap') {
+ echo show_notify(str_replace("\n", " ", $G_room_roadmap), 0, "torna ai tavoli", 400, 200);
+ }
+ else if ($argz[0] == 'whysupport') {
+ echo show_notify(str_replace("\n", " ", $G_room_whysupport), 0, "torna ai tavoli", 400, 200);
+ }
+ else {
+ log_wr("Get User Error");
+ echo "Get User Error:" + $argz[0];
+ }
exit;
}
$argz = explode('|', $mesg);
+log_wr('POSTSPLIT: '.$argz[0]);
+
if ($argz[0] == 'shutdown') {
- log_auth($user_cur->sess, "Shutdown session.");
- $tmp_sess = $user->sess;
- $user->sess = "";
- step_unproxy($tmp_sess);
- $user->name = "";
- $user->the_end = FALSE;
-
- log_rd2($user->sess, "AUTO LOGOUT.");
+ log_auth($user->sess, "Shutdown session.");
+
+ $user->reset();
+
+ log_rd2("AUTO LOGOUT.");
if ($user->subst == 'sitdown' || $user->stat == 'table')
- $bri->room_wakeup(&$user);
+ $room->room_wakeup(&$user);
else if ($user->subst == 'standup')
- $bri->room_outstandup(&$user);
+ $room->room_outstandup(&$user);
else
- log_rd2($sess, "SHUTDOWN FROM WHAT ???");
+ log_rd2("SHUTDOWN FROM WHAT ???");
}
/******************
* *
$user->comm[$user->step % COMM_N] = "gst.st = ".($user->step+1)."; ";
$user->comm[$user->step % COMM_N] .= show_notify(str_replace("\n", " ", $G_room_help), 0, "torna ai tavoli", 600, 500);
- log_wr($sess, $user->comm[$user->step % COMM_N]);
+ log_wr($user->comm[$user->step % COMM_N]);
$user->step_inc();
}
$user->comm[$user->step % COMM_N] = "gst.st = ".($user->step+1)."; ";
$user->comm[$user->step % COMM_N] .= show_notify(str_replace("\n", " ", $G_room_about), 0, "torna ai tavoli", 400, 200);
- log_wr($sess, $user->comm[$user->step % COMM_N]);
+ log_wr($user->comm[$user->step % COMM_N]);
+ $user->step_inc();
+
+ }
+ else if ($argz[0] == 'roadmap') {
+ $user->comm[$user->step % COMM_N] = "gst.st = ".($user->step+1)."; ";
+ $user->comm[$user->step % COMM_N] .= show_notify(str_replace("\n", " ", $G_room_roadmap), 0, "torna ai tavoli", 400, 200);
+
+ log_wr($user->comm[$user->step % COMM_N]);
+ $user->step_inc();
+
+ }
+ else if ($argz[0] == 'whysupport') {
+ $user->comm[$user->step % COMM_N] = "gst.st = ".($user->step+1)."; ";
+ $user->comm[$user->step % COMM_N] .= show_notify(str_replace("\n", " ", $G_room_whysupport), 0, "torna ai tavoli", 400, 200);
+
+ log_wr($user->comm[$user->step % COMM_N]);
$user->step_inc();
}
else if ($argz[0] == 'chatt') {
- $bri->chatt_send(&$user,$mesg);
+ $room->chatt_send(&$user,$mesg);
}
/**********************
* *
else if ($user->subst == 'standup') {
if ($argz[0] == 'sitdown') {
+ log_wr("SITDOWN command");
+
if ($user->the_end == TRUE) {
- log_wr($sess, "INFO:SKIP:argz == sitdown && the_end == TRUE => ignore request.");
- unlock_data($sem);
+ log_wr("INFO:SKIP:argz == sitdown && the_end == TRUE => ignore request.");
+ Room::unlock_data($sem);
exit;
}
+
+ // Take parameters
+ $table_idx = $argz[1];
+ $table = &$room->table[$table_idx];
+
+ $curtime = time();
+
+ if ($G_shutdown || $table->wakeup_time > $curtime ||
+ ($table->auth_only && (($user->flags & USER_FLAG_AUTH) == 0)) ) {
+ $user->comm[$user->step % COMM_N] = "gst.st = ".($user->step+1)."; ";
+
+ $dt = date("H:i ", $curtime);
+ if ($G_shutdown) {
+ $user->comm[$user->step % COMM_N] .= sprintf('chatt_sub("%s", [2, "%s"],"<b>Il server sta per essere riavviato, non possono avere inizio nuove partite.</b>");', $dt, NICKSERV);
+ }
+ else if ($table->auth_only && (($user->flags & USER_FLAG_AUTH) == 0)) {
+ $user->comm[$user->step % COMM_N] .= sprintf('chatt_sub("%s", [2, "%s"],"<b>Il tavolo a cui volevi sederti richiede autentifica.</b>");', $dt, NICKSERV);
+ }
+ else {
+ $user->comm[$user->step % COMM_N] .= sprintf('chatt_sub("%s", [2, "%s"],"<b>Il tavolo si è appena liberato, ci si potrà sedere tra %d secondi.</b>");', $dt, NICKSERV, $table->wakeup_time - $curtime);
+ }
+ $user->step_inc();
+ Room::save_data($room);
+ Room::unlock_data($sem);
+ exit;
+ }
+
/* TODO: refact to a function */
if ($user->bantime > $user->laccwr) {
$user->comm[$user->step % COMM_N] = "gst.st = ".($user->step+1)."; ";
- $user->comm[$user->step % COMM_N] .= show_notify("<br>Ti sei alzato da un tavolo senza il consenso degli altri giocatori. Dovrai aspettare ancora ".secstoword($user->bantime - $user->laccwr)." prima di poterti sedere nuovamente.", 2000, "Torna in piedi.", 400, 100);
+ $user->comm[$user->step % COMM_N] .= show_notify("<br>Ti sei alzato da un tavolo senza il consenso degli altri giocatori. Dovrai aspettare ancora ".secstoword($user->bantime - $user->laccwr)." prima di poterti sedere nuovamente.", 2000, "resta in piedi.", 400, 100);
$user->step_inc();
- save_data($bri);
- unlock_data($sem);
+ Room::save_data($room);
+ Room::unlock_data($sem);
exit;
}
- // Take parameters
- $table_idx = $argz[1];
- $table = &$bri->table[$table_idx];
-
if ($table->player_n == PLAYERS_N) {
- log_wr($sess, "WARN:FSM: Sitdown unreachable, table full.");
- unlock_data($sem);
+ log_wr("WARN:FSM: Sitdown unreachable, table full.");
+ Room::unlock_data($sem);
exit;
}
-
+
// set new status
$user->subst = "sitdown";
$user->table = $table_idx;
$user->table_pos = $table->user_add($idx);
+ log_wr("MOP before");
+
if ($table->player_n == PLAYERS_N) {
+ log_wr("MOP inall");
+
// Start game for this table.
- log_wr($sess, "Start game!");
+ log_wr("Start game!");
- $table->init(&$bri->user);
- $table->game_init(&$bri->user);
- $curtime = time();
+ //
+ // START THE SPAWN HERE!!!!
+ //
+
+ $curtime = time();
+
+ // Create new spawned table
+ $bri_sem = Briskin5::lock_data($table_idx);
+ $table_token = uniqid("");
+ $room->table[$table_idx]->table_token = $table_token;
+ $room->table[$table_idx]->table_start = $curtime;
+
+ $plist = "$table_token|$user->table|$table->player_n";
+ for ($i = 0 ; $i < $table->player_n ; $i++) {
+ $plist .= '|'.$room->user[$table->player[$i]]->sess;
+ }
+ log_legal($curtime, $user->sess, $user->name, "STAT:CREATE_GAME", $plist);
+
+ if (($bri =& new Briskin5(&$room, $table_idx, $table_token)) == FALSE)
+ log_wr("bri create: FALSE");
+ else
+ log_wr("bri create: ".serialize($bri));
- for ($i = 0 ; $i < $table->player_n ; $i++) {
- $user_cur = &$bri->user[$table->player[$i]];
- log_wr($sess, "Pre if!");
-
- $ret = "";
- $ret .= sprintf('gst.st_loc++; gst.st=%d; the_end=true; window.onunload = null ; document.location.assign("table.php");|', $user_cur->step+1);
-
- $user_cur->comm[$user_cur->step % COMM_N] = $ret;
- $user_cur->trans_step = $user_cur->step + 1;
- log_wr($sess, "TRANS ATTIVATO");
-
-
- $user_cur->stat_set('table');
- $user_cur->subst = 'asta';
- $user_cur->laccwr = $curtime;
- $user_cur->step_inc();
-
- $user_cur->comm[$user_cur->step % COMM_N] = show_table(&$bri,&$user_cur,$user_cur->step+1,TRUE, FALSE);
- $user_cur->step_inc();
- }
+ // init table
+ $bri_table =& $bri->table[0];
+ $bri_table->init(&$bri->user);
+ $bri_table->game_init(&$bri->user);
+ //
+ // Init spawned users.
+ //
+ for ($i = 0 ; $i < $table->player_n ; $i++) {
+ $bri_user_cur = &$bri->user[$i];
+ $user_cur = &$room->user[$table->player[$i]];
+
+ $bri_user_cur->stat_set('table');
+ $bri_user_cur->subst = 'asta';
+ $bri_user_cur->laccwr = $curtime;
+
+ $bri_user_cur->trans_step = $user_cur->step + 1;
+ $bri_user_cur->comm[$bri_user_cur->step % COMM_N] = "";
+ $bri_user_cur->step_inc();
+ $bri_user_cur->comm[$bri_user_cur->step % COMM_N] = show_table(&$bri,&$bri_user_cur,$bri_user_cur->step+1,TRUE, FALSE);
+
+ $bri_user_cur->step_inc();
+
+ log_wr("TRY PRESAVE: ".$bri_user_cur->step." TRANS STEP: ".$bri_user_cur->trans_step);
+
+ log_wr("Pre if!");
+
+ // ARRAY_POP DISABLED
+ // // CHECK
+ while (array_pop($user_cur->comm) != NULL);
+
+ $ret = "";
+ $ret .= sprintf('gst.st_loc++; gst.st=%d; createCookie("table_idx", %d, 24*365, cookiepath); createCookie("table_token", "%s", 24*365, cookiepath); the_end=true; window.onunload = null ; window.onbeforeunload = null ; document.location.assign("briskin5/index.php");|', $user_cur->step+1, $table_idx, $table_token);
+
+ $user_cur->comm[$user_cur->step % COMM_N] = $ret;
+ $user_cur->trans_step = $user_cur->step + 1;
+ log_wr("TRANS ATTIVATO");
+
+
+ $user_cur->stat_set('table');
+ $user_cur->subst = 'asta';
+ $user_cur->laccwr = $curtime;
+ $user_cur->step_inc();
+ }
+ log_wr("presave bri");
+ Briskin5::save_data($bri);
+ Briskin5::unlock_data($bri_sem);
+ log_wr("postsave bri");
}
+ // change room
+ $room->room_sitdown(&$user, $table_idx);
+
+ log_wr("MOP finish");
+
- $bri->room_sitdown(&$user, $table_idx);
}
else if ($argz[0] == 'logout') {
$user->comm[$user->step % COMM_N] = "gst.st = ".($user->step+1)."; ";
- $user->comm[$user->step % COMM_N] .= sprintf('postact_logout();');
+ $user->comm[$user->step % COMM_N] .= 'postact_logout();';
$user->the_end = TRUE;
$user->step_inc();
}
**********************/
else if ($user->subst == 'sitdown') {
if ($argz[0] == 'wakeup') {
- $bri->room_wakeup(&$user);
+ $room->room_wakeup(&$user);
}
else if ($argz[0] == 'logout') {
- $bri->room_wakeup(&$user);
+ $room->room_wakeup(&$user);
$user->comm[$user->step % COMM_N] = "gst.st = ".($user->step+1)."; ";
- $user->comm[$user->step % COMM_N] .= sprintf('postact_logout();');
+ $user->comm[$user->step % COMM_N] .= 'postact_logout();';
$user->the_end = TRUE;
$user->step_inc();
}
}
}
-/*********************
- * *
- * STAT: table *
- * *
- *********************/
-else if ($user->stat == 'table') {
- $user->laccwr = time();
- $table = &$bri->table[$user->table];
-
- if ($argz[0] == 'tableinfo') {
- log_wr($sess, "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);
- log_wr($sess, $user->comm[$user->step % COMM_N]);
- $user->step_inc();
- }
- else if ($argz[0] == 'chatt') {
- $bri->chatt_send(&$user,$mesg);
- }
- else if ($argz[0] == 'logout') {
- $remcalc = $argz[1];
-
- if ($user->exitislock == TRUE) {
- $remcalc++;
- $user->exitislock = FALSE;
- }
-
- $logout_cont = TRUE;
- if ($remcalc >= 3) {
- $lockcalc = $table->exitlock_calc(&$bri->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] .= 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($sess, $user->comm[$user->step % COMM_N]);
- $user->step_inc();
- $logout_cont = FALSE;
- }
- }
- else
- $user->bantime = $user->laccwr + BAN_TIME;
-
- if ($logout_cont == TRUE) {
- $bri->room_wakeup(&$user);
- }
- }
- else if ($argz[0] == 'exitlock') {
- $user->exitislock = ($user->exitislock == TRUE ? FALSE : TRUE);
- for ($ct = 0, $i = 0 ; $i < PLAYERS_N ; $i++) {
- $user_cur[$i] = &$bri->user[$table->player[$i]];
- if ($user_cur[$i]->exitislock == FALSE)
- $ct++;
- }
- for ($i = 0 ; $i < PLAYERS_N ; $i++) {
- $ret = sprintf('gst.st = %d;', $user_cur[$i]->step+1);
- $ret .= sprintf('exitlock_show(%d, %s);', $ct,
- ($user_cur[$i]->exitislock ? 'true' : 'false'));
- $user_cur[$i]->comm[$user_cur[$i]->step % COMM_N] = $ret;
- log_wr($sess, $user_cur[$i]->comm[$user_cur[$i]->step % COMM_N]);
- $user_cur[$i]->step_inc();
- }
- }
- else if ($user->subst == 'asta') {
- if ($argz[0] == 'lascio' && $user->handpt <= 2) {
- $index_cur = $table->gstart % PLAYERS_N;
-
- log_wr($sess, sprintf("GIOCO FINITO !!!"));
-
- $table->mult *= 2;
- $table->old_reason = sprintf("Ha lasciato %s perche` aveva al massimo 2 punti.", $user->name);
-
- $table->game_next();
- $table->game_init(&$bri->user);
-
- for ($i = 0 ; $i < PLAYERS_N ; $i++) {
- $user_cur = &$bri->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);
- $user_cur->comm[$user_cur->step % COMM_N] = $ret;
- $user_cur->step_inc();
- }
- }
- else if ($argz[0] == 'asta') {
- $again = TRUE;
-
- $index_cur = $table->gstart % PLAYERS_N;
- if ($user->table_pos == $index_cur &&
- $table->asta_pla[$index_cur]) {
- $a_card = $argz[1];
- $a_pnt = $argz[2];
-
- log_wr($sess, "CI SIAMO a_card ".$a_card." asta_card ".$table->asta_card);
-
- // Abbandono dell'asta
- if ($a_card <= -1) {
- log_wr($sess, "Abbandona l'asta.");
- $table->asta_pla[$index_cur] = FALSE;
- $user->asta_card = -1;
- $table->asta_pla_n--;
- $again = FALSE;
- }
- else if ($a_card <= 9) {
- if ($table->asta_card == 9) {
- if ($a_card == 9 && $a_pnt <= 120 && $a_pnt > $table->asta_pnt)
- $again = FALSE;
- }
- else {
- if ($a_card >= 0 && $a_card <= 9 && $a_card > $table->asta_card)
- $again = FALSE;
- }
-
- if ($again == FALSE) {
- log_wr($sess, "NUOVI ORZI.");
- $user->asta_card = $a_card;
- $table->asta_card = $a_card;
- if ($a_card == 9) {
- $user->asta_pnt = $a_pnt;
- $table->asta_pnt = $a_pnt;
- }
- }
- }
-
-
-
- if ($again) { // Qualcosa non andato bene, rifare
- log_wr($sess, "Ripetere.");
- }
- else {
- /* next step */
- $showst = "show_astat(";
- for ($i = 0 ; $i < PLAYERS_N ; $i++) {
- $user_cur = &$bri->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";
- $showst .= ");";
-
- $maxcard = -2;
- for ($i = 0 ; $i < PLAYERS_N ; $i++) {
- $user_cur = &$bri->user[$table->player[$i]];
- if ($maxcard < $user_cur->asta_card)
- $maxcard = $user_cur->asta_card;
- }
-
- if (($table->asta_pla_n > ($maxcard > -1 ? 1 : 0)) &&
- !($table->asta_card == 9 && $table->asta_pnt == 120)) {
- log_wr($sess,"ALLOPPA QUI");
- for ($i = 1 ; $i < PLAYERS_N ; $i++) {
- $index_next = ($table->gstart + $i) % PLAYERS_N;
- if ($table->asta_pla[$index_next]) {
- log_wr($sess,"GSTART 1");
- $table->gstart += $i;
- break;
- }
- }
-
-
- for ($i = 0 ; $i < PLAYERS_N ; $i++) {
- $user_cur = &$bri->user[$table->player[$i]];
- $ret = sprintf('gst.st = %d; %s', $user_cur->step+1, $showst);
- if ($user_cur->table_pos == ($table->gstart % PLAYERS_N))
- $ret .= sprintf('dispose_asta(%d,%d, %s); remark_on();',
- $table->asta_card + 1, $table->asta_pnt+1, ($user_cur->handpt <= 2 ? "true" : "false"));
- else
- $ret .= sprintf('dispose_asta(%d,%d, %s); remark_off();',
- $table->asta_card + 1, -($table->asta_pnt+1), ($user_cur->handpt <= 2 ? "true" : "false"));
- $user_cur->comm[$user_cur->step % COMM_N] = $ret;
- $user_cur->step_inc();
- }
- }
- else if ($table->asta_pla_n == 0) {
- log_wr($sess, "PASSANO TUTTI!");
-
- log_wr($sess, sprintf("GIOCO FINITO !!!"));
-
- $table->old_reason = "Hanno passato tutti.";
- $table->mult *= 2;
-
- $table->game_next();
- $table->game_init(&$bri->user);
-
- for ($i = 0 ; $i < PLAYERS_N ; $i++) {
- $user_cur = &$bri->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);
- $user_cur->comm[$user_cur->step % COMM_N] = $ret;
- $user_cur->step_inc();
- }
- }
- else {
- log_wr($sess, "FINITA !");
- // if a_pnt == 120 supergame ! else abbandono
- if ($a_pnt == 120 || $user->asta_card != -1) {
- $chooser = $index_cur;
- for ($i = 1 ; $i < PLAYERS_N ; $i++)
- if ($i != $chooser)
- $table->asta_pla[$i] = FALSE;
- }
- else {
- //"gst.st = ".($user->step+1)."; dispose_asta(".($table->asta_card + 1).",".-($table->asta_pnt).", true); remark_off();";
- $user->comm[$user->step % COMM_N] = sprintf( "gst.st = %d; dispose_asta(%d, %d, false); remark_off();", $user->step+1, $table->asta_card + 1,-($table->asta_pnt));
- $user->step_inc();
- for ($i = 1 ; $i < PLAYERS_N ; $i++) {
- $chooser = ($table->gstart + $i) % PLAYERS_N;
- if ($table->asta_pla[$chooser]) {
- break;
- }
- }
- }
- $table->asta_win = $chooser;
-
- for ($i = 0 ; $i < PLAYERS_N ; $i++) {
- $user_cur = &$bri->user[$table->player[$i]];
- $ret = sprintf('gst.st = %d; %s', $user_cur->step+1, $showst);
-
- if ($i == $chooser) {
- $ret .= "choose_seed(". $table->asta_card."); \$(\"asta\").style.visibility = \"hidden\"; remark_on();";
- }
- else {
- $ret .= "remark_off();";
- }
-
- $user_cur->comm[$user_cur->step % COMM_N] = $ret;
- $user_cur->step_inc();
- }
- }
- }
- }
- else {
- log_wr($sess, "NON CI SIAMO");
- }
- }
- /* asta::choose */
- else if ($argz[0] == 'choose') {
- if ($table->asta_win > -1 &&
- $user->table_pos == $table->asta_win) {
- $a_brisco = $argz[1];
- if ($a_brisco >= 0 && $a_brisco < 40) {
- $table->briscola = $a_brisco;
- $table->friend = $table->card[$a_brisco]->owner;
- log_wr($sess,"GSTART 2");
- $table->gstart = ($table->mazzo+1) % PLAYERS_N;
- log_wr($sess, "Setta la briscola a ".$a_brisco);
-
- $chooser = $table->asta_win;
- $user_chooser = &$bri->user[$table->player[$chooser]];
- for ($i = 0 ; $i < PLAYERS_N ; $i++) {
- $user_cur = &$bri->user[$table->player[$i]];
- $user_cur->subst = 'game';
- $ret = sprintf('gst.st = %d; subst = "game";', $user_cur->step+1);
-
-
- /* bg of caller cell */
- $ret .= briscola_show($bri, $table, $user_cur);
-
- /* first gamer */
- if ($i == ($table->gstart % PLAYERS_N))
- $ret .= "is_my_time = true; remark_on();";
- else
- $ret .= "is_my_time = false; remark_off();";
-
- $user_cur->comm[$user_cur->step % COMM_N] = $ret;
- $user_cur->step_inc();
- }
- /*
- TUTTE LE VARIABILI DI STATO PER PASSARE A GIOCARE E LE
- VAR PER PASSARE ALLA FASE DI GIOCO
- */
-
- }
- }
- }
- }
- else if ($user->subst == 'game') {
- log_wr($sess, "state: table::game".$argz[0]);
-
- if ($argz[0] == 'play') {
- $a_play = $argz[1];
- $a_x = $argz[2];
- $a_y = $argz[3];
-
- if (strpos($a_x, "px") != FALSE)
- $a_x = substr($a_x,0,-2);
- if (strpos($a_y, "px") != FALSE)
- $a_y = substr($a_y,0,-2);
-
- $loggo = sprintf("A_play %s, table_pos %d == %d, mazzo %d, gstart %d, card_stat %d, card_own %d",
- $a_play, $user->table_pos, ($table->gstart % PLAYERS_N),
- $table->mazzo, $table->gstart,
- $table->card[$a_play]->stat, $table->card[$a_play]->owner);
- log_wr($sess, "CIC".$loggo);
-
- /* se era il suo turno e la carta era sua ed era in mano */
- if ($a_play >=0 && $a_play < 40 &&
- ($user->table_pos == (($table->gstart + $table->turn) % PLAYERS_N)) &&
- $table->card[$a_play]->stat == 'hand' &&
- $table->card[$a_play]->owner == $user->table_pos) {
- log_wr($sess, sprintf("User: %s Play: %d",$user->name, $a_play));
-
- /* Change the card status. */
- $table->card[$a_play]->play($a_x, $a_y);
-
- /*
- * !!!! TURN INCREMENTED BEFORE !!!!
- */
- $turn_cur = ($table->gstart + $table->turn) % PLAYERS_N;
- $table->turn++;
-
- $card_play = sprintf("card_play(%d,%d,%d,%d);|",
- $user->table_pos, $a_play, $a_x, $a_y);
- if (($table->turn % PLAYERS_N) != 0) { /* manche not finished */
- $turn_nex = ($table->gstart + $table->turn) % PLAYERS_N;
-
- $player_cur = "remark_off();";
- $player_nex = $card_play . "is_my_time = true; remark_on();";
- $player_oth = $card_play;
- }
- else if ($table->turn <= (PLAYERS_N * 8)) { /* manche finished */
- $winner = calculate_winner($table);
- log_wr($sess,"GSTART 3");
- $table->gstart = $winner;
- $turn_nex = ($table->gstart + $table->turn) % PLAYERS_N;
-
- log_wr($sess, sprintf("The winner is: [%d] [%s]", $winner, $bri->user[$table->player[$winner]]->name));
- $card_take = sprintf("sleep(gst,2000);|cards_take(%d);|cards_hidetake($d);",
- $winner, $winner);
- $player_cur = "remark_off();" . $card_take . "|";
- if ($turn_cur != $turn_nex)
- $player_nex = $card_play . $card_take . "|";
- else
- $player_nex = "";
- if ($table->turn < (PLAYERS_N * 8)) /* game NOT finished */
- $player_nex .= "is_my_time = true; remark_on();";
- $player_oth = $card_play . $card_take;
- }
-
- log_wr($sess, sprintf("Turn Cur %d Turn Nex %d",$turn_cur, $turn_nex));
- for ($i = 0 ; $i < PLAYERS_N ; $i++) {
- $user_cur = &$bri->user[$table->player[$i]];
-
- $ret = sprintf('gst.st = %d; ', $user_cur->step+1);
-
-
- if ($i == $turn_cur) {
- $ret .= $player_cur;
- }
- if ($i == $turn_nex) {
- $ret .= $player_nex;
- }
- if ($i != $turn_cur && $i != $turn_nex) {
- $ret .= $player_oth;
- }
-
- $retar[$i] = $ret;
- }
-
-
-
-
- if ($table->turn == (PLAYERS_N * 8)) { /* game finished */
- log_wr($sess, sprintf("GIOCO FINITO !!!"));
-
- /* ************************************************ */
- /* PRIMA LA PARTE PER LO SHOW DI CHI HA VINTO */
- /* ************************************************ */
- calculate_points(&$table);
-
- $table->game_next();
- $table->game_init(&$bri->user);
-
- for ($i = 0 ; $i < PLAYERS_N ; $i++) {
- $user_cur = &$bri->user[$table->player[$i]];
- $retar[$i] .= show_table(&$bri,&$user_cur,$user_cur->step+1,TRUE, TRUE);
- }
- }
-
-
- for ($i = 0 ; $i < PLAYERS_N ; $i++) {
- $user_cur = &$bri->user[$table->player[$i]];
-
- $user_cur->comm[$user_cur->step % COMM_N] = $retar[$i];
- $user_cur->step_inc();
- }
-
- log_wr($sess, sprintf("TURN: %d",$table->turn));
- /* Have played all the players ? */
- /* NO: switch the focus and enable the next player to play. */
-
- /* YES: calculate who win and go to the next turn. */
- }
- }
- else
- log_wr($sess, "NOSENSE");
- }
-}
-log_wr($sess, "before save data");
-save_data($bri);
+log_wr("before save data");
+Room::save_data($room);
-unlock_data($sem);
+Room::unlock_data($sem);
exit;
?>