games/backgammon/teachgammon/teach.c

   1 /*      $NetBSD: teach.c,v 1.19 2008/07/20 01:03:20 lukem Exp $ */
   2
   3 /*
   4  * Copyright (c) 1980, 1993
   5  *      The Regents of the University of California.  All rights reserved.
   6  *
   7  * Redistribution and use in source and binary forms, with or without
   8  * modification, are permitted provided that the following conditions
   9  * are met:
  10  * 1. Redistributions of source code must retain the above copyright
  11  *    notice, this list of conditions and the following disclaimer.
  12  * 2. Redistributions in binary form must reproduce the above copyright
  13  *    notice, this list of conditions and the following disclaimer in the
  14  *    documentation and/or other materials provided with the distribution.
  15  * 3. Neither the name of the University nor the names of its contributors
  16  *    may be used to endorse or promote products derived from this software
  17  *    without specific prior written permission.
  18  *
  19  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
  20  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  21  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  22  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
  23  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  24  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
  25  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  26  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
  27  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
  28  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
  29  * SUCH DAMAGE.
  30  */
  31
  32 #include <sys/cdefs.h>
  33 #ifndef lint
  34 __COPYRIGHT("@(#) Copyright (c) 1980, 1993\
  35  The Regents of the University of California.  All rights reserved.");
  36 #endif                          /* not lint */
  37
  38 #ifndef lint
  39 #if 0
  40 static char sccsid[] = "@(#)teach.c     8.1 (Berkeley) 5/31/93";
  41 #else
  42 __RCSID("$NetBSD: teach.c,v 1.19 2008/07/20 01:03:20 lukem Exp $");
  43 #endif
  44 #endif                          /* not lint */
  45
  46 #include "back.h"
  47 #include "tutor.h"
  48
  49 static const char *const helpm[] = {
  50         "\nEnter a space or newline to roll, or",
  51         "     b   to display the board",
  52         "     d   to double",
  53         "     q   to quit\n",
  54         0
  55 };
  56
  57 static const char *const contin[] = {
  58         "",
  59         0
  60 };
  61
  62 int
  63 main(int argc __unused, char *argv[])
  64 {
  65         int     i;
  66
  67         /* revoke setgid privileges */
  68         setgid(getgid());
  69
  70         signal(SIGINT, getout);
  71         if (tcgetattr(0, &old) == -1)   /* get old tty mode */
  72                 errexit("teachgammon(gtty)");
  73         noech = old;
  74         noech.c_lflag &= ~ECHO;
  75         raw = noech;
  76         raw.c_lflag &= ~ICANON; /* set up modes */
  77         ospeed = cfgetospeed(&old);     /* for termlib */
  78         tflag = getcaps(getenv("TERM"));
  79 #ifdef V7
  80         while (*++argv != 0)
  81 #else
  82         while (*++argv != -1)
  83 #endif
  84                 getarg(&argv);
  85         if (tflag) {
  86                 noech.c_oflag &= ~(ONLCR | OXTABS);
  87                 raw.c_oflag &= ~(ONLCR | OXTABS);
  88                 clear();
  89         }
  90         text(hello);
  91         text(list);
  92         i = text(contin);
  93         if (i == 0)
  94                 i = 2;
  95         init();
  96         while (i)
  97                 switch (i) {
  98                 case 1:
  99                         leave();
 100
 101                 case 2:
 102                         if ((i = text(intro1)) != 0)
 103                                 break;
 104                         wrboard();
 105                         if ((i = text(intro2)) != 0)
 106                                 break;
 107
 108                 case 3:
 109                         if ((i = text(moves)) != 0)
 110                                 break;
 111
 112                 case 4:
 113                         if ((i = text(removepiece)) != 0)
 114                                 break;
 115
 116                 case 5:
 117                         if ((i = text(hits)) != 0)
 118                                 break;
 119
 120                 case 6:
 121                         if ((i = text(endgame)) != 0)
 122                                 break;
 123
 124                 case 7:
 125                         if ((i = text(doubl)) != 0)
 126                                 break;
 127
 128                 case 8:
 129                         if ((i = text(stragy)) != 0)
 130                                 break;
 131
 132                 case 9:
 133                         if ((i = text(prog)) != 0)
 134                                 break;
 135
 136                 case 10:
 137                         if ((i = text(lastch)) != 0)
 138                                 break;
 139                 }
 140         tutor();
 141         /* NOTREACHED */
 142         return (0);
 143 }
 144
 145 void
 146 leave(void)
 147 {
 148         if (tflag)
 149                 clear();
 150         else
 151                 writec('\n');
 152         fixtty(&old);
 153         execl(EXEC, "backgammon", "-n", args[0]?args:0, (char *) 0);
 154         writel("Help! Backgammon program is missing\007!!\n");
 155         exit(1);
 156 }