summaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
authorrubidium <rubidium@openttd.org>2007-08-30 17:17:04 +0000
committerrubidium <rubidium@openttd.org>2007-08-30 17:17:04 +0000
commitb284b5fa92adc5a5e8975e472511ab4e2e20f71e (patch)
tree8562d4448fae5c239425c0e3a045ac05afd33329 /src
parent9b65bc430cc4e59cba2e7ad09c2fcc0448e22781 (diff)
downloadopenttd-b284b5fa92adc5a5e8975e472511ab4e2e20f71e.tar.xz
(svn r11005) -Codechange: move the tiletype specific terraforming checks to the functions for those tile types.
-Codechange: barren the rail grounds on terraforming.
Diffstat (limited to 'src')
-rw-r--r--src/clear_cmd.cpp99
-rw-r--r--src/dummy_land.cpp6
-rw-r--r--src/industry_cmd.cpp5
-rw-r--r--src/openttd.h15
-rw-r--r--src/rail_cmd.cpp68
-rw-r--r--src/road_cmd.cpp6
-rw-r--r--src/station_cmd.cpp6
-rw-r--r--src/town_cmd.cpp6
-rw-r--r--src/tree_cmd.cpp6
-rw-r--r--src/tunnelbridge_cmd.cpp6
-rw-r--r--src/unmovable_cmd.cpp9
-rw-r--r--src/water_cmd.cpp9
12 files changed, 161 insertions, 80 deletions
diff --git a/src/clear_cmd.cpp b/src/clear_cmd.cpp
index c6b2be0c1..793497703 100644
--- a/src/clear_cmd.cpp
+++ b/src/clear_cmd.cpp
@@ -33,9 +33,6 @@ struct TerraformerHeightMod {
};
struct TerraformerState {
- uint32 flags;
-
- int direction;
int modheight_count; ///< amount of entries in "modheight".
int tile_table_count; ///< amount of entries in "tile_table".
@@ -102,54 +99,6 @@ static void TerraformAddDirtyTileAround(TerraformerState *ts, TileIndex tile)
}
/**
- * Checks if a tile can be terraformed, perform tiletype specific things (like clearing the tile) and compute their extra-cost.
- *
- * @param ts TerraformerState.
- * @param tile Tile.
- * @param mode Affected corner: 0 = north, 1 = east, 2 = south, 3 = west.
- * @return Error message or extra-cost.
- */
-static CommandCost TerraformProc(TerraformerState *ts, TileIndex tile, int mode)
-{
- /* Check if a tile can be terraformed. */
- if (IsTileType(tile, MP_RAILWAY)) {
- static const TrackBits safe_track[] = { TRACK_BIT_LOWER, TRACK_BIT_LEFT, TRACK_BIT_UPPER, TRACK_BIT_RIGHT };
- static const Slope unsafe_slope[] = { SLOPE_S, SLOPE_W, SLOPE_N, SLOPE_E };
-
- Slope tileh;
- uint z;
-
- /* Nothing could be built at the steep slope - this avoids a bug
- * when you have a single diagonal track in one corner on a
- * basement and then you raise/lower the other corner. */
- tileh = GetTileSlope(tile, &z);
- if (tileh == unsafe_slope[mode] ||
- tileh == (SLOPE_STEEP | ComplementSlope(unsafe_slope[mode]))) {
- _terraform_err_tile = tile;
- _error_message = STR_1008_MUST_REMOVE_RAILROAD_TRACK;
- return CMD_ERROR;
- }
-
- /* If we have a single diagonal track there, the other side of
- * tile can be terraformed. */
- if (IsPlainRailTile(tile) && GetTrackBits(tile) == safe_track[mode]) {
- /* Allow terraforming. */
- return CommandCost();
- }
- }
-
- /* Canals can't be terraformed */
- if (IsClearWaterTile(tile) && IsCanal(tile)) {
- _terraform_err_tile = tile;
- _error_message = STR_MUST_DEMOLISH_CANAL_FIRST;
- return CMD_ERROR;
- }
-
- /* Try to clear the tile. If the tile can be cleared, add the cost to the terraforming cost, else the terraforming fails. */
- return DoCommand(tile, 0, 0, ts->flags, CMD_LANDSCAPE_CLEAR);
-}
-
-/**
* Terraform the north corner of a tile to a specific height.
*
* @param ts TerraformerState.
@@ -269,8 +218,7 @@ CommandCost CmdTerraformLand(TileIndex tile, uint32 flags, uint32 p1, uint32 p2)
_terraform_err_tile = 0;
- ts.direction = direction = p2 ? 1 : -1;
- ts.flags = flags;
+ direction = p2 ? 1 : -1;
ts.modheight_count = ts.tile_table_count = 0;
ts.cost = CommandCost();
@@ -324,6 +272,13 @@ CommandCost CmdTerraformLand(TileIndex tile, uint32 flags, uint32 p1, uint32 p2)
uint z_min = min(min(z_N, z_W), min(z_S, z_E));
uint z_max = max(max(z_N, z_W), max(z_S, z_E));
+ /* Compute tile slope */
+ uint tileh = (z_max > z_min + 1 ? SLOPE_STEEP : SLOPE_FLAT);
+ if (z_W > z_min) tileh += SLOPE_W;
+ if (z_S > z_min) tileh += SLOPE_S;
+ if (z_E > z_min) tileh += SLOPE_E;
+ if (z_N > z_min) tileh += SLOPE_N;
+
/* Check if bridge would take damage */
if (direction == 1 && MayHaveBridgeAbove(tile) && IsBridgeAbove(tile) &&
GetBridgeHeight(GetSouthernBridgeEnd(tile)) <= z_max * TILE_HEIGHT) {
@@ -336,34 +291,12 @@ CommandCost CmdTerraformLand(TileIndex tile, uint32 flags, uint32 p1, uint32 p2)
return_cmd_error(STR_1002_EXCAVATION_WOULD_DAMAGE);
}
/* Check tiletype-specific things, and add extra-cost */
- /* Start of temporary solution until TerraformProc() gets replaced with a TileTypeProc */
- _terraform_err_tile = tile;
- CommandCost cost_N = CommandCost();
- CommandCost cost_W = CommandCost();
- CommandCost cost_S = CommandCost();
- CommandCost cost_E = CommandCost();
-
- if (z_N != TileHeight(tile)) cost_N = TerraformProc(&ts, tile, 0);
- if (CmdFailed(cost_N)) return cost_N;
-
- if (z_E != TileHeight(tile + TileDiffXY(0, 1))) cost_E = TerraformProc(&ts, tile, 1);
- if (CmdFailed(cost_E)) return cost_E;
-
- if (z_S != TileHeight(tile + TileDiffXY(1, 1))) cost_S = TerraformProc(&ts, tile, 2);
- if (CmdFailed(cost_S)) return cost_S;
-
- if (z_W != TileHeight(tile + TileDiffXY(1, 0))) cost_W = TerraformProc(&ts, tile, 3);
- if (CmdFailed(cost_W)) return cost_W;
-
- _terraform_err_tile = 0; // no error, reset error tile.
- /* Add extra cost. Currently this may only be for clearing the tile. And we only want to clear it once. */
- CommandCost cost = CommandCost();
- cost.AddCost(cost_N);
- if (cost.GetCost() == 0) cost.AddCost(cost_W);
- if (cost.GetCost() == 0) cost.AddCost(cost_S);
- if (cost.GetCost() == 0) cost.AddCost(cost_E);
+ CommandCost cost = _tile_type_procs[GetTileType(tile)]->terraform_tile_proc(tile, flags, z_min * TILE_HEIGHT, (Slope) tileh);
+ if (CmdFailed(cost)) {
+ _terraform_err_tile = tile;
+ return cost;
+ }
ts.cost.AddCost(cost);
- /* End of temporary solution */
}
}
@@ -842,6 +775,11 @@ void InitializeClearLand()
_opt.snow_line = _patches.snow_line_height * TILE_HEIGHT;
}
+static CommandCost TerraformTile_Clear(TileIndex tile, uint32 flags, uint z_new, Slope tileh_new)
+{
+ return DoCommand(tile, 0, 0, flags, CMD_LANDSCAPE_CLEAR);
+}
+
extern const TileTypeProcs _tile_type_clear_procs = {
DrawTile_Clear, ///< draw_tile_proc
GetSlopeZ_Clear, ///< get_slope_z_proc
@@ -856,4 +794,5 @@ extern const TileTypeProcs _tile_type_clear_procs = {
NULL, ///< get_produced_cargo_proc
NULL, ///< vehicle_enter_tile_proc
GetFoundation_Clear, ///< get_foundation_proc
+ TerraformTile_Clear, ///< terraform_tile_proc
};
diff --git a/src/dummy_land.cpp b/src/dummy_land.cpp
index 03d081cce..d02dab88b 100644
--- a/src/dummy_land.cpp
+++ b/src/dummy_land.cpp
@@ -68,6 +68,11 @@ static uint32 GetTileTrackStatus_Dummy(TileIndex tile, TransportType mode, uint
return 0;
}
+static CommandCost TerraformTile_Dummy(TileIndex tile, uint32 flags, uint z_new, Slope tileh_new)
+{
+ return_cmd_error(STR_0001_OFF_EDGE_OF_MAP);
+}
+
extern const TileTypeProcs _tile_type_dummy_procs = {
DrawTile_Dummy, /* draw_tile_proc */
GetSlopeZ_Dummy, /* get_slope_z_proc */
@@ -82,4 +87,5 @@ extern const TileTypeProcs _tile_type_dummy_procs = {
NULL, /* get_produced_cargo_proc */
NULL, /* vehicle_enter_tile_proc */
GetFoundation_Dummy, /* get_foundation_proc */
+ TerraformTile_Dummy, /* terraform_tile_proc */
};
diff --git a/src/industry_cmd.cpp b/src/industry_cmd.cpp
index 6f9eeb8b0..57332103f 100644
--- a/src/industry_cmd.cpp
+++ b/src/industry_cmd.cpp
@@ -1971,6 +1971,10 @@ Money IndustrySpec::GetConstructionCost() const
)) >> 8;
}
+static CommandCost TerraformTile_Industry(TileIndex tile, uint32 flags, uint z_new, Slope tileh_new)
+{
+ return DoCommand(tile, 0, 0, flags, CMD_LANDSCAPE_CLEAR); // funny magic bulldozer
+}
extern const TileTypeProcs _tile_type_industry_procs = {
DrawTile_Industry, /* draw_tile_proc */
@@ -1986,6 +1990,7 @@ extern const TileTypeProcs _tile_type_industry_procs = {
GetProducedCargo_Industry, /* get_produced_cargo_proc */
NULL, /* vehicle_enter_tile_proc */
GetFoundation_Industry, /* get_foundation_proc */
+ TerraformTile_Industry, /* terraform_tile_proc */
};
static const SaveLoad _industry_desc[] = {
diff --git a/src/openttd.h b/src/openttd.h
index 9fa72e915..2084f3219 100644
--- a/src/openttd.h
+++ b/src/openttd.h
@@ -473,6 +473,20 @@ typedef void ChangeTileOwnerProc(TileIndex tile, PlayerID old_player, PlayerID n
/** @see VehicleEnterTileStatus to see what the return values mean */
typedef uint32 VehicleEnterTileProc(Vehicle *v, TileIndex tile, int x, int y);
typedef Foundation GetFoundationProc(TileIndex tile, Slope tileh);
+/**
+ * Called when a tile is affected by a terraforming operation.
+ * The function has to check if terraforming of the tile is allowed and return extra terraform-cost that depend on the tiletype.
+ * With DC_EXEC in flags it has to perform tiletype-specific actions (like clearing land etc., but not the terraforming itself).
+ *
+ * @note The terraforming has not yet taken place. So GetTileZ() and GetTileSlope() refer to the landscape before the terraforming operation.
+ *
+ * @param tile The involved tile.
+ * @param flags Command flags passed to the terraform command (DC_EXEC, DC_QUERY_COST, etc.).
+ * @param z_new TileZ after terraforming.
+ * @param tileh_new Slope after terraforming.
+ * @return Error code or extra cost for terraforming (like clearing land, building foundations, etc., but not the terraforming itself.)
+ */
+typedef CommandCost TerraformTileProc(TileIndex tile, uint32 flags, uint z_new, Slope tileh_new);
struct TileTypeProcs {
DrawTileProc *draw_tile_proc;
@@ -488,6 +502,7 @@ struct TileTypeProcs {
GetProducedCargoProc *get_produced_cargo_proc;
VehicleEnterTileProc *vehicle_enter_tile_proc;
GetFoundationProc *get_foundation_proc;
+ TerraformTileProc *terraform_tile_proc;
};
diff --git a/src/rail_cmd.cpp b/src/rail_cmd.cpp
index 29c44d194..27ce47cf5 100644
--- a/src/rail_cmd.cpp
+++ b/src/rail_cmd.cpp
@@ -2175,6 +2175,73 @@ static uint32 VehicleEnter_Track(Vehicle *v, TileIndex tile, int x, int y)
return VETSB_CONTINUE;
}
+static CommandCost TerraformTile_Track(TileIndex tile, uint32 flags, uint z_new, Slope tileh_new)
+{
+ if (IsPlainRailTile(tile)) {
+ uint z_old;
+ Slope tileh_old = GetTileSlope(tile, &z_old);
+ TrackBits rail_bits = GetTrackBits(tile);
+
+ _error_message = STR_1008_MUST_REMOVE_RAILROAD_TRACK;
+
+ /* When there is only a single horizontal/vertical track, one corner can be terraformed. */
+ Slope allowed_corner;
+ switch (rail_bits) {
+ case TRACK_BIT_RIGHT: allowed_corner = SLOPE_W; break;
+ case TRACK_BIT_UPPER: allowed_corner = SLOPE_S; break;
+ case TRACK_BIT_LEFT: allowed_corner = SLOPE_E; break;
+ case TRACK_BIT_LOWER: allowed_corner = SLOPE_N; break;
+ default: return CMD_ERROR;
+ }
+
+ Slope track_corners = ComplementSlope(allowed_corner);
+
+ Foundation f_old = GetRailFoundation(tileh_old, rail_bits);
+ switch (f_old) {
+ case FOUNDATION_NONE:
+ /* Everything is valid, which only changes allowed_corner */
+
+ /* Compute height of track */
+ if (tileh_old == track_corners) z_old += TILE_HEIGHT;
+ if (tileh_new == track_corners) {
+ z_new += TILE_HEIGHT;
+ } else {
+ /* do not build a foundation */
+ if ((tileh_new != SLOPE_FLAT) && (tileh_new != allowed_corner)) return CMD_ERROR;
+ }
+
+ /* Track height must remain unchanged */
+ if (z_old != z_new) return CMD_ERROR;
+ break;
+
+ case FOUNDATION_LEVELED:
+ /* Is allowed_corner covered by the foundation? */
+ if ((tileh_old & allowed_corner) == 0) return CMD_ERROR;
+
+ /* allowed_corner may only be raised -> steep slope */
+ if ((z_old != z_new) || (tileh_new != (tileh_old | SLOPE_STEEP))) return CMD_ERROR;
+ break;
+
+ case FOUNDATION_STEEP_LOWER:
+ /* Only allow to lower highest corner */
+ if ((z_old != z_new) || (tileh_new != (tileh_old & ~SLOPE_STEEP))) return CMD_ERROR;
+ break;
+
+ case FOUNDATION_STEEP_HIGHER:
+ return CMD_ERROR;
+
+ default: NOT_REACHED();
+ }
+
+ /* Make the ground dirty */
+ if ((flags & DC_EXEC) != 0) SetRailGroundType(tile, RAIL_GROUND_BARREN);
+
+ /* allow terraforming, no extra costs */
+ return CommandCost();
+ }
+ return DoCommand(tile, 0, 0, flags, CMD_LANDSCAPE_CLEAR);
+}
+
extern const TileTypeProcs _tile_type_rail_procs = {
DrawTile_Track, /* draw_tile_proc */
@@ -2190,4 +2257,5 @@ extern const TileTypeProcs _tile_type_rail_procs = {
NULL, /* get_produced_cargo_proc */
VehicleEnter_Track, /* vehicle_enter_tile_proc */
GetFoundation_Track, /* get_foundation_proc */
+ TerraformTile_Track, /* terraform_tile_proc */
};
diff --git a/src/road_cmd.cpp b/src/road_cmd.cpp
index 00e488629..34163d16d 100644
--- a/src/road_cmd.cpp
+++ b/src/road_cmd.cpp
@@ -1388,6 +1388,11 @@ static void ChangeTileOwner_Road(TileIndex tile, PlayerID old_player, PlayerID n
}
}
+static CommandCost TerraformTile_Road(TileIndex tile, uint32 flags, uint z_new, Slope tileh_new)
+{
+ return DoCommand(tile, 0, 0, flags, CMD_LANDSCAPE_CLEAR);
+}
+
extern const TileTypeProcs _tile_type_road_procs = {
DrawTile_Road, /* draw_tile_proc */
@@ -1403,4 +1408,5 @@ extern const TileTypeProcs _tile_type_road_procs = {
NULL, /* get_produced_cargo_proc */
VehicleEnter_Road, /* vehicle_enter_tile_proc */
GetFoundation_Road, /* get_foundation_proc */
+ TerraformTile_Road, /* terraform_tile_proc */
};
diff --git a/src/station_cmd.cpp b/src/station_cmd.cpp
index 44bf64bf1..6f4e3cbc8 100644
--- a/src/station_cmd.cpp
+++ b/src/station_cmd.cpp
@@ -2878,6 +2878,11 @@ void AfterLoadStations()
}
}
+static CommandCost TerraformTile_Station(TileIndex tile, uint32 flags, uint z_new, Slope tileh_new)
+{
+ return DoCommand(tile, 0, 0, flags, CMD_LANDSCAPE_CLEAR);
+}
+
extern const TileTypeProcs _tile_type_station_procs = {
DrawTile_Station, /* draw_tile_proc */
@@ -2893,6 +2898,7 @@ extern const TileTypeProcs _tile_type_station_procs = {
NULL, /* get_produced_cargo_proc */
VehicleEnter_Station, /* vehicle_enter_tile_proc */
GetFoundation_Station, /* get_foundation_proc */
+ TerraformTile_Station, /* terraform_tile_proc */
};
static const SaveLoad _roadstop_desc[] = {
diff --git a/src/town_cmd.cpp b/src/town_cmd.cpp
index ce6de7fcf..852e4e351 100644
--- a/src/town_cmd.cpp
+++ b/src/town_cmd.cpp
@@ -2303,6 +2303,11 @@ void InitializeTowns()
_town_sort_dirty = true;
}
+static CommandCost TerraformTile_Town(TileIndex tile, uint32 flags, uint z_new, Slope tileh_new)
+{
+ return DoCommand(tile, 0, 0, flags, CMD_LANDSCAPE_CLEAR);
+}
+
extern const TileTypeProcs _tile_type_town_procs = {
DrawTile_Town, /* draw_tile_proc */
GetSlopeZ_Town, /* get_slope_z_proc */
@@ -2317,6 +2322,7 @@ extern const TileTypeProcs _tile_type_town_procs = {
NULL, /* get_produced_cargo_proc */
NULL, /* vehicle_enter_tile_proc */
GetFoundation_Town, /* get_foundation_proc */
+ TerraformTile_Town, /* terraform_tile_proc */
};
diff --git a/src/tree_cmd.cpp b/src/tree_cmd.cpp
index 6945e4dda..7419457d4 100644
--- a/src/tree_cmd.cpp
+++ b/src/tree_cmd.cpp
@@ -656,6 +656,11 @@ void InitializeTrees()
_trees_tick_ctr = 0;
}
+static CommandCost TerraformTile_Trees(TileIndex tile, uint32 flags, uint z_new, Slope tileh_new)
+{
+ return DoCommand(tile, 0, 0, flags, CMD_LANDSCAPE_CLEAR);
+}
+
extern const TileTypeProcs _tile_type_trees_procs = {
DrawTile_Trees, /* draw_tile_proc */
@@ -671,4 +676,5 @@ extern const TileTypeProcs _tile_type_trees_procs = {
NULL, /* get_produced_cargo_proc */
NULL, /* vehicle_enter_tile_proc */
GetFoundation_Trees, /* get_foundation_proc */
+ TerraformTile_Trees, /* terraform_tile_proc */
};
diff --git a/src/tunnelbridge_cmd.cpp b/src/tunnelbridge_cmd.cpp
index 6c9173971..7c625126a 100644
--- a/src/tunnelbridge_cmd.cpp
+++ b/src/tunnelbridge_cmd.cpp
@@ -1415,6 +1415,11 @@ static uint32 VehicleEnter_TunnelBridge(Vehicle *v, TileIndex tile, int x, int y
return VETSB_CONTINUE;
}
+static CommandCost TerraformTile_TunnelBridge(TileIndex tile, uint32 flags, uint z_new, Slope tileh_new)
+{
+ return DoCommand(tile, 0, 0, flags, CMD_LANDSCAPE_CLEAR);
+}
+
extern const TileTypeProcs _tile_type_tunnelbridge_procs = {
DrawTile_TunnelBridge, /* draw_tile_proc */
GetSlopeZ_TunnelBridge, /* get_slope_z_proc */
@@ -1429,4 +1434,5 @@ extern const TileTypeProcs _tile_type_tunnelbridge_procs = {
NULL, /* get_produced_cargo_proc */
VehicleEnter_TunnelBridge, /* vehicle_enter_tile_proc */
GetFoundation_TunnelBridge, /* get_foundation_proc */
+ TerraformTile_TunnelBridge, /* terraform_tile_proc */
};
diff --git a/src/unmovable_cmd.cpp b/src/unmovable_cmd.cpp
index 079e46d07..ee486cbfa 100644
--- a/src/unmovable_cmd.cpp
+++ b/src/unmovable_cmd.cpp
@@ -398,6 +398,14 @@ static void ChangeTileOwner_Unmovable(TileIndex tile, PlayerID old_player, Playe
}
}
+static CommandCost TerraformTile_Unmovable(TileIndex tile, uint32 flags, uint z_new, Slope tileh_new)
+{
+ /* Owned land remains unsold */
+ if (IsOwnedLand(tile) && CheckTileOwnership(tile)) return CommandCost();
+
+ return DoCommand(tile, 0, 0, flags, CMD_LANDSCAPE_CLEAR);
+}
+
extern const TileTypeProcs _tile_type_unmovable_procs = {
DrawTile_Unmovable, /* draw_tile_proc */
GetSlopeZ_Unmovable, /* get_slope_z_proc */
@@ -412,4 +420,5 @@ extern const TileTypeProcs _tile_type_unmovable_procs = {
NULL, /* get_produced_cargo_proc */
NULL, /* vehicle_enter_tile_proc */
GetFoundation_Unmovable, /* get_foundation_proc */
+ TerraformTile_Unmovable, /* terraform_tile_proc */
};
diff --git a/src/water_cmd.cpp b/src/water_cmd.cpp
index 4c013857a..a3e97c734 100644
--- a/src/water_cmd.cpp
+++ b/src/water_cmd.cpp
@@ -802,6 +802,14 @@ static uint32 VehicleEnter_Water(Vehicle *v, TileIndex tile, int x, int y)
return VETSB_CONTINUE;
}
+static CommandCost TerraformTile_Water(TileIndex tile, uint32 flags, uint z_new, Slope tileh_new)
+{
+ /* Canals can't be terraformed */
+ if (IsClearWaterTile(tile) && IsCanal(tile)) return_cmd_error(STR_MUST_DEMOLISH_CANAL_FIRST);
+
+ return DoCommand(tile, 0, 0, flags, CMD_LANDSCAPE_CLEAR);
+}
+
extern const TileTypeProcs _tile_type_water_procs = {
DrawTile_Water, /* draw_tile_proc */
@@ -817,4 +825,5 @@ extern const TileTypeProcs _tile_type_water_procs = {
NULL, /* get_produced_cargo_proc */
VehicleEnter_Water, /* vehicle_enter_tile_proc */
GetFoundation_Water, /* get_foundation_proc */
+ TerraformTile_Water, /* terraform_tile_proc */
};