Lua 和 C 交互中虚拟栈的操作

Posted 云水

tags:

篇首语:本文由小常识网(cha138.com)小编为大家整理,主要介绍了Lua 和 C 交互中虚拟栈的操作相关的知识,希望对你有一定的参考价值。

Lua 和 C 交互中虚拟栈的操作

 

/* int lua_pcall(lua_State *L, int nargs, int nresults, int msgh)
 * 以保护模式调用具有"nargs"个参数,"nresults"个返回值得函数。函数在第一个参数的前一个位置。
 * 保护模式指的是当调用出错时不会报错,而是返回一个错误码同时将错误信息入栈。
 * 当调用成功时,函数返回0。将函数名以及参数出栈,之后将函数的返回值入栈。
 * 无论函数返回多少个返回值,Lua会调整为你需要的数量,忽略多余的或者将不够的补为"nil"。
 * 当调用出错时,函数返回非0值。将函数名以及参数出栈,
 * 以错误信息作为参数,执行虚拟栈中索引"msgh"处的出错处理函数,
 * 将出错处理函数的返回值作为"lua_pcall"的返回值入栈。
 * "msgh"为0代表没有错误处理函数,错误处理函数必须要在被调用函数和其参数入栈之前入栈。
 * 典型的用法中,错误处理函数被用来给错误消息加上更多的调试信息,比如栈跟踪信息。
 * 这些信息在"lua_pcall"返回后,由于栈已经展开,所以收集不到了。
 * lua_pcall 函数会返回下列常数(定义在"lua.h"内)中的一个:
   LUA_OK (0): 成功。
   LUA_ERRRUN: 运行时错误(一般错误)。
   LUA_ERRMEM: 内存分配错误(此种情况,Lua不会调用错误处理函数)。
   LUA_ERRERR: 在运行错误处理函数时发生的错误(此种情况,Lua不会再次调用错误处理函数)。
   LUA_ERRGCMM: 在运行"__gc"元方法时发生的错误(这个错误和被调用的函数无关。)。
 */

 

 

#include <iostream>
#include <lua.hpp>

/* // lua.hpp 中的内容
// lua 是以ANSI C编写的, 所以在C++中使用必须加上 extern "C" { } , 显示的告诉编译器以C的方式编译代码
extern "C" {
#include "lua.h"
#include "lualib.h"
#include "lauxlib.h"
}
*/

/*
 * Lua中的字符串可以不以‘\0‘作为结束符。这样,字符串中可以包含任意的二进制(甚至是‘\0‘),字符串的长度由明确的长度指定
 * 在lua_pushlstring()、lua_pushliteral()以及lua_pushstring()中,Lua不保存字符串(变量)指针。因此当这些函数返回时,你就可以修改你的字符串了
 * 遍历一个”table”时,不要将lua_tolstring()作用在”key”上,这样会导致lua_next()无法正常运行
 *
 * 对于入栈是否有栈空间的情况,你需要自己判断,别忘了现在你是一个C程序员。当Lua启动或者任何Lua调用C的时候,虚拟栈中至少有20个空间(在”lua.h”中LUA_MINSTACK定义),这对于一般情况下够用了,所以一般不用考虑。但有时候确实需要更多的栈空间(比如调用一个不定参数的函数),此时你需要使用lua_checkstack检查栈空间的情况
 *
 * int lua_checkstack(lua_State *L, int sz)
 * 确保堆栈上至少有"n"个额外空位。如果不能把堆栈扩展到相应的尺寸,函数返回"false"。
 * 失败的原因包括将把栈扩展到比固定最大尺寸还大(至少是几千个元素)或分配内存失败。
 * 这个函数永远不会缩小堆栈,如果堆栈已经比需要的大了,那么就保持原样。
 *
 * 在平常的编码中,对于执行失败时会返回0的lua_to*()类别的函数,我们最好先使用lua_is*()类别的函数判断参数的类型,之后再使用lua_to*()类别的函数对参数进行转换;而对于执行失败时会返回NULL的lua_to*()类别的函数,我们可以直接使用lua_to*()类别的函数直接对参数进行转换,判断函数的返回值非NULL与否,就能判断转换是否成功
 *
 * lua_pop()就是通过lua_settop()实现的(在”lua.h”中定义)
 * #define lua_pop(L,n) lua_settop(L, -(n)-1)
 *
 * 以下操作对于虚拟栈没有任何影响, 栈中元素个数还是一样多
 * lua_settop(L, -1);     // set top to its current value
 * lua_insert(L, -1);    // move top element to the top
 * lua_replace(L, -1);    // replace top element by the top element
 *
 */

static void stackDump(lua_State * L)
{
    int i = 0;
    int top = lua_gettop(L); // 获取栈中元素个数
    std::cout << "lua stack value count: " << top << std::endl;
    for (i = 1; i <= top; ++i) // 遍历栈中每一个元素 // 栈底的序号为1, 依次递增. 栈顶的序号始终为-1
    {
        int t = lua_type(L, i); // 获取元素的类型
        switch (t)
        {
        case LUA_TSTRING: // strings
            std::cout << lua_tostring(L, i);
            break;

        case LUA_TBOOLEAN: // bool
            std::cout << (lua_toboolean(L, i) != 0 ? "true" : "false");
            break;

        case LUA_TNUMBER: // number
            std::cout << lua_tonumber(L, i);
            break;

        default: // other values
            std::cout << lua_typename(L, t); // 将宏定义的类型码转换为类型名称
            break;
        }
        std::cout << " ";
    }
    std::cout << std::endl;
}

int main()
{
    lua_State * L = luaL_newstate(); // 创建Lua虚拟机
    luaL_openlibs(L); // 打开Lua状态机"L"中的所有Lua标准库

    // 向虚拟栈中压入值
    lua_pushboolean(L, 1);  // true
    lua_pushnumber(L, 10); // 10
    lua_pushnil(L); // nil
    lua_pushstring(L, "hello"); // "hello"
    stackDump(L); // true  10  nil  ‘hello‘

    lua_pushvalue(L, -4); // 将索引-4处的值的副本入栈
    stackDump(L); // true  10  nil  ‘hello‘  true

    lua_replace(L, 3); // 将栈顶元素移动到索引3处,并覆盖原先的元素
    stackDump(L); // true  10  true  ‘hello‘

    lua_settop(L, 6); // 将栈顶设置为索引6处,多出来的新元素被赋值为"nil"
    stackDump(L); // true  10  true  ‘hello‘  nil  nil

    lua_remove(L, -3); // 移除索引-3处的元素,其上所有元素下移
    stackDump(L); // true  10  true  nil  nil

    lua_settop(L, -5); // 将栈顶设置为索引-5处
    stackDump(L); // true

    lua_close(L); // 关闭Lua状态机

    std::cout << "..." << std::endl;
    system("pause");
    return 0;
}

 

以上是关于Lua 和 C 交互中虚拟栈的操作的主要内容,如果未能解决你的问题,请参考以下文章

lua栈

Lua与C/C++交互

Lua与C/C++交互

Lua与C/C++交互

如何在Lua与C/C++之间实现table数据的交换

C与lua交互--lua调用栈分析