mille/mille.c

   1 /*
   2  * Copyright (c) 1982 Regents of the University of California.
   3  * 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 char copyright[] =
  36 "@(#) Copyright (c) 1982 Regents of the University of California.\n\
  37  All rights reserved.\n";
  38 #endif /* not lint */
  39
  40 #ifndef lint
  41 /*static char sccsid[] = "from: @(#)mille.c     5.5 (Berkeley) 2/28/91";*/
  42 static char rcsid[] = "$Id: mille.c,v 1.2 1993/08/01 18:54:01 mycroft 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 # ifdef attron
  86 #       define  CA      cursor_address
  87 # endif
  88         if (!CA) {
  89                 printf("Sorry.  Need cursor addressing to play mille\n");
  90                 exit(-1);
  91         }
  92         delwin(stdscr);
  93         stdscr = Board = newwin(BOARD_Y, BOARD_X, 0, 0);
  94         Score = newwin(SCORE_Y, SCORE_X, 0, 40);
  95         Miles = newwin(MILES_Y, MILES_X, 17, 0);
  96 #ifdef attron
  97         idlok(Board, TRUE);
  98         idlok(Score, TRUE);
  99         idlok(Miles, TRUE);
 100 #endif
 101         leaveok(Score, TRUE);
 102         leaveok(Miles, TRUE);
 103         clearok(curscr, TRUE);
 104 # ifndef PROF
 105         srandom(getpid());
 106 # else
 107         srandom(0);
 108 # endif
 109         crmode();
 110         noecho();
 111         signal(SIGINT, rub);
 112         for (;;) {
 113                 if (!restore || (Player[PLAYER].total >= 5000
 114                     || Player[COMP].total >= 5000)) {
 115                         if (Player[COMP].total < Player[PLAYER].total)
 116                                 Player[PLAYER].games++;
 117                         else if (Player[COMP].total > Player[PLAYER].total)
 118                                 Player[COMP].games++;
 119                         Player[COMP].total = 0;
 120                         Player[PLAYER].total = 0;
 121                 }
 122                 do {
 123                         if (!restore)
 124                                 Handstart = Play = other(Handstart);
 125                         if (!restore || On_exit) {
 126                                 shuffle();
 127                                 init();
 128                         }
 129                         newboard();
 130                         if (restore)
 131                                 mvwaddstr(Score, ERR_Y, ERR_X, Initstr);
 132                         prboard();
 133                         do {
 134                                 domove();
 135                                 if (Finished)
 136                                         newscore();
 137                                 prboard();
 138                         } while (!Finished);
 139                         check_more();
 140                         restore = On_exit = FALSE;
 141                 } while (Player[COMP].total < 5000
 142                     && Player[PLAYER].total < 5000);
 143         }
 144 }
 145
 146 /*
 147  *      Routine to trap rubouts, and make sure they really want to
 148  * quit.
 149  */
 150 void
 151 rub() {
 152
 153         (void)signal(SIGINT, SIG_IGN);
 154         if (getyn(REALLYPROMPT))
 155                 die();
 156         (void)signal(SIGINT, rub);
 157 }
 158
 159 /*
 160  *      Time to go beddy-by
 161  */
 162 die() {
 163
 164         (void)signal(SIGINT, SIG_IGN);
 165         if (outf)
 166                 fflush(outf);
 167         mvcur(0, COLS - 1, LINES - 1, 0);
 168         endwin();
 169         exit(1);
 170 }
 171