1

/* $Id$ */

     2

     3

/** @file command.cpp Handling of commands. */

     4

     5

#include "stdafx.h"

     6

#include "openttd.h"

     7

#include "landscape.h"

     8

#include "tile_map.h"

     9

#include "gui.h"

    10

#include "command_func.h"

    11

#include "network/network.h"

    12

#include "variables.h"

    13

#include "genworld.h"

    14

#include "newgrf_storage.h"

    15

#include "strings_func.h"

    16

#include "gfx_func.h"

    17

#include "functions.h"

    18

#include "town.h"

    19

#include "date_func.h"

    20

#include "debug.h"

    21

#include "company_func.h"

    22

#include "company_base.h"

    23

#include "signal_func.h"

    24

    25

#include "table/strings.h"

    26

    27

const char *_cmd_text = NULL;

    28

StringID _error_message;

    29

    30

/**

    31

 * Helper macro to define the header of all command handler macros.

    32

 *

    33

 * This macro create the function header for a given command handler function, as

    34

 * all command handler functions got the parameters from the #CommandProc callback

    35

 * type.

    36

 *

    37

 * @param yyyy The desired function name of the new command handler function.

    38

 */

    39

#define DEF_COMMAND(yyyy) CommandCost yyyy(TileIndex tile, uint32 flags, uint32 p1, uint32 p2)

    40

    41

DEF_COMMAND(CmdBuildRailroadTrack);

    42

DEF_COMMAND(CmdRemoveRailroadTrack);

    43

DEF_COMMAND(CmdBuildSingleRail);

    44

DEF_COMMAND(CmdRemoveSingleRail);

    45

    46

DEF_COMMAND(CmdLandscapeClear);

    47

    48

DEF_COMMAND(CmdBuildBridge);

    49

    50

DEF_COMMAND(CmdBuildRailroadStation);

    51

DEF_COMMAND(CmdRemoveFromRailroadStation);

    52

DEF_COMMAND(CmdConvertRail);

    53

    54

DEF_COMMAND(CmdBuildSingleSignal);

    55

DEF_COMMAND(CmdRemoveSingleSignal);

    56

    57

DEF_COMMAND(CmdTerraformLand);

    58

    59

DEF_COMMAND(CmdPurchaseLandArea);

    60

DEF_COMMAND(CmdSellLandArea);

    61

    62

DEF_COMMAND(CmdBuildTunnel);

    63

    64

DEF_COMMAND(CmdBuildTrainDepot);

    65

DEF_COMMAND(CmdBuildTrainWaypoint);

    66

DEF_COMMAND(CmdRenameWaypoint);

    67

DEF_COMMAND(CmdRemoveTrainWaypoint);

    68

    69

DEF_COMMAND(CmdBuildRoadStop);

    70

DEF_COMMAND(CmdRemoveRoadStop);

    71

    72

DEF_COMMAND(CmdBuildLongRoad);

    73

DEF_COMMAND(CmdRemoveLongRoad);

    74

DEF_COMMAND(CmdBuildRoad);

    75

DEF_COMMAND(CmdRemoveRoad);

    76

    77

DEF_COMMAND(CmdBuildRoadDepot);

    78

    79

DEF_COMMAND(CmdBuildAirport);

    80

    81

DEF_COMMAND(CmdBuildDock);

    82

    83

DEF_COMMAND(CmdBuildShipDepot);

    84

    85

DEF_COMMAND(CmdBuildBuoy);

    86

    87

DEF_COMMAND(CmdPlantTree);

    88

    89

DEF_COMMAND(CmdBuildRailVehicle);

    90

DEF_COMMAND(CmdMoveRailVehicle);

    91

    92

DEF_COMMAND(CmdSellRailWagon);

    93

    94

DEF_COMMAND(CmdSendTrainToDepot);

    95

DEF_COMMAND(CmdForceTrainProceed);

    96

DEF_COMMAND(CmdReverseTrainDirection);

    97

    98

