ESLA

Embeddable Scriting LAnguage

frantz@pangea.stanford.edu

Stanford University, Rock Fracture Project research group

© 2003

if_action.h

Go to the documentation of this file.

/*************************************************************************
 *              ESLA: Embeddable Scripting LAnguage
 *                  Copyright (C) 2003 Frantz Maerten
 *
 *   This  program  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.
 *
 *   If  you modify this software, you should contact the author, include
 *   a  notice giving the name of the person performing the modification,
 *   the date of modification, and the reason for such modification.
 *
 *   Note   that   the   GNU  General  Public  License  does  not  permit
 *   incorporating the Software into proprietary programs.
 *
 *  Contact: Frantz Maerten
 *     frantz@pangea.stanford.edu
 *
 *     Dept. of Geological & Environmental Sciences
 *     Stanford University 
 *     Stanford, CA 94305-2115
 *     USA
 *************************************************************************/


#ifndef IF_ACTION
#define IF_ACTION

#include "../esla_namespace.h"
#include "common.h"
#include "gen_action.h"
#include "local_string_var_registry.h"
#include "local_fct_registry.h"
#include <string>

BEGIN_LIB_NAMESPACE 

// ==============================================

class IfBase: public GenAction {
public:
  IfBase() ;
  virtual std::string args() const ;
protected:
  virtual bool bind(const std::string& expression) ;
  virtual bool rebind(const std::string& name, const std::string& new_value) ;
  virtual std::string resolve(const std::string& name) ;
  virtual bool parse(const std::string& expr, std::string& res) ;

  Tokens vars_ ;
  LocalStringVarRegistry var_registry_if_ ;
  LocalStringVarRegistry var_registry_else_ ;

  RET_TYPE  eval(const std::string& var, bool&) ;
  void      set_true_expr(bool) ;
  void      set_has_else(bool) ;
  bool      has_else() const ;
  RET_TYPE  pre_execute(bool& result) ;

private:
  bool has_else_ ;
  bool is_true_ ;
} ;
inline bool IfBase::has_else() const { return has_else_ ;}

// ==============================================

class IfAction: public IfBase {
public:
  // --------------------------------------
  enum REACH_T {
    REACH_NONE,
    REACH_END,
    REACH_ELSE,
    REACH_ELSEIF
  } ;

private:
  class ElseIfAction: public IfBase {
  public:
    ElseIfAction(IfAction* p) ;
    virtual RET_TYPE set_parameters(IfStream*, const std::string& params) ;
    virtual RET_TYPE execute() ;
    virtual std::string command_name() const ;
    REACH_T reach_type() const ;
    const std::string& last_line() const ;
  private:
    ListActions list_ ;  
    REACH_T reach_ ;
    std::string last_line_ ;
    SmartPointer<IfAction> super_ ;
  } ;
  // --------------------------------------
  class ElseAction: public IfBase {
  public:
    ElseAction() ;
    virtual RET_TYPE set_parameters(IfStream*, const std::string& params) ;
    virtual RET_TYPE execute() ;
    virtual std::string command_name() const ;
    REACH_T reach_type() const ;
  private:
    ListActions list_ ;  
    REACH_T reach_ ;
  } ;
  friend class ElseIfAction ;
public:
  IfAction() ;
  virtual RET_TYPE set_parameters(IfStream*, const std::string& params) ;
  virtual RET_TYPE execute() ;
  virtual std::string command_name() const ;

protected:
  void set_result(bool) ;

private:
  bool result_ ;
  ListActions list_if_ ;
  ListActions list_else_ ;
  ListActions list_elseif_ ;
} ;
//----------------------------------
DECLARE_SMART_OBJECT(IfAction) ;
//----------------------------------

inline IfAction::REACH_T IfAction::ElseIfAction::reach_type() const {
  return reach_ ;
}
inline const std::string& IfAction::ElseIfAction::last_line() const {
  return last_line_ ;
}

inline IfAction::REACH_T IfAction::ElseAction::reach_type() const {
  return reach_ ;
}


END_LIB_NAMESPACE

#endif

---