1

/* $Id$ */

     2

     5

#include "stdafx.h"

     6

#include "openttd.h"

     7

#include "depot.h"

     8

#include "functions.h"

     9

#include "tile.h"

    10

#include "map.h"

    11

#include "table/strings.h"

    12

#include "saveload.h"

    13

#include "order.h"

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

    22

    23

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

    24

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

    25

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

    26

}

    27

    28

DEFINE_OLD_POOL(Depot, Depot, DepotPoolNewBlock, 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) return depot;

    42

	}

    43

    44

	return NULL;

    45

}

    46

    47

/**

    48

 * Allocate a new depot

    49

 */

    50

Depot *AllocateDepot(void)

    51

{

    52

	Depot *d;

    53

    54

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

    55

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

    56

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

    57

		if (!IsValidDepot(d)) {

    58

			DepotID index = d->index;

    59

    60

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

    61

			d->index = index;

    62

    63

			return d;

    64

		}

    65

	}

    66

    67

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

    68

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

    69

    70

	return NULL;

    71

}

    72

    73

/**

    74

 * Clean up a depot

    75

 */

    76

void DestroyDepot(Depot *depot)

    77

{

    78

	/* Clear the tile */

    79

	DoClearSquare(depot->xy);

    80

    81

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

    82

	RemoveOrderFromAllVehicles(OT_GOTO_DEPOT, depot->index);

    83

    84

	/* Delete the depot-window */

    85

	DeleteWindowById(WC_VEHICLE_DEPOT, depot->xy);

    86

}

    87

    88

void InitializeDepots(void)

    89

{

    90

	CleanPool(&_Depot_pool);

    91

	AddBlockToPool(&_Depot_pool);

    92

}

    93

    94

    95

static const SaveLoad _depot_desc[] = {

    96

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

    97

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

    98

	    SLE_VAR(Depot, town_index, SLE_UINT16),

    99

	SLE_END()

   100

};

   101

   102

static void Save_DEPT(void)

   103

{

   104

	Depot *depot;

   105

   106

	FOR_ALL_DEPOTS(depot) {

   107

		SlSetArrayIndex(depot->index);

   108

		SlObject(depot, _depot_desc);

   109

	}

   110

}

   111

   112

static void Load_DEPT(void)

   113

{

   114

	int index;

   115

   116

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

   117

		Depot *depot;

   118

   119

		if (!AddBlockIfNeeded(&_Depot_pool, index))

   120

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

   121

   122

		depot = GetDepot(index);

   123

		SlObject(depot, _depot_desc);

   124

	}

   125

}

   126

   127

extern const ChunkHandler _depot_chunk_handlers[] = {

   128

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

   129

};