1 /***********************************************************
2 * Rocks'n'Diamonds -- McDuffin Strikes Back! *
3 *----------------------------------------------------------*
4 * (c) 1995-98 Artsoft Entertainment *
8 * phone: ++49 +521 290471 *
9 * email: aeglos@valinor.owl.de *
10 *----------------------------------------------------------*
12 ***********************************************************/
18 #include <sys/types.h>
21 #include <sys/socket.h>
24 #include <netinet/in.h>
25 #include <netinet/tcp.h>
26 #include <arpa/inet.h>
32 static int clients = 0;
33 static int onceonly = 0;
34 static int is_daemon = 0;
39 unsigned char nick[16];
41 struct user *next, *nextvictim;
44 unsigned char readbuf[MAX_BUFFER_SIZE];
46 unsigned char writbuf[MAX_BUFFER_SIZE];
54 static struct user *user0 = NULL;
56 #define NEXT(u) ((u)->next ? (u)->next : user0)
58 static struct sockaddr_in saddr;
60 static unsigned char realbuf[512], *buf = realbuf + 4;
65 static unsigned long frame_counter = 0;
69 static void syserr(char *s)
72 fprintf(stderr, "fatal: %s failed.\n", s);
76 static void addtobuffer(struct user *u, unsigned char *b, int len)
78 if (u->nwrite + len >= MAX_BUFFER_SIZE)
79 Error(ERR_EXIT, "internal error: network send buffer overflow");
81 memcpy(u->writbuf + u->nwrite, b, len);
85 static void flushuser(struct user *u)
89 write(u->fd, u->writbuf, u->nwrite);
94 static void broadcast(struct user *except, int len, int activeonly)
98 realbuf[0] = realbuf[1] = realbuf[2] = 0;
99 realbuf[3] = (unsigned char)len;
100 for (u=user0; u; u=u->next)
101 if (u != except && (u->active || !activeonly) && u->introduced)
102 addtobuffer(u, realbuf, 4 + len);
105 static void sendtoone(struct user *to, int len)
107 realbuf[0] = realbuf[1] = realbuf[2] = 0;
108 realbuf[3] = (unsigned char)len;
109 addtobuffer(to, realbuf, 4 + len);
112 static void dropuser(struct user *u)
117 printf("RND_SERVER: dropping client %d (%s)\n", u->number, u->nick);
123 for (v=user0; v; v=v->next)
125 if (v->next && v->next == u)
137 buf[1] = OP_PLAYER_DISCONNECTED;
141 for (v=user0; v; v=v->next)
143 if (v->nextvictim == u)
145 for (w=NEXT(v); w!=v; w=NEXT(w))
147 if (w->active && w->playing)
153 if (v->nextvictim == u)
154 v->nextvictim = NULL;
161 if (onceonly && clients == 0)
165 printf("RND_SERVER: no clients left\n");
166 printf("RND_SERVER: aborting\n");
172 static void new_connect(int fd)
177 u = checked_malloc(sizeof (struct user));
182 u->nextvictim = NULL;
190 u->action_received = 0;
200 if (v->number == nxn)
210 printf("RND_SERVER: client %d connecting from %s\n", nxn, inet_ntoa(saddr.sin_addr));
214 buf[1] = OP_YOUR_NUMBER;
219 static void Handle_OP_PROTOCOL_VERSION(struct user *u, unsigned int len)
221 if (len != 5 || buf[2] != PROTOCOL_VERSION_1 || buf[3] != PROTOCOL_VERSION_2)
224 printf("RND_SERVER: client %d (%s) has wrong protocol version %d.%d.%d\n", u->number, u->nick, buf[2], buf[3], buf[4]);
228 buf[2] = PROTOCOL_VERSION_1;
229 buf[3] = PROTOCOL_VERSION_2;
230 buf[4] = PROTOCOL_VERSION_3;
240 printf("RND_SERVER: client %d (%s) uses protocol version %d.%d.%d\n", u->number, u->nick, buf[2], buf[3], buf[4]);
244 static void Handle_OP_NUMBER_WANTED(struct user *u)
247 int client_nr = u->number;
248 int nr_wanted = buf[2];
252 printf("RND_SERVER: client %d (%s) wants to switch to # %d\n",
253 u->number, u->nick, nr_wanted);
255 for (v=user0; v; v=v->next)
257 if (v->number == nr_wanted)
267 printf("RND_SERVER: client %d (%s) switches to # %d\n",
268 u->number, u->nick, nr_wanted);
269 else if (u->number == nr_wanted)
270 printf("RND_SERVER: client %d (%s) still has # %d\n",
271 u->number, u->nick, nr_wanted);
273 printf("RND_SERVER: client %d (%s) cannot switch (client %d still exists)\n",
274 u->number, u->nick, nr_wanted);
278 u->number = nr_wanted;
281 buf[1] = OP_NUMBER_WANTED;
289 broadcast(NULL, 4, 0);
292 static void Handle_OP_NICKNAME(struct user *u, unsigned int len)
299 memcpy(u->nick, &buf[2], len-2);
301 for (i=0; i<len-2; i++)
303 if (u->nick[i] < ' ' ||
304 (u->nick[i] > 0x7e && u->nick[i] <= 0xa0))
314 buf[1] = OP_PLAYER_CONNECTED;
319 printf("RND_SERVER: client %d calls itself \"%s\"\n", u->number, u->nick);
320 buf[1] = OP_NICKNAME;
321 broadcast(u, len, 0);
325 for (v=user0; v; v=v->next)
327 if (v != u && v->introduced)
330 buf[1] = OP_PLAYER_CONNECTED;
331 buf[2] = (v->games >> 8);
332 buf[3] = (v->games & 0xff);
334 buf[1] = OP_NICKNAME;
335 memcpy(&buf[2], v->nick, 14);
336 sendtoone(u, 2+strlen(v->nick));
344 static void Handle_OP_START_PLAYING(struct user *u)
349 printf("RND_SERVER: client %d (%s) starts game [level %d from levedir %d (%s)]\n",
351 (buf[2] << 8) + buf[3],
352 (buf[4] << 8) + buf[5],
355 for (w=user0; w; w=w->next)
361 w->nextvictim = NULL;
362 for (v=NEXT(w); v!=w; v=NEXT(v))
373 /* reset frame counter */
376 /* reset player actions */
377 for (v=user0; v; v=v->next)
380 v->action_received = 0;
383 broadcast(NULL, 10 + strlen(&buf[10])+1, 0);
386 static void Handle_OP_PAUSE_PLAYING(struct user *u)
389 printf("RND_SERVER: client %d (%s) pauses game\n", u->number, u->nick);
390 broadcast(NULL, 2, 0);
393 static void Handle_OP_CONTINUE_PLAYING(struct user *u)
396 printf("RND_SERVER: client %d (%s) continues game\n", u->number, u->nick);
397 broadcast(NULL, 2, 0);
400 static void Handle_OP_STOP_PLAYING(struct user *u)
403 printf("RND_SERVER: client %d (%s) stops game\n", u->number, u->nick);
404 broadcast(NULL, 2, 0);
407 static void Handle_OP_MOVE_FIGURE(struct user *u)
410 int last_client_nr = 0;
413 /* store player action */
414 for (v=user0; v; v=v->next)
416 if (v->number == u->number)
419 v->action_received = 1;
423 /* check if server received action from each player */
424 for (v=user0; v; v=v->next)
426 if (!v->action_received)
429 if (v->number > last_client_nr)
430 last_client_nr = v->number;
433 /* initialize all player actions to zero */
434 for (i=0; i<last_client_nr; i++)
437 /* broadcast actions of all players to all players */
438 for (v=user0; v; v=v->next)
440 buf[6 + v->number-1] = v->action;
442 v->action_received = 0;
445 buf[2] = (unsigned char)((frame_counter >> 24) & 0xff);
446 buf[3] = (unsigned char)((frame_counter >> 16) & 0xff);
447 buf[4] = (unsigned char)((frame_counter >> 8) & 0xff);
448 buf[5] = (unsigned char)((frame_counter >> 0) & 0xff);
450 broadcast(NULL, 6 + last_client_nr, 0);
456 printf("RND_SERVER: frame %d: client %d (%s) moves player [0x%02x]\n",
458 u->number, u->nick, buf[2]);
462 void NetworkServer(int port, int serveronly)
469 struct protoent *tcpproto;
474 struct sigaction sact;
483 if ((tcpproto = getprotobyname("tcp")) != NULL)
484 tcp = tcpproto->p_proto;
487 signal(SIGPIPE, SIG_IGN);
489 sact.sa_handler = SIG_IGN;
490 sigemptyset(&sact.sa_mask);
492 sigaction(SIGPIPE, &sact, NULL);
496 lfd = socket(PF_INET, SOCK_STREAM, 0);
497 saddr.sin_family = AF_INET;
498 saddr.sin_addr.s_addr = htonl(INADDR_ANY);
499 saddr.sin_port = htons(port);
505 setsockopt(lfd, SOL_SOCKET, SO_REUSEADDR, (char *)&on, sizeof(int));
506 if (bind(lfd, (struct sockaddr *)&saddr, sizeof(saddr)) < 0)
513 /* become a daemon, breaking all ties with the controlling terminal */
515 for (i=0; i<255; i++)
528 /* open a fake stdin, stdout, stderr, just in case */
529 open("/dev/null", O_RDONLY);
530 open("/dev/null", O_WRONLY);
531 open("/dev/null", O_WRONLY);
536 printf("rocksndiamonds network server: started up, listening on port %d\n",
538 printf("rocksndiamonds network server: using protocol version %d.%d.%d\n",
539 PROTOCOL_VERSION_1, PROTOCOL_VERSION_2, PROTOCOL_VERSION_3);
546 for (u=user0; u; u=u->next)
562 if ((sl = select(mfd + 1, &fds, NULL, NULL, &tv)) < 0)
576 if (FD_ISSET(lfd, &fds))
580 slen = sizeof(saddr);
581 newfd = accept(lfd, (struct sockaddr *)&saddr, &slen);
592 setsockopt(newfd, tcp, TCP_NODELAY, (char *)&on, sizeof(int));
603 if (FD_ISSET(u->fd, &fds))
605 r = read(u->fd, u->readbuf + u->nread, MAX_BUFFER_SIZE - u->nread);
609 printf("RND_SERVER: EOF from client %d (%s)\n", u->number, u->nick);
615 while (u->nread >= 4 && u->nread >= 4 + u->readbuf[3])
618 if (u->readbuf[0] || u->readbuf[1] || u->readbuf[2])
621 printf("RND_SERVER: crap from client %d (%s)\n", u->number, u->nick);
622 write(u->fd, "\033]50;kanji24\007\033#8\033(0", 19);
627 memcpy(buf, &u->readbuf[4], len);
629 memmove(u->readbuf, u->readbuf + 4 + len, u->nread);
632 if (!u->introduced && buf[1] != OP_NICKNAME)
635 printf("RND_SERVER: !(client %d)->introduced && buf[1]==%d (expected OP_NICKNAME)\n", buf[0], buf[1]);
645 Handle_OP_NICKNAME(u, len);
648 case OP_PROTOCOL_VERSION:
649 Handle_OP_PROTOCOL_VERSION(u, len);
652 case OP_NUMBER_WANTED:
653 Handle_OP_NUMBER_WANTED(u);
656 case OP_START_PLAYING:
657 Handle_OP_START_PLAYING(u);
660 case OP_PAUSE_PLAYING:
661 Handle_OP_PAUSE_PLAYING(u);
664 case OP_CONTINUE_PLAYING:
665 Handle_OP_CONTINUE_PLAYING(u);
668 case OP_STOP_PLAYING:
669 Handle_OP_STOP_PLAYING(u);
673 Handle_OP_MOVE_FIGURE(u);
679 printf("RND_SERVER: client %d (%s) sends message: %s\n", u->number, u->nick, &buf[2]);
680 broadcast(u, len, 0);
685 printf("RND_SERVER: opcode %d from client %d (%s) not understood\n", buf[0], u->number, u->nick);
693 while (u && !interrupt);