aboutsummaryrefslogtreecommitdiff
path: root/advtrains_interlocking/models/at_il_tcb_node.obj
blob: bb6aab50b405ef0a5b6960d93359738c9ec4e419 (plain)
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
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
# Blender v2.76 (sub 0) OBJ File: ''
# www.blender.org
mtllib at_il_tcb_node.mtl
o Cube
v 0.038370 -0.500000 -0.038370
v 0.038370 -0.500000 0.038370
v -0.038370 -0.500000 0.038370
v -0.038370 -0.500000 -0.038370
v 0.038370 0.098086 -0.038370
v 0.038370 0.098086 0.038370
v -0.038370 0.098086 0.038370
v -0.038370 0.098086 -0.038370
v -0.182395 0.065479 0.099357
v -0.182395 0.182395 0.099357
v -0.182395 0.065479 -0.171034
v -0.182395 0.182395 -0.171034
v 0.182395 0.065479 0.099357
v 0.182395 0.182395 0.099357
v 0.182395 0.065479 -0.171034
v 0.182395 0.182395 -0.171034
v -0.112374 0.070035 -0.139406
v -0.112374 -0.500000 -0.139406
v 0.112189 -0.500000 -0.139406
v 0.112189 0.070035 -0.139406
v 0.122883 -0.500000 -0.137278
v 0.122883 0.070035 -0.137278
v 0.131950 -0.500000 -0.131220
v 0.131950 0.070035 -0.131220
v 0.138008 -0.500000 -0.122154
v 0.138008 0.070035 -0.122154
v 0.140135 -0.500000 -0.111459
v 0.140135 0.070035 -0.111459
v 0.138008 -0.500000 -0.100765
v 0.138008 0.070035 -0.100765
v 0.131950 -0.500000 -0.091698
v 0.131950 0.070035 -0.091698
v 0.122883 -0.500000 -0.085640
v 0.122883 0.070035 -0.085640
v 0.112189 -0.500000 -0.083513
v 0.112189 0.070035 -0.083513
v 0.101494 -0.500000 -0.085640
v 0.101494 0.070035 -0.085640
v 0.092428 -0.500000 -0.091698
v 0.092428 0.070035 -0.091698
v 0.086370 -0.500000 -0.100765
v 0.086370 0.070035 -0.100765
v 0.084242 -0.500000 -0.111459
v 0.084242 0.070035 -0.111459
v 0.086370 -0.500000 -0.122154
v 0.086370 0.070035 -0.122154
v 0.092428 -0.500000 -0.131220
v 0.092428 0.070035 -0.131220
v 0.101494 -0.500000 -0.137278
v 0.101494 0.070035 -0.137278
v -0.101679 -0.500000 -0.137278
v -0.101679 0.070035 -0.137278
v -0.092613 -0.500000 -0.131220
v -0.092613 0.070035 -0.131220
v -0.086555 -0.500000 -0.122154
v -0.086555 0.070035 -0.122154
v -0.084428 -0.500000 -0.111459
v -0.084428 0.070035 -0.111459
v -0.086555 -0.500000 -0.100765
v -0.086555 0.070035 -0.100765
v -0.092613 -0.500000 -0.091698
v -0.092613 0.070035 -0.091698
v -0.101679 -0.500000 -0.085640
v -0.101679 0.070035 -0.085640
v -0.112374 -0.500000 -0.083513
v -0.112374 0.070035 -0.083513
v -0.123069 -0.500000 -0.085640
v -0.123069 0.070035 -0.085640
v -0.132135 -0.500000 -0.091698
v -0.132135 0.070035 -0.091698
v -0.138193 -0.500000 -0.100765
v -0.138193 0.070035 -0.100765
v -0.140320 -0.500000 -0.111459
v -0.140320 0.070035 -0.111459
v -0.138193 -0.500000 -0.122154
v -0.138193 0.070035 -0.122154
v -0.132135 -0.500000 -0.131220
v -0.132135 0.070035 -0.131220
v -0.123069 -0.500000 -0.137278
v -0.123069 0.070035 -0.137278
vt 0.876073 0.266665
vt 0.876073 0.977812
vt 0.784827 0.977812
vt 0.784827 0.266665
vt 0.693582 0.977812
vt 0.693582 0.266665
vt 0.602336 0.977812
vt 0.602336 0.266665
vt 0.967319 0.266665
vt 0.967319 0.977812
vt 0.147929 0.032040
vt 0.469434 0.032040
vt 0.469434 0.171057
vt 0.147929 0.171057
vt 0.903184 0.032040
vt 0.903184 0.171057
vt 0.147929 0.032751
vt 0.469434 0.032751
vt 0.469434 0.171768
vt 0.147929 0.171768
vt 0.903184 0.032751
vt 0.903183 0.171768
vt 0.263807 0.270252
vt 0.585312 0.270252
vt 0.585312 0.704001
vt 0.263807 0.704001
vt 0.584297 0.703059
vt 0.262792 0.703059
vt 0.262793 0.269309
vt 0.584297 0.269309
vt 0.108472 0.980897
vt 0.108473 0.303114
vt 0.121438 0.303114
vt 0.121438 0.980897
vt 0.081877 0.980125
vt 0.081879 0.302342
vt 0.094844 0.302342
vt 0.094843 0.980125
vt 0.095507 0.980897
vt 0.095508 0.303114
vt 0.107809 0.302342
vt 0.107808 0.980125
vt 0.082541 0.980897
vt 0.082543 0.303114
vt 0.120774 0.302342
vt 0.120774 0.980125
vt 0.069575 0.980897
vt 0.069577 0.303114
vt 0.133739 0.302342
vt 0.133740 0.980125
vt 0.056609 0.980897
vt 0.056612 0.303114
vt 0.146705 0.302342
vt 0.146706 0.980125
vt 0.043643 0.980897
vt 0.043647 0.303114
vt 0.159670 0.302342
vt 0.159672 0.980125
vt 0.030677 0.980897
vt 0.030682 0.303113
vt 0.172635 0.302342
vt 0.172638 0.980125
vt 0.017711 0.980897
vt 0.017717 0.303113
vt 0.185600 0.302342
vt 0.185604 0.980125
vt 0.212200 0.980896
vt 0.212195 0.303113
vt 0.225160 0.303113
vt 0.225166 0.980896
vt 0.198565 0.302342
vt 0.198570 0.980125
vt 0.199234 0.980897
vt 0.199230 0.303114
vt 0.211531 0.302342
vt 0.211536 0.980125
vt 0.186268 0.980897
vt 0.186264 0.303114
vt 0.224496 0.302342
vt 0.224502 0.980125
vt 0.173302 0.980897
vt 0.173299 0.303114
vt 0.017047 0.980125
vt 0.017052 0.302342
vt 0.030018 0.302342
vt 0.030013 0.980125
vt 0.134403 0.303114
vt 0.134404 0.980897
vt 0.160336 0.980897
vt 0.160334 0.303114
vt 0.042983 0.302342
vt 0.042979 0.980125
vt 0.147369 0.303114
vt 0.147370 0.980897
vt 0.055948 0.302342
vt 0.055945 0.980125
vt 0.068911 0.980125
vt 0.068913 0.302342
vn 1.000000 0.000000 0.000000
vn -0.000000 -0.000000 1.000000
vn -1.000000 -0.000000 -0.000000
vn 0.000000 0.000000 -1.000000
vn 0.000000 -1.000000 0.000000
vn 0.000000 1.000000 0.000000
vn -0.831500 0.000000 -0.555600
vn 0.195100 0.000000 -0.980800
vn -0.980800 0.000000 -0.195100
vn 0.555600 0.000000 -0.831500
vn -0.980800 0.000000 0.195100
vn 0.831500 0.000000 -0.555600
vn -0.831500 0.000000 0.555600
vn 0.980800 0.000000 -0.195100
vn -0.555600 0.000000 0.831500
vn 0.980800 0.000000 0.195100
vn -0.195100 0.000000 0.980800
vn 0.831500 0.000000 0.555600
vn 0.195100 0.000000 0.980800
vn 0.555600 0.000000 0.831500
vn -0.555600 0.000000 -0.831500
vn -0.195100 0.000000 -0.980800
usemtl Material
s off
f 1/1/1 5/2/1 6/3/1 2/4/1
f 2/4/2 6/3/2 7/5/2 3/6/2
f 3/6/3 7/5/3 8/7/3 4/8/3
f 5/2/4 1/1/4 4/9/4 8/10/4
f 10/11/3 12/12/3 11/13/3 9/14/3
f 12/12/4 16/15/4 15/16/4 11/13/4
f 16/17/1 14/18/1 13/19/1 15/20/1
f 14/18/2 10/21/2 9/22/2 13/19/2
f 9/23/5 11/24/5 15/25/5 13/26/5
f 14/27/6 16/28/6 12/29/6 10/30/6
f 75/31/7 76/32/7 78/33/7 77/34/7
f 19/35/8 20/36/8 22/37/8 21/38/8
f 73/39/9 74/40/9 76/32/9 75/31/9
f 21/38/10 22/37/10 24/41/10 23/42/10
f 71/43/11 72/44/11 74/40/11 73/39/11
f 23/42/12 24/41/12 26/45/12 25/46/12
f 69/47/13 70/48/13 72/44/13 71/43/13
f 25/46/14 26/45/14 28/49/14 27/50/14
f 67/51/15 68/52/15 70/48/15 69/47/15
f 27/50/16 28/49/16 30/53/16 29/54/16
f 65/55/17 66/56/17 68/52/17 67/51/17
f 29/54/18 30/53/18 32/57/18 31/58/18
f 63/59/19 64/60/19 66/56/19 65/55/19
f 31/58/20 32/57/20 34/61/20 33/62/20
f 61/63/20 62/64/20 64/60/20 63/59/20
f 33/62/19 34/61/19 36/65/19 35/66/19
f 59/67/18 60/68/18 62/69/18 61/70/18
f 35/66/17 36/65/17 38/71/17 37/72/17
f 57/73/16 58/74/16 60/68/16 59/67/16
f 37/72/15 38/71/15 40/75/15 39/76/15
f 55/77/14 56/78/14 58/74/14 57/73/14
f 39/76/13 40/75/13 42/79/13 41/80/13
f 53/81/12 54/82/12 56/78/12 55/77/12
f 41/83/11 42/84/11 44/85/11 43/86/11
f 77/34/21 78/33/21 80/87/21 79/88/21
f 51/89/10 52/90/10 54/82/10 53/81/10
f 43/86/9 44/85/9 46/91/9 45/92/9
f 79/88/22 80/87/22 17/93/22 18/94/22
f 18/94/8 17/93/8 52/90/8 51/89/8
f 45/92/7 46/91/7 48/95/7 47/96/7
f 49/97/22 50/98/22 20/36/22 19/35/22
f 47/96/21 48/95/21 50/98/21 49/97/21
n476' href='#n476'>476 477 478 479 480 481 482 483 484 485 486 487 488 489 490 491 492 493 494 495 496 497 498 499 500 501 502 503 504 505 506 507 508 509 510 511 512 513 514 515 516 517 518 519 520 521 522 523 524 525 526 527 528 529 530 531 532 533 534 535 536 537 538 539 540 541 542 543 544 545 546 547 548 549 550 551 552 553 554 555 556 557 558 559 560 561 562 563 564 565 566 567 568 569 570 571 572 573 574 575 576
/*
Minetest
Copyright (C) 2013 celeron55, Perttu Ahola <celeron55@gmail.com>

This program is free software; you can redistribute it and/or modify
it under the terms of the GNU Lesser General Public License as published by
the Free Software Foundation; either version 2.1 of the License, or
(at your option) any later version.

This program is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
GNU Lesser General Public License for more details.

You should have received a copy of the GNU Lesser General Public License along
with this program; if not, write to the Free Software Foundation, Inc.,
51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
*/

