Fix owner not being checked on write to book
[oweals/minetest_game.git] / mods / default / craftitems.lua
1 -- mods/default/craftitems.lua
2
3 minetest.register_craftitem("default:stick", {
4         description = "Stick",
5         inventory_image = "default_stick.png",
6         groups = {stick = 1, flammable = 2},
7 })
8
9 minetest.register_craftitem("default:paper", {
10         description = "Paper",
11         inventory_image = "default_paper.png",
12         groups = {flammable = 3},
13 })
14
15
16 local lpp = 14 -- Lines per book's page
17 local function book_on_use(itemstack, user)
18         local player_name = user:get_player_name()
19         local meta = itemstack:get_meta()
20         local title, text, owner = "", "", player_name
21         local page, page_max, lines, string = 1, 1, {}, ""
22
23         -- Backwards compatibility
24         local old_data = minetest.deserialize(itemstack:get_metadata())
25         if old_data then
26                 meta:from_table({ fields = old_data })
27         end
28
29         local data = meta:to_table().fields
30
31         if data.owner then
32                 title = data.title
33                 text = data.text
34                 owner = data.owner
35
36                 for str in (text .. "\n"):gmatch("([^\n]*)[\n]") do
37                         lines[#lines+1] = str
38                 end
39
40                 if data.page then
41                         page = data.page
42                         page_max = data.page_max
43
44                         for i = ((lpp * page) - lpp) + 1, lpp * page do
45                                 if not lines[i] then break end
46                                 string = string .. lines[i] .. "\n"
47                         end
48                 end
49         end
50
51         local formspec
52         if owner == player_name then
53                 formspec = "size[8,8]" .. default.gui_bg ..
54                         default.gui_bg_img ..
55                         "field[0.5,1;7.5,0;title;Title:;" ..
56                                 minetest.formspec_escape(title) .. "]" ..
57                         "textarea[0.5,1.5;7.5,7;text;Contents:;" ..
58                                 minetest.formspec_escape(text) .. "]" ..
59                         "button_exit[2.5,7.5;3,1;save;Save]"
60         else
61                 formspec = "size[8,8]" .. default.gui_bg ..
62                         default.gui_bg_img ..
63                         "label[0.5,0.5;by " .. owner .. "]" ..
64                         "tablecolumns[color;text]" ..
65                         "tableoptions[background=#00000000;highlight=#00000000;border=false]" ..
66                         "table[0.4,0;7,0.5;title;#FFFF00," .. minetest.formspec_escape(title) .. "]" ..
67                         "textarea[0.5,1.5;7.5,7;;" ..
68                                 minetest.formspec_escape(string ~= "" and string or text) .. ";]" ..
69                         "button[2.4,7.6;0.8,0.8;book_prev;<]" ..
70                         "label[3.2,7.7;Page " .. page .. " of " .. page_max .. "]" ..
71                         "button[4.9,7.6;0.8,0.8;book_next;>]"
72         end
73
74         minetest.show_formspec(player_name, "default:book", formspec)
75         return itemstack
76 end
77
78 minetest.register_on_player_receive_fields(function(player, formname, fields)
79         if formname ~= "default:book" then return end
80         local inv = player:get_inventory()
81         local stack = player:get_wielded_item()
82
83         if fields.save and fields.title ~= "" and fields.text ~= "" then
84                 local new_stack, data
85                 if stack:get_name() ~= "default:book_written" then
86                         local count = stack:get_count()
87                         if count == 1 then
88                                 stack:set_name("default:book_written")
89                         else
90                                 stack:set_count(count - 1)
91                                 new_stack = ItemStack("default:book_written")
92                         end
93                 else
94                         data = stack:get_meta():to_table().fields
95                 end
96
97                 if data and data.owner and data.owner ~= player:get_player_name() then
98                         return
99                 end
100
101                 if not data then data = {} end
102                 data.title = fields.title
103                 data.owner = player:get_player_name()
104                 data.description = "\""..fields.title.."\" by "..data.owner
105                 data.text = fields.text
106                 data.text_len = #data.text
107                 data.page = 1
108                 data.page_max = math.ceil((#data.text:gsub("[^\n]", "") + 1) / lpp)
109
110                 if new_stack then
111                         new_stack:get_meta():from_table({ fields = data })
112                         if inv:room_for_item("main", new_stack) then
113                                 inv:add_item("main", new_stack)
114                         else
115                                 minetest.add_item(player:getpos(), new_stack)
116                         end
117                 else
118                         stack:get_meta():from_table({ fields = data })
119                 end
120
121         elseif fields.book_next or fields.book_prev then
122                 local data = stack:get_meta():to_table().fields
123                 if not data or not data.page then
124                         return
125                 end
126
127                 data.page = tonumber(data.page)
128                 data.page_max = tonumber(data.page_max)
129
130                 if fields.book_next then
131                         data.page = data.page + 1
132                         if data.page > data.page_max then
133                                 data.page = 1
134                         end
135                 else
136                         data.page = data.page - 1
137                         if data.page == 0 then
138                                 data.page = data.page_max
139                         end
140                 end
141
142                 stack:get_meta():from_table(data)
143                 stack = book_on_use(stack, player)
144         end
145
146         -- Update stack
147         player:set_wielded_item(stack)
148 end)
149
150 minetest.register_craftitem("default:book", {
151         description = "Book",
152         inventory_image = "default_book.png",
153         groups = {book = 1, flammable = 3},
154         on_use = book_on_use,
155 })
156
157 minetest.register_craftitem("default:book_written", {
158         description = "Book With Text",
159         inventory_image = "default_book_written.png",
160         groups = {book = 1, not_in_creative_inventory = 1, flammable = 3},
161         stack_max = 1,
162         on_use = book_on_use,
163 })
164
165 minetest.register_craft({
166         type = "shapeless",
167         output = "default:book_written",
168         recipe = {"default:book", "default:book_written"}
169 })
170
171 minetest.register_on_craft(function(itemstack, player, old_craft_grid, craft_inv)
172         if itemstack:get_name() ~= "default:book_written" then
173                 return
174         end
175
176         local original
177         local index
178         for i = 1, player:get_inventory():get_size("craft") do
179                 if old_craft_grid[i]:get_name() == "default:book_written" then
180                         original = old_craft_grid[i]
181                         index = i
182                 end
183         end
184         if not original then
185                 return
186         end
187         local copymeta = original:get_meta():to_table()
188         -- copy of the book held by player's mouse cursor
189         itemstack:get_meta():from_table(copymeta)
190         -- put the book with metadata back in the craft grid
191         craft_inv:set_stack("craft", index, original)
192 end)
193
194 minetest.register_craftitem("default:skeleton_key", {
195         description = "Skeleton Key",
196         inventory_image = "default_key_skeleton.png",
197         groups = {key = 1},
198         on_use = function(itemstack, user, pointed_thing)
199                 if pointed_thing.type ~= "node" then
200                         return itemstack
201                 end
202
203                 local pos = pointed_thing.under
204                 local node = minetest.get_node(pos)
205
206                 if not node then
207                         return itemstack
208                 end
209
210                 local on_skeleton_key_use = minetest.registered_nodes[node.name].on_skeleton_key_use
211                 if not on_skeleton_key_use then
212                         return itemstack
213                 end
214
215                 -- make a new key secret in case the node callback needs it
216                 local random = math.random
217                 local newsecret = string.format(
218                         "%04x%04x%04x%04x",
219                         random(2^16) - 1, random(2^16) - 1,
220                         random(2^16) - 1, random(2^16) - 1)
221
222                 local secret, _, _ = on_skeleton_key_use(pos, user, newsecret)
223
224                 if secret then
225                         local inv = minetest.get_inventory({type="player", name=user:get_player_name()})
226
227                         -- update original itemstack
228                         itemstack:take_item()
229
230                         -- finish and return the new key
231                         local new_stack = ItemStack("default:key")
232                         local meta = new_stack:get_meta()
233                         meta:set_string("secret", secret)
234                         meta:set_string("description", "Key to "..user:get_player_name().."'s "
235                                 ..minetest.registered_nodes[node.name].description)
236
237                         if itemstack:get_count() == 0 then
238                                 itemstack = new_stack
239                         else
240                                 if inv:add_item("main", new_stack):get_count() > 0 then
241                                         minetest.add_item(user:getpos(), new_stack)
242                                 end -- else: added to inventory successfully
243                         end
244
245                         return itemstack
246                 end
247         end
248 })
249
250 minetest.register_craftitem("default:coal_lump", {
251         description = "Coal Lump",
252         inventory_image = "default_coal_lump.png",
253         groups = {coal = 1, flammable = 1}
254 })
255
256 minetest.register_craftitem("default:iron_lump", {
257         description = "Iron Lump",
258         inventory_image = "default_iron_lump.png",
259 })
260
261 minetest.register_craftitem("default:copper_lump", {
262         description = "Copper Lump",
263         inventory_image = "default_copper_lump.png",
264 })
265
266 minetest.register_craftitem("default:tin_lump", {
267         description = "Tin Lump",
268         inventory_image = "default_tin_lump.png",
269 })
270
271 minetest.register_craftitem("default:mese_crystal", {
272         description = "Mese Crystal",
273         inventory_image = "default_mese_crystal.png",
274 })
275
276 minetest.register_craftitem("default:gold_lump", {
277         description = "Gold Lump",
278         inventory_image = "default_gold_lump.png",
279 })
280
281 minetest.register_craftitem("default:diamond", {
282         description = "Diamond",
283         inventory_image = "default_diamond.png",
284 })
285
286 minetest.register_craftitem("default:clay_lump", {
287         description = "Clay Lump",
288         inventory_image = "default_clay_lump.png",
289 })
290
291 minetest.register_craftitem("default:steel_ingot", {
292         description = "Steel Ingot",
293         inventory_image = "default_steel_ingot.png",
294 })
295
296 minetest.register_craftitem("default:copper_ingot", {
297         description = "Copper Ingot",
298         inventory_image = "default_copper_ingot.png",
299 })
300
301 minetest.register_craftitem("default:tin_ingot", {
302         description = "Tin Ingot",
303         inventory_image = "default_tin_ingot.png",
304 })
305
306 minetest.register_craftitem("default:bronze_ingot", {
307         description = "Bronze Ingot",
308         inventory_image = "default_bronze_ingot.png",
309 })
310
311 minetest.register_craftitem("default:gold_ingot", {
312         description = "Gold Ingot",
313         inventory_image = "default_gold_ingot.png"
314 })
315
316 minetest.register_craftitem("default:mese_crystal_fragment", {
317         description = "Mese Crystal Fragment",
318         inventory_image = "default_mese_crystal_fragment.png",
319 })
320
321 minetest.register_craftitem("default:clay_brick", {
322         description = "Clay Brick",
323         inventory_image = "default_clay_brick.png",
324 })
325
326 minetest.register_craftitem("default:obsidian_shard", {
327         description = "Obsidian Shard",
328         inventory_image = "default_obsidian_shard.png",
329 })
330
331 minetest.register_craftitem("default:flint", {
332         description = "Flint",
333         inventory_image = "default_flint.png"
334 })