关闭

Lua学习笔记五

620人阅读 评论(0) 收藏 举报
分类:

Lua学习笔记五

通过前面4次的学习,我们已经具备了一些基本知识:
1、使用Lua脚本语法
2、编写Lua函数和C函数,并使他们交互
3、表和其他类型的参数的应用
4、处理函数的返回值的方法
很好,很强大。这些知识足以开启Lua世界的大门,现在让我们来真正的进入Lua的世界。

本节的目的:写一套操作动态浮点数组的函数,并把他们封装成库,侧重点为编写函数库的基本套路。 


读到这里可以发现,该系列文章是从开发者的角度来进行Lua学习,而不是一般文章中介绍Lua语法和如何编写Lua脚本的角度。事实上我也正有此意--把以前的工作全部封装成Lua接口,然后只要懂得Lua脚本语法的人,就可以参与到我们的项目里来。

 


 

记得上节我们写的2个Lua脚本函数吗?他们是:

NewWindow = CreateWindow{ x = 0,y = 0, w = 1024, h = 768} ;
AddButton{hWindow = NewWindow , x =100, y = 100, w = 75, h = 25};

但是他们还不够好,以下的方式更符合我们习惯:

NewWindow = Object.CreateWindow();
Object.AddCompent{ Type = Button, HWND = NewWindow, x = 100, y = 100, w = 75, h = 25};
Object.Show(NewWindow);
Object.Destory(NewWindow);

这个Object 就是我们封装了一套处理窗体操作的函数库。
当然,我不能给出Object库的代码,因为它太大了。不过,让我们来写一套操作动态浮点数组的函数,并把他们封装成库吧。


 RTFS,RTFS,RTRTRTFS~~

-------以下是Lua脚本--------
--test.lua
function f( x, y)
 return x + y
end

LuaC_MessageBox( "Hello World!");

--这三句是普通的函数交互,因为不能在你们的代码中通过,所以注释起来。
--NewWindow = CreateWindow{ x = 0, y = 0, w = 1024, h = 768} ;
--AddButton{hWindow = NewWindow , x =100, y = 100, w = 75, h = 25};
--ShowWindow( NewWindow);

--这是我下个要实现的目标,暂时没找到方法。
--NewWindow.add_button{ x = 100, y = 100, w = 40, h = 18, dp2 = "button1"}
--NewWindow.add_bitmap{ x = 0, y = 0, w = 640, h 480}

--这两句是基于函数库的语法。
NewObject = object.new( 8);
LuaC_MessageBox( object.count(NewObject)); 

//------------以下是test.cpp文件----------------
// 由于总是在上一次的基础上进行的添加,因此已经实现过了的函数体我就省略了。
// 这也是与“给出完整可编译代码段”的原则的妥协---不然代码就太多了。
// 这次的代码可以编译通过,我移除了Allegro相关的东西。因为Userdata的尝试是在那个环境下
// 测试的,所以才用它举例。为了保持通用性和“给出完整可编译代码段”的原则,我会尽量用
// 原生态的例子来阐述问题。

//================================================================================================================
//           Lua Test Object
//           C++ Source lua_test.cpp
//================================================================================================================
//================================================================================================================
//           Include Files
//================================================================================================================
extern "C"
{
 #include "D://My Documents//Visual Studio 2005//Projects//lua//lua//lua.h"
 #include "D://My Documents//Visual Studio 2005//Projects//lua//lua//lualib.h"
 #include "D://My Documents//Visual Studio 2005//Projects//lua//lua//lauxlib.h"
}

#include <windows.h>
#include <stdio.h>
#include <string>
using namespace std;
//================================================================================================================
//           Libraries
//================================================================================================================
#pragma comment( lib ,"D://My Documents//Visual Studio 2005//Projects//lua//release//lua.lib")
//================================================================================================================
//           Type Define
//================================================================================================================
typedef struct MyStruct_TAG
{
 int   count;
 double _array[1];
}MyStruct,*MyStruct_PTR;

//================================================================================================================
//           Global Variables
//================================================================================================================
lua_State *L;
//================================================================================================================
//           Lua Functions
//================================================================================================================
double f( double x, double y )
{
  // 已经实现
}
//================================================================================================================
//           C/C++ Functions
//================================================================================================================
int LuaC_MessageBox( lua_State *L)
{
   // 已经实现
}

int LuaC_GetObject( lua_State* L)
{
 // LuaC_GetObject( object, index)
 // 获取第1个参数
 MyStruct_PTR object = (MyStruct_PTR)lua_touserdata(L, 1);
 // 获取第2个参数
 int index = luaL_checkint( L, 2);
 // 参数有效性判断
 luaL_argcheck(L, object != NULL, 1, "`object expected");
 luaL_argcheck(L, 1 <= index && index <= object->count, 2, "index out of range");
 // 返回值压栈
 lua_pushnumber(L, object->_array[index - 1]);
 // 设置返回参数个数
 return 1;
}

 

int LuaC_CreateObject( lua_State *)
{
 int   count;
 size_t size;
 void*  lp;

 // LuaC_CreateObject(1000)
 // 获取参数
 count = luaL_checkint(L, 1);
 // 计算大小
 size = sizeof(MyStruct) + (count - 1) * sizeof( double);
 // 申请空间
 lp = lua_newuserdata( L, size);
 // 初始化
 memset( lp, '/0',size);
 // 设置个数
 ((MyStruct_PTR)lp)->count = count;

 // 设置返回值个数
 return 1;
}

