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