fish/fish.c

   1 /*      $NetBSD: fish.c,v 1.3 1995/03/23 08:28:18 cgd 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 #ifndef lint
  40 static char copyright[] =
  41 "@(#) 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 static char rcsid[] = "$NetBSD: fish.c,v 1.3 1995/03/23 08:28:18 cgd Exp $";
  50 #endif
  51 #endif /* not lint */
  52
  53 #include <sys/types.h>
  54 #include <sys/errno.h>
  55 #include <fcntl.h>
  56 #include <stdio.h>
  57 #include <stdlib.h>
  58 #include <string.h>
  59 #include "pathnames.h"
  60
  61 #define RANKS           13
  62 #define HANDSIZE        7
  63 #define CARDS           4
  64
  65 #define USER            1
  66 #define COMPUTER        0
  67 #define OTHER(a)        (1 - (a))
  68
  69 char *cards[] = {
  70         "A", "2", "3", "4", "5", "6", "7",
  71         "8", "9", "10", "J", "Q", "K", NULL,
  72 };
  73 #define PRC(card)       (void)printf(" %s", cards[card])
  74
  75 int promode;
  76 int asked[RANKS], comphand[RANKS], deck[RANKS];
  77 int userasked[RANKS], userhand[RANKS];
  78
  79 main(argc, argv)
  80         int argc;
  81         char **argv;
  82 {
  83         int ch, move;
  84
  85         while ((ch = getopt(argc, argv, "p")) != EOF)
  86                 switch(ch) {
  87                 case 'p':
  88                         promode = 1;
  89                         break;
  90                 case '?':
  91                 default:
  92                         (void)fprintf(stderr, "usage: fish [-p]\n");
  93                         exit(1);
  94                 }
  95
  96         srandom(time((time_t *)NULL));
  97         instructions();
  98         init();
  99
 100         if (nrandom(2) == 1) {
 101                 printplayer(COMPUTER);
 102                 (void)printf("get to start.\n");
 103                 goto istart;
 104         }
 105         printplayer(USER);
 106         (void)printf("get to start.\n");
 107
 108         for (;;) {
 109                 move = usermove();
 110                 if (!comphand[move]) {
 111                         if (gofish(move, USER, userhand))
 112                                 continue;
 113                 } else {
 114                         goodmove(USER, move, userhand, comphand);
 115                         continue;
 116                 }
 117
 118 istart:         for (;;) {
 119                         move = compmove();
 120                         if (!userhand[move]) {
 121                                 if (!gofish(move, COMPUTER, comphand))
 122                                         break;
 123                         } else
 124                                 goodmove(COMPUTER, move, comphand, userhand);
 125                 }
 126         }
 127         /* NOTREACHED */
 128 }
 129
 130 usermove()
 131 {
 132         register int n;
 133         register char **p;
 134         char buf[256];
 135
 136         (void)printf("\nYour hand is:");
 137         printhand(userhand);
 138
 139         for (;;) {
 140                 (void)printf("You ask me for: ");
 141                 (void)fflush(stdout);
 142                 if (fgets(buf, BUFSIZ, stdin) == NULL)
 143                         exit(0);
 144                 if (buf[0] == '\0')
 145                         continue;
 146                 if (buf[0] == '\n') {
 147                         (void)printf("%d cards in my hand, %d in the pool.\n",
 148                             countcards(comphand), countcards(deck));
 149                         (void)printf("My books:");
 150                         (void)countbooks(comphand);
 151                         continue;
 152                 }
 153                 buf[strlen(buf) - 1] = '\0';
 154                 if (!strcasecmp(buf, "p") && !promode) {
 155                         promode = 1;
 156                         (void)printf("Entering pro mode.\n");
 157                         continue;
 158                 }
 159                 if (!strcasecmp(buf, "quit"))
 160                         exit(0);
 161                 for (p = cards; *p; ++p)
 162                         if (!strcasecmp(*p, buf))
 163                                 break;
 164                 if (!*p) {
 165                         (void)printf("I don't understand!\n");
 166                         continue;
 167                 }
 168                 n = p - cards;
 169                 if (userhand[n]) {
 170                         userasked[n] = 1;
 171                         return(n);
 172                 }
 173                 if (nrandom(3) == 1)
 174                         (void)printf("You don't have any of those!\n");
 175                 else
 176                         (void)printf("You don't have any %s's!\n", cards[n]);
 177                 if (nrandom(4) == 1)
 178                         (void)printf("No cheating!\n");
 179                 (void)printf("Guess again.\n");
 180         }
 181         /* NOTREACHED */
 182 }
 183
 184 compmove()
 185 {
 186         static int lmove;
 187
 188         if (promode)
 189                 lmove = promove();
 190         else {
 191                 do {
 192                         lmove = (lmove + 1) % RANKS;
 193                 } while (!comphand[lmove] || comphand[lmove] == CARDS);
 194         }
 195         asked[lmove] = 1;
 196
 197         (void)printf("I ask you for: %s.\n", cards[lmove]);
 198         return(lmove);
 199 }
 200
 201 promove()
 202 {
 203         register int i, max;
 204
 205         for (i = 0; i < RANKS; ++i)
 206                 if (userasked[i] &&
 207                     comphand[i] > 0 && comphand[i] < CARDS) {
 208                         userasked[i] = 0;
 209                         return(i);
 210                 }
 211         if (nrandom(3) == 1) {
 212                 for (i = 0;; ++i)
 213                         if (comphand[i] && comphand[i] != CARDS) {
 214                                 max = i;
 215                                 break;
 216                         }
 217                 while (++i < RANKS)
 218                         if (comphand[i] != CARDS &&
 219                             comphand[i] > comphand[max])
 220                                 max = i;
 221                 return(max);
 222         }
 223         if (nrandom(1024) == 0723) {
 224                 for (i = 0; i < RANKS; ++i)
 225                         if (userhand[i] && comphand[i])
 226                                 return(i);
 227         }
 228         for (;;) {
 229                 for (i = 0; i < RANKS; ++i)
 230                         if (comphand[i] && comphand[i] != CARDS &&
 231                             !asked[i])
 232                                 return(i);
 233                 for (i = 0; i < RANKS; ++i)
 234                         asked[i] = 0;
 235         }
 236         /* NOTREACHED */
 237 }
 238
 239 drawcard(player, hand)
 240         int player;
 241         int *hand;
 242 {
 243         int card;
 244
 245         while (deck[card = nrandom(RANKS)] == 0);
 246         ++hand[card];
 247         --deck[card];
 248         if (player == USER || hand[card] == CARDS) {
 249                 printplayer(player);
 250                 (void)printf("drew %s", cards[card]);
 251                 if (hand[card] == CARDS) {
 252                         (void)printf(" and made a book of %s's!\n",
 253                              cards[card]);
 254                         chkwinner(player, hand);
 255                 } else
 256                         (void)printf(".\n");
 257         }
 258         return(card);
 259 }
 260
 261 gofish(askedfor, player, hand)
 262         int askedfor, player;
 263         int *hand;
 264 {
 265         printplayer(OTHER(player));
 266         (void)printf("say \"GO FISH!\"\n");
 267         if (askedfor == drawcard(player, hand)) {
 268                 printplayer(player);
 269                 (void)printf("drew the guess!\n");
 270                 printplayer(player);
 271                 (void)printf("get to ask again!\n");
 272                 return(1);
 273         }
 274         return(0);
 275 }
 276
 277 goodmove(player, move, hand, opphand)
 278         int player, move;
 279         int *hand, *opphand;
 280 {
 281         printplayer(OTHER(player));
 282         (void)printf("have %d %s%s.\n",
 283             opphand[move], cards[move], opphand[move] == 1 ? "": "'s");
 284
 285         hand[move] += opphand[move];
 286         opphand[move] = 0;
 287
 288         if (hand[move] == CARDS) {
 289                 printplayer(player);
 290                 (void)printf("made a book of %s's!\n", cards[move]);
 291                 chkwinner(player, hand);
 292         }
 293
 294         chkwinner(OTHER(player), opphand);
 295
 296         printplayer(player);
 297         (void)printf("get another guess!\n");
 298 }
 299
 300 chkwinner(player, hand)
 301         int player;
 302         register int *hand;
 303 {
 304         register int cb, i, ub;
 305
 306         for (i = 0; i < RANKS; ++i)
 307                 if (hand[i] > 0 && hand[i] < CARDS)
 308                         return;
 309         printplayer(player);
 310         (void)printf("don't have any more cards!\n");
 311         (void)printf("My books:");
 312         cb = countbooks(comphand);
 313         (void)printf("Your books:");
 314         ub = countbooks(userhand);
 315         (void)printf("\nI have %d, you have %d.\n", cb, ub);
 316         if (ub > cb) {
 317                 (void)printf("\nYou win!!!\n");
 318                 if (nrandom(1024) == 0723)
 319                         (void)printf("Cheater, cheater, pumpkin eater!\n");
 320         } else if (cb > ub) {
 321                 (void)printf("\nI win!!!\n");
 322                 if (nrandom(1024) == 0723)
 323                         (void)printf("Hah!  Stupid peasant!\n");
 324         } else
 325                 (void)printf("\nTie!\n");
 326         exit(0);
 327 }
 328
 329 printplayer(player)
 330         int player;
 331 {
 332         switch (player) {
 333         case COMPUTER:
 334                 (void)printf("I ");
 335                 break;
 336         case USER:
 337                 (void)printf("You ");
 338                 break;
 339         }
 340 }
 341
 342 printhand(hand)
 343         int *hand;
 344 {
 345         register int book, i, j;
 346
 347         for (book = i = 0; i < RANKS; i++)
 348                 if (hand[i] < CARDS)
 349                         for (j = hand[i]; --j >= 0;)
 350                                 PRC(i);
 351                 else
 352                         ++book;
 353         if (book) {
 354                 (void)printf(" + Book%s of", book > 1 ? "s" : "");
 355                 for (i = 0; i < RANKS; i++)
 356                         if (hand[i] == CARDS)
 357                                 PRC(i);
 358         }
 359         (void)putchar('\n');
 360 }
 361
 362 countcards(hand)
 363         register int *hand;
 364 {
 365         register int i, count;
 366
 367         for (count = i = 0; i < RANKS; i++)
 368                 count += *hand++;
 369         return(count);
 370 }
 371
 372 countbooks(hand)
 373         int *hand;
 374 {
 375         int i, count;
 376
 377         for (count = i = 0; i < RANKS; i++)
 378                 if (hand[i] == CARDS) {
 379                         ++count;
 380                         PRC(i);
 381                 }
 382         if (!count)
 383                 (void)printf(" none");
 384         (void)putchar('\n');
 385         return(count);
 386 }
 387
 388 init()
 389 {
 390         register int i, rank;
 391
 392         for (i = 0; i < RANKS; ++i)
 393                 deck[i] = CARDS;
 394         for (i = 0; i < HANDSIZE; ++i) {
 395                 while (!deck[rank = nrandom(RANKS)]);
 396                 ++userhand[rank];
 397                 --deck[rank];
 398         }
 399         for (i = 0; i < HANDSIZE; ++i) {
 400                 while (!deck[rank = nrandom(RANKS)]);
 401                 ++comphand[rank];
 402                 --deck[rank];
 403         }
 404 }
 405
 406 nrandom(n)
 407         int n;
 408 {
 409         long random();
 410
 411         return((int)random() % n);
 412 }
 413
 414 instructions()
 415 {
 416         int input;
 417         char buf[1024];
 418
 419         (void)printf("Would you like instructions (y or n)? ");
 420         input = getchar();
 421         while (getchar() != '\n');
 422         if (input != 'y')
 423                 return;
 424
 425         (void)sprintf(buf, "%s %s", _PATH_MORE, _PATH_INSTR);
 426         (void)system(buf);
 427         (void)printf("Hit return to continue...\n");
 428         while ((input = getchar()) != EOF && input != '\n');
 429 }
 430
 431 usage()
 432 {
 433         (void)fprintf(stderr, "usage: fish [-p]\n");
 434         exit(1);
 435 }