3 This file is part of the MSP Märklin suite
4 Copyright © 2006-2010 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"
29 Layout::Layout(Catalogue &c, Driver *d):
34 driver->signal_sensor.connect(sigc::mem_fun(this, &Layout::sensor_event));
40 while(!trains.empty())
41 delete trains.begin()->second;
42 while(!routes.empty())
43 delete routes.begin()->second;
44 while(!tracks.empty())
45 delete *tracks.begin();
46 while(!blocks.empty())
47 delete *blocks.begin();
50 Driver &Layout::get_driver() const
53 throw InvalidState("No driver");
57 void Layout::add_track(Track &t)
59 if(tracks.insert(&t).second)
62 signal_track_added.emit(t);
66 void Layout::remove_track(Track &t)
71 signal_track_removed.emit(t);
75 void Layout::add_block(Block &b)
80 Block &Layout::get_block(unsigned id) const
82 for(set<Block *>::const_iterator i=blocks.begin(); i!=blocks.end(); ++i)
83 if((*i)->get_id()==id)
86 throw KeyError("Unknown block", lexical_cast(id));
89 Block &Layout::get_block_by_track(const Track &t) const
91 for(set<Block *>::const_iterator i=blocks.begin(); i!=blocks.end(); ++i)
92 if((*i)->get_tracks().count(const_cast<Track *>(&t)))
95 throw InvalidParameterValue("No block found for track");
98 void Layout::create_blocks()
100 set<Track *> used_tracks;
101 for(set<Block *>::const_iterator i=blocks.begin(); i!=blocks.end(); ++i)
103 const set<Track *> &btracks = (*i)->get_tracks();
104 used_tracks.insert(btracks.begin(), btracks.end());
107 for(set<Track *>::const_iterator i=tracks.begin(); i!=tracks.end(); ++i)
108 if(used_tracks.count(*i)==0)
110 Block *block = new Block(*this, **i);
111 used_tracks.insert(block->get_tracks().begin(), block->get_tracks().end());
114 for(set<Block *>::iterator i=blocks.begin(); i!=blocks.end(); ++i)
115 for(set<Block *>::iterator j=i; j!=blocks.end(); ++j)
117 (*i)->check_link(**j);
120 void Layout::create_blocks(const Track &track)
122 const vector<Track *> &links = track.get_links();
123 for(set<Block *>::iterator i=blocks.begin(); i!=blocks.end();)
125 bool del = (*i)->get_tracks().count(const_cast<Track *>(&track));
126 for(vector<Track *>::const_iterator j=links.begin(); (!del && j!=links.end()); ++j)
127 del = (*i)->get_tracks().count(*j);
138 void Layout::remove_block(Block &b)
143 void Layout::add_route(Route &r)
145 if(routes.count(r.get_name()))
146 throw KeyError("Duplicate route name", r.get_name());
148 routes[r.get_name()] = &r;
149 signal_route_added.emit(r);
152 Route &Layout::get_route(const string &name) const
154 map<string, Route *>::const_iterator i = routes.find(name);
156 throw KeyError("Unknown route", name);
160 void Layout::remove_route(Route &r)
162 if(routes.erase(r.get_name()))
163 signal_route_removed.emit(r);
166 void Layout::add_train(Train &t)
168 if(trains.count(t.get_address()))
169 throw KeyError("Duplicate train address", lexical_cast(t.get_address()));
171 trains[t.get_address()] = &t;
172 signal_train_added.emit(t);
175 Train &Layout::get_train(unsigned addr) const
177 map<unsigned, Train *>::const_iterator i = trains.find(addr);
179 throw KeyError("Unknown train", lexical_cast(addr));
183 void Layout::remove_train(Train &t)
185 if(trains.erase(t.get_address()))
186 signal_train_removed.emit(t);
189 void Layout::add_vehicle(Vehicle &v)
191 if(vehicles.insert(&v).second)
192 signal_vehicle_added.emit(v);
195 void Layout::remove_vehicle(Vehicle &v)
197 if(vehicles.erase(&v))
198 signal_vehicle_removed.emit(v);
206 Time::TimeStamp t = Time::now();
212 for(map<unsigned, Train *>::iterator i=trains.begin(); i!=trains.end(); ++i)
213 i->second->tick(t, dt);
216 void Layout::emergency(const string &msg)
220 IO::print("Emergency: %s\n", msg);
221 signal_emergency.emit(msg);
224 void Layout::save(const string &fn)
226 IO::BufferedFile out(fn, IO::M_WRITE);
227 DataFile::Writer writer(out);
230 writer.write((DataFile::Statement("base"), base));
232 for(set<Track *>::iterator i=tracks.begin(); i!=tracks.end(); ++i)
234 DataFile::Statement st("track");
235 st.append((*i)->get_type().get_article_number());
240 for(map<string, Route *>::iterator i=routes.begin(); i!=routes.end(); ++i)
242 if(i->second->is_temporary())
245 DataFile::Statement st("route");
247 i->second->save(st.sub);
252 void Layout::save_trains(const string &fn)
254 IO::BufferedFile out(fn, IO::M_WRITE);
255 DataFile::Writer writer(out);
257 for(map<unsigned, Train *>::const_iterator i=trains.begin(); i!=trains.end(); ++i)
259 DataFile::Statement st("train");
260 st.append(i->second->get_locomotive_type().get_article_number());
261 st.append(i->second->get_address());
262 i->second->save(st.sub);
267 void Layout::check_links()
269 for(set<Track *>::iterator i=tracks.begin(); i!=tracks.end(); ++i)
273 for(set<Track *>::iterator i=tracks.begin(); i!=tracks.end(); ++i)
279 for(set<Track *>::iterator j=i; j!=tracks.end(); ++j)
281 (*i)->snap_to(**j, true);
285 for(list<Track *>::iterator i=flext.begin(); i!=flext.end(); ++i)
286 for(set<Track *>::iterator j=tracks.begin(); j!=tracks.end(); ++j)
288 (*i)->snap_to(**j, true);
291 void Layout::check_routes()
293 for(map<string, Route *>::iterator i=routes.begin(); i!=routes.end(); ++i)
295 if(i->second->is_temporary())
298 /* We must copy the turnout map, since adding tracks to the route will
299 (temporarily) mess it up */
300 const map<unsigned, int> turnouts = i->second->get_turnouts();
302 // Find any turnout in the route
304 unsigned trk_path = 0;
305 for(set<Track *>::const_iterator j=tracks.begin(); j!=tracks.end(); ++j)
307 map<unsigned, int>::const_iterator k = turnouts.find((*j)->get_turnout_id());
308 if(k!=turnouts.end())
311 trk_path = k->second;
319 // Find an applicable endpoint
320 const vector<Endpoint> &eps = track->get_type().get_endpoints();
322 for(unsigned j=0; j<eps.size(); ++j)
323 if(eps[j].paths&(1<<trk_path))
332 // Traverse the track and get the next one
333 if(track->get_type().get_endpoints().size()<2)
335 unsigned out_ep = track->traverse(ep, trk_path);
336 Track *next = track->get_links()[out_ep];
337 if(!next || next == start)
340 ep = next->get_endpoint_by_link(*track);
341 if(next->get_type().is_turnout())
343 // Select correct path across the turnout, or break if we hit an unknown turnout
344 map<unsigned, int>::const_iterator j = turnouts.find(next->get_turnout_id());
345 if(j==turnouts.end())
347 trk_path = j->second;
353 /* Start adding tracks when we find the first non-turnout. This
354 prevents the occurrence of ambiguities while adding the tracks */
360 i->second->add_track(*next);
367 void Layout::sensor_event(unsigned addr, bool state)
371 for(set<Block *>::iterator i=blocks.begin(); i!=blocks.end(); ++i)
372 if((*i)->get_sensor_id()==addr)
374 if(!(*i)->get_train())
375 emergency(format("Unreserved sensor %d triggered", addr));
382 Layout::Loader::Loader(Layout &l):
383 DataFile::BasicLoader<Layout>(l),
386 add("base", &Layout::base);
387 add("route", &Loader::route);
388 add("track", &Loader::track);
389 add("train", &Loader::train);
392 void Layout::Loader::finish()
398 for(set<Track *>::iterator i=obj.tracks.begin(); i!=obj.tracks.end(); ++i)
402 void Layout::Loader::route(const string &n)
404 Route *rte = new Route(obj, n);
408 void Layout::Loader::track(unsigned art_nr)
410 Track *trk = new Track(obj, obj.catalogue.get_track(art_nr));
415 void Layout::Loader::train(unsigned art_nr, unsigned addr)
417 Train *trn = new Train(obj, obj.catalogue.get_vehicle(art_nr), addr);
421 } // namespace Marklin