![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to answer.c CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [CSRG BSD Unix] / 43BSD / games / hunt|
Return to answer.c CVS log | Up to [CSRG BSD Unix] / 43BSD / games / hunt |
1.1 root 1: /*
2: * Hunt
3: * Copyright (c) 1985 Conrad C. Huang, Gregory S. Couch, Kenneth C.R.C. Arnold
4: * San Francisco, California
5: *
6: * Copyright (c) 1985 Regents of the University of California.
7: * All rights reserved. The Berkeley software License Agreement
8: * specifies the terms and conditions for redistribution.
9: */
10:
11: # include "hunt.h"
12: # include <errno.h>
13:
14: # define MAXPERMACH 3 /* Max player/monitor per machine */
15:
16: static char Ttyname[NAMELEN];
17:
18: answer()
19: {
20: register PLAYER *pp;
21: register int newsock;
22: register FILE *tmpfd;
23: # ifdef MONITOR
24: static FLAG monitor;
25: # endif MONITOR
26: static char name[NAMELEN];
27: static int socklen;
28: static u_long machine;
29: static u_long uid;
30: static SOCKET sockstruct;
31: # ifdef OLDIPC
32: extern SOCKET Daemon;
33: # endif OLDIPC
34:
35: # ifdef INTERNET
36: socklen = sizeof sockstruct;
37: # else
38: socklen = sizeof sockstruct - 1;
39: # endif INTERNET
40: errno = 0;
41: # ifndef OLDIPC
42: if ((newsock = accept(Socket, &sockstruct, &socklen)) < 0)
43: # else OLDIPC
44: if (accept(Socket, &sockstruct) < 0)
45: # endif OLDIPC
46: {
47: if (errno == EINTR)
48: return;
49: perror("accept");
50: cleanup(1);
51: }
52: # ifdef OLDIPC
53: newsock = Socket;
54: Socket = socket(SOCK_STREAM, 0, (struct sockaddr *) &Daemon,
55: SO_ACCEPTCONN);
56: if (Socket < 0) {
57: perror("new accept socket");
58: cleanup(1);
59: }
60: Sock_mask = (1 << Socket);
61: Fds_mask |= Sock_mask;
62: if (Socket >= Num_fds)
63: Num_fds = Socket + 1;
64: # endif OLDIPC
65:
66: tmpfd = fdopen(newsock, "w");
67:
68: # ifdef INTERNET
69: machine = ntohl(((struct sockaddr_in *) &sockstruct)->sin_addr.s_addr);
70: # else INTERNET
71: if (machine == 0)
72: machine = gethostid();
73: # endif INTERNET
74: (void) putw(getpid(), tmpfd);
75: (void) read(newsock, (char *) &uid, sizeof uid);
76: uid = ntohl(uid);
77: (void) read(newsock, name, NAMELEN);
78: (void) read(newsock, Ttyname, NAMELEN);
79: # ifdef MONITOR
80: (void) read(newsock, (char *) &monitor, sizeof monitor);
81: # endif MONITOR
82:
83: if (reached_limit(machine)) {
84: socklen = 0;
85: (void) write(newsock, (char *) &socklen, sizeof socklen);
86: (void) close(newsock);
87: # ifdef OLDIPC
88: Fds_mask &= ~(1 << newsock);
89: # endif OLDIPC
90: return;
91: }
92:
93: # ifdef MONITOR
94: if (monitor)
95: if (End_monitor < &Monitor[MAXMON])
96: pp = End_monitor++;
97: else {
98: socklen = 0;
99: (void) write(newsock, (char *) &socklen,
100: sizeof socklen);
101: (void) close(newsock);
102: return;
103: }
104: else
105: # endif MONITOR
106: if (End_player < &Player[MAXPL])
107: pp = End_player++;
108: else {
109: socklen = 0;
110: (void) write(newsock, (char *) &socklen,
111: sizeof socklen);
112: (void) close(newsock);
113: return;
114: }
115:
116: pp->p_ident = get_ident(machine, uid, name);
117: pp->p_output = tmpfd;
118: pp->p_death[0] = '\0';
119: pp->p_fd = newsock;
120: pp->p_mask = (1 << pp->p_fd);
121: # ifndef OLDIPC
122: Fds_mask |= pp->p_mask;
123: if (pp->p_fd >= Num_fds)
124: Num_fds = pp->p_fd + 1;
125: # endif OLDIPC
126:
127: pp->p_y = 0;
128: pp->p_x = 0;
129:
130: # ifdef MONITOR
131: if (monitor)
132: stmonitor(pp);
133: else
134: # endif MONITOR
135: stplayer(pp);
136: }
137:
138: # ifdef MONITOR
139: stmonitor(pp)
140: register PLAYER *pp;
141: {
142: register int line;
143: register PLAYER *npp;
144:
145: bcopy((char *) Maze, (char *) pp->p_maze, sizeof Maze);
146:
147: drawmaze(pp);
148:
149: (void) sprintf(Buf, "%5.5s%c%-10.10s", " ", stat_char(pp),
150: pp->p_ident->i_name);
151: line = STAT_MON_ROW + 1 + (pp - Monitor);
152: for (npp = Player; npp < End_player; npp++) {
153: cgoto(npp, line, STAT_NAME_COL);
154: outstr(npp, Buf, STAT_NAME_LEN);
155: }
156: for (npp = Monitor; npp < End_monitor; npp++) {
157: cgoto(npp, line, STAT_NAME_COL);
158: outstr(npp, Buf, STAT_NAME_LEN);
159: }
160:
161: sendcom(pp, REFRESH);
162: sendcom(pp, READY, 0);
163: (void) fflush(pp->p_output);
164: }
165: # endif MONITOR
166:
167: stplayer(newpp)
168: register PLAYER *newpp;
169: {
170: register int x, y;
171: register PLAYER *pp;
172:
173: Nplayer++;
174:
175: for (y = 0; y < UBOUND; y++)
176: for (x = 0; x < WIDTH; x++)
177: newpp->p_maze[y][x] = Maze[y][x];
178: for ( ; y < DBOUND; y++) {
179: for (x = 0; x < LBOUND; x++)
180: newpp->p_maze[y][x] = Maze[y][x];
181: for ( ; x < RBOUND; x++)
182: newpp->p_maze[y][x] = SPACE;
183: for ( ; x < WIDTH; x++)
184: newpp->p_maze[y][x] = Maze[y][x];
185: }
186: for ( ; y < HEIGHT; y++)
187: for (x = 0; x < WIDTH; x++)
188: newpp->p_maze[y][x] = Maze[y][x];
189:
190: do {
191: x = rand_num(WIDTH - 1) + 1;
192: y = rand_num(HEIGHT - 1) + 1;
193: } while (Maze[y][x] != SPACE);
194: newpp->p_over = SPACE;
195: newpp->p_x = x;
196: newpp->p_y = y;
197: newpp->p_undershot = FALSE;
198:
199: # ifdef START_FLYING
200: /* This is only for debugging */
201: newpp->p_flying = rand_num(20);
202: newpp->p_flyx = 2 * rand_num(6) - 5;
203: newpp->p_flyy = 2 * rand_num(6) - 5;
204: newpp->p_face = FLYER;
205: # else START_FLYING
206: newpp->p_flying = -1;
207: rand_face(newpp);
208: # endif START_FLYING
209: newpp->p_damage = 0;
210: newpp->p_damcap = MAXDAM;
211: newpp->p_nchar = 0;
212: newpp->p_ncount = 0;
213: newpp->p_nexec = 0;
214: newpp->p_ammo = ISHOTS;
215: newpp->p_scan = -1;
216: newpp->p_cloak = CLOAKLEN;
217: newpp->p_ncshot = 0;
218:
219: do {
220: x = rand_num(WIDTH - 1) + 1;
221: y = rand_num(HEIGHT - 1) + 1;
222: } while (Maze[y][x] != SPACE);
223: Maze[y][x] = GMINE;
224: # ifdef MONITOR
225: for (pp = Monitor; pp < End_monitor; pp++)
226: check(pp, y, x);
227: # endif MONITOR
228:
229: do {
230: x = rand_num(WIDTH - 1) + 1;
231: y = rand_num(HEIGHT - 1) + 1;
232: } while (Maze[y][x] != SPACE);
233: Maze[y][x] = MINE;
234: # ifdef MONITOR
235: for (pp = Monitor; pp < End_monitor; pp++)
236: check(pp, y, x);
237: # endif MONITOR
238:
239: (void) sprintf(Buf, "%5.2f%c%-10.10s", newpp->p_ident->i_score,
240: stat_char(newpp), newpp->p_ident->i_name);
241: y = STAT_PLAY_ROW + 1 + (newpp - Player);
242: for (pp = Player; pp < End_player; pp++) {
243: if (pp != newpp) {
244: char smallbuf[10];
245:
246: pp->p_ammo += NSHOTS;
247: newpp->p_ammo += NSHOTS;
248: cgoto(pp, y, STAT_NAME_COL);
249: outstr(pp, Buf, STAT_NAME_LEN);
250: (void) sprintf(smallbuf, "%3d", pp->p_ammo);
251: cgoto(pp, STAT_AMMO_ROW, STAT_VALUE_COL);
252: outstr(pp, smallbuf, 3);
253: }
254: }
255: # ifdef MONITOR
256: for (pp = Monitor; pp < End_monitor; pp++) {
257: cgoto(pp, y, STAT_NAME_COL);
258: outstr(pp, Buf, STAT_NAME_LEN);
259: }
260: # endif MONITOR
261:
262: drawmaze(newpp);
263: drawplayer(newpp, TRUE);
264: look(newpp);
265: # ifdef START_FLYING
266: /* Make sure that the position you enter in will be erased */
267: showexpl(newpp->p_y, newpp->p_x, FLYER);
268: # endif START_FLYING
269: sendcom(newpp, REFRESH);
270: sendcom(newpp, READY, 0);
271: (void) fflush(newpp->p_output);
272: }
273:
274: /*
275: * rand_face:
276: * Give the player a random facing direction
277: */
278: rand_face(pp)
279: register PLAYER *pp;
280: {
281: switch (rand_num(4)) {
282: case 0:
283: pp->p_face = LEFTS;
284: break;
285: case 1:
286: pp->p_face = RIGHT;
287: break;
288: case 2:
289: pp->p_face = BELOW;
290: break;
291: case 3:
292: pp->p_face = ABOVE;
293: break;
294: }
295: }
296:
297: /*
298: * get_ident:
299: * Get the score structure of a player
300: */
301: IDENT *
302: get_ident(machine, uid, name)
303: u_long machine;
304: u_long uid;
305: char *name;
306: {
307: register IDENT *ip;
308: static IDENT punt;
309:
310: for (ip = Scores; ip != NULL; ip = ip->i_next)
311: if (ip->i_machine == machine && ip->i_uid == uid &&
312: strncmp(ip->i_name, name, NAMELEN) == 0)
313: break;
314:
315: if (ip != NULL) {
316: ip->i_entries++;
317: ip->i_score = ip->i_kills / (double) ip->i_entries;
318: }
319: else {
320: ip = (IDENT *) malloc(sizeof (IDENT));
321: if (ip == NULL) {
322: /* Fourth down, time to punt */
323: ip = &punt;
324: }
325: ip->i_machine = machine;
326: ip->i_uid = uid;
327: strncpy(ip->i_name, name, NAMELEN);
328: ip->i_kills = 0;
329: ip->i_entries = 1;
330: ip->i_score = 0;
331: ip->i_next = Scores;
332: Scores = ip;
333: }
334:
335: return ip;
336: }
337:
338: /*
339: * reached_limit:
340: * Returns whether the limit of x persons per machine has been reached
341: */
342: reached_limit(machine)
343: u_long machine;
344: {
345: register PLAYER *pp;
346: register int count;
347:
348: count = 0;
349: for (pp = Player; pp < End_player; pp++)
350: if (pp->p_ident->i_machine == machine)
351: count++;
352: for (pp = Monitor; pp < End_monitor; pp++)
353: if (pp->p_ident->i_machine == machine)
354: count++;
355: return count >= MAXPERMACH;
356: }
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.