(svn r9794) -Codechange: refactor the question whether a vehicle can be loaded into LoadUnloadVehicle instead of duplicating it for each vehicle.
--- a/src/aircraft_cmd.cpp Sun May 06 09:12:58 2007 +0000
+++ b/src/aircraft_cmd.cpp Sun May 06 14:59:01 2007 +0000
@@ -1421,10 +1421,7 @@
if (mode != 0) return;
if (--v->load_unload_time_rem != 0) return;
- if (CanFillVehicle(v)) {
- LoadUnloadVehicle(v);
- return;
- }
+ if (LoadUnloadVehicle(v)) return;
Order b = v->current_order;
v->LeaveStation();
--- a/src/economy.cpp Sun May 06 09:12:58 2007 +0000
+++ b/src/economy.cpp Sun May 06 14:59:01 2007 +0000
@@ -1378,6 +1378,73 @@
return false;
}
+static bool CanFillVehicle_FullLoadAny(Vehicle *v)
+{
+ uint32 full = 0, not_full = 0;
+ const GoodsEntry *ge = GetStation(v->last_station_visited)->goods;
+
+ /* special handling of aircraft */
+
+ /* if the aircraft carries passengers and is NOT full, then
+ *continue loading, no matter how much mail is in */
+ if (v->type == VEH_AIRCRAFT &&
+ IsCargoInClass(v->cargo_type, CC_PASSENGERS) &&
+ v->cargo_cap != v->cargo_count) {
+ return true;
+ }
+
+ /* patch should return "true" to continue loading, i.e. when there is no cargo type that is fully loaded. */
+ do {
+ /* Should never happen, but just in case future additions change this */
+ assert(v->cargo_type<32);
+
+ if (v->cargo_cap != 0) {
+ uint32 mask = 1 << v->cargo_type;
+
+ if (!HASBIT(v->vehicle_flags, VF_CARGO_UNLOADING) && v->cargo_cap == v->cargo_count) {
+ full |= mask;
+ } else if (GB(ge[v->cargo_type].waiting_acceptance, 0, 12) > 0 ||
+ (HASBIT(v->vehicle_flags, VF_CARGO_UNLOADING) && (ge[v->cargo_type].waiting_acceptance & 0x8000))) {
+ /* If there is any cargo waiting, or this vehicle is still unloading
+ * and the station accepts the cargo, don't leave the station. */
+ return true;
+ } else {
+ not_full |= mask;
+ }
+ }
+ } while ((v = v->next) != NULL);
+
+ /* continue loading if there is a non full cargo type and no cargo type that is full */
+ return not_full && (full & ~not_full) == 0;
+}
+
+
+static bool CanFillVehicle(Vehicle *front_v)
+{
+ TileIndex tile = front_v->tile;
+
+ assert(IsTileType(tile, MP_STATION) ||
+ (front_v->type == VEH_SHIP && (
+ IsTileType(TILE_ADDXY(tile, 1, 0), MP_STATION) ||
+ IsTileType(TILE_ADDXY(tile, -1, 0), MP_STATION) ||
+ IsTileType(TILE_ADDXY(tile, 0, 1), MP_STATION) ||
+ IsTileType(TILE_ADDXY(tile, 0, -1), MP_STATION) ||
+ IsTileType(TILE_ADDXY(tile, -2, 0), MP_STATION)
+ )));
+
+ bool full_load = HASBIT(front_v->current_order.flags, OFB_FULL_LOAD);
+
+ /* If patch is active, use alternative CanFillVehicle-function */
+ if (_patches.full_load_any && full_load) return CanFillVehicle_FullLoadAny(front_v);
+
+ Vehicle *v = front_v;
+ do {
+ if (HASBIT(v->vehicle_flags, VF_CARGO_UNLOADING) || (full_load && v->cargo_count != v->cargo_cap)) return true;
+ } while ((v = v->next) != NULL);
+
+ return !HASBIT(front_v->vehicle_flags, VF_LOADING_FINISHED);
+}
+
/**
* Performs the vehicle payment _and_ marks the vehicle to be unloaded.
* @param front_v the vehicle to be unloaded
@@ -1477,8 +1544,15 @@
_current_player = old_player;
}
-int LoadUnloadVehicle(Vehicle *v)
+/**
+ * Loads/unload the vehicle if possible.
+ * @param v the vehicle to be (un)loaded
+ * @return true if something was (un)loaded. False if the train is ready to leave.
+ */
+bool LoadUnloadVehicle(Vehicle *v)
{
+ if (!CanFillVehicle(v)) return false;
+
int unloading_time = 20;
Vehicle *u = v;
int result = 0;
@@ -1689,7 +1763,7 @@
if (result & 2) InvalidateWindow(WC_STATION_VIEW, last_visited);
}
- return result;
+ return true;
}
void PlayersMonthlyLoop()
--- a/src/roadveh_cmd.cpp Sun May 06 09:12:58 2007 +0000
+++ b/src/roadveh_cmd.cpp Sun May 06 14:59:01 2007 +0000
@@ -761,10 +761,7 @@
if (--v->load_unload_time_rem != 0) return;
- if (CanFillVehicle(v)) {
- LoadUnloadVehicle(v);
- return;
- }
+ if (LoadUnloadVehicle(v)) return;
b = v->current_order;
v->LeaveStation();
--- a/src/ship_cmd.cpp Sun May 06 09:12:58 2007 +0000
+++ b/src/ship_cmd.cpp Sun May 06 14:59:01 2007 +0000
@@ -306,10 +306,8 @@
case OT_LOADING: {
if (--v->load_unload_time_rem != 0) return;
- if (CanFillVehicle(v)) {
- LoadUnloadVehicle(v);
- return;
- }
+ if (LoadUnloadVehicle(v)) return;
+
PlayShipSound(v);
Order b = v->current_order;
--- a/src/train_cmd.cpp Sun May 06 09:12:58 2007 +0000
+++ b/src/train_cmd.cpp Sun May 06 14:59:01 2007 +0000
@@ -2537,10 +2537,7 @@
if (--v->load_unload_time_rem) return;
- if (CanFillVehicle(v)) {
- LoadUnloadVehicle(v);
- return;
- }
+ if (LoadUnloadVehicle(v)) return;
TrainPlayLeaveStationSound(v);
--- a/src/vehicle.cpp Sun May 06 09:12:58 2007 +0000
+++ b/src/vehicle.cpp Sun May 06 14:59:01 2007 +0000
@@ -701,73 +701,6 @@
}
}
-static bool CanFillVehicle_FullLoadAny(Vehicle *v)
-{
- uint32 full = 0, not_full = 0;
- const GoodsEntry *ge = GetStation(v->last_station_visited)->goods;
-
- /* special handling of aircraft */
-
- /* if the aircraft carries passengers and is NOT full, then
- *continue loading, no matter how much mail is in */
- if (v->type == VEH_AIRCRAFT &&
- IsCargoInClass(v->cargo_type, CC_PASSENGERS) &&
- v->cargo_cap != v->cargo_count) {
- return true;
- }
-
- /* patch should return "true" to continue loading, i.e. when there is no cargo type that is fully loaded. */
- do {
- /* Should never happen, but just in case future additions change this */
- assert(v->cargo_type<32);
-
- if (v->cargo_cap != 0) {
- uint32 mask = 1 << v->cargo_type;
-
- if (!HASBIT(v->vehicle_flags, VF_CARGO_UNLOADING) && v->cargo_cap == v->cargo_count) {
- full |= mask;
- } else if (GB(ge[v->cargo_type].waiting_acceptance, 0, 12) > 0 ||
- (HASBIT(v->vehicle_flags, VF_CARGO_UNLOADING) && (ge[v->cargo_type].waiting_acceptance & 0x8000))) {
- /* If there is any cargo waiting, or this vehicle is still unloading
- * and the station accepts the cargo, don't leave the station. */
- return true;
- } else {
- not_full |= mask;
- }
- }
- } while ((v = v->next) != NULL);
-
- /* continue loading if there is a non full cargo type and no cargo type that is full */
- return not_full && (full & ~not_full) == 0;
-}
-
-
-bool CanFillVehicle(Vehicle *front_v)
-{
- TileIndex tile = front_v->tile;
-
- assert(IsTileType(tile, MP_STATION) ||
- (front_v->type == VEH_SHIP && (
- IsTileType(TILE_ADDXY(tile, 1, 0), MP_STATION) ||
- IsTileType(TILE_ADDXY(tile, -1, 0), MP_STATION) ||
- IsTileType(TILE_ADDXY(tile, 0, 1), MP_STATION) ||
- IsTileType(TILE_ADDXY(tile, 0, -1), MP_STATION) ||
- IsTileType(TILE_ADDXY(tile, -2, 0), MP_STATION)
- )));
-
- bool full_load = HASBIT(front_v->current_order.flags, OFB_FULL_LOAD);
-
- /* If patch is active, use alternative CanFillVehicle-function */
- if (_patches.full_load_any && full_load) return CanFillVehicle_FullLoadAny(front_v);
-
- Vehicle *v = front_v;
- do {
- if (HASBIT(v->vehicle_flags, VF_CARGO_UNLOADING) || (full_load && v->cargo_count != v->cargo_cap)) return true;
- } while ((v = v->next) != NULL);
-
- return !HASBIT(front_v->vehicle_flags, VF_LOADING_FINISHED);
-}
-
/** Check if a given engine type can be refitted to a given cargo
* @param engine_type Engine type to check
* @param cid_to check refit to this cargo-type
--- a/src/vehicle.h Sun May 06 09:12:58 2007 +0000
+++ b/src/vehicle.h Sun May 06 14:59:01 2007 +0000
@@ -467,7 +467,6 @@
byte VehicleRandomBits();
void ResetVehiclePosHash();
-bool CanFillVehicle(Vehicle *v);
bool CanRefitTo(EngineID engine_type, CargoID cid_to);
CargoID FindFirstRefittableCargo(EngineID engine_type);
int32 GetRefitCost(EngineID engine_type);
@@ -507,7 +506,7 @@
UnitID GetFreeUnitNumber(byte type);
-int LoadUnloadVehicle(Vehicle *v);
+bool LoadUnloadVehicle(Vehicle *v);
void TrainConsistChanged(Vehicle *v);
void TrainPowerChanged(Vehicle *v);