#include "lua_api/l_item.h"
#include "lua_api/l_internal.h"
#include "common/c_converter.h"
#include "common/c_content.h"
#include "itemdef.h"
#include "nodedef.h"
#include "server.h"
#include "content_sao.h"
#include "inventory.h"
#include "log.h"


// garbage collector
int LuaItemStack::gc_object(lua_State *L)
{
	LuaItemStack *o = *(LuaItemStack **)(lua_touserdata(L, 1));
	delete o;
	return 0;
}

// is_empty(self) -> true/false
int LuaItemStack::l_is_empty(lua_State *L)
{
	NO_MAP_LOCK_REQUIRED;
	LuaItemStack *o = checkobject(L, 1);
	ItemStack &item = o->m_stack;
	lua_pushboolean(L, item.empty());
	return 1;
}

// get_name(self) -> string
int LuaItemStack::l_get_name(lua_State *L)
{
	NO_MAP_LOCK_REQUIRED;
	LuaItemStack *o = checkobject(L, 1);
	ItemStack &item = o->m_stack;
	lua_pushstring(L, item.name.c_str());
	return 1;
}

// set_name(self, name)
int LuaItemStack::l_set_name(lua_State *L)
{
	NO_MAP_LOCK_REQUIRED;
	LuaItemStack *o = checkobject(L, 1);
	ItemStack &item = o->m_stack;

	bool status = true;
	item.name = luaL_checkstring(L, 2);
	if (item.name == "" || item.empty()) {
		item.clear();
		status = false;
	}

	lua_pushboolean(L, status);
	return 1;
}

