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
114
115
116
117
118
119
120
121
122
123
|
#include "../data_buffer.h"
using namespace Luax;
namespace AsuraEngine
{
namespace IO
{
LUAX_REGISTRY(DataBuffer)
{
LUAX_REGISTER_METHODS(state,
{ "New", _New },
{ "GetData", _GetData },
{ "GetSize", _GetSize },
{ "Refactor", _Refactor },
{ "Load", _Load },
{ "Clear", _Clear }
);
}
LUAX_POSTPROCESS(DataBuffer)
{
}
// databuffer = DataBuffer.New(lstring)
// databuffer = DataBuffer.New(size)
LUAX_IMPL_METHOD(DataBuffer, _New)
{
LUAX_STATE(L);
if (state.IsType(1, LUA_TSTRING))
{
size_t size;
const byte* bytes = lua_tolstring(L, 1, &size);
DataBuffer* buffer = new DataBuffer(bytes, size);
buffer->PushLuaxUserdata(state);
return 1;
}
else if (state.IsType(1, LUA_TNUMBER))
{
size_t size = lua_tonumber(L, 1);
DataBuffer* buffer = new DataBuffer(size);
buffer->PushLuaxUserdata(state);
return 1;
}
else
{
return state.ErrorType(1, "number or string");
}
}
// lsting, len = databuffer:GetData()
LUAX_IMPL_METHOD(DataBuffer, _GetData)
{
LUAX_SETUP(L, "U");
DataBuffer* self = state.GetUserdata<DataBuffer>(1);
lua_pushlstring(L, self->GetData(), self->GetSize());
return 1;
}
// length = databuffer:GetSize()
LUAX_IMPL_METHOD(DataBuffer, _GetSize)
{
LUAX_SETUP(L, "U");
DataBuffer* self = state.GetUserdata<DataBuffer>(1);
lua_pushinteger(L, self->GetSize());
return 1;
}
// databuffer:Refactor(size)
LUAX_IMPL_METHOD(DataBuffer, _Refactor)
{
LUAX_PREPARE(L, DataBuffer);
size_t size = state.CheckValue<int>(2);
self->Refactor(size);
return 0;
}
// size = databuffer:Load(lstring)
// size = databuffer:Load(src)
LUAX_IMPL_METHOD(DataBuffer, _Load)
{
LUAX_STATE(L);
DataBuffer* buffer = state.GetUserdata<DataBuffer>(1);
const byte* data;
size_t size;
if (state.IsType(2, LUA_TSTRING))
{
data = lua_tolstring(L, 2, &size);
size_t len = buffer->Load(data, size);
state.Push(len);
return 1;
}
else if(state.IsType(2, LUA_TUSERDATA))
{
DataBuffer* src = state.CheckUserdata<DataBuffer>(2);
size_t len = buffer->Load(*src);
state.Push(len);
return 1;
}
else
{
return state.ErrorType(1, "lstring or DataBuffer");
}
}
// databuffer:Clear()
LUAX_IMPL_METHOD(DataBuffer, _Clear)
{
LUAX_SETUP(L, "U");
DataBuffer* self = state.GetUserdata<DataBuffer>(1);
self->Clear();
return 0;
}
}
}
|
