1

#include "stdafx.h"

     2

#include "ttd.h"

     3

#include "functions.h"

     4

#include "map.h"

     5

     6

uint _map_log_x;

     7

uint _map_log_y;

     8

     9

byte   *_map_type_and_height = NULL;

    10

byte   *_map_owner           = NULL;

    11

uint16 *_map2                = NULL;

    12

byte   *_map3_lo             = NULL;

    13

byte   *_map3_hi             = NULL;

    14

byte   *_map5                = NULL;

    15

byte   *_map_extra_bits      = NULL;

    16

    17

    18

void InitMap(uint log_x, uint log_y)

    19

{

    20

	uint map_size;

    21

    22

	assert(log_x <= 15 && log_y <= 15);

    23

    24

	_map_log_x = log_x;

    25

	_map_log_y = log_y;

    26

    27

	map_size = MapSize();

    28

    29

	_map_type_and_height =

    30

		realloc(_map_type_and_height, map_size * sizeof(_map_type_and_height[0]));

    31

	_map_owner = realloc(_map_owner, map_size * sizeof(_map_owner[0]));

    32

	_map2      = realloc(_map2,      map_size * sizeof(_map2[0]));

    33

	_map3_lo   = realloc(_map3_lo,   map_size * sizeof(_map3_lo[0]));

    34

	_map3_hi   = realloc(_map3_hi,   map_size * sizeof(_map3_hi[0]));

    35

	_map5      = realloc(_map5,      map_size * sizeof(_map5[0]));

    36

	_map_extra_bits =

    37

		realloc(_map_extra_bits, map_size * sizeof(_map_extra_bits[0] / 4));

    38

    39

	// XXX TODO handle memory shortage more gracefully

    40

	if (_map_type_and_height == NULL ||

    41

			_map_owner           == NULL ||

    42

			_map2                == NULL ||

    43

			_map3_lo             == NULL ||

    44

			_map3_hi             == NULL ||

    45

			_map5                == NULL ||

    46

			_map_extra_bits      == NULL)

    47

		error("Failed to allocate memory for the map");

    48

}

    49

    50

    51

#ifdef _DEBUG

    52

TileIndex TileAdd(TileIndex tile, TileIndexDiff add,

    53

	const char *exp, const char *file, int line)

    54

{

    55

	int dx;

    56

	int dy;

    57

	uint x;

    58

	uint y;

    59

    60

	dx = add & MapMaxX();

    61

	if (dx >= (int)MapSizeX() / 2) dx -= MapSizeX();

    62

	dy = (add - dx) / (int)MapSizeX();

    63

    64

	x = TileX(tile) + dx;

    65

	y = TileY(tile) + dy;

    66

    67

	if (x >= MapSizeX() || y >= MapSizeY()) {

    68

		char buf[512];

    69

    70

		sprintf(buf, "TILE_ADD(%s) when adding 0x%.4X and 0x%.4X failed",

    71

			exp, tile, add);

    72

#if !defined(_MSC_VER)

    73

		fprintf(stderr, "%s:%d %s\n", file, line, buf);

    74

#else

    75

		_assert(buf, (char*)file, line);

    76

#endif

    77

	}

    78

    79

	assert(TILE_XY(x,y) == TILE_MASK(tile + add));

    80

    81

	return TILE_XY(x,y);

    82

}

    83

#endif

    84

    85

    86

uint ScaleByMapSize(uint n)

    87

{

    88

	int shift = (int)MapLogX() - 8 + (int)MapLogY() - 8;

    89

    90

	if (shift < 0)

    91

		return (n + (1 << -shift) - 1) >> -shift;

    92

	else

    93

		return n << shift;

    94

}

    95

    96

    97

uint ScaleByMapSize1D(uint n)

    98

{

    99

	int shift = ((int)MapLogX() - 8 + (int)MapLogY() - 8) / 2;

   100

   101

	if (shift < 0)

   102

		return (n + (1 << -shift) - 1) >> -shift;

   103

	else

   104

		return n << shift;

   105

}

   106

   107

   108

const TileIndexDiffC _tileoffs_by_dir[] = {

   109

	{-1,  0},

   110

	{ 0,  1},

   111

	{ 1,  0},

   112

	{ 0, -1}

   113

};