// get_count(self) -> number
int LuaItemStack::l_get_count(lua_State *L)
{
	NO_MAP_LOCK_REQUIRED;
	LuaItemStack *o = checkobject(L, 1);
	ItemStack &item = o->m_stack;
	lua_pushinteger(L, item.count);
	return 1;
}

// set_count(self, number)
int LuaItemStack::l_set_count(lua_State *L)
{
	NO_MAP_LOCK_REQUIRED;
	LuaItemStack *o = checkobject(L, 1);
	ItemStack &item = o->m_stack;

	bool status;
	lua_Integer count = luaL_checkinteger(L, 2);
	if (count > 0 && count <= 65535) {
		item.count = count;
		status = true;
	} else {
		item.clear();
		status = false;
	}

	lua_pushboolean(L, status);
	return 1;
}

// get_wear(self) -> number
int LuaItemStack::l_get_wear(lua_State *L)
{
	NO_MAP_LOCK_REQUIRED;
	LuaItemStack *o = checkobject(L, 1);
	ItemStack &item = o->m_stack;
	lua_pushinteger(L, item.wear);
	return 1;
}

// set_wear(self, number)
int LuaItemStack::l_set_wear(lua_State *L)
{
	NO_MAP_LOCK_REQUIRED;
	LuaItemStack *o = checkobject(L, 1);
	ItemStack &item = o->m_stack;

	bool status;
	lua_Integer wear = luaL_checkinteger(L, 2);
	if (wear <= 65535) {
		item.wear = wear;
		status = true;
	} else {
		item.clear();
		status = false;
	}

	lua_pushboolean(L, status);
	return 1;
}

