Rework screwdriver and add protection support
[oweals/minetest_game.git] / mods / screwdriver / init.lua
1
2 local mode_text = {
3         {"Change rotation, Don't change axisdir."},
4         {"Keep choosen face in front then rotate it."},
5         {"Change axis dir, Reset rotation."},
6         {"Bring top in front then rotate it."},
7 }
8
9 local opposite_faces = {
10         [0] = 5,
11         [1] = 2,
12         [2] = 1,
13         [3] = 4,
14         [4] = 3,
15         [5] = 0,
16 }
17
18 local function screwdriver_setmode(user,itemstack)
19         local player_name = user:get_player_name()
20         local item = itemstack:to_table()
21         local mode = tonumber(itemstack:get_metadata())
22         if not mode then
23                 minetest.chat_send_player(player_name, "Hold shift and use to change screwdriwer modes.")
24                 mode = 0
25         end
26         mode = mode + 1
27         if mode == 5 then
28                 mode = 1
29         end
30         minetest.chat_send_player(player_name, "Screwdriver mode : "..mode.." - "..mode_text[mode][1] )
31         itemstack:set_name("screwdriver:screwdriver"..mode)
32         itemstack:set_metadata(mode)
33         return itemstack
34 end
35
36 local function get_node_face(pointed_thing)
37         local ax, ay, az = pointed_thing.above.x, pointed_thing.above.y, pointed_thing.above.z
38         local ux, uy, uz = pointed_thing.under.x, pointed_thing.under.y, pointed_thing.under.z
39         if     ay > uy then return 0 -- Top
40         elseif az > uz then return 1 -- Z+ side
41         elseif az < uz then return 2 -- Z- side
42         elseif ax > ux then return 3 -- X+ side
43         elseif ax < ux then return 4 -- X- side
44         elseif ay < uy then return 5 -- Bottom
45         else
46                 error("pointed_thing.above and under are the same!")
47         end
48 end
49
50 local function nextrange(x, max)
51         x = x + 1
52         if x > max then
53                 x = 0
54         end
55         return x
56 end
57
58 local function screwdriver_handler(itemstack, user, pointed_thing)
59         if pointed_thing.type ~= "node" then
60                 return
61         end
62         local pos = pointed_thing.under
63         if minetest.is_protected(pos, user:get_player_name()) then
64                 minetest.record_protection_violation(pos, user:get_player_name())
65                 return
66         end
67         local keys = user:get_player_control()
68         local player_name = user:get_player_name()
69         local mode = tonumber(itemstack:get_metadata())
70         if not mode or keys["sneak"] == true then
71                 return screwdriver_setmode(user, itemstack)
72         end
73         local node = minetest.get_node(pos)
74         local node_name = node.name
75         local ndef = minetest.registered_nodes[node.name]
76         if ndef.paramtype2 == "facedir" then
77                 if ndef.drawtype == "nodebox" and ndef.node_box.type ~= "fixed" then
78                         return
79                 end
80                 if node.param2 == nil then
81                         return
82                 end
83                 -- Get ready to set the param2
84                 local n = node.param2
85                 local axisdir = math.floor(n / 4)
86                 local rotation = n - axisdir * 4
87                 if mode == 1 then
88                         n = axisdir * 4 + nextrange(rotation, 3)
89                 elseif mode == 2 then
90                         -- If you are pointing at the axisdir face or the
91                         -- opposite one then you can just rotate the node.
92                         -- Otherwise change the axisdir, avoiding the facing
93                         -- and opposite axes.
94                         local face = get_node_face(pointed_thing)
95                         if axisdir == face or axisdir == opposite_faces[face] then
96                                 n = axisdir * 4 + nextrange(rotation, 3)
97                         else
98                                 axisdir = nextrange(axisdir, 5)
99                                 -- This is repeated because switching from the face
100                                 -- can move to to the opposite and vice-versa
101                                 if axisdir == face or axisdir == opposite_faces[face] then
102                                         axisdir = nextrange(axisdir, 5)
103                                 end
104                                 if axisdir == face or axisdir == opposite_faces[face] then
105                                         axisdir = nextrange(axisdir, 5)
106                                 end
107                                 n = axisdir * 4
108                         end
109                 elseif mode == 3 then
110                         n = nextrange(axisdir, 5) * 4
111                 elseif mode == 4 then
112                         local face = get_node_face(pointed_thing)
113                         if axisdir == face then
114                                 n = axisdir * 4 + nextrange(rotation, 3)
115                         else
116                                 n = face * 4
117                         end
118                 end
119                 --print (dump(axisdir..", "..rotation))
120                 node.param2 = n
121                 minetest.swap_node(pos, node)
122                 local item_wear = tonumber(itemstack:get_wear())
123                 item_wear = item_wear + 327
124                 if item_wear > 65535 then
125                         itemstack:clear()
126                         return itemstack
127                 end
128                 itemstack:set_wear(item_wear)
129                 return itemstack
130         end
131 end
132
133 minetest.register_craft({
134         output = "screwdriver:screwdriver",
135         recipe = {
136                 {"default:steel_ingot"},
137                 {"group:stick"}
138         }
139 })
140
141 minetest.register_tool("screwdriver:screwdriver", {
142         description = "Screwdriver",
143         inventory_image = "screwdriver.png",
144         on_use = function(itemstack, user, pointed_thing)
145                 screwdriver_handler(itemstack, user, pointed_thing)
146                 return itemstack
147         end,
148 })
149
150 for i = 1, 4 do
151         minetest.register_tool("screwdriver:screwdriver"..i, {
152                 description = "Screwdriver in Mode "..i,
153                 inventory_image = "screwdriver.png^tool_mode"..i..".png",
154                 wield_image = "screwdriver.png",
155                 groups = {not_in_creative_inventory=1},
156                 on_use = function(itemstack, user, pointed_thing)
157                         screwdriver_handler(itemstack, user, pointed_thing)
158                         return itemstack
159                 end,
160         })
161 end
162