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, 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)

    45

			return depot;

    46

	}

    47

    48

	return NULL;

    49

}

    50

    51

/**

    52

 * Allocate a new depot

    53

 */

    54

Depot *AllocateDepot(void)

    55

{

    56

	Depot *depot;

    57

    58

	FOR_ALL_DEPOTS(depot) {

    59

		if (!IsValidDepot(depot)) {

    60

			uint index = depot->index;

    61

    62

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

    63

			depot->index = index;

    64

    65

			return depot;

    66

		}

    67

	}

    68

    69

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

    70

	if (AddBlockToPool(&_depot_pool))

    71

		return AllocateDepot();

    72

    73

	return NULL;

    74

}

    75

    76

/**

    77

 * Delete a depot

    78

 */

    79

void DoDeleteDepot(TileIndex tile)

    80

{

    81

	Order order;

    82

	Depot *depot;

    83

    84

	/* Get the depot */

    85

	depot = GetDepotByTile(tile);

    86

    87

	/* Clear the tile */

    88

	DoClearSquare(tile);

    89

    90

	/* Clear the depot */

    91

	depot->xy = 0;

    92

    93

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

    94

	order.type    = OT_GOTO_DEPOT;

    95

	order.station = depot->index;

    96

	DeleteDestinationFromVehicleOrder(order);

    97

    98

	/* Delete the depot-window */

    99

	DeleteWindowById(WC_VEHICLE_DEPOT, tile);

   100

}

   101

   102

void InitializeDepot(void)

   103

{

   104

	CleanPool(&_depot_pool);

   105

	AddBlockToPool(&_depot_pool);

   106

}

   107

   108

   109

static const SaveLoad _depot_desc[] = {

   110

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

   111

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

   112

	SLE_VAR(Depot,town_index,		SLE_UINT16),

   113

	SLE_END()

   114

};

   115

   116

static void Save_DEPT(void)

   117

{

   118

	Depot *depot;

   119

   120

	FOR_ALL_DEPOTS(depot) {

   121

		if (IsValidDepot(depot)) {

   122

			SlSetArrayIndex(depot->index);

   123

			SlObject(depot, _depot_desc);

   124

		}

   125

	}

   126

}

   127

   128

static void Load_DEPT(void)

   129

{

   130

	int index;

   131

   132

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

   133

		Depot *depot;

   134

   135

		if (!AddBlockIfNeeded(&_depot_pool, index))

   136

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

   137

   138

		depot = GetDepot(index);

   139

		SlObject(depot, _depot_desc);

   140

	}

   141

}

   142

   143

const ChunkHandler _depot_chunk_handlers[] = {

   144

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

   145

};