mille/mille.c

   1 /*
   2  * Copyright (c) 1982, 1993
   3  *      The Regents of the University of California.  All rights reserved.
   4  *
   5  * Redistribution and use in source and binary forms, with or without
   6  * modification, are permitted provided that the following conditions
   7  * are met:
   8  * 1. Redistributions of source code must retain the above copyright
   9  *    notice, this list of conditions and the following disclaimer.
  10  * 2. Redistributions in binary form must reproduce the above copyright
  11  *    notice, this list of conditions and the following disclaimer in the
  12  *    documentation and/or other materials provided with the distribution.
  13  * 3. All advertising materials mentioning features or use of this software
  14  *    must display the following acknowledgement:
  15  *      This product includes software developed by the University of
  16  *      California, Berkeley and its contributors.
  17  * 4. Neither the name of the University nor the names of its contributors
  18  *    may be used to endorse or promote products derived from this software
  19  *    without specific prior written permission.
  20  *
  21  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
  22  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  23  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  24  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
  25  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  26  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
  27  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  28  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
  29  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
  30  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
  31  * SUCH DAMAGE.
  32  */
  33
  34 #ifndef lint
  35 static char copyright[] =
  36 "@(#) Copyright (c) 1982, 1993\n\
  37         The Regents of the University of California.  All rights reserved.\n";
  38 #endif /* not lint */
  39
  40 #ifndef lint
  41 /*static char sccsid[] = "from: @(#)mille.c     8.1 (Berkeley) 5/31/93";*/
  42 static char rcsid[] = "$Id: mille.c,v 1.3 1994/05/12 17:39:33 jtc Exp $";
  43 #endif /* not lint */
  44
  45 # include       "mille.h"
  46 # include       <signal.h>
  47 # ifdef attron
  48 #       include <term.h>
  49 # endif attron
  50
  51 /*
  52  * @(#)mille.c  1.3 (Berkeley) 5/10/83
  53  */
  54
  55 void    rub();
  56
  57 main(ac, av)
  58 reg int         ac;
  59 reg char        *av[]; {
  60
  61         reg bool        restore;
  62
  63         /* run as the user */
  64         setuid(getuid());
  65
  66         if (strcmp(av[0], "a.out") == 0) {
  67                 outf = fopen("q", "w");
  68                 setbuf(outf, (char *)NULL);
  69                 Debug = TRUE;
  70         }
  71         restore = FALSE;
  72         switch (ac) {
  73           case 2:
  74                 rest_f(av[1]);
  75                 restore = TRUE;
  76           case 1:
  77                 break;
  78           default:
  79                 printf("usage: milles [ restore_file ]\n");
  80                 exit(-1);
  81                 /* NOTREACHED */
  82         }
  83         Play = PLAYER;
  84         initscr();
  85         delwin(stdscr);
  86         stdscr = Board = newwin(BOARD_Y, BOARD_X, 0, 0);
  87         Score = newwin(SCORE_Y, SCORE_X, 0, 40);
  88         Miles = newwin(MILES_Y, MILES_X, 17, 0);
  89 #ifdef attron
  90         idlok(Board, TRUE);
  91         idlok(Score, TRUE);
  92         idlok(Miles, TRUE);
  93 #endif
  94         leaveok(Score, TRUE);
  95         leaveok(Miles, TRUE);
  96         clearok(curscr, TRUE);
  97 # ifndef PROF
  98         srandom(getpid());
  99 # else
 100         srandom(0);
 101 # endif
 102         crmode();
 103         noecho();
 104         signal(SIGINT, rub);
 105         for (;;) {
 106                 if (!restore || (Player[PLAYER].total >= 5000
 107                     || Player[COMP].total >= 5000)) {
 108                         if (Player[COMP].total < Player[PLAYER].total)
 109                                 Player[PLAYER].games++;
 110                         else if (Player[COMP].total > Player[PLAYER].total)
 111                                 Player[COMP].games++;
 112                         Player[COMP].total = 0;
 113                         Player[PLAYER].total = 0;
 114                 }
 115                 do {
 116                         if (!restore)
 117                                 Handstart = Play = other(Handstart);
 118                         if (!restore || On_exit) {
 119                                 shuffle();
 120                                 init();
 121                         }
 122                         newboard();
 123                         if (restore)
 124                                 mvwaddstr(Score, ERR_Y, ERR_X, Initstr);
 125                         prboard();
 126                         do {
 127                                 domove();
 128                                 if (Finished)
 129                                         newscore();
 130                                 prboard();
 131                         } while (!Finished);
 132                         check_more();
 133                         restore = On_exit = FALSE;
 134                 } while (Player[COMP].total < 5000
 135                     && Player[PLAYER].total < 5000);
 136         }
 137 }
 138
 139 /*
 140  *      Routine to trap rubouts, and make sure they really want to
 141  * quit.
 142  */
 143 void
 144 rub() {
 145
 146         (void)signal(SIGINT, SIG_IGN);
 147         if (getyn(REALLYPROMPT))
 148                 die(0);
 149         (void)signal(SIGINT, rub);
 150 }
 151
 152 /*
 153  *      Time to go beddy-by
 154  */
 155 die(code)
 156 int code; {
 157
 158         (void)signal(SIGINT, SIG_IGN);
 159         if (outf)
 160                 fflush(outf);
 161         mvcur(0, COLS - 1, LINES - 1, 0);
 162         endwin();
 163         exit(code);
 164 }