git.pond.sub.org Git - empserver/blob - src/lib/empthread/lwp.c

   1 /*
   2  *  Empire - A multi-player, client/server Internet based war game.
   3  *  Copyright (C) 1986-2013, Dave Pare, Jeff Bailey, Thomas Ruschak,
   4  *                Ken Stevens, Steve McClure, Markus Armbruster
   5  *
   6  *  Empire 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 3 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
  17  *  along with this program.  If not, see <http://www.gnu.org/licenses/>.
  18  *
  19  *  ---
  20  *
  21  *  See files README, COPYING and CREDITS in the root of the source
  22  *  tree for related information and legal notices.  It is expected
  23  *  that future projects/authors will amend these files as needed.
  24  *
  25  *  ---
  26  *
  27  *  lwp.c: Interface from Empire threads to LWP threads
  28  *
  29  *  Known contributors to this file:
  30  *     Sasha Mikheev
  31  *     Markus Armbruster, 2006-2009
  32  */
  33
  34 #include <config.h>
  35
  36 #include <signal.h>
  37 #include <time.h>
  38 #include "empthread.h"
  39 #include "file.h"
  40 #include "misc.h"
  41
  42 /* Flags that were passed to empth_init() */
  43 static int empth_flags;
  44
  45
  46 int
  47 empth_init(void **ctx, int flags)
  48 {
  49     sigset_t set;
  50
  51     empth_flags = flags;
  52     empth_init_signals();
  53     sigemptyset(&set);
  54     sigaddset(&set, SIGHUP);
  55     sigaddset(&set, SIGINT);
  56     sigaddset(&set, SIGTERM);
  57     lwpInitSystem(1, ctx, flags, &set);
  58     return 0;
  59 }
  60
  61
  62 empth_t *
  63 empth_create(void (*entry)(void *), int size, int flags,
  64              char *name, void *ud)
  65 {
  66     if (!flags)
  67         flags = empth_flags;
  68     ef_make_stale();
  69     return lwpCreate(1, entry, size, flags, name, 0, NULL, ud);
  70 }
  71
  72 empth_t *
  73 empth_self(void)
  74 {
  75     return LwpCurrent;
  76 }
  77
  78 char *
  79 empth_name(empth_t *thread)
  80 {
  81     return lwpName(thread);
  82 }
  83
  84 void
  85 empth_set_name(empth_t *thread, char *name)
  86 {
  87     lwpSetName(thread, name);
  88 }
  89
  90 void
  91 empth_exit(void)
  92 {
  93     ef_make_stale();
  94     lwpExit();
  95 }
  96
  97 void
  98 empth_yield(void)
  99 {
 100     ef_make_stale();
 101     lwpYield();
 102 }
 103
 104 int
 105 empth_select(int fd, int flags, struct timeval *timeout)
 106 {
 107     ef_make_stale();
 108     return lwpSleepFd(fd, flags, timeout);
 109 }
 110
 111 void
 112 empth_wakeup(empth_t *a)
 113 {
 114     lwpWakeup(a);
 115 }
 116
 117 int
 118 empth_sleep(time_t until)
 119 {
 120     ef_make_stale();
 121     return lwpSleepUntil(until);
 122 }
 123
 124 int
 125 empth_wait_for_signal(void)
 126 {
 127     sigset_t set;
 128     int sig, err;
 129     time_t now;
 130
 131     ef_make_stale();
 132     sigemptyset(&set);
 133     sigaddset(&set, SIGHUP);
 134     sigaddset(&set, SIGINT);
 135     sigaddset(&set, SIGTERM);
 136     for (;;) {
 137         err = lwpSigWait(&set, &sig);
 138         if (CANT_HAPPEN(err)) {
 139             time(&now);
 140             lwpSleepUntil(now + 60);
 141             continue;
 142         }
 143         return sig;
 144     }
 145 }
 146
 147 empth_rwlock_t *
 148 empth_rwlock_create(char *name)
 149 {
 150     return lwp_rwlock_create(name);
 151 }
 152
 153 void
 154 empth_rwlock_destroy(empth_rwlock_t *rwlock)
 155 {
 156     lwp_rwlock_destroy(rwlock);
 157 }
 158
 159 void
 160 empth_rwlock_wrlock(empth_rwlock_t *rwlock)
 161 {
 162     ef_make_stale();
 163     lwp_rwlock_wrlock(rwlock);
 164 }
 165
 166 void
 167 empth_rwlock_rdlock(empth_rwlock_t *rwlock)
 168 {
 169     ef_make_stale();
 170     lwp_rwlock_rdlock(rwlock);
 171 }
 172
 173 void
 174 empth_rwlock_unlock(empth_rwlock_t *rwlock)
 175 {
 176     lwp_rwlock_unlock(rwlock);
 177 }