1 // ============================================================================
2 // Rocks'n'Diamonds - McDuffin Strikes Back!
3 // ----------------------------------------------------------------------------
4 // (c) 1995-2014 by Artsoft Entertainment
7 // http://www.artsoft.org/
8 // ----------------------------------------------------------------------------
10 // ============================================================================
12 #include "libgame/platform.h"
14 #if defined(NETWORK_AVALIABLE)
21 #if defined(TARGET_SDL)
24 #include <sys/socket.h>
25 #include <netinet/in.h>
26 #include <netinet/tcp.h>
27 #include <arpa/inet.h>
29 #include <sys/select.h> /* apparently needed for OS/2 port */
32 #include "libgame/libgame.h"
36 static int clients = 0;
37 static int onceonly = 0;
39 struct NetworkServerPlayerInfo
41 #if defined(TARGET_SDL)
49 struct NetworkServerPlayerInfo *next;
52 unsigned char readbuffer[MAX_BUFFER_SIZE];
53 unsigned char writbuffer[MAX_BUFFER_SIZE];
56 boolean action_received;
59 static struct NetworkServerPlayerInfo *first_player = NULL;
61 #define NEXT(player) ((player)->next ? (player)->next : first_player)
63 #if defined(TARGET_SDL)
64 /* TODO: peer address */
65 static TCPsocket lfd; /* listening socket */
66 static SDLNet_SocketSet fds; /* socket set */
68 static struct sockaddr_in saddr;
69 static int lfd; /* listening socket */
70 static fd_set fds; /* socket set */
74 static unsigned char realbuffer[512], *buffer = realbuffer + 4;
78 static unsigned int ServerFrameCounter = 0;
80 static void addtobuffer(struct NetworkServerPlayerInfo *player,
81 unsigned char *b, int len)
83 if (player->nwrite + len >= MAX_BUFFER_SIZE)
84 Error(ERR_EXIT_NETWORK_SERVER,
85 "internal error: network send buffer overflow");
87 memcpy(player->writbuffer + player->nwrite, b, len);
88 player->nwrite += len;
91 static void flushuser(struct NetworkServerPlayerInfo *player)
95 #if defined(TARGET_SDL)
96 SDLNet_TCP_Send(player->fd, player->writbuffer, player->nwrite);
98 if (write(player->fd, player->writbuffer, player->nwrite) == -1)
99 Error(ERR_WARN, "write() failed; %s", strerror(errno));
105 static void broadcast(struct NetworkServerPlayerInfo *except,
106 int len, int activeonly)
108 struct NetworkServerPlayerInfo *player;
110 realbuffer[0] = realbuffer[1] = realbuffer[2] = 0;
111 realbuffer[3] = (unsigned char)len;
112 for (player = first_player; player; player = player->next)
113 if (player != except && player->introduced &&
114 (player->active || !activeonly))
115 addtobuffer(player, realbuffer, 4 + len);
118 static void sendtoone(struct NetworkServerPlayerInfo *to, int len)
120 realbuffer[0] = realbuffer[1] = realbuffer[2] = 0;
121 realbuffer[3] = (unsigned char)len;
122 addtobuffer(to, realbuffer, 4 + len);
125 static void RemovePlayer(struct NetworkServerPlayerInfo *player)
127 struct NetworkServerPlayerInfo *v;
130 Error(ERR_NETWORK_SERVER, "dropping client %d (%s)",
131 player->number, player->player_name);
133 if (player == first_player)
134 first_player = player->next;
137 for (v = first_player; v; v = v->next)
139 if (v->next && v->next == player)
141 v->next = player->next;
147 #if defined(TARGET_SDL)
148 SDLNet_TCP_DelSocket(fds, player->fd);
149 SDLNet_TCP_Close(player->fd);
154 if (player->introduced)
156 buffer[0] = player->number;
157 buffer[1] = OP_PLAYER_DISCONNECTED;
158 broadcast(player, 2, 0);
164 if (onceonly && clients == 0)
168 Error(ERR_NETWORK_SERVER, "no clients left");
169 Error(ERR_NETWORK_SERVER, "aborting");
175 #if defined(TARGET_SDL)
176 static void AddPlayer(TCPsocket fd)
178 static void AddPlayer(int fd)
181 struct NetworkServerPlayerInfo *player, *v;
183 boolean again = TRUE;
185 player = checked_malloc(sizeof (struct NetworkServerPlayerInfo));
188 player->player_name[0] = 0;
189 player->next = first_player;
193 player->introduced = 0;
195 player->action_received = FALSE;
197 #if defined(TARGET_SDL)
198 SDLNet_TCP_AddSocket(fds, fd);
201 first_player = player;
212 if (v->number == nxn)
223 player->number = nxn;
224 #if !defined(TARGET_SDL)
226 Error(ERR_NETWORK_SERVER, "client %d connecting from %s",
227 nxn, inet_ntoa(saddr.sin_addr));
232 buffer[1] = OP_YOUR_NUMBER;
233 buffer[2] = player->number;
234 sendtoone(player, 3);
237 static void Handle_OP_PROTOCOL_VERSION(struct NetworkServerPlayerInfo *player,
241 buffer[2] != PROTOCOL_VERSION_1 ||
242 buffer[3] != PROTOCOL_VERSION_2)
245 Error(ERR_NETWORK_SERVER,
246 "client %d (%s) has wrong protocol version %d.%d.%d",
247 player->number, player->player_name, buffer[2], buffer[3], buffer[4]);
250 buffer[1] = OP_BAD_PROTOCOL_VERSION;
251 buffer[2] = PROTOCOL_VERSION_1;
252 buffer[3] = PROTOCOL_VERSION_2;
253 buffer[4] = PROTOCOL_VERSION_3;
254 sendtoone(player, 5);
257 RemovePlayer(player);
263 Error(ERR_NETWORK_SERVER,
264 "client %d (%s) uses protocol version %d.%d.%d",
265 player->number, player->player_name, buffer[2], buffer[3], buffer[4]);
269 static void Handle_OP_NUMBER_WANTED(struct NetworkServerPlayerInfo *player)
271 struct NetworkServerPlayerInfo *v;
272 int client_nr = player->number;
273 int nr_wanted = buffer[2];
277 Error(ERR_NETWORK_SERVER, "client %d (%s) wants to switch to # %d",
278 player->number, player->player_name, nr_wanted);
280 for (v = first_player; v; v = v->next)
282 if (v->number == nr_wanted)
292 Error(ERR_NETWORK_SERVER, "client %d (%s) switches to # %d",
293 player->number, player->player_name, nr_wanted);
294 else if (player->number == nr_wanted)
295 Error(ERR_NETWORK_SERVER, "client %d (%s) already has # %d",
296 player->number, player->player_name, nr_wanted);
298 Error(ERR_NETWORK_SERVER,
299 "client %d (%s) cannot switch (client %d already exists)",
300 player->number, player->player_name, nr_wanted);
304 player->number = nr_wanted;
306 buffer[0] = client_nr;
307 buffer[1] = OP_NUMBER_WANTED;
308 buffer[2] = nr_wanted;
309 buffer[3] = player->number;
312 sendtoone(player, 4);
315 broadcast(NULL, 4, 0);
318 static void Handle_OP_PLAYER_NAME(struct NetworkServerPlayerInfo *player,
321 struct NetworkServerPlayerInfo *v;
326 memcpy(player->player_name, &buffer[2], len-2);
327 player->player_name[len-2] = 0;
328 for (i = 0; i < len - 2; i++)
330 if (player->player_name[i] < ' ' ||
331 ((unsigned char)(player->player_name[i]) > 0x7e &&
332 (unsigned char)(player->player_name[i]) <= 0xa0))
334 player->player_name[i] = 0;
339 if (!player->introduced)
341 buffer[0] = player->number;
342 buffer[1] = OP_PLAYER_CONNECTED;
343 broadcast(player, 2, 0);
347 Error(ERR_NETWORK_SERVER, "client %d calls itself \"%s\"",
348 player->number, player->player_name);
349 buffer[1] = OP_PLAYER_NAME;
350 broadcast(player, len, 0);
352 if (!player->introduced)
354 for (v = first_player; v; v = v->next)
356 if (v != player && v->introduced)
358 buffer[0] = v->number;
359 buffer[1] = OP_PLAYER_CONNECTED;
360 sendtoone(player, 2);
361 buffer[1] = OP_PLAYER_NAME;
362 memcpy(&buffer[2], v->player_name, 14);
363 sendtoone(player, 2+strlen(v->player_name));
368 player->introduced = 1;
371 static void Handle_OP_START_PLAYING(struct NetworkServerPlayerInfo *player)
373 struct NetworkServerPlayerInfo *v, *w;
376 Error(ERR_NETWORK_SERVER,
377 "client %d (%s) starts game [level %d from leveldir %d (%s)]",
378 player->number, player->player_name,
379 (buffer[2] << 8) + buffer[3],
380 (buffer[4] << 8) + buffer[5],
383 for (w = first_player; w; w = w->next)
387 /* reset frame counter */
388 ServerFrameCounter = 0;
390 Error(ERR_NETWORK_SERVER, "resetting ServerFrameCounter to 0");
392 /* reset player actions */
393 for (v = first_player; v; v = v->next)
396 v->action_received = FALSE;
399 broadcast(NULL, 10 + strlen((char *)&buffer[10])+1, 0);
402 static void Handle_OP_PAUSE_PLAYING(struct NetworkServerPlayerInfo *player)
405 Error(ERR_NETWORK_SERVER, "client %d (%s) pauses game",
406 player->number, player->player_name);
407 broadcast(NULL, 2, 0);
410 static void Handle_OP_CONTINUE_PLAYING(struct NetworkServerPlayerInfo *player)
413 Error(ERR_NETWORK_SERVER, "client %d (%s) continues game",
414 player->number, player->player_name);
415 broadcast(NULL, 2, 0);
418 static void Handle_OP_STOP_PLAYING(struct NetworkServerPlayerInfo *player)
420 int cause_for_stopping = buffer[2];
423 Error(ERR_NETWORK_SERVER, "client %d (%s) stops game [%d]",
424 player->number, player->player_name, cause_for_stopping);
425 broadcast(NULL, 3, 0);
428 static void Handle_OP_MOVE_PLAYER(struct NetworkServerPlayerInfo *player)
430 struct NetworkServerPlayerInfo *v;
431 int last_client_nr = 0;
434 /* store player action */
435 for (v = first_player; v; v = v->next)
437 if (v->number == player->number)
439 v->action = buffer[2];
440 v->action_received = TRUE;
444 /* check if server received action from each player */
445 for (v = first_player; v; v = v->next)
447 if (!v->action_received)
450 if (v->number > last_client_nr)
451 last_client_nr = v->number;
454 /* initialize all player actions to zero */
455 for (i = 0; i < last_client_nr; i++)
458 /* broadcast actions of all players to all players */
459 for (v = first_player; v; v = v->next)
461 buffer[6 + v->number-1] = v->action;
463 v->action_received = FALSE;
466 buffer[2] = (unsigned char)((ServerFrameCounter >> 24) & 0xff);
467 buffer[3] = (unsigned char)((ServerFrameCounter >> 16) & 0xff);
468 buffer[4] = (unsigned char)((ServerFrameCounter >> 8) & 0xff);
469 buffer[5] = (unsigned char)((ServerFrameCounter >> 0) & 0xff);
471 broadcast(NULL, 6 + last_client_nr, 0);
474 Error(ERR_NETWORK_SERVER, "sending ServerFrameCounter value %d",
478 ServerFrameCounter++;
481 #if defined(TARGET_SDL)
482 /* the following is not used for a standalone server;
483 the pointer points to an integer containing the port-number */
484 int NetworkServerThread(void *ptr)
486 NetworkServer(*((int *) ptr), 0);
488 /* should never be reached */
493 void NetworkServer(int port, int serveronly)
496 struct NetworkServerPlayerInfo *player;
499 #if defined(TARGET_SDL)
504 struct protoent *tcpproto;
509 #if defined(PLATFORM_UNIX) && !defined(PLATFORM_NEXT)
510 struct sigaction sact;
514 port = DEFAULT_SERVER_PORT;
519 #if !defined(TARGET_SDL)
520 if ((tcpproto = getprotobyname("tcp")) != NULL)
521 tcp = tcpproto->p_proto;
524 #if defined(PLATFORM_UNIX)
525 #if defined(PLATFORM_NEXT)
526 signal(SIGPIPE, SIG_IGN);
528 sact.sa_handler = SIG_IGN;
529 sigemptyset(&sact.sa_mask);
531 sigaction(SIGPIPE, &sact, NULL);
535 #if defined(TARGET_SDL)
537 /* assume that SDL is already initialized */
539 if (SDLNet_Init() == -1)
540 Error(ERR_EXIT_NETWORK_SERVER, "SDLNet_Init() failed");
544 if (SDLNet_ResolveHost(&ip, NULL, port) == -1)
545 Error(ERR_EXIT_NETWORK_SERVER, "SDLNet_ResolveHost() failed");
547 lfd = SDLNet_TCP_Open(&ip);
549 Error(ERR_EXIT_NETWORK_SERVER, "SDLNet_TCP_Open() failed");
551 fds = SDLNet_AllocSocketSet(MAX_PLAYERS+1);
552 SDLNet_TCP_AddSocket(fds, lfd);
556 if ((lfd = socket(PF_INET, SOCK_STREAM, 0)) < 0)
557 Error(ERR_EXIT_NETWORK_SERVER, "socket() failed");
559 saddr.sin_family = AF_INET;
560 saddr.sin_addr.s_addr = htonl(INADDR_ANY);
561 saddr.sin_port = htons(port);
565 setsockopt(lfd, SOL_SOCKET, SO_REUSEADDR, (char *)&on, sizeof(int));
566 if (bind(lfd, (struct sockaddr *)&saddr, sizeof(saddr)) < 0)
567 Error(ERR_EXIT_NETWORK_SERVER, "bind() failed");
572 #if !defined(TARGET_SDL)
575 /* become a daemon, breaking all ties with the controlling terminal */
576 options.verbose = FALSE;
577 for (i = 0; i < 255; i++)
588 if (chdir("/") == -1)
589 Error(ERR_WARN, "chdir() failed; %s", strerror(errno));
591 /* open a fake stdin, stdout, stderr, just in case */
592 open("/dev/null", O_RDONLY);
593 open("/dev/null", O_WRONLY);
594 open("/dev/null", O_WRONLY);
600 Error(ERR_NETWORK_SERVER, "started up, listening on port %d", port);
601 Error(ERR_NETWORK_SERVER, "using protocol version %d.%d.%d",
602 PROTOCOL_VERSION_1, PROTOCOL_VERSION_2, PROTOCOL_VERSION_3);
609 for (player = first_player; player; player = player->next)
612 #if defined(TARGET_SDL)
613 if ((sl = SDLNet_CheckSockets(fds, 500000)) < 1)
615 Error(ERR_NETWORK_SERVER, "SDLNet_CheckSockets failed: %s",
617 perror("SDLNet_CheckSockets");
624 player = first_player;
627 FD_SET(player->fd, &fds);
628 if (player->fd > mfd)
630 player = player->next;
635 if ((sl = select(mfd + 1, &fds, NULL, NULL, &tv)) < 0)
638 Error(ERR_EXIT_NETWORK_SERVER, "select() failed");
650 /* accept incoming connections */
651 #if defined(TARGET_SDL)
652 if (SDLNet_SocketReady(lfd))
656 newsock = SDLNet_TCP_Accept(lfd);
664 if (FD_ISSET(lfd, &fds))
669 slen = sizeof(saddr);
670 newfd = accept(lfd, (struct sockaddr *)&saddr, &slen);
674 Error(ERR_EXIT_NETWORK_SERVER, "accept() failed");
681 setsockopt(newfd, tcp, TCP_NODELAY, (char *)&on, sizeof(int));
689 player = first_player;
693 #if defined(TARGET_SDL)
694 if (SDLNet_SocketReady(player->fd))
696 if (FD_ISSET(player->fd, &fds))
699 #if defined(TARGET_SDL)
700 /* read only 1 byte, because SDLNet blocks when we want more than is
702 r = SDLNet_TCP_Recv(player->fd, player->readbuffer + player->nread, 1);
704 r = read(player->fd, player->readbuffer + player->nread,
705 MAX_BUFFER_SIZE - player->nread);
711 Error(ERR_NETWORK_SERVER, "EOF from client %d (%s)",
712 player->number, player->player_name);
713 RemovePlayer(player);
718 while (player->nread >= 4 && player->nread >= 4 + player->readbuffer[3])
720 len = player->readbuffer[3];
721 if (player->readbuffer[0] || player->readbuffer[1] || player->readbuffer[2])
724 Error(ERR_NETWORK_SERVER, "crap from client %d (%s)",
725 player->number, player->player_name);
726 RemovePlayer(player);
730 memcpy(buffer, &player->readbuffer[4], len);
731 player->nread -= 4 + len;
732 memmove(player->readbuffer, player->readbuffer + 4 + len, player->nread);
734 buffer[0] = player->number;
735 if (!player->introduced && buffer[1] != OP_PLAYER_NAME)
738 Error(ERR_NETWORK_SERVER, "!(client %d)->introduced && buffer[1]==%d (expected OP_PLAYER_NAME)", buffer[0], buffer[1]);
740 RemovePlayer(player);
748 Handle_OP_PLAYER_NAME(player, len);
751 case OP_PROTOCOL_VERSION:
752 Handle_OP_PROTOCOL_VERSION(player, len);
755 case OP_NUMBER_WANTED:
756 Handle_OP_NUMBER_WANTED(player);
759 case OP_START_PLAYING:
760 Handle_OP_START_PLAYING(player);
763 case OP_PAUSE_PLAYING:
764 Handle_OP_PAUSE_PLAYING(player);
767 case OP_CONTINUE_PLAYING:
768 Handle_OP_CONTINUE_PLAYING(player);
771 case OP_STOP_PLAYING:
772 Handle_OP_STOP_PLAYING(player);
776 Handle_OP_MOVE_PLAYER(player);
779 case OP_BROADCAST_MESSAGE:
782 Error(ERR_NETWORK_SERVER, "client %d (%s) sends message: %s",
783 player->number, player->player_name, &buffer[2]);
784 broadcast(player, len, 0);
789 Error(ERR_NETWORK_SERVER,
790 "unknown opcode %d from client %d (%s)",
791 buffer[0], player->number, player->player_name);
796 if (player && !interrupt)
797 player = player->next;
799 while (player && !interrupt);
803 #endif /* NETWORK_AVALIABLE */