1 1.15 dholland /* $NetBSD: dr_main.c,v 1.15 2010/08/06 09:14:40 dholland Exp $ */ 2 1.4 cgd 3 1.1 cgd /* 4 1.4 cgd * Copyright (c) 1983, 1993 5 1.4 cgd * The Regents of the University of California. All rights reserved. 6 1.1 cgd * 7 1.1 cgd * Redistribution and use in source and binary forms, with or without 8 1.1 cgd * modification, are permitted provided that the following conditions 9 1.1 cgd * are met: 10 1.1 cgd * 1. Redistributions of source code must retain the above copyright 11 1.1 cgd * notice, this list of conditions and the following disclaimer. 12 1.1 cgd * 2. Redistributions in binary form must reproduce the above copyright 13 1.1 cgd * notice, this list of conditions and the following disclaimer in the 14 1.1 cgd * documentation and/or other materials provided with the distribution. 15 1.12 agc * 3. Neither the name of the University nor the names of its contributors 16 1.1 cgd * may be used to endorse or promote products derived from this software 17 1.1 cgd * without specific prior written permission. 18 1.1 cgd * 19 1.1 cgd * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND 20 1.1 cgd * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 21 1.1 cgd * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 22 1.1 cgd * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE 23 1.1 cgd * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 24 1.1 cgd * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 25 1.1 cgd * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 26 1.1 cgd * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 27 1.1 cgd * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 28 1.1 cgd * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 29 1.1 cgd * SUCH DAMAGE. 30 1.1 cgd */ 31 1.1 cgd 32 1.5 christos #include <sys/cdefs.h> 33 1.1 cgd #ifndef lint 34 1.4 cgd #if 0 35 1.4 cgd static char sccsid[] = "@(#)dr_main.c 8.2 (Berkeley) 4/16/94"; 36 1.4 cgd #else 37 1.15 dholland __RCSID("$NetBSD: dr_main.c,v 1.15 2010/08/06 09:14:40 dholland Exp $"); 38 1.4 cgd #endif 39 1.1 cgd #endif /* not lint */ 40 1.1 cgd 41 1.13 dholland #include <err.h> 42 1.15 dholland #include <setjmp.h> 43 1.10 jwise #include <signal.h> 44 1.9 jwise #include <stdio.h> 45 1.5 christos #include <stdlib.h> 46 1.5 christos #include <unistd.h> 47 1.9 jwise #include "extern.h" 48 1.9 jwise #include "driver.h" 49 1.15 dholland #include "player.h" /* XXX for LEAVE_FORK */ 50 1.15 dholland #include "restart.h" 51 1.15 dholland 52 1.15 dholland static int driver_wait_fd = -1; 53 1.1 cgd 54 1.5 christos int 55 1.7 jwise dr_main(void) 56 1.1 cgd { 57 1.5 christos int n; 58 1.5 christos struct ship *sp; 59 1.1 cgd int nat[NNATION]; 60 1.1 cgd int value = 0; 61 1.1 cgd 62 1.15 dholland /* 63 1.15 dholland * XXX need a way to print diagnostics back to the player 64 1.15 dholland * process instead of stomping on the curses screen. 65 1.15 dholland */ 66 1.15 dholland 67 1.7 jwise signal(SIGINT, SIG_IGN); 68 1.7 jwise signal(SIGQUIT, SIG_IGN); 69 1.7 jwise signal(SIGTSTP, SIG_IGN); 70 1.1 cgd if (game < 0 || game >= NSCENE) { 71 1.15 dholland errx(1, "\ndriver: Bad game number %d", game); 72 1.1 cgd } 73 1.1 cgd cc = &scene[game]; 74 1.1 cgd ls = SHIP(cc->vessels); 75 1.1 cgd if (sync_open() < 0) { 76 1.15 dholland err(1, "\ndriver: syncfile"); 77 1.1 cgd } 78 1.1 cgd for (n = 0; n < NNATION; n++) 79 1.1 cgd nat[n] = 0; 80 1.1 cgd foreachship(sp) { 81 1.1 cgd if (sp->file == NULL && 82 1.14 dholland (sp->file = calloc(1, sizeof (struct File))) == NULL) { 83 1.15 dholland fprintf(stderr, "\nDRIVER: Out of memory.\n"); 84 1.1 cgd exit(1); 85 1.1 cgd } 86 1.1 cgd sp->file->index = sp - SHIP(0); 87 1.1 cgd sp->file->loadL = L_ROUND; 88 1.1 cgd sp->file->loadR = L_ROUND; 89 1.1 cgd sp->file->readyR = R_LOADED|R_INITIAL; 90 1.1 cgd sp->file->readyL = R_LOADED|R_INITIAL; 91 1.1 cgd sp->file->stern = nat[sp->nationality]++; 92 1.1 cgd sp->file->dir = sp->shipdir; 93 1.1 cgd sp->file->row = sp->shiprow; 94 1.1 cgd sp->file->col = sp->shipcol; 95 1.1 cgd } 96 1.1 cgd windspeed = cc->windspeed; 97 1.1 cgd winddir = cc->winddir; 98 1.1 cgd people = 0; 99 1.15 dholland 100 1.15 dholland /* report back to the player process that we've started */ 101 1.15 dholland if (driver_wait_fd >= 0) { 102 1.15 dholland close(driver_wait_fd); 103 1.15 dholland } 104 1.15 dholland 105 1.1 cgd for (;;) { 106 1.1 cgd sleep(7); 107 1.1 cgd if (Sync() < 0) { 108 1.1 cgd value = 1; 109 1.1 cgd break; 110 1.1 cgd } 111 1.1 cgd if (next() < 0) 112 1.1 cgd break; 113 1.1 cgd unfoul(); 114 1.1 cgd checkup(); 115 1.1 cgd prizecheck(); 116 1.1 cgd moveall(); 117 1.1 cgd thinkofgrapples(); 118 1.1 cgd boardcomp(); 119 1.1 cgd compcombat(); 120 1.1 cgd resolve(); 121 1.1 cgd reload(); 122 1.1 cgd checksails(); 123 1.1 cgd if (Sync() < 0) { 124 1.1 cgd value = 1; 125 1.1 cgd break; 126 1.1 cgd } 127 1.1 cgd } 128 1.1 cgd sync_close(1); 129 1.1 cgd return value; 130 1.1 cgd } 131 1.15 dholland 132 1.15 dholland void 133 1.15 dholland startdriver(void) 134 1.15 dholland { 135 1.15 dholland int fds[2]; 136 1.15 dholland char c; 137 1.15 dholland 138 1.15 dholland if (pipe(fds)) { 139 1.15 dholland warn("pipe"); 140 1.15 dholland leave(LEAVE_FORK); 141 1.15 dholland return; 142 1.15 dholland } 143 1.15 dholland 144 1.15 dholland switch (fork()) { 145 1.15 dholland case 0: 146 1.15 dholland close(fds[0]); 147 1.15 dholland driver_wait_fd = fds[1]; 148 1.15 dholland longjmp(restart, MODE_DRIVER); 149 1.15 dholland /*NOTREACHED*/ 150 1.15 dholland case -1: 151 1.15 dholland warn("fork"); 152 1.15 dholland close(fds[0]); 153 1.15 dholland close(fds[1]); 154 1.15 dholland leave(LEAVE_FORK); 155 1.15 dholland break; 156 1.15 dholland default: 157 1.15 dholland hasdriver++; 158 1.15 dholland close(fds[1]); 159 1.15 dholland read(fds[0], &c, 1); 160 1.15 dholland close(fds[0]); 161 1.15 dholland } 162 1.15 dholland } 163