c545a201d584960b0c4e6dc2c2c97e2ac6345065
[oweals/minetest_game.git] / mods / beds / api.lua
1
2 local reverse = true
3
4 local function destruct_bed(pos, n)
5         local node = minetest.get_node(pos)
6         local other
7
8         if n == 2 then
9                 local dir = minetest.facedir_to_dir(node.param2)
10                 other = vector.subtract(pos, dir)
11         elseif n == 1 then
12                 local dir = minetest.facedir_to_dir(node.param2)
13                 other = vector.add(pos, dir)
14         end
15
16         if reverse then
17                 reverse = not reverse
18                 minetest.remove_node(other)
19                 minetest.check_for_falling(other)
20         else
21                 reverse = not reverse
22         end
23 end
24
25 function beds.register_bed(name, def)
26         minetest.register_node(name .. "_bottom", {
27                 description = def.description,
28                 inventory_image = def.inventory_image,
29                 wield_image = def.wield_image,
30                 drawtype = "nodebox",
31                 tiles = def.tiles.bottom,
32                 paramtype = "light",
33                 paramtype2 = "facedir",
34                 is_ground_content = false,
35                 stack_max = 1,
36                 groups = {choppy = 2, oddly_breakable_by_hand = 2, flammable = 3, bed = 1},
37                 sounds = def.sounds or default.node_sound_wood_defaults(),
38                 node_box = {
39                         type = "fixed",
40                         fixed = def.nodebox.bottom,
41                 },
42                 selection_box = {
43                         type = "fixed",
44                         fixed = def.selectionbox,
45                 },
46
47                 on_place = function(itemstack, placer, pointed_thing)
48                         local under = pointed_thing.under
49                         local node = minetest.get_node(under)
50                         local udef = minetest.registered_nodes[node.name]
51                         if udef and udef.on_rightclick and
52                                         not (placer and placer:is_player() and
53                                         placer:get_player_control().sneak) then
54                                 return udef.on_rightclick(under, node, placer, itemstack,
55                                         pointed_thing) or itemstack
56                         end
57
58                         local pos
59                         if udef and udef.buildable_to then
60                                 pos = under
61                         else
62                                 pos = pointed_thing.above
63                         end
64
65                         local player_name = placer and placer:get_player_name() or ""
66
67                         if minetest.is_protected(pos, player_name) and
68                                         not minetest.check_player_privs(player_name, "protection_bypass") then
69                                 minetest.record_protection_violation(pos, player_name)
70                                 return itemstack
71                         end
72
73                         local node_def = minetest.registered_nodes[minetest.get_node(pos).name]
74                         if not node_def or not node_def.buildable_to then
75                                 return itemstack
76                         end
77
78                         local dir = placer and placer:get_look_dir() and
79                                 minetest.dir_to_facedir(placer:get_look_dir()) or 0
80                         local botpos = vector.add(pos, minetest.facedir_to_dir(dir))
81
82                         if minetest.is_protected(botpos, player_name) and
83                                         not minetest.check_player_privs(player_name, "protection_bypass") then
84                                 minetest.record_protection_violation(botpos, player_name)
85                                 return itemstack
86                         end
87
88                         local botdef = minetest.registered_nodes[minetest.get_node(botpos).name]
89                         if not botdef or not botdef.buildable_to then
90                                 return itemstack
91                         end
92
93                         minetest.set_node(pos, {name = name .. "_bottom", param2 = dir})
94                         minetest.set_node(botpos, {name = name .. "_top", param2 = dir})
95
96                         if not (creative and creative.is_enabled_for
97                                         and creative.is_enabled_for(player_name)) then
98                                 itemstack:take_item()
99                         end
100                         return itemstack
101                 end,
102
103                 on_destruct = function(pos)
104                         destruct_bed(pos, 1)
105                 end,
106
107                 on_rightclick = function(pos, node, clicker, itemstack, pointed_thing)
108                         beds.on_rightclick(pos, clicker)
109                         return itemstack
110                 end,
111
112                 on_rotate = function(pos, node, user, _, new_param2)
113                         local dir = minetest.facedir_to_dir(node.param2)
114                         local p = vector.add(pos, dir)
115                         local node2 = minetest.get_node_or_nil(p)
116                         if not node2 or not minetest.get_item_group(node2.name, "bed") == 2 or
117                                         not node.param2 == node2.param2 then
118                                 return false
119                         end
120                         if minetest.is_protected(p, user:get_player_name()) then
121                                 minetest.record_protection_violation(p, user:get_player_name())
122                                 return false
123                         end
124                         if new_param2 % 32 > 3 then
125                                 return false
126                         end
127                         local newp = vector.add(pos, minetest.facedir_to_dir(new_param2))
128                         local node3 = minetest.get_node_or_nil(newp)
129                         local node_def = node3 and minetest.registered_nodes[node3.name]
130                         if not node_def or not node_def.buildable_to then
131                                 return false
132                         end
133                         if minetest.is_protected(newp, user:get_player_name()) then
134                                 minetest.record_protection_violation(newp, user:get_player_name())
135                                 return false
136                         end
137                         node.param2 = new_param2
138                         -- do not remove_node here - it will trigger destroy_bed()
139                         minetest.set_node(p, {name = "air"})
140                         minetest.set_node(pos, node)
141                         minetest.set_node(newp, {name = name .. "_top", param2 = new_param2})
142                         return true
143                 end,
144                 can_dig = function(pos, player)
145                         return beds.can_dig(pos)
146                 end,
147         })
148
149         minetest.register_node(name .. "_top", {
150                 drawtype = "nodebox",
151                 tiles = def.tiles.top,
152                 paramtype = "light",
153                 paramtype2 = "facedir",
154                 is_ground_content = false,
155                 pointable = false,
156                 groups = {choppy = 2, oddly_breakable_by_hand = 2, flammable = 3, bed = 2},
157                 sounds = def.sounds or default.node_sound_wood_defaults(),
158                 drop = name .. "_bottom",
159                 node_box = {
160                         type = "fixed",
161                         fixed = def.nodebox.top,
162                 },
163                 on_destruct = function(pos)
164                         destruct_bed(pos, 2)
165                 end,
166                 can_dig = function(pos, player)
167                         local node = minetest.get_node(pos)
168                         local dir = minetest.facedir_to_dir(node.param2)
169                         local p = vector.add(pos, dir)
170                         return beds.can_dig(p)
171                 end,
172         })
173
174         minetest.register_alias(name, name .. "_bottom")
175
176         minetest.register_craft({
177                 output = name,
178                 recipe = def.recipe
179         })
180 end