// get_metadata(self) -> string
int LuaItemStack::l_get_metadata(lua_State *L)
{
	NO_MAP_LOCK_REQUIRED;
	LuaItemStack *o = checkobject(L, 1);
	ItemStack &item = o->m_stack;
	lua_pushlstring(L, item.metadata.c_str(), item.metadata.size());
	return 1;
}

// set_metadata(self, string)
int LuaItemStack::l_set_metadata(lua_State *L)
{
	NO_MAP_LOCK_REQUIRED;
	LuaItemStack *o = checkobject(L, 1);
	ItemStack &item = o->m_stack;

	size_t len = 0;
	const char *ptr = luaL_checklstring(L, 2, &len);
	item.metadata.assign(ptr, len);

	lua_pushboolean(L, true);
	return 1;
}

// clear(self) -> true
int LuaItemStack::l_clear(lua_State *L)
{
	NO_MAP_LOCK_REQUIRED;
	LuaItemStack *o = checkobject(L, 1);
	o->m_stack.clear();
	lua_pushboolean(L, true);
	return 1;
}

// replace(self, itemstack or itemstring or table or nil) -> true
int LuaItemStack::l_replace(lua_State *L)
{
	NO_MAP_LOCK_REQUIRED;
	LuaItemStack *o = checkobject(L, 1);
	o->m_stack = read_item(L,2,getServer(L));
	lua_pushboolean(L, true);
	return 1;
}

// to_string(self) -> string
int LuaItemStack::l_to_string(lua_State *L)
{
	NO_MAP_LOCK_REQUIRED;
	LuaItemStack *o = checkobject(L, 1);
	std::string itemstring = o->m_stack.getItemString();
	lua_pushstring(L, itemstring.c_str());
	return 1;
}