DEF_COMMAND(CmdModifyOrder);

    99

DEF_COMMAND(CmdSkipToOrder);

   100

DEF_COMMAND(CmdDeleteOrder);

   101

DEF_COMMAND(CmdInsertOrder);

   102

DEF_COMMAND(CmdChangeServiceInt);

   103

DEF_COMMAND(CmdRestoreOrderIndex);

   104

   105

DEF_COMMAND(CmdBuildIndustry);

   106

   107

DEF_COMMAND(CmdBuildCompanyHQ);

   108

DEF_COMMAND(CmdSetCompanyManagerFace);

   109

DEF_COMMAND(CmdSetCompanyColor);

   110

   111

DEF_COMMAND(CmdIncreaseLoan);

   112

DEF_COMMAND(CmdDecreaseLoan);

   113

   114

DEF_COMMAND(CmdWantEnginePreview);

   115

   116

DEF_COMMAND(CmdRenameVehicle);

   117

DEF_COMMAND(CmdRenameEngine);

   118

   119

DEF_COMMAND(CmdRenameCompany);

   120

DEF_COMMAND(CmdRenamePresident);

   121

   122

DEF_COMMAND(CmdRenameStation);

   123

   124

DEF_COMMAND(CmdSellAircraft);

   125

DEF_COMMAND(CmdBuildAircraft);

   126

DEF_COMMAND(CmdSendAircraftToHangar);

   127

DEF_COMMAND(CmdRefitAircraft);

   128

   129

DEF_COMMAND(CmdPlaceSign);

   130

DEF_COMMAND(CmdRenameSign);

   131

   132

DEF_COMMAND(CmdBuildRoadVeh);

   133

DEF_COMMAND(CmdSellRoadVeh);

   134

DEF_COMMAND(CmdSendRoadVehToDepot);

   135

DEF_COMMAND(CmdTurnRoadVeh);

   136

DEF_COMMAND(CmdRefitRoadVeh);

   137

   138

DEF_COMMAND(CmdPause);

   139

   140

DEF_COMMAND(CmdBuyShareInCompany);

   141

DEF_COMMAND(CmdSellShareInCompany);

   142

DEF_COMMAND(CmdBuyCompany);

   143

   144

DEF_COMMAND(CmdBuildTown);

   145

   146

DEF_COMMAND(CmdRenameTown);

   147

DEF_COMMAND(CmdDoTownAction);

   148

   149

DEF_COMMAND(CmdSetRoadDriveSide);

   150

   151

DEF_COMMAND(CmdChangePatchSetting);

   152

   153

DEF_COMMAND(CmdSellShip);

   154

DEF_COMMAND(CmdBuildShip);

   155

DEF_COMMAND(CmdSendShipToDepot);

   156

DEF_COMMAND(CmdRefitShip);

   157

   158

DEF_COMMAND(CmdOrderRefit);

   159

DEF_COMMAND(CmdCloneOrder);

   160

   161

DEF_COMMAND(CmdClearArea);

   162

   163

DEF_COMMAND(CmdGiveMoney);

   164

DEF_COMMAND(CmdMoneyCheat);

   165

DEF_COMMAND(CmdBuildCanal);

   166

DEF_COMMAND(CmdBuildLock);

   167

   168

DEF_COMMAND(CmdCompanyCtrl);

   169

   170

DEF_COMMAND(CmdLevelLand);

   171

   172

DEF_COMMAND(CmdRefitRailVehicle);

   173

   174

DEF_COMMAND(CmdBuildSignalTrack);

   175

DEF_COMMAND(CmdRemoveSignalTrack);

   176

   177

DEF_COMMAND(CmdSetAutoReplace);

   178

   179

DEF_COMMAND(CmdCloneVehicle);

   180

DEF_COMMAND(CmdStartStopVehicle);

   181

DEF_COMMAND(CmdMassStartStopVehicle);

   182

DEF_COMMAND(CmdAutoreplaceVehicle);

   183

DEF_COMMAND(CmdDepotSellAllVehicles);

   184

