order_backup.cpp

Go to the documentation of this file.

/*
 * This file is part of OpenTTD.
 * OpenTTD is free software; you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation, version 2.
 * OpenTTD 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 General Public License for more details. You should have received a copy of the GNU General Public License along with OpenTTD. If not, see <http://www.gnu.org/licenses/>.
 */
 
#include "stdafx.h"
#include "command_func.h"
#include "core/pool_func.hpp"
#include "network/network.h"
#include "network/network_func.h"
#include "order_backup.h"
#include "vehicle_base.h"
#include "window_func.h"
#include "station_map.h"
#include "order_cmd.h"
#include "group_cmd.h"
#include "vehicle_func.h"
 
#include "safeguards.h"
 
OrderBackupPool _order_backup_pool("BackupOrder");
INSTANTIATE_POOL_METHODS(OrderBackup)
 
 
OrderBackup::~OrderBackup()
{
  if (CleaningPool()) return;
 
  Order *o = this->orders;
  while (o != nullptr) {
    Order *next = o->next;
    delete o;
    o = next;
  }
}
 
OrderBackup::OrderBackup(const Vehicle *v, uint32_t user) : user(user), tile(v->tile), group(v->group_id)
{
  this->CopyConsistPropertiesFrom(v);
 
  /* If we have shared orders, store the vehicle we share the order with. */
  if (v->IsOrderListShared()) {
    this->clone = (v->FirstShared() == v) ? v->NextShared() : v->FirstShared();
  } else {
    /* Else copy the orders */
    Order **tail = &this->orders;
 
    /* Count the number of orders */
    for (const Order *order : v->Orders()) {
      Order *copy = new Order();
      copy->AssignOrder(*order);
      *tail = copy;
      tail = &copy->next;
    }
  }
}
 
void OrderBackup::DoRestore(Vehicle *v)
{
  /* If we had shared orders, recover that */
  if (this->clone != nullptr) {
    Command<CMD_CLONE_ORDER>::Do(DoCommandFlag::Execute, CO_SHARE, v->index, this->clone->index);
  } else if (this->orders != nullptr && OrderList::CanAllocateItem()) {
    v->orders = new OrderList(this->orders, v);
    this->orders = nullptr;
    /* Make sure buoys/oil rigs are updated in the station list. */
    InvalidateWindowClassesData(WC_STATION_LIST, 0);
  }
 
  /* Remove backed up name if it's no longer unique. */
  if (!IsUniqueVehicleName(this->name)) this->name.clear();
 
  v->CopyConsistPropertiesFrom(this);
 
  /* Make sure orders are in range */
  v->UpdateRealOrderIndex();
  if (v->cur_implicit_order_index >= v->GetNumOrders()) v->cur_implicit_order_index = v->cur_real_order_index;
 
  /* Restore vehicle group */
  Command<CMD_ADD_VEHICLE_GROUP>::Do(DoCommandFlag::Execute, this->group, v->index, false, VehicleListIdentifier{});
}
 
/* static */ void OrderBackup::Backup(const Vehicle *v, uint32_t user)
{
  /* Don't use reset as that broadcasts over the network to reset the variable,
   * which is what we are doing at the moment. */
  for (OrderBackup *ob : OrderBackup::Iterate()) {
    if (ob->user == user) delete ob;
  }
  if (OrderBackup::CanAllocateItem()) {
    new OrderBackup(v, user);
  }
}
 
/* static */ void OrderBackup::Restore(Vehicle *v, uint32_t user)
{
  for (OrderBackup *ob : OrderBackup::Iterate()) {
    if (v->tile != ob->tile || ob->user != user) continue;
 
    ob->DoRestore(v);
    delete ob;
  }
}
 
/* static */ void OrderBackup::ResetOfUser(TileIndex tile, uint32_t user)
{
  for (OrderBackup *ob : OrderBackup::Iterate()) {
    if (ob->user == user && (ob->tile == tile || tile == INVALID_TILE)) delete ob;
  }
}
 