// to_table(self) -> table or nil
int LuaItemStack::l_to_table(lua_State *L)
{
	NO_MAP_LOCK_REQUIRED;
	LuaItemStack *o = checkobject(L, 1);
	const ItemStack &item = o->m_stack;
	if(item.empty())
	{
		lua_pushnil(L);
	}
	else
	{
		lua_newtable(L);
		lua_pushstring(L, item.name.c_str());
		lua_setfield(L, -2, "name");
		lua_pushinteger(L, item.count);
		lua_setfield(L, -2, "count");
		lua_pushinteger(L, item.wear);
		lua_setfield(L, -2, "wear");
		lua_pushlstring(L, item.metadata.c_str(), item.metadata.size());
		lua_setfield(L, -2, "metadata");
	}
	return 1;
}

// get_stack_max(self) -> number
int LuaItemStack::l_get_stack_max(lua_State *L)
{
	NO_MAP_LOCK_REQUIRED;
	LuaItemStack *o = checkobject(L, 1);
	ItemStack &item = o->m_stack;
	lua_pushinteger(L, item.getStackMax(getServer(L)->idef()));
	return 1;
}

// get_free_space(self) -> number
int LuaItemStack::l_get_free_space(lua_State *L)
{
	NO_MAP_LOCK_REQUIRED;
	LuaItemStack *o = checkobject(L, 1);
	ItemStack &item = o->m_stack;
	lua_pushinteger(L, item.freeSpace(getServer(L)->idef()));
	return 1;
}

// is_known(self) -> true/false
// Checks if the item is defined.
int LuaItemStack::l_is_known(lua_State *L)
{
	NO_MAP_LOCK_REQUIRED;
	LuaItemStack *o = checkobject(L, 1);
	ItemStack &item = o->m_stack;
	bool is_known = item.isKnown(getServer(L)->idef());
	lua_pushboolean(L, is_known);
	return 1;
}

// get_definition(self) -> table
// Returns the item definition table from registered_items,
// or a fallback one (name="unknown")
int LuaItemStack::l_get_definition(lua_State *L)
{
	NO_MAP_LOCK_REQUIRED;
	LuaItemStack *o = checkobject(L, 1);
	ItemStack &item = o->m_stack;

	// Get registered_items[name]
	lua_getglobal(L, "core");
	lua_getfield(L, -1, "registered_items");
	luaL_checktype(L, -1, LUA_TTABLE);
	lua_getfield(L, -1, item.name.c_str());
	if(lua_isnil(L, -1))
	{
		lua_pop(L, 1);
		lua_getfield(L, -1, "unknown");
	}
	return 1;
}

// get_tool_capabilities(self) -> table
// Returns the effective tool digging properties.
// Returns those of the hand ("") if this item has none associated.
int LuaItemStack::l_get_tool_capabilities(lua_State *L)
{
	NO_MAP_LOCK_REQUIRED;
	LuaItemStack *o = checkobject(L, 1);
	ItemStack &item = o->m_stack;
	const ToolCapabilities &prop =
		item.getToolCapabilities(getServer(L)->idef());
	push_tool_capabilities(L, prop);
	return 1;
}

// add_wear(self, amount) -> true/false
// The range for "amount" is [0,65535]. Wear is only added if the item
// is a tool. Adding wear might destroy the item.
// Returns true if the item is (or was) a tool.
int LuaItemStack::l_add_wear(lua_State *L)
{
	NO_MAP_LOCK_REQUIRED;
	LuaItemStack *o = checkobject(L, 1);
	ItemStack &item = o->m_stack;
	int amount = lua_tointeger(L, 2);
	bool result = item.addWear(amount, getServer(L)->idef());
	lua_pushboolean(L, result);
	return 1;
}

// add_item(self, itemstack or itemstring or table or nil) -> itemstack
// Returns leftover item stack
int LuaItemStack::l_add_item(lua_State *L)
{
	NO_MAP_LOCK_REQUIRED;
	LuaItemStack *o = checkobject(L, 1);
	ItemStack &item = o->m_stack;
	ItemStack newitem = read_item(L,-1, getServer(L));
	ItemStack leftover = item.addItem(newitem, getServer(L)->idef());
	create(L, leftover);
	return 1;
}

