为Lua5.3编写C模块简单示例

一、编译安装Lua5.3

MSVC 命令行安装脚本：

@echo off

md bin

md lib

md include

cd src

cl /c /nologo /W3 /O2 /Ob1 /Oi /Gs /MD /D_CRT_SECURE_NO_DEPRECATE l*.c

ren lua.obj lua.o

ren luac.obj luac.o

lib /OUT:lua53.lib *.obj

copy lua53.lib ..\lib\lua53.lib

del *.o *.obj *.exp *.lib *.dll *.exe

cl /c /nologo /W3 /O2 /Ob1 /Oi /Gs /MD /D_CRT_SECURE_NO_DEPRECATE /DLUA_BUILD_AS_DLL l*.c

ren lua.obj lua.o

ren luac.obj luac.o

link /DLL /IMPLIB:lua53.lib /OUT:lua53.dll *.obj

link /OUT:lua53.exe lua.o lua53.lib

link /OUT:luac53.exe luac.o *.obj

copy lua53.exp ..\bin\lua53.exp

copy lua53.lib ..\bin\lua53.lib

copy lua53.dll ..\bin\lua53.dll

copy lua53.exe ..\bin\lua53.exe

copy luac53.exe ..\bin\luac53.exe

del *.o *.obj *.exp *.lib *.dll *.exe

copy lauxlib.h ..\include\lauxlib.h

copy lua.h ..\include\lua.h

copy lua.hpp ..\include\lua.hpp

copy luaconf.h ..\include\luaconf.h

copy lualib.h ..\include\lualib.h

cd ..\

打开vs开发人员命令提示，执行此脚本，进行编译。

生成的目录文件结构：

使用VS编写Lua的C模块时， VS的配置。

 

C模块mytest.h头文件源码：

/* Start of mytest.h */

#ifndef __MYTEST_H__

#define  __MYTEST_H__

#ifdef __unix__

#define DllExport extern

#else

#define DllExport  __declspec( dllexport )

#endif // __unix__

#ifdef __cplusplus

#include <lua.hpp>

#else

extern "C" {

#include "lua.h"

#include "lualib.h"

#include "lauxlib.h"

}

#endif // __cplusplus

#ifdef __cplusplus

extern "C" { // 告诉编译器以C的方式编译, 防止变量名称及函数名称粉碎问题

#endif // __cplusplus

/* 此函数为C库中的“特殊函数", 在Windows系统中必须使用"__declspec( dllexport )"导出, 在类Unix上使用"extern"导出

 * 通过调用它注册所有C库中的函数，并将它们存储在适当的位置。

 * 此函数的命名规则应遵循：

 * 1、使用"luaopen_"作为前缀。

 * 2、前缀之后的名字将作为"require"的参数, 所以此名字必须和生成的dll同名否则找不到对应的库

 */

DllExport int luaopen_cl01(lua_State* L);

#ifdef __cplusplus

} /* extern "C" */

#endif // __cplusplus

#endif // __MYTEST_H__

/* End of mytest.h */

C模块mytest.c文件源码：

/* Start of mytest.c */

#include <stdio.h>

#include <math.h>

#include <stdarg.h>

#include <stdlib.h>

#include "mytest.h"

#ifdef __cplusplus

extern "C" { // 告诉编译器以C的方式编译, 防止变量名称及函数名称粉碎问题

#endif // __cplusplus

/* 所有注册给Lua的C函数具有

 * "typedef int (*lua_CFunction) (lua_State *L);"的原型。

 */

static int l_sin(lua_State *L)

{

    // 如果给定虚拟栈中索引处的元素可以转换为数字，则返回转换后的数字，否则报错。

    double d = luaL_checknumber(L, );

    lua_pushnumber(L, sin(d));  /* push result */

    /* 这里可以看出，C可以返回给Lua多个结果，

     * 通过多次调用lua_push*()，之后return返回结果的数量。

     */

    return ;  /* number of results */

}

/* 需要一个"luaL_Reg"类型的结构体，其中每一个元素对应一个提供给Lua的函数。

 * 每一个元素中包含此函数在Lua中的名字，以及该函数在C库中的函数指针。

 * 最后一个元素为“哨兵元素”（两个"NULL"），用于告诉Lua没有其他的函数需要注册。

 */

static const struct luaL_Reg cl01[] = {

    {"mysin", l_sin},

    {NULL, NULL}

};

/* 此函数为C库中的“特殊函数", 在Windows系统中必须使用"__declspec( dllexport )"导出, 在类Unix上使用"extern"导出

 * 通过调用它注册所有C库中的函数，并将它们存储在适当的位置。

 * 此函数的命名规则应遵循：

 * 1、使用"luaopen_"作为前缀。

 * 2、前缀之后的名字将作为"require"的参数, 所以此名字必须和生成的dll同名否则找不到对应的库

 */

DllExport int luaopen_cl01(lua_State* L)

{

    /* void luaL_newlib (lua_State *L, const luaL_Reg l[]);

     * 创建一个新的"table"，并将"l"中所列出的函数注册为"table"的域。

     */

    luaL_newlib(L, cl01);

    return ;

}

#ifdef __cplusplus

} /* extern "C" */

#endif // __cplusplus

/* End of mytest.c */

点击生成，产生以下文件

我们只需要将 cl01.dll 文件，拷贝到Lua的工作目录下即可。

LuaFile1.lua 文件源码：

--region LuaFile1.lua

--Date

--此文件由[BabeLua]插件自动生成

io.write(string.format("-------->>> %s <<<--------\n", "testing ...")) -- 此函数不会自动换行

local cl01lib = require("cl01")

print("mysin(3.14 /2) result: ", cl01lib.mysin(3.14 /))

-- 通过调用控制台命令行使程序暂停

-- os.execute("pause")

--endregion

运行结果现象：