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 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;
 
        void record_invoke_in_history(
            Object* target, const std::string& slot_name, const ArgList& args
        ) override;
 
        void record_set_property_in_history(
            Object* target, const std::string& prop_name, const Any& value
        ) override;
 
        std::string back_resolve(Object* object) const override;
 
        std::string back_parse(
            const Any& value, MetaType* mtype = nullptr
        ) const override;
 
    protected:
 
        std::string recursive_back_resolve(
            Object* haystack,
            const std::string& haystack_name,
            Object* needle
        ) const;
 
        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