// item_fits(self, itemstack or itemstring or table or nil) -> true/false, itemstack
// First return value is true iff the new item fits fully into the stack
// Second return value is the would-be-left-over item stack
int LuaItemStack::l_item_fits(lua_State *L)
{
	NO_MAP_LOCK_REQUIRED;
	LuaItemStack *o = checkobject(L, 1);
	ItemStack &item = o->m_stack;
	ItemStack newitem = read_item(L, 2, getServer(L));
	ItemStack restitem;
	bool fits = item.itemFits(newitem, &restitem, getServer(L)->idef());
	lua_pushboolean(L, fits);  // first return value
	create(L, restitem);       // second return value
	return 2;
}

// take_item(self, takecount=1) -> itemstack
int LuaItemStack::l_take_item(lua_State *L)
{
	NO_MAP_LOCK_REQUIRED;
	LuaItemStack *o = checkobject(L, 1);
	ItemStack &item = o->m_stack;
	u32 takecount = 1;
	if(!lua_isnone(L, 2))
		takecount = luaL_checkinteger(L, 2);
	ItemStack taken = item.takeItem(takecount);
	create(L, taken);
	return 1;
}

// peek_item(self, peekcount=1) -> itemstack
int LuaItemStack::l_peek_item(lua_State *L)
{
	NO_MAP_LOCK_REQUIRED;
	LuaItemStack *o = checkobject(L, 1);
	ItemStack &item = o->m_stack;
	u32 peekcount = 1;
	if(!lua_isnone(L, 2))
		peekcount = lua_tointeger(L, 2);
	ItemStack peekaboo = item.peekItem(peekcount);
	create(L, peekaboo);
	return 1;
}

LuaItemStack::LuaItemStack(const ItemStack &item):
	m_stack(item)
{
}

LuaItemStack::~LuaItemStack()
{
}

const ItemStack& LuaItemStack::getItem() const
{
	return m_stack;
}
ItemStack& LuaItemStack::getItem()
{
	return m_stack;
}

// LuaItemStack(itemstack or itemstring or table or nil)
// Creates an LuaItemStack and leaves it on top of stack
int LuaItemStack::create_object(lua_State *L)
{
	NO_MAP_LOCK_REQUIRED;
	ItemStack item = read_item(L, 1, getServer(L));
	LuaItemStack *o = new LuaItemStack(item);
	*(void **)(lua_newuserdata(L, sizeof(void *))) = o;
	luaL_getmetatable(L, className);
	lua_setmetatable(L, -2);
	return 1;
}
// Not callable from Lua
int LuaItemStack::create(lua_State *L, const ItemStack &item)
{
	NO_MAP_LOCK_REQUIRED;
	LuaItemStack *o = new LuaItemStack(item);
	*(void **)(lua_newuserdata(L, sizeof(void *))) = o;
	luaL_getmetatable(L, className);
	lua_setmetatable(L, -2);
	return 1;
}

LuaItemStack* LuaItemStack::checkobject(lua_State *L, int narg)
{
	luaL_checktype(L, narg, LUA_TUSERDATA);
	void *ud = luaL_checkudata(L, narg, className);
	if(!ud) luaL_typerror(L, narg, className);
	return *(LuaItemStack**)ud;  // unbox pointer
}

void LuaItemStack::Register(lua_State *L)
{
	lua_newtable(L);
	int methodtable = lua_gettop(L);
	luaL_newmetatable(L, className);
	int metatable = lua_gettop(L);

	lua_pushliteral(L, "__metatable");
	lua_pushvalue(L, methodtable);
	lua_settable(L, metatable);  // hide metatable from Lua getmetatable()

	lua_pushliteral(L, "__index");
	lua_pushvalue(L, methodtable);
	lua_settable(L, metatable);

	lua_pushliteral(L, "__gc");
	lua_pushcfunction(L, gc_object);
	lua_settable(L, metatable);

	lua_pop(L, 1);  // drop metatable

	luaL_openlib(L, 0, methods, 0);  // fill methodtable
	lua_pop(L, 1);  // drop methodtable

	// Can be created from Lua (LuaItemStack(itemstack or itemstring or table or nil))
	lua_register(L, className, create_object);