将 C 变量绑定到 Lua

我正在寻找一种将 C 变量(整数、双精度浮点数、常规 C 字符串或类似变量)绑定到 Lua 的解决方案。Lua 应该能够修改该变量(在 C 上下文中)。我不想寻找调用 C 函数的解决方案(从 Lua 中获取该变量的引用)。我也不想使用任何外部库(Lua API 可以胜任)。我已经看到 LuaBridge 解决了这个问题(使用此现有项目:https://github.com/Malaxiz/Third/blob/network/Fifth/CGame.cpp#L240), 但是如我所说,不要使用任何外部库,绝对不能使用 C ++。

使用示例:

C 代码

typedef struct Instance {
    int test;    /* 我想要连接到 Lua(并能够修改它)的变量 */
} Instance;

int main() {
    lua_State* L = lua_open();
    Instance instance;
    instance.test = 5;
    /* ... */
}

并在 Lua 中:

instance.test = instance.test + 5
print(instance.test)   -- 应该是 10

返回 C:

int main() {
    ...
    printf("%i\n", instance.test);    /* 这里应该也是 10 */
}

是否有这个问题的解决方案?

点赞
用户5675002
用户5675002

我根本不需要解决方案来调用 C 函数。

但是必须要有调用 C 函数的步骤,无论是在 Lua 端是否显式,都会存在这个步骤。

通常,你会在 Lua 中的 instance 对象上设置元表。这将捕捉对该对象的读取和写入操作,并通过调用 C 函数将这些操作重定向到 C 端。

2017-03-11 13:33:10
用户3125367
用户3125367

Lua/C程序员的“家庭作业”,但是为了谷歌的缘故:

#include <stdio.h>
#include <stdlib.h>
#include <lauxlib.h>
#include <lualib.h>

typedef struct Instance Instance;

struct Instance {
    int test1;
    double test2;
};

// linstance.c {

    static const char *const tname = "Instance";

    enum { f_test1, f_test2 };
    static const char *const fmap[] = { "test1", "test2" };

    static int
    l_get(lua_State *L) // (t, k) -> v
    {
        Instance *inst = *(Instance **)luaL_checkudata(L, 1, tname);

        switch (luaL_checkoption(L, 2, NULL, fmap)) {
            case f_test1: lua_pushinteger(L, inst->test1); break;
            case f_test2: lua_pushnumber(L, inst->test2); break;
        }
        return 1;
    }

    static int
    l_set(lua_State *L) // (t, k, v)
    {
        Instance *inst = *(Instance **)luaL_checkudata(L, 1, tname);

        switch (luaL_checkoption(L, 2, NULL, fmap)) {
            case f_test1: inst->test1 = luaL_checkinteger(L, 3); break;
            case f_test2: inst->test2 = luaL_checknumber(L, 3); break;
        }
        return 0;
    }

    void
    pushInstance(lua_State *L, Instance *instance)
    {
        Instance **ud = lua_newuserdata(L, sizeof(*ud));
        *ud = instance;

        if (luaL_newmetatable(L, tname)) {
            lua_pushcfunction(L, l_set);
            lua_setfield(L, -2, "__newindex");
            lua_pushcfunction(L, l_get);
            lua_setfield(L, -2, "__index");
            lua_pushstring(L, tname);
            lua_setfield(L, -2, "__metatable");
        }
        lua_setmetatable(L, -2);
    }

// }

int
main(int argc, char *argv[])
{
    lua_State *L = luaL_newstate();
    luaL_openlibs(L);

    Instance instance = { -1, -1.0 };

    pushInstance(L, &instance);
    lua_setglobal(L, "instance");

    luaL_dostring(L, "print(instance.test1, instance.test2)");
    luaL_dostring(L, "instance.test1 = 3.14; instance.test2 = 3.14");
    luaL_dostring(L, "print(instance.test1, instance.test2)");
    printf("%d\t%g\n", instance.test1, instance.test2);

    if (luaL_dostring(L, "print(instance.UNKNOWN)")) {
        printf("%s\n", lua_tostring(L, -1));
        lua_pop(L, 1);
    }

    lua_close(L);
    return 0;
}

-1  -1
3   3.14
3   3.14
[string "print(instance.UNKNOWN)"]:1: bad argument #2 to '__index' (invalid option 'UNKNOWN')
2017-03-14 15:41:53