src/event.c

   1 /*
   2     event.c -- event queue
   3     Copyright (C) 2002-2009 Guus Sliepen <guus@tinc-vpn.org>,
   4                   2002-2005 Ivo Timmermans
   5
   6     This program is free software; you can redistribute it and/or modify
   7     it under the terms of the GNU General Public License as published by
   8     the Free Software Foundation; either version 2 of the License, or
   9     (at your option) any later version.
  10
  11     This program is distributed in the hope that it will be useful,
  12     but WITHOUT ANY WARRANTY; without even the implied warranty of
  13     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  14     GNU General Public License for more details.
  15
  16     You should have received a copy of the GNU General Public License along
  17     with this program; if not, write to the Free Software Foundation, Inc.,
  18     51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
  19 */
  20
  21 #include "system.h"
  22
  23 #include "splay_tree.h"
  24 #include "event.h"
  25 #include "utils.h"
  26 #include "xalloc.h"
  27
  28 splay_tree_t *event_tree;
  29
  30 int id;
  31
  32 static int event_compare(const event_t *a, const event_t *b) {
  33         if(a->time > b->time)
  34                 return 1;
  35
  36         if(a->time < b->time)
  37                 return -1;
  38
  39         return a->id - b->id;
  40 }
  41
  42 void init_events(void) {
  43         event_tree = splay_alloc_tree((splay_compare_t) event_compare, NULL);
  44 }
  45
  46 void exit_events(void) {
  47         splay_delete_tree(event_tree);
  48 }
  49
  50 void expire_events(void) {
  51         splay_node_t *node;
  52         event_t *event;
  53         time_t diff;
  54
  55         /*
  56          * Make all events appear expired by substracting the difference between
  57          * the expiration time of the last event and the current time.
  58          */
  59
  60         if(!event_tree->tail)
  61                 return;
  62
  63         event = event_tree->tail->data;
  64         time_t now = time(NULL);
  65
  66         if(event->time < now)
  67                 return;
  68
  69         diff = 1 + event->time - now;
  70
  71         for(node = event_tree->head; node; node = node->next) {
  72                 event = node->data;
  73                 event->time -= diff;
  74         }
  75 }
  76
  77 event_t *new_event(void) {
  78         return xmalloc_and_zero(sizeof(event_t));
  79 }
  80
  81 void free_event(event_t *event) {
  82         free(event);
  83 }
  84
  85 void event_add(event_t *event) {
  86         event->id = ++id;
  87         splay_insert(event_tree, event);
  88 }
  89
  90 void event_del(event_t *event) {
  91         splay_delete(event_tree, event);
  92 }
  93
  94 event_t *get_expired_event(void) {
  95         event_t *event;
  96
  97         if(event_tree->head) {
  98                 event = event_tree->head->data;
  99
 100                 if(event->time < time(NULL)) {
 101                         splay_node_t *node = event_tree->head;
 102                         splay_unlink_node(event_tree, node);
 103                         free(node);
 104                         return event;
 105                 }
 106         }
 107
 108         return NULL;
 109 }