# station_sl.cpp

Go to the documentation of this file.

    00001 /* $Id$ */
    00002
    00003 /*
    00004  * This file is part of OpenTTD.
    00005  * OpenTTD is free software; you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation, version 2.
    00006  * OpenTTD is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
    00007  * See the GNU General Public License for more details. You should have received a copy of the GNU General Public License along with OpenTTD. If not, see <http://www.gnu.org/licenses/>.
    00008  */
    00009
    00012 #include "../stdafx.h"
    00013 #include "../station_base.h"
    00014 #include "../waypoint_base.h"
    00015 #include "../roadstop_base.h"
    00016 #include "../vehicle_base.h"
    00017 #include "../newgrf_station.h"
    00018
    00019 #include "saveload.h"
    00020 #include "table/strings.h"
    00021
    00026 static void UpdateWaypointOrder(Order *o)
    00027 {
    00028   if (!o->IsType(OT_GOTO_STATION)) return;
    00029
    00030   const Station *st = Station::Get(o->GetDestination());
    00031   if ((st->had_vehicle_of_type & HVOT_WAYPOINT) == 0) return;
    00032
    00033   o->MakeGoToWaypoint(o->GetDestination());
    00034 }
    00035
    00040 void MoveBuoysToWaypoints()
    00041 {
    00042   /* Buoy orders become waypoint orders */
    00043   OrderList *ol;
    00044   FOR_ALL_ORDER_LISTS(ol) {
    00045     VehicleType vt = ol->GetFirstSharedVehicle()->type;
    00046     if (vt != VEH_SHIP && vt != VEH_TRAIN) continue;
    00047
    00048     for (Order *o = ol->GetFirstOrder(); o != NULL; o = o->next) UpdateWaypointOrder(o);
    00049   }
    00050
    00051   Vehicle *v;
    00052   FOR_ALL_VEHICLES(v) {
    00053     VehicleType vt = v->type;
    00054     if (vt != VEH_SHIP && vt != VEH_TRAIN) continue;
    00055
    00056     UpdateWaypointOrder(&v->current_order);
    00057   }
    00058
    00059   /* Now make the stations waypoints */
    00060   Station *st;
    00061   FOR_ALL_STATIONS(st) {
    00062     if ((st->had_vehicle_of_type & HVOT_WAYPOINT) == 0) continue;
    00063
    00064     StationID index    = st->index;
    00065     TileIndex xy       = st->xy;
    00066     Town *town         = st->town;
    00067     StringID string_id = st->string_id;
    00068     char *name         = st->name;
    00069     st->name           = NULL;
    00070     Date build_date    = st->build_date;
    00071     /* TTDPatch could use "buoys with rail station" for rail waypoints */
    00072     bool train         = st->train_station.tile != INVALID_TILE;
    00073     TileArea train_st  = st->train_station;
    00074
    00075     /* Delete the station, so we can make it a real waypoint. */
    00076     delete st;
    00077
    00078     /* Stations and waypoints are in the same pool, so if a station
    00079      * is deleted there must be place for a Waypoint. */
    00080     assert(Waypoint::CanAllocateItem());
    00081     Waypoint *wp   = new (index) Waypoint(xy);
    00082     wp->town       = town;
    00083     wp->string_id  = train ? STR_SV_STNAME_WAYPOINT : STR_SV_STNAME_BUOY;
    00084     wp->name       = name;
    00085     wp->delete_ctr = 0; // Just reset delete counter for once.
    00086     wp->build_date = build_date;
    00087     wp->owner      = train ? GetTileOwner(xy) : OWNER_NONE;
    00088
    00089     if (IsInsideBS(string_id, STR_SV_STNAME_BUOY, 9)) wp->town_cn = string_id - STR_SV_STNAME_BUOY;
    00090
    00091     if (train) {
    00092       /* When we make a rail waypoint of the station, convert the map as well. */
    00093       TILE_AREA_LOOP(t, train_st) {
    00094         if (!IsTileType(t, MP_STATION) || GetStationIndex(t) != index) continue;
    00095
    00096         SB(_m[t].m6, 3, 3, STATION_WAYPOINT);
    00097         wp->rect.BeforeAddTile(t, StationRect::ADD_FORCE);
    00098       }
    00099
    00100       wp->train_station = train_st;
    00101       wp->facilities |= FACIL_TRAIN;
    00102     } else if (IsBuoyTile(xy) && GetStationIndex(xy) == index) {
    00103       wp->rect.BeforeAddTile(xy, StationRect::ADD_FORCE);
    00104       wp->facilities |= FACIL_DOCK;
    00105     }
    00106   }
    00107 }
    00108
    00109 void AfterLoadStations()
    00110 {
    00111   /* Update the speclists of all stations to point to the currently loaded custom stations. */
    00112   BaseStation *st;
    00113   FOR_ALL_BASE_STATIONS(st) {
    00114     for (uint i = 0; i < st->num_specs; i++) {
    00115       if (st->speclist[i].grfid == 0) continue;
    00116
    00117       st->speclist[i].spec = StationClass::GetByGrf(st->speclist[i].grfid, st->speclist[i].localidx, NULL);
    00118     }
    00119
    00120     if (Station::IsExpected(st)) {
    00121       Station *sta = Station::From(st);
    00122       for (const RoadStop *rs = sta->bus_stops; rs != NULL; rs = rs->next) sta->bus_station.Add(rs->xy);
    00123       for (const RoadStop *rs = sta->truck_stops; rs != NULL; rs = rs->next) sta->truck_station.Add(rs->xy);
    00124     }
    00125
    00126     StationUpdateAnimTriggers(st);
    00127   }
    00128 }
    00129
    00133 void AfterLoadRoadStops()
    00134 {
    00135   /* First construct the drive through entries */
    00136   RoadStop *rs;
    00137   FOR_ALL_ROADSTOPS(rs) {
    00138     if (IsDriveThroughStopTile(rs->xy)) rs->MakeDriveThrough();
    00139   }
    00140   /* And then rebuild the data in those entries */
    00141   FOR_ALL_ROADSTOPS(rs) {
    00142     if (!HasBit(rs->status, RoadStop::RSSFB_BASE_ENTRY)) continue;
    00143
    00144     rs->GetEntry(DIAGDIR_NE)->Rebuild(rs);
    00145     rs->GetEntry(DIAGDIR_NW)->Rebuild(rs);
    00146   }
    00147 }
    00148
    00149 static const SaveLoad _roadstop_desc[] = {
    00150   SLE_VAR(RoadStop, xy,           SLE_UINT32),
    00151   SLE_CONDNULL(1, 0, 44),
    00152   SLE_VAR(RoadStop, status,       SLE_UINT8),
    00153   /* Index was saved in some versions, but this is not needed */
    00154   SLE_CONDNULL(4, 0, 8),
    00155   SLE_CONDNULL(2, 0, 44),
    00156   SLE_CONDNULL(1, 0, 25),
    00157
    00158   SLE_REF(RoadStop, next,         REF_ROADSTOPS),
    00159   SLE_CONDNULL(2, 0, 44),
    00160
    00161   SLE_CONDNULL(4, 0, 24),
    00162   SLE_CONDNULL(1, 25, 25),
    00163
    00164   SLE_END()
    00165 };
    00166
    00167 static const SaveLoad _old_station_desc[] = {
    00168   SLE_CONDVAR(Station, xy,                         SLE_FILE_U16 | SLE_VAR_U32,  0, 5),
    00169   SLE_CONDVAR(Station, xy,                         SLE_UINT32,                  6, SL_MAX_VERSION),
    00170   SLE_CONDNULL(4, 0, 5),
    00171   SLE_CONDVAR(Station, train_station.tile,         SLE_FILE_U16 | SLE_VAR_U32,  0, 5),
    00172   SLE_CONDVAR(Station, train_station.tile,         SLE_UINT32,                  6, SL_MAX_VERSION),
    00173   SLE_CONDVAR(Station, airport.tile,               SLE_FILE_U16 | SLE_VAR_U32,  0, 5),
    00174   SLE_CONDVAR(Station, airport.tile,               SLE_UINT32,                  6, SL_MAX_VERSION),
    00175   SLE_CONDVAR(Station, dock_tile,                  SLE_FILE_U16 | SLE_VAR_U32,  0, 5),
    00176   SLE_CONDVAR(Station, dock_tile,                  SLE_UINT32,                  6, SL_MAX_VERSION),
    00177       SLE_REF(Station, town,                       REF_TOWN),
    00178       SLE_VAR(Station, train_station.w,            SLE_FILE_U8 | SLE_VAR_U16),
    00179   SLE_CONDVAR(Station, train_station.h,            SLE_FILE_U8 | SLE_VAR_U16,   2, SL_MAX_VERSION),
    00180
    00181   SLE_CONDNULL(1, 0, 3),
    00182
    00183       SLE_VAR(Station, string_id,                  SLE_STRINGID),
    00184   SLE_CONDSTR(Station, name,                       SLE_STR | SLF_ALLOW_CONTROL, 0, 84, SL_MAX_VERSION),
    00185   SLE_CONDVAR(Station, indtype,                    SLE_UINT8,                 103, SL_MAX_VERSION),
    00186   SLE_CONDVAR(Station, had_vehicle_of_type,        SLE_FILE_U16 | SLE_VAR_U8,   0, 121),
    00187   SLE_CONDVAR(Station, had_vehicle_of_type,        SLE_UINT8,                 122, SL_MAX_VERSION),
    00188
    00189       SLE_VAR(Station, time_since_load,            SLE_UINT8),
    00190       SLE_VAR(Station, time_since_unload,          SLE_UINT8),
    00191       SLE_VAR(Station, delete_ctr,                 SLE_UINT8),
    00192       SLE_VAR(Station, owner,                      SLE_UINT8),
    00193       SLE_VAR(Station, facilities,                 SLE_UINT8),
    00194       SLE_VAR(Station, airport.type,               SLE_UINT8),
    00195
    00196   SLE_CONDNULL(2, 0, 5),
    00197   SLE_CONDNULL(1, 0, 4),
    00198
    00199   SLE_CONDVAR(Station, airport.flags,              SLE_VAR_U64 | SLE_FILE_U16,  0,  2),
    00200   SLE_CONDVAR(Station, airport.flags,              SLE_VAR_U64 | SLE_FILE_U32,  3, 45),
    00201   SLE_CONDVAR(Station, airport.flags,              SLE_UINT64,                 46, SL_MAX_VERSION),
    00202
    00203   SLE_CONDNULL(2, 0, 25),
    00204   SLE_CONDVAR(Station, last_vehicle_type,          SLE_UINT8,                  26, SL_MAX_VERSION),
    00205
    00206   SLE_CONDNULL(2, 3, 25),
    00207   SLE_CONDVAR(Station, build_date,                 SLE_FILE_U16 | SLE_VAR_I32,  3, 30),
    00208   SLE_CONDVAR(Station, build_date,                 SLE_INT32,                  31, SL_MAX_VERSION),
    00209
    00210   SLE_CONDREF(Station, bus_stops,                  REF_ROADSTOPS,               6, SL_MAX_VERSION),
    00211   SLE_CONDREF(Station, truck_stops,                REF_ROADSTOPS,               6, SL_MAX_VERSION),
    00212
    00213   /* Used by newstations for graphic variations */
    00214   SLE_CONDVAR(Station, random_bits,                SLE_UINT16,                 27, SL_MAX_VERSION),
    00215   SLE_CONDVAR(Station, waiting_triggers,           SLE_UINT8,                  27, SL_MAX_VERSION),
    00216   SLE_CONDVAR(Station, num_specs,                  SLE_UINT8,                  27, SL_MAX_VERSION),
    00217
    00218   SLE_CONDLST(Station, loading_vehicles,           REF_VEHICLE,                57, SL_MAX_VERSION),
    00219
    00220   /* reserve extra space in savegame here. (currently 32 bytes) */
    00221   SLE_CONDNULL(32, 2, SL_MAX_VERSION),
    00222
    00223   SLE_END()
    00224 };
    00225
    00226 static uint16 _waiting_acceptance;
    00227 static uint16 _num_links;
    00228 static uint32 _num_flows;
    00229 static uint16 _cargo_source;
    00230 static uint32 _cargo_source_xy;
    00231 static uint8  _cargo_days;
    00232 static Money  _cargo_feeder_share;
    00233
    00234 static const SaveLoad _station_speclist_desc[] = {
    00235   SLE_CONDVAR(StationSpecList, grfid,    SLE_UINT32, 27, SL_MAX_VERSION),
    00236   SLE_CONDVAR(StationSpecList, localidx, SLE_UINT8,  27, SL_MAX_VERSION),
    00237
    00238   SLE_END()
    00239 };
    00240
    00241 static StationID _station_id;
    00242
    00248 const SaveLoad *GetLinkStatDesc()
    00249 {
    00250   static const SaveLoad linkstat_desc[] = {
    00251     SLEG_VAR(          _station_id, SLE_UINT16),
    00252      SLE_VAR(LinkStat, length,      SLE_UINT32),
    00253      SLE_VAR(LinkStat, capacity,    SLE_UINT32),
    00254      SLE_VAR(LinkStat, timeout,     SLE_UINT32),
    00255      SLE_VAR(LinkStat, usage,       SLE_UINT32),
    00256      SLE_END()
    00257   };
    00258
    00259   return linkstat_desc;
    00260 }
    00261
    00262 std::list<CargoPacket *> _packets;
    00263 uint32 _num_dests;
    00264
    00265 struct FlowSaveLoad {
    00266   FlowSaveLoad() : via(0), share(0) {}
    00267   StationID source;
    00268   StationID via;
    00269   uint32 share;
    00270 };
    00271
    00272 static const SaveLoad _flow_desc[] = {
    00273   SLE_CONDVAR(FlowSaveLoad, source,             SLE_UINT16,         SL_FLOWMAP, SL_MAX_VERSION),
    00274   SLE_CONDVAR(FlowSaveLoad, via,                SLE_UINT16,         SL_FLOWMAP, SL_MAX_VERSION),
    00275   SLE_CONDVAR(FlowSaveLoad, share,              SLE_UINT32,         SL_FLOWMAP, SL_MAX_VERSION),
    00276   SLE_END()
    00277 };
    00278
    00284 const SaveLoad *GetGoodsDesc()
    00285 {
    00286   static const SaveLoad goods_desc[] = {
    00287     SLEG_CONDVAR(            _waiting_acceptance, SLE_UINT16,                  0, 67),
    00288      SLE_CONDVAR(GoodsEntry, acceptance_pickup,   SLE_UINT8,                  68, SL_MAX_VERSION),
    00289     SLE_CONDNULL(2,                                                           51, 67),
    00290          SLE_VAR(GoodsEntry, days_since_pickup,   SLE_UINT8),
    00291          SLE_VAR(GoodsEntry, rating,              SLE_UINT8),
    00292     SLEG_CONDVAR(            _cargo_source,       SLE_FILE_U8 | SLE_VAR_U16,   0, 6),
    00293     SLEG_CONDVAR(            _cargo_source,       SLE_UINT16,                  7, 67),
    00294     SLEG_CONDVAR(            _cargo_source_xy,    SLE_UINT32,                 44, 67),
    00295     SLEG_CONDVAR(            _cargo_days,         SLE_UINT8,                   0, 67),
    00296          SLE_VAR(GoodsEntry, last_speed,          SLE_UINT8),
    00297          SLE_VAR(GoodsEntry, last_age,            SLE_UINT8),
    00298     SLEG_CONDVAR(            _cargo_feeder_share, SLE_FILE_U32 | SLE_VAR_I64, 14, 64),
    00299     SLEG_CONDVAR(            _cargo_feeder_share, SLE_INT64,                  65, 67),
    00300      SLE_CONDVAR(GoodsEntry, amount_fract,        SLE_UINT8,                 150, SL_MAX_VERSION),
    00301     SLEG_CONDLST(            _packets,            REF_CARGO_PACKET,           68, SL_CARGOMAP - 1),
    00302     SLEG_CONDVAR(            _num_dests,          SLE_UINT32,        SL_CARGOMAP, SL_MAX_VERSION),
    00303      SLE_CONDVAR(GoodsEntry, supply,              SLE_UINT32,      SL_CAPACITIES, SL_MAX_VERSION),
    00304      SLE_CONDVAR(GoodsEntry, supply_new,          SLE_UINT32,      SL_CAPACITIES, SL_MAX_VERSION),
    00305     SLEG_CONDVAR(            _num_links,          SLE_UINT16,      SL_CAPACITIES, SL_MAX_VERSION),
    00306     SLEG_CONDVAR(            _num_flows,          SLE_UINT32,         SL_FLOWMAP, SL_MAX_VERSION),
    00307      SLE_CONDVAR(GoodsEntry, last_component,      SLE_UINT16,      SL_COMPONENTS, SL_MAX_VERSION),
    00308      SLE_CONDVAR(GoodsEntry, max_waiting_cargo,   SLE_UINT32,      SL_EXT_RATING, SL_MAX_VERSION),
    00309     SLE_END()
    00310   };
    00311
    00312   return goods_desc;
    00313 }
    00314
    00315 typedef std::pair<const StationID, std::list<CargoPacket *> > StationCargoPair;
    00316
    00317 static const SaveLoad _cargo_list_desc[] = {
    00318   SLE_VAR(StationCargoPair, first,  SLE_UINT16),
    00319   SLE_LST(StationCargoPair, second, REF_CARGO_PACKET),
    00320   SLE_END()
    00321 };
    00322
    00328 static void SwapPackets(GoodsEntry *ge)
    00329 {
    00330   StationCargoPacketMap &ge_packets = const_cast<StationCargoPacketMap &>(*ge->cargo.Packets());
    00331
    00332   if (_packets.empty()) {
    00333     std::map<StationID, std::list<CargoPacket *> >::iterator it(ge_packets.find(INVALID_STATION));
    00334     if (it == ge_packets.end()) {
    00335       return;
    00336     } else {
    00337       it->second.swap(_packets);
    00338     }
    00339   } else {
    00340     assert(ge_packets[INVALID_STATION].empty());
    00341     ge_packets[INVALID_STATION].swap(_packets);
    00342   }
    00343 }
    00344
    00345 static void Load_STNS()
    00346 {
    00347   int index;
    00348   while ((index = SlIterateArray()) != -1) {
    00349     Station *st = new (index) Station();
    00350
    00351     SlObject(st, _old_station_desc);
    00352
    00353     _waiting_acceptance = 0;
    00354
    00355     uint num_cargo = IsSavegameVersionBefore(55) ? 12 : NUM_CARGO;
    00356     for (CargoID i = 0; i < num_cargo; i++) {
    00357       GoodsEntry *ge = &st->goods[i];
    00358       SlObject(ge, GetGoodsDesc());
    00359       SwapPackets(ge);
    00360       if (IsSavegameVersionBefore(68)) {
    00361         SB(ge->acceptance_pickup, GoodsEntry::GES_ACCEPTANCE, 1, HasBit(_waiting_acceptance, 15));
    00362         if (GB(_waiting_acceptance, 0, 12) != 0) {
    00363           /* In old versions, enroute_from used 0xFF as INVALID_STATION */
    00364           StationID source = (IsSavegameVersionBefore(7) && _cargo_source == 0xFF) ? INVALID_STATION : _cargo_source;
    00365
    00366           /* Make sure we can allocate the CargoPacket. This is safe
    00367            * as there can only be ~64k stations and 32 cargoes in these
    00368            * savegame versions. As the CargoPacketPool has more than
    00369            * 16 million entries; it fits by an order of magnitude. */
    00370           assert(CargoPacket::CanAllocateItem());
    00371
    00372           /* Don't construct the packet with station here, because that'll fail with old savegames */
    00373           CargoPacket *cp = new CargoPacket(GB(_waiting_acceptance, 0, 12), _cargo_days, source, _cargo_source_xy, _cargo_source_xy, _cargo_feeder_share);
    00374           ge->cargo.Append(INVALID_STATION, cp);
    00375           SB(ge->acceptance_pickup, GoodsEntry::GES_PICKUP, 1, 1);
    00376         }
    00377       }
    00378     }
    00379
    00380     if (st->num_specs != 0) {
    00381       /* Allocate speclist memory when loading a game */
    00382       st->speclist = CallocT<StationSpecList>(st->num_specs);
    00383       for (uint i = 0; i < st->num_specs; i++) {
    00384         SlObject(&st->speclist[i], _station_speclist_desc);
    00385       }
    00386     }
    00387   }
    00388 }
    00389
    00390 static void Ptrs_STNS()
    00391 {
    00392   /* Don't run when savegame version is higher than or equal to 123. */
    00393   if (!IsSavegameVersionBefore(123)) return;
    00394
    00395   Station *st;
    00396   FOR_ALL_STATIONS(st) {
    00397     if (!IsSavegameVersionBefore(68)) {
    00398       for (CargoID i = 0; i < NUM_CARGO; i++) {
    00399         GoodsEntry *ge = &st->goods[i];
    00400         SwapPackets(ge);
    00401         SlObject(ge, GetGoodsDesc());
    00402         SwapPackets(ge);
    00403       }
    00404     }
    00405     SlObject(st, _old_station_desc);
    00406   }
    00407 }
    00408
    00409
    00410 static const SaveLoad _base_station_desc[] = {
    00411         SLE_VAR(BaseStation, xy,                     SLE_UINT32),
    00412         SLE_REF(BaseStation, town,                   REF_TOWN),
    00413         SLE_VAR(BaseStation, string_id,              SLE_STRINGID),
    00414         SLE_STR(BaseStation, name,                   SLE_STR | SLF_ALLOW_CONTROL, 0),
    00415         SLE_VAR(BaseStation, delete_ctr,             SLE_UINT8),
    00416         SLE_VAR(BaseStation, owner,                  SLE_UINT8),
    00417         SLE_VAR(BaseStation, facilities,             SLE_UINT8),
    00418         SLE_VAR(BaseStation, build_date,             SLE_INT32),
    00419
    00420   /* Used by newstations for graphic variations */
    00421         SLE_VAR(BaseStation, random_bits,            SLE_UINT16),
    00422         SLE_VAR(BaseStation, waiting_triggers,       SLE_UINT8),
    00423         SLE_VAR(BaseStation, num_specs,              SLE_UINT8),
    00424
    00425         SLE_END()
    00426 };
    00427
    00428 static OldPersistentStorage _old_st_persistent_storage;
    00429
    00430 static const SaveLoad _station_desc[] = {
    00431   SLE_WRITEBYTE(Station, facilities,                 FACIL_NONE),
    00432   SLE_ST_INCLUDE(),
    00433
    00434         SLE_VAR(Station, train_station.tile,         SLE_UINT32),
    00435         SLE_VAR(Station, train_station.w,            SLE_FILE_U8 | SLE_VAR_U16),
    00436         SLE_VAR(Station, train_station.h,            SLE_FILE_U8 | SLE_VAR_U16),
    00437
    00438         SLE_REF(Station, bus_stops,                  REF_ROADSTOPS),
    00439         SLE_REF(Station, truck_stops,                REF_ROADSTOPS),
    00440         SLE_VAR(Station, dock_tile,                  SLE_UINT32),
    00441         SLE_VAR(Station, airport.tile,               SLE_UINT32),
    00442     SLE_CONDVAR(Station, airport.w,                  SLE_FILE_U8 | SLE_VAR_U16, 140, SL_MAX_VERSION),
    00443     SLE_CONDVAR(Station, airport.h,                  SLE_FILE_U8 | SLE_VAR_U16, 140, SL_MAX_VERSION),
    00444         SLE_VAR(Station, airport.type,               SLE_UINT8),
    00445     SLE_CONDVAR(Station, airport.layout,             SLE_UINT8,                 145, SL_MAX_VERSION),
    00446         SLE_VAR(Station, airport.flags,              SLE_UINT64),
    00447     SLE_CONDVAR(Station, airport.rotation,           SLE_UINT8,                 145, SL_MAX_VERSION),
    00448    SLEG_CONDARR(_old_st_persistent_storage.storage,  SLE_UINT32, 16,            145, 160),
    00449     SLE_CONDREF(Station, airport.psa,                REF_STORAGE,               161, SL_MAX_VERSION),
    00450
    00451         SLE_VAR(Station, indtype,                    SLE_UINT8),
    00452
    00453         SLE_VAR(Station, time_since_load,            SLE_UINT8),
    00454         SLE_VAR(Station, time_since_unload,          SLE_UINT8),
    00455         SLE_VAR(Station, last_vehicle_type,          SLE_UINT8),
    00456         SLE_VAR(Station, had_vehicle_of_type,        SLE_UINT8),
    00457         SLE_LST(Station, loading_vehicles,           REF_VEHICLE),
    00458     SLE_CONDVAR(Station, always_accepted,            SLE_UINT32, 127, SL_MAX_VERSION),
    00459
    00460         SLE_END()
    00461 };
    00462
    00463 static const SaveLoad _waypoint_desc[] = {
    00464   SLE_WRITEBYTE(Waypoint, facilities,                FACIL_WAYPOINT),
    00465   SLE_ST_INCLUDE(),
    00466
    00467         SLE_VAR(Waypoint, town_cn,                   SLE_UINT16),
    00468
    00469     SLE_CONDVAR(Waypoint, train_station.tile,        SLE_UINT32,                  124, SL_MAX_VERSION),
    00470     SLE_CONDVAR(Waypoint, train_station.w,           SLE_FILE_U8 | SLE_VAR_U16,   124, SL_MAX_VERSION),
    00471     SLE_CONDVAR(Waypoint, train_station.h,           SLE_FILE_U8 | SLE_VAR_U16,   124, SL_MAX_VERSION),
    00472
    00473         SLE_END()
    00474 };
    00475
    00480 const SaveLoad *GetBaseStationDescription()
    00481 {
    00482   return _base_station_desc;
    00483 }
    00484
    00485 static void RealSave_STNN(BaseStation *bst)
    00486 {
    00487   bool waypoint = (bst->facilities & FACIL_WAYPOINT) != 0;
    00488   SlObject(bst, waypoint ? _waypoint_desc : _station_desc);
    00489
    00490   if (!waypoint) {
    00491     Station *st = Station::From(bst);
    00492     for (CargoID i = 0; i < NUM_CARGO; i++) {
    00493       _num_dests = (uint32)st->goods[i].cargo.Packets()->MapSize();
    00494       _num_links = (uint16)st->goods[i].link_stats.size();
    00495       _num_flows = 0;
    00496       for (FlowStatMap::const_iterator it(st->goods[i].flows.begin()); it != st->goods[i].flows.end(); ++it) {
    00497         _num_flows += (uint32)it->second.GetShares()->size();
    00498       }
    00499       SlObject(&st->goods[i], GetGoodsDesc());
    00500       for (LinkStatMap::const_iterator it(st->goods[i].link_stats.begin()); it != st->goods[i].link_stats.end(); ++it) {
    00501         _station_id = it->first;
    00502         LinkStat ls(it->second); // make a copy to avoid constness problems
    00503         SlObject(&ls, GetLinkStatDesc());
    00504       }
    00505       for (FlowStatMap::const_iterator outer_it(st->goods[i].flows.begin()); outer_it != st->goods[i].flows.end(); ++outer_it) {
    00506         const FlowStat::SharesMap *shares = outer_it->second.GetShares();
    00507         uint32 sum_shares = 0;
    00508         FlowSaveLoad flow;
    00509         flow.source = outer_it->first;
    00510         for (FlowStat::SharesMap::const_iterator inner_it(shares->begin()); inner_it != shares->end(); ++inner_it) {
    00511           flow.via = inner_it->second;
    00512           flow.share = inner_it->first - sum_shares;
    00513           sum_shares = inner_it->first;
    00514           assert(flow.share > 0);
    00515           SlObject(&flow, _flow_desc);
    00516         }
    00517       }
    00518       for (StationCargoPacketMap::ConstMapIterator it(st->goods[i].cargo.Packets()->begin()); it != st->goods[i].cargo.Packets()->end(); ++it) {
    00519         SlObject(const_cast<StationCargoPacketMap::value_type *>(&(*it)), _cargo_list_desc);
    00520       }
    00521     }
    00522   }
    00523
    00524   for (uint i = 0; i < bst->num_specs; i++) {
    00525     SlObject(&bst->speclist[i], _station_speclist_desc);
    00526   }
    00527 }
    00528
    00529 static void Save_STNN()
    00530 {
    00531   BaseStation *st;
    00532   /* Write the stations */
    00533   FOR_ALL_BASE_STATIONS(st) {
    00534     SlSetArrayIndex(st->index);
    00535     SlAutolength((AutolengthProc*)RealSave_STNN, st);
    00536   }
    00537 }
    00538
    00539 static void Load_STNN()
    00540 {
    00541   int index;
    00542
    00543   while ((index = SlIterateArray()) != -1) {
    00544     bool waypoint = (SlReadByte() & FACIL_WAYPOINT) != 0;
    00545
    00546     BaseStation *bst = waypoint ? (BaseStation *)new (index) Waypoint() : new (index) Station();
    00547     SlObject(bst, waypoint ? _waypoint_desc : _station_desc);
    00548
    00549     if (!waypoint) {
    00550       Station *st = Station::From(bst);
    00551
    00552       /* Before savegame version 161, persistent storages were not stored in a pool. */
    00553       if (IsSavegameVersionBefore(161) && !IsSavegameVersionBefore(145) && st->facilities & FACIL_AIRPORT) {
    00554         /* Store the old persistent storage. The GRFID will be added later. */
    00555         assert(PersistentStorage::CanAllocateItem());
    00556         st->airport.psa = new PersistentStorage(0);
    00557         memcpy(st->airport.psa->storage, _old_st_persistent_storage.storage, sizeof(st->airport.psa->storage));
    00558       }
    00559
    00560       for (CargoID i = 0; i < NUM_CARGO; i++) {
    00561         SlObject(&st->goods[i], GetGoodsDesc());
    00562         LinkStat ls(1);
    00563         for (uint16 j = 0; j < _num_links; ++j) {
    00564           SlObject(&ls, GetLinkStatDesc());
    00565           assert(ls.IsValid());
    00566           st->goods[i].link_stats.insert(std::make_pair(_station_id, ls));
    00567         }
    00568         FlowSaveLoad flow;
    00569         FlowStat *fs = NULL;
    00570         StationID prev_source = INVALID_STATION;
    00571         for (uint32 j = 0; j < _num_flows; ++j) {
    00572           SlObject(&flow, _flow_desc);
    00573           if (fs == NULL || prev_source != flow.source) {
    00574             fs = &(st->goods[i].flows.insert(std::make_pair(flow.source, FlowStat(flow.via, flow.share))).first->second);
    00575           } else {
    00576             fs->AddShare(flow.via, flow.share);
    00577           }
    00578           prev_source = flow.source;
    00579         }
    00580         if (IsSavegameVersionBefore(SL_CARGOMAP -1)) {
    00581           SwapPackets(&st->goods[i]);
    00582         } else {
    00583           StationCargoPair pair;
    00584           for (uint j = 0; j < _num_dests; ++j) {
    00585             SlObject(&pair, _cargo_list_desc);
    00586             const_cast<StationCargoPacketMap &>(*(st->goods[i].cargo.Packets()))[pair.first].swap(pair.second);
    00587             assert(pair.second.empty());
    00588           }
    00589         }
    00590       }
    00591     }
    00592
    00593     if (bst->num_specs != 0) {
    00594       /* Allocate speclist memory when loading a game */
    00595       bst->speclist = CallocT<StationSpecList>(bst->num_specs);
    00596       for (uint i = 0; i < bst->num_specs; i++) {
    00597         SlObject(&bst->speclist[i], _station_speclist_desc);
    00598       }
    00599     }
    00600   }
    00601 }
    00602
    00603 static void Ptrs_STNN()
    00604 {
    00605   /* Don't run when savegame version lower than 123. */
    00606   if (IsSavegameVersionBefore(123)) return;
    00607
    00608   Station *st;
    00609   FOR_ALL_STATIONS(st) {
    00610     for (CargoID i = 0; i < NUM_CARGO; i++) {
    00611       GoodsEntry *ge = &st->goods[i];
    00612       if (IsSavegameVersionBefore(SL_CARGOMAP)) {
    00613         SwapPackets(ge);
    00614         SlObject(ge, GetGoodsDesc());
    00615         SwapPackets(ge);
    00616       } else {
    00617         SlObject(ge, GetGoodsDesc());
    00618         for (StationCargoPacketMap::ConstMapIterator it = ge->cargo.Packets()->begin(); it != ge->cargo.Packets()->end(); ++it) {
    00619           SlObject(const_cast<StationCargoPair *>(&(*it)), _cargo_list_desc);
    00620         }
    00621       }
    00622     }
    00623     SlObject(st, _station_desc);
    00624   }
    00625
    00626   Waypoint *wp;
    00627   FOR_ALL_WAYPOINTS(wp) {
    00628     SlObject(wp, _waypoint_desc);
    00629   }
    00630 }
    00631
    00632 static void Save_ROADSTOP()
    00633 {
    00634   RoadStop *rs;
    00635
    00636   FOR_ALL_ROADSTOPS(rs) {
    00637     SlSetArrayIndex(rs->index);
    00638     SlObject(rs, _roadstop_desc);
    00639   }
    00640 }
    00641
    00642 static void Load_ROADSTOP()
    00643 {
    00644   int index;
    00645
    00646   while ((index = SlIterateArray()) != -1) {
    00647     RoadStop *rs = new (index) RoadStop(INVALID_TILE);
    00648
    00649     SlObject(rs, _roadstop_desc);
    00650   }
    00651 }
    00652
    00653 static void Ptrs_ROADSTOP()
    00654 {
    00655   RoadStop *rs;
    00656   FOR_ALL_ROADSTOPS(rs) {
    00657     SlObject(rs, _roadstop_desc);
    00658   }
    00659 }
    00660
    00661 extern const ChunkHandler _station_chunk_handlers[] = {
    00662   { 'STNS', NULL,          Load_STNS,     Ptrs_STNS,     NULL, CH_ARRAY },
    00663   { 'STNN', Save_STNN,     Load_STNN,     Ptrs_STNN,     NULL, CH_ARRAY },
    00664   { 'ROAD', Save_ROADSTOP, Load_ROADSTOP, Ptrs_ROADSTOP, NULL, CH_ARRAY | CH_LAST},
    00665 };