-# $NetBSD: Makefile,v 1.16 1997/10/12 14:21:48 lukem Exp $
+# $NetBSD: Makefile,v 1.17 1997/10/12 17:45:06 christos Exp $
# @(#)Makefile 8.1 (Berkeley) 5/31/93
-WARNS= 0
PROG= monop
SRCS= monop.c cards.c execute.c getinp.c houses.c jail.c misc.c morg.c \
print.c prop.c rent.c roll.c spec.c trade.c
MAN= monop.6
-DPADD+= ${LIBCOMPAT}
-LDADD+= -lcompat
HIDEGAME=hidegame
CLEANFILES+=initdeck cards.pck
FILES=cards.pck
cards.pck: initdeck
${.OBJDIR}/initdeck ${.CURDIR}/cards.inp
-initdeck: initdeck.c
- ${HOST_CC} ${HOST_CFLAGS} ${HOST_LDFLAGS} ${LDSTATIC} -o ${.TARGET} ${.CURDIR}/initdeck.c
-
.include <bsd.prog.mk>
-/* $NetBSD: cards.c,v 1.3 1995/03/23 08:34:35 cgd Exp $ */
+/* $NetBSD: cards.c,v 1.4 1997/10/12 17:45:07 christos Exp $ */
/*
* Copyright (c) 1980, 1993
* SUCH DAMAGE.
*/
+#include <sys/cdefs.h>
#ifndef lint
#if 0
static char sccsid[] = "@(#)cards.c 8.1 (Berkeley) 5/31/93";
#else
-static char rcsid[] = "$NetBSD: cards.c,v 1.3 1995/03/23 08:34:35 cgd Exp $";
+__RCSID("$NetBSD: cards.c,v 1.4 1997/10/12 17:45:07 christos Exp $");
#endif
#endif /* not lint */
static FILE *deckf;
+static void set_up __P((DECK *));
+static void printmes __P((void));
+
/*
* This routine initializes the decks from the data file,
* which it opens.
*/
-init_decks() {
+void
+init_decks()
+{
if ((deckf=fopen(cardfile, "r")) == NULL) {
file_err:
/*
* This routine sets up the offset pointers for the given deck.
*/
+static void
set_up(dp)
DECK *dp; {
- reg int r1, r2;
+ int r1, r2;
int i;
dp->offsets = (long *) calloc(sizeof (long), dp->num_cards);
dp->last_card = 0;
dp->gojf_used = FALSE;
for (i = 0; i < dp->num_cards; i++) {
- reg long temp;
+ long temp;
r1 = roll(1, dp->num_cards) - 1;
r2 = roll(1, dp->num_cards) - 1;
/*
* This routine draws a card from the given deck
*/
+void
get_card(dp)
-DECK *dp; {
+DECK *dp;
+{
- reg char type_maj, type_min;
- reg int num;
+ char type_maj, type_min;
+ int num;
int i, per_h, per_H, num_h, num_H;
OWN *op;
}
spec = FALSE;
}
+
/*
* This routine prints out the message on the card
*/
+static void
printmes() {
- reg char c;
+ char c;
printline();
fflush(stdout);
-/* $NetBSD: execute.c,v 1.3 1995/03/23 08:34:38 cgd Exp $ */
+/* $NetBSD: execute.c,v 1.4 1997/10/12 17:45:09 christos Exp $ */
/*
* Copyright (c) 1980, 1993
* SUCH DAMAGE.
*/
+#include <sys/cdefs.h>
#ifndef lint
#if 0
static char sccsid[] = "@(#)execute.c 8.1 (Berkeley) 5/31/93";
#else
-static char rcsid[] = "$NetBSD: execute.c,v 1.3 1995/03/23 08:34:38 cgd Exp $";
+__RCSID("$NetBSD: execute.c,v 1.4 1997/10/12 17:45:09 christos Exp $");
#endif
#endif /* not lint */
-# include "monop.ext"
-# include <sys/types.h>
-# include <sys/stat.h>
-# include <sys/time.h>
+#include "monop.ext"
+#include <fcntl.h>
+#include <stdlib.h>
+#include <unistd.h>
+#include <sys/types.h>
+#include <sys/stat.h>
+#include <sys/time.h>
# define SEGSIZE 8192
typedef struct stat STAT;
typedef struct tm TIME;
-extern char etext[], /* end of text space */
- rub();
-
-static char buf[257],
- *yn_only[] = { "yes", "no"};
+static char buf[257];
static bool new_play; /* set if move on to new player */
+static void show_move __P((void));
+
/*
* This routine executes the given command by index number
*/
+void
execute(com_num)
-reg int com_num; {
+int com_num;
+{
new_play = FALSE; /* new_play is true if fixing */
(*func[com_num])();
/*
* This routine moves a piece around.
*/
-do_move() {
+void
+do_move()
+{
- reg int r1, r2;
- reg bool was_jail;
+ int r1, r2;
+ bool was_jail;
new_play = was_jail = FALSE;
printf("roll is %d, %d\n", r1=roll(1, 6), r2=roll(1, 6));
/*
* This routine moves a normal move
*/
+void
move(rl)
-reg int rl; {
+int rl;
+{
- reg int old_loc;
+ int old_loc;
old_loc = cur_p->loc;
cur_p->loc = (cur_p->loc + rl) % N_SQRS;
/*
* This routine shows the results of a move
*/
-show_move() {
+static void
+show_move()
+{
- reg SQUARE *sqp;
+ SQUARE *sqp;
sqp = &board[cur_p->loc];
printf("That puts you on %s\n", sqp->name);
cur_p->money -= sqp->cost;
}
else if (num_play > 2)
- bid(sqp);
+ bid();
}
else if (sqp->owner == player)
printf("You own it.\n");
/*
* This routine saves the current game for use at a later date
*/
-save() {
+void
+save()
+{
- reg char *sp;
- reg int outf, num;
+ char *sp;
+ int outf, num;
time_t t;
- int *dat_end;
struct stat sb;
- unsgn start, end;
+ char *start, *end;
printf("Which file do you wish to save it in? ");
sp = buf;
*/
if (stat(buf, &sb) > -1
- && getyn("File exists. Do you wish to overwrite? ", yn_only) > 0)
+ && getyn("File exists. Do you wish to overwrite? ") > 0)
return;
if ((outf=creat(buf, 0644)) < 0) {
for (sp = buf; *sp != '\n'; sp++)
continue;
*sp = '\0';
-# if 0
- start = (((int) etext + (SEGSIZE-1)) / SEGSIZE ) * SEGSIZE;
-# else
start = 0;
-# endif
end = sbrk(0);
while (start < end) { /* write out entire data space */
num = start + 16 * 1024 > end ? end - start : 16 * 1024;
/*
* This routine restores an old game from a file
*/
-restore() {
+void
+restore()
+{
- reg char *sp;
+ char *sp;
printf("Which file do you wish to restore from? ");
for (sp = buf; (*sp=getchar()) != '\n'; sp++)
* This does the actual restoring. It returns TRUE if the
* backup was successful, else false.
*/
+int
rest_f(file)
-reg char *file; {
+char *file;
+{
- reg char *sp;
- reg int inf, num;
+ char *sp;
+ int inf, num;
char buf[80];
- unsgn start, end;
+ char *start, *end;
STAT sbuf;
if ((inf=open(file, 0)) < 0) {
perror(file);
exit(1);
}
-# if 0
- start = (((int) etext + (SEGSIZE-1)) / SEGSIZE ) * SEGSIZE;
-# else
start = 0;
-# endif
brk(end = start + sbuf.st_size);
while (start < end) { /* write out entire data space */
num = start + 16 * 1024 > end ? end - start : 16 * 1024;
-/* $NetBSD: getinp.c,v 1.5 1997/03/29 20:42:22 thorpej Exp $ */
+/* $NetBSD: getinp.c,v 1.6 1997/10/12 17:45:10 christos Exp $ */
/*
* Copyright (c) 1980, 1993
* SUCH DAMAGE.
*/
+#include <sys/cdefs.h>
#ifndef lint
#if 0
static char sccsid[] = "@(#)getinp.c 8.1 (Berkeley) 5/31/93";
#else
-static char rcsid[] = "$NetBSD: getinp.c,v 1.5 1997/03/29 20:42:22 thorpej Exp $";
+__RCSID("$NetBSD: getinp.c,v 1.6 1997/10/12 17:45:10 christos Exp $");
#endif
#endif /* not lint */
-# include <stdio.h>
-# include <string.h>
-# include <ctype.h>
-
-# define reg register
+#include <stdio.h>
+#include <string.h>
+#include <ctype.h>
+#include "monop.ext"
# define LINE 70
static char buf[257];
+static int comp __P((char *));
+
+int
getinp(prompt, list)
-char *prompt, *list[]; {
+char *prompt, *list[];
+{
- reg int i, n_match, match;
+ int i, n_match, match = 0;
char *sp;
int c;
- int plen;
- static int comp();
for (;;) {
inter:
}
}
-static
+static int
comp(s1)
-char *s1; {
+char *s1;
+{
- reg char *sp, *tsp, c;
+ char *sp, *tsp, c;
if (buf[0] != '\0')
for (sp = buf, tsp = s1; *sp; ) {
-/* $NetBSD: houses.c,v 1.3 1995/03/23 08:34:40 cgd Exp $ */
+/* $NetBSD: houses.c,v 1.4 1997/10/12 17:45:11 christos Exp $ */
/*
* Copyright (c) 1980, 1993
* SUCH DAMAGE.
*/
+#include <sys/cdefs.h>
#ifndef lint
#if 0
static char sccsid[] = "@(#)houses.c 8.1 (Berkeley) 5/31/93";
#else
-static char rcsid[] = "$NetBSD: houses.c,v 1.3 1995/03/23 08:34:40 cgd Exp $";
+__RCSID("$NetBSD: houses.c,v 1.4 1997/10/12 17:45:11 christos Exp $");
#endif
#endif /* not lint */
-# include "monop.ext"
+#include "monop.ext"
static char *names[N_MON+2],
cur_prop[80];
static MON *monops[N_MON];
+static void buy_h __P((MON *));
+static void sell_h __P((MON *));
+static void list_cur __P((MON *));
/*
* These routines deal with buying and selling houses
*/
-buy_houses() {
+void
+buy_houses()
+{
- reg int num_mon;
- reg MON *mp;
- reg OWN *op;
+ int num_mon;
+ MON *mp;
+ OWN *op;
bool good,got_morg;
int i,p;
}
}
+static void
buy_h(mnp)
-MON *mnp; {
+MON *mnp;
+{
- reg int i;
- reg MON *mp;
- reg int price;
- shrt input[3],temp[3];
+ int i;
+ MON *mp;
+ int price;
+ short input[3],temp[3];
int tot;
PROP *pp;
tot += input[i];
if (tot) {
printf("You asked for %d houses for $%d\n", tot, tot * price);
- if (getyn("Is that ok? ", yn) == 0) {
+ if (getyn("Is that ok? ") == 0) {
cur_p->money -= tot * price;
for (tot = i = 0; i < mp->num_in; i++)
mp->sq[i]->desc->houses = temp[i];
/*
* This routine sells houses.
*/
-sell_houses() {
+void
+sell_houses()
+{
- reg int num_mon;
- reg MON *mp;
- reg OWN *op;
+ int num_mon;
+ MON *mp;
+ OWN *op;
bool good;
int p;
}
}
+static void
sell_h(mnp)
-MON *mnp; {
+MON *mnp;
+{
- reg int i;
- reg MON *mp;
- reg int price;
- shrt input[3],temp[3];
+ int i;
+ MON *mp;
+ int price;
+ short input[3],temp[3];
int tot;
PROP *pp;
tot += input[i];
if (tot) {
printf("You asked to sell %d houses for $%d\n",tot,tot * price);
- if (getyn("Is that ok? ", yn) == 0) {
+ if (getyn("Is that ok? ") == 0) {
cur_p->money += tot * price;
for (tot = i = 0; i < mp->num_in; i++)
mp->sq[i]->desc->houses = temp[i];
}
}
+static void
list_cur(mp)
-reg MON *mp; {
+MON *mp;
+{
- reg int i;
- reg SQUARE *sqp;
+ int i;
+ SQUARE *sqp;
for (i = 0; i < mp->num_in; i++) {
sqp = mp->sq[i];
-/* $NetBSD: initdeck.c,v 1.4 1997/03/29 20:42:23 thorpej Exp $ */
+/* $NetBSD: initdeck.c,v 1.5 1997/10/12 17:45:12 christos Exp $ */
/*
* Copyright (c) 1980, 1993
* SUCH DAMAGE.
*/
+#include <sys/cdefs.h>
#ifndef lint
-static char copyright[] =
-"@(#) Copyright (c) 1980, 1993\n\
- The Regents of the University of California. All rights reserved.\n";
+__COPYRIGHT("@(#) Copyright (c) 1980, 1993\n\
+ The Regents of the University of California. All rights reserved.\n");
#endif /* not lint */
#ifndef lint
#if 0
static char sccsid[] = "@(#)initdeck.c 8.1 (Berkeley) 5/31/93";
#else
-static char rcsid[] = "$NetBSD: initdeck.c,v 1.4 1997/03/29 20:42:23 thorpej Exp $";
+__RCSID("$NetBSD: initdeck.c,v 1.5 1997/10/12 17:45:12 christos Exp $");
#endif
#endif /* not lint */
-# include <stdio.h>
-# include "deck.h"
+#include <stdio.h>
+#include <stdlib.h>
+#include "deck.h"
/*
* This program initializes the card files for monopoly.
char *infile = "cards.inp", /* input file */
*outfile = "cards.pck"; /* "packed" file */
-extern long ftell();
-extern char *calloc();
-
DECK deck[2];
FILE *inf, *outf;
+/* initdeck.c */
+int main __P((int, char *[]));
+static void getargs __P((int, char *[]));
+static void count __P((void));
+static void putem __P((void));
+
+int
main(ac, av)
int ac;
char *av[]; {
exit(0);
}
+static void
getargs(ac, av)
int ac;
-char *av[]; {
+char *av[];
+{
if (ac > 1)
infile = av[1];
/*
* count the cards
*/
-count() {
+static void
+count()
+{
reg bool newline;
reg DECK *in_deck;
/*
* put strings in the file
*/
-putem() {
+static void
+putem()
+{
reg bool newline;
reg DECK *in_deck;
-/* $NetBSD: jail.c,v 1.3 1995/03/23 08:34:44 cgd Exp $ */
+/* $NetBSD: jail.c,v 1.4 1997/10/12 17:45:14 christos Exp $ */
/*
* Copyright (c) 1980, 1993
* SUCH DAMAGE.
*/
+#include <sys/cdefs.h>
#ifndef lint
#if 0
static char sccsid[] = "@(#)jail.c 8.1 (Berkeley) 5/31/93";
#else
-static char rcsid[] = "$NetBSD: jail.c,v 1.3 1995/03/23 08:34:44 cgd Exp $";
+__RCSID("$NetBSD: jail.c,v 1.4 1997/10/12 17:45:14 christos Exp $");
#endif
#endif /* not lint */
-# include "monop.ext"
+#include "monop.ext"
/*
* This routine uses a get-out-of-jail-free card to get the
* player out of jail.
*/
-card() {
+void
+card()
+{
if (cur_p->loc != JAIL) {
printf("But you're not IN Jail\n");
* This routine returns the players get-out-of-jail-free card
* to a deck.
*/
+void
ret_card(plr)
-reg PLAY *plr; {
+PLAY *plr;
+{
plr->num_gojf--;
if (CC_D.gojf_used)
/*
* This routine deals with paying your way out of jail.
*/
-pay() {
+void
+pay()
+{
if (cur_p->loc != JAIL) {
printf("But you're not IN Jail\n");
/*
* This routine deals with a move in jail
*/
+int
move_jail(r1, r2)
-reg int r1, r2; {
+int r1, r2;
+{
if (r1 != r2) {
printf("Sorry, that doesn't get you out\n");
goto moveit;
}
}
-printturn() {
+
+void
+printturn()
+{
if (cur_p->loc != JAIL)
return;
-/* $NetBSD: misc.c,v 1.5 1997/03/29 20:42:24 thorpej Exp $ */
+/* $NetBSD: misc.c,v 1.6 1997/10/12 17:45:15 christos Exp $ */
/*
* Copyright (c) 1980, 1993
* SUCH DAMAGE.
*/
+#include <sys/cdefs.h>
#ifndef lint
#if 0
static char sccsid[] = "@(#)misc.c 8.1 (Berkeley) 5/31/93";
#else
-static char rcsid[] = "$NetBSD: misc.c,v 1.5 1997/03/29 20:42:24 thorpej Exp $";
+__RCSID("$NetBSD: misc.c,v 1.6 1997/10/12 17:45:15 christos Exp $");
#endif
#endif /* not lint */
* This routine executes a truncated set of commands until a
* "yes or "no" answer is gotten.
*/
+int
getyn(prompt)
-reg char *prompt; {
+char *prompt;
+{
- reg int com;
+ int com;
for (;;)
if ((com=getinp(prompt, yn)) < 2)
/*
* This routine tells the player if he's out of money.
*/
-notify() {
+void
+notify()
+{
if (cur_p->money < 0)
printf("That leaves you $%d in debt\n", -cur_p->money);
/*
* This routine switches to the next player
*/
-next_play() {
+void
+next_play()
+{
player = ++player % num_play;
cur_p = &play[player];
* This routine gets an integer from the keyboard after the
* given prompt.
*/
+int
get_int(prompt)
-reg char *prompt; {
+char *prompt;
+{
- reg int num;
- reg char *sp;
+ int num;
+ char *sp;
int c;
char buf[257];
/*
* This routine sets the monopoly flag from the list given.
*/
+void
set_ownlist(pl)
-int pl; {
+int pl;
+{
- reg int num; /* general counter */
- reg MON *orig; /* remember starting monop ptr */
- reg OWN *op; /* current owned prop */
+ int num; /* general counter */
+ MON *orig; /* remember starting monop ptr */
+ OWN *op; /* current owned prop */
OWN *orig_op; /* origianl prop before loop */
op = play[pl].own_list;
printf("num = %d\n");
#endif
if (orig == 0) {
- printf("panic: bad monopoly descriptor: orig = %d\n", orig);
+ printf("panic: bad monopoly descriptor: orig = %p\n", orig);
printf("player # %d\n", pl+1);
printhold(pl);
- printf("orig_op = %d\n", orig_op);
+ printf("orig_op = %p\n", orig_op);
printf("orig_op->sqr->type = %d (PRPTY)\n", op->sqr->type);
- printf("orig_op->next = %d\n", op->next);
- printf("orig_op->sqr->desc = %d\n", op->sqr->desc);
- printf("op = %d\n", op);
+ printf("orig_op->next = %p\n", op->next);
+ printf("orig_op->sqr->desc = %p\n", op->sqr->desc);
+ printf("op = %p\n", op);
printf("op->sqr->type = %d (PRPTY)\n", op->sqr->type);
- printf("op->next = %d\n", op->next);
- printf("op->sqr->desc = %d\n", op->sqr->desc);
+ printf("op->next = %p\n", op->next);
+ printf("op->sqr->desc = %p\n", op->sqr->desc);
printf("num = %d\n", num);
}
#ifdef DEBUG
/*
* This routine sets things up as if it is a new monopoly
*/
+void
is_monop(mp, pl)
-reg MON *mp;
-int pl; {
+MON *mp;
+int pl;
+{
- reg char *sp;
- reg int i;
+ int i;
mp->owner = pl;
mp->num_own = mp->num_in;
/*
* This routine sets things up as if it is no longer a monopoly
*/
+void
isnot_monop(mp)
-reg MON *mp; {
+MON *mp;
+{
- reg char *sp;
- reg int i;
+ int i;
mp->owner = -1;
for (i = 0; i < mp->num_in; i++)
/*
* This routine gives a list of the current player's routine
*/
-list() {
+void
+list()
+{
printhold(player);
}
/*
* This routine gives a list of a given players holdings
*/
-list_all() {
+void
+list_all()
+{
- reg int pl;
+ int pl;
while ((pl=getinp("Whose holdings do you want to see? ", name_list)) < num_play)
printhold(pl);
* This routine gives the players a chance before it exits.
*/
void
-quit() {
+quit()
+{
putchar('\n');
- if (getyn("Do you all really want to quit? ", yn) == 0)
+ if (getyn("Do you all really want to quit? ") == 0)
exit(0);
- signal(SIGINT, quit);
-}
-/*
- * This routine copies one structure to another
- */
-cpy_st(s1, s2, size)
-reg int *s1, *s2, size; {
-
- size /= 2;
- while (size--)
- *s1++ = *s2++;
}
-/* $NetBSD: monop.c,v 1.3 1995/03/23 08:34:52 cgd Exp $ */
+/* $NetBSD: monop.c,v 1.4 1997/10/12 17:45:16 christos Exp $ */
/*
* Copyright (c) 1980, 1993
* SUCH DAMAGE.
*/
+#include <sys/cdefs.h>
#ifndef lint
-static char copyright[] =
-"@(#) Copyright (c) 1980, 1993\n\
- The Regents of the University of California. All rights reserved.\n";
+__COPYRIGHT("@(#) Copyright (c) 1980, 1993\n\
+ The Regents of the University of California. All rights reserved.\n");
#endif /* not lint */
#ifndef lint
#if 0
static char sccsid[] = "@(#)monop.c 8.1 (Berkeley) 5/31/93";
#else
-static char rcsid[] = "$NetBSD: monop.c,v 1.3 1995/03/23 08:34:52 cgd Exp $";
+__RCSID("$NetBSD: monop.c,v 1.4 1997/10/12 17:45:16 christos Exp $");
#endif
#endif /* not lint */
-# include "monop.def"
+#include <stdio.h>
+#include <signal.h>
+#include <stdlib.h>
+#include <unistd.h>
+#include "monop.def"
+
+int main __P((int, char *[]));
+static void getplayers __P((void));
+static void init_players __P((void));
+static void init_monops __P((void));
+static void do_quit __P((int));
/*
* This program implements a monopoly game
*/
+int
main(ac, av)
-reg int ac;
-reg char *av[]; {
+int ac;
+char *av[]; {
srand(getpid());
}
num_luck = sizeof lucky_mes / sizeof (char *);
init_decks();
- signal(2, quit);
+ signal(2, do_quit);
for (;;) {
printf("\n%s (%d) (cash $%d) on %s\n", cur_p->name, player + 1,
cur_p->money, board[cur_p->loc].name);
execute(getinp("-- Command: ", comlist));
}
}
+
+/*ARGSUSED*/
+static void
+do_quit(n)
+ int n;
+{
+ quit();
+}
/*
* This routine gets the names of the players
*/
-getplayers() {
+static void
+getplayers()
+{
- reg char *sp;
- reg int i, j;
+ char *sp;
+ int i, j;
char buf[257];
blew_it:
else
printf("\"done\" is a reserved word. Please try again\n");
for (i = 0; i < num_play; i++)
- cfree(play[i].name);
- cfree(play);
+ free(play[i].name);
+ free(play);
goto blew_it;
}
}
/*
* This routine figures out who goes first
*/
-init_players() {
+static void
+init_players()
+{
- reg int i, rl, cur_max;
- bool over;
- int max_pl;
+ int i, rl, cur_max;
+ bool over = 0;
+ int max_pl = 0;
again:
putchar('\n');
/*
* This routine initalizes the monopoly structures.
*/
-init_monops() {
+static void
+init_monops()
+{
- reg MON *mp;
- reg int i;
+ MON *mp;
+ int i;
for (mp = mon; mp < &mon[N_MON]; mp++) {
mp->name = mp->not_m;
-/* $NetBSD: monop.def,v 1.3 1995/03/23 08:34:54 cgd Exp $ */
+/* $NetBSD: monop.def,v 1.4 1997/10/12 17:45:18 christos Exp $ */
/*-
* Copyright (c) 1980, 1993
* @(#)monop.def 5.5 (Berkeley) 5/31/93
*/
-# include "monop.h"
# include "deck.h"
+# include "monop.h"
bool fixing, /* set if fixing up debt */
trading, /* set if in process of trading */
num_play, /* current number of players */
num_doub, /* # of doubles current player rolled */
/* # of "got lucky" messages */
- num_luck = sizeof lucky_mes / sizeof (char *),
- /* list of command functions */
- buy_houses(), card(), do_move(), do_move(), list(), list_all(),
- mortgage(), pay(), printboard(), quit(), resign(), restore(),
- rub(), save(), sell_houses(), trade(),
- unmortgage(), where(),
- (*func[])() = { /* array of function calls for commands */
+ num_luck = sizeof lucky_mes / sizeof (char *);
+
+/* list of command functions */
+void (*func[]) __P((void)) = { /* array of function calls for commands */
quit, /* quit game |* 0 *| */
printboard, /* print board |* 1 *| */
where, /* where players are |* 2 *| */
-/* $NetBSD: monop.ext,v 1.2 1995/03/23 08:34:58 cgd Exp $ */
+/* $NetBSD: monop.ext,v 1.3 1997/10/12 17:45:19 christos Exp $ */
/*-
* Copyright (c) 1980, 1993
* @(#)monop.ext 5.4 (Berkeley) 5/31/93
*/
-# include "monop.h"
-# include "deck.h"
+#include "deck.h"
+#include "monop.h"
extern bool trading, spec, fixing, told_em;
extern char *yn[], *comlist[], *name_list[], *lucky_mes[];
-extern int num_play, player, num_doub, num_luck, (*func[])();
+extern int num_play, player, num_doub, num_luck;
+
+extern void (*func[]) __P((void));
extern DECK deck[2];
-/* $NetBSD: monop.h,v 1.5 1997/03/29 20:42:25 thorpej Exp $ */
+/* $NetBSD: monop.h,v 1.6 1997/10/12 17:45:20 christos Exp $ */
/*
* Copyright (c) 1980, 1993
# include <stdlib.h>
# include <string.h>
-# define reg register
-#ifdef __CHAR_UNSIGNED__
-# define shrt short
-#else
-# define shrt char
-#endif
# define bool char
-# define unsgn unsigned
# define TRUE (1)
# define FALSE (0)
struct sqr_st { /* structure for square */
char *name; /* place name */
- shrt owner; /* owner number */
- shrt type; /* place type */
+ short owner; /* owner number */
+ short type; /* place type */
struct prp_st *desc; /* description struct */
int cost; /* cost */
};
struct mon_st { /* monopoly description structure */
char *name; /* monop. name (color) */
- shrt owner; /* owner of monopoly */
- shrt num_in; /* # in monopoly */
- shrt num_own; /* # owned (-1: not poss. monop)*/
- shrt h_cost; /* price of houses */
+ short owner; /* owner of monopoly */
+ short num_in; /* # in monopoly */
+ short num_own; /* # owned (-1: not poss. monop)*/
+ short h_cost; /* price of houses */
char *not_m; /* name if not monopoly */
char *mon_n; /* name if a monopoly */
- char sqnums[3]; /* Square numbers (used to init)*/
+ unsigned char sqnums[3]; /* Square numbers (used to init)*/
SQUARE *sq[3]; /* list of squares in monop */
};
struct prp_st { /* property description structure */
bool morg; /* set if mortgaged */
bool monop; /* set if monopoly */
- shrt square; /* square description */
- shrt houses; /* number of houses */
+ short square; /* square description */
+ short houses; /* number of houses */
MON *mon_desc; /* name of color */
int rent[6]; /* rents */
};
struct plr_st { /* player description structure */
char *name; /* owner name */
- shrt num_gojf; /* # of get-out-of-jail-free's */
- shrt num_rr; /* # of railroads owned */
- shrt num_util; /* # of water works/elec. co. */
- shrt loc; /* location on board */
- shrt in_jail; /* count of turns in jail */
+ short num_gojf; /* # of get-out-of-jail-free's */
+ short num_rr; /* # of railroads owned */
+ short num_util; /* # of water works/elec. co. */
+ short loc; /* location on board */
+ short in_jail; /* count of turns in jail */
int money; /* amount of money */
OWN *own_list; /* start of propery list */
};
typedef struct prp_st RR_S;
typedef struct prp_st UTIL_S;
-int cc(), chance(), lux_tax(), goto_jail(), inc_tax();
+
+/* cards.c */
+void init_decks __P((void));
+void get_card __P((DECK *));
+
+/* execute.c */
+void execute __P((int));
+void do_move __P((void));
+void move __P((int));
+void save __P((void));
+void restore __P((void));
+int rest_f __P((char *));
+
+/* getinp.c */
+int getinp __P((char *, char *[]));
+
+/* houses.c */
+void buy_houses __P((void));
+void sell_houses __P((void));
+
+/* jail.c */
+void card __P((void));
+void ret_card __P((PLAY *));
+void pay __P((void));
+int move_jail __P((int, int ));
+void printturn __P((void));
+
+/* misc.c */
+int getyn __P((char *));
+void notify __P((void));
+void next_play __P((void));
+int get_int __P((char *));
+void set_ownlist __P((int));
+void is_monop __P((MON *, int));
+void isnot_monop __P((MON *));
+void list __P((void));
+void list_all __P((void));
+void quit __P((void));
+
+/* morg.c */
+void mortgage __P((void));
+void unmortgage __P((void));
+void force_morg __P((void));
+
+/* print.c */
+void printboard __P((void));
+void where __P((void));
+void printsq __P((int, bool));
+void printhold __P((int));
+
+/* prop.c */
+void buy __P((int, SQUARE *));
+void add_list __P((int, OWN **, int));
+void del_list __P((int, OWN **, short));
+void bid __P((void));
+int prop_worth __P((PLAY *));
+
+/* rent.c */
+void rent __P((SQUARE *));
+
+/* roll.c */
+int roll __P((int, int));
+
+/* spec.c */
+void inc_tax __P((void));
+void goto_jail __P((void));
+void lux_tax __P((void));
+void cc __P((void));
+void chance __P((void));
+
+/* trade.c */
+void trade __P((void));
+void resign __P((void));
-/* $NetBSD: morg.c,v 1.4 1995/03/23 08:35:02 cgd Exp $ */
+/* $NetBSD: morg.c,v 1.5 1997/10/12 17:45:21 christos Exp $ */
/*
* Copyright (c) 1980, 1993
* SUCH DAMAGE.
*/
+#include <sys/cdefs.h>
#ifndef lint
#if 0
static char sccsid[] = "@(#)morg.c 8.1 (Berkeley) 5/31/93";
#else
-static char rcsid[] = "$NetBSD: morg.c,v 1.4 1995/03/23 08:35:02 cgd Exp $";
+__RCSID("$NetBSD: morg.c,v 1.5 1997/10/12 17:45:21 christos Exp $");
#endif
#endif /* not lint */
0
};
-static shrt square[MAX_PRP+2];
+static short square[MAX_PRP+2];
static int num_good,got_houses;
+
+static int set_mlist __P((void));
+static void m __P((int));
+static int set_umlist __P((void));
+static void unm __P((int));
+static void fix_ex __P((int));
+
/*
* This routine is the command level response the mortgage command.
* it gets the list of mortgageable property and asks which are to
* be mortgaged.
*/
-mortgage() {
+void
+mortgage()
+{
- reg int prop;
+ int prop;
for (;;) {
if (set_mlist() == 0) {
if (prop == num_good)
return;
m(square[prop]);
- notify(cur_p);
+ notify();
}
}
/*
* This routine sets up the list of mortgageable property
*/
-set_mlist() {
+static int
+set_mlist()
+{
- reg OWN *op;
+ OWN *op;
num_good = 0;
for (op = cur_p->own_list; op; op = op->next)
/*
* This routine actually mortgages the property.
*/
+static void
m(prop)
-reg int prop; {
+int prop;
+{
- reg int price;
+ int price;
price = board[prop].cost/2;
board[prop].desc->morg = TRUE;
* command. It gets the list of mortgaged property and asks which are
* to be unmortgaged.
*/
-unmortgage() {
+void
+unmortgage()
+{
- reg int prop;
+ int prop;
for (;;) {
if (set_umlist() == 0) {
/*
* This routine sets up the list of mortgaged property
*/
-set_umlist() {
+static int
+set_umlist()
+{
- reg OWN *op;
+ OWN *op;
num_good = 0;
for (op = cur_p->own_list; op; op = op->next)
/*
* This routine actually unmortgages the property
*/
+static void
unm(prop)
-reg int prop; {
+int prop;
+{
- reg int price;
+ int price;
price = board[prop].cost/2;
board[prop].desc->morg = FALSE;
* This routine forces the indebted player to fix his
* financial woes.
*/
-force_morg() {
+void
+force_morg()
+{
told_em = fixing = TRUE;
while (cur_p->money <= 0)
/*
* This routine is a special execute for the force_morg routine
*/
+static void
fix_ex(com_num)
-reg int com_num; {
+int com_num;
+{
told_em = FALSE;
(*func[com_num])();
-/* $NetBSD: print.c,v 1.3 1995/03/23 08:35:05 cgd Exp $ */
+/* $NetBSD: print.c,v 1.4 1997/10/12 17:45:22 christos Exp $ */
/*
* Copyright (c) 1980, 1993
* SUCH DAMAGE.
*/
+#include <sys/cdefs.h>
#ifndef lint
#if 0
static char sccsid[] = "@(#)print.c 8.1 (Berkeley) 5/31/93";
#else
-static char rcsid[] = "$NetBSD: print.c,v 1.3 1995/03/23 08:35:05 cgd Exp $";
+__RCSID("$NetBSD: print.c,v 1.4 1997/10/12 17:45:22 christos Exp $");
#endif
#endif /* not lint */
# include "monop.ext"
-static char buf[80], /* output buffer */
- *header = "Name Own Price Mg # Rent";
+static char *header = "Name Own Price Mg # Rent";
+
+static void printmorg __P((SQUARE *));
/*
* This routine prints out the current board
*/
-printboard() {
+void
+printboard()
+{
- reg int i;
+ int i;
printf("%s\t%s\n", header, header);
for (i = 0; i < N_SQRS/2; i++) {
/*
* This routine lists where each player is.
*/
-where() {
+void
+where()
+{
- reg int i;
- char *bsp;
+ int i;
printf("%s Player\n", header);
for (i = 0; i < num_play; i++) {
/*
* This routine prints out an individual square
*/
+void
printsq(sqn, eoln)
int sqn;
-reg bool eoln; {
+bool eoln;
+{
- reg int rnt;
- reg PROP *pp;
- reg SQUARE *sqp;
- int i;
+ int rnt;
+ PROP *pp;
+ SQUARE *sqp;
sqp = &board[sqn];
printf("%-10.10s", sqp->name);
case GOTO_J:
case LUX_TAX:
case IN_JAIL:
-spec:
if (!eoln)
printf(" ");
break;
/*
* This routine prints out the mortgage flag.
*/
+static void
printmorg(sqp)
-reg SQUARE *sqp; {
+SQUARE *sqp;
+{
if (sqp->desc->morg)
printf(" * ");
/*
* This routine lists the holdings of the player given
*/
+void
printhold(pl)
-reg int pl; {
+int pl;
+{
- reg OWN *op;
- reg PLAY *pp;
- char *bsp;
+ OWN *op;
+ PLAY *pp;
pp = &play[pl];
printf("%s's (%d) holdings (Total worth: $%d):\n", name_list[pl], pl+1,
-/* $NetBSD: prop.c,v 1.3 1995/03/23 08:35:06 cgd Exp $ */
+/* $NetBSD: prop.c,v 1.4 1997/10/12 17:45:23 christos Exp $ */
/*
* Copyright (c) 1980, 1993
* SUCH DAMAGE.
*/
+#include <sys/cdefs.h>
#ifndef lint
#if 0
static char sccsid[] = "@(#)prop.c 8.1 (Berkeley) 5/31/93";
#else
-static char rcsid[] = "$NetBSD: prop.c,v 1.3 1995/03/23 08:35:06 cgd Exp $";
+__RCSID("$NetBSD: prop.c,v 1.4 1997/10/12 17:45:23 christos Exp $");
#endif
#endif /* not lint */
-# include "monop.ext"
+#include <stdlib.h>
+#include "monop.ext"
-extern char *calloc();
+static int value __P((SQUARE *));
/*
* This routine deals with buying property, setting all the
* appropriate flags.
*/
+void
buy(player, sqrp)
-reg int player;
-reg SQUARE *sqrp; {
+int player;
+SQUARE *sqrp;
+{
trading = FALSE;
sqrp->owner = player;
/*
* This routine adds an item to the list.
*/
+void
add_list(plr, head, op_sqr)
int plr;
OWN **head;
-int op_sqr; {
+int op_sqr;
+{
- reg int val;
- reg OWN *tp, *last_tp;
- MON *mp;
+ int val;
+ OWN *tp, *last_tp;
OWN *op;
op = (OWN *)calloc(1, sizeof (OWN));
last_tp = NULL;
for (tp = *head; tp && value(tp->sqr) < val; tp = tp->next)
if (val == value(tp->sqr)) {
- cfree(op);
+ free(op);
return;
}
else
/*
* This routine deletes property from the list.
*/
+void
del_list(plr, head, op_sqr)
int plr;
OWN **head;
-shrt op_sqr; {
+short op_sqr;
+{
- reg int i;
- reg OWN *op, *last_op;
+ OWN *op, *last_op;
switch (board[op_sqr].type) {
case PRPTY:
*head = op->next;
else {
last_op->next = op->next;
- cfree(op);
+ free(op);
}
}
/*
* This routine calculates the value for sorting of the
* given square.
*/
+static int
value(sqp)
-reg SQUARE *sqp; {
+SQUARE *sqp;
+{
- reg int sqr;
+ int sqr;
sqr = sqnum(sqp);
switch (sqp->type) {
* This routine accepts bids for the current peice
* of property.
*/
-bid() {
+void
+bid()
+{
static bool in[MAX_PL];
- reg int i, num_in, cur_max;
+ int i, num_in, cur_max;
char buf[80];
int cur_bid;
* This routine calculates the value of the property
* of given player.
*/
+int
prop_worth(plp)
-reg PLAY *plp; {
+PLAY *plp;
+{
- reg OWN *op;
- reg int worth;
+ OWN *op;
+ int worth;
worth = 0;
for (op = plp->own_list; op; op = op->next) {
-/* $NetBSD: rent.c,v 1.3 1995/03/23 08:35:11 cgd Exp $ */
+/* $NetBSD: rent.c,v 1.4 1997/10/12 17:45:24 christos Exp $ */
/*
* Copyright (c) 1980, 1993
* SUCH DAMAGE.
*/
+#include <sys/cdefs.h>
#ifndef lint
#if 0
static char sccsid[] = "@(#)rent.c 8.1 (Berkeley) 5/31/93";
#else
-static char rcsid[] = "$NetBSD: rent.c,v 1.3 1995/03/23 08:35:11 cgd Exp $";
+__RCSID("$NetBSD: rent.c,v 1.4 1997/10/12 17:45:24 christos Exp $");
#endif
#endif /* not lint */
-# include "monop.ext"
+#include "monop.ext"
/*
* This routine has the player pay rent
*/
+void
rent(sqp)
-reg SQUARE *sqp; {
+SQUARE *sqp;
+{
- reg int rnt;
- reg PROP *pp;
+ int rnt = 0;
+ PROP *pp;
PLAY *plp;
plp = &play[sqp->owner];
-/* $NetBSD: roll.c,v 1.5 1995/03/23 08:35:13 cgd Exp $ */
+/* $NetBSD: roll.c,v 1.6 1997/10/12 17:45:25 christos Exp $ */
/*
* Copyright (c) 1980, 1993
* SUCH DAMAGE.
*/
+#include <sys/cdefs.h>
#ifndef lint
#if 0
static char sccsid[] = "@(#)roll.c 8.1 (Berkeley) 5/31/93";
#else
-static char rcsid[] = "$NetBSD: roll.c,v 1.5 1995/03/23 08:35:13 cgd Exp $";
+__RCSID("$NetBSD: roll.c,v 1.6 1997/10/12 17:45:25 christos Exp $");
#endif
#endif /* not lint */
+#include "monop.ext"
#include <stdlib.h>
/*
# if defined(pdp11)
# define MAXRAND 32767L
+int
roll(ndie, nsides)
-int ndie, nsides; {
+int ndie, nsides;
+{
- reg long tot;
- reg unsigned n, r;
+ long tot;
+ unsigned n, r;
tot = 0;
n = ndie;
# else
+int
roll(ndie, nsides)
-reg int ndie, nsides; {
+int ndie, nsides; {
- reg int tot, r;
- reg double num_sides;
+ int tot, r;
+ double num_sides;
num_sides = nsides;
tot = 0;
-/* $NetBSD: spec.c,v 1.3 1995/03/23 08:35:16 cgd Exp $ */
+/* $NetBSD: spec.c,v 1.4 1997/10/12 17:45:26 christos Exp $ */
/*
* Copyright (c) 1980, 1993
* SUCH DAMAGE.
*/
+#include <sys/cdefs.h>
#ifndef lint
#if 0
static char sccsid[] = "@(#)spec.c 8.1 (Berkeley) 5/31/93";
#else
-static char rcsid[] = "$NetBSD: spec.c,v 1.3 1995/03/23 08:35:16 cgd Exp $";
+__RCSID("$NetBSD: spec.c,v 1.4 1997/10/12 17:45:26 christos Exp $");
#endif
#endif /* not lint */
"10%", "ten percent", "%", "$200", "200", 0
};
-inc_tax() { /* collect income tax */
+void
+inc_tax()
+{ /* collect income tax */
- reg int worth, com_num;
+ int worth, com_num;
com_num = getinp("Do you wish to lose 10%% of your total worth or $200? ", perc);
worth = cur_p->money + prop_worth(cur_p);
if (worth == 200)
lucky("\nIt makes no difference! ");
}
-goto_jail() { /* move player to jail */
+
+void
+goto_jail()
+{ /* move player to jail */
cur_p->loc = JAIL;
}
-lux_tax() { /* landing on luxury tax */
+
+void
+lux_tax()
+{ /* landing on luxury tax */
printf("You lose $75\n");
cur_p->money -= 75;
}
-cc() { /* draw community chest card */
+
+void
+cc()
+{ /* draw community chest card */
get_card(&CC_D);
}
-chance() { /* draw chance card */
+
+void
+chance()
+{ /* draw chance card */
get_card(&CH_D);
}
-/* $NetBSD: trade.c,v 1.3 1995/03/23 08:35:19 cgd Exp $ */
+/* $NetBSD: trade.c,v 1.4 1997/10/12 17:45:27 christos Exp $ */
/*
* Copyright (c) 1980, 1993
* SUCH DAMAGE.
*/
+#include <sys/cdefs.h>
#ifndef lint
#if 0
static char sccsid[] = "@(#)trade.c 8.1 (Berkeley) 5/31/93";
#else
-static char rcsid[] = "$NetBSD: trade.c,v 1.3 1995/03/23 08:35:19 cgd Exp $";
+__RCSID("$NetBSD: trade.c,v 1.4 1997/10/12 17:45:27 christos Exp $");
#endif
#endif /* not lint */
-# include "monop.ext"
+#include "monop.ext"
struct trd_st { /* how much to give to other player */
int trader; /* trader number */
typedef struct trd_st TRADE;
-static char *list[MAX_PRP+2];
+static char *plist[MAX_PRP+2];
static int used[MAX_PRP];
static TRADE trades[2];
-trade() {
+static void get_list __P((int, int ));
+static int set_list __P((OWN *));
+static void summate __P((void));
+static void do_trade __P((void));
+static void move_em __P((TRADE *, TRADE *));
- reg int tradee, i;
+void
+trade()
+{
+
+ int tradee, i;
trading = TRUE;
for (i = 0; i < 2; i++) {
* This routine gets the list of things to be trader for the
* player, and puts in the structure given.
*/
+static void
get_list(struct_no, play_no)
-int struct_no, play_no; {
+int struct_no, play_no;
+{
- reg int sn, pn;
- reg PLAY *pp;
+ int sn, pn;
+ PLAY *pp;
int numin, prop, num_prp;
OWN *op;
TRADE *tp;
numin = set_list(pp->own_list);
for (num_prp = numin; num_prp; ) {
prop = getinp("Which property do you wish to trade? ",
- list);
+ plist);
if (prop == numin)
break;
else if (used[prop])
/*
* This routine sets up the list of tradable property.
*/
+static int
set_list(the_list)
-reg OWN *the_list; {
+OWN *the_list;
+{
- reg int i;
- reg OWN *op;
+ int i;
+ OWN *op;
i = 0;
for (op = the_list; op; op = op->next)
if (!used[i])
- list[i++] = op->sqr->name;
- list[i++] = "done";
- list[i--] = 0;
+ plist[i++] = op->sqr->name;
+ plist[i++] = "done";
+ plist[i--] = 0;
return i;
}
/*
* This routine summates the trade.
*/
-summate() {
+static void
+summate()
+{
- reg bool some;
- reg int i;
- reg TRADE *tp;
+ bool some;
+ int i;
+ TRADE *tp;
OWN *op;
for (i = 0; i < 2; i++) {
/*
* This routine actually executes the trade.
*/
-do_trade() {
+static void
+do_trade()
+{
move_em(&trades[0], &trades[1]);
move_em(&trades[1], &trades[0]);
/*
* This routine does a switch from one player to another
*/
+static void
move_em(from, to)
-TRADE *from, *to; {
+TRADE *from, *to;
+{
- reg PLAY *pl_fr, *pl_to;
- reg OWN *op;
+ PLAY *pl_fr, *pl_to;
+ OWN *op;
pl_fr = &play[from->trader];
pl_to = &play[to->trader];
/*
* This routine lets a player resign
*/
-resign() {
+void
+resign()
+{
- reg int i, new_own;
- reg OWN *op;
+ int i, new_own;
+ OWN *op;
SQUARE *sqp;
if (cur_p->money <= 0) {
} while (new_own == player);
name_list[num_play] = "done";
}
- if (getyn("Do you really want to resign? ", yn) != 0)
+ if (getyn("Do you really want to resign? ") != 0)
return;
if (num_play == 1) {
printf("Then NOBODY wins (not even YOU!)\n");
for (i = player; i < num_play; i++) {
name_list[i] = name_list[i+1];
if (i + 1 < num_play)
- cpy_st(&play[i], &play[i+1], sizeof (PLAY));
+ play[i] = play[i+1];
}
name_list[num_play--] = 0;
for (i = 0; i < N_SQRS; i++)
git.ckatri.com / bsdgames-darwin.git / commitdiff