Регистрация функции C в таблице Lua - PullRequest
Новая
       20

Регистрация функции C в таблице Lua

10 голосов
/ 26 апреля 2010

Как зарегистрировать функцию C в Lua, но не в глобальном контексте, а как поле таблицы?

Ответы [ 2 ]

20 голосов
/ 27 апреля 2010

Это то, что luaL_register() предназначено для одной или нескольких функций. Каноническое использование является частью установки для модуля, написанного на C: 

/* actual definitions of modA() and modB() are left as an exercise. */

/* list of functions in the module */
static const luaL_reg modfuncs[] =
{
    { "a", modA},
    { "b", modB},
    { NULL, NULL }
};

/* module loader function called eventually by require"mod" */  
int luaopen_mod(lua_State *L) {
    luaL_register(L, "mod", modfuncs);
    return 1;
}

, где это создает модуль с именем "mod", который имеет две функции с именами mod.a и mod.b.

Цитирование руководства для luaL_register(L,libname,l):

При вызове с libname, равным NULL, он просто регистрирует все функции в списке l (см. luaL_Reg) в стол на вершине стек.

При вызове с ненулевым libname, luaL_register создает новую таблицу t, устанавливает его как значение глобального переменная libname, устанавливает ее как значение package.loaded[libname] и регистрирует на нем все функции в список l. Если есть столик в package.loaded[libname] или в переменной libname, повторно использует эту таблицу вместо создание нового.

В любом случае функция покидает таблицу сверху стека.

luaL_register() можно использовать для помещения функций C в любую таблицу, передав NULL для второго параметра, пока таблица находится на вершине стека.

5 голосов
/ 26 апреля 2010 
void register_c_function(char const * const tableName, char const * const funcName, CFunctionSignature funcPointer)
{
    lua_getfield(lstate, LUA_GLOBALSINDEX, tableName);  // push table onto stack
    if (!lua_istable(lstate, -1))                       // not a table, create it
    {
        lua_createtable(lstate, 0, 1);      // create new table
        lua_setfield(lstate, LUA_GLOBALSINDEX, tableName);  // add it to global context

        // reset table on stack
        lua_pop(lstate, 1);                 // pop table (nil value) from stack
        lua_getfield(lstate, LUA_GLOBALSINDEX, tableName);  // push table onto stack
    }

    lua_pushstring(lstate, funcName);       // push key onto stack
    lua_pushcfunction(lstate, funcPointer); // push value onto stack
    lua_settable(lstate, -3);               // add key-value pair to table

    lua_pop(lstate, 1);                     // pop table from stack
}
...