Lua与C交互-访问Lua变量（原创）
1、交互原理
一个Lua程序与C的交互都是通过Lua虚拟机中的一个堆栈进行的，通过调用Lua C API可以让C中的值入栈再出栈赋值给Lua ，也可以让Lua值入栈再出栈赋给C。
Lua的8种基本类型：nill、boolean、number、string、userdata、function、thread、table, Lua C API 都提供相应的操作接口。
Lua C API 具体阅读lua.h、lualib.h、lauxlib.h头文件。
2、一些基础概念
Lua_State : 一个Lua_State管理着Lua虚拟机的一个执行环境，拥有独立的数据栈和调用栈，表示一个Lua程序的执行状态。
Lua虚拟栈： lua虚拟机中的用来实现lua与C交互的栈，栈都是先进后出的，我们对栈的操作都是基于栈顶的，也就是说如果要获取到栈底元素，需要将其上面的依次弹出。虚拟栈的索引方式有两种，正索引和负索引，正索引(1-N)， 负索引((-N)-(-1))。
3、访问Lua变量实现
我这边使用的是vs建立的c++工程。
新建一个main.lua文件,并敲入如下代码:
var1 = 5
print(“this is in lua \n”)
在C++源文件中，先导入需要的头文件：
#include <windows.h> //系统的头文件，我们在后面会用到一个系统的方法需要
extern "C" {
#include <lua.h>
#include <lualib.h>
#inlude <lauxlib.h>
}
定义一个获取lua变量的函数：
void get_luaVar(lua_State *L){
int lua_var;
lua_getglobal(L, "var1"); //从lua变量空间将var1变量放入栈中
if (!lua_isnumber(L, -1)) // 通常需要对栈中元素类型做下检测
printf("is not number");
lua_var = lua_tonumber(L, -1); // 从栈中读取刚才压入的变量，此时并不会将变量出栈
printf("读取lua中var1变量的值 %d\n\n", lua_var);
}
定义一个设置lua变量的函数：
void set_luaVar(lua_State *L){
lua_pushinteger(L, 100) ; //将100压入栈中
lua_setglobal(L, "var1"); //将刚压入栈中值出栈并赋值给lua全局变量
printf("为lua变量var1赋值100 \n\n");
}
在入口函数处加载Lua文件，并调用以上函数：
int _tmain(int argc, _TCHAR* argv[]){
lua_State *L = luaL_newstate(); // 创建一个Lua执行环境
luaL_openlibs(L); //打开Lua库
luaL_dofile(L, "main.lua"); // 加载并执行main.lua文件
get_luaVar(L); //获取lua变量
set_luaVar(L); //设置lua变量
get_luaVar(L); //再获取lua变量
lua_close(L); //关闭lua执行环境
system("pause"); // 暂停windows输出窗口，方便查看输出
return 0;
}
运行程序得到如下打印：
this is in lua
读取lua中var1变量的值 5
为lua变量var1赋值100
读取lua中var1变量的值 100
请按任意键继续. . .
实现了对lua变量的赋值和读取。
4、查看虚拟栈中的值
在lua与C的交互中，有些API将值从栈中弹出，有的只是读取里面的值不会将值从栈中弹出，如上面使用的lua_tonumber()这类API， 还有的不是将值而是将指针放入栈中。这些需要平时总结下规律去熟练。这里介绍官方提供的一个方法，可以实时查看当前堆栈的里面的值。
static void stackDump(lua_State *L) {
int i;
int top = lua_gettop(L); /* depth of the stack */
for (i = 1; i <= top; i++) { /* repeat for each level */
int t = lua_type(L, i);
switch (t) {
case LUA_TSTRING: { /* strings */
printf("'%s'", lua_tostring(L, i));
break;
}
case LUA_TBOOLEAN: { /* Booleans */
printf(lua_toboolean(L, i) ? "true" : "false");
break;
}
case LUA_TNUMBER: { /* numbers */
printf("%g", lua_tonumber(L, i));
break;
}
default: { /* other values */
printf("%s", lua_typename(L, t));
break;
}
}
printf(" "); /* put a separator */
}
printf("\n"); /* end the listing */
}
在你想要查看当前堆栈里面有什么值时,调用stackDump()即可。
