77c623d8b8
[SVN r67936]
265 lines
11 KiB
C++
265 lines
11 KiB
C++
// Copyright 2010 Gordon Woodhull
|
|
// modified from MSMv2.10/libs/msm/doc/HTML/examples/SimpleTutorial.cpp
|
|
// for the purpose of showing how to run mpl_graph algorithms on MSMs
|
|
// and distributed same license as source
|
|
// Copyright 2008 Christophe Henry
|
|
// henry UNDERSCORE christophe AT hotmail DOT com
|
|
// This is an extended version of the state machine available in the boost::mpl library
|
|
// Distributed under the same license as the original.
|
|
// Copyright for the original version:
|
|
// Copyright 2005 David Abrahams and Aleksey Gurtovoy. Distributed
|
|
// under the Boost Software License, Version 1.0. (See accompanying
|
|
// file LICENSE_1_0.txt or copy at
|
|
// http://www.boost.org/LICENSE_1_0.txt)
|
|
|
|
#include <iostream>
|
|
// back-end
|
|
#include <boost/msm/back/state_machine.hpp>
|
|
//front-end
|
|
#include <boost/msm/front/state_machine_def.hpp>
|
|
|
|
// mpl_graph graph implementation and depth first search
|
|
#include <boost/msm/mpl_graph/incidence_list_graph.hpp>
|
|
#include <boost/msm/mpl_graph/depth_first_search.hpp>
|
|
#include <boost/msm/mpl_graph/breadth_first_search.hpp>
|
|
|
|
namespace msm = boost::msm;
|
|
namespace mpl = boost::mpl;
|
|
|
|
namespace mpl_graph = boost::msm::mpl_graph;
|
|
|
|
namespace
|
|
{
|
|
// events
|
|
struct play {};
|
|
struct end_pause {};
|
|
struct stop {};
|
|
struct pause {};
|
|
struct open_close {};
|
|
|
|
// A "complicated" event type that carries some data.
|
|
enum DiskTypeEnum
|
|
{
|
|
DISK_CD=0,
|
|
DISK_DVD=1
|
|
};
|
|
struct cd_detected
|
|
{
|
|
cd_detected(std::string name, DiskTypeEnum diskType)
|
|
: name(name),
|
|
disc_type(diskType)
|
|
{}
|
|
|
|
std::string name;
|
|
DiskTypeEnum disc_type;
|
|
};
|
|
|
|
// front-end: define the FSM structure
|
|
struct player_ : public msm::front::state_machine_def<player_>
|
|
{
|
|
// The list of FSM states
|
|
struct Empty : public msm::front::state<>
|
|
{
|
|
// every (optional) entry/exit methods get the event passed.
|
|
template <class Event,class FSM>
|
|
void on_entry(Event const&,FSM& ) {std::cout << "entering: Empty" << std::endl;}
|
|
template <class Event,class FSM>
|
|
void on_exit(Event const&,FSM& ) {std::cout << "leaving: Empty" << std::endl;}
|
|
};
|
|
struct Open : public msm::front::state<>
|
|
{
|
|
template <class Event,class FSM>
|
|
void on_entry(Event const& ,FSM&) {std::cout << "entering: Open" << std::endl;}
|
|
template <class Event,class FSM>
|
|
void on_exit(Event const&,FSM& ) {std::cout << "leaving: Open" << std::endl;}
|
|
};
|
|
|
|
// sm_ptr still supported but deprecated as functors are a much better way to do the same thing
|
|
struct Stopped : public msm::front::state<msm::front::default_base_state,msm::front::sm_ptr>
|
|
{
|
|
template <class Event,class FSM>
|
|
void on_entry(Event const& ,FSM&) {std::cout << "entering: Stopped" << std::endl;}
|
|
template <class Event,class FSM>
|
|
void on_exit(Event const&,FSM& ) {std::cout << "leaving: Stopped" << std::endl;}
|
|
void set_sm_ptr(player_* pl)
|
|
{
|
|
m_player=pl;
|
|
}
|
|
player_* m_player;
|
|
};
|
|
|
|
struct Playing : public msm::front::state<>
|
|
{
|
|
template <class Event,class FSM>
|
|
void on_entry(Event const&,FSM& ) {std::cout << "entering: Playing" << std::endl;}
|
|
template <class Event,class FSM>
|
|
void on_exit(Event const&,FSM& ) {std::cout << "leaving: Playing" << std::endl;}
|
|
};
|
|
|
|
// state not defining any entry or exit
|
|
struct Paused : public msm::front::state<>
|
|
{
|
|
};
|
|
|
|
// the initial state of the player SM. Must be defined
|
|
typedef Empty initial_state;
|
|
|
|
// transition actions
|
|
void start_playback(play const&) { std::cout << "player::start_playback\n"; }
|
|
void open_drawer(open_close const&) { std::cout << "player::open_drawer\n"; }
|
|
void close_drawer(open_close const&) { std::cout << "player::close_drawer\n"; }
|
|
void store_cd_info(cd_detected const&) { std::cout << "player::store_cd_info\n"; }
|
|
void stop_playback(stop const&) { std::cout << "player::stop_playback\n"; }
|
|
void pause_playback(pause const&) { std::cout << "player::pause_playback\n"; }
|
|
void resume_playback(end_pause const&) { std::cout << "player::resume_playback\n"; }
|
|
void stop_and_open(open_close const&) { std::cout << "player::stop_and_open\n"; }
|
|
void stopped_again(stop const&) {std::cout << "player::stopped_again\n";}
|
|
// guard conditions
|
|
bool good_disk_format(cd_detected const& evt)
|
|
{
|
|
// to test a guard condition, let's say we understand only CDs, not DVD
|
|
if (evt.disc_type != DISK_CD)
|
|
{
|
|
std::cout << "wrong disk, sorry" << std::endl;
|
|
return false;
|
|
}
|
|
return true;
|
|
}
|
|
// used to show a transition conflict. This guard will simply deactivate one transition and thus
|
|
// solve the conflict
|
|
bool auto_start(cd_detected const&)
|
|
{
|
|
return false;
|
|
}
|
|
|
|
typedef player_ p; // makes transition table cleaner
|
|
|
|
// Transition table for player
|
|
struct transition_table : mpl::vector<
|
|
// Start Event Next Action Guard
|
|
// +---------+-------------+---------+---------------------+----------------------+
|
|
a_row < Stopped , play , Playing , &p::start_playback >,
|
|
a_row < Stopped , open_close , Open , &p::open_drawer >,
|
|
_row < Stopped , stop , Stopped >,
|
|
// +---------+-------------+---------+---------------------+----------------------+
|
|
a_row < Open , open_close , Empty , &p::close_drawer >,
|
|
// +---------+-------------+---------+---------------------+----------------------+
|
|
a_row < Empty , open_close , Open , &p::open_drawer >,
|
|
row < Empty , cd_detected , Stopped , &p::store_cd_info ,&p::good_disk_format >,
|
|
row < Empty , cd_detected , Playing , &p::store_cd_info ,&p::auto_start >,
|
|
// +---------+-------------+---------+---------------------+----------------------+
|
|
a_row < Playing , stop , Stopped , &p::stop_playback >,
|
|
a_row < Playing , pause , Paused , &p::pause_playback >,
|
|
a_row < Playing , open_close , Open , &p::stop_and_open >,
|
|
// +---------+-------------+---------+---------------------+----------------------+
|
|
a_row < Paused , end_pause , Playing , &p::resume_playback >,
|
|
a_row < Paused , stop , Stopped , &p::stop_playback >,
|
|
a_row < Paused , open_close , Open , &p::stop_and_open >
|
|
// +---------+-------------+---------+---------------------+----------------------+
|
|
> {};
|
|
// Replaces the default no-transition response.
|
|
template <class FSM,class Event>
|
|
void no_transition(Event const& e, FSM&,int state)
|
|
{
|
|
std::cout << "no transition from state " << state
|
|
<< " on event " << typeid(e).name() << std::endl;
|
|
}
|
|
|
|
|
|
// transition table is already an incidence list;
|
|
// select Edge, Source, Target = pair<Start,Event>, Start, Next
|
|
// making Start part of Edge is necessary because Edge tags have to be unique
|
|
|
|
template<typename Row>
|
|
struct row_to_incidence :
|
|
mpl::vector<mpl::pair<typename Row::Target, typename Row::Evt>, typename Row::Source, typename Row::Target> {};
|
|
|
|
typedef mpl::fold<player_::transition_table,
|
|
mpl::vector<>,
|
|
mpl::push_back<mpl::_1, row_to_incidence<mpl::_2> > >::type
|
|
transition_incidence_list;
|
|
|
|
typedef mpl_graph::incidence_list_graph<transition_incidence_list>
|
|
transition_graph;
|
|
|
|
struct preordering_dfs_visitor : mpl_graph::dfs_default_visitor_operations {
|
|
template<typename Node, typename Graph, typename State>
|
|
struct discover_vertex :
|
|
mpl::push_back<State, Node>
|
|
{};
|
|
};
|
|
|
|
typedef mpl::first<mpl_graph::
|
|
depth_first_search<transition_graph,
|
|
preordering_dfs_visitor,
|
|
mpl::vector<>,
|
|
player_::initial_state>::type>::type
|
|
dfs_from_initial_state;
|
|
|
|
BOOST_MPL_ASSERT(( mpl::equal<dfs_from_initial_state,
|
|
mpl::vector<Empty,Open,Stopped,Playing,Paused> > ));
|
|
|
|
struct preordering_bfs_visitor : mpl_graph::bfs_default_visitor_operations {
|
|
template<typename Node, typename Graph, typename State>
|
|
struct discover_vertex :
|
|
mpl::push_back<State, Node>
|
|
{};
|
|
};
|
|
typedef mpl::first<mpl_graph::
|
|
breadth_first_search<transition_graph,
|
|
preordering_bfs_visitor,
|
|
mpl::vector<>,
|
|
player_::initial_state>::type>::type
|
|
bfs_from_initial_state;
|
|
|
|
// yawn, BFS happens to produce the same result as DFS for this example
|
|
BOOST_MPL_ASSERT(( mpl::equal<bfs_from_initial_state,
|
|
mpl::vector<Empty,Open,Stopped,Playing,Paused> > ));
|
|
|
|
};
|
|
// Pick a back-end
|
|
typedef msm::back::state_machine<player_> player;
|
|
|
|
//
|
|
// Testing utilities.
|
|
//
|
|
static char const* const state_names[] = { "Stopped", "Open", "Empty", "Playing", "Paused" };
|
|
void pstate(player const& p)
|
|
{
|
|
std::cout << " -> " << state_names[p.current_state()[0]] << std::endl;
|
|
}
|
|
|
|
|
|
void test()
|
|
{
|
|
player p;
|
|
// needed to start the highest-level SM. This will call on_entry and mark the start of the SM
|
|
p.start();
|
|
// go to Open, call on_exit on Empty, then action, then on_entry on Open
|
|
p.process_event(open_close()); pstate(p);
|
|
p.process_event(open_close()); pstate(p);
|
|
// will be rejected, wrong disk type
|
|
p.process_event(
|
|
cd_detected("louie, louie",DISK_DVD)); pstate(p);
|
|
p.process_event(
|
|
cd_detected("louie, louie",DISK_CD)); pstate(p);
|
|
p.process_event(play());
|
|
|
|
// at this point, Play is active
|
|
p.process_event(pause()); pstate(p);
|
|
// go back to Playing
|
|
p.process_event(end_pause()); pstate(p);
|
|
p.process_event(pause()); pstate(p);
|
|
p.process_event(stop()); pstate(p);
|
|
// event leading to the same state
|
|
// no action method called as it is not present in the transition table
|
|
p.process_event(stop()); pstate(p);
|
|
}
|
|
}
|
|
|
|
int main()
|
|
{
|
|
test();
|
|
return 0;
|
|
}
|