games/backgammon/teachgammon/teach.c

   1 /*
   2  * Copyright (c) 1980, 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 const char copyright[] =
  36 "@(#) Copyright (c) 1980, 1993\n\
  37         The Regents of the University of California.  All rights reserved.\n";
  38 #endif /* not lint */
  39
  40 #ifndef lint
  41 #if 0
  42 static char sccsid[] = "@(#)teach.c     8.1 (Berkeley) 5/31/93";
  43 #endif
  44 static const char rcsid[] =
  45  "$FreeBSD: src/games/backgammon/teachgammon/teach.c,v 1.12 1999/11/30 03:48:30 billf Exp $";
  46 #endif /* not lint */
  47
  48 #include <string.h>
  49 #include <sys/types.h>
  50 #include <unistd.h>
  51 #include <signal.h>
  52 #include "back.h"
  53
  54 extern char     *hello[];
  55 extern char     *list[];
  56 extern char     *intro1[];
  57 extern char     *intro2[];
  58 extern char     *moves[];
  59 extern char     *remove[];
  60 extern char     *hits[];
  61 extern char     *endgame[];
  62 extern char     *doubl[];
  63 extern char     *stragy[];
  64 extern char     *prog[];
  65 extern char     *lastch[];
  66
  67 extern char     ospeed;                 /* tty output speed for termlib */
  68
  69 const char *const helpm[] = {
  70         "\nEnter a space or newline to roll, or",
  71         "     b   to display the board",
  72         "     d   to double",
  73         "     q   to quit\n",
  74         0
  75 };
  76
  77 const char *const contin[] = {
  78         "",
  79         0
  80 };
  81
  82 main (argc,argv)
  83 int     argc;
  84 char    **argv;
  85
  86 {
  87         int     i;
  88
  89         /* revoke privs */
  90         setgid(getgid());
  91
  92         acnt = 1;
  93         signal (SIGINT,getout);
  94         if (gtty (0,&tty) == -1)                        /* get old tty mode */
  95                 errexit ("teachgammon(gtty)");
  96         old = tty.sg_flags;
  97 #ifdef V7
  98         raw = ((noech = old & ~ECHO) | CBREAK);         /* set up modes */
  99 #else
 100         raw = ((noech = old & ~ECHO) | RAW);            /* set up modes */
 101 #endif
 102         ospeed = tty.sg_ospeed;                         /* for termlib */
 103         tflag = getcaps (getenv ("TERM"));
 104         getarg (argc, argv);
 105         if (tflag)  {
 106                 noech &= ~(CRMOD|XTABS);
 107                 raw &= ~(CRMOD|XTABS);
 108                 clear();
 109         }
 110         text (hello);
 111         text (list);
 112         i = text (contin);
 113         if (i == 0)
 114                 i = 2;
 115         init();
 116         while (i)
 117                 switch (i)  {
 118
 119                 case 1:
 120                         leave();
 121
 122                 case 2:
 123                         if (i = text(intro1))
 124                                 break;
 125                         wrboard();
 126                         if (i = text(intro2))
 127                                 break;
 128
 129                 case 3:
 130                         if (i = text(moves))
 131                                 break;
 132
 133                 case 4:
 134                         if (i = text(remove))
 135                                 break;
 136
 137                 case 5:
 138                         if (i = text(hits))
 139                                 break;
 140
 141                 case 6:
 142                         if (i = text(endgame))
 143                                 break;
 144
 145                 case 7:
 146                         if (i = text(doubl))
 147                                 break;
 148
 149                 case 8:
 150                         if (i = text(stragy))
 151                                 break;
 152
 153                 case 9:
 154                         if (i = text(prog))
 155                                 break;
 156
 157                 case 10:
 158                         if (i = text(lastch))
 159                                 break;
 160                 }
 161         tutor();
 162 }
 163
 164 leave()  {
 165         int i;
 166         if (tflag)
 167                 clear();
 168         else
 169                 writec ('\n');
 170         fixtty(old);
 171         args[0] = strdup("backgammon");
 172         args[acnt++] = strdup("-n");
 173         args[acnt] = 0;
 174         execv (EXEC,args);
 175         for (i = 0; i < acnt; i++)
 176             free (args[i]);
 177         writel ("Help! Backgammon program is missing\007!!\n");
 178         exit (-1);
 179 }