]> git.tdb.fi Git - r2c2.git/blobdiff - source/libmarklin/layout.cpp
Make LCD output selectable at runtime through an extra I/O pin
[r2c2.git] / source / libmarklin / layout.cpp
index afd5f03f81affe1c6cf5a8cb30f8077a0e12daed..5f590dbb9a762473c9daa279356ddafe49061ffe 100644 (file)
 /* $Id$
 
 This file is part of the MSP Märklin suite
-Copyright © 2006-2009 Mikkosoft Productions, Mikko Rasa
+Copyright © 2006-2010  Mikkosoft Productions, Mikko Rasa
 Distributed under the GPL
 */
 
+#include <algorithm>
 #include <msp/core/refptr.h>
 #include <msp/datafile/parser.h>
 #include <msp/datafile/writer.h>
+#include <msp/io/print.h>
+#include <msp/time/utils.h>
+#include "block.h"
 #include "catalogue.h"
+#include "driver.h"
 #include "layout.h"
+#include "route.h"
+#include "track.h"
 #include "tracktype.h"
+#include "train.h"
+#include "vehicletype.h"
 
 using namespace std;
 using namespace Msp;
 
 namespace Marklin {
 
-Layout::Layout(const Catalogue &c):
-       catalogue(c)
-{ }
+Layout::Layout(Catalogue &c, Driver *d):
+       catalogue(c),
+       driver(d),
+       next_turnout_id(0x800)
+{
+       if(driver)
+               driver->signal_sensor.connect(sigc::mem_fun(this, &Layout::sensor_event));
+}
 
 Layout::~Layout()
 {
-       for(set<Track *>::iterator i=tracks.begin(); i!=tracks.end(); ++i)
-               delete *i;
+       delete driver;
+       while(!trains.empty())
+               delete trains.begin()->second;
+       while(!routes.empty())
+               delete *routes.begin();
+       while(!tracks.empty())
+               delete *tracks.begin();
+       while(!blocks.empty())
+               delete *blocks.begin();
+}
+
+Driver &Layout::get_driver() const
+{
+       if(!driver)
+               throw InvalidState("No driver");
+       return *driver;
 }
 
 void Layout::add_track(Track &t)
 {
        if(tracks.insert(&t).second)
+       {
+               create_blocks();
                signal_track_added.emit(t);
+       }
 }
 
 void Layout::remove_track(Track &t)
 {
        if(tracks.erase(&t))
+       {
+               create_blocks(t);
                signal_track_removed.emit(t);
+       }
+}
+
+unsigned Layout::allocate_turnout_id(bool dbl)
+{
+       set<unsigned> used_ids;
+       for(set<Track *>::const_iterator i=tracks.begin(); i!=tracks.end(); ++i)
+               if((*i)->get_turnout_id())
+                       used_ids.insert((*i)->get_turnout_id());
+
+       unsigned result = next_turnout_id;
+       while(used_ids.count(result) || (dbl && used_ids.count(result+1)))
+               ++result;
+       next_turnout_id = result+1+dbl;
+
+       return result;
+}
+
+void Layout::add_block(Block &b)
+{
+       blocks.insert(&b);
+}
+
+Block &Layout::get_block(unsigned id) const
+{
+       for(set<Block *>::const_iterator i=blocks.begin(); i!=blocks.end(); ++i)
+               if((*i)->get_id()==id)
+                       return **i;
+
+       throw KeyError("Unknown block", lexical_cast(id));
+}
+
+void Layout::create_blocks()
+{
+       set<Track *> used_tracks;
+       for(set<Block *>::const_iterator i=blocks.begin(); i!=blocks.end(); ++i)
+       {
+               const set<Track *> &btracks = (*i)->get_tracks();
+               used_tracks.insert(btracks.begin(), btracks.end());
+       }
+
+       for(set<Track *>::const_iterator i=tracks.begin(); i!=tracks.end(); ++i)
+               if(used_tracks.count(*i)==0)
+               {
+                       Block *block = new Block(*this, **i);
+                       used_tracks.insert(block->get_tracks().begin(), block->get_tracks().end());
+               }
+
+       for(set<Block *>::iterator i=blocks.begin(); i!=blocks.end(); ++i)
+               for(set<Block *>::iterator j=i; j!=blocks.end(); ++j)
+                       if(j!=i)
+                               (*i)->check_link(**j);
+}
+
+void Layout::create_blocks(Track &track)
+{
+       /* Must collect the blocks in a set first while all tracks are still
+       guaranteed to have blocks and to avoid duplicate deletes */
+       set<Block *> del_blocks;
+
+       del_blocks.insert(&track.get_block());
+
+       const vector<Track *> &links = track.get_links();
+       for(vector<Track *>::const_iterator i=links.begin(); i!=links.end(); ++i)
+               if(*i)
+                       del_blocks.insert(&(*i)->get_block());
+
+       for(set<Block *>::iterator i=del_blocks.begin(); i!=del_blocks.end(); ++i)
+               delete *i;
+
+       create_blocks();
+}
+
+void Layout::remove_block(Block &b)
+{
+       blocks.erase(&b);
 }
 
 void Layout::add_route(Route &r)
 {
-       if(routes.count(r.get_name()))
-               throw KeyError("Duplicate route name");
-       routes[r.get_name()] = &r;
-       signal_route_added.emit(r);
+       if(routes.insert(&r).second)
+               signal_route_added.emit(r);
 }
 
 Route &Layout::get_route(const string &name) const
 {
-       map<string, Route *>::const_iterator i = routes.find(name);
-       if(i==routes.end())
-               throw KeyError("Unknown route", name);
-       return *i->second;
+       for(set<Route *>::const_iterator i=routes.begin(); i!=routes.end(); ++i)
+               if((*i)->get_name()==name)
+                       return **i;
+       throw KeyError("Unknown route", name);
+}
+
+void Layout::update_routes()
+{
+       for(set<Route *>::iterator i=routes.begin(); i!=routes.end(); ++i)
+               (*i)->update_turnouts();
 }
 
 void Layout::remove_route(Route &r)
 {
-       if(routes.erase(r.get_name()))
+       if(routes.erase(&r))
                signal_route_removed.emit(r);
 }
 
+void Layout::add_train(Train &t)
+{
+       if(trains.count(t.get_address()))
+               throw KeyError("Duplicate train address", lexical_cast(t.get_address()));
+
+       trains[t.get_address()] = &t;
+       signal_train_added.emit(t);
+}
+
+Train &Layout::get_train(unsigned addr) const
+{
+       map<unsigned, Train *>::const_iterator i = trains.find(addr);
+       if(i==trains.end())
+               throw KeyError("Unknown train", lexical_cast(addr));
+       return *i->second;
+}
+
+void Layout::remove_train(Train &t)
+{
+       if(trains.erase(t.get_address()))
+               signal_train_removed.emit(t);
+}
+
+void Layout::add_vehicle(Vehicle &v)
+{
+       if(vehicles.insert(&v).second)
+               signal_vehicle_added.emit(v);
+}
+
+void Layout::remove_vehicle(Vehicle &v)
+{
+       if(vehicles.erase(&v))
+               signal_vehicle_removed.emit(v);
+}
+
+void Layout::tick()
+{
+       if(driver)
+               driver->tick();
+
+       Time::TimeStamp t = Time::now();
+       Time::TimeDelta dt;
+       if(last_tick)
+               dt = t-last_tick;
+       last_tick = t;
+
+       for(map<unsigned, Train *>::iterator i=trains.begin(); i!=trains.end(); ++i)
+               i->second->tick(t, dt);
+}
+
+void Layout::emergency(const string &msg)
+{
+       if(driver)
+               driver->halt(true);
+       IO::print("Emergency: %s\n", msg);
+       signal_emergency.emit(msg);
+}
+
 void Layout::save(const string &fn)
 {
        IO::BufferedFile out(fn, IO::M_WRITE);
@@ -77,142 +248,104 @@ void Layout::save(const string &fn)
                writer.write(st);
        }
 
-       for(map<string, Route *>::iterator i=routes.begin(); i!=routes.end(); ++i)
+       for(set<Route *>::iterator i=routes.begin(); i!=routes.end(); ++i)
        {
+               if((*i)->is_temporary())
+                       continue;
+
                DataFile::Statement st("route");
-               st.append(i->first);
-               i->second->save(st.sub);
+               (*i)->save(st.sub);
                writer.write(st);
        }
 }
 
