2 #include <msp/core/maputils.h>
3 #include <msp/core/raii.h>
4 #include <msp/core/refptr.h>
5 #include <msp/datafile/parser.h>
6 #include <msp/datafile/writer.h>
7 #include <msp/io/print.h>
8 #include <msp/time/utils.h>
11 #include "catalogue.h"
16 #include "signaltype.h"
19 #include "trackcircuit.h"
20 #include "tracktype.h"
23 #include "vehicletype.h"
31 bool zone_order(const R2C2::Zone *z1, const R2C2::Zone *z2)
33 return z1->get_number()<z2->get_number();
41 Layout::Layout(Catalogue &c, Driver *d):
44 next_turnout_addr(0x800)
54 while(!trains.empty())
55 delete trains.begin()->second;
56 track_chains.del<Route>();
57 track_chains.del<Zone>();
58 objects.del<Signal>();
60 track_chains.del<Block>();
63 Driver &Layout::get_driver() const
66 throw logic_error("!driver");
70 void Layout::add(Object &o)
76 signal_object_added.emit(o);
86 void Layout::add(Track &t)
92 // Blocks must be recreated first
94 signal_object_added.emit(t);
105 void Layout::add(TrackChain &g)
107 if(track_chains.insert(g))
111 signal_track_chain_added.emit(g);
115 track_chains.erase(g);
121 void Layout::add(Block &b)
123 if(track_chains.insert(b))
125 sigc::connection conn = b.signal_reserved.connect(sigc::bind<0>(signal_block_reserved, sigc::ref(b)));
128 signal_track_chain_added.emit(b);
132 track_chains.erase(b);
139 void Layout::add(Sensor &s)
141 if(sensors.insert(s))
143 s.signal_state_changed.connect(sigc::bind<0>(sigc::mem_fun(this, &Layout::sensor_state_changed), sigc::ref(s)));
144 s.signal_state_changed.connect(sigc::bind<0>(signal_sensor_state_changed, sigc::ref(s)));
148 void Layout::add(BeamGate &g)
150 add(static_cast<Object &>(g));
151 add(static_cast<Sensor &>(g));
155 const set<Object *> &Layout::get_all<Object>() const
157 return objects.get();
161 const set<Track *> &Layout::get_all<Track>() const
163 return objects.get<Track>();
167 const set<Signal *> &Layout::get_all<Signal>() const
169 return objects.get<Signal>();
173 const set<Vehicle *> &Layout::get_all<Vehicle>() const
175 return objects.get<Vehicle>();
179 const set<Terrain *> &Layout::get_all<Terrain>() const
181 return objects.get<Terrain>();
185 const set<TrackChain *> &Layout::get_all<TrackChain>() const
187 return track_chains.get();
191 const set<Block *> &Layout::get_all<Block>() const
193 return track_chains.get<Block>();
197 const set<Route *> &Layout::get_all<Route>() const
199 return track_chains.get<Route>();
203 const set<Zone *> &Layout::get_all<Zone>() const
205 return track_chains.get<Zone>();
209 const set<Sensor *> &Layout::get_all<Sensor>() const
211 return sensors.get<Sensor>();
215 const set<TrackCircuit *> &Layout::get_all<TrackCircuit>() const
217 return sensors.get<TrackCircuit>();
221 const set<BeamGate *> &Layout::get_all<BeamGate>() const
223 return sensors.get<BeamGate>();
227 T *Layout::pick(const Ray &ray)
229 const set<Object *> &objs = objects.get();
232 for(set<Object *>::const_iterator i=objs.begin(); i!=objs.end(); ++i)
233 if(T *t = dynamic_cast<T *>(*i))
236 if(t->collide_ray(ray, &d))
237 if(!closest || d<distance)
247 template Object *Layout::pick<Object>(const Ray &);
248 template Track *Layout::pick<Track>(const Ray &);
249 template Signal *Layout::pick<Signal>(const Ray &);
250 template Vehicle *Layout::pick<Vehicle>(const Ray &);
252 void Layout::remove(Object &o)
255 signal_object_removed.emit(o);
258 void Layout::remove(Track &t)
262 // Blocks must be recreated first
264 signal_object_removed.emit(t);
268 void Layout::remove(TrackChain &g)
270 if(track_chains.erase(g))
271 signal_track_chain_removed.emit(g);
274 void Layout::remove(Sensor &s)
279 void Layout::remove(BeamGate &g)
281 remove(static_cast<Object &>(g));
282 remove(static_cast<Sensor &>(g));
285 unsigned Layout::allocate_turnout_address()
287 set<unsigned> used_addrs;
288 const set<Track *> &tracks = objects.get<Track>();
289 for(set<Track *>::const_iterator i=tracks.begin(); i!=tracks.end(); ++i)
290 if((*i)->get_type().is_turnout())
291 used_addrs.insert((*i)->get_turnout_address());
293 unsigned result = next_turnout_addr;
294 while(used_addrs.count(result))
296 next_turnout_addr = result+1;
301 Block &Layout::get_block(unsigned id) const
303 const set<Block *> &blocks = track_chains.get<Block>();
304 for(set<Block *>::const_iterator i=blocks.begin(); i!=blocks.end(); ++i)
305 if((*i)->get_id()==id)
311 void Layout::create_blocks()
313 set<Track *> loose_tracks = objects.get<Track>();
314 const set<Block *> *blocks = &track_chains.get<Block>();
315 for(set<Block *>::const_iterator i=blocks->begin(); i!=blocks->end(); ++i)
317 const set<Track *> &btracks = (*i)->get_tracks();
318 for(set<Track *>::const_iterator j=btracks.begin(); j!=btracks.end(); ++j)
319 loose_tracks.erase(*j);
322 list<Block *> created_blocks;
323 while(!loose_tracks.empty())
325 Block *block = new Block(*this, **loose_tracks.begin());
326 created_blocks.push_back(block);
328 const set<Track *> &btracks = block->get_tracks();
329 for(set<Track *>::const_iterator i=btracks.begin(); i!=btracks.end(); ++i)
330 loose_tracks.erase(*i);
333 // The previously obtained set has been invalidated by creating new blocks
334 blocks = &track_chains.get<Block>();
335 for(list<Block *>::iterator i=created_blocks.begin(); i!=created_blocks.end(); ++i)
336 for(set<Block *>::const_iterator j=blocks->begin(); j!=blocks->end(); ++j)
338 (*i)->check_link(**j);
341 void Layout::create_blocks(Track &track)
343 /* Must collect the blocks in a set first while all tracks are still
344 guaranteed to have blocks and to avoid duplicate deletes */
345 set<Block *> del_blocks;
347 del_blocks.insert(&track.get_block());
349 const vector<Track *> &links = track.get_links();
350 for(vector<Track *>::const_iterator i=links.begin(); i!=links.end(); ++i)
352 del_blocks.insert(&(*i)->get_block());
354 for(set<Block *>::iterator i=del_blocks.begin(); i!=del_blocks.end(); ++i)
360 Route &Layout::get_route(const string &name) const
362 const set<Route *> &routes = track_chains.get<Route>();
363 for(set<Route *>::const_iterator i=routes.begin(); i!=routes.end(); ++i)
364 if((*i)->get_name()==name)
366 throw key_error(name);
369 void Layout::update_routes()
371 const set<Route *> &routes = track_chains.get<Route>();
372 for(set<Route *>::iterator i=routes.begin(); i!=routes.end(); ++i)
373 (*i)->update_turnouts();
376 Layout::ZoneArray Layout::get_zones(const string &group) const
379 const set<Zone *> &zones = track_chains.get<Zone>();
380 for(set<Zone *>::const_iterator i=zones.begin(); i!=zones.end(); ++i)
381 if((*i)->get_group()==group)
382 result.push_back(*i);
384 sort(result.begin(), result.end(), zone_order);
389 Zone &Layout::get_zone(const string &group, unsigned num) const
391 const set<Zone *> &zones = track_chains.get<Zone>();
392 for(set<Zone *>::const_iterator i=zones.begin(); i!=zones.end(); ++i)
393 if((*i)->get_group()==group && (*i)->get_number()==num)
396 throw key_error(format("%s %d", group, num));
399 void Layout::add_train(Train &t)
401 insert_unique(trains, t.get_address(), &t);
402 signal_train_added.emit(t);
405 Train &Layout::get_train(unsigned addr) const
407 return *get_item(trains, addr);
410 void Layout::remove_train(Train &t)
412 if(trains.erase(t.get_address()))
413 signal_train_removed.emit(t);
416 void Layout::tick(float speed)
421 Time::TimeStamp t = Time::now();
428 unsigned count = dt/(10*Time::msec)+1;
434 void Layout::step(const Time::TimeDelta &dt)
436 if(!driver || !driver->is_halted())
439 for(set<Sensor *>::iterator i=sensors.get().begin(); i!=sensors.get().end(); ++i)
441 const set<Signal *> &signals = objects.get<Signal>();
442 for(set<Signal *>::iterator i=signals.begin(); i!=signals.end(); ++i)
444 for(map<unsigned, Train *>::iterator i=trains.begin(); i!=trains.end(); ++i)
448 void Layout::emergency(Block *block, const string &msg)
453 IO::print("Emergency at %s: %s\n", block->get_name(), msg);
455 IO::print("Emergency: %s\n", msg);
456 signal_emergency.emit(block, msg);
459 void Layout::save(const string &fn) const
461 IO::BufferedFile out(fn, IO::M_WRITE);
462 DataFile::Writer writer(out);
465 writer.write((DataFile::Statement("base"), base));
467 const set<Track *> &tracks = objects.get<Track>();
468 for(set<Track *>::const_iterator i=tracks.begin(); i!=tracks.end(); ++i)
470 DataFile::Statement st("track");
471 st.append(catalogue.get_name(&(*i)->get_type()));
476 const set<Signal *> &signals = objects.get<Signal>();
477 for(set<Signal *>::const_iterator i=signals.begin(); i!=signals.end(); ++i)
479 DataFile::Statement st("signal");
480 st.append(catalogue.get_name(&(*i)->get_type()));
485 const set<Terrain *> &terrains = objects.get<Terrain>();
486 for(set<Terrain *>::const_iterator i=terrains.begin(); i!=terrains.end(); ++i)
488 DataFile::Statement st("terrain");
489 st.append(catalogue.get_name(&(*i)->get_type()));
494 const set<BeamGate *> &gates = objects.get<BeamGate>();
495 for(set<BeamGate *>::const_iterator i=gates.begin(); i!=gates.end(); ++i)
497 DataFile::Statement st("beamgate");
502 const set<Route *> &routes = track_chains.get<Route>();
503 for(set<Route *>::const_iterator i=routes.begin(); i!=routes.end(); ++i)
505 if((*i)->is_temporary())
508 DataFile::Statement st("route");
513 const set<Zone *> &zones = track_chains.get<Zone>();
514 for(set<Zone *>::const_iterator i=zones.begin(); i!=zones.end(); ++i)
516 DataFile::Statement st("zone");
522 void Layout::save_dynamic(const string &fn) const
524 IO::BufferedFile out(fn, IO::M_WRITE);
525 DataFile::Writer writer(out);
528 DataFile::Statement st("clock");
533 const set<Track *> &tracks = objects.get<Track>();
534 for(set<Track *>::const_iterator i=tracks.begin(); i!=tracks.end(); ++i)
535 if((*i)->get_type().is_turnout())
537 DataFile::Statement st("turnout");
538 st.append((*i)->get_turnout_address());
539 (*i)->save_dynamic(st.sub);
543 for(map<unsigned, Train *>::const_iterator i=trains.begin(); i!=trains.end(); ++i)
545 DataFile::Statement st("train");
546 st.append(catalogue.get_name(&i->second->get_locomotive_type()));
547 st.append(i->second->get_address());
548 st.append(i->second->get_protocol());
549 i->second->save(st.sub);
554 void Layout::sensor_state_changed(Sensor &sensor, Sensor::State state)
556 if(state==Sensor::ACTIVE)
558 Block *block = sensor.get_block();
559 if(block && !block->get_train())
560 emergency(block, "Unreserved sensor triggered");
566 Layout::Storage<B>::~Storage()
569 delete *base.begin();
573 bool Layout::Storage<B>::insert(B &b)
575 bool result = base.insert(&b).second;
582 bool Layout::Storage<B>::erase(B &b)
584 bool result = base.erase(&b);
592 const set<T *> &Layout::Storage<B>::get() const
594 for(list<Variant>::const_iterator i=caches.begin(); i!=caches.end(); ++i)
595 if(i->check_type<set<T *> >())
596 return i->value<set<T *> >();
598 caches.push_back(set<T *>());
599 set<T *> &result = caches.back().value<set<T *> >();
600 for(typename set<B *>::const_iterator i=base.begin(); i!=base.end(); ++i)
601 if(T *t = dynamic_cast<T *>(*i))
609 void Layout::Storage<B>::del()
611 set<T *> ts = get<T>();
612 for(typename set<T *>::iterator i=ts.begin(); i!=ts.end(); ++i)
618 Layout::Loader::Loader(Layout &l):
619 DataFile::ObjectLoader<Layout>(l)
621 add("base", &Layout::base);
622 add("beamgate", &Loader::beamgate);
623 add("clock", &Loader::clock);
624 add("route", &Loader::route);
625 add("signal", &Loader::signal);
626 add("terrain", &Loader::terrain);
627 add("track", &Loader::track);
628 add("train", &Loader::train);
629 add("turnout", &Loader::turnout);
630 add("zone", &Loader::zone);
633 add("turnout", &Loader::turnout2);
636 void Layout::Loader::beamgate()
638 BeamGate *gate = new BeamGate(obj);
642 void Layout::Loader::clock()
647 void Layout::Loader::route()
649 Route *rte = new Route(obj);
653 void Layout::Loader::signal(const string &n)
655 Signal *sig = new Signal(obj, obj.catalogue.get<SignalType>(n));
659 void Layout::Loader::terrain(const string &n)
661 Terrain *ter = new Terrain(obj, obj.catalogue.get<TerrainType>(n));
665 void Layout::Loader::track(const string &n)
667 Track *trk = new Track(obj, obj.catalogue.get<TrackType>(n));
669 const set<Track *> &tracks = obj.objects.get<Track>();
670 for(set<Track *>::const_iterator i=tracks.begin(); i!=tracks.end(); ++i)
675 void Layout::Loader::train(const string &n, unsigned addr, const std::string &proto)
677 Train *trn = new Train(obj, obj.catalogue.get<VehicleType>(n), addr, proto);
681 void Layout::Loader::turnout(unsigned addr)
683 /* Kinda slow, but maintaining a map of turnouts seems more trouble than
684 it's worth at this point. */
685 const set<Track *> &tracks = obj.objects.get<Track>();
686 for(set<Track *>::const_iterator i=tracks.begin(); i!=tracks.end(); ++i)
687 if((*i)->get_turnout_address()==addr)
693 throw key_error(addr);
696 void Layout::Loader::turnout2(unsigned addr, unsigned path)
698 // XXX Discrepancy between ids and addresses
700 obj.driver->set_turnout(addr, path);
703 void Layout::Loader::zone()
705 Zone *zne = new Zone(obj);