DEF_COMMAND(CmdDepotMassAutoReplace);

   185

   186

DEF_COMMAND(CmdCreateGroup);

   187

DEF_COMMAND(CmdRenameGroup);

   188

DEF_COMMAND(CmdDeleteGroup);

   189

DEF_COMMAND(CmdAddVehicleGroup);

   190

DEF_COMMAND(CmdAddSharedVehicleGroup);

   191

DEF_COMMAND(CmdRemoveAllVehiclesGroup);

   192

DEF_COMMAND(CmdSetGroupReplaceProtection);

   193

   194

DEF_COMMAND(CmdMoveOrder);

   195

DEF_COMMAND(CmdChangeTimetable);

   196

DEF_COMMAND(CmdSetVehicleOnTime);

   197

DEF_COMMAND(CmdAutofillTimetable);

   198

#undef DEF_COMMAND

   199

   200

/**

   201

 * The master command table

   202

 *

   203

 * This table contains all possible CommandProc functions with

   204

 * the flags which belongs to it. The indizes are the same

   205

 * as the value from the CMD_* enums.

   206

 */

   207

static const Command _command_proc_table[] = {

   208

	{CmdBuildRailroadTrack,           CMD_AUTO}, /* CMD_BUILD_RAILROAD_TRACK */

   209

	{CmdRemoveRailroadTrack,          CMD_AUTO}, /* CMD_REMOVE_RAILROAD_TRACK */

   210

	{CmdBuildSingleRail,              CMD_AUTO}, /* CMD_BUILD_SINGLE_RAIL */

   211

	{CmdRemoveSingleRail,             CMD_AUTO}, /* CMD_REMOVE_SINGLE_RAIL */

   212

	{CmdLandscapeClear,                      0}, /* CMD_LANDSCAPE_CLEAR */

   213

	{CmdBuildBridge,                  CMD_AUTO}, /* CMD_BUILD_BRIDGE */

   214

	{CmdBuildRailroadStation,         CMD_AUTO}, /* CMD_BUILD_RAILROAD_STATION */

   215

	{CmdBuildTrainDepot,              CMD_AUTO}, /* CMD_BUILD_TRAIN_DEPOT */

   216

	{CmdBuildSingleSignal,            CMD_AUTO}, /* CMD_BUILD_SIGNALS */

   217

	{CmdRemoveSingleSignal,           CMD_AUTO}, /* CMD_REMOVE_SIGNALS */

   218

	{CmdTerraformLand,                CMD_AUTO}, /* CMD_TERRAFORM_LAND */

   219

	{CmdPurchaseLandArea,             CMD_AUTO}, /* CMD_PURCHASE_LAND_AREA */

   220

	{CmdSellLandArea,                        0}, /* CMD_SELL_LAND_AREA */

   221

	{CmdBuildTunnel,                  CMD_AUTO}, /* CMD_BUILD_TUNNEL */

   222

	{CmdRemoveFromRailroadStation,           0}, /* CMD_REMOVE_FROM_RAILROAD_STATION */

   223

	{CmdConvertRail,                         0}, /* CMD_CONVERT_RAILD */

   224

	{CmdBuildTrainWaypoint,                  0}, /* CMD_BUILD_TRAIN_WAYPOINT */

   225

	{CmdRenameWaypoint,                      0}, /* CMD_RENAME_WAYPOINT */

   226

	{CmdRemoveTrainWaypoint,                 0}, /* CMD_REMOVE_TRAIN_WAYPOINT */

   227

   228

	{CmdBuildRoadStop,                CMD_AUTO}, /* CMD_BUILD_ROAD_STOP */

   229

	{CmdRemoveRoadStop,                      0}, /* CMD_REMOVE_ROAD_STOP */

   230

	{CmdBuildLongRoad,                CMD_AUTO}, /* CMD_BUILD_LONG_ROAD */

   231

	{CmdRemoveLongRoad,               CMD_AUTO}, /* CMD_REMOVE_LONG_ROAD */

   232

	{CmdBuildRoad,                           0}, /* CMD_BUILD_ROAD */

   233

	{CmdRemoveRoad,                          0}, /* CMD_REMOVE_ROAD */

   234

	{CmdBuildRoadDepot,               CMD_AUTO}, /* CMD_BUILD_ROAD_DEPOT */

   235

   236

	{CmdBuildAirport,                 CMD_AUTO}, /* CMD_BUILD_AIRPORT */

   237

	{CmdBuildDock,                    CMD_AUTO}, /* CMD_BUILD_DOCK */

   238

	{CmdBuildShipDepot,               CMD_AUTO}, /* CMD_BUILD_SHIP_DEPOT */

   239

	{CmdBuildBuoy,                    CMD_AUTO}, /* CMD_BUILD_BUOY */

   240

	{CmdPlantTree,                    CMD_AUTO}, /* CMD_PLANT_TREE */

   241

	{CmdBuildRailVehicle,                    0}, /* CMD_BUILD_RAIL_VEHICLE */

   242

	{CmdMoveRailVehicle,                     0}, /* CMD_MOVE_RAIL_VEHICLE */

   243

   244

	{CmdSellRailWagon,                       0}, /* CMD_SELL_RAIL_WAGON */

   245

	{CmdSendTrainToDepot,                    0}, /* CMD_SEND_TRAIN_TO_DEPOT */

   246

	{CmdForceTrainProceed,                   0}, /* CMD_FORCE_TRAIN_PROCEED */

   247

	{CmdReverseTrainDirection,               0}, /* CMD_REVERSE_TRAIN_DIRECTION */

   248

   249

	{CmdModifyOrder,                         0}, /* CMD_MODIFY_ORDER */

   250

	{CmdSkipToOrder,                         0}, /* CMD_SKIP_TO_ORDER */

   251

	{CmdDeleteOrder,                         0}, /* CMD_DELETE_ORDER */

   252

	{CmdInsertOrder,                         0}, /* CMD_INSERT_ORDER */

   253

   254

	{CmdChangeServiceInt,                    0}, /* CMD_CHANGE_SERVICE_INT */

   255

   256

	{CmdBuildIndustry,                       0}, /* CMD_BUILD_INDUSTRY */

   257

	{CmdBuildCompanyHQ,               CMD_AUTO}, /* CMD_BUILD_COMPANY_HQ */

   258

	{CmdSetCompanyManagerFace,               0}, /* CMD_SET_COMPANY_MANAGER_FACE */

   259

	{CmdSetCompanyColor,                     0}, /* CMD_SET_COMPANY_COLOR */

   260

   261

	{CmdIncreaseLoan,                        0}, /* CMD_INCREASE_LOAN */

   262

	{CmdDecreaseLoan,                        0}, /* CMD_DECREASE_LOAN */

   263

   264

	{CmdWantEnginePreview,                   0}, /* CMD_WANT_ENGINE_PREVIEW */

   265

   266

	{CmdRenameVehicle,                       0}, /* CMD_RENAME_VEHICLE */

   267

	{CmdRenameEngine,                        0}, /* CMD_RENAME_ENGINE */

   268

   269

	{CmdRenameCompany,                       0}, /* CMD_RENAME_COMPANY */

   270

	{CmdRenamePresident,                     0}, /* CMD_RENAME_PRESIDENT */

   271

   272

	{CmdRenameStation,                       0}, /* CMD_RENAME_STATION */

   273

   274

	{CmdSellAircraft,                        0}, /* CMD_SELL_AIRCRAFT */

   275

   276

	{CmdBuildAircraft,                       0}, /* CMD_BUILD_AIRCRAFT */

   277

	{CmdSendAircraftToHangar,                0}, /* CMD_SEND_AIRCRAFT_TO_HANGAR */

   278

	{CmdRefitAircraft,                       0}, /* CMD_REFIT_AIRCRAFT */

   279

   280

	{CmdPlaceSign,                           0}, /* CMD_PLACE_SIGN */

   281

	{CmdRenameSign,                          0}, /* CMD_RENAME_SIGN */

   282

   283

	{CmdBuildRoadVeh,                        0}, /* CMD_BUILD_ROAD_VEH */

   284

	{CmdSellRoadVeh,                         0}, /* CMD_SELL_ROAD_VEH */

   285

	{CmdSendRoadVehToDepot,                  0}, /* CMD_SEND_ROADVEH_TO_DEPOT */

   286

	{CmdTurnRoadVeh,                         0}, /* CMD_TURN_ROADVEH */

   287

	{CmdRefitRoadVeh,                        0}, /* CMD_REFIT_ROAD_VEH */

   288

   289

	{CmdPause,                      CMD_SERVER}, /* CMD_PAUSE */

   290

   291

	{CmdBuyShareInCompany,                   0}, /* CMD_BUY_SHARE_IN_COMPANY */

   292

	{CmdSellShareInCompany,                  0}, /* CMD_SELL_SHARE_IN_COMPANY */

   293

	{CmdBuyCompany,                          0}, /* CMD_BUY_COMANY */

   294

   295

	{CmdBuildTown,                 CMD_OFFLINE}, /* CMD_BUILD_TOWN */

   296

	{CmdRenameTown,                 CMD_SERVER}, /* CMD_RENAME_TOWN */

   297

	{CmdDoTownAction,                        0}, /* CMD_DO_TOWN_ACTION */

   298

   299

	{CmdSetRoadDriveSide,           CMD_SERVER}, /* CMD_SET_ROAD_DRIVE_SIDE */

   300

   301

	{CmdSellShip,                            0}, /* CMD_SELL_SHIP */

   302

	{CmdBuildShip,                           0}, /* CMD_BUILD_SHIP */

   303

	{CmdSendShipToDepot,                     0}, /* CMD_SEND_SHIP_TO_DEPOT */

   304

	{CmdRefitShip,                           0}, /* CMD_REFIT_SHIP */

   305

   306

	{CmdOrderRefit,                          0}, /* CMD_ORDER_REFIT */

   307

	{CmdCloneOrder,                          0}, /* CMD_CLONE_ORDER */

   308

   309

	{CmdClearArea,                           0}, /* CMD_CLEAR_AREA */

   310

   311

	{CmdMoneyCheat,                CMD_OFFLINE}, /* CMD_MONEY_CHEAT */

   312

	{CmdBuildCanal,                   CMD_AUTO}, /* CMD_BUILD_CANAL */

   313

	{CmdCompanyCtrl,                         0}, /* CMD_COMPANY_CTRL */

   314

   315

	{CmdLevelLand,                    CMD_AUTO}, /* CMD_LEVEL_LAND */

   316

   317

	{CmdRefitRailVehicle,                    0}, /* CMD_REFIT_RAIL_VEHICLE */

   318

	{CmdRestoreOrderIndex,                   0}, /* CMD_RESTORE_ORDER_INDEX */

   319

	{CmdBuildLock,                    CMD_AUTO}, /* CMD_BUILD_LOCK */

   320

   321

	{CmdBuildSignalTrack,             CMD_AUTO}, /* CMD_BUILD_SIGNAL_TRACK */

   322

	{CmdRemoveSignalTrack,            CMD_AUTO}, /* CMD_REMOVE_SIGNAL_TRACK */

   323

   324

	{CmdGiveMoney,                           0}, /* CMD_GIVE_MONEY */

   325

	{CmdChangePatchSetting,         CMD_SERVER}, /* CMD_CHANGE_PATCH_SETTING */

   326

	{CmdSetAutoReplace,                      0}, /* CMD_SET_AUTOREPLACE */

   327

	{CmdCloneVehicle,                        0}, /* CMD_CLONE_VEHICLE */

   328

	{CmdStartStopVehicle,                    0}, /* CMD_START_STOP_VEHICLE */

   329

	{CmdMassStartStopVehicle,                0}, /* CMD_MASS_START_STOP */

   330

	{CmdAutoreplaceVehicle,                  0}, /* CMD_AUTOREPLACE_VEHICLE */

   331

	{CmdDepotSellAllVehicles,                0}, /* CMD_DEPOT_SELL_ALL_VEHICLES */

   332

	{CmdDepotMassAutoReplace,                0}, /* CMD_DEPOT_MASS_AUTOREPLACE */

   333

	{CmdCreateGroup,                         0}, /* CMD_CREATE_GROUP */

   334

	{CmdDeleteGroup,                         0}, /* CMD_DELETE_GROUP */

   335

	{CmdRenameGroup,                         0}, /* CMD_RENAME_GROUP */

   336

	{CmdAddVehicleGroup,                     0}, /* CMD_ADD_VEHICLE_GROUP */

   337

	{CmdAddSharedVehicleGroup,               0}, /* CMD_ADD_SHARE_VEHICLE_GROUP */

   338

	{CmdRemoveAllVehiclesGroup,              0}, /* CMD_REMOVE_ALL_VEHICLES_GROUP */

   339

	{CmdSetGroupReplaceProtection,           0}, /* CMD_SET_GROUP_REPLACE_PROTECTION */

   340

	{CmdMoveOrder,                           0}, /* CMD_MOVE_ORDER */

   341

	{CmdChangeTimetable,                     0}, /* CMD_CHANGE_TIMETABLE */

   342

	{CmdSetVehicleOnTime,                    0}, /* CMD_SET_VEHICLE_ON_TIME */

   343

	{CmdAutofillTimetable,                   0}, /* CMD_AUTOFILL_TIMETABLE */

   344

};

   345

   346

