lua入门之四：lua调用c/c++库（函数压栈方式）

深藏阁楼爱情的钟 2022-08-27 09:54 166阅读 0赞

前面讲过lua载入dll的方式去调用函数库，下面介绍的是函数压栈的方式调用函数库，通过lua\_register把函数注册到lua的栈中，lua\_register的定义如下，

#define lua_register(L,n,f) (lua_pushcfunction(L, (f)), lua_setglobal(L, (n)))

看了定义就知道，其实就是函数压栈，然后设置为全局变量，这样lua就可以调用它了。

// libforlua-2.cpp : 定义控制台应用程序的入口点。
    //
    
    #include "stdafx.h"
    
    #include <stdio.h>
    #include <stdlib.h>
    #include <string.h>
    #include <errno.h>
    #include <math.h>
    
    //lua头文件
    #ifdef __cplusplus
    extern "C" {
    #include "lua.h"  
    #include <lauxlib.h>   
    #include <lualib.h>   
    }  
    
    #else
    
    #include <lua.h>
    #include <lualib.h>
    #include <lauxlib.h>
    
    #endif
    
    
    #pragma comment(lib, "lua51.lib")
    
    
    static int math_abs(lua_State *L)
    {
    	//获取传入的参数
    	lua_pushnumber(L, abs((int)luaL_checknumber(L, 1)));
    
    	return 1;
    }
    
    static int math_cos(lua_State *L)
    {
    
    	lua_pushnumber(L, cos((double)luaL_checknumber(L, 1)));
    
    	return 1;
    
    }
    
    static int math_sin(lua_State *L)
    {
    
    	lua_pushnumber(L, sin((double)luaL_checknumber(L, 1)));
    
    
    	return 1;
    }
    
    static const luaL_reg mathlib[] = {
    	{ "abs", math_abs },
    	{ "cos", math_cos },
    	{ "sin", math_sin },
    	{ NULL, NULL }
    };
    
    
    static int ShowMessage(lua_State * L)
    {
    	lua_pushnumber(L, 1000);
    	printf("show message and push 1000 \n");
    	return -1;
    }
    
    
    
    int main(int argc, char** argv)
    {
    	lua_State* L = lua_open();
    
    	luaL_openlibs(L);
    
    	//	lua_register(L, "cos", math_cos);
    	//	lua_register(L, "sin", math_sin);
    	//	lua_register(L, "abs", math_abs);
    
    
    	//#define lua_register(L,n,f) (lua_pushcfunction(L, (f)), lua_setglobal(L, (n)))
    	luaL_register(L, "DY_MATH", mathlib);
    	char *luapath="./script/lua/lua.lua";
    	luaL_dofile(L, luapath);
    
    	double sinv = 30*3.1415926/180.0;
    	lua_getglobal(L, "SIN");
    	lua_pushnumber(L, sinv);
    	if (0 != lua_pcall(L, 1, 1, 0))
    	{
    		printf("cpp call lua function failed\n");
    	}
    	printf("sin(%f)=%f\n", sinv, lua_tonumber(L, -1));
    	lua_pop(L, 1);
    
    
    	lua_getglobal(L, "COS");
    	lua_pushnumber(L, 0.5);
    	if (0 != lua_pcall(L, 1, 1, 0))
    	{
    		printf("cpp call lua function failed\n");
    	}
    	printf("cos(0.5)=%f\n", lua_tonumber(L, -1));
    	lua_pop(L, 1);
    
    
    
    
    	//压栈后设置一个lua可调用的全局函数名
    	lua_pushcfunction(L, ShowMessage);
    	lua_setglobal(L, "showmessage");
    	//c调用lua
    	lua_getglobal(L, "SHOWMESSAGE");
    	lua_pcall(L, 0, 0, 0);
    	printf("get the showmessage pushed value %f \n", lua_tonumber(L, -1));
    
    	lua_close(L);
    
    }

--region lua.lua
    --Date
    --此文件由[BabeLua]插件自动生成
    
    function COS(a)
    print("called COS in lua script")
    --lua调用c/c++
    return DY_MATH.cos(a)
    end
    
    
    function SIN(a)
    print("called SIN in lua script")
    return DY_MATH.sin(a)
    end
    
    
    function SHOWMESSAGE()
    showmessage()
    end
    --endregion