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 *d;

    25

    26

	/* We don't use FOR_ALL here, because FOR_ALL skips invalid items.

    27

	 * TODO - This is just a temporary stage, this will be removed. */

    28

	for (d = GetDepot(start_item); d != NULL; d = (d->index + 1 < GetDepotPoolSize()) ? GetDepot(d->index + 1) : NULL) d->index = start_item++;

    29

}

    30

    31

/* Initialize the town-pool */

    32

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

    33

    34

    35

/**

    36

 * Gets a depot from a tile

    37

 *

    38

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

    39

 */

    40

Depot *GetDepotByTile(TileIndex tile)

    41

{

    42

	Depot *depot;

    43

    44

	FOR_ALL_DEPOTS(depot) {

    45

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

    46

	}

    47

    48

	return NULL;

    49

}

    50

    51

/**

    52

 * Allocate a new depot

    53

 */

    54

Depot *AllocateDepot(void)

    55

{

    56

	Depot *d;

    57

    58

	/* We don't use FOR_ALL here, because FOR_ALL skips invalid items.

    59

	 * TODO - This is just a temporary stage, this will be removed. */

    60

	for (d = GetDepot(0); d != NULL; d = (d->index + 1 < GetDepotPoolSize()) ? GetDepot(d->index + 1) : NULL) {

    61

		if (!IsValidDepot(d)) {

    62

			DepotID index = d->index;

    63

    64

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

    65

			d->index = index;

    66

    67

			return d;

    68

		}

    69

	}

    70

    71

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

    72

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

    73

    74

	return NULL;

    75

}

    76

    77

/**

    78

 * Clean up a depot

    79

 */

    80

void DestroyDepot(Depot *depot)

    81

{

    82

	/* Clear the tile */

    83

	DoClearSquare(depot->xy);

    84

    85

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

    87

    88

	/* Delete the depot-window */

    89

	DeleteWindowById(WC_VEHICLE_DEPOT, depot->xy);

    90

}

    91

    92

void InitializeDepots(void)

    93

{

    94

	CleanPool(&_depot_pool);

    95

	AddBlockToPool(&_depot_pool);

    96

}

    97

    98

    99

static const SaveLoad _depot_desc[] = {

   100

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

   101

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

   102

	    SLE_VAR(Depot, town_index, SLE_UINT16),

   103

	SLE_END()

   104

};

   105

   106

static void Save_DEPT(void)

   107

{

   108

	Depot *depot;

   109

   110

	FOR_ALL_DEPOTS(depot) {

   111

		SlSetArrayIndex(depot->index);

   112

		SlObject(depot, _depot_desc);

   113

	}

   114

}

   115

   116

static void Load_DEPT(void)

   117

{

   118

	int index;

   119

   120

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

   121

		Depot *depot;

   122

   123

		if (!AddBlockIfNeeded(&_depot_pool, index))

   124

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

   125

   126

		depot = GetDepot(index);

   127

		SlObject(depot, _depot_desc);

   128

	}

   129

}

   130

   131

const ChunkHandler _depot_chunk_handlers[] = {

   132

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

   133

};