/*!

   347

 * This function range-checks a cmd, and checks if the cmd is not NULL

   348

 *

   349

 * @param cmd The integervalue of a command

   350

 * @return true if the command is valid (and got a CommandProc function)

   351

 */

   352

bool IsValidCommand(uint32 cmd)

   353

{

   354

	cmd &= 0xFF;

   355

   356

	return

   357

		cmd < lengthof(_command_proc_table) &&

   358

		_command_proc_table[cmd].proc != NULL;

   359

}

   360

   361

/*!

   362

 * This function mask the parameter with 0xFF and returns

   363

 * the flags which belongs to the given command.

   364

 *

   365

 * @param cmd The integer value of the command

   366

 * @return The flags for this command

   367

 */

   368

byte GetCommandFlags(uint32 cmd)

   369

{

   370

	assert(IsValidCommand(cmd));

   371

   372

	return _command_proc_table[cmd & 0xFF].flags;

   373

}

   374

   375

static int _docommand_recursive = 0;

   376

   377

/*!

   378

 * This function executes a given command with the parameters from the #CommandProc parameter list.

   379

 * Depending on the flags parameter it execute or test a command.

   380

 *

   381

 * @param tile The tile to apply the command on (for the #CommandProc)

   382

 * @param p1 Additional data for the command (for the #CommandProc)

   383

 * @param p2 Additional data for the command (for the #CommandProc)

   384

 * @param flags Flags for the command and how to execute the command

   385

 * @param procc The command-id to execute (a value of the CMD_* enums)

   386

 * @see CommandProc

   387

 */

   388

