Home | History | Annotate | Line # | Download | only in fish
fish.c revision 1.13 
      1 /*	$NetBSD: fish.c,v 1.13 2000/05/08 07:56:03 mycroft Exp $	*/
      2 
      3 /*-
      4  * Copyright (c) 1990, 1993
      5  *	The Regents of the University of California.  All rights reserved.
      6  *
      7  * This code is derived from software contributed to Berkeley by
      8  * Muffy Barkocy.
      9  *
     10  * Redistribution and use in source and binary forms, with or without
     11  * modification, are permitted provided that the following conditions
     12  * are met:
     13  * 1. Redistributions of source code must retain the above copyright
     14  *    notice, this list of conditions and the following disclaimer.
     15  * 2. Redistributions in binary form must reproduce the above copyright
     16  *    notice, this list of conditions and the following disclaimer in the
     17  *    documentation and/or other materials provided with the distribution.
     18  * 3. All advertising materials mentioning features or use of this software
     19  *    must display the following acknowledgement:
     20  *	This product includes software developed by the University of
     21  *	California, Berkeley and its contributors.
     22  * 4. Neither the name of the University nor the names of its contributors
     23  *    may be used to endorse or promote products derived from this software
     24  *    without specific prior written permission.
     25  *
     26  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
     27  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
     28  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
     29  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
     30  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
     31  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
     32  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
     33  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
     34  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
     35  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
     36  * SUCH DAMAGE.
     37  */
     38 
     39 #include <sys/cdefs.h>
     40 #ifndef lint
     41 __COPYRIGHT("@(#) Copyright (c) 1990, 1993\n\
     42 	The Regents of the University of California.  All rights reserved.\n");
     43 #endif /* not lint */
     44 
     45 #ifndef lint
     46 #if 0
     47 static char sccsid[] = "@(#)fish.c	8.1 (Berkeley) 5/31/93";
     48 #else
     49 __RCSID("$NetBSD: fish.c,v 1.13 2000/05/08 07:56:03 mycroft Exp $");
     50 #endif
     51 #endif /* not lint */
     52 
     53 #include <sys/types.h>
     54 #include <sys/wait.h>
     55 #include <errno.h>
     56 #include <fcntl.h>
     57 #include <stdio.h>
     58 #include <stdlib.h>
     59 #include <unistd.h>
     60 #include <string.h>
     61 #include <time.h>
     62 #include <err.h>
     63 #include "pathnames.h"
     64 
     65 #define	RANKS		13
     66 #define	HANDSIZE	7
     67 #define	CARDS		4
     68 #define	TOTCARDS	RANKS * CARDS
     69 
     70 #define	USER		1
     71 #define	COMPUTER	0
     72 #define	OTHER(a)	(1 - (a))
     73 
     74 const char *const cards[] = {
     75 	"A", "2", "3", "4", "5", "6", "7",
     76 	"8", "9", "10", "J", "Q", "K", NULL,
     77 };
     78 #define	PRC(card)	(void)printf(" %s", cards[card])
     79 
     80 int promode;
     81 int asked[RANKS], comphand[RANKS], deck[TOTCARDS];
     82 int userasked[RANKS], userhand[RANKS];
     83 int curcard = TOTCARDS;
     84 
     85 void	chkwinner __P((int, const int *));
     86 int	compmove __P((void));
     87 int	countbooks __P((const int *));
     88 int	countcards __P((const int *));
     89 int	drawcard __P((int, int *));
     90 int	gofish __P((int, int, int *));
     91 void	goodmove __P((int, int, int *, int *));
     92 void	init __P((void));
     93 void	instructions __P((void));
     94 int	main __P((int, char *[]));
     95 int	nrandom __P((int));
     96 void	printhand __P((const int *));
     97 void	printplayer __P((int));
     98 int	promove __P((void));
     99 void	usage __P((void)) __attribute__((__noreturn__));
    100 int	usermove __P((void));
    101 
    102 int
    103 main(argc, argv)
    104 	int argc;
    105 	char **argv;
    106 {
    107 	int ch, move;
    108 
    109 	/* Revoke setgid privileges */
    110 	setgid(getgid());
    111 
    112 	while ((ch = getopt(argc, argv, "p")) != -1)
    113 		switch(ch) {
    114 		case 'p':
    115 			promode = 1;
    116 			break;
    117 		case '?':
    118 		default:
    119 			usage();
    120 		}
    121 
    122 	srandom(time((time_t *)NULL));
    123 	instructions();
    124 	init();
    125 
    126 	if (nrandom(2) == 1) {
    127 		printplayer(COMPUTER);
    128 		(void)printf("get to start.\n");
    129 		goto istart;
    130 	}
    131 	printplayer(USER);
    132 	(void)printf("get to start.\n");
    133 
    134 	for (;;) {
    135 		move = usermove();
    136 		if (!comphand[move]) {
    137 			if (gofish(move, USER, userhand))
    138 				continue;
    139 		} else {
    140 			goodmove(USER, move, userhand, comphand);
    141 			continue;
    142 		}
    143 
    144 istart:		for (;;) {
    145 			move = compmove();
    146 			if (!userhand[move]) {
    147 				if (!gofish(move, COMPUTER, comphand))
    148 					break;
    149 			} else
    150 				goodmove(COMPUTER, move, comphand, userhand);
    151 		}
    152 	}
    153 	/* NOTREACHED */
    154 }
    155 
    156 int
    157 usermove()
    158 {
    159 	int n;
    160 	const char *const *p;
    161 	char buf[256];
    162 
    163 	(void)printf("\nYour hand is:");
    164 	printhand(userhand);
    165 
    166 	for (;;) {
    167 		(void)printf("You ask me for: ");
    168 		(void)fflush(stdout);
    169 		if (fgets(buf, sizeof(buf), stdin) == NULL)
    170 			exit(0);
    171 		if (buf[0] == '\0')
    172 			continue;
    173 		if (buf[0] == '\n') {
    174 			(void)printf("%d cards in my hand, %d in the pool.\n",
    175 			    countcards(comphand), curcard);
    176 			(void)printf("My books:");
    177 			(void)countbooks(comphand);
    178 			continue;
    179 		}
    180 		buf[strlen(buf) - 1] = '\0';
    181 		if (!strcasecmp(buf, "p") && !promode) {
    182 			promode = 1;
    183 			(void)printf("Entering pro mode.\n");
    184 			continue;
    185 		}
    186 		if (!strcasecmp(buf, "quit"))
    187 			exit(0);
    188 		for (p = cards; *p; ++p)
    189 			if (!strcasecmp(*p, buf))
    190 				break;
    191 		if (!*p) {
    192 			(void)printf("I don't understand!\n");
    193 			continue;
    194 		}
    195 		n = p - cards;
    196 		if (userhand[n]) {
    197 			userasked[n] = 1;
    198 			return(n);
    199 		}
    200 		if (nrandom(3) == 1)
    201 			(void)printf("You don't have any of those!\n");
    202 		else
    203 			(void)printf("You don't have any %s's!\n", cards[n]);
    204 		if (nrandom(4) == 1)
    205 			(void)printf("No cheating!\n");
    206 		(void)printf("Guess again.\n");
    207 	}
    208 	/* NOTREACHED */
    209 }
    210 
    211 int
    212 compmove()
    213 {
    214 	static int lmove;
    215 
    216 	if (promode)
    217 		lmove = promove();
    218 	else {
    219 		do {
    220 			lmove = (lmove + 1) % RANKS;
    221 		} while (!comphand[lmove] || comphand[lmove] == CARDS);
    222 	}
    223 	asked[lmove] = 1;
    224 
    225 	(void)printf("I ask you for: %s.\n", cards[lmove]);
    226 	return(lmove);
    227 }
    228 
    229 int
    230 promove()
    231 {
    232 	int i, max;
    233 
    234 	for (i = 0; i < RANKS; ++i)
    235 		if (userasked[i] &&
    236 		    comphand[i] > 0 && comphand[i] < CARDS) {
    237 			userasked[i] = 0;
    238 			return(i);
    239 		}
    240 	if (nrandom(3) == 1) {
    241 		for (i = 0;; ++i)
    242 			if (comphand[i] && comphand[i] != CARDS) {
    243 				max = i;
    244 				break;
    245 			}
    246 		while (++i < RANKS)
    247 			if (comphand[i] != CARDS &&
    248 			    comphand[i] > comphand[max])
    249 				max = i;
    250 		return(max);
    251 	}
    252 	if (nrandom(1024) == 0723) {
    253 		for (i = 0; i < RANKS; ++i)
    254 			if (userhand[i] && comphand[i])
    255 				return(i);
    256 	}
    257 	for (;;) {
    258 		for (i = 0; i < RANKS; ++i)
    259 			if (comphand[i] && comphand[i] != CARDS &&
    260 			    !asked[i])
    261 				return(i);
    262 		for (i = 0; i < RANKS; ++i)
    263 			asked[i] = 0;
    264 	}
    265 	/* NOTREACHED */
    266 }
    267 
    268 int
    269 drawcard(player, hand)
    270 	int player;
    271 	int *hand;
    272 {
    273 	int card;
    274 
    275 	++hand[card = deck[--curcard]];
    276 	if (player == USER || hand[card] == CARDS) {
    277 		printplayer(player);
    278 		(void)printf("drew %s", cards[card]);
    279 		if (hand[card] == CARDS) {
    280 			(void)printf(" and made a book of %s's!\n",
    281 			     cards[card]);
    282 			chkwinner(player, hand);
    283 		} else
    284 			(void)printf(".\n");
    285 	}
    286 	return(card);
    287 }
    288 
    289 int
    290 gofish(askedfor, player, hand)
    291 	int askedfor, player;
    292 	int *hand;
    293 {
    294 	printplayer(OTHER(player));
    295 	(void)printf("say \"GO FISH!\"\n");
    296 	if (askedfor == drawcard(player, hand)) {
    297 		printplayer(player);
    298 		(void)printf("drew the guess!\n");
    299 		printplayer(player);
    300 		(void)printf("get to ask again!\n");
    301 		return(1);
    302 	}
    303 	return(0);
    304 }
    305 
    306 void
    307 goodmove(player, move, hand, opphand)
    308 	int player, move;
    309 	int *hand, *opphand;
    310 {
    311 	printplayer(OTHER(player));
    312 	(void)printf("have %d %s%s.\n",
    313 	    opphand[move], cards[move], opphand[move] == 1 ? "": "'s");
    314 
    315 	hand[move] += opphand[move];
    316 	opphand[move] = 0;
    317 
    318 	if (hand[move] == CARDS) {
    319 		printplayer(player);
    320 		(void)printf("made a book of %s's!\n", cards[move]);
    321 		chkwinner(player, hand);
    322 	}
    323 
    324 	chkwinner(OTHER(player), opphand);
    325 
    326 	printplayer(player);
    327 	(void)printf("get another guess!\n");
    328 }
    329 
    330 void
    331 chkwinner(player, hand)
    332 	int player;
    333 	const int *hand;
    334 {
    335 	int cb, i, ub;
    336 
    337 	for (i = 0; i < RANKS; ++i)
    338 		if (hand[i] > 0 && hand[i] < CARDS)
    339 			return;
    340 	printplayer(player);
    341 	(void)printf("don't have any more cards!\n");
    342 	(void)printf("My books:");
    343 	cb = countbooks(comphand);
    344 	(void)printf("Your books:");
    345 	ub = countbooks(userhand);
    346 	(void)printf("\nI have %d, you have %d.\n", cb, ub);
    347 	if (ub > cb) {
    348 		(void)printf("\nYou win!!!\n");
    349 		if (nrandom(1024) == 0723)
    350 			(void)printf("Cheater, cheater, pumpkin eater!\n");
    351 	} else if (cb > ub) {
    352 		(void)printf("\nI win!!!\n");
    353 		if (nrandom(1024) == 0723)
    354 			(void)printf("Hah!  Stupid peasant!\n");
    355 	} else
    356 		(void)printf("\nTie!\n");
    357 	exit(0);
    358 }
    359 
    360 void
    361 printplayer(player)
    362 	int player;
    363 {
    364 	switch (player) {
    365 	case COMPUTER:
    366 		(void)printf("I ");
    367 		break;
    368 	case USER:
    369 		(void)printf("You ");
    370 		break;
    371 	}
    372 }
    373 
    374 void
    375 printhand(hand)
    376 	const int *hand;
    377 {
    378 	int book, i, j;
    379 
    380 	for (book = i = 0; i < RANKS; i++)
    381 		if (hand[i] < CARDS)
    382 			for (j = hand[i]; --j >= 0;)
    383 				PRC(i);
    384 		else
    385 			++book;
    386 	if (book) {
    387 		(void)printf(" + Book%s of", book > 1 ? "s" : "");
    388 		for (i = 0; i < RANKS; i++)
    389 			if (hand[i] == CARDS)
    390 				PRC(i);
    391 	}
    392 	(void)putchar('\n');
    393 }
    394 
    395 int
    396 countcards(hand)
    397 	const int *hand;
    398 {
    399 	int i, count;
    400 
    401 	for (count = i = 0; i < RANKS; i++)
    402 		count += *hand++;
    403 	return(count);
    404 }
    405 
    406 int
    407 countbooks(hand)
    408 	const int *hand;
    409 {
    410 	int i, count;
    411 
    412 	for (count = i = 0; i < RANKS; i++)
    413 		if (hand[i] == CARDS) {
    414 			++count;
    415 			PRC(i);
    416 		}
    417 	if (!count)
    418 		(void)printf(" none");
    419 	(void)putchar('\n');
    420 	return(count);
    421 }
    422 
    423 void
    424 init()
    425 {
    426 	int i, j, temp;
    427 
    428 	for (i = 0; i < TOTCARDS; ++i)
    429 		deck[i] = i % RANKS;
    430 	for (i = 0; i < TOTCARDS - 1; ++i) {
    431 		j = nrandom(TOTCARDS-i);
    432 		if (j == 0)
    433 			continue;
    434 		temp = deck[i];
    435 		deck[i] = deck[i+j];
    436 		deck[i+j] = temp;
    437 	}
    438 	for (i = 0; i < HANDSIZE; ++i) {
    439 		++userhand[deck[--curcard]];
    440 		++comphand[deck[--curcard]];
    441 	}
    442 }
    443 
    444 int
    445 nrandom(n)
    446 	int n;
    447 {
    448 
    449 	return((int)random() % n);
    450 }
    451 
    452 void
    453 instructions()
    454 {
    455 	int input;
    456 	pid_t pid;
    457 	int fd;
    458 	const char *pager;
    459 	int status;
    460 
    461 	(void)printf("Would you like instructions (y or n)? ");
    462 	input = getchar();
    463 	while (getchar() != '\n');
    464 	if (input != 'y')
    465 		return;
    466 
    467 	switch (pid = fork()) {
    468 	case 0: /* child */
    469 		if (!isatty(1))
    470 			pager = "cat";
    471 		else {
    472 			if (!(pager = getenv("PAGER")) || (*pager == 0))
    473 				pager = _PATH_MORE;
    474 		}
    475 		if ((fd = open(_PATH_INSTR, O_RDONLY)) == -1)
    476 			err(1, "open %s", _PATH_INSTR);
    477 		if (dup2(fd, 0) == -1)
    478 			err(1, "dup2");
    479 		(void)execl("/bin/sh", "sh", "-c", pager, NULL);
    480 		err(1, "exec sh -c %s", pager);
    481 		/*NOTREACHED*/
    482 	case -1:
    483 		err(1, "fork");
    484 		/*NOTREACHED*/
    485 	default:
    486 		(void)waitpid(pid, &status, 0);
    487 		break;
    488 	}
    489 	(void)printf("Hit return to continue...\n");
    490 	while ((input = getchar()) != EOF && input != '\n');
    491 }
    492 
    493 void
    494 usage()
    495 {
    496 	(void)fprintf(stderr, "usage: fish [-p]\n");
    497 	exit(1);
    498 }
    499