1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
|
#include "common/je_lua_common.h"
#include "common/je_lua_proxy.h"
#include "libjin/jin.h"
#include "je_lua_bitmap.h"
using namespace JinEngine::Graphics;
namespace JinEngine
{
namespace Lua
{
const char* Jin_Lua_Bitmap = "Bitmap";
typedef Shared<Bitmap>& SharedBitmap;
LUA_IMPLEMENT inline SharedBitmap checkBitmap(lua_State* L)
{
Proxy* proxy = (Proxy*)luax_checktype(L, 1, Jin_Lua_Bitmap);
return proxy->getShared<Bitmap>();
}
LUA_IMPLEMENT int l_gc(lua_State* L)
{
SharedBitmap shared = checkBitmap(L);
shared.release();
return 0;
}
LUA_IMPLEMENT int l_getWidth(lua_State* L)
{
SharedBitmap shared = checkBitmap(L);
int w = shared->getWidth();
luax_pushinteger(L, w);
return 1;
}
LUA_IMPLEMENT int l_getHeight(lua_State* L)
{
SharedBitmap shared = checkBitmap(L);
int h = shared->getHeight();
luax_pushinteger(L, h);
return 1;
}
LUA_IMPLEMENT int l_getSize(lua_State* L)
{
SharedBitmap shared = checkBitmap(L);
int w = shared->getWidth();
int h = shared->getHeight();
luax_pushinteger(L, w);
luax_pushinteger(L, h);
return 2;
}
LUA_IMPLEMENT int l_getPixel(lua_State* L)
{
SharedBitmap shared = checkBitmap(L);
int x = luax_checkinteger(L, 2);
int y = luax_checkinteger(L, 3);
Color col = shared->getPixel(x, y);
luax_pushinteger(L, col.r);
luax_pushinteger(L, col.g);
luax_pushinteger(L, col.b);
luax_pushinteger(L, col.a);
return 4;
}
LUA_IMPLEMENT int l_setPixel(lua_State* L)
{
SharedBitmap shared = checkBitmap(L);
int x = luax_checkinteger(L, 2);
int y = luax_checkinteger(L, 3);
if (!luax_istable(L, 4))
{
luax_typerror(L, 4, "table");
return 1;
}
unsigned int r = luax_rawgetnumber(L, 4, 1);
unsigned int g = luax_rawgetnumber(L, 4, 2);
unsigned int b = luax_rawgetnumber(L, 4, 3);
unsigned int a = luax_rawgetnumber(L, 4, 4);
shared->setPixel(Color(r, g, b, a), x, y);
return 0;
}
LUA_IMPLEMENT int l_clone(lua_State* L)
{
SharedBitmap shared = checkBitmap(L);
Bitmap* bitmap = shared.getObject();
Bitmap* b = Bitmap::clone(bitmap);
Proxy* proxy = luax_newinstance(L, Jin_Lua_Bitmap, new Shared<Bitmap>(L, b, Jin_Lua_Bitmap));
return 1;
}
LUA_EXPORT void luaopen_Bitmap(lua_State* L)
{
luaL_Reg methods[] = {
{ "__gc", l_gc },
{ "getWidth", l_getWidth },
{ "getHeight", l_getHeight },
{ "getSize", l_getSize },
{ "getPixel", l_getPixel },
{ "setPixel", l_setPixel },
{ "clone", l_clone },
{ 0, 0 }
};
luax_newtype(L, Jin_Lua_Bitmap, methods);
}
} // namespace Graphics
} // namespace JinEngine
|
