1

/* $Id$ */

     2

     3

/** @file road_map.h */

     4

     5

#ifndef ROAD_MAP_H

     6

#define ROAD_MAP_H

     7

     8

#include "macros.h"

     9

#include "rail.h"

    10

#include "road.h"

    11

#include "tile.h"

    12

    13

    14

enum RoadTileType {

    15

	ROAD_TILE_NORMAL,

    16

	ROAD_TILE_CROSSING,

    17

	ROAD_TILE_DEPOT

    18

};

    19

    20

static inline RoadTileType GetRoadTileType(TileIndex t)

    21

	{

    22

	assert(IsTileType(t, MP_STREET));

    23

	return (RoadTileType)GB(_m[t].m5, 6, 2);

    24

}

    25

    26

static inline bool IsLevelCrossing(TileIndex t)

    27

{

    28

	return GetRoadTileType(t) == ROAD_TILE_CROSSING;

    29

}

    30

    31

static inline bool IsLevelCrossingTile(TileIndex t)

    32

{

    33

	return IsTileType(t, MP_STREET) && IsLevelCrossing(t);

    34

}

    35

    36

static inline RoadBits GetRoadBits(TileIndex t, RoadType rt)

    37

{

    38

	assert(GetRoadTileType(t) == ROAD_TILE_NORMAL);

    39

	switch (rt) {

    40

		default: NOT_REACHED();

    41

		case ROADTYPE_ROAD: return (RoadBits)GB(_m[t].m4, 0, 4);

    42

		case ROADTYPE_TRAM: return (RoadBits)GB(_m[t].m4, 4, 4);

    43

		case ROADTYPE_HWAY: return (RoadBits)GB(_m[t].m6, 2, 4);

    44

	}

    45

}

    46

    47

static inline RoadBits GetAllRoadBits(TileIndex tile)

    48

{

    49

	return GetRoadBits(tile, ROADTYPE_ROAD) | GetRoadBits(tile, ROADTYPE_TRAM) | GetRoadBits(tile, ROADTYPE_HWAY);

    50

}

    51

    52

static inline void SetRoadBits(TileIndex t, RoadBits r, RoadType rt)

    53

{

    54

	assert(GetRoadTileType(t) == ROAD_TILE_NORMAL); // XXX incomplete

    55

	switch (rt) {

    56

		default: NOT_REACHED();

    57

		case ROADTYPE_ROAD: SB(_m[t].m4, 0, 4, r); break;

    58

		case ROADTYPE_TRAM: SB(_m[t].m4, 4, 4, r); break;

    59

		case ROADTYPE_HWAY: SB(_m[t].m6, 2, 4, r); break;

    60

	}

    61

}

    62

    63

static inline RoadTypes GetRoadTypes(TileIndex t)

    64

{

    65

	if (IsTileType(t, MP_STREET)) {

    66

		return (RoadTypes)GB(_me[t].m7, 5, 3);

    67

	} else {

    68

		return (RoadTypes)GB(_m[t].m3, 0, 3);

    69

	}

    70

}

    71

    72

static inline void SetRoadTypes(TileIndex t, RoadTypes rt)

    73

{

    74

	if (IsTileType(t, MP_STREET)) {

    75

		SB(_me[t].m7, 5, 3, rt);

    76

	} else {

    77

		assert(IsTileType(t, MP_STATION) || IsTileType(t, MP_TUNNELBRIDGE));

    78

		SB(_m[t].m3, 0, 2, rt);

    79

	}

    80

}

    81

    82

static inline Owner GetRoadOwner(TileIndex t, RoadType rt)

    83

{

    84

	if (!IsTileType(t, MP_STREET)) return GetTileOwner(t);

    85

    86

	switch (GetRoadTileType(t)) {

    87

		default: NOT_REACHED();

    88

		case ROAD_TILE_NORMAL:

    89

			switch (rt) {

    90

				default: NOT_REACHED();

    91

				case ROADTYPE_ROAD: return (Owner)GB( _m[t].m1, 0, 5);

    92

				case ROADTYPE_TRAM: return (Owner)GB( _m[t].m5, 0, 5);

    93

				case ROADTYPE_HWAY: return (Owner)GB(_me[t].m7, 0, 5);

    94

			}

    95

		case ROAD_TILE_CROSSING:

    96

			switch (rt) {

    97

				default: NOT_REACHED();

    98

				case ROADTYPE_ROAD: return (Owner)GB( _m[t].m4, 0, 5);

    99

				case ROADTYPE_TRAM: return (Owner)GB( _m[t].m5, 0, 5);

   100

				case ROADTYPE_HWAY: return (Owner)GB(_me[t].m7, 0, 5);

   101

			}

   102

		case ROAD_TILE_DEPOT: return GetTileOwner(t);

   103

	}

   104

}

   105

   106