CommandCost DoCommand(TileIndex tile, uint32 p1, uint32 p2, uint32 flags, uint32 procc)

   389

{

   390

	CommandCost res;

   391

   392

	/* Do not even think about executing out-of-bounds tile-commands */

   393

	if (!IsValidTile(tile)) {

   394

		_cmd_text = NULL;

   395

		return CMD_ERROR;

   396

	}

   397

   398

	CommandProc *proc = _command_proc_table[procc].proc;

   399

   400

	if (_docommand_recursive == 0) _error_message = INVALID_STRING_ID;

   401

   402

	_docommand_recursive++;

   403

   404

	/* only execute the test call if it's toplevel, or we're not execing. */

   405

	if (_docommand_recursive == 1 || !(flags & DC_EXEC) ) {

   406

		SetTownRatingTestMode(true);

   407

		res = proc(tile, flags & ~DC_EXEC, p1, p2);

   408

		SetTownRatingTestMode(false);

   409

		if (CmdFailed(res)) {

   410

			res.SetGlobalErrorMessage();

   411

			goto error;

   412

		}

   413

   414

		if (_docommand_recursive == 1 &&

   415

				!(flags & DC_QUERY_COST) &&

   416

				!(flags & DC_BANKRUPT) &&

   417

				res.GetCost() != 0 &&

   418

				!CheckCompanyHasMoney(res)) {

   419

			goto error;

   420

		}

   421

   422

		if (!(flags & DC_EXEC)) {

   423

			_docommand_recursive--;

   424

			_cmd_text = NULL;

   425

			return res;

   426

		}

   427

	}

   428

   429

	/* Execute the command here. All cost-relevant functions set the expenses type

   430

	 * themselves to the cost object at some point */

   431

	res = proc(tile, flags, p1, p2);

   432

	if (CmdFailed(res)) {

   433

		res.SetGlobalErrorMessage();

   434

error:

   435

		_docommand_recursive--;

   436

		_cmd_text = NULL;

   437

		return CMD_ERROR;

   438

	}

   439

   440

	/* if toplevel, subtract the money. */

   441

	if (--_docommand_recursive == 0 && !(flags & DC_BANKRUPT)) {

   442

		SubtractMoneyFromCompany(res);

   443

		/* XXX - Old AI hack which doesn't use DoCommandDP; update last build coord of company */

   444

		if (tile != 0 && IsValidCompanyID(_current_company)) {

   445

			GetCompany(_current_company)->last_build_coordinate = tile;

   446

		}

   447

	}

   448

   449

	_cmd_text = NULL;

   450

	return res;

   451

}

   452

   453

