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