command-message-binding-test.cpp

Go to the documentation of this file.

/*
  CommandMessageBinding(Test)  -  verify argument binding via GenNode-Message, with immutable types
 
   Copyright (C)
     2016,            Hermann Vosseler <Ichthyostega@web.de>
 
 **Lumiera** is free software; you can redistribute it and/or modify it
 under the terms of the GNU General Public License as published by the
 Free Software Foundation; either version 2 of the License, or (at your
 option) any later version. See the file COPYING for further details.
 
* *****************************************************************/
 
#include "lib/test/run.hpp"
#include "lib/test/test-helper.hpp"
#include "steam/control/command-def.hpp"
#include "lib/time/timevalue.hpp"
#include "lib/diff/gen-node.hpp"
 
 
namespace steam {
namespace control {
namespace test    {
  
  using lib::time::Time;
  using lib::time::TimeVar;
  using lib::time::TimeValue;
  using lib::time::TimeSpan;
  using lib::time::Duration;
  using lib::test::randTime;
  using lib::diff::Rec;
  
  
  
  
  
  namespace  { // functions to be invoked through the command system
    
    TimeVar implicitTestState;
    
    void
    operate (Duration dur)
    {
      implicitTestState += dur;
    }
    
    Time
    capture (Duration)
    {
      return implicitTestState;
    }
    
    void
    undoIt (Duration, Time oldVal)
    {
      implicitTestState = oldVal;
    }
  }
  
  
  
  
  /***********************************************************************/
  class CommandMessageBinding_test : public Test
    {
      
      virtual void
      run (Arg) 
        {
          Time five(TimeValue(5));
          implicitTestState = five;
          
          CommandDef ("test.command2")
              .operation (operate)
              .captureUndo (capture)
              .undoOperation (undoIt)
              ;
          
          
          
          TimeSpan testSpan (randTime(), randTime());
          Rec argMsg {testSpan};
          
          // bind the command argument from a GenNode message
          Command ourCmd = Command::get("test.command2");
          CHECK (not ourCmd.canExec());
          
          ourCmd.bindArg (argMsg);
          CHECK (ourCmd.canExec());
          
          // invoke the command
          ourCmd();
          CHECK (implicitTestState == five + Duration(testSpan));
          
          // undo the effect of the command
          ourCmd.undo();
          CHECK (implicitTestState == five);
        }
    };
  
  
  LAUNCHER (CommandMessageBinding_test, "unit controller");
  
  
}}} // namespace steam::control::test