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