3 This file is part of R²C²
4 Copyright © 2006-2011 Mikkosoft Productions, Mikko Rasa
5 Distributed under the GPL
9 #include <msp/core/refptr.h>
10 #include <msp/datafile/parser.h>
11 #include <msp/datafile/writer.h>
12 #include <msp/io/print.h>
13 #include <msp/time/utils.h>
15 #include "catalogue.h"
20 #include "tracktype.h"
22 #include "vehicletype.h"
30 bool zone_order(const R2C2::Zone *z1, const R2C2::Zone *z2)
32 return z1->get_number()<z2->get_number();
40 Layout::Layout(Catalogue &c, Driver *d):
43 next_turnout_id(0x800)
46 driver->signal_sensor.connect(sigc::mem_fun(this, &Layout::sensor_event));
52 while(!trains.empty())
53 delete trains.begin()->second;
54 while(!routes.empty())
55 delete *routes.begin();
57 delete *zones.begin();
58 while(!tracks.empty())
59 delete *tracks.begin();
60 while(!blocks.empty())
61 delete *blocks.begin();
64 Driver &Layout::get_driver() const
67 throw InvalidState("No driver");
71 void Layout::add_track(Track &t)
73 if(tracks.insert(&t).second)
76 signal_track_added.emit(t);
80 void Layout::remove_track(Track &t)
85 signal_track_removed.emit(t);
89 Track *Layout::pick_track(const Vector &start, const Vector &ray)
91 for(set<Track *>::iterator i=tracks.begin(); i!=tracks.end(); ++i)
92 if((*i)->collide_ray(start, ray))
98 unsigned Layout::allocate_turnout_id()
100 set<unsigned> used_ids;
101 for(set<Track *>::const_iterator i=tracks.begin(); i!=tracks.end(); ++i)
102 if((*i)->get_turnout_id())
103 used_ids.insert((*i)->get_turnout_id());
105 unsigned result = next_turnout_id;
106 while(used_ids.count(result))
108 next_turnout_id = result+1;
113 void Layout::add_block(Block &b)
118 Block &Layout::get_block(unsigned id) const
120 for(set<Block *>::const_iterator i=blocks.begin(); i!=blocks.end(); ++i)
121 if((*i)->get_id()==id)
124 throw KeyError("Unknown block", lexical_cast(id));
127 void Layout::create_blocks()
129 set<Track *> used_tracks;
130 for(set<Block *>::const_iterator i=blocks.begin(); i!=blocks.end(); ++i)
132 const set<Track *> &btracks = (*i)->get_tracks();
133 used_tracks.insert(btracks.begin(), btracks.end());
136 for(set<Track *>::const_iterator i=tracks.begin(); i!=tracks.end(); ++i)
137 if(used_tracks.count(*i)==0)
139 Block *block = new Block(*this, **i);
140 used_tracks.insert(block->get_tracks().begin(), block->get_tracks().end());
143 for(set<Block *>::iterator i=blocks.begin(); i!=blocks.end(); ++i)
144 for(set<Block *>::iterator j=i; j!=blocks.end(); ++j)
146 (*i)->check_link(**j);
149 void Layout::create_blocks(Track &track)
151 /* Must collect the blocks in a set first while all tracks are still
152 guaranteed to have blocks and to avoid duplicate deletes */
153 set<Block *> del_blocks;
155 del_blocks.insert(&track.get_block());
157 const vector<Track *> &links = track.get_links();
158 for(vector<Track *>::const_iterator i=links.begin(); i!=links.end(); ++i)
160 del_blocks.insert(&(*i)->get_block());
162 for(set<Block *>::iterator i=del_blocks.begin(); i!=del_blocks.end(); ++i)
168 void Layout::remove_block(Block &b)
173 void Layout::add_route(Route &r)
175 if(routes.insert(&r).second)
176 signal_route_added.emit(r);
179 Route &Layout::get_route(const string &name) const
181 for(set<Route *>::const_iterator i=routes.begin(); i!=routes.end(); ++i)
182 if((*i)->get_name()==name)
184 throw KeyError("Unknown route", name);
187 void Layout::update_routes()
189 for(set<Route *>::iterator i=routes.begin(); i!=routes.end(); ++i)
190 (*i)->update_turnouts();
193 void Layout::remove_route(Route &r)
196 signal_route_removed.emit(r);
199 void Layout::add_zone(Zone &z)
201 if(zones.insert(&z).second)
202 signal_zone_added.emit(z);
205 Layout::ZoneArray Layout::get_zones(const string &group) const
208 for(ZoneSet::const_iterator i=zones.begin(); i!=zones.end(); ++i)
209 if((*i)->get_group()==group)
210 result.push_back(*i);
212 sort(result.begin(), result.end(), zone_order);
217 Zone &Layout::get_zone(const string &group, unsigned num) const
219 for(ZoneSet::const_iterator i=zones.begin(); i!=zones.end(); ++i)
220 if((*i)->get_group()==group && (*i)->get_number()==num)
223 throw KeyError("Unknown zone", format("%s %d", group, num));
226 void Layout::remove_zone(Zone &z)
229 signal_zone_removed.emit(z);
232 void Layout::add_train(Train &t)
234 if(trains.count(t.get_address()))
235 throw KeyError("Duplicate train address", lexical_cast(t.get_address()));
237 trains[t.get_address()] = &t;
238 signal_train_added.emit(t);
241 Train &Layout::get_train(unsigned addr) const
243 map<unsigned, Train *>::const_iterator i = trains.find(addr);
245 throw KeyError("Unknown train", lexical_cast(addr));
249 void Layout::remove_train(Train &t)
251 if(trains.erase(t.get_address()))
252 signal_train_removed.emit(t);
255 void Layout::add_vehicle(Vehicle &v)
257 if(vehicles.insert(&v).second)
258 signal_vehicle_added.emit(v);
261 void Layout::remove_vehicle(Vehicle &v)
263 if(vehicles.erase(&v))
264 signal_vehicle_removed.emit(v);
272 Time::TimeStamp t = Time::now();
278 for(map<unsigned, Train *>::iterator i=trains.begin(); i!=trains.end(); ++i)
279 i->second->tick(t, dt);
282 void Layout::emergency(const string &msg)
286 IO::print("Emergency: %s\n", msg);
287 signal_emergency.emit(msg);
290 void Layout::save(const string &fn) const
292 IO::BufferedFile out(fn, IO::M_WRITE);
293 DataFile::Writer writer(out);
296 writer.write((DataFile::Statement("base"), base));
298 for(set<Track *>::const_iterator i=tracks.begin(); i!=tracks.end(); ++i)
300 DataFile::Statement st("track");
301 st.append((*i)->get_type().get_article_number());
306 for(set<Route *>::const_iterator i=routes.begin(); i!=routes.end(); ++i)
308 if((*i)->is_temporary())
311 DataFile::Statement st("route");
316 for(ZoneSet::const_iterator i=zones.begin(); i!=zones.end(); ++i)
318 DataFile::Statement st("zone");
324 void Layout::save_dynamic(const string &fn) const
326 IO::BufferedFile out(fn, IO::M_WRITE);
327 DataFile::Writer writer(out);
329 for(set<Track *>::const_iterator i=tracks.begin(); i!=tracks.end(); ++i)
330 if(unsigned tid = (*i)->get_turnout_id())
331 writer.write((DataFile::Statement("turnout"), tid, (*i)->get_active_path()));
333 for(map<unsigned, Train *>::const_iterator i=trains.begin(); i!=trains.end(); ++i)
335 DataFile::Statement st("train");
336 st.append(i->second->get_locomotive_type().get_article_number());
337 st.append(i->second->get_address());
338 st.append(i->second->get_protocol());
339 i->second->save(st.sub);
344 void Layout::sensor_event(unsigned addr, bool state)
348 for(set<Block *>::iterator i=blocks.begin(); i!=blocks.end(); ++i)
349 if((*i)->get_sensor_id()==addr)
351 if(!(*i)->get_train())
352 emergency(format("Unreserved sensor %d triggered", addr));
359 Layout::Loader::Loader(Layout &l):
360 DataFile::BasicLoader<Layout>(l),
363 add("base", &Layout::base);
364 add("route", static_cast<void (Loader::*)()>(&Loader::route));
365 add("track", static_cast<void (Loader::*)(ArticleNumber)>(&Loader::track));
366 add("train", static_cast<void (Loader::*)(ArticleNumber, unsigned, const std::string &)>(&Loader::train));
367 add("turnout", &Loader::turnout);
368 add("zone", &Loader::zone);
370 // Deprecated aliases
371 add("route", static_cast<void (Loader::*)(const string &)>(&Loader::route));
372 add("track", static_cast<void (Loader::*)(unsigned)>(&Loader::track));
373 add("train", static_cast<void (Loader::*)(unsigned, unsigned, const std::string &)>(&Loader::train));
376 void Layout::Loader::finish()
378 for(set<Track *>::iterator i=obj.tracks.begin(); i!=obj.tracks.end(); ++i)
382 void Layout::Loader::route()
384 Route *rte = new Route(obj);
388 void Layout::Loader::route(const string &n)
390 Route *rte = new Route(obj);
395 void Layout::Loader::track(unsigned art_nr)
397 track(ArticleNumber(art_nr));
400 void Layout::Loader::track(ArticleNumber art_nr)
402 Track *trk = new Track(obj, obj.catalogue.get_track(art_nr));
405 for(set<Track *>::iterator i=obj.tracks.begin(); i!=obj.tracks.end(); ++i)
407 trk->snap_to(**i, true);
410 void Layout::Loader::train(unsigned art_nr, unsigned addr, const std::string &proto)
412 train(ArticleNumber(art_nr), addr, proto);
415 void Layout::Loader::train(ArticleNumber art_nr, unsigned addr, const std::string &proto)
417 Train *trn = new Train(obj, obj.catalogue.get_vehicle(art_nr), addr, proto);
421 void Layout::Loader::turnout(unsigned addr, unsigned path)
424 obj.driver->set_turnout(addr, path);
427 void Layout::Loader::zone()
429 Zone *zne = new Zone(obj);