DIR : /home/kozerus/public_html/go/dgs/tournaments/ladder/admin.php

/home/kozerus/public_html/go/dgs/tournaments/ladder

<?php
/*
Dragon Go Server
Copyright (C) 2001-  Erik Ouchterlony, Jens-Uwe Gaspar

This program is free software: you can redistribute it and/or modify
it under the terms of the GNU Affero General Public License as
published by the Free Software Foundation, either version 3 of the
License, or (at your option) any later version.

This program is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
GNU Affero General Public License for more details.

You should have received a copy of the GNU Affero General Public License
along with this program.  If not, see <http://www.gnu.org/licenses/>.
*/

$TranslateGroups[] = "Tournament";

chdir('../..');
require_once 'include/std_functions.php';
require_once 'include/form_functions.php';
require_once 'include/classlib_user.php';
require_once 'tournaments/include/tournament_cache.php';
require_once 'tournaments/include/tournament_factory.php';
require_once 'tournaments/include/tournament_games.php';
require_once 'tournaments/include/tournament_helper.php';
require_once 'tournaments/include/tournament_ladder.php';
require_once 'tournaments/include/tournament_ladder_helper.php';
require_once 'tournaments/include/tournament_ladder_props.php';
require_once 'tournaments/include/tournament_log_helper.php';
require_once 'tournaments/include/tournament_participant.php';
require_once 'tournaments/include/tournament_properties.php';
require_once 'tournaments/include/tournament_status.php';
require_once 'tournaments/include/tournament_utils.php';

$GLOBALS['ThePage'] = new Page('TournamentLadderAdmin');


