Home | History | Annotate | Line # | Download | only in teachgammon
teach.c revision 1.8
      1  1.8  hubertf /*	$NetBSD: teach.c,v 1.8 1999/02/10 12:29:48 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.8  hubertf __RCSID("$NetBSD: teach.c,v 1.8 1999/02/10 12:29:48 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.1      cgd 
     75  1.6  hubertf 	signal(SIGINT, getout);
     76  1.5    lukem 	if (tcgetattr(0, &old) == -1)	/* get old tty mode */
     77  1.5    lukem 		errexit("teachgammon(gtty)");
     78  1.4  mycroft 	noech = old;
     79  1.4  mycroft 	noech.c_lflag &= ~ECHO;
     80  1.4  mycroft 	raw = noech;
     81  1.5    lukem 	raw.c_lflag &= ~ICANON;	/* set up modes */
     82  1.5    lukem 	ospeed = cfgetospeed(&old);	/* for termlib */
     83  1.5    lukem 	tflag = getcaps(getenv("TERM"));
     84  1.1      cgd #ifdef V7
     85  1.1      cgd 	while (*++argv != 0)
     86  1.1      cgd #else
     87  1.1      cgd 	while (*++argv != -1)
     88  1.1      cgd #endif
     89  1.5    lukem 		getarg(&argv);
     90  1.5    lukem 	if (tflag) {
     91  1.5    lukem 		noech.c_oflag &= ~(ONLCR | OXTABS);
     92  1.5    lukem 		raw.c_oflag &= ~(ONLCR | OXTABS);
     93  1.1      cgd 		clear();
     94  1.1      cgd 	}
     95  1.5    lukem 	text(hello);
     96  1.5    lukem 	text(list);
     97  1.5    lukem 	i = text(contin);
     98  1.1      cgd 	if (i == 0)
     99  1.1      cgd 		i = 2;
    100  1.1      cgd 	init();
    101  1.1      cgd 	while (i)
    102  1.5    lukem 		switch (i) {
    103  1.1      cgd 		case 1:
    104  1.1      cgd 			leave();
    105  1.5    lukem 
    106  1.1      cgd 		case 2:
    107  1.5    lukem 			if ((i = text(intro1)) != 0)
    108  1.1      cgd 				break;
    109  1.1      cgd 			wrboard();
    110  1.5    lukem 			if ((i = text(intro2)) != 0)
    111  1.1      cgd 				break;
    112  1.5    lukem 
    113  1.1      cgd 		case 3:
    114  1.5    lukem 			if ((i = text(moves)) != 0)
    115  1.1      cgd 				break;
    116  1.5    lukem 
    117  1.1      cgd 		case 4:
    118  1.5    lukem 			if ((i = text(removepiece)) != 0)
    119  1.1      cgd 				break;
    120  1.5    lukem 
    121  1.1      cgd 		case 5:
    122  1.5    lukem 			if ((i = text(hits)) != 0)
    123  1.1      cgd 				break;
    124  1.5    lukem 
    125  1.1      cgd 		case 6:
    126  1.5    lukem 			if ((i = text(endgame)) != 0)
    127  1.1      cgd 				break;
    128  1.5    lukem 
    129  1.1      cgd 		case 7:
    130  1.5    lukem 			if ((i = text(doubl)) != 0)
    131  1.1      cgd 				break;
    132  1.5    lukem 
    133  1.1      cgd 		case 8:
    134  1.5    lukem 			if ((i = text(stragy)) != 0)
    135  1.1      cgd 				break;
    136  1.5    lukem 
    137  1.1      cgd 		case 9:
    138  1.5    lukem 			if ((i = text(prog)) != 0)
    139  1.1      cgd 				break;
    140  1.5    lukem 
    141  1.1      cgd 		case 10:
    142  1.5    lukem 			if ((i = text(lastch)) != 0)
    143  1.1      cgd 				break;
    144  1.1      cgd 		}
    145  1.1      cgd 	tutor();
    146  1.5    lukem 	/* NOTREACHED */
    147  1.5    lukem 	return (0);
    148  1.1      cgd }
    149  1.1      cgd 
    150  1.5    lukem void
    151  1.5    lukem leave()
    152  1.5    lukem {
    153  1.1      cgd 	if (tflag)
    154  1.1      cgd 		clear();
    155  1.1      cgd 	else
    156  1.5    lukem 		writec('\n');
    157  1.4  mycroft 	fixtty(&old);
    158  1.7  frueauf 	execl(EXEC, "backgammon", "-n", args[0]?args:0, 0);
    159  1.5    lukem 	writel("Help! Backgammon program is missing\007!!\n");
    160  1.5    lukem 	exit(-1);
    161  1.1      cgd }
    162