git.pond.sub.org Git - empserver/blob - src/server/update.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  *  update.c: Update scheduler
  28  *
  29  *  Known contributors to this file:
  30  *     Dave Pare, 1994
  31  *     Steve McClure, 1996
  32  *     Ron Koenderink, 2005
  33  *     Markus Armbruster, 2007-2012
  34  */
  35
  36 #include <config.h>
  37
  38 #include <errno.h>
  39 #ifndef _WIN32
  40 #include <sys/wait.h>
  41 #endif
  42 #include <time.h>
  43 #include "chance.h"
  44 #include "empthread.h"
  45 #include "file.h"
  46 #include "game.h"
  47 #include "misc.h"
  48 #include "optlist.h"
  49 #include "player.h"
  50 #include "prototypes.h"
  51 #include "server.h"
  52
  53 /*
  54  * Update is running.
  55  * Can be used to suppress messages, or direct them to bulletins.
  56  */
  57 int update_running;
  58
  59 static time_t update_schedule_anchor;
  60 static int update_wanted;
  61
  62 static empth_t *update_thread;
  63
  64 static int update_get_schedule(void);
  65 static void update_sched(void *);
  66 static void update_run(void);
  67
  68 void
  69 update_init(void)
  70 {
  71     struct player *dp;
  72     int stacksize;
  73
  74     update_schedule_anchor = (time(NULL) + 59) / 60 * 60;
  75     if (update_get_schedule() < 0)
  76         exit(1);
  77
  78     dp = player_new(-1);
  79     if (!dp)
  80         exit_nomem();
  81     /* FIXME ancient black magic; figure out true stack need */
  82     stacksize = 100000 +
  83 /* finish_sects */ WORLD_X * WORLD_Y * (2 * sizeof(double) +
  84                                         sizeof(char *));
  85     update_thread = empth_create(update_sched, stacksize, 0, "Update", dp);
  86     if (!update_thread)
  87         exit_nomem();
  88 }
  89
  90 /*
  91  * Get the schedule for future updates into update_time[].
  92  * Return 0 on success, -1 on failure.
  93  */
  94 static int
  95 update_get_schedule(void)
  96 {
  97     time_t now = time(NULL);
  98     int n = sizeof(update_time) / sizeof(*update_time);
  99     int i;
 100
 101     ef_truncate(EF_UPDATES, 0);
 102     ef_extend(EF_UPDATES, n - 1);
 103     if (read_schedule(schedulefil, update_time, n,
 104                       now + 30, update_schedule_anchor) < 0) {
 105         logerror("No update schedule!");
 106         ef_truncate(EF_UPDATES, 0);
 107         return -1;
 108     }
 109     logerror("Update schedule read");
 110     for (i = 0; update_time[i]; i++) ;
 111     ef_truncate(EF_UPDATES, i);
 112     return 0;
 113 }
 114
 115 /*ARGSUSED*/
 116 static void
 117 update_sched(void *unused)
 118 {
 119     time_t next_update, now;
 120
 121     player->proc = empth_self();
 122     player->cnum = 0;
 123     player->god = 1;
 124
 125     for (;;) {
 126         /*
 127          * Sleep until the next scheduled update or an unscheduled
 128          * wakeup.
 129          */
 130         next_update = update_time[0];
 131         if (next_update) {
 132             if (update_window > 0)
 133                 next_update += roll0(update_window);
 134             logerror("Next update at %s", ctime(&next_update));
 135             /* sleep until update is scheduled to go off */
 136             empth_sleep(next_update);
 137         } else {
 138             logerror("No update scheduled");
 139             /* want to sleep forever, but empthread doesn't provide that */
 140             while (empth_sleep(time(NULL) + (60 * 60 * 24)) >= 0) ;
 141         }
 142
 143         now = time(NULL);
 144         if (next_update != 0 && now >= next_update) {
 145             /* scheduled update time reached */
 146             if (now >= next_update + 60)
 147                 logerror("Missed the update!");
 148             else if (update_demand == UPD_DEMAND_SCHED && !demand_check())
 149                 ;
 150             else if (updates_disabled())
 151                 logerror("Updates disabled...skipping update");
 152             else
 153                 update_wanted = 1;
 154             update_schedule_anchor = update_time[0];
 155         }
 156         /* else unscheduled update if update_wanted is set */
 157
 158         if (update_wanted) {
 159             update_wanted = 0;
 160             update_run();
 161         }
 162
 163         update_get_schedule();
 164     }
 165     /*NOTREACHED*/
 166 }
 167
 168 /*
 169  * Trigger an update.
 170  * Return 0 on success, -1 on failure.
 171  */
 172 int
 173 update_trigger(void)
 174 {
 175     logerror("Triggering unscheduled update");
 176     update_wanted = 1;
 177     empth_wakeup(update_thread);
 178     return 0;
 179 }
 180
 181 /*
 182  * Reload the update schedule.
 183  * Return 0 on success, -1 on failure.
 184  */
 185 int
 186 update_reschedule(void)
 187 {
 188     empth_wakeup(update_thread);
 189     return 0;
 190 }
 191
 192 static void
 193 update_run(void)
 194 {
 195     struct player *p;
 196
 197     for (p = player_next(NULL); p; p = player_next(p)) {
 198         if (p->state != PS_PLAYING)
 199             continue;
 200         if (p->command) {
 201             pr_flash(p, "Update aborting command\n");
 202             p->may_sleep = PLAYER_SLEEP_NEVER;
 203             p->aborted = 1;
 204             empth_wakeup(p->proc);
 205         }
 206     }
 207     empth_rwlock_wrlock(update_lock);
 208     if (*pre_update_hook) {
 209         if (run_hook(pre_update_hook, "pre-update")) {
 210             empth_rwlock_unlock(update_lock);
 211             return;
 212         }
 213     }
 214     update_running = 1;
 215     update_main();
 216     update_running = 0;
 217     empth_rwlock_unlock(update_lock);
 218 }
 219
 220 int
 221 run_hook(char *cmd, char *name)
 222 {
 223     int status;
 224
 225     fflush(NULL);
 226
 227     status = system(cmd);
 228     if (status == 0)
 229         ;                       /* successful exit */
 230     else if (status == -1)
 231         logerror("couldn't execute command processor for %s hook (%s)",
 232                  name, strerror(errno));
 233 #ifndef _WIN32
 234     else if (WIFEXITED(status))
 235         logerror("%s hook terminated unsuccessfully (exit status %d)",
 236                  name, WEXITSTATUS(status));
 237     else if (WIFSIGNALED(status))
 238         logerror("%s hook terminated abnormally (signal %d)",
 239                  name, WTERMSIG(status));
 240 #endif
 241     else if (status)
 242         logerror("%s hook terminated strangely (status %d)",
 243                  name, status);
 244     return status;
 245 }