Merge 0.10->trunk

diff --combined net/server_event.lua
index cfe9c6f58b3482f610647ae6cf6e6d90a7a8164b,1329a43d67abc0933f234b3af829763afaf28453..08524646c19e4ebf2aa63e89f1e4d6e92ae1a648
--- 1/net/server_event.lua
--- 2/net/server_event.lua
+++ b/net/server_event.lua
@@@ -518,7 -518,7 +518,7 @@@ local function handleclient( client, ip
                                elseif interface.startsslcallback then  -- start ssl connection if needed
                                        debug "starting ssl handshake after writing"
                                        interface.eventstarthandshake = addevent( base, nil, EV_TIMEOUT, interface.startsslcallback, 0 )
-                               elseif interface.writebuffer ~= 0 then
+                               elseif interface.writebufferlen ~= 0 then
                                        -- data possibly written from ondrain
                                        return EV_WRITE, cfg.WRITE_TIMEOUT
                                elseif interface.eventreadtimeout then
@@@ -805,20 -805,6 +805,20 @@@ local function link(sender, receiver, b
        sender:set_mode("*a");
  end
  
 +local function add_task(delay, callback)
 +      local event_handle;
 +      event_handle = base:addevent(nil, 0, function ()
 +              local ret = callback(socket_gettime());
 +              if ret then
 +                      return 0, ret;
 +              elseif event_handle then
 +                      return -1;
 +              end
 +      end
 +      , delay);
 +      return event_handle;
 +end
 +
  return {
        cfg = cfg,
        base = base,
@@@ -834,7 -820,6 +834,7 @@@
        closeall = closeallservers,
        get_backend = get_backend,
        hook_signal = hook_signal,
 +      add_task = add_task,
  
        __NAME = SCRIPT_NAME,
        __DATE = LAST_MODIFIED,