fish/fish.c

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