From af857c197b393612bf159ea798009c9b1bf5200a Mon Sep 17 00:00:00 2001 From: lukem Date: Fri, 10 Oct 1997 08:59:32 +0000 Subject: KNF & WARNSify, and only compile common_source once/* (compiles 25% faster) --- backgammon/common_source/Makefile | 12 + backgammon/common_source/allow.c | 46 +- backgammon/common_source/back.h | 68 ++- backgammon/common_source/backgammon.c | 757 ----------------------------- backgammon/common_source/board.c | 124 ++--- backgammon/common_source/check.c | 104 ++-- backgammon/common_source/fancy.c | 877 +++++++++++++++++----------------- backgammon/common_source/init.c | 42 +- backgammon/common_source/odds.c | 73 +-- backgammon/common_source/one.c | 132 ++--- backgammon/common_source/save.c | 196 ++++---- backgammon/common_source/subs.c | 389 ++++++++------- backgammon/common_source/table.c | 244 +++++----- 13 files changed, 1206 insertions(+), 1858 deletions(-) create mode 100644 backgammon/common_source/Makefile delete mode 100644 backgammon/common_source/backgammon.c (limited to 'backgammon/common_source') diff --git a/backgammon/common_source/Makefile b/backgammon/common_source/Makefile new file mode 100644 index 00000000..22006c12 --- /dev/null +++ b/backgammon/common_source/Makefile @@ -0,0 +1,12 @@ +# $NetBSD: Makefile,v 1.1 1997/10/10 08:59:40 lukem Exp $ + +LIB= common_source +SRCS= allow.c board.c check.c fancy.c init.c odds.c one.c save.c subs.c \ + table.c + +NOPROFILE= noprofile +NOPIC= nopic + +.include +LDADD= +DPADD= diff --git a/backgammon/common_source/allow.c b/backgammon/common_source/allow.c index b445be42..e3af4beb 100644 --- a/backgammon/common_source/allow.c +++ b/backgammon/common_source/allow.c @@ -1,4 +1,4 @@ -/* $NetBSD: allow.c,v 1.3 1995/03/21 15:05:24 cgd Exp $ */ +/* $NetBSD: allow.c,v 1.4 1997/10/10 08:59:41 lukem Exp $ */ /* * Copyright (c) 1980, 1993 @@ -33,41 +33,43 @@ * SUCH DAMAGE. */ +#include #ifndef lint #if 0 static char sccsid[] = "@(#)allow.c 8.1 (Berkeley) 5/31/93"; #else -static char rcsid[] = "$NetBSD: allow.c,v 1.3 1995/03/21 15:05:24 cgd Exp $"; +__RCSID("$NetBSD: allow.c,v 1.4 1997/10/10 08:59:41 lukem Exp $"); #endif #endif /* not lint */ #include "back.h" -movallow () { - - register int i, m, iold; - int r; +int +movallow() +{ + int i, m, iold; + int r; if (d0) swap; - m = (D0 == D1? 4: 2); + m = (D0 == D1 ? 4 : 2); for (i = 0; i < 4; i++) p[i] = bar; i = iold = 0; - while (i < m) { + while (i < m) { if (*offptr == 15) break; h[i] = 0; - if (board[bar]) { + if (board[bar]) { if (i == 1 || m == 4) - g[i] = bar+cturn*D1; + g[i] = bar + cturn * D1; else - g[i] = bar+cturn*D0; - if (r = makmove(i)) { + g[i] = bar + cturn * D0; + if ((r = makmove(i)) != 0) { if (d0 || m == 4) break; swap; - movback (i); + movback(i); if (i > iold) iold = i; for (i = 0; i < 4; i++) @@ -77,10 +79,10 @@ movallow () { i++; continue; } - if ((p[i] += cturn) == home) { + if ((p[i] += cturn) == home) { if (i > iold) iold = i; - if (m == 2 && i) { + if (m == 2 && i) { movback(i); p[i--] = bar; if (p[i] != bar) @@ -91,25 +93,25 @@ movallow () { if (d0 || m == 4) break; swap; - movback (i); + movback(i); for (i = 0; i < 4; i++) p[i] = bar; i = 0; continue; } if (i == 1 || m == 4) - g[i] = p[i]+cturn*D1; + g[i] = p[i] + cturn * D1; else - g[i] = p[i]+cturn*D0; - if (g[i]*cturn > home) { + g[i] = p[i] + cturn * D0; + if (g[i] * cturn > home) { if (*offptr >= 0) g[i] = home; else continue; } - if (board[p[i]]*cturn > 0 && (r = makmove(i)) == 0) + if (board[p[i]] * cturn > 0 && (r = makmove(i)) == 0) i++; } - movback (i); - return (iold > i? iold: i); + movback(i); + return (iold > i ? iold : i); } diff --git a/backgammon/common_source/back.h b/backgammon/common_source/back.h index b1be7582..4480aed4 100644 --- a/backgammon/common_source/back.h +++ b/backgammon/common_source/back.h @@ -1,4 +1,4 @@ -/* $NetBSD: back.h,v 1.5 1995/04/29 00:44:10 mycroft Exp $ */ +/* $NetBSD: back.h,v 1.6 1997/10/10 08:59:41 lukem Exp $ */ /* * Copyright (c) 1980, 1993 @@ -35,9 +35,16 @@ * @(#)back.h 8.1 (Berkeley) 5/31/93 */ -#include +#include +#include + +#include +#include +#include #include #include +#include +#include #define rnum(r) (random()%r) #define D0 dice[0] @@ -125,4 +132,59 @@ int curc; /* column position of cursor */ int begscr; /* 'beginning' of screen (not including board) */ -int getout(); /* function to exit backgammon cleanly */ +void addbuf __P((int)); +void backone __P((int)); +void bsect __P((int, int, int, int)); +void buflush __P((void)); +int canhit __P((int, int)); +int checkd __P((int)); +int checkmove __P((int)); +void clear __P((void)); +void clend __P((void)); +void cline __P((void)); +int count __P((void)); +void curmove __P((int, int)); +int dotable __P((char, int)); +void errexit __P((const char *)); +void fancyc __P((int)); +void fboard __P((void)); +void fixcol __P((int, int, int, int, int)); +void fixpos __P((int, int, int, int, int)); +void fixtty __P((struct termios *)); +void getarg __P((char ***)); +int getcaps __P((char *)); +void getmove __P((void)); +void getout __P((int)); +void gwrite __P((void)); +void init __P((void)); +int last __P((void)); +int main __P((int, char *[])); +int makmove __P((int)); +int movallow __P((void)); +void movback __P((int)); +void moverr __P((int)); +int movokay __P((int)); +void newline __P((void)); +void newpos __P((void)); +void nexturn __P((void)); +void norec __P((char *)); +void odds __P((int, int, int)); +void proll __P((void)); +int quit __P((void)); +int readc __P((void)); +void recover __P((char *)); +void refresh __P((void)); +void roll __P((void)); +int rsetbrd __P((void)); +void save __P((int)); +void strset __P((char *, char *)); +int text __P((char **)); +void tos __P((void)); +void wrboard __P((void)); +void wrbsub __P((void)); +void wrhit __P((int)); +void wrint __P((int)); +void writec __P((char)); +void writel __P((char *)); +void wrscore __P((void)); +int yorn __P((char)); diff --git a/backgammon/common_source/backgammon.c b/backgammon/common_source/backgammon.c deleted file mode 100644 index 97b8f19b..00000000 --- a/backgammon/common_source/backgammon.c +++ /dev/null @@ -1,757 +0,0 @@ -/* $NetBSD: backgammon.c,v 1.3 1995/03/21 15:05:31 cgd Exp $ */ - -/*- - * Copyright (c) 1991, 1993 - * The Regents of the University of California. All rights reserved. - * - * Redistribution and use in source and binary forms, with or without - * modification, are permitted provided that the following conditions - * are met: - * 1. Redistributions of source code must retain the above copyright - * notice, this list of conditions and the following disclaimer. - * 2. Redistributions in binary form must reproduce the above copyright - * notice, this list of conditions and the following disclaimer in the - * documentation and/or other materials provided with the distribution. - * 3. All advertising materials mentioning features or use of this software - * must display the following acknowledgement: - * This product includes software developed by the University of - * California, Berkeley and its contributors. - * 4. Neither the name of the University nor the names of its contributors - * may be used to endorse or promote products derived from this software - * without specific prior written permission. - * - * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND - * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE - * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE - * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE - * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL - * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS - * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) - * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT - * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY - * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF - * SUCH DAMAGE. - */ - -#ifndef lint -#if 0 -static char sccsid[] = "@(#)backgammon.c 8.1 (Berkeley) 5/31/93"; -#else -static char rcsid[] = "$NetBSD: backgammon.c,v 1.3 1995/03/21 15:05:31 cgd Exp $"; -#endif -#endif /* not lint */ - -/* -** The game of Backgammon -*/ - -#include - -#define WHITE 0 -#define BROWN 1 -#define NIL (-1) -#define MAXGMOV 10 -#define MAXIMOVES 1000 -#define RULES "/usr/games/lib/backrules" - -char level; /*'b'=beginner, 'i'=intermediate, 'e'=expert*/ - -int die1; -int die2; -int i; -int j; -int l; -int m; -int pflg = 1; -int nobroll = 0; -int count; -int imoves; -int goodmoves[MAXGMOV]; -int probmoves[MAXGMOV]; - -int brown[] = { /* brown position table */ - 0, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 5, - 0, 0, 0, 0, 3, 0, 5, 0, 0, 0, 0, 0, - 0, 0, 0, 0, 0, 0 -}; - -int white[] = { /* white position table */ - 0, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 5, - 0, 0, 0, 0, 3, 0, 5, 0, 0, 0, 0, 0, - 0, 0, 0, 0, 0, 0 -}; - -int probability[] = { - 0, 11, 12, 13, 14, 15, 16, - 06, 05, 04, 03, 02, 01 -}; - -struct { - int pos[4]; - int mov[4]; -} moves[MAXIMOVES]; - -main() -{ - int go[5], tvec[2]; - int k, n, pid, ret, rpid, t; - char s[100]; - - srand(time(0)); - go[5] = NIL; - fprintf(stdout, "Instructions? "); - gets(s); - if(*s == 'y') - instructions(); - putchar('\n'); - fprintf(stdout, "Opponent's level: b - beginner,\n"); - fprintf(stdout, "i - intermediate, e - expert? "); - level='e'; - gets(s); - if(*s == 'b') - level = 'b'; - else if(*s == 'i') - level = 'i'; - putchar('\n'); - fprintf(stdout, "You will play brown.\n\n"); - fprintf(stdout, "Would you like to roll your own dice? "); - gets(s); - putchar('\n'); - if(*s == 'y') - nobroll = 1; - fprintf(stdout, "Would you like to go first? "); - gets(s); - putchar('\n'); - if(*s == 'y') - goto nowhmove; -whitesmv: - roll(WHITE); - fprintf(stdout, "white rolls %d, %d\n", die1, die2); - fprintf(stdout, "white's move is:"); - if(nextmove(white, brown) == NIL) - goto nowhmove; - if(piececount(white, 0, 24) == 0){ - fprintf(stdout, "White wins"); - if(piececount(brown, 0, 6) != 0) - fprintf(stdout, " with a Backgammon!\n"); - else if (piececount(brown, 0, 24) == 24) - fprintf(stdout, " with a Gammon.\n"); - else - fprintf(stdout, ".\n"); - exit(0); - } -nowhmove: - if(pflg) - prtbrd(); - roll(BROWN); -retry: - fprintf(stdout, "\nYour roll is %d %d\n", die1, die2); - fprintf(stdout, "Move? "); - gets(s); - switch(*s) { - case '\0': /* empty line */ - fprintf(stdout, "Brown's move skipped.\n"); - goto whitesmv; - - case 'b': /* how many beared off? */ - fprintf(stdout, "Brown: %d\n", piececount(brown, 0, 24) - 15); - fprintf(stdout, "White: %d\n", piececount(white, 0, 24) - 15); - goto retry; - - case 'p': /* print board */ - prtbrd(); - goto retry; - - case 's': /* stop auto printing of board */ - pflg = 0; - goto retry; - - case 'r': /* resume auto printing */ - pflg = 1; - goto retry; - - case 'm': /* print possible moves */ - pmoves(); - goto retry; - - case 'q': /* i give up */ - exit(0); - - case '!': /* escape to Shell */ - if(s[1] != '\0') - system(s+1); - else if((pid = fork()) == 0) { - execl("/bin/sh", "sh", "-", 0); - fprintf(stderr, "back: cannot exec /bin/sh!\n"); - exit(2); - } - while((rpid = wait(&ret)) != pid && rpid != -1) - ; - goto retry; - - case '?': /* well, what can i do? */ - fprintf(stdout, " skip this move\n"); - fprintf(stdout, "b number beared off\n"); - fprintf(stdout, "p print board\n"); - fprintf(stdout, "q quit\n"); - fprintf(stdout, "r resume auto print of board\n"); - fprintf(stdout, "s stop auto print of board\n"); - fprintf(stdout, "! escape to Shell\n"); - goto retry; - } - n = sscanf(s,"%d%d%d%d%d",&go[0],&go[1],&go[2],&go[3],&go[4]); - if((die1 != die2 && n > 2) || n > 4){ - fprintf(stdout, "Too many moves.\n"); - goto retry; - } - go[n] = NIL; - if(*s=='-'){ - go[0]= -go[0]; - t=die1; - die1=die2; - die2=t; - } - for(k = 0; k < n; k++){ - if(0 <= go[k] && go[k] <= 24) - continue; - else{ - fprintf(stdout, "Move %d illegal.\n", go[k]); - goto retry; - } - } - if(play(brown, white, go)) - goto retry; - if(piececount(brown, 0, 24) == 0){ - fprintf(stdout, "Brown wins"); - if(piececount(white, 0, 6) != 0) - fprintf(stdout, " with a Backgammon.\n"); - else if(piececount(white, 0, 24) == 24) - fprintf(stdout, " with a gammon.\n"); - else - fprintf(stdout, ".\n"); - exit(0); - } - goto whitesmv; -} - -play(player,playee,pos) -int *player,*playee,pos[]; -{ - int k, n, die, ipos; - - for(k=0; k < player[0]; k++){ /*blots on player[0] must be moved first*/ - if(pos[k] == NIL) - break; - if(pos[k] != 0){ - fprintf(stdout, "Stone on bar must be moved first.\n"); - return(NIL); - } - } - for(k = 0; (ipos=pos[k]) != NIL; k++){ - die = k?die2:die1; - n = 25-ipos-die; - if(player[ipos] == 0) - goto badmove; - if(n > 0 && playee[n] >= 2) - goto badmove; - if(n <= 0){ - if(piececount(player,0,18) != 0) - goto badmove; - if((ipos+die) != 25 && piececount(player,19,24-die)!=0) - goto badmove; - } - player[ipos]--; - player[ipos+die]++; - } - for(k = 0; pos[k] != NIL; k++){ - die = k?die2:die1; - n = 25-pos[k]-die; - if(n>0 && playee[n]==1){ - playee[n]=0; - playee[0]++; - } - } - return(0); - -badmove: - fprintf(stdout, "Move %d illegal.\n", ipos); - while(k--){ - die=k?die2:die1; - player[pos[k]]++; - player[pos[k]+die]--; - } - return(NIL); -} -nextmove(player,playee) -int *player,*playee; -{ - int k; - - imoves=0; - movegen(player,playee); - if(die1!=die2){ - k=die1; - die1=die2; - die2=k; - movegen(player,playee); - } - if(imoves==0){ - fprintf(stdout, "no move possible.\n"); - return(NIL); - } - k=strategy(player,playee); /*select kth possible move*/ - prtmov(k); - update(player,playee,k); - return(0); -} -prtmov(k) -int k; -{ - int n; - - if(k == NIL) - fprintf(stdout, "No move possible\n"); - else for(n = 0; n < 4; n++){ - if(moves[k].pos[n] == NIL) - break; - fprintf(stdout, " %d, %d",25-moves[k].pos[n],moves[k].mov[n]); - } - fprintf(stdout, "\n"); -} -update(player,playee,k) -int *player,*playee,k; -{ - int n,t; - - for(n = 0; n < 4; n++){ - if(moves[k].pos[n] == NIL) - break; - player[moves[k].pos[n]]--; - player[moves[k].pos[n]+moves[k].mov[n]]++; - t=25-moves[k].pos[n]-moves[k].mov[n]; - if(t>0 && playee[t]==1){ - playee[0]++; - playee[t]--; - } - } -} -piececount(player,startrow,endrow) -int *player,startrow,endrow; -{ - int sum; - - sum=0; - while(startrow <= endrow) - sum += player[startrow++]; - return(sum); -} -pmoves() -{ - int i1, i2; - - fprintf(stdout, "Possible moves are:\n"); - for(i1 = 0; i1 < imoves; i1++){ - fprintf(stdout, "\n%d",i1); - for (i2 = 0; i2<4; i2++){ - if(moves[i1].pos[i2] == NIL) - break; - fprintf(stdout, "%d, %d",moves[i1].pos[i2],moves[i1].mov[i2]); - } - } - fprintf(stdout, "\n"); -} - -roll(who) -{ - register n; - char s[10]; - - if(who == BROWN && nobroll) { - fprintf(stdout, "Roll? "); - gets(s); - n = sscanf(s, "%d%d", &die1, &die2); - if(n != 2 || die1 < 1 || die1 > 6 || die2 < 1 || die2 > 6) - fprintf(stdout, "Illegal - I'll do it!\n"); - else - return; - } - die1 = ((rand()>>8) % 6) + 1; - die2 = ((rand()>>8) % 6) + 1; -} - -movegen(mover,movee) -int *mover,*movee; -{ - int k; - - for(i = 0; i <= 24; i++){ - count = 0; - if(mover[i] == 0) - continue; - if((k=25-i-die1) > 0 && movee[k] >= 2) - if(mover[0] > 0) - break; - else - continue; - if(k <= 0){ - if(piececount(mover, 0, 18) != 0) - break; - if((i+die1) != 25 && piececount(mover,19,i-1) != 0) - break; - } - mover[i]--; - mover[i+die1]++; - count = 1; - for(j = 0; j <= 24; j++){ - if(mover[j]==0) - continue; - if((k=25-j-die2) > 0 && movee[k] >= 2) - if(mover[0] > 0) - break; - else - continue; - if(k <= 0){ - if(piececount(mover,0,18) != 0) - break; - if((j+die2) != 25 && piececount(mover,19,j-1) != 0) - break; - } - mover[j]--; - mover[j+die2]++; - count = 2; - if(die1 != die2){ - moverecord(mover); - if(mover[0] > 0) - break; - else - continue; - } - for(l = 0; l <= 24; l++){ - if(mover[l] == 0) - continue; - if((k=25-l-die1) > 0 && movee[k] >= 2) - if(mover[0] > 0) - break; - else - continue; - if(k <= 0){ - if(piececount(mover, 0, 18) != 0) - break; - if((l+die2) != 25 && piececount(mover,19,l-1) != 0) - break; - } - mover[l]--; - mover[l+die1]++; - count=3; - for(m=0;m<=24;m++){ - if(mover[m]==0) - continue; - if((k=25-m-die1) >= 0 && movee[k] >= 2) - if(mover[0] > 0) - break; - else - continue; - if(k <= 0){ - if(piececount(mover,0,18) != 0) - break; - if((m+die2) != 25 && piececount(mover,19,m-1) != 0) - break; - } - count=4; - moverecord(mover); - if(mover[0] > 0) - break; - } - if(count == 3) - moverecord(mover); - else{ - mover[l]++; - mover[l+die1]--; - } - if(mover[0] > 0) - break; - } - if(count == 2) - moverecord(mover); - else{ - mover[j]++; - mover[j+die1]--; - } - if(mover[0] > 0) - break; - } - if(count == 1) - moverecord(mover); - else{ - mover[i]++; - mover[i+die1]--; - } - if(mover[0] > 0) - break; - } -} -moverecord(mover) -int *mover; -{ - int t; - - if(imoves < MAXIMOVES) { - for(t = 0; t <= 3; t++) - moves[imoves].pos[t] = NIL; - switch(count) { - case 4: - moves[imoves].pos[3]=m; - moves[imoves].mov[3]=die1; - - case 3: - moves[imoves].pos[2]=l; - moves[imoves].mov[2]=die1; - - case 2: - moves[imoves].pos[1]=j; - moves[imoves].mov[1]=die2; - - case 1: - moves[imoves].pos[0]=i; - moves[imoves].mov[0]=die1; - imoves++; - } - } - switch(count) { - case 4: - break; - - case 3: - mover[l]++; - mover[l+die1]--; - break; - - case 2: - mover[j]++; - mover[j+die2]--; - break; - - case 1: - mover[i]++; - mover[i+die1]--; - } -} - -strategy(player,playee) -int *player,*playee; -{ - int k, n, nn, bestval, moveval, prob; - - n = 0; - if(imoves == 0) - return(NIL); - goodmoves[0] = NIL; - bestval = -32000; - for(k = 0; k < imoves; k++){ - if((moveval=eval(player,playee,k,&prob)) < bestval) - continue; - if(moveval > bestval){ - bestval = moveval; - n = 0; - } - if(n1){ - nn=n; - n=0; - prob=32000; - for(k = 0; k < nn; k++){ - if((moveval=probmoves[k]) > prob) - continue; - if(moveval>4)%n]); -} - -eval(player,playee,k,prob) -int *player,*playee,k,*prob; -{ - int newtry[31], newother[31], *r, *q, *p, n, sum, first; - int ii, lastwhite, lastbrown; - - *prob = sum = 0; - r = player+25; - p = newtry; - q = newother; - while(player6) { - for(sum = 1000; lastwhite > 6; lastwhite--) - sum = sum-lastwhite*newtry[25-lastwhite]; - } - for(first = 0; first < 25; first++) - if(newother[first] != 0) /*find other's first piece*/ - break; - q = newtry+25; - for(p = newtry+1; p < q;) /* blocked points are good */ - if(*p++ > 1) - sum++; - if(first > 5) { /* only stress removing pieces if */ - /* homeboard cannot be hit */ - q = newtry+31; - p=newtry+25; - for(n = 6; p < q; n--) - sum += *p++ * n; /*remove pieces, but just barely*/ - } - if(level != 'b'){ - r = newtry+25-first; /*singles past this point can't be hit*/ - for(p = newtry+7; p < r; ) - if(*p++ == 1) /*singles are bad after 1st 6 points if they can be hit*/ - sum--; - q = newtry+3; - for(p = newtry; p < q; ) /*bad to be on 1st three points*/ - sum -= *p++; - } - - for(n = 1; n <= 4; n++) - *prob += n*getprob(newtry,newother,6*n-5,6*n); - return(sum); -} -instructions() -{ - register fd, r; - char buf[BUFSIZ]; - - if((fd = open(RULES, 0)) < 0) { - fprintf(stderr, "back: cannot open %s\n", RULES); - return; - } - while(r = read(fd, buf, BUFSIZ)) - write(1, buf, r); -} - -getprob(player,playee,start,finish) -int *player,*playee,start,finish; -{ /*returns the probability (times 102) that any - pieces belonging to 'player' and lying between - his points 'start' and 'finish' will be hit - by a piece belonging to playee - */ - int k, n, sum; - - sum = 0; - for(; start <= finish; start++){ - if(player[start] == 1){ - for(k = 1; k <= 12; k++){ - if((n=25-start-k) < 0) - break; - if(playee[n] != 0) - sum += probability[k]; - } - } - } - return(sum); -} -prtbrd() -{ - int k; - static char undersc[]="______________________________________________________"; - - fprintf(stdout, "White's Home\n%s\r",undersc); - for(k = 1; k <= 6; k++) - fprintf(stdout, "%4d",k); - fprintf(stdout, " "); - for(k = 7; k <= 12; k++) - fprintf(stdout, "%4d",k); - putchar('\n'); - numline(brown, white, 1, 6); - fprintf(stdout, " "); - numline(brown, white, 7, 12); - putchar('\n'); - colorline(brown, 'B', white, 'W', 1, 6); - fprintf(stdout, " "); - colorline(brown, 'B', white, 'W', 7, 12); - putchar('\n'); - if(white[0] != 0) - fprintf(stdout, "%28dW\n",white[0]); - else - putchar('\n'); - if(brown[0] != 0) - fprintf(stdout, "%28dB\n", brown[0]); - else - putchar('\n'); - colorline(white, 'W', brown, 'B', 1, 6); - fprintf(stdout, " "); - colorline(white, 'W', brown, 'B', 7, 12); - fprintf(stdout, "\n%s\r",undersc); - numline(white, brown, 1, 6); - fprintf(stdout, " "); - numline(white, brown, 7, 12); - putchar('\n'); - for(k = 24; k >= 19; k--) - fprintf(stdout, "%4d",k); - fprintf(stdout, " "); - for(k = 18; k >= 13; k--) - fprintf(stdout, "%4d",k); - fprintf(stdout, "\nBrown's Home\n\n\n\n\n"); -} -numline(upcol,downcol,start,fin) -int *upcol,*downcol,start,fin; -{ - int k, n; - - for(k = start; k <= fin; k++){ - if((n = upcol[k]) != 0 || (n = downcol[25-k]) != 0) - fprintf(stdout, "%4d", n); - else - fprintf(stdout, " "); - } -} -colorline(upcol,c1,downcol,c2,start,fin) -int *upcol,*downcol,start,fin; -char c1,c2; -{ - int k; - char c; - - for(k = start; k <= fin; k++){ - c = ' '; - if(upcol[k] != 0) - c = c1; - if(downcol[25-k] != 0) - c = c2; - fprintf(stdout, " %c",c); - } -} diff --git a/backgammon/common_source/board.c b/backgammon/common_source/board.c index eab49a43..eeac31cc 100644 --- a/backgammon/common_source/board.c +++ b/backgammon/common_source/board.c @@ -1,4 +1,4 @@ -/* $NetBSD: board.c,v 1.4 1995/04/29 00:44:11 mycroft Exp $ */ +/* $NetBSD: board.c,v 1.5 1997/10/10 08:59:43 lukem Exp $ */ /* * Copyright (c) 1980, 1993 @@ -33,150 +33,154 @@ * SUCH DAMAGE. */ +#include #ifndef lint #if 0 static char sccsid[] = "@(#)board.c 8.1 (Berkeley) 5/31/93"; #else -static char rcsid[] = "$NetBSD: board.c,v 1.4 1995/04/29 00:44:11 mycroft Exp $"; +__RCSID("$NetBSD: board.c,v 1.5 1997/10/10 08:59:43 lukem Exp $"); #endif #endif /* not lint */ #include "back.h" -static int i, j, k; -static char ln[60]; +static int i, j, k; +static char ln[60]; -wrboard () { - register int l; - static char bl[] = - "| | | |\n"; - static char sv[] = - "| | | | \n"; +void +wrboard() +{ + int l; + static char bl[] = + "| | | |\n"; + static char sv[] = + "| | | | \n"; - fixtty (&noech); + fixtty(&noech); clear(); - if (tflag) { + if (tflag) { fboard(); goto lastline; } - - writel ("_____________________________________________________\n"); - writel (bl); - strcpy (ln,bl); + writel("_____________________________________________________\n"); + writel(bl); + strcpy(ln, bl); for (j = 1; j < 50; j += 4) { - k = j/4+(j > 24? 12: 13); - ln[j+1] = k%10+'0'; - ln[j] = k/10+'0'; + k = j / 4 + (j > 24 ? 12 : 13); + ln[j + 1] = k % 10 + '0'; + ln[j] = k / 10 + '0'; if (j == 21) j += 4; } - writel (ln); + writel(ln); for (i = 0; i < 5; i++) { - strcpy (ln,sv); + strcpy(ln, sv); for (j = 1; j < 50; j += 4) { - k = j/4+(j > 24? 12: 13); - wrbsub (); + k = j / 4 + (j > 24 ? 12 : 13); + wrbsub(); if (j == 21) j += 4; } if (-board[25] > i) ln[26] = 'w'; - if (-board[25] > i+5) + if (-board[25] > i + 5) ln[25] = 'w'; - if (-board[25] > i+10) + if (-board[25] > i + 10) ln[27] = 'w'; l = 53; - if (off[1] > i || (off[1] < 0 && off[1]+15 > i)) { + if (off[1] > i || (off[1] < 0 && off[1] + 15 > i)) { ln[54] = 'r'; l = 55; } - if (off[1] > i+5 || (off[1] < 0 && off[1]+15 > i+5)) { + if (off[1] > i + 5 || (off[1] < 0 && off[1] + 15 > i + 5)) { ln[55] = 'r'; l = 56; } - if (off[1] > i+10 || (off[1] < 0 && off[1]+15 > i+10)) { + if (off[1] > i + 10 || (off[1] < 0 && off[1] + 15 > i + 10)) { ln[56] = 'r'; l = 57; } ln[l++] = '\n'; ln[l] = '\0'; - writel (ln); + writel(ln); } - strcpy (ln,bl); + strcpy(ln, bl); ln[25] = 'B'; ln[26] = 'A'; ln[27] = 'R'; - writel (ln); - strcpy (ln,sv); + writel(ln); + strcpy(ln, sv); for (i = 4; i > -1; i--) { for (j = 1; j < 50; j += 4) { - k = ((j > 24? 53: 49)-j)/4; + k = ((j > 24 ? 53 : 49) - j) / 4; wrbsub(); if (j == 21) j += 4; } if (board[0] > i) ln[26] = 'r'; - if (board[0] > i+5) + if (board[0] > i + 5) ln[25] = 'r'; - if (board[0] > i+10) + if (board[0] > i + 10) ln[27] = 'r'; l = 53; - if (off[0] > i || (off[0] < 0 && off[0]+15 > i)) { + if (off[0] > i || (off[0] < 0 && off[0] + 15 > i)) { ln[54] = 'w'; l = 55; } - if (off[0] > i+5 || (off[0] < 0 && off[0]+15 > i+5)) { + if (off[0] > i + 5 || (off[0] < 0 && off[0] + 15 > i + 5)) { ln[55] = 'w'; l = 56; } - if (off[0] > i+10 || (off[0] < 0 && off[0]+15 > i+10)) { + if (off[0] > i + 10 || (off[0] < 0 && off[0] + 15 > i + 10)) { ln[56] = 'w'; l = 57; } ln[l++] = '\n'; ln[l] = '\0'; - writel (ln); + writel(ln); } - strcpy (ln,bl); + strcpy(ln, bl); for (j = 1; j < 50; j += 4) { - k = ((j > 24? 53: 49)-j)/4; - ln[j+1] = k%10+'0'; + k = ((j > 24 ? 53 : 49) - j) / 4; + ln[j + 1] = k % 10 + '0'; if (k > 9) - ln[j] = k/10+'0'; + ln[j] = k / 10 + '0'; if (j == 21) j += 4; } - writel (ln); - writel ("|_______________________|___|_______________________|\n"); + writel(ln); + writel("|_______________________|___|_______________________|\n"); lastline: - gwrite (); + gwrite(); if (tflag) - curmove (18,0); - else { - writec ('\n'); - writec ('\n'); + curmove(18, 0); + else { + writec('\n'); + writec('\n'); } fixtty(&raw); } - -wrbsub () { - register int m; - register char d; - if (board[k] > 0) { +void +wrbsub() +{ + int m; + char d; + + if (board[k] > 0) { m = board[k]; d = 'r'; } else { m = -board[k]; d = 'w'; } - if (m>i) - ln[j+1] = d; - if (m>i+5) + if (m > i) + ln[j + 1] = d; + if (m > i + 5) ln[j] = d; - if (m>i+10) - ln[j+2] = d; + if (m > i + 10) + ln[j + 2] = d; } diff --git a/backgammon/common_source/check.c b/backgammon/common_source/check.c index 25c77c90..53376adf 100644 --- a/backgammon/common_source/check.c +++ b/backgammon/common_source/check.c @@ -1,4 +1,4 @@ -/* $NetBSD: check.c,v 1.3 1995/03/21 15:05:36 cgd Exp $ */ +/* $NetBSD: check.c,v 1.4 1997/10/10 08:59:44 lukem Exp $ */ /* * Copyright (c) 1980, 1993 @@ -33,30 +33,33 @@ * SUCH DAMAGE. */ +#include #ifndef lint #if 0 static char sccsid[] = "@(#)check.c 8.1 (Berkeley) 5/31/93"; #else -static char rcsid[] = "$NetBSD: check.c,v 1.3 1995/03/21 15:05:36 cgd Exp $"; +__RCSID("$NetBSD: check.c,v 1.4 1997/10/10 08:59:44 lukem Exp $"); #endif #endif /* not lint */ #include "back.h" -getmove () { - register int i, c; +void +getmove() +{ + int i, c; c = 0; - for (;;) { + for (;;) { i = checkmove(c); - switch (i) { + switch (i) { case -1: - if (movokay(mvlim)) { + if (movokay(mvlim)) { if (tflag) - curmove (20,0); + curmove(20, 0); else - writec ('\n'); + writec('\n'); for (i = 0; i < mvlim; i++) if (h[i]) wrhit(g[i]); @@ -67,7 +70,6 @@ getmove () { bflag = pnum; return; } - case -4: case 0: if (tflag) @@ -75,20 +77,20 @@ getmove () { if (i != 0 && i != -4) break; if (tflag) - curmove (20,0); + curmove(20, 0); else - writec ('\n'); - writel (*Colorptr); + writec('\n'); + writel(*Colorptr); if (i == -4) - writel (" must make "); + writel(" must make "); else - writel (" can only make "); - writec (mvlim+'0'); - writel (" move"); + writel(" can only make "); + writec(mvlim + '0'); + writel(" move"); if (mvlim > 1) - writec ('s'); - writec ('.'); - writec ('\n'); + writec('s'); + writec('.'); + writec('\n'); break; case -3: @@ -96,66 +98,62 @@ getmove () { return; } - if (! tflag) - proll (); - else { - curmove (cturn == -1? 18: 19,39); - cline (); + if (!tflag) + proll(); + else { + curmove(cturn == -1 ? 18 : 19, 39); + cline(); c = -1; } } } - -movokay (mv) -register int mv; +int +movokay(mv) + int mv; { - register int i, m; + int i, m; if (d0) swap; - for (i = 0; i < mv; i++) { - - if (p[i] == g[i]) { - moverr (i); - curmove (20,0); - writel ("Attempt to move to same location.\n"); + for (i = 0; i < mv; i++) { + if (p[i] == g[i]) { + moverr(i); + curmove(20, 0); + writel("Attempt to move to same location.\n"); return (0); } - - if (cturn*(g[i]-p[i]) < 0) { - moverr (i); - curmove (20,0); - writel ("Backwards move.\n"); + if (cturn * (g[i] - p[i]) < 0) { + moverr(i); + curmove(20, 0); + writel("Backwards move.\n"); return (0); } - - if (abs(board[bar]) && p[i] != bar) { - moverr (i); - curmove (20,0); - writel ("Men still on bar.\n"); + if (abs(board[bar]) && p[i] != bar) { + moverr(i); + curmove(20, 0); + writel("Men still on bar.\n"); return (0); } - - if ( (m = makmove(i)) ) { - moverr (i); - switch (m) { + if ((m = makmove(i))) { + moverr(i); + switch (m) { case 1: - writel ("Move not rolled.\n"); + writel("Move not rolled.\n"); break; case 2: - writel ("Bad starting position.\n"); + writel("Bad starting position.\n"); break; case 3: - writel ("Destination occupied.\n"); + writel("Destination occupied.\n"); break; case 4: - writel ("Can't remove men yet.\n"); + writel("Can't remove men yet.\n"); } return (0); } diff --git a/backgammon/common_source/fancy.c b/backgammon/common_source/fancy.c index cb7818fa..e4734ca1 100644 --- a/backgammon/common_source/fancy.c +++ b/backgammon/common_source/fancy.c @@ -1,4 +1,4 @@ -/* $NetBSD: fancy.c,v 1.4 1995/04/24 12:22:09 cgd Exp $ */ +/* $NetBSD: fancy.c,v 1.5 1997/10/10 08:59:45 lukem Exp $ */ /* * Copyright (c) 1980, 1993 @@ -33,158 +33,160 @@ * SUCH DAMAGE. */ +#include #ifndef lint #if 0 static char sccsid[] = "@(#)fancy.c 8.1 (Berkeley) 5/31/93"; #else -static char rcsid[] = "$NetBSD: fancy.c,v 1.4 1995/04/24 12:22:09 cgd Exp $"; +__RCSID("$NetBSD: fancy.c,v 1.5 1997/10/10 08:59:45 lukem Exp $"); #endif #endif /* not lint */ #include "back.h" -char PC; /* padding character */ -char *BC; /* backspace sequence */ -char *CD; /* clear to end of screen sequence */ -char *CE; /* clear to end of line sequence */ -char *CL; /* clear screen sequence */ -char *CM; /* cursor movement instructions */ -char *HO; /* home cursor sequence */ -char *MC; /* column cursor movement map */ -char *ML; /* row cursor movement map */ -char *ND; /* forward cursor sequence */ -char *UP; /* up cursor sequence */ - -int lHO; /* length of HO */ -int lBC; /* length of BC */ -int lND; /* length of ND */ -int lUP; /* length of UP */ -int CO; /* number of columns */ -int LI; /* number of lines */ -int *linect; /* array of lengths of lines on screen - (the actual screen is not stored) */ - - /* two letter codes */ -char tcap[] = "bccdceclcmhomcmlndup"; - /* corresponding strings */ -char **tstr[] = { &BC, &CD, &CE, &CL, &CM, &HO, &MC, &ML, &ND, &UP }; - -int buffnum; /* pointer to output buffer */ - -char tbuf[1024]; /* buffer for decoded termcap entries */ - -int oldb[] = {0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0}; - -int oldr; -int oldw; - /* "real" cursor positions, so - * it knows when to reposition. - * These are -1 if curr and curc - * are accurate */ -int realr; -int realc; - -void addbuf(); -extern char *tgoto(), *tgetstr(); - -fboard () { - register int i, j, l; - - curmove (0,0); /* do top line */ +int tgetent __P((char *, char *)); +int tgetnum __P((char *)); +char *tgoto __P((char *, int, int)); +char *tgetstr __P((char *, char **)); +void tputs __P((char *, int, void (*outc) __P((int)))); + +char PC; /* padding character */ +char *BC; /* backspace sequence */ +char *CD; /* clear to end of screen sequence */ +char *CE; /* clear to end of line sequence */ +char *CL; /* clear screen sequence */ +char *CM; /* cursor movement instructions */ +char *HO; /* home cursor sequence */ +char *MC; /* column cursor movement map */ +char *ML; /* row cursor movement map */ +char *ND; /* forward cursor sequence */ +char *UP; /* up cursor sequence */ + +int lHO; /* length of HO */ +int lBC; /* length of BC */ +int lND; /* length of ND */ +int lUP; /* length of UP */ +int CO; /* number of columns */ +int LI; /* number of lines */ +int *linect; /* array of lengths of lines on screen (the + * actual screen is not stored) */ + + /* two letter codes */ +char tcap[] = "bccdceclcmhomcmlndup"; + /* corresponding strings */ +char **tstr[] = {&BC, &CD, &CE, &CL, &CM, &HO, &MC, &ML, &ND, &UP}; + +int buffnum; /* pointer to output buffer */ + +char tbuf[1024]; /* buffer for decoded termcap entries */ + +int oldb[] = {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}; + +int oldr; +int oldw; + /* "real" cursor positions, so it knows when to reposition. These are -1 if + * curr and curc are accurate */ +int realr; +int realc; + +void +fboard() +{ + int i, j, l; + + curmove(0, 0); /* do top line */ for (i = 0; i < 53; i++) - fancyc ('_'); + fancyc('_'); - curmove (15,0); /* do botttom line */ + curmove(15, 0); /* do botttom line */ for (i = 0; i < 53; i++) - fancyc ('_'); - - l = 1; /* do vertical lines */ - for (i = 52; i > -1; i -= 28) { - curmove ( (l == 1? 1: 15) ,i); - fancyc ('|'); - for (j = 0; j < 14; j++) { - curmove (curr+l,curc-1); - fancyc ('|'); + fancyc('_'); + + l = 1; /* do vertical lines */ + for (i = 52; i > -1; i -= 28) { + curmove((l == 1 ? 1 : 15), i); + fancyc('|'); + for (j = 0; j < 14; j++) { + curmove(curr + l, curc - 1); + fancyc('|'); } if (i == 24) i += 32; - l = -l; /* alternate directions */ + l = -l; /* alternate directions */ } - curmove (2,1); /* label positions 13-18 */ - for (i = 13; i < 18; i++) { - fancyc ('1'); - fancyc ((i % 10)+'0'); - curmove (curr,curc+2); + curmove(2, 1); /* label positions 13-18 */ + for (i = 13; i < 18; i++) { + fancyc('1'); + fancyc((i % 10) + '0'); + curmove(curr, curc + 2); } - fancyc ('1'); - fancyc ('8'); - - curmove (2,29); /* label positions 19-24 */ - fancyc ('1'); - fancyc ('9'); - for (i = 20; i < 25; i++) { - curmove (curr,curc+2); - fancyc ('2'); - fancyc ((i % 10)+'0'); + fancyc('1'); + fancyc('8'); + + curmove(2, 29); /* label positions 19-24 */ + fancyc('1'); + fancyc('9'); + for (i = 20; i < 25; i++) { + curmove(curr, curc + 2); + fancyc('2'); + fancyc((i % 10) + '0'); } - curmove (14,1); /* label positions 12-7 */ - fancyc ('1'); - fancyc ('2'); - for (i = 11; i > 6; i--) { - curmove (curr,curc+2); - fancyc (i > 9? '1': ' '); - fancyc ((i % 10)+'0'); + curmove(14, 1); /* label positions 12-7 */ + fancyc('1'); + fancyc('2'); + for (i = 11; i > 6; i--) { + curmove(curr, curc + 2); + fancyc(i > 9 ? '1' : ' '); + fancyc((i % 10) + '0'); } - curmove (14,30); /* label positions 6-1 */ - fancyc ('6'); + curmove(14, 30); /* label positions 6-1 */ + fancyc('6'); for (i = 5; i > 0; i--) { - curmove (curr,curc+3); - fancyc (i+'0'); + curmove(curr, curc + 3); + fancyc(i + '0'); } - for (i = 12; i > 6; i--) /* print positions 12-7 */ + for (i = 12; i > 6; i--)/* print positions 12-7 */ if (board[i]) - bsect (board[i],13,1+4*(12-i),-1); + bsect(board[i], 13, 1 + 4 * (12 - i), -1); - if (board[0]) /* print red men on bar */ - bsect (board[0],13,25,-1); + if (board[0]) /* print red men on bar */ + bsect(board[0], 13, 25, -1); - for (i = 6; i > 0; i--) /* print positions 6-1 */ + for (i = 6; i > 0; i--) /* print positions 6-1 */ if (board[i]) - bsect (board[i],13,29+4*(6-i),-1); + bsect(board[i], 13, 29 + 4 * (6 - i), -1); - l = (off[1] < 0? off[1]+15: off[1]); /* print white's home */ - bsect (l,3,54,1); + l = (off[1] < 0 ? off[1] + 15 : off[1]); /* print white's home */ + bsect(l, 3, 54, 1); - curmove (8,25); /* print the word BAR */ - fancyc ('B'); - fancyc ('A'); - fancyc ('R'); + curmove(8, 25); /* print the word BAR */ + fancyc('B'); + fancyc('A'); + fancyc('R'); - for (i = 13; i < 19; i++) /* print positions 13-18 */ + for (i = 13; i < 19; i++) /* print positions 13-18 */ if (board[i]) - bsect (board[i],3,1+4*(i-13),1); + bsect(board[i], 3, 1 + 4 * (i - 13), 1); - if (board[25]) /* print white's men on bar */ - bsect (board[25],3,25,1); + if (board[25]) /* print white's men on bar */ + bsect(board[25], 3, 25, 1); - for (i = 19; i < 25; i++) /* print positions 19-24 */ + for (i = 19; i < 25; i++) /* print positions 19-24 */ if (board[i]) - bsect (board[i],3,29+4*(i-19),1); + bsect(board[i], 3, 29 + 4 * (i - 19), 1); - l = (off[0] < 0? off[0]+15: off[0]); /* print red's home */ - bsect (-l,13,54,-1); + l = (off[0] < 0 ? off[0] + 15 : off[0]); /* print red's home */ + bsect(-l, 13, 54, -1); - for (i = 0; i < 26; i++) /* save board position - * for refresh later */ + for (i = 0; i < 26; i++)/* save board position for refresh later */ oldb[i] = board[i]; - oldr = (off[1] < 0? off[1]+15: off[1]); - oldw = -(off[0] < 0? off[0]+15: off[0]); + oldr = (off[1] < 0 ? off[1] + 15 : off[1]); + oldw = -(off[0] < 0 ? off[0] + 15 : off[0]); } - /* * bsect (b,rpos,cpos,cnext) * Print the contents of a board position. "b" has the value of the @@ -194,216 +196,212 @@ fboard () { * to see if the position is a player's home, since those are printed * differently. */ - -bsect (b,rpos,cpos,cnext) -int b; /* contents of position */ -int rpos; /* row of position */ -int cpos; /* column of position */ -int cnext; /* direction of position */ - +void +bsect(b, rpos, cpos, cnext) + int b; /* contents of position */ + int rpos; /* row of position */ + int cpos; /* column of position */ + int cnext; /* direction of position */ { - register int j; /* index */ - register int n; /* number of men on position */ - register int bct; /* counter */ - int k; /* index */ - char pc; /* color of men on position */ - - n = abs(b); /* initialize n and pc */ - pc = (b > 0? 'r': 'w'); - - if (n < 6 && cpos < 54) /* position cursor at start */ - curmove (rpos,cpos+1); + int j; /* index */ + int n; /* number of men on position */ + int bct; /* counter */ + int k; /* index */ + char pc; /* color of men on position */ + + bct = 0; + n = abs(b); /* initialize n and pc */ + pc = (b > 0 ? 'r' : 'w'); + + if (n < 6 && cpos < 54) /* position cursor at start */ + curmove(rpos, cpos + 1); else - curmove (rpos,cpos); + curmove(rpos, cpos); - for (j = 0; j < 5; j++) { /* print position row by row */ + for (j = 0; j < 5; j++) { /* print position row by row */ - for (k = 0; k < 15; k += 5) /* print men */ - if (n > j+k) - fancyc (pc); + for (k = 0; k < 15; k += 5) /* print men */ + if (n > j + k) + fancyc(pc); - if (j < 4) { /* figure how far to - * back up for next - * row */ - if (n < 6) { /* stop if none left */ - if (j+1 == n) + if (j < 4) { /* figure how far to back up for next row */ + if (n < 6) { /* stop if none left */ + if (j + 1 == n) break; - bct = 1; /* single column */ - } else { - if (n < 11) { /* two columns */ - if (cpos == 54) { /* home pos */ - if (j+5 >= n) + bct = 1; /* single column */ + } else { + if (n < 11) { /* two columns */ + if (cpos == 54) { /* home pos */ + if (j + 5 >= n) bct = 1; else bct = 2; } - if (cpos < 54) { /* not home */ - if (j+6 >= n) + if (cpos < 54) { /* not home */ + if (j + 6 >= n) bct = 1; else bct = 2; } - } else { /* three columns */ - if (j+10 >= n) + } else { /* three columns */ + if (j + 10 >= n) bct = 2; else bct = 3; } } - curmove (curr+cnext,curc-bct); /* reposition cursor */ + curmove(curr + cnext, curc - bct); /* reposition cursor */ } } } - -refresh() { - register int i, r, c; - r = curr; /* save current position */ +void +refresh() +{ + int i, r, c; + + r = curr; /* save current position */ c = curc; - for (i = 12; i > 6; i--) /* fix positions 12-7 */ - if (board[i] != oldb[i]) { - fixpos (oldb[i],board[i],13,1+(12-i)*4,-1); + for (i = 12; i > 6; i--)/* fix positions 12-7 */ + if (board[i] != oldb[i]) { + fixpos(oldb[i], board[i], 13, 1 + (12 - i) * 4, -1); oldb[i] = board[i]; } - - if (board[0] != oldb[0]) { /* fix red men on bar */ - fixpos (oldb[0],board[0],13,25,-1); + if (board[0] != oldb[0]) { /* fix red men on bar */ + fixpos(oldb[0], board[0], 13, 25, -1); oldb[0] = board[0]; } - - for (i = 6; i > 0; i--) /* fix positions 6-1 */ - if (board[i] != oldb[i]) { - fixpos (oldb[i],board[i],13,29+(6-i)*4,-1); + for (i = 6; i > 0; i--) /* fix positions 6-1 */ + if (board[i] != oldb[i]) { + fixpos(oldb[i], board[i], 13, 29 + (6 - i) * 4, -1); oldb[i] = board[i]; } - - i = -(off[0] < 0? off[0]+15: off[0]); /* fix white's home */ - if (oldw != i) { - fixpos (oldw,i,13,54,-1); + i = -(off[0] < 0 ? off[0] + 15 : off[0]); /* fix white's home */ + if (oldw != i) { + fixpos(oldw, i, 13, 54, -1); oldw = i; } - - for (i = 13; i < 19; i++) /* fix positions 13-18 */ - if (board[i] != oldb[i]) { - fixpos (oldb[i],board[i],3,1+(i-13)*4,1); + for (i = 13; i < 19; i++) /* fix positions 13-18 */ + if (board[i] != oldb[i]) { + fixpos(oldb[i], board[i], 3, 1 + (i - 13) * 4, 1); oldb[i] = board[i]; } - - if (board[25] != oldb[25]) { /* fix white men on bar */ - fixpos (oldb[25],board[25],3,25,1); + if (board[25] != oldb[25]) { /* fix white men on bar */ + fixpos(oldb[25], board[25], 3, 25, 1); oldb[25] = board[25]; } - - for (i = 19; i < 25; i++) /* fix positions 19-24 */ - if (board[i] != oldb[i]) { - fixpos (oldb[i],board[i],3,29+(i-19)*4,1); + for (i = 19; i < 25; i++) /* fix positions 19-24 */ + if (board[i] != oldb[i]) { + fixpos(oldb[i], board[i], 3, 29 + (i - 19) * 4, 1); oldb[i] = board[i]; } - - i = (off[1] < 0? off[1]+15: off[1]); /* fix red's home */ - if (oldr != i) { - fixpos (oldr,i,3,54,1); + i = (off[1] < 0 ? off[1] + 15 : off[1]); /* fix red's home */ + if (oldr != i) { + fixpos(oldr, i, 3, 54, 1); oldr = i; } - - curmove (r,c); /* return to saved position */ + curmove(r, c); /* return to saved position */ newpos(); buflush(); } - -fixpos (old,new,r,c,inc) -int old, new, r, c, inc; +void +fixpos(old, new, r, c, inc) + int old, new, r, c, inc; { - register int o, n, nv; - int ov, nc; - char col; + int o, n, nv; + int ov, nc; + char col; - if (old*new >= 0) { + nc = 0; + if (old * new >= 0) { ov = abs(old); nv = abs(new); - col = (old+new > 0? 'r': 'w'); - o = (ov-1)/5; - n = (nv-1)/5; - if (o == n) { + col = (old + new > 0 ? 'r' : 'w'); + o = (ov - 1) / 5; + n = (nv - 1) / 5; + if (o == n) { if (o == 2) - nc = c+2; + nc = c + 2; if (o == 1) - nc = c < 54? c: c+1; + nc = c < 54 ? c : c + 1; if (o == 0) - nc = c < 54? c+1: c; + nc = c < 54 ? c + 1 : c; if (ov > nv) - fixcol (r+inc*(nv-n*5),nc,abs(ov-nv),' ',inc); + fixcol(r + inc * (nv - n * 5), nc, abs(ov - nv), ' ', inc); else - fixcol (r+inc*(ov-o*5),nc,abs(ov-nv),col,inc); + fixcol(r + inc * (ov - o * 5), nc, abs(ov - nv), col, inc); return; - } else { - if (c < 54) { - if (o+n == 1) { - if (n) { - fixcol (r,c,abs(nv-5),col,inc); + } else { + if (c < 54) { + if (o + n == 1) { + if (n) { + fixcol(r, c, abs(nv - 5), col, inc); if (ov != 5) - fixcol (r+inc*ov,c+1,abs(ov-5),col,inc); - } else { - fixcol (r,c,abs(ov-5),' ',inc); + fixcol(r + inc * ov, c + 1, + abs(ov - 5), col, inc); + } else { + fixcol(r, c, abs(ov - 5), ' ', inc); if (nv != 5) - fixcol (r+inc*nv,c+1,abs(nv-5),' ',inc); + fixcol(r + inc * nv, c + 1, + abs(nv - 5), ' ', inc); } return; } - if (n == 2) { + if (n == 2) { if (ov != 10) - fixcol (r+inc*(ov-5),c,abs(ov-10),col,inc); - fixcol (r,c+2,abs(nv-10),col,inc); - } else { + fixcol(r + inc * (ov - 5), c, + abs(ov - 10), col, inc); + fixcol(r, c + 2, abs(nv - 10), col, inc); + } else { if (nv != 10) - fixcol (r+inc*(nv-5),c,abs(nv-10),' ',inc); - fixcol (r,c+2,abs(ov-10),' ',inc); + fixcol(r + inc * (nv - 5), c, + abs(nv - 10), ' ', inc); + fixcol(r, c + 2, abs(ov - 10), ' ', inc); } return; } - if (n > o) { - fixcol (r+inc*(ov%5),c+o,abs(5*n-ov),col,inc); - if (nv != 5*n) - fixcol (r,c+n,abs(5*n-nv),col,inc); - } else { - fixcol (r+inc*(nv%5),c+n,abs(5*n-nv),' ',inc); - if (ov != 5*o) - fixcol (r,c+o,abs(5*o-ov),' ',inc); + if (n > o) { + fixcol(r + inc * (ov % 5), c + o, abs(5 * n - ov), col, inc); + if (nv != 5 * n) + fixcol(r, c + n, abs(5 * n - nv), col, inc); + } else { + fixcol(r + inc * (nv % 5), c + n, abs(5 * n - nv), ' ', inc); + if (ov != 5 * o) + fixcol(r, c + o, abs(5 * o - ov), ' ', inc); } return; } } nv = abs(new); - fixcol (r,c+1,nv,new > 0? 'r': 'w',inc); + fixcol(r, c + 1, nv, new > 0 ? 'r' : 'w', inc); if (abs(old) <= abs(new)) return; - fixcol (r+inc*new,c+1,abs(old+new),' ',inc); + fixcol(r + inc * new, c + 1, abs(old + new), ' ', inc); } -fixcol (r,c,l,ch,inc) -register int l, ch; -int r, c, inc; - +void +fixcol(r, c, l, ch, inc) + int l, ch, r, c, inc; { - register int i; + int i; - curmove (r,c); - fancyc (ch); - for (i = 1; i < l; i++) { - curmove (curr+inc,curc-1); - fancyc (ch); + curmove(r, c); + fancyc(ch); + for (i = 1; i < l; i++) { + curmove(curr + inc, curc - 1); + fancyc(ch); } } - -curmove (r,c) -register int r, c; +void +curmove(r, c) + int r, c; { if (curr == r && curc == c) return; - if (realr == -1) { + if (realr == -1) { realr = curr; realc = curc; } @@ -411,345 +409,342 @@ register int r, c; curc = c; } -newpos () { - register int r; /* destination row */ - register int c; /* destination column */ - register int mode = -1; /* mode of movement */ +void +newpos() +{ + int r; /* destination row */ + int c; /* destination column */ + int mode = -1; /* mode of movement */ - int count = 1000; /* character count */ - int i; /* index */ - int j; /* index */ - int n; /* temporary variable */ - char *m; /* string containing CM movement */ + int count = 1000; /* character count */ + int i; /* index */ + int n; /* temporary variable */ + char *m; /* string containing CM movement */ - if (realr == -1) /* see if already there */ + m = NULL; + if (realr == -1) /* see if already there */ return; - r = curr; /* set current and dest. positions */ + r = curr; /* set current and dest. positions */ c = curc; curr = realr; curc = realc; - /* double check position */ - if (curr == r && curc == c) { + /* double check position */ + if (curr == r && curc == c) { realr = realc = -1; return; } - - if (CM) { /* try CM to get there */ + if (CM) { /* try CM to get there */ mode = 0; - m = (char *)tgoto (CM,c,r); - count = strlen (m); + m = (char *) tgoto(CM, c, r); + count = strlen(m); } - - /* try HO and local movement */ - if (HO && (n = r+c*lND+lHO) < count) { + /* try HO and local movement */ + if (HO && (n = r + c * lND + lHO) < count) { mode = 1; count = n; } - - /* try various LF combinations */ - if (r >= curr) { - /* CR, LF, and ND */ - if ((n = (r-curr)+c*lND+1) < count) { + /* try various LF combinations */ + if (r >= curr) { + /* CR, LF, and ND */ + if ((n = (r - curr) + c * lND + 1) < count) { mode = 2; count = n; } - /* LF, ND */ - if (c >= curc && (n = (r-curr)+(c-curc)*lND) < count) { + /* LF, ND */ + if (c >= curc && (n = (r - curr) + (c - curc) * lND) < count) { mode = 3; count = n; } - /* LF, BS */ - if (c < curc && (n = (r-curr)+(curc-c)*lBC) < count) { + /* LF, BS */ + if (c < curc && (n = (r - curr) + (curc - c) * lBC) < count) { mode = 4; count = n; } } - - /* try corresponding UP combinations */ - if (r < curr) { - /* CR, UP, and ND */ - if ((n = (curr-r)*lUP+c*lND+1) < count) { + /* try corresponding UP combinations */ + if (r < curr) { + /* CR, UP, and ND */ + if ((n = (curr - r) * lUP + c * lND + 1) < count) { mode = 5; count = n; } - /* UP and ND */ - if (c >= curc && (n = (curr-r)*lUP+(c-curc)*lND) < count) { + /* UP and ND */ + if (c >= curc && (n = (curr - r) * lUP + (c - curc) * lND) < count) { mode = 6; count = n; } - /* UP and BS */ - if (c < curc && (n = (curr-r)*lUP+(curc-c)*lBC) < count) { + /* UP and BS */ + if (c < curc && (n = (curr - r) * lUP + (curc - c) * lBC) < count) { mode = 7; count = n; } } - - /* space over */ - if (curr == r && c > curc && linect[r] < curc && c-curc < count) + /* space over */ + if (curr == r && c > curc && linect[r] < curc && c - curc < count) mode = 8; - switch (mode) { + switch (mode) { - case -1: /* error! */ - write (2,"\r\nInternal cursor error.\r\n",26); - getout(); + case -1: /* error! */ + write(2, "\r\nInternal cursor error.\r\n", 26); + getout(0); - /* direct cursor motion */ - case 0: - tputs (m,abs(curr-r),addbuf); + /* direct cursor motion */ + case 0: + tputs(m, abs(curr - r), addbuf); break; - /* relative to "home" */ - case 1: - tputs (HO,r,addbuf); + /* relative to "home" */ + case 1: + tputs(HO, r, addbuf); for (i = 0; i < r; i++) - addbuf ('\012'); + addbuf('\012'); for (i = 0; i < c; i++) - tputs (ND,1,addbuf); + tputs(ND, 1, addbuf); break; - /* CR and down and over */ - case 2: - addbuf ('\015'); - for (i = 0; i < r-curr; i++) - addbuf ('\012'); + /* CR and down and over */ + case 2: + addbuf('\015'); + for (i = 0; i < r - curr; i++) + addbuf('\012'); for (i = 0; i < c; i++) - tputs (ND,1,addbuf); + tputs(ND, 1, addbuf); break; - - /* down and over */ - case 3: - for (i = 0; i < r-curr; i++) - addbuf ('\012'); - for (i = 0; i < c-curc; i++) - tputs (ND,1,addbuf); + + /* down and over */ + case 3: + for (i = 0; i < r - curr; i++) + addbuf('\012'); + for (i = 0; i < c - curc; i++) + tputs(ND, 1, addbuf); break; - - /* down and back */ - case 4: - for (i = 0; i < r-curr; i++) - addbuf ('\012'); - for (i = 0; i < curc-c; i++) - addbuf ('\010'); + + /* down and back */ + case 4: + for (i = 0; i < r - curr; i++) + addbuf('\012'); + for (i = 0; i < curc - c; i++) + addbuf('\010'); break; - - /* CR and up and over */ - case 5: - addbuf ('\015'); - for (i = 0; i < curr-r; i++) - tputs (UP,1,addbuf); + + /* CR and up and over */ + case 5: + addbuf('\015'); + for (i = 0; i < curr - r; i++) + tputs(UP, 1, addbuf); for (i = 0; i < c; i++) - tputs (ND,1,addbuf); + tputs(ND, 1, addbuf); break; - - /* up and over */ - case 6: - for (i = 0; i < curr-r; i++) - tputs (UP,1,addbuf); - for (i = 0; i < c-curc; i++) - tputs (ND,1,addbuf); + + /* up and over */ + case 6: + for (i = 0; i < curr - r; i++) + tputs(UP, 1, addbuf); + for (i = 0; i < c - curc; i++) + tputs(ND, 1, addbuf); break; - - /* up and back */ - case 7: - for (i = 0; i < curr-r; i++) - tputs (UP,1,addbuf); - for (i = 0; i < curc-c; i++) { + + /* up and back */ + case 7: + for (i = 0; i < curr - r; i++) + tputs(UP, 1, addbuf); + for (i = 0; i < curc - c; i++) { if (BC) - tputs (BC,1,addbuf); + tputs(BC, 1, addbuf); else - addbuf ('\010'); + addbuf('\010'); } break; - /* safe space */ - case 8: - for (i = 0; i < c-curc; i++) - addbuf (' '); + /* safe space */ + case 8: + for (i = 0; i < c - curc; i++) + addbuf(' '); } - /* fix positions */ + /* fix positions */ curr = r; curc = c; realr = -1; realc = -1; } - -clear () { - register int i; - /* double space if can't clear */ - if (CL == 0) { - writel ("\n\n"); +void +clear() +{ + int i; + + /* double space if can't clear */ + if (CL == 0) { + writel("\n\n"); return; } - - curr = curc = 0; /* fix position markers */ + curr = curc = 0; /* fix position markers */ realr = realc = -1; - for (i = 0; i < 24; i++) /* clear line counts */ + for (i = 0; i < 24; i++)/* clear line counts */ linect[i] = -1; - buffnum = -1; /* ignore leftover buffer contents */ - tputs (CL,CO,addbuf); /* put CL in buffer */ + buffnum = -1; /* ignore leftover buffer contents */ + tputs(CL, CO, addbuf); /* put CL in buffer */ } -tos () { /* home cursor */ - curmove (0,0); +void +tos() +{ /* home cursor */ + curmove(0, 0); } - -fancyc (c) -register char c; /* character to output */ + + +void +fancyc(c) + char c; /* character to output */ { - register int sp; /* counts spaces in a tab */ + int sp; /* counts spaces in a tab */ - if (c == '\007') { /* bells go in blindly */ - addbuf (c); + if (c == '\007') { /* bells go in blindly */ + addbuf(c); return; } - - /* process tabs, use spaces if the - * the tab should be erasing things, - * otherwise use cursor movement - * routines. Note this does not use - * hardware tabs at all. */ - if (c == '\t') { - sp = (curc+8) & (~ 7); /* compute spaces */ - /* check line length */ - if (linect[curr] >= curc || sp < 4) { + /* process tabs, use spaces if the the tab should be erasing things, + * otherwise use cursor movement routines. Note this does not use + * hardware tabs at all. */ + if (c == '\t') { + sp = (curc + 8) & (~7); /* compute spaces */ + /* check line length */ + if (linect[curr] >= curc || sp < 4) { for (; sp > curc; sp--) - addbuf (' '); - curc = sp; /* fix curc */ + addbuf(' '); + curc = sp; /* fix curc */ } else - curmove (curr,sp); + curmove(curr, sp); return; } - - /* do newline be calling newline */ - if (c == '\n') { + /* do newline be calling newline */ + if (c == '\n') { newline(); return; } - - /* ignore any other control chars */ + /* ignore any other control chars */ if (c < ' ') return; - /* if an erasing space or non-space, - * just add it to buffer. Otherwise - * use cursor movement routine, so that - * multiple spaces will be grouped - * together */ - if (c > ' ' || linect[curr] >= curc) { - newpos (); /* make sure position correct */ - addbuf (c); /* add character to buffer */ - /* fix line length */ + /* if an erasing space or non-space, just add it to buffer. Otherwise + * use cursor movement routine, so that multiple spaces will be + * grouped together */ + if (c > ' ' || linect[curr] >= curc) { + newpos(); /* make sure position correct */ + addbuf(c); /* add character to buffer */ + /* fix line length */ if (c == ' ' && linect[curr] == curc) linect[curr]--; - else if (linect[curr] < curc) - linect[curr] = curc; - curc++; /* fix curc */ + else + if (linect[curr] < curc) + linect[curr] = curc; + curc++; /* fix curc */ } else - /* use cursor movement routine */ - curmove (curr,curc+1); + /* use cursor movement routine */ + curmove(curr, curc + 1); } - -clend() { - register int i; - register char *s; +void +clend() +{ + int i; - if (CD) { - tputs (CD,CO-curr,addbuf); + if (CD) { + tputs(CD, CO - curr, addbuf); for (i = curr; i < LI; i++) linect[i] = -1; return; } - - curmove (i = curr,0); + curmove(i = curr, 0); cline(); - while (curr < LI-1) { - curmove (curr+1,0); + while (curr < LI - 1) { + curmove(curr + 1, 0); if (linect[curr] > -1) - cline (); + cline(); } - curmove (i,0); + curmove(i, 0); } -cline () { - register int i; - register int c; - register char *s; +void +cline() +{ + int c; if (curc > linect[curr]) return; - newpos (); - if (CE) { - tputs (CE,1,addbuf); - linect[curr] = curc-1; - } else { - c = curc-1; - while (linect[curr] > c) { - addbuf (' '); + newpos(); + if (CE) { + tputs(CE, 1, addbuf); + linect[curr] = curc - 1; + } else { + c = curc - 1; + while (linect[curr] > c) { + addbuf(' '); curc++; linect[curr]--; } - curmove (curr,c+1); + curmove(curr, c + 1); } } -newline () { +void +newline() +{ cline(); - if (curr == LI-1) - curmove (begscr,0); + if (curr == LI - 1) + curmove(begscr, 0); else - curmove (curr+1,0); + curmove(curr + 1, 0); } - -getcaps (s) -register char *s; +int +getcaps(s) + char *s; { - register char *code; /* two letter code */ - register char ***cap; /* pointer to cap string */ - char *bufp; /* pointer to cap buffer */ - char tentry[1024]; /* temporary uncoded caps buffer */ + char *code; /* two letter code */ + char ***cap; /* pointer to cap string */ + char *bufp; /* pointer to cap buffer */ + char tentry[1024]; /* temporary uncoded caps buffer */ - tgetent (tentry,s); /* get uncoded termcap entry */ + tgetent(tentry, s); /* get uncoded termcap entry */ - LI = tgetnum ("li"); /* get number of lines */ + LI = tgetnum("li"); /* get number of lines */ if (LI == -1) LI = 12; - CO = tgetnum ("co"); /* get number of columns */ + CO = tgetnum("co"); /* get number of columns */ if (CO == -1) CO = 65; - bufp = tbuf; /* get padding character */ - tgetstr ("pc",&bufp); + bufp = tbuf; /* get padding character */ + tgetstr("pc", &bufp); if (bufp != tbuf) PC = *tbuf; else PC = 0; - bufp = tbuf; /* get string entries */ + bufp = tbuf; /* get string entries */ cap = tstr; for (code = tcap; *code; code += 2) - **cap++ = (char *)tgetstr (code,&bufp); + **cap++ = (char *) tgetstr(code, &bufp); - /* get pertinent lengths */ + /* get pertinent lengths */ if (HO) - lHO = strlen (HO); + lHO = strlen(HO); if (BC) - lBC = strlen (BC); + lBC = strlen(BC); else lBC = 1; if (UP) - lUP = strlen (UP); + lUP = strlen(UP); if (ND) - lND = strlen (ND); + lND = strlen(ND); if (LI < 24 || CO < 72 || !(CL && UP && ND)) return (0); - linect = (int *)calloc (LI+1,sizeof(int)); + linect = (int *) calloc(LI + 1, sizeof(int)); return (1); } diff --git a/backgammon/common_source/init.c b/backgammon/common_source/init.c index 0f8077eb..35c72918 100644 --- a/backgammon/common_source/init.c +++ b/backgammon/common_source/init.c @@ -1,4 +1,4 @@ -/* $NetBSD: init.c,v 1.4 1995/04/29 00:44:12 mycroft Exp $ */ +/* $NetBSD: init.c,v 1.5 1997/10/10 08:59:46 lukem Exp $ */ /* * Copyright (c) 1980, 1993 @@ -33,11 +33,12 @@ * SUCH DAMAGE. */ +#include #ifndef lint #if 0 static char sccsid[] = "@(#)init.c 8.1 (Berkeley) 5/31/93"; #else -static char rcsid[] = "$NetBSD: init.c,v 1.4 1995/04/29 00:44:12 mycroft Exp $"; +__RCSID("$NetBSD: init.c,v 1.5 1997/10/10 08:59:46 lukem Exp $"); #endif #endif /* not lint */ @@ -47,25 +48,22 @@ static char rcsid[] = "$NetBSD: init.c,v 1.4 1995/04/29 00:44:12 mycroft Exp $"; * variable initialization. */ - /* name of executable object programs */ -char EXEC[] = "/usr/games/backgammon"; -char TEACH[] = "/usr/games/teachgammon"; + /* name of executable object programs */ +char EXEC[] = "/usr/games/backgammon"; +char TEACH[] = "/usr/games/teachgammon"; -int pnum = 2; /* color of player: - -1 = white - 1 = red - 0 = both - 2 = not yet init'ed */ -int acnt = 0; /* length of args */ -int aflag = 1; /* flag to ask for rules or instructions */ -int bflag = 0; /* flag for automatic board printing */ -int cflag = 0; /* case conversion flag */ -int hflag = 1; /* flag for cleaning screen */ -int mflag = 0; /* backgammon flag */ -int raflag = 0; /* 'roll again' flag for recovered game */ -int rflag = 0; /* recovered game flag */ -int tflag = 0; /* cursor addressing flag */ -int iroll = 0; /* special flag for inputting rolls */ -int rfl = 0; +int pnum = 2; /* color of player: -1 = white 1 = red 0 = + * both 2 = not yet init'ed */ +int acnt = 0; /* length of args */ +int aflag = 1; /* flag to ask for rules or instructions */ +int bflag = 0; /* flag for automatic board printing */ +int cflag = 0; /* case conversion flag */ +int hflag = 1; /* flag for cleaning screen */ +int mflag = 0; /* backgammon flag */ +int raflag = 0; /* 'roll again' flag for recovered game */ +int rflag = 0; /* recovered game flag */ +int tflag = 0; /* cursor addressing flag */ +int iroll = 0; /* special flag for inputting rolls */ +int rfl = 0; -char *color[] = {"White","Red","white","red"}; +char *color[] = {"White", "Red", "white", "red"}; diff --git a/backgammon/common_source/odds.c b/backgammon/common_source/odds.c index 4bf59ea6..5f350a39 100644 --- a/backgammon/common_source/odds.c +++ b/backgammon/common_source/odds.c @@ -1,4 +1,4 @@ -/* $NetBSD: odds.c,v 1.3 1995/03/21 15:05:47 cgd Exp $ */ +/* $NetBSD: odds.c,v 1.4 1997/10/10 08:59:46 lukem Exp $ */ /* * Copyright (c) 1980, 1993 @@ -33,45 +33,48 @@ * SUCH DAMAGE. */ +#include #ifndef lint #if 0 static char sccsid[] = "@(#)odds.c 8.1 (Berkeley) 5/31/93"; #else -static char rcsid[] = "$NetBSD: odds.c,v 1.3 1995/03/21 15:05:47 cgd Exp $"; +__RCSID("$NetBSD: odds.c,v 1.4 1997/10/10 08:59:46 lukem Exp $"); #endif #endif /* not lint */ #include "back.h" -odds (r1,r2,val) -register int r1; -int r2, val; +void +odds(r1, r2, val) + int r1, r2, val; { - register int i, j; + int i, j; - if (r1 == 0) { - for (i = 0; i < 6; i++) + if (r1 == 0) { + for (i = 0; i < 6; i++) for (j = 0; j < 6; j++) table[i][j] = 0; return; - } else { + } else { r1--; - if (r2-- == 0) - for (i = 0; i < 6; i++) { + if (r2-- == 0) { + for (i = 0; i < 6; i++) { table[i][r1] += val; table[r1][i] += val; } - else { + } else { table[r2][r1] += val; table[r1][r2] += val; } } } -count () { - register int i; - register int j; - register int total; +int +count() +{ + int i; + int j; + int total; total = 0; for (i = 0; i < 6; i++) @@ -79,38 +82,38 @@ count () { total += table[i][j]; return (total); } - -canhit (i,c) -int i, c; +int +canhit(i, c) + int i, c; { - register int j, k, b; - int a, d, diff, place, addon, menstuck; + int j, k, b; + int a, diff, place, addon, menstuck; if (c == 0) - odds (0,0,0); - if (board[i] > 0) { + odds(0, 0, 0); + if (board[i] > 0) { a = -1; b = 25; - } else { + } else { a = 1; b = 0; } - place = abs (25-b-i); - menstuck = abs (board[b]); - for (j = b; j != i; j += a) { - if (board[j]*a > 0) { - diff = abs(j-i); - addon = place+((board[j]*a > 2 || j == b)? 5: 0); + place = abs(25 - b - i); + menstuck = abs(board[b]); + for (j = b; j != i; j += a) { + if (board[j] * a > 0) { + diff = abs(j - i); + addon = place + ((board[j] * a > 2 || j == b) ? 5 : 0); if ((j == b && menstuck == 1) && (j != b && menstuck == 0)) for (k = 1; k < diff; k++) - if (k < 7 && diff-k < 7 && - (board[i+a*k]*a >= 0 || - board[i+a*(diff-k)] >= 0)) - odds (k,diff-k,addon); + if (k < 7 && diff - k < 7 && + (board[i + a * k] * a >= 0 || + board[i + a * (diff - k)] >= 0)) + odds(k, diff - k, addon); if ((j == b || menstuck < 2) && diff < 7) - odds (diff,0,addon); + odds(diff, 0, addon); } if (j == b && menstuck > 1) break; diff --git a/backgammon/common_source/one.c b/backgammon/common_source/one.c index 4da451a9..7049377d 100644 --- a/backgammon/common_source/one.c +++ b/backgammon/common_source/one.c @@ -1,4 +1,4 @@ -/* $NetBSD: one.c,v 1.3 1995/03/21 15:05:49 cgd Exp $ */ +/* $NetBSD: one.c,v 1.4 1997/10/10 08:59:47 lukem Exp $ */ /* * Copyright (c) 1980, 1993 @@ -33,61 +33,62 @@ * SUCH DAMAGE. */ +#include #ifndef lint #if 0 static char sccsid[] = "@(#)one.c 8.1 (Berkeley) 5/31/93"; #else -static char rcsid[] = "$NetBSD: one.c,v 1.3 1995/03/21 15:05:49 cgd Exp $"; +__RCSID("$NetBSD: one.c,v 1.4 1997/10/10 08:59:47 lukem Exp $"); #endif #endif /* not lint */ #include "back.h" -makmove (i) -register int i; - +int +makmove(i) + int i; { - register int n, d; - int max; + int n, d; + int max; d = d0; - n = abs(g[i]-p[i]); - max = (*offptr < 0? 7: last()); - if (board[p[i]]*cturn <= 0) - return (checkd(d)+2); - if (g[i] != home && board[g[i]]*cturn < -1) - return (checkd(d)+3); - if (i || D0 == D1) { - if (n == max? D1 < n: D1 != n) - return (checkd(d)+1); - } else { - if (n == max? D0 < n && D1 < n: D0 != n && D1 != n) - return (checkd(d)+1); - if (n == max? D0 < n: D0 != n) { + n = abs(g[i] - p[i]); + max = (*offptr < 0 ? 7 : last()); + if (board[p[i]] * cturn <= 0) + return (checkd(d) + 2); + if (g[i] != home && board[g[i]] * cturn < -1) + return (checkd(d) + 3); + if (i || D0 == D1) { + if (n == max ? D1 < n : D1 != n) + return (checkd(d) + 1); + } else { + if (n == max ? D0 < n && D1 < n : D0 != n && D1 != n) + return (checkd(d) + 1); + if (n == max ? D0 < n : D0 != n) { if (d0) - return (checkd(d)+1); + return (checkd(d) + 1); swap; } } if (g[i] == home && *offptr < 0) - return (checkd(d)+4); + return (checkd(d) + 4); h[i] = 0; board[p[i]] -= cturn; - if (g[i] != home) { - if (board[g[i]] == -cturn) { + if (g[i] != home) { + if (board[g[i]] == -cturn) { board[home] -= cturn; board[g[i]] = 0; h[i] = 1; - if (abs(bar-g[i]) < 7) { + if (abs(bar - g[i]) < 7) { (*inopp)--; if (*offopp >= 0) *offopp -= 15; } } board[g[i]] += cturn; - if (abs(home-g[i]) < 7 && abs(home-p[i]) > 6) { + if (abs(home - g[i]) < 7 && abs(home - p[i]) > 6) { (*inptr)++; - if (*inptr+*offptr == 0) + if (*inptr + *offptr == 0) *offptr += 15; } } else { @@ -96,79 +97,82 @@ register int i; } return (0); } - -moverr (i) -register int i; +void +moverr(i) + int i; { - register int j; + int j; if (tflag) - curmove (20,0); + curmove(20, 0); else - writec ('\n'); - writel ("Error: "); - for (j = 0; j <= i; j++) { - wrint (p[j]); - writec ('-'); - wrint (g[j]); + writec('\n'); + writel("Error: "); + for (j = 0; j <= i; j++) { + wrint(p[j]); + writec('-'); + wrint(g[j]); if (j < i) - writec (','); + writec(','); } - writel ("... "); - movback (i); + writel("... "); + movback(i); } -checkd (d) -register int d; - +int +checkd(d) + int d; { if (d0 != d) swap; return (0); } -last () { - register int i; +int +last() +{ + int i; - for (i = home-6*cturn; i != home; i += cturn) - if (board[i]*cturn > 0) - return (abs(home-i)); + for (i = home - 6 * cturn; i != home; i += cturn) + if (board[i] * cturn > 0) + return (abs(home - i)); + return (-1); } - -movback (i) -register int i; +void +movback(i) + int i; { - register int j; + int j; - for (j = i-1; j >= 0; j--) + for (j = i - 1; j >= 0; j--) backone(j); } -backone (i) -register int i; - +void +backone(i) + int i; { board[p[i]] += cturn; - if (g[i] != home) { + if (g[i] != home) { board[g[i]] -= cturn; - if (abs(g[i]-home) < 7 && abs(p[i]-home) > 6) { + if (abs(g[i] - home) < 7 && abs(p[i] - home) > 6) { (*inptr)--; - if (*inptr+*offptr < 15 && *offptr >= 0) + if (*inptr + *offptr < 15 && *offptr >= 0) *offptr -= 15; } - } else { + } else { (*offptr)--; (*inptr)++; } - if (h[i]) { + if (h[i]) { board[home] += cturn; board[g[i]] = -cturn; - if (abs(bar-g[i]) < 7) { + if (abs(bar - g[i]) < 7) { (*inopp)++; - if (*inopp+*offopp == 0) + if (*inopp + *offopp == 0) *offopp += 15; } } diff --git a/backgammon/common_source/save.c b/backgammon/common_source/save.c index aa86cecf..5fd48f46 100644 --- a/backgammon/common_source/save.c +++ b/backgammon/common_source/save.c @@ -1,4 +1,4 @@ -/* $NetBSD: save.c,v 1.4 1995/04/29 00:44:13 mycroft Exp $ */ +/* $NetBSD: save.c,v 1.5 1997/10/10 08:59:48 lukem Exp $ */ /* * Copyright (c) 1980, 1993 @@ -33,154 +33,154 @@ * SUCH DAMAGE. */ +#include #ifndef lint #if 0 static char sccsid[] = "@(#)save.c 8.1 (Berkeley) 5/31/93"; #else -static char rcsid[] = "$NetBSD: save.c,v 1.4 1995/04/29 00:44:13 mycroft Exp $"; +__RCSID("$NetBSD: save.c,v 1.5 1997/10/10 08:59:48 lukem Exp $"); #endif #endif /* not lint */ #include "back.h" -extern int errno; +extern int errno; -static char confirm[] = "Are you sure you want to leave now?"; -static char prompt[] = "Enter a file name: "; -static char exist1[] = "The file '"; -static char exist2[] = - "' already exists.\nAre you sure you want to use this file?"; -static char cantuse[] = "\nCan't use "; -static char saved[] = "This game has been saved on the file '"; -static char type[] = "'.\nType \"backgammon "; -static char rec[] = "\" to recover your game.\n\n"; -static char cantrec[] = "Can't recover file: "; - -save (n) -register int n; +static char confirm[] = "Are you sure you want to leave now?"; +static char prompt[] = "Enter a file name: "; +static char exist1[] = "The file '"; +static char exist2[] = +"' already exists.\nAre you sure you want to use this file?"; +static char cantuse[] = "\nCan't use "; +static char saved[] = "This game has been saved on the file '"; +static char type[] = "'.\nType \"backgammon "; +static char rec[] = "\" to recover your game.\n\n"; +static char cantrec[] = "Can't recover file: "; +void +save(n) + int n; { - register int fdesc; - register char *fs; - char fname[50]; + int fdesc; + char *fs; + char fname[50]; - if (n) { - if (tflag) { - curmove (20,0); + if (n) { + if (tflag) { + curmove(20, 0); clend(); } else - writec ('\n'); - writel (confirm); - if (! yorn(0)) + writec('\n'); + writel(confirm); + if (!yorn(0)) return; } cflag = 1; - for (;;) { - writel (prompt); + for (;;) { + writel(prompt); fs = fname; - while ((*fs = readc()) != '\n') { - if (*fs == old.c_cc[VERASE]) { - if (fs > fname) { + while ((*fs = readc()) != '\n') { + if (*fs == old.c_cc[VERASE]) { + if (fs > fname) { fs--; if (tflag) - curmove (curr,curc-1); + curmove(curr, curc - 1); else - writec (*fs); + writec(*fs); } else - writec ('\007'); + writec('\007'); continue; } - writec (*fs++); + writec(*fs++); } *fs = '\0'; - if ((fdesc = open(fname,2)) == -1 && errno == 2) { - if ((fdesc = creat (fname,0700)) != -1) - break; + if ((fdesc = open(fname, 2)) == -1 && errno == 2) { + if ((fdesc = creat(fname, 0700)) != -1) + break; } - if (fdesc != -1) { - if (tflag) { - curmove (18,0); + if (fdesc != -1) { + if (tflag) { + curmove(18, 0); clend(); } else - writec ('\n'); - writel (exist1); - writel (fname); - writel (exist2); + writec('\n'); + writel(exist1); + writel(fname); + writel(exist2); cflag = 0; - close (fdesc); - if (yorn (0)) { - unlink (fname); - fdesc = creat (fname,0700); + close(fdesc); + if (yorn(0)) { + unlink(fname); + fdesc = creat(fname, 0700); break; - } else { + } else { cflag = 1; continue; } } - writel (cantuse); - writel (fname); - writel (".\n"); - close (fdesc); + writel(cantuse); + writel(fname); + writel(".\n"); + close(fdesc); cflag = 1; } - write (fdesc,board,sizeof board); - write (fdesc,off,sizeof off); - write (fdesc,in,sizeof in); - write (fdesc,dice,sizeof dice); - write (fdesc,&cturn,sizeof cturn); - write (fdesc,&dlast,sizeof dlast); - write (fdesc,&pnum,sizeof pnum); - write (fdesc,&rscore,sizeof rscore); - write (fdesc,&wscore,sizeof wscore); - write (fdesc,&gvalue,sizeof gvalue); - write (fdesc,&raflag,sizeof raflag); - close (fdesc); + write(fdesc, board, sizeof board); + write(fdesc, off, sizeof off); + write(fdesc, in, sizeof in); + write(fdesc, dice, sizeof dice); + write(fdesc, &cturn, sizeof cturn); + write(fdesc, &dlast, sizeof dlast); + write(fdesc, &pnum, sizeof pnum); + write(fdesc, &rscore, sizeof rscore); + write(fdesc, &wscore, sizeof wscore); + write(fdesc, &gvalue, sizeof gvalue); + write(fdesc, &raflag, sizeof raflag); + close(fdesc); if (tflag) - curmove (18,0); - writel (saved); - writel (fname); - writel (type); - writel (fname); - writel (rec); + curmove(18, 0); + writel(saved); + writel(fname); + writel(type); + writel(fname); + writel(rec); if (tflag) clend(); - getout (); + getout(0); } - -recover (s) -char *s; +void +recover(s) + char *s; { - register int i; - int fdesc; + int fdesc; - if ((fdesc = open (s,0)) == -1) - norec (s); - read (fdesc,board,sizeof board); - read (fdesc,off,sizeof off); - read (fdesc,in,sizeof in); - read (fdesc,dice,sizeof dice); - read (fdesc,&cturn,sizeof cturn); - read (fdesc,&dlast,sizeof dlast); - read (fdesc,&pnum,sizeof pnum); - read (fdesc,&rscore,sizeof rscore); - read (fdesc,&wscore,sizeof wscore); - read (fdesc,&gvalue,sizeof gvalue); - read (fdesc,&raflag,sizeof raflag); - close (fdesc); + if ((fdesc = open(s, 0)) == -1) + norec(s); + read(fdesc, board, sizeof board); + read(fdesc, off, sizeof off); + read(fdesc, in, sizeof in); + read(fdesc, dice, sizeof dice); + read(fdesc, &cturn, sizeof cturn); + read(fdesc, &dlast, sizeof dlast); + read(fdesc, &pnum, sizeof pnum); + read(fdesc, &rscore, sizeof rscore); + read(fdesc, &wscore, sizeof wscore); + read(fdesc, &gvalue, sizeof gvalue); + read(fdesc, &raflag, sizeof raflag); + close(fdesc); rflag = 1; } -norec (s) -register char *s; - +void +norec(s) + char *s; { - register char *c; + char *c; tflag = 0; - writel (cantrec); + writel(cantrec); c = s; while (*c != '\0') - writec (*c++); - getout (); + writec(*c++); + getout(0); } diff --git a/backgammon/common_source/subs.c b/backgammon/common_source/subs.c index 9fb185fe..6e0dbd7a 100644 --- a/backgammon/common_source/subs.c +++ b/backgammon/common_source/subs.c @@ -1,4 +1,4 @@ -/* $NetBSD: subs.c,v 1.5 1995/04/29 00:44:15 mycroft Exp $ */ +/* $NetBSD: subs.c,v 1.6 1997/10/10 08:59:48 lukem Exp $ */ /* * Copyright (c) 1980, 1993 @@ -33,25 +33,25 @@ * SUCH DAMAGE. */ +#include #ifndef lint #if 0 static char sccsid[] = "@(#)subs.c 8.1 (Berkeley) 5/31/93"; #else -static char rcsid[] = "$NetBSD: subs.c,v 1.5 1995/04/29 00:44:15 mycroft Exp $"; +__RCSID("$NetBSD: subs.c,v 1.6 1997/10/10 08:59:48 lukem Exp $"); #endif #endif /* not lint */ -#include #include "back.h" -int buffnum; -char outbuff[BUFSIZ]; +int buffnum; +char outbuff[BUFSIZ]; -static char plred[] = "Player is red, computer is white."; -static char plwhite[] = "Player is white, computer is red."; -static char nocomp[] = "(No computer play.)"; +static char plred[] = "Player is red, computer is white."; +static char plwhite[] = "Player is white, computer is red."; +static char nocomp[] = "(No computer play.)"; -char *descr[] = { +char *descr[] = { "Usage: backgammon [-] [n r w b pr pw pb t3a]\n", "\t-\tgets this list\n\tn\tdon't ask for rules or instructions", "\tr\tplayer is red (implies n)\n\tw\tplayer is white (implies n)", @@ -64,55 +64,61 @@ char *descr[] = { 0 }; -errexit (s) -register char *s; +void +errexit(s) + const char *s; { - write (2,"\n",1); - perror (s); - getout(); + write(2, "\n", 1); + perror(s); + getout(0); } -strset (s1,s2) -register char *s1, *s2; +void +strset(s1, s2) + char *s1, *s2; { - while ( (*s1++ = *s2++) != '\0'); + while ((*s1++ = *s2++) != '\0'); } -addbuf (c) -register char c; - +void +addbuf(c) + int c; { buffnum++; - if (buffnum == BUFSIZ) { - if (write(1,outbuff,BUFSIZ) != BUFSIZ) - errexit ("addbuf (write):"); + if (buffnum == BUFSIZ) { + if (write(1, outbuff, BUFSIZ) != BUFSIZ) + errexit("addbuf (write):"); buffnum = 0; } outbuff[buffnum] = c; } -buflush () { +void +buflush() +{ if (buffnum < 0) return; buffnum++; - if (write (1,outbuff,buffnum) != buffnum) - errexit ("buflush (write):"); + if (write(1, outbuff, buffnum) != buffnum) + errexit("buflush (write):"); buffnum = -1; } -readc () { - char c; +int +readc() +{ + char c; - if (tflag) { + if (tflag) { cline(); newpos(); } buflush(); - if (read(0,&c,1) != 1) - errexit ("readc"); + if (read(0, &c, 1) != 1) + errexit("readc"); #ifdef WHY_IS_THIS_HARDWIRED_IN_HERE if (c == '\177') - getout(); + getout(0); #endif if (c == '\033' || c == '\015') return ('\n'); @@ -125,122 +131,129 @@ readc () { return (c); } -writec (c) -char c; +void +writec(c) + char c; { if (tflag) - fancyc (c); + fancyc(c); else - addbuf (c); + addbuf(c); } -writel (l) -register char *l; +void +writel(l) + char *l; { #ifdef DEBUG - register char *s; + char *s; if (trace == NULL) - trace = fopen ("bgtrace","w"); - - fprintf (trace,"writel: \""); + trace = fopen("bgtrace", "w"); + + fprintf(trace, "writel: \""); for (s = l; *s; s++) { if (*s < ' ' || *s == '\177') - fprintf (trace,"^%c",(*s)^0100); + fprintf(trace, "^%c", (*s) ^ 0100); else - putc (*s,trace); + putc(*s, trace); } - fprintf (trace,"\"\n"); - fflush (trace); + fprintf(trace, "\"\n"); + fflush(trace); #endif while (*l) - writec (*l++); + writec(*l++); } -proll () { +void +proll() +{ if (d0) swap; if (cturn == 1) - writel ("Red's roll: "); + writel("Red's roll: "); else - writel ("White's roll: "); - writec (D0+'0'); - writec ('\040'); - writec (D1+'0'); + writel("White's roll: "); + writec(D0 + '0'); + writec('\040'); + writec(D1 + '0'); if (tflag) cline(); } -wrint (n) -int n; +void +wrint(n) + int n; { - register int i, j, t; + int i, j, t; - for (i = 4; i > 0; i--) { + for (i = 4; i > 0; i--) { t = 1; - for (j = 0; j t-1) - writec ((n/t)%10+'0'); + if (n > t - 1) + writec((n / t) % 10 + '0'); } - writec (n%10+'0'); + writec(n % 10 + '0'); } -gwrite() { - register int r, c; +void +gwrite() +{ + int r, c; - if (tflag) { + r = c = 0; + if (tflag) { r = curr; c = curc; - curmove (16,0); + curmove(16, 0); } - - if (gvalue > 1) { - writel ("Game value: "); - wrint (gvalue); - writel (". "); + if (gvalue > 1) { + writel("Game value: "); + wrint(gvalue); + writel(". "); if (dlast == -1) - writel (color[0]); + writel(color[0]); else - writel (color[1]); - writel (" doubled last."); - } else { - switch (pnum) { - case -1: /* player is red */ - writel (plred); + writel(color[1]); + writel(" doubled last."); + } else { + switch (pnum) { + case -1: /* player is red */ + writel(plred); break; - case 0: /* player is both colors */ - writel (nocomp); + case 0: /* player is both colors */ + writel(nocomp); break; - case 1: /* player is white */ - writel (plwhite); + case 1: /* player is white */ + writel(plwhite); } } - if (rscore || wscore) { - writel (" "); + if (rscore || wscore) { + writel(" "); wrscore(); } - - if (tflag) { + if (tflag) { cline(); - curmove (r,c); + curmove(r, c); } } -quit () { - register int i; +int +quit() +{ - if (tflag) { - curmove (20,0); + if (tflag) { + curmove(20, 0); clend(); } else - writec ('\n'); - writel ("Are you sure you want to quit?"); - if (yorn (0)) { - if (rfl) { - writel ("Would you like to save this game?"); + writec('\n'); + writel("Are you sure you want to quit?"); + if (yorn(0)) { + if (rfl) { + writel("Would you like to save this game?"); if (yorn(0)) save(0); } @@ -250,52 +263,56 @@ quit () { return (0); } -yorn (special) -register char special; /* special response */ +int +yorn(special) + char special; /* special response */ { - register char c; - register int i; + char c; + int i; i = 1; - while ( (c = readc()) != 'Y' && c != 'N') { + while ((c = readc()) != 'Y' && c != 'N') { if (special && c == special) return (2); - if (i) { - if (special) { - writel (" (Y, N, or "); - writec (special); - writec (')'); + if (i) { + if (special) { + writel(" (Y, N, or "); + writec(special); + writec(')'); } else - writel (" (Y or N)"); + writel(" (Y or N)"); i = 0; } else - writec ('\007'); + writec('\007'); } if (c == 'Y') - writel (" Yes.\n"); + writel(" Yes.\n"); else - writel (" No.\n"); + writel(" No.\n"); if (tflag) buflush(); return (c == 'Y'); } -wrhit (i) -register int i; +void +wrhit(i) + int i; { - writel ("Blot hit on "); - wrint (i); - writec ('.'); - writec ('\n'); + writel("Blot hit on "); + wrint(i); + writec('.'); + writec('\n'); } -nexturn () { - register int c; +void +nexturn() +{ + int c; cturn = -cturn; - c = cturn/abs(cturn); + c = cturn / abs(cturn); home = bar; - bar = 25-bar; + bar = 25 - bar; offptr += c; offopp -= c; inptr += c; @@ -304,20 +321,20 @@ nexturn () { colorptr += c; } -getarg (arg) -register char ***arg; - +void +getarg(arg) + char ***arg; { - register char **s; + char **s; - /* process arguments here. dashes are ignored, nbrw are ignored - if the game is being recovered */ + /* process arguments here. dashes are ignored, nbrw are ignored if + * the game is being recovered */ s = *arg; while (s[0][0] == '-') { - switch (s[0][1]) { + switch (s[0][1]) { - /* don't ask if rules or instructions needed */ + /* don't ask if rules or instructions needed */ case 'n': if (rflag) break; @@ -325,7 +342,7 @@ register char ***arg; args[acnt++] = 'n'; break; - /* player is both read and white */ + /* player is both read and white */ case 'b': if (rflag) break; @@ -334,7 +351,7 @@ register char ***arg; args[acnt++] = 'b'; break; - /* player is red */ + /* player is red */ case 'r': if (rflag) break; @@ -343,7 +360,7 @@ register char ***arg; args[acnt++] = 'r'; break; - /* player is white */ + /* player is white */ case 'w': if (rflag) break; @@ -352,7 +369,8 @@ register char ***arg; args[acnt++] = 'w'; break; - /* print board after move according to following character */ + /* print board after move according to following + * character */ case 'p': if (s[0][2] != 'r' && s[0][2] != 'w' && s[0][2] != 'b') break; @@ -369,15 +387,15 @@ register char ***arg; case 't': if (s[0][2] == '\0') { /* get terminal caps */ s++; - tflag = getcaps (*s); + tflag = getcaps(*s); } else - tflag = getcaps (&s[0][2]); + tflag = getcaps(&s[0][2]); break; case 's': s++; /* recover file */ - recover (s[0]); + recover(s[0]); break; } s++; @@ -386,8 +404,11 @@ register char ***arg; recover(s[0]); } -init () { - register int i; +void +init() +{ + int i; + for (i = 0; i < 26;) board[i++] = 0; board[1] = 2; @@ -402,81 +423,91 @@ init () { dlast = 0; } -wrscore () { - writel ("Score: "); - writel (color[1]); - writec (' '); - wrint (rscore); - writel (", "); - writel (color[0]); - writec (' '); - wrint (wscore); +void +wrscore() +{ + writel("Score: "); + writel(color[1]); + writec(' '); + wrint(rscore); + writel(", "); + writel(color[0]); + writec(' '); + wrint(wscore); } -fixtty (t) -struct termios *t; +void +fixtty(t) + struct termios *t; { if (tflag) newpos(); buflush(); - if (tcsetattr (0, TCSADRAIN, t) < 0) + if (tcsetattr(0, TCSADRAIN, t) < 0) errexit("fixtty"); } -getout () { +void +getout(dummy) + int dummy; +{ /* go to bottom of screen */ - if (tflag) { - curmove (23,0); + if (tflag) { + curmove(23, 0); cline(); } else - writec ('\n'); + writec('\n'); /* fix terminal status */ - fixtty (&old); + fixtty(&old); exit(0); } -roll () { - register char c; - register int row; - register int col; - if (iroll) { - if (tflag) { +void +roll() +{ + char c; + int row; + int col; + + row = col = 0; + if (iroll) { + if (tflag) { row = curr; col = curc; - curmove (17,0); + curmove(17, 0); } else - writec ('\n'); - writel ("ROLL: "); + writec('\n'); + writel("ROLL: "); c = readc(); - if (c != '\n') { + if (c != '\n') { while (c < '1' || c > '6') c = readc(); - D0 = c-'0'; - writec (' '); - writec (c); + D0 = c - '0'; + writec(' '); + writec(c); c = readc(); while (c < '1' || c > '6') c = readc(); - D1 = c-'0'; - writec (' '); - writec (c); - if (tflag) { - curmove (17,0); + D1 = c - '0'; + writec(' '); + writec(c); + if (tflag) { + curmove(17, 0); cline(); - curmove (row,col); + curmove(row, col); } else - writec ('\n'); + writec('\n'); return; } - if (tflag) { - curmove (17,0); + if (tflag) { + curmove(17, 0); cline(); - curmove (row,col); + curmove(row, col); } else - writec ('\n'); + writec('\n'); } - D0 = rnum(6)+1; - D1 = rnum(6)+1; + D0 = rnum(6) + 1; + D1 = rnum(6) + 1; d0 = 0; } diff --git a/backgammon/common_source/table.c b/backgammon/common_source/table.c index 8c8329db..36f2e69e 100644 --- a/backgammon/common_source/table.c +++ b/backgammon/common_source/table.c @@ -1,4 +1,4 @@ -/* $NetBSD: table.c,v 1.4 1995/04/29 00:44:16 mycroft Exp $ */ +/* $NetBSD: table.c,v 1.5 1997/10/10 08:59:49 lukem Exp $ */ /* * Copyright (c) 1980, 1993 @@ -33,69 +33,68 @@ * SUCH DAMAGE. */ +#include #ifndef lint #if 0 static char sccsid[] = "@(#)table.c 8.1 (Berkeley) 5/31/93"; #else -static char rcsid[] = "$NetBSD: table.c,v 1.4 1995/04/29 00:44:16 mycroft Exp $"; +__RCSID("$NetBSD: table.c,v 1.5 1997/10/10 08:59:49 lukem Exp $"); #endif #endif /* not lint */ #include "back.h" -char *help2[] = { +char *help2[] = { " Enter moves as - or / where is the starting", "position, is the finishing position, and is the roll.", "Remember, each die roll must be moved separately.", 0 }; -struct state { - char ch; - int fcode; - int newst; +struct state { + char ch; + int fcode; + int newst; }; -struct state atmata[] = { +struct state atmata[] = { - 'R', 1, 0, '?', 7, 0, 'Q', 0, -3, 'B', 8, 25, - '9', 2, 25, '8', 2, 25, '7', 2, 25, '6', 2, 25, - '5', 2, 25, '4', 2, 25, '3', 2, 25, '2', 2, 19, - '1', 2, 15, '0', 2, 25, '.', 0, 0, '9', 2, 25, - '8', 2, 25, '7', 2, 25, '6', 2, 25, '5', 2, 25, + {'R', 1, 0}, {'?', 7, 0}, {'Q', 0, -3}, {'B', 8, 25}, + {'9', 2, 25}, {'8', 2, 25}, {'7', 2, 25}, {'6', 2, 25}, + {'5', 2, 25}, {'4', 2, 25}, {'3', 2, 25}, {'2', 2, 19}, + {'1', 2, 15}, {'0', 2, 25}, {'.', 0, 0}, {'9', 2, 25}, + {'8', 2, 25}, {'7', 2, 25}, {'6', 2, 25}, {'5', 2, 25}, - '4', 2, 25, '3', 2, 25, '2', 2, 25, '1', 2, 25, - '0', 2, 25, '/', 0, 32, '-', 0, 39, '.', 0, 0, - '/', 5, 32, ' ', 6, 3, ',', 6, 3, '\n', 0, -1, - '6', 3, 28, '5', 3, 28, '4', 3, 28, '3', 3, 28, - '2', 3, 28, '1', 3, 28, '.', 0, 0, 'H', 9, 61, + {'4', 2, 25}, {'3', 2, 25}, {'2', 2, 25}, {'1', 2, 25}, + {'0', 2, 25}, {'/', 0, 32}, {'-', 0, 39}, {'.', 0, 0}, + {'/', 5, 32}, {' ', 6, 3}, {',', 6, 3}, {'\n', 0, -1}, + {'6', 3, 28}, {'5', 3, 28}, {'4', 3, 28}, {'3', 3, 28}, + {'2', 3, 28}, {'1', 3, 28}, {'.', 0, 0}, {'H', 9, 61}, - '9', 4, 61, '8', 4, 61, '7', 4, 61, '6', 4, 61, - '5', 4, 61, '4', 4, 61, '3', 4, 61, '2', 4, 53, - '1', 4, 51, '0', 4, 61, '.', 0, 0, '9', 4, 61, - '8', 4, 61, '7', 4, 61, '6', 4, 61, '5', 4, 61, - '4', 4, 61, '3', 4, 61, '2', 4, 61, '1', 4, 61, + {'9', 4, 61}, {'8', 4, 61}, {'7', 4, 61}, {'6', 4, 61}, + {'5', 4, 61}, {'4', 4, 61}, {'3', 4, 61}, {'2', 4, 53}, + {'1', 4, 51}, {'0', 4, 61}, {'.', 0, 0}, {'9', 4, 61}, + {'8', 4, 61}, {'7', 4, 61}, {'6', 4, 61}, {'5', 4, 61}, + {'4', 4, 61}, {'3', 4, 61}, {'2', 4, 61}, {'1', 4, 61}, - '0', 4, 61, ' ', 6, 3, ',', 6, 3, '-', 5, 39, - '\n', 0, -1, '.', 0, 0 + {'0', 4, 61}, {' ', 6, 3}, {',', 6, 3}, {'-', 5, 39}, + {'\n', 0, -1}, {'.', 0, 0} }; -checkmove (ist) - -int ist; - +int +checkmove(ist) + int ist; { - register int j, n; - register char c; - char a; + int j, n; + char c; domove: - if (ist == 0) { + if (ist == 0) { if (tflag) - curmove (curr,32); + curmove(curr, 32); else - writel ("\t\t"); - writel ("Move: "); + writel("\t\t"); + writel("Move: "); } ist = mvl = ncin = 0; for (j = 0; j < 5; j++) @@ -104,32 +103,31 @@ domove: dochar: c = readc(); - if (c == 'S') { + if (c == 'S') { raflag = 0; - save (1); - if (tflag) { - curmove (cturn == -1? 18: 19,39); + save(1); + if (tflag) { + curmove(cturn == -1 ? 18 : 19, 39); ist = -1; goto domove; - } else { - proll (); + } else { + proll(); ist = 0; goto domove; } } - - if (c == old.c_cc[VERASE] && ncin > 0) { + if (c == old.c_cc[VERASE] && ncin > 0) { if (tflag) - curmove (curr,curc-1); - else { + curmove(curr, curc - 1); + else { if (old.c_cc[VERASE] == '\010') - writel ("\010 \010"); + writel("\010 \010"); else - writec (cin[ncin-1]); + writec(cin[ncin - 1]); } ncin--; n = rsetbrd(); - if (n == 0) { + if (n == 0) { n = -1; if (tflag) refresh(); @@ -138,110 +136,107 @@ dochar: goto dochar; goto domove; } - - if (c == old.c_cc[VKILL] && ncin > 0) { - if (tflag) { + if (c == old.c_cc[VKILL] && ncin > 0) { + if (tflag) { refresh(); - curmove (curr,39); + curmove(curr, 39); ist = -1; goto domove; - } else if (old.c_cc[VERASE] == '\010') { - for (j = 0; j < ncin; j++) - writel ("\010 \010"); - ist = -1; - goto domove; - } else { - writec ('\\'); - writec ('\n'); - proll (); - ist = 0; - goto domove; - } + } else + if (old.c_cc[VERASE] == '\010') { + for (j = 0; j < ncin; j++) + writel("\010 \010"); + ist = -1; + goto domove; + } else { + writec('\\'); + writec('\n'); + proll(); + ist = 0; + goto domove; + } } - - n = dotable(c,ist); - if (n >= 0) { + n = dotable(c, ist); + if (n >= 0) { cin[ncin++] = c; if (n > 2) - if ((! tflag) || c != '\n') - writec (c); + if ((!tflag) || c != '\n') + writec(c); ist = n; if (n) goto dochar; else goto domove; } - if (n == -1 && mvl >= mvlim) - return(0); - if (n == -1 && mvl < mvlim-1) - return(-4); + return (0); + if (n == -1 && mvl < mvlim - 1) + return (-4); - if (n == -6) { - if (! tflag) { - if (movokay(mvl+1)) { + if (n == -6) { + if (!tflag) { + if (movokay(mvl + 1)) { wrboard(); - movback (mvl+1); + movback(mvl + 1); } - proll (); - writel ("\t\tMove: "); + proll(); + writel("\t\tMove: "); for (j = 0; j < ncin;) - writec (cin[j++]); - } else { - if (movokay(mvl+1)) { + writec(cin[j++]); + } else { + if (movokay(mvl + 1)) { refresh(); - movback (mvl+1); + movback(mvl + 1); } else - curmove (cturn == -1? 18:19,ncin+39); + curmove(cturn == -1 ? 18 : 19, ncin + 39); } ist = n = rsetbrd(); goto dochar; } - if (n != -5) - return(n); - writec ('\007'); + return (n); + writec('\007'); goto dochar; } - -dotable (c,i) -char c; -register int i; +int +dotable(c, i) + char c; + int i; { - register int a, j; - int test; + int a; + int test; test = (c == 'R'); - while ( (a = atmata[i].ch) != '.') { - if (a == c || (test && a == '\n')) { - switch (atmata[i].fcode) { + while ((a = atmata[i].ch) != '.') { + if (a == c || (test && a == '\n')) { + switch (atmata[i].fcode) { case 1: wrboard(); - if (tflag) { - curmove (cturn == -1? 18: 19,0); - proll (); - writel ("\t\t"); + if (tflag) { + curmove(cturn == -1 ? 18 : 19, 0); + proll(); + writel("\t\t"); } else - proll (); + proll(); break; case 2: if (p[mvl] == -1) - p[mvl] = c-'0'; + p[mvl] = c - '0'; else - p[mvl] = p[mvl]*10+c-'0'; + p[mvl] = p[mvl] * 10 + c - '0'; break; case 3: - if (g[mvl] != -1) { + if (g[mvl] != -1) { if (mvl < mvlim) mvl++; - p[mvl] = p[mvl-1]; + p[mvl] = p[mvl - 1]; } - g[mvl] = p[mvl]+cturn*(c-'0'); + g[mvl] = p[mvl] + cturn * (c - '0'); if (g[mvl] < 0) g[mvl] = 0; if (g[mvl] > 25) @@ -250,15 +245,15 @@ register int i; case 4: if (g[mvl] == -1) - g[mvl] = c-'0'; + g[mvl] = c - '0'; else - g[mvl] = g[mvl]*10+c-'0'; + g[mvl] = g[mvl] * 10 + c - '0'; break; case 5: if (mvl < mvlim) mvl++; - p[mvl] = g[mvl-1]; + p[mvl] = g[mvl - 1]; break; case 6: @@ -268,16 +263,16 @@ register int i; case 7: if (tflag) - curmove (20,0); + curmove(20, 0); else - writec ('\n'); - text (help2); - if (tflag) { - curmove (cturn == -1? 18: 19,39); - } else { - writec ('\n'); + writec('\n'); + (void) text(help2); + if (tflag) { + curmove(cturn == -1 ? 18 : 19, 39); + } else { + writec('\n'); proll(); - writel ("\t\tMove: "); + writel("\t\tMove: "); } break; @@ -289,26 +284,27 @@ register int i; g[mvl] = home; } - if (! test || a != '\n') + if (!test || a != '\n') return (atmata[i].newst); else return (-6); } - i++; } return (-5); } - -rsetbrd () { - register int i, j, n; + +int +rsetbrd() +{ + int i, j, n; n = 0; mvl = 0; for (i = 0; i < 4; i++) p[i] = g[i] = -1; for (j = 0; j < ncin; j++) - n = dotable (cin[j],n); + n = dotable(cin[j], n); return (n); } -- cgit v1.2.3-56-ge451