Lua绑定C++类

原文：http://blog.csdn.net/chenee543216/article/details/12074771

以下是代码：

Animal.h文件

1. #pragma once
2. #ifndef __ANIMAL_H__
3. #define __ANIMAL_H__
4. class Animal
5. {
6. public:
7. Animal( const char *name );
8. void setAge( int age );
9. int getAge();
10. void sound();
11. ~Animal(void);
12. private:
13. const char *name;
14. int age;
15. };
16. #endif

Animal.cpp文件

1. #include "stdafx.h"
2. #include "Animal.h"
3. Animal::Animal( const char* name ):age(0)
4. {
5. this->name = name;
6. }
7. Animal::~Animal(void)
8. {
9. printf( "Animal destructor." );
10. }
11. void Animal::setAge( int age )
12. {
13. this->age = age;
14. }
15. int Animal::getAge()
16. {
17. return this->age;
18. }
19. void Animal::sound()
20. {
21. printf("--Animal-- name: %s, age:%d\n", this->name, this->age );
22. }

LuaAimal.h

1. #pragma once
2. #ifndef __LUA_ANIMAL__
3. #define __LUA_ANIMAL__
4. class Animal;
5. class LuaAnimal
6. {
7. public:
8. ~LuaAnimal(void);
9. static void Register( lua_State *l );
10. private:
11. static const char *className;
12. static const luaL_reg methods[];
13. static const luaL_reg methods_f[];
14. static int create( lua_State *l );
15. static int gc_animal( lua_State *l );
16. static Animal *getAnimal( lua_State *l );
17. static int sound( lua_State *l );
18. static int setAge(lua_State *l);
19. static int getAge(lua_State *l);
20. };
21. #endif

LuaAnimal.cpp

1. #include "stdafx.h"
2. #include "LuaAnimal.h"
3. #include "Animal.h"
4. #include "Utlis.h"
5. const char *LuaAnimal::className = "Animal";
6. const luaL_reg LuaAnimal::methods[] = {
7. {"sound", LuaAnimal::sound },
8. {"setAge", LuaAnimal::setAge},
9. {"getAge", LuaAnimal::getAge},
10. {"__gc", LuaAnimal::gc_animal},
11. {NULL,NULL}
12. };
13. const luaL_reg LuaAnimal::methods_f[] = {
14. { "create", LuaAnimal::create },
15. { NULL, NULL}
16. };
17. LuaAnimal::~LuaAnimal(void)
18. {
19. }
20. void LuaAnimal::Register( lua_State *l )
21. {
22. //1. new method table for l to save functions
23. lua_newtable(l);
24. int methodTable = lua_gettop(l);
25. //2.new metatable for L to save "__metatable", "__index",  "__gc", etc
26. luaL_newmetatable(l, className );
27. int metaTable = lua_gettop(l);
28. //3.0 metatable["__metatable"] = methodtable;
29. lua_pushliteral( l, "__metatable" );  //remove \0
30. lua_pushvalue( l, methodTable );
31. lua_settable( l, metaTable );
32. //4.0 metatable["__index"] = methodtable
33. lua_pushliteral( l, "__index" );
34. lua_pushvalue( l, methodTable );
35. lua_rawset( l, metaTable );  // the same as lua_settable(1,metatable)
36. //5.0 metatable["__gc"] = gc_animal  //will be called when lua_close(l)
37. lua_pushliteral( l, "__gc" );
38. lua_pushcfunction( l, LuaAnimal::gc_animal );
39. lua_rawset( l, metaTable );
40. lua_pop(l,1);   //drop metatable
41. /*6.0　for object
42. name -- null set object funtion to methodtable( the table on top );
43. eg: Animal a = Animal("xxx")
44. a:func in this methodtable
45. fill methodtable, is libname is not null,
46. will create a table use the libname and push the table to stack*/
47. luaL_openlib( l, NULL, methods, 0 );
48. lua_pop(l,1);       //drop methodtable
49. /*7.1 for class:
50. name = className, so this set function to "method_f"
51. eg: Animal a = Animal:create( "xx" );
52. Animal:create() in this method_f tables
53. */
54. luaL_openlib( l, className, methods_f, 0 );  //push table[className] to stack
55. lua_pop(l,1); //drop table[className]
56. /*7.2 for class:
57. add global function "className", so we Animal() is a global function now
58. eg: Animal a = Animal("xx")
59. function Animal() in lua will call create in C++
60. */
61. //lua_register(l, className, LuaAnimal::create );
62. }
63. int LuaAnimal::create( lua_State *l )
64. {
65. const char*name = lua_tostring(l,-1);
66. Animal *a = new Animal(name);
67. void **p = (void**)lua_newuserdata( l, sizeof(void*));
68. *p = a;
69. luaL_getmetatable( l, className );
70. lua_setmetatable( l, -2 );
71. return 1;
72. }
73. Animal* LuaAnimal::getAnimal( lua_State *l )
74. {
75. luaL_checktype( l, 1, LUA_TUSERDATA ); //indicate what type to check
76. void *ud = luaL_checkudata( l, 1, className );
77. if( !ud )
78. luaL_typerror( l, 1, className );
79. return *(Animal**)ud;
80. }
81. int LuaAnimal::gc_animal( lua_State *l )
82. {
83. Utlis::stackDump(l);
84. Animal *a = (Animal*)(*(void**)lua_touserdata(l,-1));
85. delete a;
86. return 0;
87. }
88. int LuaAnimal::getAge( lua_State *l )
89. {
90. Animal *a = getAnimal(l);
91. lua_pushinteger(l, a->getAge());
92. return 1;
93. }
94. int LuaAnimal::setAge( lua_State *l )
95. {
96. Animal *a = getAnimal(l);
97. int age = luaL_checkint(l,2);
98. a->setAge( age );
99. return 0;
100. }
101. int LuaAnimal::sound( lua_State *l )
102. {
103. Animal *a = getAnimal(l);
104. a->sound();
105. return 0;
106. }

