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