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
|
#include "lua/modules/luax.h"
#include "lua/modules/types.h"
#include "lua/common/common.h"
#include "libjin/jin.h"
namespace jin
{
namespace lua
{
using namespace jin::graphics;
typedef Ref<Font>& FontRef;
static int l_gc(lua_State* L)
{
Proxy* proxy = (Proxy*)luax_checktype(L, 1, JIN_GRAPHICS_FONT);
proxy->release();
return 0;
}
static int l_typeset(lua_State* L)
{
Proxy* p = (Proxy*)luax_checktype(L, 1, JIN_GRAPHICS_FONT);
const char* text = luax_checkstring(L, 2);
int lineheight = luax_checkinteger(L, 3);
int spacing = luax_checkinteger(L, 4);
Ref<Font>& refFont = p->getRef<Font>();
Font* font = refFont.getObject();
Proxy* proxy = (Proxy*)luax_newinstance(L, JIN_GRAPHICS_PAGE, sizeof(Proxy));
Page* page = font->typeset(text, lineheight, spacing);
proxy->bind(new Ref<Page>(page, JIN_GRAPHICS_PAGE));
return 1;
}
static int l_print(lua_State* L)
{
Proxy* pFont = (Proxy*)luax_checktype(L, 1, JIN_GRAPHICS_FONT);
Font* font = pFont->getObject<Font>();
if (luax_istype(L, 2, JIN_GRAPHICS_PAGE))
{
Proxy* p = (Proxy*)luax_checktype(L, 2, JIN_GRAPHICS_PAGE);
Page* page = p->getObject<Page>();
int x = luax_checkinteger(L, 3);
int y = luax_checkinteger(L, 4);
font->print(page, x, y);
}
else if (luax_isstring(L, 2))
{
const char* text = luax_checkstring(L, 2);
int x = luax_checkinteger(L, 3);
int y = luax_checkinteger(L, 4);
int lh = luax_checkinteger(L, 5);
int sp = luax_checkinteger(L, 6);
font->print(text, x, y, lh, sp);
}
else
{
luax_typerror(L, 2, "font or string");
}
return 0;
}
static const luaL_Reg f[] = {
{ "__gc", l_gc },
{ "typeset", l_typeset },
{ "print", l_print },
{ 0, 0 }
};
int luaopen_Font(lua_State* L)
{
luax_newtype(L, JIN_GRAPHICS_FONT, f);
return 0;
}
} // lua
} // jin
|
