fish/fish.c

   1 /*      $NetBSD: fish.c,v 1.10 1999/09/12 09:02:21 jsm 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.10 1999/09/12 09:02:21 jsm 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
  69 #define USER            1
  70 #define COMPUTER        0
  71 #define OTHER(a)        (1 - (a))
  72
  73 const char *const cards[] = {
  74         "A", "2", "3", "4", "5", "6", "7",
  75         "8", "9", "10", "J", "Q", "K", NULL,
  76 };
  77 #define PRC(card)       (void)printf(" %s", cards[card])
  78
  79 int promode;
  80 int asked[RANKS], comphand[RANKS], deck[RANKS];
  81 int userasked[RANKS], userhand[RANKS];
  82
  83 void    chkwinner __P((int, const int *));
  84 int     compmove __P((void));
  85 int     countbooks __P((const int *));
  86 int     countcards __P((const int *));
  87 int     drawcard __P((int, int *));
  88 int     gofish __P((int, int, int *));
  89 void    goodmove __P((int, int, int *, int *));
  90 void    init __P((void));
  91 void    instructions __P((void));
  92 int     main __P((int, char *[]));
  93 int     nrandom __P((int));
  94 void    printhand __P((const int *));
  95 void    printplayer __P((int));
  96 int     promove __P((void));
  97 void    usage __P((void)) __attribute__((__noreturn__));
  98 int     usermove __P((void));
  99
 100 int
 101 main(argc, argv)
 102         int argc;
 103         char **argv;
 104 {
 105         int ch, move;
 106
 107         /* Revoke setgid privileges */
 108         setregid(getgid(), getgid());
 109
 110         while ((ch = getopt(argc, argv, "p")) != -1)
 111                 switch(ch) {
 112                 case 'p':
 113                         promode = 1;
 114                         break;
 115                 case '?':
 116                 default:
 117                         (void)fprintf(stderr, "usage: fish [-p]\n");
 118                         exit(1);
 119                 }
 120
 121         srandom(time((time_t *)NULL));
 122         instructions();
 123         init();
 124
 125         if (nrandom(2) == 1) {
 126                 printplayer(COMPUTER);
 127                 (void)printf("get to start.\n");
 128                 goto istart;
 129         }
 130         printplayer(USER);
 131         (void)printf("get to start.\n");
 132
 133         for (;;) {
 134                 move = usermove();
 135                 if (!comphand[move]) {
 136                         if (gofish(move, USER, userhand))
 137                                 continue;
 138                 } else {
 139                         goodmove(USER, move, userhand, comphand);
 140                         continue;
 141                 }
 142
 143 istart:         for (;;) {
 144                         move = compmove();
 145                         if (!userhand[move]) {
 146                                 if (!gofish(move, COMPUTER, comphand))
 147                                         break;
 148                         } else
 149                                 goodmove(COMPUTER, move, comphand, userhand);
 150                 }
 151         }
 152         /* NOTREACHED */
 153 }
 154
 155 int
 156 usermove()
 157 {
 158         int n;
 159         const char *const *p;
 160         char buf[256];
 161
 162         (void)printf("\nYour hand is:");
 163         printhand(userhand);
 164
 165         for (;;) {
 166                 (void)printf("You ask me for: ");
 167                 (void)fflush(stdout);
 168                 if (fgets(buf, sizeof(buf), stdin) == NULL)
 169                         exit(0);
 170                 if (buf[0] == '\0')
 171                         continue;
 172                 if (buf[0] == '\n') {
 173                         (void)printf("%d cards in my hand, %d in the pool.\n",
 174                             countcards(comphand), countcards(deck));
 175                         (void)printf("My books:");
 176                         (void)countbooks(comphand);
 177                         continue;
 178                 }
 179                 buf[strlen(buf) - 1] = '\0';
 180                 if (!strcasecmp(buf, "p") && !promode) {
 181                         promode = 1;
 182                         (void)printf("Entering pro mode.\n");
 183                         continue;
 184                 }
 185                 if (!strcasecmp(buf, "quit"))
 186                         exit(0);
 187                 for (p = cards; *p; ++p)
 188                         if (!strcasecmp(*p, buf))
 189                                 break;
 190                 if (!*p) {
 191                         (void)printf("I don't understand!\n");
 192                         continue;
 193                 }
 194                 n = p - cards;
 195                 if (userhand[n]) {
 196                         userasked[n] = 1;
 197                         return(n);
 198                 }
 199                 if (nrandom(3) == 1)
 200                         (void)printf("You don't have any of those!\n");
 201                 else
 202                         (void)printf("You don't have any %s's!\n", cards[n]);
 203                 if (nrandom(4) == 1)
 204                         (void)printf("No cheating!\n");
 205                 (void)printf("Guess again.\n");
 206         }
 207         /* NOTREACHED */
 208 }
 209
 210 int
 211 compmove()
 212 {
 213         static int lmove;
 214
 215         if (promode)
 216                 lmove = promove();
 217         else {
 218                 do {
 219                         lmove = (lmove + 1) % RANKS;
 220                 } while (!comphand[lmove] || comphand[lmove] == CARDS);
 221         }
 222         asked[lmove] = 1;
 223
 224         (void)printf("I ask you for: %s.\n", cards[lmove]);
 225         return(lmove);
 226 }
 227
 228 int
 229 promove()
 230 {
 231         int i, max;
 232
 233         for (i = 0; i < RANKS; ++i)
 234                 if (userasked[i] &&
 235                     comphand[i] > 0 && comphand[i] < CARDS) {
 236                         userasked[i] = 0;
 237                         return(i);
 238                 }
 239         if (nrandom(3) == 1) {
 240                 for (i = 0;; ++i)
 241                         if (comphand[i] && comphand[i] != CARDS) {
 242                                 max = i;
 243                                 break;
 244                         }
 245                 while (++i < RANKS)
 246                         if (comphand[i] != CARDS &&
 247                             comphand[i] > comphand[max])
 248                                 max = i;
 249                 return(max);
 250         }
 251         if (nrandom(1024) == 0723) {
 252                 for (i = 0; i < RANKS; ++i)
 253                         if (userhand[i] && comphand[i])
 254                                 return(i);
 255         }
 256         for (;;) {
 257                 for (i = 0; i < RANKS; ++i)
 258                         if (comphand[i] && comphand[i] != CARDS &&
 259                             !asked[i])
 260                                 return(i);
 261                 for (i = 0; i < RANKS; ++i)
 262                         asked[i] = 0;
 263         }
 264         /* NOTREACHED */
 265 }
 266
 267 int
 268 drawcard(player, hand)
 269         int player;
 270         int *hand;
 271 {
 272         int card;
 273
 274         while (deck[card = nrandom(RANKS)] == 0);
 275         ++hand[card];
 276         --deck[card];
 277         if (player == USER || hand[card] == CARDS) {
 278                 printplayer(player);
 279                 (void)printf("drew %s", cards[card]);
 280                 if (hand[card] == CARDS) {
 281                         (void)printf(" and made a book of %s's!\n",
 282                              cards[card]);
 283                         chkwinner(player, hand);
 284                 } else
 285                         (void)printf(".\n");
 286         }
 287         return(card);
 288 }
 289
 290 int
 291 gofish(askedfor, player, hand)
 292         int askedfor, player;
 293         int *hand;
 294 {
 295         printplayer(OTHER(player));
 296         (void)printf("say \"GO FISH!\"\n");
 297         if (askedfor == drawcard(player, hand)) {
 298                 printplayer(player);
 299                 (void)printf("drew the guess!\n");
 300                 printplayer(player);
 301                 (void)printf("get to ask again!\n");
 302                 return(1);
 303         }
 304         return(0);
 305 }
 306
 307 void
 308 goodmove(player, move, hand, opphand)
 309         int player, move;
 310         int *hand, *opphand;
 311 {
 312         printplayer(OTHER(player));
 313         (void)printf("have %d %s%s.\n",
 314             opphand[move], cards[move], opphand[move] == 1 ? "": "'s");
 315
 316         hand[move] += opphand[move];
 317         opphand[move] = 0;
 318
 319         if (hand[move] == CARDS) {
 320                 printplayer(player);
 321                 (void)printf("made a book of %s's!\n", cards[move]);
 322                 chkwinner(player, hand);
 323         }
 324
 325         chkwinner(OTHER(player), opphand);
 326
 327         printplayer(player);
 328         (void)printf("get another guess!\n");
 329 }
 330
 331 void
 332 chkwinner(player, hand)
 333         int player;
 334         const int *hand;
 335 {
 336         int cb, i, ub;
 337
 338         for (i = 0; i < RANKS; ++i)
 339                 if (hand[i] > 0 && hand[i] < CARDS)
 340                         return;
 341         printplayer(player);
 342         (void)printf("don't have any more cards!\n");
 343         (void)printf("My books:");
 344         cb = countbooks(comphand);
 345         (void)printf("Your books:");
 346         ub = countbooks(userhand);
 347         (void)printf("\nI have %d, you have %d.\n", cb, ub);
 348         if (ub > cb) {
 349                 (void)printf("\nYou win!!!\n");
 350                 if (nrandom(1024) == 0723)
 351                         (void)printf("Cheater, cheater, pumpkin eater!\n");
 352         } else if (cb > ub) {
 353                 (void)printf("\nI win!!!\n");
 354                 if (nrandom(1024) == 0723)
 355                         (void)printf("Hah!  Stupid peasant!\n");
 356         } else
 357                 (void)printf("\nTie!\n");
 358         exit(0);
 359 }
 360
 361 void
 362 printplayer(player)
 363         int player;
 364 {
 365         switch (player) {
 366         case COMPUTER:
 367                 (void)printf("I ");
 368                 break;
 369         case USER:
 370                 (void)printf("You ");
 371                 break;
 372         }
 373 }
 374
 375 void
 376 printhand(hand)
 377         const int *hand;
 378 {
 379         int book, i, j;
 380
 381         for (book = i = 0; i < RANKS; i++)
 382                 if (hand[i] < CARDS)
 383                         for (j = hand[i]; --j >= 0;)
 384                                 PRC(i);
 385                 else
 386                         ++book;
 387         if (book) {
 388                 (void)printf(" + Book%s of", book > 1 ? "s" : "");
 389                 for (i = 0; i < RANKS; i++)
 390                         if (hand[i] == CARDS)
 391                                 PRC(i);
 392         }
 393         (void)putchar('\n');
 394 }
 395
 396 int
 397 countcards(hand)
 398         const int *hand;
 399 {
 400         int i, count;
 401
 402         for (count = i = 0; i < RANKS; i++)
 403                 count += *hand++;
 404         return(count);
 405 }
 406
 407 int
 408 countbooks(hand)
 409         const int *hand;
 410 {
 411         int i, count;
 412
 413         for (count = i = 0; i < RANKS; i++)
 414                 if (hand[i] == CARDS) {
 415                         ++count;
 416                         PRC(i);
 417                 }
 418         if (!count)
 419                 (void)printf(" none");
 420         (void)putchar('\n');
 421         return(count);
 422 }
 423
 424 void
 425 init()
 426 {
 427         int i, rank;
 428
 429         for (i = 0; i < RANKS; ++i)
 430                 deck[i] = CARDS;
 431         for (i = 0; i < HANDSIZE; ++i) {
 432                 while (!deck[rank = nrandom(RANKS)]);
 433                 ++userhand[rank];
 434                 --deck[rank];
 435         }
 436         for (i = 0; i < HANDSIZE; ++i) {
 437                 while (!deck[rank = nrandom(RANKS)]);
 438                 ++comphand[rank];
 439                 --deck[rank];
 440         }
 441 }
 442
 443 int
 444 nrandom(n)
 445         int n;
 446 {
 447
 448         return((int)random() % n);
 449 }
 450
 451 void
 452 instructions()
 453 {
 454         int input;
 455         pid_t pid;
 456         int fd;
 457         const char *pager;
 458         int status;
 459
 460         (void)printf("Would you like instructions (y or n)? ");
 461         input = getchar();
 462         while (getchar() != '\n');
 463         if (input != 'y')
 464                 return;
 465
 466         switch (pid = fork()) {
 467         case 0: /* child */
 468                 if (!isatty(1))
 469                         pager = "cat";
 470                 else {
 471                         if (!(pager = getenv("PAGER")) || (*pager == 0))
 472                                 pager = _PATH_MORE;
 473                 }
 474                 if ((fd = open(_PATH_INSTR, O_RDONLY)) == -1)
 475                         err(1, "open %s", _PATH_INSTR);
 476                 if (dup2(fd, 0) == -1)
 477                         err(1, "dup2");
 478                 (void)execl("/bin/sh", "sh", "-c", pager, NULL);
 479                 err(1, "exec sh -c %s", pager);
 480                 /*NOTREACHED*/
 481         case -1:
 482                 err(1, "fork");
 483                 /*NOTREACHED*/
 484         default:
 485                 (void)waitpid(pid, &status, 0);
 486                 break;
 487         }
 488         (void)printf("Hit return to continue...\n");
 489         while ((input = getchar()) != EOF && input != '\n');
 490 }
 491
 492 void
 493 usage()
 494 {
 495         (void)fprintf(stderr, "usage: fish [-p]\n");
 496         exit(1);
 497 }