{
   connect2mysql();

   $logged_in = who_is_logged( $player_row, LOGIN_DEFAULT_OPTS_TDIR_OPS );
   if ( !$logged_in )
      error('login_if_not_logged_in', 'Tournament.ladder.admin');
   if ( !ALLOW_TOURNAMENTS )
      error('feature_disabled', 'Tournament.ladder.admin');

   $my_id = $player_row['ID'];
   if ( $my_id <= GUESTS_ID_MAX )
      error('not_allowed_for_guest', 'Tournament.ladder.admin');

   $page = "admin.php";

/* Actual REQUEST calls used
     tid=                        : admin T-ladder
     ta_seed&tid=                : seed T-ladder with registered TPs
     ta_adduser&tid=&uid=        : add user (Players.ID) to T-ladder
     ta_deluser&tid=&uid=        : remove user (Players.ID) along WITH user-registration (no confirm)
     ta_delete&tid=              : delete T-ladder (to seed again, need confirm)
     ta_delete&confirm=1&tid=    : delete T-ladder (confirmed)
     ta_wduser&tid=&uid=         : withdraw user from T-ladder
     ta_revokewduser&tid=&uid=   : revoke withdraw of user from T-ladder
     ta_toggle_timeout_loss&tid=&uid= : toggle timeout-loss flag for TP
     ta_cancel&tid=              : cancel ladder-deletion
     ta_crownking&tid=&uid=      : crown user as king of the hill
*/

   $tid = (int) @$_REQUEST['tid'];
   $uid = (int) @$_REQUEST['uid'];
   if ( $tid < 0 ) $tid = 0;
   $is_delete = (bool) @$_REQUEST['ta_delete'];

   if ( @$_REQUEST['ta_cancel'] ) // cancel delete
      jump_to("tournaments/ladder/admin.php?tid=$tid");

   $tourney = TournamentCache::load_cache_tournament( 'Tournament.ladder_admin.find_tournament', $tid );
   $tstatus = new TournamentStatus( $tourney );
   $ttype = TournamentFactory::getTournament($tourney->WizardType);

   // edit allowed?
   $is_admin = TournamentUtils::isAdmin();
   $allow_edit_tourney = TournamentHelper::allow_edit_tournaments($tourney, $my_id);
   if ( !$allow_edit_tourney )
      error('tournament_edit_not_allowed', "Tournament.ladder_admin.edit($tid,$my_id)");

   $tprops = TournamentCache::load_cache_tournament_properties( 'Tournament.ladder_admin', $tid );
   $tl_props = TournamentCache::load_cache_tournament_ladder_props( 'Tournament.ladder_admin', $tid );

   $errors = $tstatus->check_edit_status( TournamentLadder::get_edit_tournament_status() );
   $allow_admin = TournamentLadder::allow_edit_ladder($tourney, $errors); // check-locks
   $tdwork_locked = $tourney->isFlagSet(TOURNEY_FLAG_LOCK_TDWORK);
   $authorise_seed = ( $tourney->Status == TOURNEY_STATUS_PAIR );


   // init
   $user = null;
   $tladder_user = null;
   $authorise_edit_user = $authorise_add_user = false;
   $count_tp_reg = $count_tl_user = $count_run_tg = 0;
   if ( !$is_delete && $uid > 0 )
   {
      $user = User::load_user($uid);
      if ( is_null($user) )
         $errors[] = T_('Unknown user-id') . " [".$uid."]";
      else
      {
         $tladder_user = TournamentLadder::load_tournament_ladder_by_user($tid, $uid);

         $tp = TournamentCache::load_cache_tournament_participant( 'Tournament.ladder_admin', $tid, $uid );
         if ( is_null($tp) )
            $errors[] = sprintf( T_('Missing tournament user registration for user [%s].'), $user->Handle );
         else
         {
            $count_run_tg = TournamentGames::count_user_running_games( $tid, $tp->ID );

            $authorise_edit_user = true;
            $authorise_add_user = ( $tp->Status == TP_STATUS_REGISTER );

            if ( @$_REQUEST['ta_adduser'] && !$authorise_add_user )
               $errors[] = T_('Adding unregistered user to ladder is not allowed.');

            if ( is_null($tladder_user) && ($user->AdminOptions & ADMOPT_DENY_TOURNEY_REGISTER) )
               $errors[] = T_('Tournament registration of this user has been denied by admins.');
         }
      }
   }
   elseif ( !$is_delete && $uid <= 0 )
   {
      $count_tp_reg = TournamentParticipant::count_tournament_participants(
         $tid, TP_STATUS_REGISTER, 1, // ladder has only 1 round
         /*NextR*/false );
      $count_tl_user = TournamentLadder::count_tournament_ladder( $tid );
   }


   // ---------- Process actions ------------------------------------------------

   if ( $allow_admin && count($errors) == 0 )
   {
      $allow_edit_user = ( $authorise_edit_user && !is_null($user) && !is_null($tladder_user) );

      if ( $is_delete && $authorise_seed && @$_REQUEST['confirm'] ) // confirm delete ladder
      {
         TournamentLadder::delete_ladder($tid);
         TournamentLogHelper::log_delete_tournament_ladder( $tid, $allow_edit_tourney );
         $sys_msg = urlencode( T_('Ladder deleted!') );
         jump_to("tournaments/ladder/admin.php?tid=$tid".URI_AMP."sysmsg=$sys_msg");
      }
      elseif ( @$_REQUEST['ta_seed'] && $authorise_seed )
      {
         $seed_order = (int)get_request_arg('seed_order');
         $seed_reorder = (bool)get_request_arg('seed_reorder');
         $cnt = TournamentLadder::seed_ladder( $tourney, $tprops, $seed_order, $seed_reorder );

         if ( $cnt > 0 )
            TournamentLogHelper::log_seed_tournament_ladder( $tid, $allow_edit_tourney, $seed_order, $seed_reorder, $cnt );
         $sys_msg = urlencode( ( $cnt > 0 ? T_('Ladder seeded!') : T_('No change!') ) );
         jump_to("tournaments/ladder/admin.php?tid=$tid".URI_AMP."sysmsg=$sys_msg");
      }
      elseif ( @$_REQUEST['ta_adduser'] && $authorise_add_user && !is_null($user) && is_null($tladder_user) )
      {
         ta_begin();
         {//HOT-section to re-add existing TournamentParticipant-user into ladder
            TournamentLadder::add_user_to_ladder( $tid, $user->ID, $allow_edit_tourney, $tl_props, $tprops );
         }
         ta_end();
         $sys_msg = urlencode( sprintf( T_('User [%s] added to ladder!'), $user->Handle) );
         jump_to("tournaments/ladder/admin.php?tid=$tid".URI_AMP."uid=$uid".URI_AMP."sysmsg=$sys_msg");
      }
      elseif ( @$_REQUEST['ta_wduser'] && $allow_edit_user )
      {
         ta_begin();
         {//HOT-section to withdraw user from ladder
            $act_msg = $tladder_user->schedule_withdrawal_from_ladder( 'ladder.admin.withdraw_user',
               TLOG_TYPE_DIRECTOR, $user->Handle );
         }
         ta_end();
         $sys_msg = urlencode( $act_msg );
         jump_to("tournaments/ladder/admin.php?tid=$tid".URI_AMP."uid=$uid".URI_AMP."sysmsg=$sys_msg");
      }
      elseif ( @$_REQUEST['ta_revokewduser']  && $allow_edit_user )
      {
         ta_begin();
         {//HOT-section to revoke withdrawal of user from ladder
            $tladder_user->revoke_withdrawal_from_ladder( 'ladder.admin.revoke_withdraw_user' );
         }
         ta_end();
         $sys_msg = urlencode( T_('Withdrawal of user from ladder revoked!') );
         jump_to("tournaments/ladder/admin.php?tid=$tid".URI_AMP."uid=$uid".URI_AMP."sysmsg=$sys_msg");
      }
      elseif ( @$_REQUEST['ta_toggle_timeout_loss'] && $allow_edit_user )
      {
         TournamentParticipant::update_participant_flags_with_penalty( $tid, $uid, TP_FLAG_TIMEOUT_LOSS, -1 );
         $sys_msg = urlencode( T_('Toggled timeout-loss flag for tournament participant (without penalty)!') );
         jump_to("tournaments/ladder/admin.php?tid=$tid".URI_AMP."uid=$uid".URI_AMP."sysmsg=$sys_msg");
      }
      elseif ( @$_REQUEST['ta_deluser'] && $allow_edit_user )
      {
         $reason = sprintf( T_('Tournament-Director (or admin) %s has removed the user.'), "<user $my_id>" );
         ta_begin();
         {//HOT-section to remove user from ladder
            $success = $tladder_user->remove_user_from_ladder( 'Tournament.ladder_admin',
               $allow_edit_tourney, 'Ladder-Admin', /*upd-rank*/false, $uid, $user->Handle,
               /*withdraw*/false, /*nfy-user*/true, $reason );
            if ( $success )
            {
               $sys_msg = urlencode( sprintf( T_('User [%s] removed from this ladder-tournament!'), $user->Handle )
                  . ' ' . T_('User and opponents have been notified!') );
               jump_to("tournaments/ladder/admin.php?tid=$tid".URI_AMP."uid=$uid".URI_AMP."sysmsg=$sys_msg");
            }
         }
         ta_end();
      }
      elseif ( @$_REQUEST['ta_crownking'] && $allow_edit_user )
      {
         TournamentLadderHelper::process_tournament_ladder_crown_king( array(
               'tid'             => $tid,
               'uid'             => $uid,
               'rid'             => $tladder_user->rid,
               'Rank'            => $tladder_user->Rank,
               'X_RankChanged'   => $tladder_user->RankChanged,
               'Rating2'         => $user->Rating,
               'owner_uid'       => $tourney->Owner_ID, ),
            $allow_edit_tourney, $my_id );
         $sys_msg = urlencode( sprintf( T_('User [%s] crowned as king for this ladder-tournament!'), $user->Handle ));
         jump_to("tournaments/ladder/admin.php?tid=$tid".URI_AMP."uid=$uid".URI_AMP."sysmsg=$sys_msg");
      }
   }//actions


   // ---------- Tournament Form -----------------------------------

   $tform = new Form( 'tournament', $page, FORM_GET );
   $tform->add_hidden( 'tid', $tid );

   $tform->add_row( array(
         'DESCRIPTION', T_('Tournament ID'),
         'TEXT',        $tourney->build_info() ));
   TournamentUtils::show_tournament_flags( $tform, $tourney );
   $tform->add_row( array(
         'DESCRIPTION', T_('Tournament Status'),
         'TEXT', $tourney->getStatusText($tourney->Status) ));
   $tform->add_row( array(
         'DESCRIPTION', T_('Rating Use Mode#tourney'),
         'TEXT',  TournamentProperties::getRatingUseModeText($tprops->RatingUseMode) ));

   if ( count($errors) )
   {
      $tform->add_row( array( 'HR' ));
      $tform->add_row( array(
            'DESCRIPTION', T_('Error'),
            'TEXT', buildErrorListString( T_('There are some errors'), $errors ) ));
      $tform->add_empty_row();
   }
   elseif ( $tdwork_locked )
   {
      $tform->add_row( array( 'HR' ));
      $tform->add_row( array(
            'DESCRIPTION', T_('Warning'),
            'TEXT', $tourney->buildMaintenanceLockText(TOURNEY_FLAG_LOCK_TDWORK) ));
   }

   // ADMIN: Seed Ladder ---------------

   if ( $authorise_seed )
   {
      $tform->add_row( array( 'HR' ));
      $tform->add_row( array( 'HEADER', T_('Prepare Ladder') ));
      if ( $count_tp_reg + $count_tl_user > 0 )
      {
         $tform->add_row( array(
               'CELL', 2, '',
               'TEXT', sprintf( T_('There are %s registered participants from which %s already joined the ladder.'),
                              $count_tp_reg, $count_tl_user ), ));
         $tform->add_empty_row();
      }

      if ( !$is_delete )
      {
         list( $seed_order_def, $arr_seed_order ) = $tprops->build_seed_order();
         $seed_order_val = get_request_arg('seed_order', $seed_order_def);
         $seed_reorder = get_request_arg('seed_reorder');

         $tform->add_row( array(
               'CELL', 2, '',
               'TEXT', T_('Seed ladder with all registered tournament participants') . ':', ));
         $tform->add_row( array(
               'CELL', 2, '',
               'TEXT', sprintf( '(<b>%s</b> = %s)', T_('User Join Order#T_ladder'),
                                TournamentLadderProps::getUserJoinOrderText($tl_props->UserJoinOrder) ), ));
         $tform->add_row( array(
               'CELL', 2, '',
               'TEXT',         T_('Order by') . MED_SPACING,
               'SELECTBOX',    'seed_order', 1, $arr_seed_order, $seed_order_val, false,
               'SUBMITBUTTON', 'ta_seed', T_('Seed Ladder'),
               'TEXT',         SMALL_SPACING,
               'SUBMITBUTTON', 'ta_delete', T_('Delete Ladder'), ));
         if ( $count_tp_reg + $count_tl_user > 0 )
            $tform->add_row( array(
                  'CELL', 2, '',
                  'CHECKBOX', 'seed_reorder', 1, T_('Reorder already joined users (otherwise append new users)#T_ladder'), $seed_reorder, ));
      }
      else
      {
         $tform->add_hidden( 'confirm', 1 );
         $tform->add_row( array(
               'CELL', 2, '',
               'TEXT', T_('Please confirm deletion of ladder') . ':', ));
         $tform->add_row( array(
               'CELL', 2, '',
               'SUBMITBUTTON', 'ta_delete', T_('Confirm delete'),
               'TEXT', SMALL_SPACING,
               'SUBMITBUTTON', 'ta_cancel', T_('Cancel') ));
      }

      $tform->add_empty_row();
   }

   // ADMIN: Add/Remove user; Toggle HOLD-withdrawal -----------

   $tform->add_row( array( 'HR' ));
   $tform->add_row( array( 'HEADER', T_('Admin Ladder participants') ));
   if ( $uid > 0 && !is_null($user) )
   {
      $tform->add_hidden( 'uid', $uid );
      $tform->add_row( array(
            'CELL', 2, '',
            'TEXT', T_('User to edit') . ': ' .
                    sptext( $user->user_reference(), 3) .
                    anchor( $base_path."tournaments/edit_participant.php?tid=$tid".URI_AMP."uid=$uid",
                            T_('Edit participant'), '', 'class="TAdmin"'),
         ));
      $tform->add_row( array(
            'CELL', 2, '',
            'TEXT', sprintf( T_('Tournament Games of [%s]'), $user->Handle ) . ': ' .
                    sprintf( T_('open unprocessed games [%s]'), $count_run_tg) .
                    SEP_SPACING .
                    anchor( $base_path."show_games.php?tid=$tid".URI_AMP."uid=$uid",
                            T_('Running games') ) .
                    MED_SPACING .
                    anchor( $base_path."show_games.php?tid=$tid".URI_AMP."finished=1".URI_AMP."uid=$uid",
                            T_('Finished games') ),
         ));
      $tform->add_empty_row();
   }
   if ( !$is_delete && !is_null($user) && $authorise_edit_user ) // valid user
   {
      if ( is_null($tladder_user) ) // new TP
      {
         if ( $authorise_add_user )
            add_form_edit_user( $tform, $user,
               'ta_adduser', /*confirm*/false, T_('Add user [%s] to ladder'),
               T_('Add registered tournament participant to ladder (at bottom).'),
               /*notify*/0 );
         else
            $tform->add_row( array(
                  'CELL', 2, '',
                  'TEXT', T_('NOTE: Adding user only allowed for registered tournament participants.'), ));
      }
      else // existing TP
      {
         if ( $tladder_user->Flags & TL_FLAG_HOLD_WITHDRAW )
         {
            add_form_edit_user( $tform, $user,
               'ta_revokewduser', /*confirm*/false, T_('Revoke withdrawal of user [%s] from ladder'),
               T_('Withdrawal of user from ladder will be revoked.') );
         }
         else
         {
            add_form_edit_user( $tform, $user,
               'ta_wduser', /*confirm*/false, T_('Withdraw user [%s] from ladder'),
               T_('Withdrawal from ladder will be initiated.'),
               /*notify*/0,
               wordwrap( T_('Prevent new challenges with HOLD-flag to allow finishing and processing of tournament games, ' .
                     'after which user is automatically removed.'),
                  80, "<br>\n" ) );
         }
         $tform->add_empty_row();

         if ( !is_null($tp) )
         {
            add_form_edit_user( $tform, $user,
               'ta_toggle_timeout_loss', /*confirm*/false, T_('Toggle timeout-loss flag for user [%s]'),
               T_('Timeout-loss flag of tournament participant')
                  . sprintf( ': [%s], PenaltyPoints [%s]',
                     ($tp->Flags & TP_FLAG_TIMEOUT_LOSS) ? 1 : 0, $tp->PenaltyPoints ),
               /*notify*/0,
               T_('Tournament participants penalty points will not be changed.') );
            $tform->add_empty_row();
         }

         add_form_edit_user( $tform, $user,
            'ta_deluser', /*confirm*/false, T_('Remove user [%s] from ladder'),
            T_('User will be removed from ladder along with tournament user registration.'),
            /*notify*/2,
            wordwrap( TournamentUtils::get_tournament_ladder_notes_user_removed(), 80, "<br>\n" ) );
      }
      $tform->add_empty_row();
   }

   // ADMIN: Crown King ----------------

   $tform->add_row( array( 'HR' ));
   $tform->add_row( array( 'HEADER', T_('Crown King of the Hill#T_ladder') ));
   if ( !$is_delete && !is_null($user) && !is_null($tladder_user) && $authorise_edit_user ) // valid user
   {
      add_form_edit_user( $tform, $user,
         'ta_crownking', /*confirm*/false, T_("Crown user [%s] as 'King of the Hill'#T_ladder"),
         T_('User will be crowned as king. This is stored as tournament result.'),
         /*notify*/0,
         T_('User will NOT be notified of this. All tournament directors and owner will be notified.') );
   }
   $tform->add_empty_row();


   $title = T_('Tournament Ladder Admin');
   start_page( $title, true, $logged_in, $player_row );
   echo "<h3 class=Header>$title</h3>\n";

   $tform->echo_string();


   $menu_array = array();
   $menu_array[T_('Tournament info')] = "tournaments/view_tournament.php?tid=$tid";
   $menu_array[T_('Tournament participants')] = "tournaments/list_participants.php?tid=$tid";
   $menu_array[T_('View Ladder')] = "tournaments/ladder/view.php?tid=$tid";
   $menu_array[T_('Edit Ladder')] =
      array( 'url' => "tournaments/ladder/view.php?tid=$tid".URI_AMP."admin=1", 'class' => 'TAdmin' );
   $menu_array[T_('Manage tournament')] =
      array( 'url' => "tournaments/manage_tournament.php?tid=$tid", 'class' => 'TAdmin' );

   end_page(@$menu_array);
}//main


function add_form_edit_user( Form &$form, User $user, $action, $confirm, $act_fmt, $title, $notify=0, $extra='' )
{
   global $allow_admin, $base_path;
   $item = image( $base_path."images/star3.gif", '' ) . ' ';

   $form->add_row( array(
         'CELL', 2, '',
         'TEXT', span('bold', $title), ));
   if ( $extra )
   {
      $form->add_row( array(
            'CELL', 2, '',
            'TEXT', $item . $extra ));
   }
   if ( is_numeric($notify) )
   {
      if ( $notify > 1 )
         $nfy_text = T_('User and opponents of running games will be notified about this.#tourney');
      elseif ( $notify )
         $nfy_text = T_('User will be notified about this.#tourney');
      else
         $nfy_text = T_('User will NOT be notified about this.#tourney');
      $form->add_row( array(
            'CELL', 2, '',
            'TEXT', $item . $nfy_text, ));
   }
   $form->add_row( array(
         'CELL', 2, '',
         'SUBMITBUTTONX', $action, sprintf( $act_fmt, $user->Handle ), array( 'disabled' => !$allow_admin ),
         'TEXT', sptext(($confirm ? "(need confirmation)" : "(no confirmation)"),1), ));
}//add_form_edit_user
?>