1

#include "stdafx.h"

     2

#include "ttd.h"

     3

#include "depot.h"

     4

#include "tile.h"

     5

#include "map.h"

     6

#include "table/strings.h"

     7

#include "saveload.h"

     8

#include "order.h"

     9

    10

enum {

    11

	/* Max depots: 64000 (8 * 8000) */

    12

	DEPOT_POOL_BLOCK_SIZE_BITS = 3,       /* In bits, so (1 << 3) == 8 */

    13

	DEPOT_POOL_MAX_BLOCKS      = 8000,

    14

};

    15

    16

/**

    17

 * Called if a new block is added to the depot-pool

    18

 */

    19

static void DepotPoolNewBlock(uint start_item)

    20

{

    21

	Depot *depot;

    22

    23

	FOR_ALL_DEPOTS_FROM(depot, start_item)

    24

		depot->index = start_item++;

    25

}

    26

    27

/* Initialize the town-pool */

    28

MemoryPool _depot_pool = { "Depots", DEPOT_POOL_MAX_BLOCKS, DEPOT_POOL_BLOCK_SIZE_BITS, sizeof(Depot), &DepotPoolNewBlock, 0, 0, NULL };

    29

    30

    31

/**

    32

 * Gets a depot from a tile

    33

 *

    34

 * @return Returns the depot if the tile had a depot, else it returns NULL

    35

 */

    36

Depot *GetDepotByTile(uint tile)

    37

{

    38

	Depot *depot;

    39

    40

	FOR_ALL_DEPOTS(depot) {

    41

		if (depot->xy == tile)

    42

			return depot;

    43

	}

    44

    45

	return NULL;

    46

}

    47

    48

/**

    49

 * Check if a tile is a road-depot

    50

 */

    51

bool IsRoadDepotTile(TileIndex tile)

    52

{

    53

	return IsTileType(tile, MP_STREET) &&

    54

			(_map5[tile] & 0xF0) == 0x20;

    55

}

    56

    57

/**

    58

 * Check if a tile is a train-depot

    59

 */

    60

bool IsTrainDepotTile(TileIndex tile)

    61

{

    62

	return IsTileType(tile, MP_RAILWAY) &&

    63

			(_map5[tile] & 0xFC) == 0xC0;

    64

}

    65

    66

/**

    67

 * Check if a tile is a ship-depot

    68

 */

    69

bool IsShipDepotTile(TileIndex tile)

    70

{

    71

	return IsTileType(tile, MP_WATER) &&

    72

			(_map5[tile] & ~3) == 0x80;

    73

}

    74

    75

/**

    76

 * Allocate a new depot

    77

 */

    78

Depot *AllocateDepot(void)

    79

{

    80

	Depot *depot;

    81

    82

	FOR_ALL_DEPOTS(depot) {

    83

		if (depot->xy == 0) {

    84

			uint index = depot->index;

    85

    86

			memset(depot, 0, sizeof(Depot));

    87

			depot->index = index;

    88

    89

			return depot;

    90

		}

    91

	}

    92

    93

	/* Check if we can add a block to the pool */

    94

	if (AddBlockToPool(&_depot_pool))

    95

		return AllocateDepot();

    96

    97

	return NULL;

    98

}

    99

   100

/**

   101

 * Delete a depot

   102

 */

   103

void DoDeleteDepot(uint tile)

   104

{

   105

	Order order;

   106

	Depot *depot;

   107

   108

	/* Get the depot */

   109

	depot = GetDepotByTile(tile);

   110

   111

	/* Clear the tile */

   112

	DoClearSquare(tile);

   113

   114

	/* Clear the depot */

   115

	depot->xy = 0;

   116

   117

	/* Clear the depot from all order-lists */

   118

	order.type    = OT_GOTO_DEPOT;

   119

	order.station = depot->index;

   120

	DeleteDestinationFromVehicleOrder(order);

   121

   122

	/* Delete the depot-window */

   123

	DeleteWindowById(WC_VEHICLE_DEPOT, tile);

   124

}

   125

   126

void InitializeDepot(void)

   127

{

   128

	CleanPool(&_depot_pool);

   129

	AddBlockToPool(&_depot_pool);

   130

}

   131

   132

   133

static const byte _depot_desc[] = {

   134

	SLE_CONDVAR(Depot, xy,			SLE_FILE_U16 | SLE_VAR_U32, 0, 5),

   135

	SLE_CONDVAR(Depot, xy,			SLE_UINT32, 6, 255),

   136

	SLE_VAR(Depot,town_index,		SLE_UINT16),

   137

	SLE_END()

   138

};

   139

   140

static void Save_DEPT(void)

   141

{

   142

	Depot *depot;

   143

   144

	FOR_ALL_DEPOTS(depot) {

   145

		if (depot->xy != 0) {

   146

			SlSetArrayIndex(depot->index);

   147

			SlObject(depot, _depot_desc);

   148

		}

   149

	}

   150

}

   151

   152

static void Load_DEPT(void)

   153

{

   154

	int index;

   155

   156

	while ((index = SlIterateArray()) != -1) {

   157

		Depot *depot;

   158

   159

		if (!AddBlockIfNeeded(&_depot_pool, index))

   160

			error("Depots: failed loading savegame: too many depots");

   161

   162

		depot = GetDepot(index);

   163

		SlObject(depot, _depot_desc);

   164

	}

   165

}

   166

   167

const ChunkHandler _depot_chunk_handlers[] = {

   168

	{ 'DEPT', Save_DEPT, Load_DEPT, CH_ARRAY | CH_LAST},

   169

};