int LuaC_SetObject(lua_State *L)
{
 // LuaC_SetObject( object, value, index)
 // 获取第1个参数
 MyStruct_PTR object = (MyStruct_PTR)lua_touserdata(L, 1);
 // 获取第2个参数
 double value = luaL_checknumber( L, 2);
 // 获取第3个参数
 int index = luaL_checkint( L, 3);
 // 参数有效性判断
 luaL_argcheck(L, object != NULL, 1, "`object expected");
 luaL_argcheck(L, 1 <= index && index <= object->count, 2, "index out of range");
 // 执行逻辑
 object->_array[index - 1] = value;

 // 设置返回参数个数
 return 0;
}

 

int LuaC_GetCount( lua_State* L)
{
 // LuaC_GetCount( object)
 // 获取第1个参数
 MyStruct_PTR object = (MyStruct_PTR)lua_touserdata(L, 1);
 // 参数有效性判断
 luaL_argcheck(L, object != NULL, 1, "`object expected");
 // 返回值压栈
 lua_pushnumber(L, object->count);
 // 设置返回参数个数
 return 1;
}

// 初始化库
static const struct luaL_reg object_lib[] =
{
 {"new",   LuaC_CreateObject},
 {"set",   LuaC_SetObject},
 {"get",   LuaC_GetObject},
 {"count",  LuaC_GetCount},
 {NULL, NULL}
};

int _luaopen_object (lua_State *L)
{
 luaL_openlib(L, "object", object_lib, 0);
 return 1;
}
//================================================================================================================
//           Main Functions
//================================================================================================================
int main( void)
{

 int error;

 L = lua_open();
 luaopen_base(L);
 luaL_openlibs(L);
 // 自己的扩展库
 _luaopen_object(L);

 // 注册C/C++函数
 lua_register( L, "LuaC_MessageBox", LuaC_MessageBox); 

 //luaopen_table(L);
 //luaopen_io(L);
 //luaopen_string(L);
 //luaopen_math(L);

 /*
 while( fgets( buff, sizeof( buff), stdin ) != NULL)
 {
  error = luaL_loadbuffer( L, buff, strlen(buff),"line") || lua_pcall( L,0,0,0);
  if ( error )
  {
   fprintf( stderr, "%s", lua_tostring( L, -1));
   lua_pop( L, 1);
  }
 }
 */
 // load the script
 if ( (error = luaL_dofile(L, "test.lua")) != 0)
 {
  allegro_message( "error!!");
  return 0;
 }
 /*
 double ret = f( 10, 3.4);
 printf( "ret = %f", ret);

 getchar();
 */
 lua_close( L);
 return 1;
}
END_OF_MAIN();

 


 

代码里面的注释越来越多了,不是吗?很多时候就是这个样子样,看代码比看文字要来的直接。

新出现了很多Lua库函数调用,不过都是涉及参数有效性检测的函数。所以如果你不了解用法的话,最好查找《Lua参考手册》。另外,记得下载的Lua源码吗?在名为“doc”的文件夹里有一个contents.html,打开看看吧。

好了,现在让我们把注意力转回今天的重点。

写一个自己的库的步骤是:

1、写一套功能函数,如:
int LuaC_CreateObject( lua_State *)
int LuaC_SetObject(lua_State *L)
int LuaC_GetObject(lua_State *L)
int LuaC_GetObjectCount(lua_State *L)

在这个步骤里,与编写普通的C/Lua交互函数没有什么区别。

2、声明一个Lua表,作为函数库,如:
// 初始化库
static const struct luaL_reg object_lib[] =
{
 {"new",   LuaC_CreateObject},
 {"set",   LuaC_SetObject},
 {"get",   LuaC_GetObject},
 {"count",  LuaC_GetCount},
 {NULL, NULL}
};

注意上面的粗体,声明一个作为库的表,需要使用关键字 Static const
另外这个结构体 struct luaL_reg:
typedef struct luaL_Reg {
  const char *name;
  lua_CFunction func;
} luaL_Reg;
作为库的表实际上就是一个luaL_Reg类型的数组。Lua中其他一些标准库也都是按照这个规矩来定义的。
最后这个数组需要使用一个哑员(空值)来作为结束符。

3、调用luaL_openlib();函数,如:

int _luaopen_object (lua_State *L)
{
 luaL_openlib(L, "object", object_lib, 0);
 return 1;
}

在这里,我把这个函数封装了一下,只是为了风格统一。另外,在所有我自己写的类似Lua原有函数的函数前面我都加了下划线,为了几个月后让我明白:这是我自己写的,而不是Lua自己带的。另外,这是跟Andre LaMothe学的。

4、在main函数里加载库。如:

 // 自己的扩展库
 _luaopen_object(L);

 

OK.以上就是编写自己的库的基本套路。
如果一切正常的话,会弹出一个对话框,告诉你刚刚申请的数组对象有8个元素。

好了,下一个笔记可能会是  “面向对象”、“Weaktable(弱表)”、“lightuserdata的应用”、“Metatable(元表)”、4个内容中的一个或几个。如果你学习的够快的话,代替我来写这些内容吧``

0
0

查看评论
* 以上用户言论只代表其个人观点,不代表CSDN网站的观点或立场
    个人资料
    • 访问:561912次
    • 积分:7247
    • 等级:
    • 排名:第3243名
    • 原创:7篇
    • 转载:315篇
    • 译文:0篇
    • 评论:60条
    最新评论