static inline void SetRoadOwner(TileIndex t, RoadType rt, Owner o)

   107

{

   108

	if (!IsTileType(t, MP_STREET)) return SetTileOwner(t, o);

   109

   110

	switch (GetRoadTileType(t)) {

   111

		default: NOT_REACHED();

   112

		case ROAD_TILE_NORMAL:

   113

			switch (rt) {

   114

				default: NOT_REACHED();

   115

				case ROADTYPE_ROAD: SB( _m[t].m1, 0, 5, o); break;

   116

				case ROADTYPE_TRAM: SB( _m[t].m5, 0, 5, o); break;

   117

				case ROADTYPE_HWAY: SB(_me[t].m7, 0, 5, o); break;

   118

			}

   119

			break;

   120

		case ROAD_TILE_CROSSING:

   121

			switch (rt) {

   122

				default: NOT_REACHED();

   123

				case ROADTYPE_ROAD: SB( _m[t].m4, 0, 5, o); break;

   124

				case ROADTYPE_TRAM: SB( _m[t].m5, 0, 5, o); break;

   125

				case ROADTYPE_HWAY: SB(_me[t].m7, 0, 5, o); break;

   126

			}

   127

			break;

   128

		case ROAD_TILE_DEPOT: return SetTileOwner(t, o);

   129

	}

   130

}

   131

   132

static inline Axis GetCrossingRoadAxis(TileIndex t)

   133

{

   134

	assert(GetRoadTileType(t) == ROAD_TILE_CROSSING);

   135

	return (Axis)GB(_m[t].m4, 6, 1);

   136

}

   137

   138

static inline RoadBits GetCrossingRoadBits(TileIndex tile)

   139

{

   140

	return GetCrossingRoadAxis(tile) == AXIS_X ? ROAD_X : ROAD_Y;

   141

}

   142

   143

static inline TrackBits GetCrossingRailBits(TileIndex tile)

   144

{

   145

	return AxisToTrackBits(OtherAxis(GetCrossingRoadAxis(tile)));

   146

}

   147

   148

   149

static inline void UnbarCrossing(TileIndex t)

   150

{

   151

	assert(GetRoadTileType(t) == ROAD_TILE_CROSSING);

   152

	CLRBIT(_m[t].m4, 5);

   153

}

   154

   155

static inline void BarCrossing(TileIndex t)

   156

{

   157

	assert(GetRoadTileType(t) == ROAD_TILE_CROSSING);

   158

	SETBIT(_m[t].m4, 5);

   159

}

   160

   161

static inline bool IsCrossingBarred(TileIndex t)

   162

{

   163

	assert(GetRoadTileType(t) == ROAD_TILE_CROSSING);

   164

	return HASBIT(_m[t].m4, 5);

   165

}

   166

   167

#define IsOnDesert IsOnSnow

   168

static inline bool IsOnSnow(TileIndex t)

   169

{

   170

	return HASBIT(_m[t].m3, 7);

   171

}

   172

   173

#define ToggleDesert ToggleSnow

   174

static inline void ToggleSnow(TileIndex t)

   175

{

   176

	TOGGLEBIT(_m[t].m3, 7);

   177

}

   178

   179

   180

enum Roadside {

   181

	ROADSIDE_BARREN           = 0,

   182

	ROADSIDE_GRASS            = 1,

   183

	ROADSIDE_PAVED            = 2,

   184

	ROADSIDE_STREET_LIGHTS    = 3,

   185

	ROADSIDE_TREES            = 5,

   186

	ROADSIDE_GRASS_ROAD_WORKS = 6,

   187

	ROADSIDE_PAVED_ROAD_WORKS = 7

   188

};

   189

   190

static inline Roadside GetRoadside(TileIndex tile)

   191

{

   192

	return (Roadside)GB(_m[tile].m3, 4, 3);

   193

}

   194

   195

static inline void SetRoadside(TileIndex tile, Roadside s)

   196

{

   197

	SB(_m[tile].m3, 4, 3, s);

   198

}

   199

   200

static inline bool HasRoadWorks(TileIndex t)

   201

{

   202

	return GetRoadside(t) >= ROADSIDE_GRASS_ROAD_WORKS;

   203

}

   204

   205

static inline bool IncreaseRoadWorksCounter(TileIndex t)

   206

