src/timeq.c

   1 /* timeq.c - NeonServ v5.3
   2  * Copyright (C) 2011-2012  Philipp Kreil (pk910)
   3  *
   4  * This program is free software: you can redistribute it and/or modify
   5  * it under the terms of the GNU General Public License as published by
   6  * the Free Software Foundation, either version 3 of the License, or
   7  * (at your option) any later version.
   8  *
   9  * This program is distributed in the hope that it will be useful,
  10  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  11  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  12  * GNU General Public License for more details.
  13  *
  14  * You should have received a copy of the GNU General Public License
  15  * along with this program. If not, see <http://www.gnu.org/licenses/>.
  16  */
  17
  18 #include "timeq.h"
  19
  20 static struct timeq_entry *timeq_events;
  21 #ifdef HAVE_THREADS
  22 static pthread_mutex_t synchronized;
  23 #endif
  24
  25 void init_timeq() {
  26     THREAD_MUTEX_INIT(synchronized);
  27 }
  28
  29 void timeq_tick() {
  30     SYNCHRONIZE(synchronized);
  31     struct timeq_entry *entry, *next;
  32     time_t now = time(0);
  33     for(entry = timeq_events; entry; entry = next) {
  34         if(entry->execute <= now) {
  35             next = entry->next;
  36             if(timeq_events == entry)
  37                 timeq_events = next;
  38             entry->callback(entry->data);
  39             free(entry);
  40         } else
  41             break;
  42     }
  43     DESYNCHRONIZE(synchronized);
  44 }
  45
  46 struct timeq_entry* timeq_add(int seconds, timeq_callback_t *callback, void *data) {
  47     time_t now = time(0);
  48     struct timeq_entry *entry = malloc(sizeof(*entry));
  49     if (!entry)
  50     {
  51         perror("malloc() failed");
  52         return NULL;
  53     }
  54     SYNCHRONIZE(synchronized);
  55     entry->execute = now + seconds;
  56     entry->callback = callback;
  57     entry->data = data;
  58     entry->name = NULL;
  59     struct timeq_entry *next, *prev = NULL;
  60     for(next = timeq_events; next; next = next->next) {
  61         if(next->execute >= entry->execute)
  62             break;
  63         else
  64             prev = next;
  65     }
  66     if(prev == NULL) {
  67         entry->next = timeq_events;
  68         timeq_events = entry;
  69     } else {
  70         entry->next = next;
  71         prev->next = entry;
  72     }
  73     DESYNCHRONIZE(synchronized);
  74     return entry;
  75 }
  76
  77 struct timeq_entry* timeq_add_name(char *name, int seconds, timeq_callback_t *callback, void *data) {
  78     SYNCHRONIZE(synchronized);
  79     struct timeq_entry *entry = timeq_add(seconds, callback, data);
  80     entry->name = strdup(name);
  81     DESYNCHRONIZE(synchronized);
  82     return entry;
  83 }
  84
  85 int timeq_del(struct timeq_entry* entry) {
  86     SYNCHRONIZE(synchronized);
  87     struct timeq_entry *centry, *last = NULL;
  88     for(centry = timeq_events; centry; centry = centry->next) {
  89         if(centry == entry) {
  90             if(last)
  91                 last->next = centry->next;
  92             else
  93                 timeq_events = centry->next;
  94             if(centry->name)
  95                 free(centry->name);
  96             free(centry);
  97             DESYNCHRONIZE(synchronized);
  98             return 1;
  99         } else {
 100             last = centry;
 101         }
 102     }
 103     DESYNCHRONIZE(synchronized);
 104     return 0;
 105 }
 106
 107 int timeq_del_name(char *name) {
 108     SYNCHRONIZE(synchronized);
 109     struct timeq_entry *centry, *last = NULL;
 110     for(centry = timeq_events; centry; centry = centry->next) {
 111         if(centry->name && !stricmp(centry->name, name)) {
 112             if(last)
 113                 last->next = centry->next;
 114             else
 115                 timeq_events = centry->next;
 116             free(centry->name);
 117             free(centry);
 118             DESYNCHRONIZE(synchronized);
 119             return 1;
 120         } else {
 121             last = centry;
 122         }
 123     }
 124     DESYNCHRONIZE(synchronized);
 125     return 0;
 126 }
 127
 128 int timeq_name_exists(char *name) {
 129     SYNCHRONIZE(synchronized);
 130     struct timeq_entry *centry;
 131     for(centry = timeq_events; centry; centry = centry->next) {
 132         if(centry->name && !stricmp(centry->name, name)) {
 133             DESYNCHRONIZE(synchronized);
 134             return 1;
 135         }
 136     }
 137     DESYNCHRONIZE(synchronized);
 138     return 0;
 139 }