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