1 /*-
2  * Copyright (c) 1980, 1993
3  *	The Regents of the University of California.  All rights reserved.
4  *
5  * Redistribution and use in source and binary forms, with or without
6  * modification, are permitted provided that the following conditions
7  * are met:
8  * 1. Redistributions of source code must retain the above copyright
9  *    notice, this list of conditions and the following disclaimer.
10  * 2. Redistributions in binary form must reproduce the above copyright
11  *    notice, this list of conditions and the following disclaimer in the
12  *    documentation and/or other materials provided with the distribution.
13  * 3. Neither the name of the University nor the names of its contributors
14  *    may be used to endorse or promote products derived from this software
15  *    without specific prior written permission.
16  *
17  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
18  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
19  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
20  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
21  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
22  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
23  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
24  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
25  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
26  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
27  * SUCH DAMAGE.
28  *
29  * @(#) Copyright (c) 1980, 1993 The Regents of the University of California.  All rights reserved.
30  * @(#)teach.c	8.1 (Berkeley) 5/31/93
31  * $FreeBSD: src/games/backgammon/teachgammon/teach.c,v 1.12 1999/11/30 03:48:30 billf Exp $
32  * $DragonFly: src/games/backgammon/teachgammon/teach.c,v 1.3 2006/08/08 16:36:11 pavalos Exp $
33  */
34 
35 #include <string.h>
36 #include <sys/types.h>
37 #include <termcap.h>
38 #include <unistd.h>
39 #include <signal.h>
40 #include "back.h"
41 #include "tutor.h"
42 
43 const char *const helpm[] = {
44 	"\nEnter a space or newline to roll, or",
45 	"     b   to display the board",
46 	"     d   to double",
47 	"     q   to quit\n",
48 	0
49 };
50 
51 const char *const contin[] = {
52 	"",
53 	0
54 };
55 
56 int
57 main(int argc, char **argv)
58 {
59 	int i;
60 
61 	/* revoke privs */
62 	setgid(getgid());
63 
64 	acnt = 1;
65 	signal(SIGINT, (sig_t)getout);
66 	if (tcgetattr(0, &tty) == -1)			/* get old tty mode */
67 		errexit("teachgammon(tcgetattr)");
68 	old = tty.c_lflag;
69 	raw = ((noech = old & ~ECHO) & ~ICANON);	/* set up modes */
70 	ospeed = cfgetospeed(&tty);			/* for termlib */
71 	tflag = getcaps(getenv("TERM"));
72 	getarg(argc, argv);
73 	if (tflag) {
74 		noech &= ~(ICRNL | OXTABS);
75 		raw &= ~(ICRNL | OXTABS);
76 		clear();
77 	}
78 	text(hello);
79 	text(list);
80 	i = text(contin);
81 	if (i == 0)
82 		i = 2;
83 	init();
84 	while (i)
85 		switch (i) {
86 		case 1:
87 			leave();
88 
89 		case 2:
90 			if ((i = text(intro1)) != 0)
91 				break;
92 			wrboard();
93 			if ((i = text(intro2)) != 0)
94 				break;
95 
96 		case 3:
97 			if ((i = text(moves)) != 0)
98 				break;
99 
100 		case 4:
101 			if ((i = text(remove)) != 0)
102 				break;
103 
104 		case 5:
105 			if ((i = text(hits)) != 0)
106 				break;
107 
108 		case 6:
109 			if ((i = text(endgame)) != 0)
110 				break;
111 
112 		case 7:
113 			if ((i = text(doubl)) != 0)
114 				break;
115 
116 		case 8:
117 			if ((i = text(stragy)) != 0)
118 				break;
119 
120 		case 9:
121 			if ((i = text(prog)) != 0)
122 				break;
123 
124 		case 10:
125 			if ((i = text(lastch)) != 0)
126 				break;
127 		}
128 	tutor();
129 	/* NOTREACHED */
130 	return (0);
131 }
132 
133 void
134 leave(void)
135 {
136 	int i;
137 
138 	if (tflag)
139 		clear();
140 	else
141 		writec('\n');
142 	fixtty(old);
143 	args[0] = strdup("backgammon");
144 	args[acnt++] = strdup("-n");
145 	args[acnt] = 0;
146 	execv(EXEC, args);
147 	for (i = 0; i < acnt; i++)
148 		free(args[i]);
149 	writel("Help! Backgammon program is missing\007!!\n");
150 	exit(-1);
151 }
152