-void Layout::check_links()
+void Layout::save_trains(const string &fn)
 {
-       for(set<Track *>::iterator i=tracks.begin(); i!=tracks.end(); ++i)
-               (*i)->break_links();
+       IO::BufferedFile out(fn, IO::M_WRITE);
+       DataFile::Writer writer(out);
 
-       list<Track *> flext;
-       for(set<Track *>::iterator i=tracks.begin(); i!=tracks.end(); ++i)
+       for(map<unsigned, Train *>::const_iterator i=trains.begin(); i!=trains.end(); ++i)
        {
-               if((*i)->get_flex())
-                       flext.push_back(*i);
-               else
-               {
-                       for(set<Track *>::iterator j=i; j!=tracks.end(); ++j)
-                               if(j!=i)
-                                       (*i)->snap_to(**j, true);
-               }
+               DataFile::Statement st("train");
+               st.append(i->second->get_locomotive_type().get_article_number());
+               st.append(i->second->get_address());
+               st.append(i->second->get_protocol());
+               i->second->save(st.sub);
+               writer.write(st);
        }
-
-       for(list<Track *>::iterator i=flext.begin(); i!=flext.end(); ++i)
-               for(set<Track *>::iterator j=tracks.begin(); j!=tracks.end(); ++j)
-                       if(*j!=*i)
-                               (*i)->snap_to(**j, true);
 }
 
