3 This file is part of the MSP Märklin suite
4 Copyright © 2010 Mikkosoft Productions, Mikko Rasa
5 Distributed under the GPL
8 #include <msp/strings/formatter.h>
9 #include <msp/time/units.h>
11 #include "catalogue.h"
14 #include "timetable.h"
22 Timetable::Timetable(Train &t):
29 train.signal_arrived.connect(sigc::mem_fun(this, &Timetable::train_arrived));
30 train.get_layout().get_driver().signal_sensor.connect(sigc::mem_fun(this, &Timetable::sensor_event));
33 void Timetable::set_enabled(bool e)
38 void Timetable::reset()
41 wait_timeout = Time::TimeStamp();
46 void Timetable::clear()
52 void Timetable::append(const Row &row)
57 void Timetable::insert(unsigned i, const Row &row)
60 throw InvalidParameterValue("Insert position out of range");
62 rows.insert(rows.begin()+i, row);
67 const Timetable::Row &Timetable::get_row(unsigned i) const
70 throw InvalidParameterValue("Row index out of range");
74 void Timetable::tick(const Time::TimeStamp &t)
76 if(rows.empty() || !enabled)
79 if(wait_timeout && t>=wait_timeout)
81 wait_timeout = Time::TimeStamp();
82 current_row = (current_row+1)%rows.size();
88 Row &row = rows[current_row];
92 train.go_to(**parse_location(row.strparam).get_tracks().begin());
95 pending_block = &parse_location(row.strparam);
99 wait_timeout = t+row.intparam*Time::sec;
106 train.set_control("speed", row.intparam/3.6*train.get_layout().get_catalogue().get_scale());
109 train.set_route(&train.get_layout().get_route(row.strparam));
114 current_row = (current_row+1)%rows.size();
118 void Timetable::save(list<DataFile::Statement> &st) const
120 for(vector<Row>::const_iterator i=rows.begin(); i!=rows.end(); ++i)
125 st.push_back((DataFile::Statement("goto"), i->strparam));
128 st.push_back((DataFile::Statement("travel"), i->strparam));
131 st.push_back((DataFile::Statement("wait"), i->intparam));
134 st.push_back(DataFile::Statement("arrive"));
137 st.push_back((DataFile::Statement("speed"), i->intparam));
140 st.push_back((DataFile::Statement("route"), i->strparam));
146 Block &Timetable::parse_location(const string &loc)
148 if(!loc.compare(0, 7, "sensor "))
149 return train.get_layout().get_block(lexical_cast<unsigned>(loc.substr(7))|0x1000);
150 throw Exception("Named blocks are not supported yet");
153 void Timetable::sensor_event(unsigned addr, bool state)
155 if(pending_block && pending_block->get_train()==&train && addr==pending_block->get_sensor_id() && state)
158 current_row = (current_row+1)%rows.size();
163 void Timetable::train_arrived()
165 Row &row = rows[current_row];
168 current_row = (current_row+1)%rows.size();
174 Timetable::Row::Row(RowType t, int p):
179 Timetable::Row::Row(RowType t, const string &p):
185 string Timetable::Row::str() const
190 return "go to "+strparam;
192 return "travel to "+strparam;
194 return format("wait for %d seconds", intparam);
196 return "wait for arrival";
198 return format("set speed %d km/h", intparam);
200 return "set route "+strparam;
202 return "invalid row";
206 Timetable::Row Timetable::Row::parse(const string &s)
208 if(!s.compare(0, 6, "go to "))
209 return Row(GOTO, s.substr(6));
210 else if(!s.compare(0, 10, "travel to "))
211 return Row(TRAVEL, s.substr(10));
212 else if(!s.compare(0, 9, "wait for ") && isdigit(s[9]))
214 unsigned nondigit = 10;
215 while(nondigit<s.size() && isdigit(s[nondigit]))
217 return Row(WAIT, lexical_cast<unsigned>(s.substr(9, nondigit-9)));
219 else if(s=="wait for arrival")
220 return Row(ARRIVE, 0);
221 else if(!s.compare(0, 10, "set speed "))
223 unsigned nondigit = 11;
224 while(nondigit<s.size() && (isdigit(s[nondigit]) || s[nondigit]=='-'))
226 return Row(SPEED, lexical_cast<int>(s.substr(10, nondigit-10)));
228 else if(!s.compare(0, 10, "set route "))
229 return Row(ROUTE, s.substr(10));
231 throw InvalidParameterValue("Invalid row");
235 Timetable::Loader::Loader(Timetable &tt):
236 DataFile::ObjectLoader<Timetable>(tt)
238 add("arrive", &Loader::arrive);
239 add("goto", &Loader::go_to);
240 add("route", &Loader::route);
241 add("speed", &Loader::speed);
242 add("travel", &Loader::travel);
243 add("wait", &Loader::wait);
246 void Timetable::Loader::arrive()
248 obj.rows.push_back(Row(ARRIVE, 0));
251 void Timetable::Loader::go_to(const string &t)
253 obj.rows.push_back(Row(GOTO, t));
256 void Timetable::Loader::route(const string &r)
258 obj.rows.push_back(Row(ROUTE, r));
261 void Timetable::Loader::speed(int s)
263 obj.rows.push_back(Row(SPEED, s));
266 void Timetable::Loader::travel(const string &t)
268 obj.rows.push_back(Row(TRAVEL, t));
271 void Timetable::Loader::wait(unsigned t)
273 obj.rows.push_back(Row(WAIT, t));
276 } // namespace Marklin