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