xref: /netbsd/games/backgammon/teachgammon/teach.c (revision 6550d01e)
1 /*	$NetBSD: teach.c,v 1.21 2010/03/22 05:10:19 mrg 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.21 2010/03/22 05:10:19 mrg 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 	wrtext(hello);
91 	wrtext(list);
92 	i = wrtext(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 = wrtext(intro1)) != 0)
103 				break;
104 			wrboard();
105 			if ((i = wrtext(intro2)) != 0)
106 				break;
107 
108 		case 3:
109 			if ((i = wrtext(moves)) != 0)
110 				break;
111 
112 		case 4:
113 			if ((i = wrtext(removepiece)) != 0)
114 				break;
115 
116 		case 5:
117 			if ((i = wrtext(hits)) != 0)
118 				break;
119 
120 		case 6:
121 			if ((i = wrtext(endgame)) != 0)
122 				break;
123 
124 		case 7:
125 			if ((i = wrtext(doubl)) != 0)
126 				break;
127 
128 		case 8:
129 			if ((i = wrtext(stragy)) != 0)
130 				break;
131 
132 		case 9:
133 			if ((i = wrtext(prog)) != 0)
134 				break;
135 
136 		case 10:
137 			if ((i = wrtext(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 }
157