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

   1 /*
   2  *  Empire - A multi-player, client/server Internet based war game.
   3  *  Copyright (C) 1994-2009, Dave Pare, Jeff Bailey, Thomas Ruschak,
   4  *                           Ken Stevens, Steve McClure
   5  *  Copyright (C) 1991-3 Stephen Crane
   6  *
   7  *  This program is free software; you can redistribute it and/or modify
   8  *  it under the terms of the GNU General Public License as published by
   9  *  the Free Software Foundation; either version 2 of the License, or
  10  *  (at your option) any later version.
  11  *
  12  *  This program is distributed in the hope that it will be useful,
  13  *  but WITHOUT ANY WARRANTY; without even the implied warranty of
  14  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  15  *  GNU General Public License for more details.
  16  *
  17  *  You should have received a copy of the GNU General Public License
  18  *  along with this program; if not, write to the Free Software
  19  *  Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
  20  *
  21  *  ---
  22  *
  23  *  See files README, COPYING and CREDITS in the root of the source
  24  *  tree for related information and legal notices.  It is expected
  25  *  that future projects/authors will amend these files as needed.
  26  *
  27  *  ---
  28  *
  29  *  arch.c: architecture-dependant process context code
  30  *
  31  *  Known contributors to this file:
  32  *     Dave Pare, 1994
  33  *     Steve McClure, 1994-2000
  34  *     Markus Armbruster, 2004-2008
  35  */
  36
  37 #include <config.h>
  38
  39 #include <stdlib.h>
  40 #include "lwp.h"
  41 #include "lwpint.h"
  42
  43 /*
  44  * Historically, this was implemented by abusing setjmp() and
  45  * longjump(), which required a fair amount of system-dependent and
  46  * fragile hackery.  We now use POSIX ucontext.h.
  47  */
  48
  49 int
  50 lwpNewContext(struct lwpProc *newp)
  51 {
  52     if (getcontext(&newp->context) < 0)
  53         return -1;
  54 #ifdef MAKECONTEXT_SP_HIGH
  55     /*
  56      * Known systems that are broken that way: Solaris prior to 10,
  57      * IRIX.
  58      */
  59     newp->context.uc_stack.ss_sp = newp->ustack + newp->usize - 8;
  60 #else
  61     newp->context.uc_stack.ss_sp = newp->ustack;
  62 #endif
  63     newp->context.uc_stack.ss_size = newp->usize;
  64     newp->context.uc_stack.ss_flags = 0;
  65     newp->context.uc_link = NULL;
  66     makecontext(&newp->context, lwpEntryPoint, 0);
  67     return 0;
  68 }
  69
  70 void
  71 lwpSwitchContext(struct lwpProc *oldp, struct lwpProc *nextp)
  72 {
  73     if (!oldp) {
  74         setcontext(&nextp->context);
  75         abort();
  76     } else {
  77         if (swapcontext(&oldp->context, &nextp->context) < 0)
  78             abort();
  79     }
  80 }