2 -- Copyright (C) 2008-2010 Matthew Wild
3 -- Copyright (C) 2008-2010 Waqas Hussain
5 -- This project is MIT/X11 licensed. Please see the
6 -- COPYING file in the source package for more information.
10 local ns_addtimer = require "net.server".addtimer;
11 local event = require "net.server".event;
12 local event_base = require "net.server".event_base;
14 local get_time = os.time;
15 local t_insert = table.insert;
16 local t_remove = table.remove;
17 local ipairs, pairs = ipairs, pairs;
27 function _add_task(delay, func)
28 local current_time = get_time();
29 delay = delay + current_time;
30 if delay >= current_time then
31 t_insert(new_data, {delay, func});
37 ns_addtimer(function()
38 local current_time = get_time();
40 for _, d in pairs(new_data) do
46 for i, d in pairs(data) do
47 local t, func = d[1], d[2];
48 if t <= current_time then
50 local r = func(current_time);
51 if type(r) == "number" then _add_task(r, func); end
56 local EVENT_LEAVE = (event.core and event.core.LEAVE) or -1;
57 function _add_task(delay, func)
59 event_handle = event_base:addevent(nil, 0, function ()
63 elseif event_handle then