Symbian compilation fixes.
[silc.git] / lib / silcutil / silcschedule.c
index 50c6f5ddbcb80ba4234be43d4fea910d0e1870d5..c0ee5dea72e3c9d6e080ca4df0e38b175a95c17e 100644 (file)
@@ -45,43 +45,34 @@ static void silc_schedule_fd_destructor(void *key, void *context,
 
 static void silc_schedule_dispatch_fd(SilcSchedule schedule)
 {
-  SilcHashTableList htl;
-  SilcTask t;
   SilcTaskFd task;
-  SilcUInt32 fd;
+  SilcTask t;
 
-  silc_hash_table_list(schedule->fd_queue, &htl);
-  while (silc_hash_table_get(&htl, (void **)&fd, (void **)&task)) {
+  /* The dispatch list includes only valid tasks, and tasks that have
+     something to dispatch.  Dispatching is atomic; no matter if another
+     thread invalidates a task when we unlock, we dispatch to completion. */
+  SILC_SCHEDULE_UNLOCK(schedule);
+  silc_list_start(schedule->fd_dispatch);
+  while ((task = silc_list_get(schedule->fd_dispatch))) {
     t = (SilcTask)task;
 
-    if (!t->valid) {
-      silc_schedule_task_remove(schedule, t);
-      continue;
-    }
-    if (!task->events || !task->revents)
-      continue;
-
     /* Is the task ready for reading */
-    if (task->revents & SILC_TASK_READ) {
-      SILC_SCHEDULE_UNLOCK(schedule);
+    if (task->revents & SILC_TASK_READ)
       t->callback(schedule, schedule->app_context, SILC_TASK_READ,
                  task->fd, t->context);
-      SILC_SCHEDULE_LOCK(schedule);
-    }
 
     /* Is the task ready for writing */
-    if (t->valid && task->revents & SILC_TASK_WRITE) {
-      SILC_SCHEDULE_UNLOCK(schedule);
+    if (t->valid && task->revents & SILC_TASK_WRITE)
       t->callback(schedule, schedule->app_context, SILC_TASK_WRITE,
                  task->fd, t->context);
-      SILC_SCHEDULE_LOCK(schedule);
-    }
-
-    /* Remove if task was invalidated in the task callback */
-    if (!t->valid)
-      silc_schedule_task_remove(schedule, t);
   }
-  silc_hash_table_list_reset(&htl);
+  SILC_SCHEDULE_LOCK(schedule);
+
+  /* Remove invalidated tasks */
+  silc_list_start(schedule->fd_dispatch);
+  while ((task = silc_list_get(schedule->fd_dispatch)))
+    if (silc_unlikely(!task->header.valid))
+      silc_schedule_task_remove(schedule, (SilcTask)task);
 }
 
 /* Executes all tasks whose timeout has expired. The task is removed from
@@ -102,31 +93,35 @@ static void silc_schedule_dispatch_timeout(SilcSchedule schedule,
 
   /* First task in the task queue has always the earliest timeout. */
   silc_list_start(schedule->timeout_queue);
-  while ((task = silc_list_get(schedule->timeout_queue)) != SILC_LIST_END) {
+  task = silc_list_get(schedule->timeout_queue);
+  if (silc_unlikely(!task))
+    return;
+  do {
     t = (SilcTask)task;
 
     /* Remove invalid task */
-    if (!t->valid) {
+    if (silc_unlikely(!t->valid)) {
       silc_schedule_task_remove(schedule, t);
       continue;
     }
 
     /* Execute the task if the timeout has expired */
-    if (dispatch_all || silc_compare_timeval(&task->timeout, &curtime)) {
-      t->valid = FALSE;
-      SILC_SCHEDULE_UNLOCK(schedule);
-      t->callback(schedule, schedule->app_context, SILC_TASK_EXPIRE, 0,
-                 t->context);
-      SILC_SCHEDULE_LOCK(schedule);
+    if (!silc_compare_timeval(&task->timeout, &curtime) && !dispatch_all)
+      break;
 
-      /* Remove the expired task */
-      silc_schedule_task_remove(schedule, t);
+    t->valid = FALSE;
+    SILC_SCHEDULE_UNLOCK(schedule);
+    t->callback(schedule, schedule->app_context, SILC_TASK_EXPIRE, 0,
+               t->context);
+    SILC_SCHEDULE_LOCK(schedule);
 
-      /* Balance when we have lots of small timeouts */
-      if ((++count) > 50)
-       break;
-    }
-  }
+    /* Remove the expired task */
+    silc_schedule_task_remove(schedule, t);
+
+    /* Balance when we have lots of small timeouts */
+    if (silc_unlikely((++count) > 40))
+      break;
+  } while (silc_likely((task = silc_list_get(schedule->timeout_queue))));
 }
 
 /* Calculates next timeout. This is the timeout value when at earliest some
@@ -146,11 +141,14 @@ static void silc_schedule_select_timeout(SilcSchedule schedule)
 
   /* First task in the task queue has always the earliest timeout. */
   silc_list_start(schedule->timeout_queue);
-  while ((task = silc_list_get(schedule->timeout_queue)) != SILC_LIST_END) {
+  task = silc_list_get(schedule->timeout_queue);
+  if (silc_unlikely(!task))
+    return;
+  do {
     t = (SilcTask)task;
 
     /* Remove invalid task */
-    if (!t->valid) {
+    if (silc_unlikely(!t->valid)) {
       silc_schedule_task_remove(schedule, t);
       continue;
     }
@@ -159,7 +157,7 @@ static void silc_schedule_select_timeout(SilcSchedule schedule)
        timeout tasks from the past. */
     if (silc_compare_timeval(&task->timeout, &curtime) && dispatch) {
       silc_schedule_dispatch_timeout(schedule, FALSE);
-      if (!schedule->valid)
+      if (silc_unlikely(!schedule->valid))
        return;
 
       /* Start selecting new timeout again after dispatch */
@@ -181,9 +179,8 @@ static void silc_schedule_select_timeout(SilcSchedule schedule)
        curtime.tv_sec = 0;
       curtime.tv_usec += 1000000L;
     }
-
     break;
-  }
+  } while ((task = silc_list_get(schedule->timeout_queue)));
 
   /* Save the timeout */
   if (task) {
@@ -200,9 +197,8 @@ static void silc_schedule_select_timeout(SilcSchedule schedule)
 static void silc_schedule_task_remove(SilcSchedule schedule, SilcTask task)
 {
   SilcTaskFd ftask;
-  SilcTaskTimeout ttask;
 
-  if (task == SILC_ALL_TASKS) {
+  if (silc_unlikely(task == SILC_ALL_TASKS)) {
     SilcTask task;
     SilcHashTableList htl;
     SilcUInt32 fd;
@@ -215,8 +211,7 @@ static void silc_schedule_task_remove(SilcSchedule schedule, SilcTask task)
 
     /* Delete from timeout queue */
     silc_list_start(schedule->timeout_queue);
-    while ((task = (SilcTask)silc_list_get(schedule->timeout_queue))
-          != SILC_LIST_END) {
+    while ((task = silc_list_get(schedule->timeout_queue))) {
       silc_list_del(schedule->timeout_queue, task);
       silc_free(task);
     }
@@ -224,25 +219,90 @@ static void silc_schedule_task_remove(SilcSchedule schedule, SilcTask task)
     return;
   }
 
-  /* Delete from timeout queue */
-  if (task->type == 1) {
-    silc_list_start(schedule->timeout_queue);
-    while ((ttask = silc_list_get(schedule->timeout_queue)) != SILC_LIST_END) {
-      if (ttask == (SilcTaskTimeout)task) {
-       silc_list_del(schedule->timeout_queue, ttask);
-       silc_free(ttask);
-       break;
-      }
-    }
+  if (silc_likely(task->type == 1)) {
+    /* Delete from timeout queue */
+    silc_list_del(schedule->timeout_queue, task);
+
+    /* Put to free list */
+    silc_list_add(schedule->free_tasks, task);
+  } else {
+    /* Delete from fd queue */
+    ftask = (SilcTaskFd)task;
+    silc_hash_table_del(schedule->fd_queue, SILC_32_TO_PTR(ftask->fd));
+  }
+}
+
+/* Timeout freelist garbage collection */
+
+SILC_TASK_CALLBACK(silc_schedule_timeout_gc)
+{
+  SilcTaskTimeout t;
+  int c;
 
+  if (!schedule->valid)
+    return;
+
+  SILC_LOG_DEBUG(("Timeout freelist garbage collection"));
+
+  SILC_SCHEDULE_LOCK(schedule);
+
+  if (silc_list_count(schedule->free_tasks) <= 10) {
+    SILC_SCHEDULE_UNLOCK(schedule);
+    silc_schedule_task_add_timeout(schedule, silc_schedule_timeout_gc,
+                                  schedule, 3600, 0);
+    return;
+  }
+  if (silc_list_count(schedule->timeout_queue) >
+      silc_list_count(schedule->free_tasks)) {
+    SILC_SCHEDULE_UNLOCK(schedule);
+    silc_schedule_task_add_timeout(schedule, silc_schedule_timeout_gc,
+                                  schedule, 3600, 0);
     return;
   }
 
-  /* Delete from fd queue */
-  ftask = (SilcTaskFd)task;
-  silc_hash_table_del(schedule->fd_queue, SILC_32_TO_PTR(ftask->fd));
+  c = silc_list_count(schedule->free_tasks) / 2;
+  if (c > silc_list_count(schedule->timeout_queue))
+    c = (silc_list_count(schedule->free_tasks) -
+        silc_list_count(schedule->timeout_queue));
+  if (silc_list_count(schedule->free_tasks) - c < 10)
+    c -= (10 - (silc_list_count(schedule->free_tasks) - c));
+
+  SILC_LOG_DEBUG(("Freeing %d unused tasks, leaving %d", c,
+                 silc_list_count(schedule->free_tasks) - c));
+
+  silc_list_start(schedule->free_tasks);
+  while ((t = silc_list_get(schedule->free_tasks)) && c-- > 0) {
+    silc_list_del(schedule->free_tasks, t);
+    silc_free(t);
+  }
+  silc_list_start(schedule->free_tasks);
+
+  SILC_SCHEDULE_UNLOCK(schedule);
+
+  silc_schedule_task_add_timeout(schedule, silc_schedule_timeout_gc,
+                                schedule, 3600, 0);
 }
 
+#ifdef SILC_DIST_INPLACE
+/* Print schedule statistics to stdout */
+
+void silc_schedule_stats(SilcSchedule schedule)
+{
+  SilcTaskFd ftask;
+  fprintf(stdout, "Schedule %p statistics:\n\n", schedule);
+  fprintf(stdout, "Num FD tasks         : %lu (%lu bytes allocated)\n",
+         silc_hash_table_count(schedule->fd_queue),
+         sizeof(*ftask) * silc_hash_table_count(schedule->fd_queue));
+  fprintf(stdout, "Num Timeout tasks    : %d (%d bytes allocated)\n",
+         silc_list_count(schedule->timeout_queue),
+         sizeof(struct SilcTaskTimeoutStruct) *
+         silc_list_count(schedule->timeout_queue));
+  fprintf(stdout, "Num Timeout freelist : %d (%d bytes allocated)\n",
+         silc_list_count(schedule->free_tasks),
+         sizeof(struct SilcTaskTimeoutStruct) *
+         silc_list_count(schedule->free_tasks));
+}
+#endif /* SILC_DIST_INPLACE */
 
 /****************************** Public API **********************************/
 
@@ -268,7 +328,8 @@ SilcSchedule silc_schedule_init(int max_tasks, void *app_context)
   if (!schedule->fd_queue)
     return NULL;
 
-  silc_list_init(schedule->timeout_queue, struct SilcTaskTimeoutStruct, next);
+  silc_list_init(schedule->timeout_queue, struct SilcTaskStruct, next);
+  silc_list_init(schedule->free_tasks, struct SilcTaskStruct, next);
 
   schedule->app_context = app_context;
   schedule->valid = TRUE;
@@ -280,6 +341,10 @@ SilcSchedule silc_schedule_init(int max_tasks, void *app_context)
   /* Initialize the platform specific scheduler. */
   schedule->internal = schedule_ops.init(schedule, app_context);
 
+  /* Timeout freelist garbage collection */
+  silc_schedule_task_add_timeout(schedule, silc_schedule_timeout_gc,
+                                schedule, 3600, 0);
+
   return schedule;
 }
 
@@ -290,6 +355,8 @@ SilcSchedule silc_schedule_init(int max_tasks, void *app_context)
 
 SilcBool silc_schedule_uninit(SilcSchedule schedule)
 {
+  SilcTask task;
+
   SILC_LOG_DEBUG(("Uninitializing scheduler"));
 
   if (schedule->valid == TRUE)
@@ -307,9 +374,14 @@ SilcBool silc_schedule_uninit(SilcSchedule schedule)
   }
 
   /* Unregister all tasks */
-  silc_schedule_task_remove(schedule, SILC_ALL_TASKS);
+  silc_schedule_task_del(schedule, SILC_ALL_TASKS);
   silc_schedule_task_remove(schedule, SILC_ALL_TASKS);
 
+  /* Delete timeout task freelist */
+  silc_list_start(schedule->free_tasks);
+  while ((task = silc_list_get(schedule->free_tasks)))
+    silc_free(task);
+
   /* Unregister all task queues */
   silc_hash_table_free(schedule->fd_queue);
 
@@ -334,105 +406,100 @@ void silc_schedule_stop(SilcSchedule schedule)
   SILC_SCHEDULE_UNLOCK(schedule);
 }
 
-/* Runs the scheduler once and then returns. */
+/* Runs the scheduler once and then returns.   Must be called locked. */
 
-SilcBool silc_schedule_one(SilcSchedule schedule, int timeout_usecs)
+static SilcBool silc_schedule_iterate(SilcSchedule schedule, int timeout_usecs)
 {
   struct timeval timeout;
   int ret;
 
-  SILC_LOG_DEBUG(("In scheduler loop"));
+  do {
+    SILC_LOG_DEBUG(("In scheduler loop"));
 
-  if (!schedule->is_locked)
-    SILC_SCHEDULE_LOCK(schedule);
+    /* Deliver signals if any has been set to be called */
+    if (silc_unlikely(schedule->signal_tasks)) {
+      SILC_SCHEDULE_UNLOCK(schedule);
+      schedule_ops.signals_call(schedule, schedule->internal);
+      schedule->signal_tasks = FALSE;
+      SILC_SCHEDULE_LOCK(schedule);
+    }
 
-  /* Deliver signals if any has been set to be called */
-  if (schedule->signal_tasks) {
-    SILC_SCHEDULE_UNLOCK(schedule);
-    schedule_ops.signals_call(schedule, schedule->internal);
-    schedule->signal_tasks = FALSE;
-    SILC_SCHEDULE_LOCK(schedule);
-  }
+    /* Check if scheduler is valid */
+    if (silc_unlikely(schedule->valid == FALSE)) {
+      SILC_LOG_DEBUG(("Scheduler not valid anymore, exiting"));
+      return FALSE;
+    }
 
-  /* Check if scheduler is valid */
-  if (schedule->valid == FALSE) {
-    SILC_LOG_DEBUG(("Scheduler not valid anymore, exiting"));
-    if (!schedule->is_locked)
-      SILC_SCHEDULE_UNLOCK(schedule);
-    return FALSE;
-  }
+    /* Calculate next timeout for silc_select().  This is the timeout value
+       when at earliest some of the timeout tasks expire.  This may dispatch
+       already expired timeouts. */
+    silc_schedule_select_timeout(schedule);
 
-  /* Calculate next timeout for silc_select().  This is the timeout value
-     when at earliest some of the timeout tasks expire.  This may dispatch
-     already expired timeouts. */
-  silc_schedule_select_timeout(schedule);
+    /* Check if scheduler is valid */
+    if (silc_unlikely(schedule->valid == FALSE)) {
+      SILC_LOG_DEBUG(("Scheduler not valid anymore, exiting"));
+      return FALSE;
+    }
 
-  /* Check if scheduler is valid */
-  if (schedule->valid == FALSE) {
-    SILC_LOG_DEBUG(("Scheduler not valid anymore, exiting"));
-    if (!schedule->is_locked)
-      SILC_SCHEDULE_UNLOCK(schedule);
-    return FALSE;
-  }
+    if (timeout_usecs >= 0) {
+      timeout.tv_sec = 0;
+      timeout.tv_usec = timeout_usecs;
+      schedule->timeout = timeout;
+      schedule->has_timeout = TRUE;
+    }
 
-  if (timeout_usecs >= 0) {
-    timeout.tv_sec = 0;
-    timeout.tv_usec = timeout_usecs;
-    schedule->timeout = timeout;
-    schedule->has_timeout = TRUE;
-  }
+    /* This is the main silc_select(). The program blocks here until some
+       of the selected file descriptors change status or the selected
+       timeout expires. */
+    SILC_LOG_DEBUG(("Select"));
+    ret = schedule_ops.schedule(schedule, schedule->internal);
+
+    if (silc_likely(ret == 0)) {
+      /* Timeout */
+      SILC_LOG_DEBUG(("Running timeout tasks"));
+      if (silc_likely(silc_list_count(schedule->timeout_queue)))
+       silc_schedule_dispatch_timeout(schedule, FALSE);
+      continue;
 
-  /* This is the main silc_select(). The program blocks here until some
-     of the selected file descriptors change status or the selected
-     timeout expires. */
-  SILC_LOG_DEBUG(("Select"));
-  ret = schedule_ops.select(schedule, schedule->internal);
-
-  switch (ret) {
-  case 0:
-    /* Timeout */
-    SILC_LOG_DEBUG(("Running timeout tasks"));
-    silc_schedule_dispatch_timeout(schedule, FALSE);
-    break;
-  case -1:
-    /* Error */
-    if (errno == EINTR)
-      break;
-    SILC_LOG_ERROR(("Error in select(): %s", strerror(errno)));
-    break;
-  default:
-    /* There is some data available now */
-    SILC_LOG_DEBUG(("Running fd tasks"));
-    silc_schedule_dispatch_fd(schedule);
-    break;
-  }
+    } else if (silc_likely(ret > 0)) {
+      /* There is some data available now */
+      SILC_LOG_DEBUG(("Running fd tasks"));
+      silc_schedule_dispatch_fd(schedule);
+      continue;
 
-  if (!schedule->is_locked)
-    SILC_SCHEDULE_UNLOCK(schedule);
+    } else {
+      /* Error */
+      if (silc_likely(errno == EINTR))
+       continue;
+      SILC_LOG_ERROR(("Error in select()/poll(): %s", strerror(errno)));
+      continue;
+    }
+  } while (timeout_usecs == -1);
 
   return TRUE;
 }
 
-/* The SILC scheduler. This is actually the main routine in SILC programs.
-   When this returns the program is to be ended. Before this function can
-   be called, one must call silc_schedule_init function. */
+/* Runs the scheduler once and then returns. */
 
-void silc_schedule(SilcSchedule schedule)
+SilcBool silc_schedule_one(SilcSchedule schedule, int timeout_usecs)
 {
-  SILC_LOG_DEBUG(("Running scheduler"));
+  SilcBool ret;
+  SILC_SCHEDULE_LOCK(schedule);
+  ret = silc_schedule_iterate(schedule, timeout_usecs);
+  SILC_SCHEDULE_UNLOCK(schedule);
+  return ret;
+}
 
-  if (schedule->valid == FALSE) {
-    SILC_LOG_ERROR(("Scheduler is not valid, stopping"));
-    return;
-  }
+/* Runs the scheduler and blocks here.  When this returns the scheduler
+   has ended. */
 
-  SILC_SCHEDULE_LOCK(schedule);
-  schedule->is_locked = TRUE;
+void silc_schedule(SilcSchedule schedule)
+{
+  SILC_LOG_DEBUG(("Running scheduler"));
 
   /* Start the scheduler loop */
-  while (silc_schedule_one(schedule, -1))
-    ;
-
+  SILC_SCHEDULE_LOCK(schedule);
+  silc_schedule_iterate(schedule, -1);
   SILC_SCHEDULE_UNLOCK(schedule);
 }
 
@@ -472,15 +539,23 @@ SilcTask silc_schedule_task_add(SilcSchedule schedule, SilcUInt32 fd,
 {
   SilcTask task = NULL;
 
-  if (!schedule->valid)
+  if (silc_unlikely(!schedule->valid))
     return NULL;
 
   SILC_SCHEDULE_LOCK(schedule);
 
-  if (type == SILC_TASK_TIMEOUT) {
-    SilcTaskTimeout tmp, prev, ttask = silc_calloc(1, sizeof(*ttask));
-    if (!ttask)
-      goto out;
+  if (silc_likely(type == SILC_TASK_TIMEOUT)) {
+    SilcTaskTimeout tmp, prev, ttask;
+    SilcList list;
+
+    silc_list_start(schedule->free_tasks);
+    ttask = silc_list_get(schedule->free_tasks);
+    if (silc_unlikely(!ttask)) {
+      ttask = silc_calloc(1, sizeof(*ttask));
+      if (silc_unlikely(!ttask))
+       goto out;
+    }
+    silc_list_del(schedule->free_tasks, ttask);
 
     ttask->header.type = 1;
     ttask->header.callback = callback;
@@ -488,8 +563,8 @@ SilcTask silc_schedule_task_add(SilcSchedule schedule, SilcUInt32 fd,
     ttask->header.valid = TRUE;
 
     /* Add timeout */
+    silc_gettimeofday(&ttask->timeout);
     if ((seconds + useconds) > 0) {
-      silc_gettimeofday(&ttask->timeout);
       ttask->timeout.tv_sec += seconds + (useconds / 1000000L);
       ttask->timeout.tv_usec += (useconds % 1000000L);
       if (ttask->timeout.tv_usec >= 1000000L) {
@@ -503,9 +578,10 @@ SilcTask silc_schedule_task_add(SilcSchedule schedule, SilcUInt32 fd,
 
     /* Add task to correct spot so that the first task in the list has
        the earliest timeout. */
-    silc_list_start(schedule->timeout_queue);
+    list = schedule->timeout_queue;
+    silc_list_start(list);
     prev = NULL;
-    while ((tmp = silc_list_get(schedule->timeout_queue)) != SILC_LIST_END) {
+    while ((tmp = silc_list_get(list)) != SILC_LIST_END) {
       /* If we have shorter timeout, we have found our spot */
       if (silc_compare_timeval(&ttask->timeout, &tmp->timeout)) {
        silc_list_insert(schedule->timeout_queue, prev, ttask);
@@ -517,21 +593,26 @@ SilcTask silc_schedule_task_add(SilcSchedule schedule, SilcUInt32 fd,
       silc_list_add(schedule->timeout_queue, ttask);
 
     task = (SilcTask)ttask;
-  } else {
+
+  } else if (silc_likely(type == SILC_TASK_FD)) {
+    SilcTaskFd ftask;
+
     /* Check if fd is already added */
-    if (silc_hash_table_find(schedule->fd_queue, SILC_32_TO_PTR(fd),
-                            NULL, (void **)&task))
+    if (silc_unlikely(silc_hash_table_find(schedule->fd_queue,
+                                          SILC_32_TO_PTR(fd),
+                                          NULL, (void **)&task)))
       goto out;
 
     /* Check max tasks */
-    if (schedule->max_tasks > 0 &&
-       silc_hash_table_count(schedule->fd_queue) >= schedule->max_tasks) {
+    if (silc_unlikely(schedule->max_tasks > 0 &&
+                     silc_hash_table_count(schedule->fd_queue) >=
+                     schedule->max_tasks)) {
       SILC_LOG_WARNING(("Scheduler task limit reached: cannot add new task"));
       goto out;
     }
 
-    SilcTaskFd ftask = silc_calloc(1, sizeof(*ftask));
-    if (!ftask)
+    ftask = silc_calloc(1, sizeof(*ftask));
+    if (silc_unlikely(!ftask))
       goto out;
 
     SILC_LOG_DEBUG(("New fd task %p fd=%d", ftask, fd));
@@ -547,6 +628,12 @@ SilcTask silc_schedule_task_add(SilcSchedule schedule, SilcUInt32 fd,
     silc_hash_table_add(schedule->fd_queue, SILC_32_TO_PTR(fd), ftask);
 
     task = (SilcTask)ftask;
+
+  } else if (silc_unlikely(type == SILC_TASK_SIGNAL)) {
+    SILC_SCHEDULE_UNLOCK(schedule);
+    schedule_ops.signal_register(schedule, schedule->internal, fd,
+                                callback, context);
+    return NULL;
   }
 
  out:
@@ -558,8 +645,7 @@ SilcTask silc_schedule_task_add(SilcSchedule schedule, SilcUInt32 fd,
 
 void silc_schedule_task_del(SilcSchedule schedule, SilcTask task)
 {
-  if (task == SILC_ALL_TASKS) {
-    SilcTask task;
+  if (silc_unlikely(task == SILC_ALL_TASKS)) {
     SilcHashTableList htl;
 
     SILC_LOG_DEBUG(("Unregister all tasks"));
@@ -592,18 +678,23 @@ void silc_schedule_task_del(SilcSchedule schedule, SilcTask task)
 
 void silc_schedule_task_del_by_fd(SilcSchedule schedule, SilcUInt32 fd)
 {
-  SilcTask task;
+  SilcTask task = NULL;
 
   SILC_LOG_DEBUG(("Unregister task by fd %d", fd));
 
   SILC_SCHEDULE_LOCK(schedule);
 
   /* fd is unique, so there is only one task with this fd in the table */
-  if (silc_hash_table_find(schedule->fd_queue, SILC_32_TO_PTR(fd), NULL,
-                          (void **)&task))
+  if (silc_likely(silc_hash_table_find(schedule->fd_queue,
+                                      SILC_32_TO_PTR(fd), NULL,
+                                      (void **)&task)))
     task->valid = FALSE;
 
   SILC_SCHEDULE_UNLOCK(schedule);
+
+  /* If it is signal, remove it */
+  if (silc_unlikely(!task))
+    schedule_ops.signal_unregister(schedule, schedule->internal, fd);
 }
 
 /* Invalidate task by task callback. */
@@ -613,6 +704,7 @@ void silc_schedule_task_del_by_callback(SilcSchedule schedule,
 {
   SilcTask task;
   SilcHashTableList htl;
+  SilcList list;
 
   SILC_LOG_DEBUG(("Unregister task by callback"));
 
@@ -627,9 +719,9 @@ void silc_schedule_task_del_by_callback(SilcSchedule schedule,
   silc_hash_table_list_reset(&htl);
 
   /* Delete from timeout queue */
-  silc_list_start(schedule->timeout_queue);
-  while ((task = (SilcTask)silc_list_get(schedule->timeout_queue))
-        != SILC_LIST_END) {
+  list = schedule->timeout_queue;
+  silc_list_start(list);
+  while ((task = (SilcTask)silc_list_get(list))) {
     if (task->callback == callback)
       task->valid = FALSE;
   }
@@ -643,6 +735,7 @@ void silc_schedule_task_del_by_context(SilcSchedule schedule, void *context)
 {
   SilcTask task;
   SilcHashTableList htl;
+  SilcList list;
 
   SILC_LOG_DEBUG(("Unregister task by context"));
 
@@ -657,9 +750,9 @@ void silc_schedule_task_del_by_context(SilcSchedule schedule, void *context)
   silc_hash_table_list_reset(&htl);
 
   /* Delete from timeout queue */
-  silc_list_start(schedule->timeout_queue);
-  while ((task = (SilcTask)silc_list_get(schedule->timeout_queue))
-        != SILC_LIST_END) {
+  list = schedule->timeout_queue;
+  silc_list_start(list);
+  while ((task = (SilcTask)silc_list_get(list))) {
     if (task->context == context)
       task->valid = FALSE;
   }
@@ -673,6 +766,7 @@ void silc_schedule_task_del_by_all(SilcSchedule schedule, int fd,
                                   SilcTaskCallback callback, void *context)
 {
   SilcTask task;
+  SilcList list;
 
   SILC_LOG_DEBUG(("Unregister task by fd, callback and context"));
 
@@ -683,9 +777,9 @@ void silc_schedule_task_del_by_all(SilcSchedule schedule, int fd,
   SILC_SCHEDULE_LOCK(schedule);
 
   /* Delete from timeout queue */
-  silc_list_start(schedule->timeout_queue);
-  while ((task = (SilcTask)silc_list_get(schedule->timeout_queue))
-        != SILC_LIST_END) {
+  list = schedule->timeout_queue;
+  silc_list_start(list);
+  while ((task = (SilcTask)silc_list_get(list))) {
     if (task->callback == callback && task->context == context)
       task->valid = FALSE;
   }
@@ -702,7 +796,7 @@ void silc_schedule_set_listen_fd(SilcSchedule schedule, SilcUInt32 fd,
 {
   SilcTaskFd task;
 
-  if (!schedule->valid)
+  if (silc_unlikely(!schedule->valid))
     return;
 
   SILC_SCHEDULE_LOCK(schedule);
@@ -710,7 +804,8 @@ void silc_schedule_set_listen_fd(SilcSchedule schedule, SilcUInt32 fd,
   if (silc_hash_table_find(schedule->fd_queue, SILC_32_TO_PTR(fd),
                           NULL, (void **)&task)) {
     task->events = mask;
-    if (send_events) {
+    schedule_ops.schedule_fd(schedule, schedule->internal, task, mask);
+    if (silc_unlikely(send_events) && mask) {
       task->revents = mask;
       silc_schedule_dispatch_fd(schedule);
     }
@@ -719,36 +814,29 @@ void silc_schedule_set_listen_fd(SilcSchedule schedule, SilcUInt32 fd,
   SILC_SCHEDULE_UNLOCK(schedule);
 }
 
-/* Removes a file descriptor from listen list. */
+/* Returns the file descriptors current requested event mask. */
 
-void silc_schedule_unset_listen_fd(SilcSchedule schedule, SilcUInt32 fd)
+SilcTaskEvent silc_schedule_get_fd_events(SilcSchedule schedule,
+                                         SilcUInt32 fd)
 {
-  silc_schedule_set_listen_fd(schedule, fd, 0, FALSE);
-}
-
-/* Register a new signal */
+  SilcTaskFd task;
+  SilcTaskEvent event = 0;
 
-void silc_schedule_signal_register(SilcSchedule schedule, SilcUInt32 signal,
-                                  SilcTaskCallback callback, void *context)
-{
-  schedule_ops.signal_register(schedule, schedule->internal, signal,
-                               callback, context);
-}
+  if (silc_unlikely(!schedule->valid))
+    return 0;
 
-/* Unregister a new signal */
+  SILC_SCHEDULE_LOCK(schedule);
+  if (silc_hash_table_find(schedule->fd_queue, SILC_32_TO_PTR(fd),
+                          NULL, (void **)&task))
+    event = task->events;
+  SILC_SCHEDULE_UNLOCK(schedule);
 
-void silc_schedule_signal_unregister(SilcSchedule schedule, SilcUInt32 signal,
-                                    SilcTaskCallback callback, void *context)
-{
-  schedule_ops.signal_unregister(schedule, schedule->internal, signal,
-                                 callback, context);
+  return event;
 }
 
-/* Call signal indicated by `signal'. */
+/* Removes a file descriptor from listen list. */
 
-void silc_schedule_signal_call(SilcSchedule schedule, SilcUInt32 signal)
+void silc_schedule_unset_listen_fd(SilcSchedule schedule, SilcUInt32 fd)
 {
-  /* Mark that signals needs to be delivered later. */
-  schedule_ops.signal_call(schedule, schedule->internal, signal);
-  schedule->signal_tasks = TRUE;
+  silc_schedule_set_listen_fd(schedule, fd, 0, FALSE);
 }