{

   207

	AB(_m[t].m3, 0, 4, 1);

   208

   209

	return GB(_m[t].m3, 0, 4) == 15;

   210

}

   211

   212

static inline void StartRoadWorks(TileIndex t)

   213

{

   214

	assert(!HasRoadWorks(t));

   215

	/* Remove any trees or lamps in case or roadwork */

   216

	switch (GetRoadside(t)) {

   217

		case ROADSIDE_BARREN:

   218

		case ROADSIDE_GRASS:  SetRoadside(t, ROADSIDE_GRASS_ROAD_WORKS); break;

   219

		default:              SetRoadside(t, ROADSIDE_PAVED_ROAD_WORKS); break;

   220

	}

   221

}

   222

   223

static inline void TerminateRoadWorks(TileIndex t)

   224

{

   225

	assert(HasRoadWorks(t));

   226

	SetRoadside(t, (Roadside)(GetRoadside(t) - ROADSIDE_GRASS_ROAD_WORKS + ROADSIDE_GRASS));

   227

	/* Stop the counter */

   228

	SB(_m[t].m3, 0, 4, 0);

   229

}

   230

   231

   232

static inline DiagDirection GetRoadDepotDirection(TileIndex t)

   233

{

   234

	assert(GetRoadTileType(t) == ROAD_TILE_DEPOT);

   235

	return (DiagDirection)GB(_m[t].m5, 0, 2);

   236

}

   237

   238

   239

/**

   240

 * Returns the RoadBits on an arbitrary tile

   241

 * Special behaviour:

   242

 * - road depots: entrance is treated as road piece

   243

 * - road tunnels: entrance is treated as road piece

   244

 * - bridge ramps: start of the ramp is treated as road piece

   245

 * - bridge middle parts: bridge itself is ignored

   246

 * @param tile the tile to get the road bits for

   247

 * @param rt   the road type to get the road bits form

   248

 * @return the road bits of the given tile

   249

 */

   250

RoadBits GetAnyRoadBits(TileIndex tile, RoadType rt);

   251

   252

/**

   253

 * Get the accessible track bits for the given tile.

   254

 * Special behaviour:

   255

 *  - road depots: no track bits

   256

 *  - non-drive-through stations: no track bits

   257

 * @param tile the tile to get the track bits for

   258

 * @return the track bits for the given tile

   259

 */

   260

TrackBits GetAnyRoadTrackBits(TileIndex tile, RoadType rt);

   261

   262

   263

static inline void MakeRoadNormal(TileIndex t, RoadBits bits, RoadTypes rot, TownID town, Owner road, Owner tram, Owner hway)

   264

{

   265

	SetTileType(t, MP_STREET);

   266

	SetTileOwner(t, road);

   267

	_m[t].m2 = town;

   268

	_m[t].m3 = 0;

   269

	_m[t].m4 = (HASBIT(rot, ROADTYPE_TRAM) ? bits : 0) << 4 | (HASBIT(rot, ROADTYPE_ROAD) ? bits : 0);

   270

	_m[t].m5 = ROAD_TILE_NORMAL << 6 | tram;

   271

	SB(_m[t].m6, 2, 4, HASBIT(rot, ROADTYPE_HWAY) ? bits : 0);

   272

	_me[t].m7 = rot << 5 | hway;

   273

}

   274

   275

   276

static inline void MakeRoadCrossing(TileIndex t, Owner road, Owner tram, Owner hway, Owner rail, Axis roaddir, RailType rat, RoadTypes rot, uint town)

   277

{

   278

	SetTileType(t, MP_STREET);

   279

	SetTileOwner(t, rail);

   280

	_m[t].m2 = town;

   281

	_m[t].m3 = rat;

   282

	_m[t].m4 = roaddir << 6 | road;

   283

	_m[t].m5 = ROAD_TILE_CROSSING << 6 | tram;

   284

	SB(_m[t].m6, 2, 4, 0);

   285

	_me[t].m7 = rot << 5 | hway;

   286

}

   287

   288

   289

static inline void MakeRoadDepot(TileIndex t, Owner owner, DiagDirection dir, RoadType rt)

   290

{

   291

	SetTileType(t, MP_STREET);

   292

	SetTileOwner(t, owner);

   293

	_m[t].m2 = 0;

   294

	_m[t].m3 = 0;

   295

	_m[t].m4 = 0;

   296

	_m[t].m5 = ROAD_TILE_DEPOT << 6 | dir;

   297

	SB(_m[t].m6, 2, 4, 0);

   298

	_me[t].m7 = RoadTypeToRoadTypes(rt) << 5;

   299

}

   300

   301

#endif /* ROAD_MAP_H */