struct Initial {};
struct Opened  { std::string fname; }; // можно добавить параметров
struct Closed  {};

struct Open  { string fname; };
struct Read  { string& data_to_read; }; // по ссылке - для считанных данных
struct Write { string data_to_write; };
struct Close {};

struct File
{
  fstream f;
  //          FROM     EVENT  TO      BODY (можно юзать from, ev, to)
  TRANSITION( Initial, Open , Opened, f.open(ev.fname.c_str()))
  TRANSITION( Opened , Read , Opened, f >> ev.data_to_read    )
  TRANSITION( Opened , Write, Opened, f << ev.data_to_write   )
  TRANSITION( Opened , Close, Closed, { f.close(); }          )
};

#define TRANSITION(FROM,EVENT,TO,...) \
  TO go(FROM from, const EVENT& ev) { TO to; __VA_ARGS__; return to; }

  std::string data_to_read( "new data" );
  File f;
  auto s0 = Initial();
  auto s1 = f.go( s0, Open{"asd0.zip"}   );
  auto s2 = f.go( s1, Write{"data0"}     );
  auto s3 = f.go( s2, Read{data_to_read} );
  auto s4 = f.go( s3, Close()            );

f.go( f.go( f.go( f.go(
  Initial(), Open{"asd1.zip"} ), Write{"data1"} ), Read{data_to_read} ), Close()
);

#define RET(...) -> decltype( __VA_ARGS__ ) { return __VA_ARGS__; }

// функтор для File::go (в С++0х нет шаблонных лямбд)
struct Go
{
  File& f;
  template< class InitState, class Event >
  auto operator()( InitState s, const Event& ev ) -> RET( f.go(s,ev) )
};

// функция для применения кортежа событий
template< class InitState, class EvSeq >
auto go_chain( File& f, InitState init_state, const EvSeq& t )
  -> RET( fold( t, init_state, Go{f} ))

auto final_state = go_chain( f, Initial(), make_tuple(
  Open{"asd2.zip"}, Write{"data2"}, Read{data_to_read}, Close()
));