1

#include "stdafx.h"

     2

#include "openttd.h"

     3

#include "depot.h"

     4

#include "functions.h"

     5

#include "tile.h"

     6

#include "map.h"

     7

#include "table/strings.h"

     8

#include "saveload.h"

     9

#include "order.h"

    10

    11

enum {

    12

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

    13

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

    14

	DEPOT_POOL_MAX_BLOCKS      = 8000,

    15

};

    16

    17

/**

    18

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

    19

 */

    20

static void DepotPoolNewBlock(uint start_item)

    21

{

    22

	Depot *depot;

    23

    24

	FOR_ALL_DEPOTS_FROM(depot, start_item)

    25

		depot->index = start_item++;

    26

}

    27

    28

/* Initialize the town-pool */

    29

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

    30

    31

    32

/**

    33

 * Gets a depot from a tile

    34

 *

    35

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

    36

 */

    37

Depot *GetDepotByTile(TileIndex tile)

    38

{

    39

	Depot *depot;

    40

    41

	FOR_ALL_DEPOTS(depot) {

    42

		if (depot->xy == tile)

    43

			return depot;

    44

	}

    45

    46

	return NULL;

    47

}

    48

    49

/**

    50

 * Allocate a new depot

    51

 */

    52

Depot *AllocateDepot(void)

    53

{

    54

	Depot *depot;

    55

    56

	FOR_ALL_DEPOTS(depot) {

    57

		if (!IsValidDepot(depot)) {

    58

			uint index = depot->index;

    59

    60

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

    61

			depot->index = index;

    62

    63

			return depot;

    64

		}

    65

	}

    66

    67

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

    68

	if (AddBlockToPool(&_depot_pool))

    69

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

   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

};