-void Layout::check_routes()
+void Layout::sensor_event(unsigned addr, bool state)
 {
-       for(map<string, Route *>::iterator i=routes.begin(); i!=routes.end(); ++i)
+       if(state)
        {
-               /* We must copy the turnout map, since adding tracks to the route will
-               (temporarily) mess it up */
-               const map<unsigned, int> turnouts = i->second->get_turnouts();
-
-               // Find any turnout in the route
-               Track *track = 0;
-               unsigned trk_path = 0;
-               for(set<Track *>::const_iterator j=tracks.begin(); j!=tracks.end(); ++j)
-               {
-                       map<unsigned, int>::const_iterator k = turnouts.find((*j)->get_turnout_id());
-                       if(k!=turnouts.end())
+               for(set<Block *>::iterator i=blocks.begin(); i!=blocks.end(); ++i)
+                       if((*i)->get_sensor_id()==addr)
                        {
-                               track = *j;
-                               trk_path = k->second;
+                               if(!(*i)->get_train())
+                                       emergency(format("Unreserved sensor %d triggered", addr));
                                break;
                        }
-               }
-
-               if(!track)
-                       continue;
-
-               // Find an applicable endpoint
-               const vector<Endpoint> &eps = track->get_type().get_endpoints();
-               unsigned ep = 0;
-               for(unsigned j=0; j<eps.size(); ++j)
-                       if(eps[j].paths&(1<<trk_path))
-                       {
-                               ep = j;
-                               break;
-                       }
-
-               Track *start = 0;
-               while(1)
-               {
-                       // Traverse the track and get the next one
-                       unsigned out_ep = track->traverse(ep, trk_path);
-                       Track *next = track->get_links()[out_ep];
-                       if(!next || next == start)
-                               break;
-
-                       ep = next->get_endpoint_by_link(*track);
-                       if(next->get_type().get_n_paths()>1)
-                       {
-                               // Select correct path across the turnout, or break if we hit an unknown turnout
-                               map<unsigned, int>::const_iterator j = turnouts.find(next->get_turnout_id());
-                               if(j==turnouts.end())
-                                       break;
-                               trk_path = j->second;
-                       }
-                       else
-                       {
-                               trk_path = 0;
-
-                               /* Start adding tracks when we find the first non-turnout.  This
-                               prevents the occurrence of ambiguities while adding the tracks */
-                               if(!start)
-                                       start = next;
-                       }
-
-                       if(start)
-                               i->second->add_track(*next);
-
-                       track = next;
-               }
        }
 }
 
 
 Layout::Loader::Loader(Layout &l):
-       DataFile::BasicLoader<Layout>(l)
+       DataFile::BasicLoader<Layout>(l),
+       new_tracks(false)
 {
        add("base",  &Layout::base);
-       add("route", &Loader::route);
-       add("track", &Loader::track);
+       add("route", static_cast<void (Loader::*)()>(&Loader::route));
+       add("route", static_cast<void (Loader::*)(const string &)>(&Loader::route));
+       add("track", static_cast<void (Loader::*)(unsigned)>(&Loader::track));
+       add("track", static_cast<void (Loader::*)(ArticleNumber)>(&Loader::track));
+       add("train", static_cast<void (Loader::*)(unsigned, unsigned, const std::string &)>(&Loader::train));
+       add("train", static_cast<void (Loader::*)(ArticleNumber, unsigned, const std::string &)>(&Loader::train));
 }
 
 void Layout::Loader::finish()
 {
-       obj.check_links();
-       obj.check_routes();
-
        for(set<Track *>::iterator i=obj.tracks.begin(); i!=obj.tracks.end(); ++i)
                (*i)->check_slope();
 }
 
+void Layout::Loader::route()
+{
+       Route *rte = new Route(obj);
+       load_sub(*rte);
+}
+
 void Layout::Loader::route(const string &n)
 {
-       RefPtr<Route> rte = new Route(obj, n);
+       Route *rte = new Route(obj);
+       rte->set_name(n);
        load_sub(*rte);
-       obj.add_route(*rte.release());
 }
 
 void Layout::Loader::track(unsigned art_nr)
 {
-       TrackType &type = obj.catalogue.get_track(art_nr);
+       track(ArticleNumber(art_nr));
+}
 
-       RefPtr<Track> trk = new Track(type);
+void Layout::Loader::track(ArticleNumber art_nr)
+{
+       Track *trk = new Track(obj, obj.catalogue.get_track(art_nr));
        load_sub(*trk);
-       obj.add_track(*trk.release());
+       new_tracks = true;
+       for(set<Track *>::iterator i=obj.tracks.begin(); i!=obj.tracks.end(); ++i)
+               if(*i!=trk)
+                       trk->snap_to(**i, true);
+}
+
+void Layout::Loader::train(unsigned art_nr, unsigned addr, const std::string &proto)
+{
+       train(ArticleNumber(art_nr), addr, proto);
+}
+
+void Layout::Loader::train(ArticleNumber art_nr, unsigned addr, const std::string &proto)
+{
+       Train *trn = new Train(obj, obj.catalogue.get_vehicle(art_nr), addr, proto);
+       load_sub(*trn);
 }
 
 } // namespace Marklin