/*!

   454

 * This functions returns the money which can be used to execute a command.

   455

 * This is either the money of the current company or INT64_MAX if there

   456

 * is no such a company "at the moment" like the server itself.

   457

 *

   458

 * @return The available money of a company or INT64_MAX

   459

 */

   460

Money GetAvailableMoneyForCommand()

   461

{

   462

	CompanyID company = _current_company;

   463

	if (!IsValidCompanyID(company)) return INT64_MAX;

   464

	return GetCompany(company)->money;

   465

}

   466

   467

/*!

   468

 * Toplevel network safe docommand function for the current company. Must not be called recursively.

   469

 * The callback is called when the command succeeded or failed. The parameters

   470

 * tile, p1 and p2 are from the #CommandProc function. The paramater cmd is the command to execute.

   471

 * The parameter my_cmd is used to indicate if the command is from a company or the server.

   472

 *

   473

 * @param tile The tile to perform a command on (see #CommandProc)

   474

 * @param p1 Additional data for the command (see #CommandProc)

   475

 * @param p2 Additional data for the command (see #CommandProc)

   476

 * @param callback A callback function to call after the command is finished

   477

 * @param cmd The command to execute (a CMD_* value)

   478

 * @param my_cmd indicator if the command is from a company or server (to display error messages for a user)

   479

 * @return true if the command succeeded, else false

   480

 */

   481

bool DoCommandP(TileIndex tile, uint32 p1, uint32 p2, CommandCallback *callback, uint32 cmd, bool my_cmd)

   482

{

   483

	CommandCost res, res2;

   484

	CommandProc *proc;

   485

	uint32 flags;

   486

	bool notest;

   487

	StringID error_part1;

   488

   489

	int x = TileX(tile) * TILE_SIZE;

   490

	int y = TileY(tile) * TILE_SIZE;

   491

   492

	/* Do not even think about executing out-of-bounds tile-commands */

   493

	if (!IsValidTile(tile)) {

   494

		_cmd_text = NULL;

   495

		return false;