b82b0137a6e8919b1b8ab9317329dd9f0451d879
[oweals/minetest.git] / data / builtin.lua
1 --
2 -- This file contains built-in stuff in Minetest implemented in Lua.
3 --
4 -- It is always loaded and executed after registration of the C API,
5 -- before loading and running any mods.
6 --
7
8 function basic_dump2(o)
9         if type(o) == "number" then
10                 return tostring(o)
11         elseif type(o) == "string" then
12                 return string.format("%q", o)
13         elseif type(o) == "boolean" then
14                 return tostring(o)
15         elseif type(o) == "function" then
16                 return "<function>"
17         elseif type(o) == "userdata" then
18                 return "<userdata>"
19         elseif type(o) == "nil" then
20                 return "nil"
21         else
22                 error("cannot dump a " .. type(o))
23                 return nil
24         end
25 end
26
27 function dump2(o, name, dumped)
28         name = name or "_"
29         dumped = dumped or {}
30         io.write(name, " = ")
31         if type(o) == "number" or type(o) == "string" or type(o) == "boolean"
32                         or type(o) == "function" or type(o) == "nil"
33                         or type(o) == "userdata" then
34                 io.write(basic_dump2(o), "\n")
35         elseif type(o) == "table" then
36                 if dumped[o] then
37                         io.write(dumped[o], "\n")
38                 else
39                         dumped[o] = name
40                         io.write("{}\n") -- new table
41                         for k,v in pairs(o) do
42                                 local fieldname = string.format("%s[%s]", name, basic_dump2(k))
43                                 dump2(v, fieldname, dumped)
44                         end
45                 end
46         else
47                 error("cannot dump a " .. type(o))
48                 return nil
49         end
50 end
51
52 function dump(o, dumped)
53         dumped = dumped or {}
54         if type(o) == "number" then
55                 return tostring(o)
56         elseif type(o) == "string" then
57                 return string.format("%q", o)
58         elseif type(o) == "table" then
59                 if dumped[o] then
60                         return "<circular reference>"
61                 end
62                 dumped[o] = true
63                 local t = {}
64                 for k,v in pairs(o) do
65                         t[#t+1] = "" .. k .. " = " .. dump(v, dumped)
66                 end
67                 return "{" .. table.concat(t, ", ") .. "}"
68         elseif type(o) == "boolean" then
69                 return tostring(o)
70         elseif type(o) == "function" then
71                 return "<function>"
72         elseif type(o) == "userdata" then
73                 return "<userdata>"
74         elseif type(o) == "nil" then
75                 return "nil"
76         else
77                 error("cannot dump a " .. type(o))
78                 return nil
79         end
80 end
81
82 --
83 -- Item definition helpers
84 --
85
86 function minetest.inventorycube(img1, img2, img3)
87         img2 = img2 or img1
88         img3 = img3 or img1
89         return "[inventorycube"
90                         .. "{" .. img1:gsub("%^", "&")
91                         .. "{" .. img2:gsub("%^", "&")
92                         .. "{" .. img3:gsub("%^", "&")
93 end
94
95 function minetest.pos_to_string(pos)
96         return "(" .. pos.x .. "," .. pos.y .. "," .. pos.z .. ")"
97 end
98
99 function minetest.get_pointed_thing_position(pointed_thing, above)
100         if pointed_thing.type == "node" then
101                 if above then
102                         -- The position where a node would be placed
103                         return pointed_thing.above
104                 else
105                         -- The position where a node would be dug
106                         return pointed_thing.under
107                 end
108         elseif pointed_thing.type == "object" then
109                 obj = pointed_thing.ref
110                 if obj ~= nil then
111                         return obj:getpos()
112                 else
113                         return nil
114                 end
115         else
116                 return nil
117         end
118 end
119
120 function minetest.dir_to_facedir(dir)
121         if math.abs(dir.x) > math.abs(dir.z) then
122                 if dir.x < 0 then
123                         return 3
124                 else
125                         return 1
126                 end
127         else
128                 if dir.z < 0 then
129                         return 2
130                 else
131                         return 0
132                 end
133         end
134 end
135
136 function minetest.dir_to_wallmounted(dir)
137         if math.abs(dir.y) > math.max(math.abs(dir.x), math.abs(dir.z)) then
138                 if dir.y < 0 then
139                         return 1
140                 else
141                         return 0
142                 end
143         elseif math.abs(dir.x) > math.abs(dir.z) then
144                 if dir.x < 0 then
145                         return 3
146                 else
147                         return 2
148                 end
149         else
150                 if dir.z < 0 then
151                         return 5
152                 else
153                         return 4
154                 end
155         end
156 end
157
158 function minetest.get_node_drops(nodename, toolname)
159         local drop = ItemStack({name=nodename}):get_definition().drop
160         if drop == nil then
161                 -- default drop
162                 return {ItemStack({name=nodename})}
163         elseif type(drop) == "string" then
164                 -- itemstring drop
165                 return {ItemStack(drop)}
166         elseif drop.items == nil then
167                 -- drop = {} to disable default drop
168                 return {}
169         end
170
171         -- Extended drop table
172         local got_items = {}
173         local got_count = 0
174         local _, item, tool
175         for _, item in ipairs(drop.items) do
176                 local good_rarity = true
177                 local good_tool = true
178                 if item.rarity ~= nil then
179                         good_rarity = item.rarity < 1 or math.random(item.rarity) == 1
180                 end
181                 if item.tools ~= nil then
182                         good_tool = false
183                         for _, tool in ipairs(item.tools) do
184                                 if tool:sub(1, 1) == '~' then
185                                         good_tool = toolname:find(tool:sub(2)) ~= nil
186                                 else
187                                         good_tool = toolname == tool
188                                 end
189                                 if good_tool then
190                                         break
191                                 end
192                         end
193                 end
194                 if good_rarity and good_tool then
195                         got_count = got_count + 1
196                         for _, add_item in ipairs(item.items) do
197                                 got_items[#got_items+1] = add_item
198                         end
199                         if drop.max_items ~= nil and got_count == drop.max_items then
200                                 break
201                         end
202                 end
203         end
204         return got_items
205 end
206
207 function minetest.item_place_node(itemstack, placer, pointed_thing)
208         local item = itemstack:peek_item()
209         local def = itemstack:get_definition()
210         if def.type == "node" and pointed_thing.type == "node" then
211                 local pos = pointed_thing.above
212                 local oldnode = minetest.env:get_node(pos)
213                 local olddef = ItemStack({name=oldnode.name}):get_definition()
214
215                 if not olddef.buildable_to then
216                         minetest.log("info", placer:get_player_name() .. " tried to place"
217                                 .. " node in invalid position " .. minetest.pos_to_string(pos)
218                                 .. ", replacing " .. oldnode.name)
219                         return
220                 end
221
222                 minetest.log("action", placer:get_player_name() .. " places node "
223                         .. def.name .. " at " .. minetest.pos_to_string(pos))
224
225                 local newnode = {name = def.name, param1 = 0, param2 = 0}
226
227                 -- Calculate direction for wall mounted stuff like torches and signs
228                 if def.paramtype2 == 'wallmounted' then
229                         local under = pointed_thing.under
230                         local above = pointed_thing.above
231                         local dir = {x = under.x - above.x, y = under.y - above.y, z = under.z - above.z}
232                         newnode.param2 = minetest.dir_to_wallmounted(dir)
233                 -- Calculate the direction for furnaces and chests and stuff
234                 elseif def.paramtype2 == 'facedir' then
235                         local playerpos = placer:getpos()
236                         local dir = {x = pos.x - playerpos.x, y = pos.y - playerpos.y, z = pos.z - playerpos.z}
237                         newnode.param2 = minetest.dir_to_facedir(dir)
238                         minetest.log("action", "facedir: " .. newnode.param2)
239                 end
240
241                 -- Add node and update
242                 minetest.env:add_node(pos, newnode)
243
244                 -- Set metadata owner
245                 if def.metadata_name ~= "" then
246                         minetest.env:get_meta(pos):set_owner(placer:get_player_name())
247                 end
248
249                 -- Run script hook
250                 local _, callback
251                 for _, callback in ipairs(minetest.registered_on_placenodes) do
252                         callback(pos, newnode, placer)
253                 end
254
255                 itemstack:take_item()
256         end
257         return itemstack
258 end
259
260 function minetest.item_place_object(itemstack, placer, pointed_thing)
261         local pos = minetest.get_pointed_thing_position(pointed_thing, true)
262         if pos ~= nil then
263                 local item = itemstack:take_item()
264                 minetest.env:add_item(pos, item)
265         end
266         return itemstack
267 end
268
269 function minetest.item_place(itemstack, placer, pointed_thing)
270         if itemstack:get_definition().type == "node" then
271                 return minetest.item_place_node(itemstack, placer, pointed_thing)
272         else
273                 return minetest.item_place_object(itemstack, placer, pointed_thing)
274         end
275 end
276
277 function minetest.item_drop(itemstack, dropper, pos)
278         minetest.env:add_item(pos, itemstack)
279         return ""
280 end
281
282 function minetest.item_eat(hp_change, replace_with_item)
283         return function(itemstack, user, pointed_thing)  -- closure
284                 if itemstack:take_item() ~= nil then
285                         user:set_hp(user:get_hp() + hp_change)
286                         itemstack:add_item(replace_with_item) -- note: replace_with_item is optional
287                 end
288                 return itemstack
289         end
290 end
291
292 function minetest.node_punch(pos, node, puncher)
293         -- Run script hook
294         local _, callback
295         for _, callback in ipairs(minetest.registered_on_punchnodes) do
296                 callback(pos, node, puncher)
297         end
298
299 end
300
301 function minetest.node_dig(pos, node, digger)
302         minetest.debug("node_dig")
303
304         local def = ItemStack({name=node.name}):get_definition()
305         if not def.diggable then
306                 minetest.debug("not diggable")
307                 minetest.log("info", digger:get_player_name() .. " tried to dig "
308                         .. node.name .. " which is not diggable "
309                         .. minetest.pos_to_string(pos))
310                 return
311         end
312
313         local meta = minetest.env:get_meta(pos)
314         if meta ~= nil and not meta:get_allow_removal() then
315                 minetest.debug("dig prevented by metadata")
316                 minetest.log("info", digger:get_player_name() .. " tried to dig "
317                         .. node.name .. ", but removal is disabled by metadata "
318                         .. minetest.pos_to_string(pos))
319                 return
320         end
321
322         minetest.log('action', digger:get_player_name() .. " digs "
323                 .. node.name .. " at " .. minetest.pos_to_string(pos))
324
325         if not minetest.setting_getbool("creative_mode") then
326                 local wielded = digger:get_wielded_item()
327                 local drops = minetest.get_node_drops(node.name, wielded:get_name())
328
329                 -- Wear out tool
330                 tp = wielded:get_tool_capabilities()
331                 dp = minetest.get_dig_params(def.groups, tp)
332                 wielded:add_wear(dp.wear)
333                 digger:set_wielded_item(wielded)
334
335                 -- Add dropped items
336                 local _, dropped_item
337                 for _, dropped_item in ipairs(drops) do
338                         digger:get_inventory():add_item("main", dropped_item)
339                 end
340         end
341
342         -- Remove node and update
343         minetest.env:remove_node(pos)
344
345         -- Run script hook
346         local _, callback
347         for _, callback in ipairs(minetest.registered_on_dignodes) do
348                 callback(pos, node, digger)
349         end
350 end
351
352 --
353 -- Item definition defaults
354 --
355
356 minetest.nodedef_default = {
357         -- Item properties
358         type="node",
359         -- name intentionally not defined here
360         description = "",
361         groups = {},
362         inventory_image = "",
363         wield_image = "",
364         wield_scale = {x=1,y=1,z=1},
365         stack_max = 99,
366         usable = false,
367         liquids_pointable = false,
368         tool_capabilities = nil,
369
370         -- Interaction callbacks
371         on_place = minetest.item_place,
372         on_drop = minetest.item_drop,
373         on_use = nil,
374
375         on_punch = minetest.node_punch,
376         on_dig = minetest.node_dig,
377
378         -- Node properties
379         drawtype = "normal",
380         visual_scale = 1.0,
381         tile_images = {""},
382         special_materials = {
383                 {image="", backface_culling=true},
384                 {image="", backface_culling=true},
385         },
386         alpha = 255,
387         post_effect_color = {a=0, r=0, g=0, b=0},
388         paramtype = "none",
389         paramtype2 = "none",
390         is_ground_content = false,
391         sunlight_propagates = false,
392         walkable = true,
393         pointable = true,
394         diggable = true,
395         climbable = false,
396         buildable_to = false,
397         metadata_name = "",
398         liquidtype = "none",
399         liquid_alternative_flowing = "",
400         liquid_alternative_source = "",
401         liquid_viscosity = 0,
402         light_source = 0,
403         damage_per_second = 0,
404         selection_box = {type="regular"},
405         legacy_facedir_simple = false,
406         legacy_wallmounted = false,
407 }
408
409 minetest.craftitemdef_default = {
410         type="craft",
411         -- name intentionally not defined here
412         description = "",
413         groups = {},
414         inventory_image = "",
415         wield_image = "",
416         wield_scale = {x=1,y=1,z=1},
417         stack_max = 99,
418         liquids_pointable = false,
419         tool_capabilities = nil,
420
421         -- Interaction callbacks
422         on_place = minetest.item_place,
423         on_drop = minetest.item_drop,
424         on_use = nil,
425 }
426
427 minetest.tooldef_default = {
428         type="tool",
429         -- name intentionally not defined here
430         description = "",
431         groups = {},
432         inventory_image = "",
433         wield_image = "",
434         wield_scale = {x=1,y=1,z=1},
435         stack_max = 1,
436         liquids_pointable = false,
437         tool_capabilities = nil,
438
439         -- Interaction callbacks
440         on_place = minetest.item_place,
441         on_drop = minetest.item_drop,
442         on_use = nil,
443 }
444
445 minetest.noneitemdef_default = {  -- This is used for the hand and unknown items
446         type="none",
447         -- name intentionally not defined here
448         description = "",
449         groups = {},
450         inventory_image = "",
451         wield_image = "",
452         wield_scale = {x=1,y=1,z=1},
453         stack_max = 99,
454         liquids_pointable = false,
455         tool_capabilities = nil,
456
457         -- Interaction callbacks
458         on_place = nil,
459         on_drop = nil,
460         on_use = nil,
461 }
462
463 --
464 -- Make raw registration functions inaccessible to anyone except builtin.lua
465 --
466
467 local register_item_raw = minetest.register_item_raw
468 minetest.register_item_raw = nil
469
470 local register_alias_raw = minetest.register_alias_raw
471 minetest.register_item_raw = nil
472
473 --
474 -- Item / entity / ABM registration functions
475 --
476
477 minetest.registered_abms = {}
478 minetest.registered_entities = {}
479 minetest.registered_items = {}
480 minetest.registered_nodes = {}
481 minetest.registered_craftitems = {}
482 minetest.registered_tools = {}
483 minetest.registered_aliases = {}
484
485 -- For tables that are indexed by item name:
486 -- If table[X] does not exist, default to table[minetest.registered_aliases[X]]
487 local function set_alias_metatable(table)
488         setmetatable(table, {
489                 __index = function(name)
490                         return rawget(table, minetest.registered_aliases[name])
491                 end
492         })
493 end
494 set_alias_metatable(minetest.registered_items)
495 set_alias_metatable(minetest.registered_nodes)
496 set_alias_metatable(minetest.registered_craftitems)
497 set_alias_metatable(minetest.registered_tools)
498
499 -- These item names may not be used because they would interfere
500 -- with legacy itemstrings
501 local forbidden_item_names = {
502         MaterialItem = true,
503         MaterialItem2 = true,
504         MaterialItem3 = true,
505         NodeItem = true,
506         node = true,
507         CraftItem = true,
508         craft = true,
509         MBOItem = true,
510         ToolItem = true,
511         tool = true,
512 }
513
514 local function check_modname_prefix(name)
515         if name:sub(1,1) == ":" then
516                 -- Escape the modname prefix enforcement mechanism
517                 return name:sub(2)
518         else
519                 -- Modname prefix enforcement
520                 local expected_prefix = minetest.get_current_modname() .. ":"
521                 if name:sub(1, #expected_prefix) ~= expected_prefix then
522                         error("Name " .. name .. " does not follow naming conventions: " ..
523                                 "\"modname:\" or \":\" prefix required")
524                 end
525                 local subname = name:sub(#expected_prefix+1)
526                 if subname:find("[^abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789_]") then
527                         error("Name " .. name .. " does not follow naming conventions: " ..
528                                 "contains unallowed characters")
529                 end
530                 return name
531         end
532 end
533
534 function minetest.register_abm(spec)
535         -- Add to minetest.registered_abms
536         minetest.registered_abms[#minetest.registered_abms+1] = spec
537 end
538
539 function minetest.register_entity(name, prototype)
540         -- Check name
541         if name == nil then
542                 error("Unable to register entity: Name is nil")
543         end
544         name = check_modname_prefix(tostring(name))
545
546         prototype.name = name
547         prototype.__index = prototype  -- so that it can be used as a metatable
548
549         -- Add to minetest.registered_entities
550         minetest.registered_entities[name] = prototype
551 end
552
553 function minetest.register_item(name, itemdef)
554         -- Check name
555         if name == nil then
556                 error("Unable to register item: Name is nil")
557         end
558         name = check_modname_prefix(tostring(name))
559         if forbidden_item_names[name] then
560                 error("Unable to register item: Name is forbidden: " .. name)
561         end
562         itemdef.name = name
563
564         -- Apply defaults and add to registered_* table
565         if itemdef.type == "node" then
566                 setmetatable(itemdef, {__index = minetest.nodedef_default})
567                 minetest.registered_nodes[itemdef.name] = itemdef
568         elseif itemdef.type == "craft" then
569                 setmetatable(itemdef, {__index = minetest.craftitemdef_default})
570                 minetest.registered_craftitems[itemdef.name] = itemdef
571         elseif itemdef.type == "tool" then
572                 setmetatable(itemdef, {__index = minetest.tooldef_default})
573                 minetest.registered_tools[itemdef.name] = itemdef
574         elseif itemdef.type == "none" then
575                 setmetatable(itemdef, {__index = minetest.noneitemdef_default})
576         else
577                 error("Unable to register item: Type is invalid: " .. dump(itemdef))
578         end
579
580         -- Flowing liquid uses param2
581         if itemdef.type == "node" and itemdef.liquidtype == "flowing" then
582                 itemdef.paramtype2 = "flowingliquid"
583         end
584
585         -- BEGIN Legacy stuff
586         if itemdef.cookresult_itemstring ~= nil and itemdef.cookresult_itemstring ~= "" then
587                 minetest.register_craft({
588                         type="cooking",
589                         output=itemdef.cookresult_itemstring,
590                         recipe=itemdef.name,
591                         cooktime=itemdef.furnace_cooktime
592                 })
593         end
594         if itemdef.furnace_burntime ~= nil and itemdef.furnace_burntime >= 0 then
595                 minetest.register_craft({
596                         type="fuel",
597                         recipe=itemdef.name,
598                         burntime=itemdef.furnace_burntime
599                 })
600         end
601         -- END Legacy stuff
602
603         -- Disable all further modifications
604         getmetatable(itemdef).__newindex = {}
605
606         --minetest.log("Registering item: " .. itemdef.name)
607         minetest.registered_items[itemdef.name] = itemdef
608         minetest.registered_aliases[itemdef.name] = nil
609         register_item_raw(itemdef)
610 end
611
612 function minetest.register_node(name, nodedef)
613         nodedef.type = "node"
614         minetest.register_item(name, nodedef)
615 end
616
617 function minetest.register_craftitem(name, craftitemdef)
618         craftitemdef.type = "craft"
619
620         -- BEGIN Legacy stuff
621         if craftitemdef.inventory_image == nil and craftitemdef.image ~= nil then
622                 craftitemdef.inventory_image = craftitemdef.image
623         end
624         -- END Legacy stuff
625
626         minetest.register_item(name, craftitemdef)
627 end
628
629 function minetest.register_tool(name, tooldef)
630         tooldef.type = "tool"
631         tooldef.stack_max = 1
632
633         -- BEGIN Legacy stuff
634         if tooldef.inventory_image == nil and tooldef.image ~= nil then
635                 tooldef.inventory_image = tooldef.image
636         end
637         if tooldef.tool_capabilities == nil and
638            (tooldef.full_punch_interval ~= nil or
639             tooldef.basetime ~= nil or
640             tooldef.dt_weight ~= nil or
641             tooldef.dt_crackiness ~= nil or
642             tooldef.dt_crumbliness ~= nil or
643             tooldef.dt_cuttability ~= nil or
644             tooldef.basedurability ~= nil or
645             tooldef.dd_weight ~= nil or
646             tooldef.dd_crackiness ~= nil or
647             tooldef.dd_crumbliness ~= nil or
648             tooldef.dd_cuttability ~= nil) then
649                 tooldef.tool_capabilities = {
650                         full_punch_interval = tooldef.full_punch_interval,
651                         basetime = tooldef.basetime,
652                         dt_weight = tooldef.dt_weight,
653                         dt_crackiness = tooldef.dt_crackiness,
654                         dt_crumbliness = tooldef.dt_crumbliness,
655                         dt_cuttability = tooldef.dt_cuttability,
656                         basedurability = tooldef.basedurability,
657                         dd_weight = tooldef.dd_weight,
658                         dd_crackiness = tooldef.dd_crackiness,
659                         dd_crumbliness = tooldef.dd_crumbliness,
660                         dd_cuttability = tooldef.dd_cuttability,
661                 }
662         end
663         -- END Legacy stuff
664
665         minetest.register_item(name, tooldef)
666 end
667
668 function minetest.register_alias(name, convert_to)
669         if forbidden_item_names[name] then
670                 error("Unable to register alias: Name is forbidden: " .. name)
671         end
672         if minetest.registered_items[name] ~= nil then
673                 minetest.log("WARNING: Not registering alias, item with same name" ..
674                         " is already defined: " .. name .. " -> " .. convert_to)
675         else
676                 --minetest.log("Registering alias: " .. name .. " -> " .. convert_to)
677                 minetest.registered_aliases[name] = convert_to
678                 register_alias_raw(name, convert_to)
679         end
680 end
681
682 -- Alias the forbidden item names to "" so they can't be
683 -- created via itemstrings (e.g. /give)
684 local name
685 for name in pairs(forbidden_item_names) do
686         minetest.registered_aliases[name] = ""
687         register_alias_raw(name, "")
688 end
689
690
691 -- Deprecated:
692 -- Aliases for minetest.register_alias (how ironic...)
693 --minetest.alias_node = minetest.register_alias
694 --minetest.alias_tool = minetest.register_alias
695 --minetest.alias_craftitem = minetest.register_alias
696
697 --
698 -- Built-in node definitions. Also defined in C.
699 --
700
701 minetest.register_item(":", {
702         type = "none",
703         wield_image = "wieldhand.png",
704         wield_scale = {x=1,y=1,z=2.5},
705         tool_capabilities = {
706                 full_punch_interval = 2.0,
707                 max_drop_level = 0,
708                 groupcaps = {
709                         fleshy = {times={[2]=2.00, [3]=1.00}, maxwear=0, maxlevel=1},
710                         crumbly = {times={[3]=0.70}, maxwear=0, maxlevel=1},
711                         snappy = {times={[3]=0.70}, maxwear=0, maxlevel=1},
712                 }
713         }
714 })
715
716 minetest.register_item(":unknown", {
717         type = "none",
718         description = "Unknown Item",
719         inventory_image = "unknown_item.png",
720         on_place = minetest.item_place,
721         on_drop = minetest.item_drop,
722 })
723
724 minetest.register_node(":air", {
725         description = "Air (you hacker you!)",
726         inventory_image = "unknown_block.png",
727         wield_image = "unknown_block.png",
728         drawtype = "airlike",
729         paramtype = "light",
730         sunlight_propagates = true,
731         walkable = false,
732         pointable = false,
733         diggable = false,
734         buildable_to = true,
735         air_equivalent = true,
736 })
737
738 minetest.register_node(":ignore", {
739         description = "Ignore (you hacker you!)",
740         inventory_image = "unknown_block.png",
741         wield_image = "unknown_block.png",
742         drawtype = "airlike",
743         paramtype = "none",
744         sunlight_propagates = false,
745         walkable = false,
746         pointable = false,
747         diggable = false,
748         buildable_to = true, -- A way to remove accidentally placed ignores
749         air_equivalent = true,
750 })
751
752 --
753 -- Default material types
754 --
755
756 function minetest.digprop_constanttime(time)
757         return {
758                 diggability = "constant",
759                 constant_time = time,
760         }
761 end
762
763 function minetest.digprop_stonelike(toughness)
764         return {
765                 diggablity = "normal",
766                 weight = toughness * 5,
767                 crackiness = 1,
768                 crumbliness = -0.1,
769                 cuttability = -0.2,
770         }
771 end
772
773 function minetest.digprop_dirtlike(toughness)
774         return {
775                 diggablity = "normal",
776                 weight = toughness * 1.2,
777                 crackiness = 0,
778                 crumbliness = 1.2,
779                 cuttability = -0.4,
780         }
781 end
782
783 function minetest.digprop_gravellike(toughness)
784         return {
785                 diggablity = "normal",
786                 weight = toughness * 2,
787                 crackiness = 0.2,
788                 crumbliness = 1.5,
789                 cuttability = -1.0,
790         }
791 end
792
793 function minetest.digprop_woodlike(toughness)
794         return {
795                 diggablity = "normal",
796                 weight = toughness * 1.0,
797                 crackiness = 0.75,
798                 crumbliness = -1.0,
799                 cuttability = 1.5,
800         }
801 end
802
803 function minetest.digprop_leaveslike(toughness)
804         return {
805                 diggablity = "normal",
806                 weight = toughness * (-0.5),
807                 crackiness = 0,
808                 crumbliness = 0,
809                 cuttability = 2.0,
810         }
811 end
812
813 function minetest.digprop_glasslike(toughness)
814         return {
815                 diggablity = "normal",
816                 weight = toughness * 0.1,
817                 crackiness = 2.0,
818                 crumbliness = -1.0,
819                 cuttability = -1.0,
820         }
821 end
822
823 --
824 -- Creative inventory
825 --
826
827 minetest.creative_inventory = {}
828
829 minetest.add_to_creative_inventory = function(itemstring)
830         table.insert(minetest.creative_inventory, itemstring)
831 end
832
833 --
834 -- Callback registration
835 --
836
837 local function make_registration()
838         local t = {}
839         local registerfunc = function(func) table.insert(t, func) end
840         return t, registerfunc
841 end
842
843 minetest.registered_on_chat_messages, minetest.register_on_chat_message = make_registration()
844 minetest.registered_globalsteps, minetest.register_globalstep = make_registration()
845 minetest.registered_on_placenodes, minetest.register_on_placenode = make_registration()
846 minetest.registered_on_dignodes, minetest.register_on_dignode = make_registration()
847 minetest.registered_on_punchnodes, minetest.register_on_punchnode = make_registration()
848 minetest.registered_on_generateds, minetest.register_on_generated = make_registration()
849 minetest.registered_on_newplayers, minetest.register_on_newplayer = make_registration()
850 minetest.registered_on_dieplayers, minetest.register_on_dieplayer = make_registration()
851 minetest.registered_on_respawnplayers, minetest.register_on_respawnplayer = make_registration()
852
853 --
854 -- Set random seed
855 --
856
857 math.randomseed(os.time())
858
859 -- END