1

/* $Id$ */

     2

     3

#include "stdafx.h"

     4

#include "openttd.h"

     5

#include "depot.h"

     6

#include "functions.h"

     7

#include "tile.h"

     8

#include "map.h"

     9

#include "table/strings.h"

    10

#include "saveload.h"

    11

#include "order.h"

    12

    13

enum {

    14

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

    15

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

    16

	DEPOT_POOL_MAX_BLOCKS      = 8000,

    17

};

    18

    19

/**

    20

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

    21

 */

    22

static void DepotPoolNewBlock(uint start_item)

    23

{

    24

	Depot *depot;

    25

    26

	FOR_ALL_DEPOTS_FROM(depot, start_item)

    27

		depot->index = start_item++;

    28

}

    29

    30

/* Initialize the town-pool */

    31

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

    32

    33

    34

/**

    35

 * Gets a depot from a tile

    36

 *

    37

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

    38

 */

    39

Depot *GetDepotByTile(TileIndex tile)

    40

{

    41

	Depot *depot;

    42

    43

	FOR_ALL_DEPOTS(depot) {

    44

		if (depot->xy == tile) return depot;

    45

	}

    46

    47

	return NULL;

    48

}

    49

    50

/**

    51

 * Allocate a new depot

    52

 */

    53

Depot *AllocateDepot(void)

    54

{

    55

	Depot *depot;

    56

    57

	FOR_ALL_DEPOTS(depot) {

    58

		if (!IsValidDepot(depot)) {

    59

			uint index = depot->index;

    60

    61

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

    62

			depot->index = index;

    63

    64

			return depot;

    65

		}

    66

	}

    67

    68

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

    69

	if (AddBlockToPool(&_depot_pool)) return AllocateDepot();

    70

    71

	return NULL;

    72

}

    73

    74

/**

    75

 * Delete a depot

    76

 */

    77

void DoDeleteDepot(TileIndex tile)

    78

{

    79

	Order order;

    80

	Depot *depot;

    81

    82

	/* Get the depot */

    83

	depot = GetDepotByTile(tile);

    84

    85

	/* Clear the tile */

    86

	DoClearSquare(tile);

    87

    88

	/* Clear the depot */

    89

	depot->xy = 0;

    90

    91

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

    92

	order.type    = OT_GOTO_DEPOT;

    93

	order.station = depot->index;

    94

	DeleteDestinationFromVehicleOrder(order);

    95

    96

	/* Delete the depot-window */

    97

	DeleteWindowById(WC_VEHICLE_DEPOT, tile);

    98

}

    99

   100

void InitializeDepot(void)

   101

{

   102

	CleanPool(&_depot_pool);

   103

	AddBlockToPool(&_depot_pool);

   104

}

   105

   106

   107

static const SaveLoad _depot_desc[] = {

   108

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

   109

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

   110

	SLE_VAR(Depot,town_index,		SLE_UINT16),

   111

	SLE_END()

   112

};

   113

   114

static void Save_DEPT(void)

   115

{

   116

	Depot *depot;

   117

   118

	FOR_ALL_DEPOTS(depot) {

   119

		if (IsValidDepot(depot)) {

   120

			SlSetArrayIndex(depot->index);

   121

			SlObject(depot, _depot_desc);

   122

		}

   123

	}

   124

}

   125

   126

static void Load_DEPT(void)

   127

{

   128

	int index;

   129

   130

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

   131

		Depot *depot;

   132

   133

		if (!AddBlockIfNeeded(&_depot_pool, index))

   134

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

   135

   136

		depot = GetDepot(index);

   137

		SlObject(depot, _depot_desc);

   138

	}

   139

}

   140

   141

const ChunkHandler _depot_chunk_handlers[] = {

   142

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

   143

};