CommandCost CmdClearOrderBackup(DoCommandFlags flags, TileIndex tile, ClientID user_id)
{
  /* No need to check anything. If the tile or user don't exist we just ignore it. */
  if (flags.Test(DoCommandFlag::Execute)) OrderBackup::ResetOfUser(tile == 0 ? INVALID_TILE : tile, user_id);
 
  return CommandCost();
}
 
/* static */ void OrderBackup::ResetUser(uint32_t user)
{
  assert(_network_server);
 
  for (OrderBackup *ob : OrderBackup::Iterate()) {
    /* If it's not a backup of us, ignore it. */
    if (ob->user != user) continue;
 
    Command<CMD_CLEAR_ORDER_BACKUP>::Post(TileIndex{}, static_cast<ClientID>(user));
    return;
  }
}
 
/* static */ void OrderBackup::Reset(TileIndex t, bool from_gui)
{
  /* The user has CLIENT_ID_SERVER as default when network play is not active,
   * but compiled it. A network client has its own variable for the unique
   * client/user identifier. Finally if networking isn't compiled in the
   * default is just plain and simple: 0. */
  uint32_t user = _networking && !_network_server ? _network_own_client_id : CLIENT_ID_SERVER;
 
  for (OrderBackup *ob : OrderBackup::Iterate()) {
    /* If this is a GUI action, and it's not a backup of us, ignore it. */
    if (from_gui && ob->user != user) continue;
    /* If it's not for our chosen tile either, ignore it. */
    if (t != INVALID_TILE && t != ob->tile) continue;
 
    if (from_gui) {
      /* We need to circumvent the "prevention" from this command being executed
       * while the game is paused, so use the internal method. Nor do we want
       * this command to get its cost estimated when shift is pressed. */
      Command<CMD_CLEAR_ORDER_BACKUP>::Unsafe<CommandCallback>(STR_NULL, nullptr, true, false, ob->tile, CommandTraits<CMD_CLEAR_ORDER_BACKUP>::Args{ ob->tile, static_cast<ClientID>(user) });
    } else {
      /* The command came from the game logic, i.e. the clearing of a tile.
       * In that case we have no need to actually sync this, just do it. */
      delete ob;
    }
  }
}
 
/* static */ void OrderBackup::ClearGroup(GroupID group)
{
  for (OrderBackup *ob : OrderBackup::Iterate()) {
    if (ob->group == group) ob->group = DEFAULT_GROUP;
  }
}
 
/* static */ void OrderBackup::ClearVehicle(const Vehicle *v)
{
  assert(v != nullptr);
  for (OrderBackup *ob : OrderBackup::Iterate()) {
    if (ob->clone == v) {
      /* Get another item in the shared list. */
      ob->clone = (v->FirstShared() == v) ? v->NextShared() : v->FirstShared();
      /* But if that isn't there, remove it. */
      if (ob->clone == nullptr) delete ob;
    }
  }
}
 
/* static */ void OrderBackup::RemoveOrder(OrderType type, DestinationID destination, bool hangar)
{
  for (OrderBackup *ob : OrderBackup::Iterate()) {
    for (Order *order = ob->orders; order != nullptr; order = order->next) {
      OrderType ot = order->GetType();
      if (ot == OT_GOTO_DEPOT && (order->GetDepotActionType() & ODATFB_NEAREST_DEPOT) != 0) continue;
      if (ot == OT_GOTO_DEPOT && hangar && !IsHangarTile(ob->tile)) continue; // Not an aircraft? Can't have a hangar order.
      if (ot == OT_IMPLICIT || (IsHangarTile(ob->tile) && ot == OT_GOTO_DEPOT && !hangar)) ot = OT_GOTO_STATION;
      if (ot == type && order->GetDestination() == destination) {
        /* Remove the order backup! If a station/depot gets removed, we can't/shouldn't restore those broken orders. */
        delete ob;
        break;
      }
    }
  }
}