工具类Utils，使用查看lua堆栈情况

Utils.h

1. #pragma once
2. #ifndef __UTLIS_H__
3. #define __UTLIS_H__
4. class Utlis
5. {
6. public:
7. Utlis(void);
8. ~Utlis(void);
9. static void stackDump( lua_State *l );
10. };
11. #endif

Utils.cpp

1. #include "stdafx.h"
2. #include "Utlis.h"
3. Utlis::Utlis(void)
4. {
5. }
6. Utlis::~Utlis(void)
7. {
8. }
9. void Utlis::stackDump( lua_State *l )
10. {
11. int i;
12. int top = lua_gettop( l );
13. printf("------start-----%d\n", top);
14. for( i = 1; i <= top; i++ )
15. {
16. int t = lua_type( l, i );
17. printf("type: %s value:", lua_typename(l,t));
18. switch (t)
19. {
20. case LUA_TSTRING:
21. printf("%s", lua_tostring(l,i));
22. break;
23. case LUA_TBOOLEAN:
24. printf( lua_toboolean(l,i)? "true" : "false" );
25. break;
26. case LUA_TNUMBER:
27. printf("%g", lua_tonumber(l,i));
28. break;
29. default:
30. printf("%s", lua_typename(l,t));
31. break;
32. }
33. printf("\n");
34. }
35. printf("------end----\n" );
36. }

lua测试代码

main.lua

1. print( "test lua access C++ class" )
2. local function main()
3. --使用luaL_openlib( l, className, methods_f, 0 )注册，
4. --Animal是个table, 调用create方法
5. --local s = Animal.create("xx") --lua_gettop()=1 1:xx
6. local s = Animal:create("xx") --lua_gettop()=2 1:table, 2:xx, 相比.create多了一个table，指Animal本身
7. s:setAge(100)
8. s:sound()
9. --使用lua_register(l, className, LuaAnimal::create )注册
10. --Animal是个函数，直接调用方法
11. --local a = Animal("ww")
12. --a:setAge(20)
13. --a:sound()
14. end
15. main()

最后是C++测试代码

main.cpp

1. // TestLua.cpp : 定义控制台应用程序的入口点。
2. //
3. #include "stdafx.h"
4. #include "Utlis.h"
5. #include "LuaAnimal.h"
6. using namespace std;
7. int _tmain(int argc, _TCHAR* argv[])
8. {
9. lua_State *l = lua_open();
10. luaL_openlibs(l);
11. LuaAnimal::Register(l);
12. Utlis::stackDump(l);
13. if( luaL_dofile( l, "main.lua" )){  // load and call
14. Utlis::stackDump(l);
15. }
16. Utlis::stackDump(l);
17. system("pause");
18. lua_close(l);
19. return 0;
20. }