2 #include <msp/core/maputils.h>
3 #include <msp/core/refptr.h>
4 #include <msp/datafile/parser.h>
5 #include <msp/datafile/writer.h>
6 #include <msp/io/print.h>
7 #include <msp/time/utils.h>
10 #include "catalogue.h"
15 #include "signaltype.h"
18 #include "trackcircuit.h"
19 #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_addr(0x800)
53 while(!trains.empty())
54 delete trains.begin()->second;
55 track_chains.del<Route>();
56 track_chains.del<Zone>();
57 objects.del<Signal>();
59 track_chains.del<Block>();
62 Driver &Layout::get_driver() const
65 throw logic_error("!driver");
69 void Layout::add(Object &o)
72 signal_object_added.emit(o);
75 void Layout::add(Track &t)
79 // Blocks must be recreated first
81 signal_object_added.emit(t);
85 void Layout::add(TrackChain &g)
87 if(track_chains.insert(g))
88 signal_track_chain_added.emit(g);
91 void Layout::add(Block &b)
93 if(track_chains.insert(b))
95 b.signal_reserved.connect(sigc::bind<0>(signal_block_reserved, sigc::ref(b)));
96 signal_track_chain_added.emit(b);
100 void Layout::add(Sensor &s)
102 if(sensors.insert(s))
104 s.signal_state_changed.connect(sigc::bind<0>(sigc::mem_fun(this, &Layout::sensor_state_changed), sigc::ref(s)));
105 s.signal_state_changed.connect(sigc::bind<0>(signal_sensor_state_changed, sigc::ref(s)));
109 void Layout::add(BeamGate &g)
111 add(static_cast<Object &>(g));
112 add(static_cast<Sensor &>(g));
116 const set<Object *> &Layout::get_all<Object>() const
118 return objects.get();
122 const set<Track *> &Layout::get_all<Track>() const
124 return objects.get<Track>();
128 const set<Signal *> &Layout::get_all<Signal>() const
130 return objects.get<Signal>();
134 const set<Vehicle *> &Layout::get_all<Vehicle>() const
136 return objects.get<Vehicle>();
140 const set<Terrain *> &Layout::get_all<Terrain>() const
142 return objects.get<Terrain>();
146 const set<TrackChain *> &Layout::get_all<TrackChain>() const
148 return track_chains.get();
152 const set<Block *> &Layout::get_all<Block>() const
154 return track_chains.get<Block>();
158 const set<Route *> &Layout::get_all<Route>() const
160 return track_chains.get<Route>();
164 const set<Zone *> &Layout::get_all<Zone>() const
166 return track_chains.get<Zone>();
170 const set<Sensor *> &Layout::get_all<Sensor>() const
172 return sensors.get<Sensor>();
176 const set<TrackCircuit *> &Layout::get_all<TrackCircuit>() const
178 return sensors.get<TrackCircuit>();
182 const set<BeamGate *> &Layout::get_all<BeamGate>() const
184 return sensors.get<BeamGate>();
188 T *Layout::pick(const Ray &ray)
190 const set<Object *> &objs = objects.get();
193 for(set<Object *>::const_iterator i=objs.begin(); i!=objs.end(); ++i)
194 if(T *t = dynamic_cast<T *>(*i))
197 if(t->collide_ray(ray, &d))
198 if(!closest || d<distance)
208 template Object *Layout::pick<Object>(const Ray &);
209 template Track *Layout::pick<Track>(const Ray &);
210 template Signal *Layout::pick<Signal>(const Ray &);
211 template Vehicle *Layout::pick<Vehicle>(const Ray &);
213 void Layout::remove(Object &o)
216 signal_object_removed.emit(o);
219 void Layout::remove(Track &t)
223 // Blocks must be recreated first
225 signal_object_removed.emit(t);
229 void Layout::remove(TrackChain &g)
231 if(track_chains.erase(g))
232 signal_track_chain_removed.emit(g);
235 void Layout::remove(Sensor &s)
240 void Layout::remove(BeamGate &g)
242 remove(static_cast<Object &>(g));
243 remove(static_cast<Sensor &>(g));
246 unsigned Layout::allocate_turnout_address()
248 set<unsigned> used_addrs;
249 const set<Track *> &tracks = objects.get<Track>();
250 for(set<Track *>::const_iterator i=tracks.begin(); i!=tracks.end(); ++i)
251 if((*i)->get_type().is_turnout())
252 used_addrs.insert((*i)->get_turnout_address());
254 unsigned result = next_turnout_addr;
255 while(used_addrs.count(result))
257 next_turnout_addr = result+1;
262 Block &Layout::get_block(unsigned id) const
264 const set<Block *> &blocks = track_chains.get<Block>();
265 for(set<Block *>::const_iterator i=blocks.begin(); i!=blocks.end(); ++i)
266 if((*i)->get_id()==id)
272 void Layout::create_blocks()
274 set<Track *> loose_tracks = objects.get<Track>();
275 const set<Block *> *blocks = &track_chains.get<Block>();
276 for(set<Block *>::const_iterator i=blocks->begin(); i!=blocks->end(); ++i)
278 const set<Track *> &btracks = (*i)->get_tracks();
279 for(set<Track *>::const_iterator j=btracks.begin(); j!=btracks.end(); ++j)
280 loose_tracks.erase(*j);
283 list<Block *> created_blocks;
284 while(!loose_tracks.empty())
286 Block *block = new Block(*this, **loose_tracks.begin());
287 created_blocks.push_back(block);
289 const set<Track *> &btracks = block->get_tracks();
290 for(set<Track *>::const_iterator i=btracks.begin(); i!=btracks.end(); ++i)
291 loose_tracks.erase(*i);
294 // The previously obtained set has been invalidated by creating new blocks
295 blocks = &track_chains.get<Block>();
296 for(list<Block *>::iterator i=created_blocks.begin(); i!=created_blocks.end(); ++i)
297 for(set<Block *>::const_iterator j=blocks->begin(); j!=blocks->end(); ++j)
299 (*i)->check_link(**j);
302 void Layout::create_blocks(Track &track)
304 /* Must collect the blocks in a set first while all tracks are still
305 guaranteed to have blocks and to avoid duplicate deletes */
306 set<Block *> del_blocks;
308 del_blocks.insert(&track.get_block());
310 const vector<Track *> &links = track.get_links();
311 for(vector<Track *>::const_iterator i=links.begin(); i!=links.end(); ++i)
313 del_blocks.insert(&(*i)->get_block());
315 for(set<Block *>::iterator i=del_blocks.begin(); i!=del_blocks.end(); ++i)
321 Route &Layout::get_route(const string &name) const
323 const set<Route *> &routes = track_chains.get<Route>();
324 for(set<Route *>::const_iterator i=routes.begin(); i!=routes.end(); ++i)
325 if((*i)->get_name()==name)
327 throw key_error(name);
330 void Layout::update_routes()
332 const set<Route *> &routes = track_chains.get<Route>();
333 for(set<Route *>::iterator i=routes.begin(); i!=routes.end(); ++i)
334 (*i)->update_turnouts();
337 Layout::ZoneArray Layout::get_zones(const string &group) const
340 const set<Zone *> &zones = track_chains.get<Zone>();
341 for(set<Zone *>::const_iterator i=zones.begin(); i!=zones.end(); ++i)
342 if((*i)->get_group()==group)
343 result.push_back(*i);
345 sort(result.begin(), result.end(), zone_order);
350 Zone &Layout::get_zone(const string &group, unsigned num) const
352 const set<Zone *> &zones = track_chains.get<Zone>();
353 for(set<Zone *>::const_iterator i=zones.begin(); i!=zones.end(); ++i)
354 if((*i)->get_group()==group && (*i)->get_number()==num)
357 throw key_error(format("%s %d", group, num));
360 void Layout::add_train(Train &t)
362 insert_unique(trains, t.get_address(), &t);
363 signal_train_added.emit(t);
366 Train &Layout::get_train(unsigned addr) const
368 return *get_item(trains, addr);
371 void Layout::remove_train(Train &t)
373 if(trains.erase(t.get_address()))
374 signal_train_removed.emit(t);
382 Time::TimeStamp t = Time::now();
388 if(!driver || !driver->is_halted())
391 for(set<Sensor *>::iterator i=sensors.get().begin(); i!=sensors.get().end(); ++i)
393 const set<Signal *> &signals = objects.get<Signal>();
394 for(set<Signal *>::iterator i=signals.begin(); i!=signals.end(); ++i)
396 for(map<unsigned, Train *>::iterator i=trains.begin(); i!=trains.end(); ++i)
400 void Layout::emergency(Block *block, const string &msg)
405 IO::print("Emergency at %s: %s\n", block->get_name(), msg);
407 IO::print("Emergency: %s\n", msg);
408 signal_emergency.emit(block, msg);
411 void Layout::save(const string &fn) const
413 IO::BufferedFile out(fn, IO::M_WRITE);
414 DataFile::Writer writer(out);
417 writer.write((DataFile::Statement("base"), base));
419 const set<Track *> &tracks = objects.get<Track>();
420 for(set<Track *>::const_iterator i=tracks.begin(); i!=tracks.end(); ++i)
422 DataFile::Statement st("track");
423 st.append((*i)->get_type().get_article_number());
428 const set<Signal *> &signals = objects.get<Signal>();
429 for(set<Signal *>::const_iterator i=signals.begin(); i!=signals.end(); ++i)
431 DataFile::Statement st("signal");
432 st.append((*i)->get_type().get_article_number());
437 const set<Terrain *> &terrains = objects.get<Terrain>();
438 for(set<Terrain *>::const_iterator i=terrains.begin(); i!=terrains.end(); ++i)
440 DataFile::Statement st("terrain");
441 st.append((*i)->get_type().get_article_number());
446 const set<BeamGate *> &gates = objects.get<BeamGate>();
447 for(set<BeamGate *>::const_iterator i=gates.begin(); i!=gates.end(); ++i)
449 DataFile::Statement st("beamgate");
454 const set<Route *> &routes = track_chains.get<Route>();
455 for(set<Route *>::const_iterator i=routes.begin(); i!=routes.end(); ++i)
457 if((*i)->is_temporary())
460 DataFile::Statement st("route");
465 const set<Zone *> &zones = track_chains.get<Zone>();
466 for(set<Zone *>::const_iterator i=zones.begin(); i!=zones.end(); ++i)
468 DataFile::Statement st("zone");
474 void Layout::save_dynamic(const string &fn) const
476 IO::BufferedFile out(fn, IO::M_WRITE);
477 DataFile::Writer writer(out);
480 DataFile::Statement st("clock");
485 const set<Track *> &tracks = objects.get<Track>();
486 for(set<Track *>::const_iterator i=tracks.begin(); i!=tracks.end(); ++i)
487 if((*i)->get_type().is_turnout())
488 writer.write((DataFile::Statement("turnout"), (*i)->get_turnout_address(), (*i)->get_active_path()));
490 for(map<unsigned, Train *>::const_iterator i=trains.begin(); i!=trains.end(); ++i)
492 DataFile::Statement st("train");
493 st.append(i->second->get_locomotive_type().get_article_number());
494 st.append(i->second->get_address());
495 st.append(i->second->get_protocol());
496 i->second->save(st.sub);
501 void Layout::sensor_state_changed(Sensor &sensor, Sensor::State state)
503 if(state==Sensor::ACTIVE)
505 Block *block = sensor.get_block();
506 if(block && !block->get_train())
507 emergency(block, "Unreserved sensor triggered");
513 Layout::Storage<B>::~Storage()
516 delete *base.begin();
520 bool Layout::Storage<B>::insert(B &b)
522 bool result = base.insert(&b).second;
529 bool Layout::Storage<B>::erase(B &b)
531 bool result = base.erase(&b);
539 const set<T *> &Layout::Storage<B>::get() const
541 for(list<Variant>::const_iterator i=caches.begin(); i!=caches.end(); ++i)
542 if(i->check_type<set<T *> >())
543 return i->value<set<T *> >();
545 caches.push_back(set<T *>());
546 set<T *> &result = caches.back().value<set<T *> >();
547 for(typename set<B *>::const_iterator i=base.begin(); i!=base.end(); ++i)
548 if(T *t = dynamic_cast<T *>(*i))
556 void Layout::Storage<B>::del()
558 set<T *> ts = get<T>();
559 for(typename set<T *>::iterator i=ts.begin(); i!=ts.end(); ++i)
565 Layout::Loader::Loader(Layout &l):
566 DataFile::ObjectLoader<Layout>(l)
568 add("base", &Layout::base);
569 add("beamgate", &Loader::beamgate);
570 add("clock", &Loader::clock);
571 add("route", &Loader::route);
572 add("signal", &Loader::signal);
573 add("terrain", &Loader::terrain);
574 add("track", &Loader::track);
575 add("train", &Loader::train);
576 add("turnout", &Loader::turnout);
577 add("zone", &Loader::zone);
580 void Layout::Loader::beamgate()
582 BeamGate *gate = new BeamGate(obj);
586 void Layout::Loader::clock()
591 void Layout::Loader::route()
593 Route *rte = new Route(obj);
597 void Layout::Loader::signal(ArticleNumber art_nr)
599 Signal *sig = new Signal(obj, obj.catalogue.get<SignalType>(art_nr));
603 void Layout::Loader::terrain(ArticleNumber art_nr)
605 Terrain *ter = new Terrain(obj, obj.catalogue.get<TerrainType>(art_nr));
609 void Layout::Loader::track(ArticleNumber art_nr)
611 Track *trk = new Track(obj, obj.catalogue.get<TrackType>(art_nr));
613 const set<Track *> &tracks = obj.objects.get<Track>();
614 for(set<Track *>::const_iterator i=tracks.begin(); i!=tracks.end(); ++i)
619 void Layout::Loader::train(ArticleNumber art_nr, unsigned addr, const std::string &proto)
621 Train *trn = new Train(obj, obj.catalogue.get<VehicleType>(art_nr), addr, proto);
625 void Layout::Loader::turnout(unsigned addr, unsigned path)
628 obj.driver->set_turnout(addr, path);
631 void Layout::Loader::zone()
633 Zone *zne = new Zone(obj);