lua_interpreter.h

Go to the documentation of this file.

/*
 *  GXML/Graphite: Geometry and Graphics Programming Library + Utilities
 *  Copyright (C) 2000 Bruno Levy
 *
 *  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.
 *
 *  This program is distributed in the hope that it will be useful,
 *  but WITHOUT ANY WARRANTY; without even the implied warranty of
 *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 *  GNU General Public License for more details.
 *
 *  You should have received a copy of the GNU General Public License
 *  along with this program; if not, write to the Free Software
 *  Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
 *
 *  If you modify this software, you should include a notice giving the
 *  name of the person performing the modification, the date of modification,
 *  and the reason for such modification.
 *
 *  Contact: Bruno Levy
 *
 *     levy@loria.fr
 *
 *     ISA Project
 *     LORIA, INRIA Lorraine, 
 *     Campus Scientifique, BP 239
 *     54506 VANDOEUVRE LES NANCY CEDEX 
 *     FRANCE
 *
 *  Note that the GNU General Public License does not permit incorporating
 *  the Software into proprietary programs. 
 */
 
#ifndef H_OGF_GOM_LUA_INTERPRETER_H
#define H_OGF_GOM_LUA_INTERPRETER_H
 
#include <OGF/gom/common/common.h>
#include <OGF/gom/interpreter/interpreter.h>
#include <OGF/gom/types/callable.h>
 
struct lua_State;
 
namespace OGF {
 
    /*****************************************************************/
 
    gom_class GOM_API LuaCallable : public Callable {
    public:
        LuaCallable(lua_State* L, int target_index);
 
        bool invoke(const ArgList& args, Any& ret_val) override;
 
        ~LuaCallable() override;
        
    private:
        index_t instance_id_;
        lua_State* lua_state_;
        Interpreter_var interpreter_; // Keeps refcount so that Lua interp
                                      // is not destroyed before the last
                                      // Callable
        static index_t current_instance_id_;
    };
    
    
    /*****************************************************************/
    
    gom_class GOM_API LuaInterpreter : public Interpreter {
    public:
        LuaInterpreter();
        
        ~LuaInterpreter() override;
 
        void reset() override;
        
        bool execute(
            const std::string& command, bool save_in_history, bool log
        ) override;
 
        bool execute_file(const std::string& file_name) override;
 
        Any resolve(const std::string& id, bool quiet=true) const override;
 
        void bind(const std::string& id, const Any& value) override;
        
        Any eval(
            const std::string& expression, bool quiet=true
        ) const override;
 
        lua_State* lua_state() {
            return lua_state_;
        }
 
        static void display_error_message(const std::string& msg);
 
        void list_names(std::vector<std::string>& names) const override;
        
    protected:
 
        virtual void adjust_lua_state();
        
         void get_keys(
             const std::string& context, std::vector<std::string>& keys
         ) override;
 
         std::string name_value_pair_call(
             const std::string& args
         ) const override;
 
         
    private:
        lua_State* lua_state_;  
    }; 
 
} 
 
#endif