1 /***********************************************************
2 * Rocks'n'Diamonds -- McDuffin Strikes Back! *
3 *----------------------------------------------------------*
4 * (c) 1995-2002 Artsoft Entertainment *
6 * Detmolder Strasse 189 *
9 * e-mail: info@artsoft.org *
10 *----------------------------------------------------------*
12 ***********************************************************/
14 #include "libgame/platform.h"
16 #if defined(PLATFORM_UNIX)
21 #include <sys/socket.h>
23 #include <netinet/in.h>
24 #include <netinet/tcp.h>
25 #include <arpa/inet.h>
27 #include <sys/select.h> /* apparently needed for OS/2 port */
29 #include "libgame/libgame.h"
33 static int clients = 0;
34 static int onceonly = 0;
36 struct NetworkServerPlayerInfo
41 struct NetworkServerPlayerInfo *next;
44 unsigned char readbuffer[MAX_BUFFER_SIZE];
45 unsigned char writbuffer[MAX_BUFFER_SIZE];
48 boolean action_received;
51 static struct NetworkServerPlayerInfo *first_player = NULL;
53 #define NEXT(player) ((player)->next ? (player)->next : first_player)
55 static struct sockaddr_in saddr;
57 static unsigned char realbuffer[512], *buffer = realbuffer + 4;
62 static unsigned long ServerFrameCounter = 0;
66 static void addtobuffer(struct NetworkServerPlayerInfo *player,
67 unsigned char *b, int len)
69 if (player->nwrite + len >= MAX_BUFFER_SIZE)
70 Error(ERR_EXIT_NETWORK_SERVER,
71 "internal error: network send buffer overflow");
73 memcpy(player->writbuffer + player->nwrite, b, len);
74 player->nwrite += len;
77 static void flushuser(struct NetworkServerPlayerInfo *player)
81 write(player->fd, player->writbuffer, player->nwrite);
86 static void broadcast(struct NetworkServerPlayerInfo *except,
87 int len, int activeonly)
89 struct NetworkServerPlayerInfo *player;
91 realbuffer[0] = realbuffer[1] = realbuffer[2] = 0;
92 realbuffer[3] = (unsigned char)len;
93 for (player = first_player; player; player = player->next)
94 if (player != except && player->introduced &&
95 (player->active || !activeonly))
96 addtobuffer(player, realbuffer, 4 + len);
99 static void sendtoone(struct NetworkServerPlayerInfo *to, int len)
101 realbuffer[0] = realbuffer[1] = realbuffer[2] = 0;
102 realbuffer[3] = (unsigned char)len;
103 addtobuffer(to, realbuffer, 4 + len);
106 static void RemovePlayer(struct NetworkServerPlayerInfo *player)
108 struct NetworkServerPlayerInfo *v;
111 Error(ERR_NETWORK_SERVER, "dropping client %d (%s)",
112 player->number, player->player_name);
114 if (player == first_player)
115 first_player = player->next;
118 for (v = first_player; v; v = v->next)
120 if (v->next && v->next == player)
122 v->next = player->next;
129 if (player->introduced)
131 buffer[0] = player->number;
132 buffer[1] = OP_PLAYER_DISCONNECTED;
133 broadcast(player, 2, 0);
139 if (onceonly && clients == 0)
143 Error(ERR_NETWORK_SERVER, "no clients left");
144 Error(ERR_NETWORK_SERVER, "aborting");
150 static void AddPlayer(int fd)
152 struct NetworkServerPlayerInfo *player, *v;
154 boolean again = TRUE;
156 player = checked_malloc(sizeof (struct NetworkServerPlayerInfo));
159 player->player_name[0] = 0;
160 player->next = first_player;
164 player->introduced = 0;
166 player->action_received = FALSE;
168 first_player = player;
180 if (v->number == nxn)
195 if (v->number == nxn)
204 player->number = nxn;
206 Error(ERR_NETWORK_SERVER, "client %d connecting from %s",
207 nxn, inet_ntoa(saddr.sin_addr));
211 buffer[1] = OP_YOUR_NUMBER;
212 buffer[2] = player->number;
213 sendtoone(player, 3);
216 static void Handle_OP_PROTOCOL_VERSION(struct NetworkServerPlayerInfo *player,
220 buffer[2] != PROTOCOL_VERSION_1 ||
221 buffer[3] != PROTOCOL_VERSION_2)
224 Error(ERR_NETWORK_SERVER,
225 "client %d (%s) has wrong protocol version %d.%d.%d",
226 player->number, player->player_name, buffer[2], buffer[3], buffer[4]);
229 buffer[1] = OP_BAD_PROTOCOL_VERSION;
230 buffer[2] = PROTOCOL_VERSION_1;
231 buffer[3] = PROTOCOL_VERSION_2;
232 buffer[4] = PROTOCOL_VERSION_3;
233 sendtoone(player, 5);
236 RemovePlayer(player);
242 Error(ERR_NETWORK_SERVER,
243 "client %d (%s) uses protocol version %d.%d.%d",
244 player->number, player->player_name, buffer[2], buffer[3], buffer[4]);
248 static void Handle_OP_NUMBER_WANTED(struct NetworkServerPlayerInfo *player)
250 struct NetworkServerPlayerInfo *v;
251 int client_nr = player->number;
252 int nr_wanted = buffer[2];
256 Error(ERR_NETWORK_SERVER, "client %d (%s) wants to switch to # %d",
257 player->number, player->player_name, nr_wanted);
259 for (v = first_player; v; v = v->next)
261 if (v->number == nr_wanted)
271 Error(ERR_NETWORK_SERVER, "client %d (%s) switches to # %d",
272 player->number, player->player_name, nr_wanted);
273 else if (player->number == nr_wanted)
274 Error(ERR_NETWORK_SERVER, "client %d (%s) still has # %d",
275 player->number, player->player_name, nr_wanted);
277 Error(ERR_NETWORK_SERVER,
278 "client %d (%s) cannot switch (client %d still exists)",
279 player->number, player->player_name, nr_wanted);
283 player->number = nr_wanted;
285 buffer[0] = client_nr;
286 buffer[1] = OP_NUMBER_WANTED;
287 buffer[2] = nr_wanted;
288 buffer[3] = player->number;
291 sendtoone(player, 4);
294 broadcast(NULL, 4, 0);
297 static void Handle_OP_PLAYER_NAME(struct NetworkServerPlayerInfo *player,
300 struct NetworkServerPlayerInfo *v;
305 memcpy(player->player_name, &buffer[2], len-2);
306 player->player_name[len-2] = 0;
307 for (i = 0; i < len - 2; i++)
309 if (player->player_name[i] < ' ' ||
310 ((unsigned char)(player->player_name[i]) > 0x7e &&
311 (unsigned char)(player->player_name[i]) <= 0xa0))
313 player->player_name[i] = 0;
318 if (!player->introduced)
320 buffer[0] = player->number;
321 buffer[1] = OP_PLAYER_CONNECTED;
322 broadcast(player, 2, 0);
326 Error(ERR_NETWORK_SERVER, "client %d calls itself \"%s\"",
327 player->number, player->player_name);
328 buffer[1] = OP_PLAYER_NAME;
329 broadcast(player, len, 0);
331 if (!player->introduced)
333 for (v = first_player; v; v = v->next)
335 if (v != player && v->introduced)
337 buffer[0] = v->number;
338 buffer[1] = OP_PLAYER_CONNECTED;
339 sendtoone(player, 2);
340 buffer[1] = OP_PLAYER_NAME;
341 memcpy(&buffer[2], v->player_name, 14);
342 sendtoone(player, 2+strlen(v->player_name));
347 player->introduced = 1;
350 static void Handle_OP_START_PLAYING(struct NetworkServerPlayerInfo *player)
352 struct NetworkServerPlayerInfo *v, *w;
355 Error(ERR_NETWORK_SERVER,
356 "client %d (%s) starts game [level %d from levedir %d (%s)]",
357 player->number, player->player_name,
358 (buffer[2] << 8) + buffer[3],
359 (buffer[4] << 8) + buffer[5],
362 for (w = first_player; w; w = w->next)
366 /* reset frame counter */
367 ServerFrameCounter = 0;
369 /* reset player actions */
370 for (v = first_player; v; v = v->next)
373 v->action_received = FALSE;
376 broadcast(NULL, 10 + strlen((char *)&buffer[10])+1, 0);
379 static void Handle_OP_PAUSE_PLAYING(struct NetworkServerPlayerInfo *player)
382 Error(ERR_NETWORK_SERVER, "client %d (%s) pauses game",
383 player->number, player->player_name);
384 broadcast(NULL, 2, 0);
387 static void Handle_OP_CONTINUE_PLAYING(struct NetworkServerPlayerInfo *player)
390 Error(ERR_NETWORK_SERVER, "client %d (%s) continues game",
391 player->number, player->player_name);
392 broadcast(NULL, 2, 0);
395 static void Handle_OP_STOP_PLAYING(struct NetworkServerPlayerInfo *player)
398 Error(ERR_NETWORK_SERVER, "client %d (%s) stops game",
399 player->number, player->player_name);
400 broadcast(NULL, 2, 0);
403 static void Handle_OP_MOVE_PLAYER(struct NetworkServerPlayerInfo *player)
405 struct NetworkServerPlayerInfo *v;
406 int last_client_nr = 0;
409 /* store player action */
410 for (v = first_player; v; v = v->next)
412 if (v->number == player->number)
414 v->action = buffer[2];
415 v->action_received = TRUE;
419 /* check if server received action from each player */
420 for (v = first_player; v; v = v->next)
422 if (!v->action_received)
425 if (v->number > last_client_nr)
426 last_client_nr = v->number;
429 /* initialize all player actions to zero */
430 for (i = 0; i < last_client_nr; i++)
433 /* broadcast actions of all players to all players */
434 for (v = first_player; v; v = v->next)
436 buffer[6 + v->number-1] = v->action;
438 v->action_received = FALSE;
441 buffer[2] = (unsigned char)((ServerFrameCounter >> 24) & 0xff);
442 buffer[3] = (unsigned char)((ServerFrameCounter >> 16) & 0xff);
443 buffer[4] = (unsigned char)((ServerFrameCounter >> 8) & 0xff);
444 buffer[5] = (unsigned char)((ServerFrameCounter >> 0) & 0xff);
446 broadcast(NULL, 6 + last_client_nr, 0);
448 ServerFrameCounter++;
451 void NetworkServer(int port, int serveronly)
454 struct NetworkServerPlayerInfo *player;
458 struct protoent *tcpproto;
463 struct sigaction sact;
467 port = DEFAULT_SERVER_PORT;
472 if ((tcpproto = getprotobyname("tcp")) != NULL)
473 tcp = tcpproto->p_proto;
476 signal(SIGPIPE, SIG_IGN);
478 sact.sa_handler = SIG_IGN;
479 sigemptyset(&sact.sa_mask);
481 sigaction(SIGPIPE, &sact, NULL);
485 if ((lfd = socket(PF_INET, SOCK_STREAM, 0)) < 0)
486 Error(ERR_EXIT_NETWORK_SERVER, "socket() failed");
488 saddr.sin_family = AF_INET;
489 saddr.sin_addr.s_addr = htonl(INADDR_ANY);
490 saddr.sin_port = htons(port);
494 setsockopt(lfd, SOL_SOCKET, SO_REUSEADDR, (char *)&on, sizeof(int));
495 if (bind(lfd, (struct sockaddr *)&saddr, sizeof(saddr)) < 0)
496 Error(ERR_EXIT_NETWORK_SERVER, "bind() failed");
502 /* become a daemon, breaking all ties with the controlling terminal */
503 options.verbose = FALSE;
504 for (i = 0; i < 255; i++)
517 /* open a fake stdin, stdout, stderr, just in case */
518 open("/dev/null", O_RDONLY);
519 open("/dev/null", O_WRONLY);
520 open("/dev/null", O_WRONLY);
525 Error(ERR_NETWORK_SERVER, "started up, listening on port %d", port);
526 Error(ERR_NETWORK_SERVER, "using protocol version %d.%d.%d",
527 PROTOCOL_VERSION_1, PROTOCOL_VERSION_2, PROTOCOL_VERSION_3);
534 for (player = first_player; player; player = player->next)
539 player = first_player;
542 FD_SET(player->fd, &fds);
543 if (player->fd > mfd)
545 player = player->next;
550 if ((sl = select(mfd + 1, &fds, NULL, NULL, &tv)) < 0)
553 Error(ERR_EXIT_NETWORK_SERVER, "select() failed");
564 if (FD_ISSET(lfd, &fds))
568 slen = sizeof(saddr);
569 newfd = accept(lfd, (struct sockaddr *)&saddr, &slen);
573 Error(ERR_EXIT_NETWORK_SERVER, "accept() failed");
580 setsockopt(newfd, tcp, TCP_NODELAY, (char *)&on, sizeof(int));
587 player = first_player;
591 if (FD_ISSET(player->fd, &fds))
593 r = read(player->fd, player->readbuffer + player->nread, MAX_BUFFER_SIZE - player->nread);
597 Error(ERR_NETWORK_SERVER, "EOF from client %d (%s)",
598 player->number, player->player_name);
599 RemovePlayer(player);
604 while (player->nread >= 4 && player->nread >= 4 + player->readbuffer[3])
606 len = player->readbuffer[3];
607 if (player->readbuffer[0] || player->readbuffer[1] || player->readbuffer[2])
610 Error(ERR_NETWORK_SERVER, "crap from client %d (%s)",
611 player->number, player->player_name);
612 RemovePlayer(player);
616 memcpy(buffer, &player->readbuffer[4], len);
617 player->nread -= 4 + len;
618 memmove(player->readbuffer, player->readbuffer + 4 + len, player->nread);
620 buffer[0] = player->number;
621 if (!player->introduced && buffer[1] != OP_PLAYER_NAME)
624 Error(ERR_NETWORK_SERVER, "!(client %d)->introduced && buffer[1]==%d (expected OP_PLAYER_NAME)", buffer[0], buffer[1]);
626 RemovePlayer(player);
634 Handle_OP_PLAYER_NAME(player, len);
637 case OP_PROTOCOL_VERSION:
638 Handle_OP_PROTOCOL_VERSION(player, len);
641 case OP_NUMBER_WANTED:
642 Handle_OP_NUMBER_WANTED(player);
645 case OP_START_PLAYING:
646 Handle_OP_START_PLAYING(player);
649 case OP_PAUSE_PLAYING:
650 Handle_OP_PAUSE_PLAYING(player);
653 case OP_CONTINUE_PLAYING:
654 Handle_OP_CONTINUE_PLAYING(player);
657 case OP_STOP_PLAYING:
658 Handle_OP_STOP_PLAYING(player);
662 Handle_OP_MOVE_PLAYER(player);
665 case OP_BROADCAST_MESSAGE:
668 Error(ERR_NETWORK_SERVER, "client %d (%s) sends message: %s",
669 player->number, player->player_name, &buffer[2]);
670 broadcast(player, len, 0);
675 Error(ERR_NETWORK_SERVER,
676 "unknown opcode %d from client %d (%s)",
677 buffer[0], player->number, player->player_name);
682 if (player && !interrupt)
683 player = player->next;
685 while (player && !interrupt);
689 #endif /* PLATFORM_UNIX */