Add protection support to doors
[oweals/minetest_game.git] / mods / doors / init.lua
1 doors = {}
2
3 -- Registers a door
4 --  name: The name of the door
5 --  def: a table with the folowing fields:
6 --    description
7 --    inventory_image
8 --    groups
9 --    tiles_bottom: the tiles of the bottom part of the door {front, side}
10 --    tiles_top: the tiles of the bottom part of the door {front, side}
11 --    If the following fields are not defined the default values are used
12 --    node_box_bottom
13 --    node_box_top
14 --    selection_box_bottom
15 --    selection_box_top
16 --    only_placer_can_open: if true only the player who placed the door can
17 --                          open it
18 function doors:register_door(name, def)
19         def.groups.not_in_creative_inventory = 1
20         
21         local box = {{-0.5, -0.5, -0.5,   0.5, 0.5, -0.5+1.5/16}}
22         
23         if not def.node_box_bottom then
24                 def.node_box_bottom = box
25         end
26         if not def.node_box_top then
27                 def.node_box_top = box
28         end
29         if not def.selection_box_bottom then
30                 def.selection_box_bottom= box
31         end
32         if not def.selection_box_top then
33                 def.selection_box_top = box
34         end
35         
36         minetest.register_craftitem(name, {
37                 description = def.description,
38                 inventory_image = def.inventory_image,
39                 
40                 on_place = function(itemstack, placer, pointed_thing)
41                         if not pointed_thing.type == "node" then
42                                 return itemstack
43                         end
44                         
45                         local ptu = pointed_thing.under
46                         local nu = minetest.get_node(ptu)
47                         if minetest.registered_nodes[nu.name].on_rightclick then
48                                 return minetest.registered_nodes[nu.name].on_rightclick(ptu, nu, placer, itemstack)
49                         end
50                         
51                         local pt = pointed_thing.above
52                         local pt2 = {x=pt.x, y=pt.y, z=pt.z}
53                         pt2.y = pt2.y+1
54                         if
55                                 not minetest.registered_nodes[minetest.get_node(pt).name].buildable_to or
56                                 not minetest.registered_nodes[minetest.get_node(pt2).name].buildable_to or
57                                 not placer or
58                                 not placer:is_player()
59                         then
60                                 return itemstack
61                         end
62
63                         if minetest.is_protected(pt, placer:get_player_name()) or
64                                         minetest.is_protected(pt2, placer:get_player_name()) then
65                                 minetest.record_protection_violation(pt, placer:get_player_name())
66                                 return itemstack
67                         end
68                         
69                         local p2 = minetest.dir_to_facedir(placer:get_look_dir())
70                         local pt3 = {x=pt.x, y=pt.y, z=pt.z}
71                         if p2 == 0 then
72                                 pt3.x = pt3.x-1
73                         elseif p2 == 1 then
74                                 pt3.z = pt3.z+1
75                         elseif p2 == 2 then
76                                 pt3.x = pt3.x+1
77                         elseif p2 == 3 then
78                                 pt3.z = pt3.z-1
79                         end
80                         if not string.find(minetest.get_node(pt3).name, name.."_b_") then
81                                 minetest.set_node(pt, {name=name.."_b_1", param2=p2})
82                                 minetest.set_node(pt2, {name=name.."_t_1", param2=p2})
83                         else
84                                 minetest.set_node(pt, {name=name.."_b_2", param2=p2})
85                                 minetest.set_node(pt2, {name=name.."_t_2", param2=p2})
86                         end
87                         
88                         if def.only_placer_can_open then
89                                 local pn = placer:get_player_name()
90                                 local meta = minetest.get_meta(pt)
91                                 meta:set_string("doors_owner", pn)
92                                 meta:set_string("infotext", "Owned by "..pn)
93                                 meta = minetest.get_meta(pt2)
94                                 meta:set_string("doors_owner", pn)
95                                 meta:set_string("infotext", "Owned by "..pn)
96                         end
97                         
98                         if not minetest.setting_getbool("creative_mode") then
99                                 itemstack:take_item()
100                         end
101                         return itemstack
102                 end,
103         })
104         
105         local tt = def.tiles_top
106         local tb = def.tiles_bottom
107         
108         local function after_dig_node(pos, name)
109                 if minetest.get_node(pos).name == name then
110                         minetest.remove_node(pos)
111                 end
112         end
113         
114         local function on_rightclick(pos, dir, check_name, replace, replace_dir, params)
115                 pos.y = pos.y+dir
116                 if not minetest.get_node(pos).name == check_name then
117                         return
118                 end
119                 local p2 = minetest.get_node(pos).param2
120                 p2 = params[p2+1]
121                 
122                 minetest.swap_node(pos, {name=replace_dir, param2=p2})
123                 
124                 pos.y = pos.y-dir
125                 minetest.swap_node(pos, {name=replace, param2=p2})
126         end
127         
128         local function check_player_priv(pos, player)
129                 if not def.only_placer_can_open then
130                         return true
131                 end
132                 local meta = minetest.get_meta(pos)
133                 local pn = player:get_player_name()
134                 return meta:get_string("doors_owner") == pn
135         end
136         
137         minetest.register_node(name.."_b_1", {
138                 tiles = {tb[2], tb[2], tb[2], tb[2], tb[1], tb[1].."^[transformfx"},
139                 paramtype = "light",
140                 paramtype2 = "facedir",
141                 drop = name,
142                 drawtype = "nodebox",
143                 node_box = {
144                         type = "fixed",
145                         fixed = def.node_box_bottom
146                 },
147                 selection_box = {
148                         type = "fixed",
149                         fixed = def.selection_box_bottom
150                 },
151                 groups = def.groups,
152                 
153                 after_dig_node = function(pos, oldnode, oldmetadata, digger)
154                         pos.y = pos.y+1
155                         after_dig_node(pos, name.."_t_1")
156                 end,
157                 
158                 on_rightclick = function(pos, node, clicker)
159                         if check_player_priv(pos, clicker) then
160                                 on_rightclick(pos, 1, name.."_t_1", name.."_b_2", name.."_t_2", {1,2,3,0})
161                         end
162                 end,
163                 
164                 can_dig = check_player_priv,
165         })
166         
167         minetest.register_node(name.."_t_1", {
168                 tiles = {tt[2], tt[2], tt[2], tt[2], tt[1], tt[1].."^[transformfx"},
169                 paramtype = "light",
170                 paramtype2 = "facedir",
171                 drop = name,
172                 drawtype = "nodebox",
173                 node_box = {
174                         type = "fixed",
175                         fixed = def.node_box_top
176                 },
177                 selection_box = {
178                         type = "fixed",
179                         fixed = def.selection_box_top
180                 },
181                 groups = def.groups,
182                 
183                 after_dig_node = function(pos, oldnode, oldmetadata, digger)
184                         pos.y = pos.y-1
185                         after_dig_node(pos, name.."_b_1")
186                 end,
187                 
188                 on_rightclick = function(pos, node, clicker)
189                         if check_player_priv(pos, clicker) then
190                                 on_rightclick(pos, -1, name.."_b_1", name.."_t_2", name.."_b_2", {1,2,3,0})
191                         end
192                 end,
193                 
194                 can_dig = check_player_priv,
195         })
196         
197         minetest.register_node(name.."_b_2", {
198                 tiles = {tb[2], tb[2], tb[2], tb[2], tb[1].."^[transformfx", tb[1]},
199                 paramtype = "light",
200                 paramtype2 = "facedir",
201                 drop = name,
202                 drawtype = "nodebox",
203                 node_box = {
204                         type = "fixed",
205                         fixed = def.node_box_bottom
206                 },
207                 selection_box = {
208                         type = "fixed",
209                         fixed = def.selection_box_bottom
210                 },
211                 groups = def.groups,
212                 
213                 after_dig_node = function(pos, oldnode, oldmetadata, digger)
214                         pos.y = pos.y+1
215                         after_dig_node(pos, name.."_t_2")
216                 end,
217                 
218                 on_rightclick = function(pos, node, clicker)
219                         if check_player_priv(pos, clicker) then
220                                 on_rightclick(pos, 1, name.."_t_2", name.."_b_1", name.."_t_1", {3,0,1,2})
221                         end
222                 end,
223                 
224                 can_dig = check_player_priv,
225         })
226         
227         minetest.register_node(name.."_t_2", {
228                 tiles = {tt[2], tt[2], tt[2], tt[2], tt[1].."^[transformfx", tt[1]},
229                 paramtype = "light",
230                 paramtype2 = "facedir",
231                 drop = name,
232                 drawtype = "nodebox",
233                 node_box = {
234                         type = "fixed",
235                         fixed = def.node_box_top
236                 },
237                 selection_box = {
238                         type = "fixed",
239                         fixed = def.selection_box_top
240                 },
241                 groups = def.groups,
242                 
243                 after_dig_node = function(pos, oldnode, oldmetadata, digger)
244                         pos.y = pos.y-1
245                         after_dig_node(pos, name.."_b_2")
246                 end,
247                 
248                 on_rightclick = function(pos, node, clicker)
249                         if check_player_priv(pos, clicker) then
250                                 on_rightclick(pos, -1, name.."_b_2", name.."_t_1", name.."_b_1", {3,0,1,2})
251                         end
252                 end,
253                 
254                 can_dig = check_player_priv,
255         })
256         
257 end
258
259 doors:register_door("doors:door_wood", {
260         description = "Wooden Door",
261         inventory_image = "door_wood.png",
262         groups = {snappy=1,choppy=2,oddly_breakable_by_hand=2,flammable=2,door=1},
263         tiles_bottom = {"door_wood_b.png", "door_brown.png"},
264         tiles_top = {"door_wood_a.png", "door_brown.png"},
265 })
266
267 minetest.register_craft({
268         output = "doors:door_wood",
269         recipe = {
270                 {"group:wood", "group:wood"},
271                 {"group:wood", "group:wood"},
272                 {"group:wood", "group:wood"}
273         }
274 })
275
276 doors:register_door("doors:door_steel", {
277         description = "Steel Door",
278         inventory_image = "door_steel.png",
279         groups = {snappy=1,bendy=2,cracky=1,melty=2,level=2,door=1},
280         tiles_bottom = {"door_steel_b.png", "door_grey.png"},
281         tiles_top = {"door_steel_a.png", "door_grey.png"},
282         only_placer_can_open = true,
283 })
284
285 minetest.register_craft({
286         output = "doors:door_steel",
287         recipe = {
288                 {"default:steel_ingot", "default:steel_ingot"},
289                 {"default:steel_ingot", "default:steel_ingot"},
290                 {"default:steel_ingot", "default:steel_ingot"}
291         }
292 })
293
294 minetest.register_alias("doors:door_wood_a_c", "doors:door_wood_t_1")
295 minetest.register_alias("doors:door_wood_a_o", "doors:door_wood_t_1")
296 minetest.register_alias("doors:door_wood_b_c", "doors:door_wood_b_1")
297 minetest.register_alias("doors:door_wood_b_o", "doors:door_wood_b_1")