cfc5abaa7bd4296dd067f7d915d5532638e2af12
[oweals/minetest.git] / builtin / client / register.lua
1
2 core.callback_origins = {}
3
4 local getinfo = debug.getinfo
5 debug.getinfo = nil
6
7 function core.run_callbacks(callbacks, mode, ...)
8         assert(type(callbacks) == "table")
9         local cb_len = #callbacks
10         if cb_len == 0 then
11                 if mode == 2 or mode == 3 then
12                         return true
13                 elseif mode == 4 or mode == 5 then
14                         return false
15                 end
16         end
17         local ret
18         for i = 1, cb_len do
19                 local cb_ret = callbacks[i](...)
20
21                 if mode == 0 and i == 1 or mode == 1 and i == cb_len then
22                         ret = cb_ret
23                 elseif mode == 2 then
24                         if not cb_ret or i == 1 then
25                                 ret = cb_ret
26                         end
27                 elseif mode == 3 then
28                         if cb_ret then
29                                 return cb_ret
30                         end
31                         ret = cb_ret
32                 elseif mode == 4 then
33                         if (cb_ret and not ret) or i == 1 then
34                                 ret = cb_ret
35                         end
36                 elseif mode == 5 and cb_ret then
37                         return cb_ret
38                 end
39         end
40         return ret
41 end
42
43 --
44 -- Callback registration
45 --
46
47 local function make_registration()
48         local t = {}
49         local registerfunc = function(func)
50                 t[#t + 1] = func
51                 core.callback_origins[func] = {
52                         mod = core.get_current_modname() or "??",
53                         name = getinfo(1, "n").name or "??"
54                 }
55                 --local origin = core.callback_origins[func]
56                 --print(origin.name .. ": " .. origin.mod .. " registering cbk " .. tostring(func))
57         end
58         return t, registerfunc
59 end
60
61 core.registered_globalsteps, core.register_globalstep = make_registration()
62 core.registered_on_shutdown, core.register_on_shutdown = make_registration()
63 core.registered_on_connect, core.register_on_connect = make_registration()
64 core.registered_on_receiving_chat_message, core.register_on_receiving_chat_message = make_registration()
65 core.registered_on_sending_chat_message, core.register_on_sending_chat_message = make_registration()
66 core.registered_on_death, core.register_on_death = make_registration()
67 core.registered_on_hp_modification, core.register_on_hp_modification = make_registration()
68 core.registered_on_damage_taken, core.register_on_damage_taken = make_registration()
69 core.registered_on_formspec_input, core.register_on_formspec_input = make_registration()
70 core.registered_on_dignode, core.register_on_dignode = make_registration()
71 core.registered_on_punchnode, core.register_on_punchnode = make_registration()
72 core.registered_on_placenode, core.register_on_placenode = make_registration()
73 core.registered_on_item_use, core.register_on_item_use = make_registration()