1

#include "stdafx.h"

     2

#include "openttd.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(TileIndex 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

 * Allocate a new depot

    50

 */

    51

Depot *AllocateDepot(void)

    52

{

    53

	Depot *depot;

    54

    55

	FOR_ALL_DEPOTS(depot) {

    56

		if (!IsValidDepot(depot)) {

    57

			uint index = depot->index;

    58

    59

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

    60

			depot->index = index;

    61

    62

			return depot;

    63

		}

    64

	}

    65

    66

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

    67

	if (AddBlockToPool(&_depot_pool))

    68

		return AllocateDepot();

    69

    70

	return NULL;

    71

}

    72

    73

/**

    74

 * Delete a depot

    75

 */

    76

void DoDeleteDepot(TileIndex tile)

    77

{

    78

	Order order;

    79

	Depot *depot;

    80

    81

	/* Get the depot */

    82

	depot = GetDepotByTile(tile);

    83

    84

	/* Clear the tile */

    85

	DoClearSquare(tile);

    86

    87

	/* Clear the depot */

    88

	depot->xy = 0;

    89

    90

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

    91

	order.type    = OT_GOTO_DEPOT;

    92

	order.station = depot->index;

    93

	DeleteDestinationFromVehicleOrder(order);

    94

    95

	/* Delete the depot-window */

    96

	DeleteWindowById(WC_VEHICLE_DEPOT, tile);

    97

}

    98

    99

void InitializeDepot(void)

   100

{

   101

	CleanPool(&_depot_pool);

   102

	AddBlockToPool(&_depot_pool);

   103

}

   104

   105

   106

static const SaveLoad _depot_desc[] = {

   107

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

   108

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

   109

	SLE_VAR(Depot,town_index,		SLE_UINT16),

   110

	SLE_END()

   111

};

   112

   113

static void Save_DEPT(void)

   114

{

   115

	Depot *depot;

   116

   117

	FOR_ALL_DEPOTS(depot) {

   118

		if (IsValidDepot(depot)) {

   119

			SlSetArrayIndex(depot->index);

   120

			SlObject(depot, _depot_desc);

   121

		}

   122

	}

   123

}

   124

   125

static void Load_DEPT(void)

   126

{

   127

	int index;

   128

   129

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

   130

		Depot *depot;

   131

   132

		if (!AddBlockIfNeeded(&_depot_pool, index))

   133

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

   134

   135

		depot = GetDepot(index);

   136

		SlObject(depot, _depot_desc);

   137

	}

   138

}

   139

   140

const ChunkHandler _depot_chunk_handlers[] = {

   141

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

   142

};