From 7878405a12bae0a3d4c6f5b2adfdaff9eecac679 Mon Sep 17 00:00:00 2001
From: rubidium <rubidium@openttd.org>
Date: Sat, 10 Jan 2009 13:00:38 +0000
Subject: (svn r14954) -Fix [FS#1890]: sharing/cloning/inserting of orders that
 the/a vehicle (in the shared list) can't go to (wrong station type etc)

---
 src/order_cmd.cpp | 52 ++++++++++++++++++++++++++++++++++------------------
 1 file changed, 34 insertions(+), 18 deletions(-)

(limited to 'src/order_cmd.cpp')

diff --git a/src/order_cmd.cpp b/src/order_cmd.cpp
index a0b675f10..faa5c437e 100644
--- a/src/order_cmd.cpp
+++ b/src/order_cmd.cpp
@@ -355,6 +355,19 @@ void OrderList::DebugCheckSanity() const
 	      this->num_vehicles, this->timetable_duration);
 }
 
+/**
+ * Checks whether the order goes to a station or not, i.e. whether the
+ * destination is a station
+ * @param v the vehicle to check for
+ * @param o the order to check
+ * @return true if the destination is a station
+ */
+static inline bool OrderGoesToStation(const Vehicle *v, const Order *o)
+{
+	return o->IsType(OT_GOTO_STATION) ||
+			(v->type == VEH_AIRCRAFT && o->IsType(OT_GOTO_DEPOT) && !(o->GetDepotActionType() & ODATFB_NEAREST_DEPOT));
+}
+
 /**
  * Delete all news items regarding defective orders about a vehicle
  * This could kill still valid warnings (for example about void order when just
@@ -426,7 +439,11 @@ CommandCost CmdInsertOrder(TileIndex tile, uint32 flags, uint32 p1, uint32 p2, c
 			const Station *st = GetStation(new_order.GetDestination());
 
 			if (st->owner != OWNER_NONE && !CheckOwnership(st->owner)) return CMD_ERROR;
-			if (!CanVehicleUseStation(v, st)) return CMD_ERROR;
+
+			if (!CanVehicleUseStation(v, st)) return_cmd_error(STR_CAN_T_ADD_ORDER);
+			for (Vehicle *u = v->FirstShared(); u != NULL; u = u->NextShared()) {
+				if (!CanVehicleUseStation(u, st)) return_cmd_error(STR_CAN_T_ADD_ORDER_SHARED);
+			}
 
 			/* Non stop not allowed for non-trains. */
 			if (new_order.GetNonStopType() != ONSF_STOP_EVERYWHERE && v->type != VEH_TRAIN && v->type != VEH_ROAD) return CMD_ERROR;
@@ -1070,6 +1087,15 @@ CommandCost CmdCloneOrder(TileIndex tile, uint32 flags, uint32 p1, uint32 p2, co
 			/* Is the vehicle already in the shared list? */
 			if (src->FirstShared() == dst->FirstShared()) return CMD_ERROR;
 
+			const Order *order;
+
+			FOR_VEHICLE_ORDERS(src, order) {
+				if (OrderGoesToStation(dst, order) &&
+						!CanVehicleUseStation(dst, GetStation(order->GetDestination()))) {
+					return_cmd_error(STR_CAN_T_COPY_SHARE_ORDER);
+				}
+			}
+
 			if (flags & DC_EXEC) {
 				/* If the destination vehicle had a OrderList, destroy it */
 				DeleteVehicleOrders(dst);
@@ -1098,23 +1124,13 @@ CommandCost CmdCloneOrder(TileIndex tile, uint32 flags, uint32 p1, uint32 p2, co
 			if (!CheckOwnership(src->owner) || dst->type != src->type || dst == src)
 				return CMD_ERROR;
 
-			/* Trucks can't copy all the orders from busses (and visa versa) */
-			if (src->type == VEH_ROAD) {
-				const Order *order;
-				TileIndex required_dst = INVALID_TILE;
-
-				FOR_VEHICLE_ORDERS(src, order) {
-					if (order->IsType(OT_GOTO_STATION)) {
-						const Station *st = GetStation(order->GetDestination());
-						if (IsCargoInClass(dst->cargo_type, CC_PASSENGERS)) {
-							if (st->bus_stops != NULL) required_dst = st->bus_stops->xy;
-						} else {
-							if (st->truck_stops != NULL) required_dst = st->truck_stops->xy;
-						}
-						/* This station has not the correct road-bay, so we can't copy! */
-						if (required_dst == INVALID_TILE)
-							return CMD_ERROR;
-					}
+			/* Trucks can't copy all the orders from busses (and visa versa),
+			 * and neither can helicopters and aircarft. */
+			const Order *order;
+			FOR_VEHICLE_ORDERS(src, order) {
+				if (OrderGoesToStation(dst, order) &&
+						!CanVehicleUseStation(dst, GetStation(order->GetDestination()))) {
+					return_cmd_error(STR_CAN_T_COPY_SHARE_ORDER);
 				}
 			}
 
-- 
cgit v1.2.3-70-g09d2