1 // ============================================================================
2 // Rocks'n'Diamonds - McDuffin Strikes Back!
3 // ----------------------------------------------------------------------------
4 // (c) 1995-2014 by Artsoft Entertainment
7 // http://www.artsoft.org/
8 // ----------------------------------------------------------------------------
10 // ============================================================================
17 #include "libgame/libgame.h"
23 static int num_clients = 0;
24 static boolean run_server_only_once = FALSE;
26 struct NetworkServerPlayerInfo
29 char player_name[MAX_PLAYER_NAME_LEN + 1];
34 boolean action_received;
36 struct NetworkServerPlayerInfo *next;
39 static struct NetworkServerPlayerInfo *first_player = NULL;
41 #define NEXT(player) ((player)->next ? (player)->next : first_player)
43 /* TODO: peer address */
44 static TCPsocket lfd; /* listening TCP socket */
45 static UDPsocket udp; /* listening UDP socket */
46 static SDLNet_SocketSet fds; /* socket set */
48 static struct NetworkBuffer *read_buffer = NULL;
49 static struct NetworkBuffer *write_buffer = NULL;
51 static unsigned int ServerFrameCounter = 0;
54 int getNetwork8BitInteger(byte *ptr)
59 int putNetwork8BitInteger(byte *ptr, int value)
66 int getNetwork16BitInteger(byte *ptr)
68 return ((ptr[0] << 8) |
72 int putNetwork16BitInteger(byte *ptr, int value)
74 ptr[0] = (value >> 8) & 0xff;
75 ptr[1] = (value >> 0) & 0xff;
80 int getNetwork32BitInteger(byte *ptr)
82 return ((ptr[0] << 24) |
88 int putNetwork32BitInteger(byte *ptr, int value)
90 ptr[0] = (value >> 24) & 0xff;
91 ptr[1] = (value >> 16) & 0xff;
92 ptr[2] = (value >> 8) & 0xff;
93 ptr[3] = (value >> 0) & 0xff;
98 char *getNetworkString(byte *ptr)
103 int putNetworkString(byte *ptr, char *s)
105 strcpy((char *)ptr, s);
107 return strlen(s) + 1;
110 struct NetworkBuffer *newNetworkBuffer()
112 struct NetworkBuffer *new = checked_calloc(sizeof(struct NetworkBuffer));
114 new->max_size = MAX_BUFFER_SIZE;
118 new->buffer = checked_calloc(new->max_size);
123 static void resetNetworkBufferForReading(struct NetworkBuffer *nb)
128 static void resetNetworkBufferForWriting(struct NetworkBuffer *nb)
134 void initNetworkBufferForReceiving(struct NetworkBuffer *nb)
136 resetNetworkBufferForWriting(nb);
139 void initNetworkBufferForReading(struct NetworkBuffer *nb)
141 resetNetworkBufferForReading(nb);
143 /* skip message length header */
144 getNetworkBuffer32BitInteger(nb);
147 void initNetworkBufferForWriting(struct NetworkBuffer *nb, int message_type,
150 resetNetworkBufferForWriting(nb);
152 /* will be replaced with message length before sending */
153 putNetworkBuffer32BitInteger(nb, 0);
155 putNetworkBuffer8BitInteger(nb, message_type);
156 putNetworkBuffer8BitInteger(nb, player_nr);
159 static void copyNetworkBufferForWriting(struct NetworkBuffer *nb_from,
160 struct NetworkBuffer *nb_to,
163 initNetworkBufferForReading(nb_from);
165 int message_type = getNetworkBuffer8BitInteger(nb_from);
167 /* skip player number */
168 getNetworkBuffer8BitInteger(nb_from);
170 initNetworkBufferForWriting(nb_to, message_type, player_nr);
172 while (nb_from->pos < nb_from->size)
174 int b = getNetworkBuffer8BitInteger(nb_from);
176 putNetworkBuffer8BitInteger(nb_to, b);
180 static void increaseNetworkBuffer(struct NetworkBuffer *nb, int additional_size)
182 /* add some more buffer size than is really required this time */
183 nb->max_size += additional_size + MAX_BUFFER_SIZE;
184 nb->buffer = checked_realloc(nb->buffer, nb->max_size);
187 int receiveNetworkBufferBytes(struct NetworkBuffer *nb, TCPsocket socket,
190 if (nb->pos + num_bytes > nb->max_size)
191 increaseNetworkBuffer(nb, num_bytes);
193 int result = SDLNet_TCP_Recv(socket, &nb->buffer[nb->pos], num_bytes);
195 if (result != num_bytes)
198 nb->pos += num_bytes;
204 int receiveNetworkBufferPacket(struct NetworkBuffer *nb, TCPsocket socket)
206 int num_bytes, num_bytes_head, num_bytes_body;
209 num_bytes = receiveNetworkBufferBytes(nb, socket, num_bytes_head);
211 if (num_bytes != num_bytes_head)
214 num_bytes_body = getNetwork32BitInteger(nb->buffer);
215 num_bytes = receiveNetworkBufferBytes(nb, socket, num_bytes_body);
220 int getNetworkBuffer8BitInteger(struct NetworkBuffer *nb)
224 if (nb->pos + num_bytes > nb->size)
227 int value = getNetwork8BitInteger(&nb->buffer[nb->pos]);
229 nb->pos += num_bytes;
234 void putNetworkBuffer8BitInteger(struct NetworkBuffer *nb, int value)
238 if (nb->pos + num_bytes > nb->max_size)
239 increaseNetworkBuffer(nb, num_bytes);
241 nb->pos += putNetwork8BitInteger(&nb->buffer[nb->pos], value);
245 int getNetworkBuffer16BitInteger(struct NetworkBuffer *nb)
249 if (nb->pos + num_bytes > nb->size)
252 int value = getNetwork16BitInteger(&nb->buffer[nb->pos]);
254 nb->pos += num_bytes;
259 void putNetworkBuffer16BitInteger(struct NetworkBuffer *nb, int value)
263 if (nb->pos + num_bytes > nb->max_size)
264 increaseNetworkBuffer(nb, num_bytes);
266 nb->pos += putNetwork16BitInteger(&nb->buffer[nb->pos], value);
270 int getNetworkBuffer32BitInteger(struct NetworkBuffer *nb)
274 if (nb->pos + num_bytes > nb->size)
277 int value = getNetwork32BitInteger(&nb->buffer[nb->pos]);
279 nb->pos += num_bytes;
284 void putNetworkBuffer32BitInteger(struct NetworkBuffer *nb, int value)
288 if (nb->pos + num_bytes > nb->max_size)
289 increaseNetworkBuffer(nb, num_bytes);
291 nb->pos += putNetwork32BitInteger(&nb->buffer[nb->pos], value);
295 char *getNetworkBufferString(struct NetworkBuffer *nb)
297 char *s = getNetworkString(&nb->buffer[nb->pos]);
299 nb->pos += strlen(s) + 1;
304 void putNetworkBufferString(struct NetworkBuffer *nb, char *s)
306 int num_bytes = strlen(s) + 1;
308 if (nb->pos + num_bytes > nb->max_size)
309 increaseNetworkBuffer(nb, num_bytes);
311 nb->pos += putNetworkString(&nb->buffer[nb->pos], s);
315 void dumpNetworkBuffer(struct NetworkBuffer *nb)
319 printf("::: network buffer maximum size: %d\n", nb->max_size);
320 printf("::: network buffer size: %d\n", nb->size);
321 printf("::: network buffer position : %d\n", nb->pos);
323 for (i = 0; i < nb->size; i++)
328 printf("%02x ", nb->buffer[i]);
334 static void SendNetworkBufferToAllButOne(struct NetworkBuffer *nb,
335 struct NetworkServerPlayerInfo *except)
337 struct NetworkServerPlayerInfo *player;
339 /* set message length header */
340 putNetwork32BitInteger(nb->buffer, nb->size - 4);
342 for (player = first_player; player != NULL; player = player->next)
344 if (player != except && player->introduced)
346 /* directly send the buffer to the network client */
347 SDLNet_TCP_Send(player->fd, nb->buffer, nb->size);
352 static void SendNetworkBufferToAll(struct NetworkBuffer *nb)
354 SendNetworkBufferToAllButOne(nb, NULL);
357 static void SendNetworkBufferToClient(struct NetworkBuffer *nb,
358 struct NetworkServerPlayerInfo *player)
360 /* set message length header */
361 putNetwork32BitInteger(nb->buffer, nb->size - 4);
363 /* directly send the buffer to the network client */
364 SDLNet_TCP_Send(player->fd, nb->buffer, nb->size);
367 static void RemovePlayer(struct NetworkServerPlayerInfo *player)
370 Error(ERR_NETWORK_SERVER, "dropping client %d (%s)",
371 player->number, player->player_name);
373 SDLNet_TCP_DelSocket(fds, player->fd);
374 SDLNet_TCP_Close(player->fd);
376 if (player == first_player)
378 first_player = player->next;
382 struct NetworkServerPlayerInfo *p;
384 for (p = first_player; p != NULL; p = p->next)
386 if (p->next && p->next == player)
388 p->next = player->next;
395 if (player->introduced)
397 initNetworkBufferForWriting(write_buffer, OP_PLAYER_DISCONNECTED,
400 SendNetworkBufferToAllButOne(write_buffer, player);
406 #if 0 /* do not terminate network server if last player disconnected */
407 if (run_server_only_once && num_clients == 0)
411 Error(ERR_NETWORK_SERVER, "no clients left");
412 Error(ERR_NETWORK_SERVER, "aborting");
420 static void AddPlayer(TCPsocket fd)
422 struct NetworkServerPlayerInfo *player, *p;
424 boolean again = TRUE;
426 SDLNet_TCP_AddSocket(fds, fd);
428 player = checked_calloc(sizeof(struct NetworkServerPlayerInfo));
431 player->player_name[0] = 0;
432 player->active = FALSE;
433 player->introduced = FALSE;
435 player->action_received = FALSE;
436 player->next = first_player;
438 first_player = player;
447 if (p->number == number)
460 player->number = number;
463 initNetworkBufferForWriting(write_buffer, OP_YOUR_NUMBER, 0);
465 putNetworkBuffer8BitInteger(write_buffer, player->number);
467 SendNetworkBufferToClient(write_buffer, player);
470 static void Handle_OP_PROTOCOL_VERSION(struct NetworkServerPlayerInfo *player)
472 int protocol_version_major = getNetworkBuffer8BitInteger(read_buffer);
473 int protocol_version_minor = getNetworkBuffer8BitInteger(read_buffer);
474 int protocol_version_patch = getNetworkBuffer8BitInteger(read_buffer);
476 if (protocol_version_major != PROTOCOL_VERSION_MAJOR ||
477 protocol_version_minor != PROTOCOL_VERSION_MINOR)
480 Error(ERR_NETWORK_SERVER,
481 "client %d (%s) has wrong protocol version %d.%d.%d",
482 player->number, player->player_name,
483 protocol_version_major,
484 protocol_version_minor,
485 protocol_version_patch);
487 initNetworkBufferForWriting(write_buffer, OP_BAD_PROTOCOL_VERSION, 0);
489 putNetworkBuffer8BitInteger(write_buffer, PROTOCOL_VERSION_MAJOR);
490 putNetworkBuffer8BitInteger(write_buffer, PROTOCOL_VERSION_MINOR);
491 putNetworkBuffer8BitInteger(write_buffer, PROTOCOL_VERSION_PATCH);
493 SendNetworkBufferToClient(write_buffer, player);
495 RemovePlayer(player);
500 Error(ERR_NETWORK_SERVER,
501 "client %d (%s) uses protocol version %d.%d.%d",
502 player->number, player->player_name,
503 protocol_version_major,
504 protocol_version_minor,
505 protocol_version_patch);
509 static void Handle_OP_NUMBER_WANTED(struct NetworkServerPlayerInfo *player)
511 int nr_wanted = getNetworkBuffer8BitInteger(read_buffer);
512 int client_nr = player->number;
513 boolean nr_is_free = TRUE;
514 struct NetworkServerPlayerInfo *p;
517 Error(ERR_NETWORK_SERVER, "client %d (%s) wants to switch to # %d",
518 player->number, player->player_name, nr_wanted);
520 for (p = first_player; p != NULL; p = p->next)
522 if (p->number == nr_wanted)
533 Error(ERR_NETWORK_SERVER, "client %d (%s) switches to # %d",
534 player->number, player->player_name, nr_wanted);
535 else if (player->number == nr_wanted)
536 Error(ERR_NETWORK_SERVER, "client %d (%s) already has # %d",
537 player->number, player->player_name, nr_wanted);
539 Error(ERR_NETWORK_SERVER,
540 "client %d (%s) cannot switch (client %d already exists)",
541 player->number, player->player_name, nr_wanted);
545 player->number = nr_wanted;
547 initNetworkBufferForWriting(write_buffer, OP_NUMBER_WANTED, client_nr);
549 putNetworkBuffer8BitInteger(write_buffer, nr_wanted);
550 putNetworkBuffer8BitInteger(write_buffer, player->number);
552 SendNetworkBufferToAll(write_buffer);
555 static void Handle_OP_PLAYER_NAME(struct NetworkServerPlayerInfo *player)
557 char *player_name = getNetworkBufferString(read_buffer);
560 strncpy(player->player_name, player_name, MAX_PLAYER_NAME_LEN);
561 player->player_name[MAX_PLAYER_NAME_LEN] = '\0';
563 for (i = 0; i < MAX_PLAYER_NAME_LEN; i++)
565 if (player->player_name[i] < ' ' ||
566 ((unsigned char)(player->player_name[i]) > 0x7e &&
567 (unsigned char)(player->player_name[i]) <= 0xa0))
569 player->player_name[i] = 0;
575 if (!player->introduced)
577 initNetworkBufferForWriting(write_buffer, OP_PLAYER_CONNECTED,
580 SendNetworkBufferToAllButOne(write_buffer, player);
584 Error(ERR_NETWORK_SERVER, "client %d calls itself \"%s\"",
585 player->number, player->player_name);
587 copyNetworkBufferForWriting(read_buffer, write_buffer, player->number);
589 SendNetworkBufferToAllButOne(write_buffer, player);
591 if (!player->introduced)
593 struct NetworkServerPlayerInfo *p;
595 for (p = first_player; p != NULL; p = p->next)
597 if (p != player && p->introduced)
599 initNetworkBufferForWriting(write_buffer, OP_PLAYER_CONNECTED,
602 SendNetworkBufferToClient(write_buffer, player);
604 initNetworkBufferForWriting(write_buffer, OP_PLAYER_NAME, p->number);
606 putNetworkBufferString(write_buffer, p->player_name);
608 SendNetworkBufferToClient(write_buffer, player);
613 player->introduced = TRUE;
616 static void Handle_OP_START_PLAYING(struct NetworkServerPlayerInfo *player)
618 char *new_leveldir_identifier = getNetworkBufferString(read_buffer);
619 int level_nr = getNetworkBuffer16BitInteger(read_buffer);
622 Error(ERR_NETWORK_SERVER,
623 "client %d (%s) starts game [level %d from level set '%s']",
624 player->number, player->player_name, level_nr,
625 new_leveldir_identifier);
627 struct NetworkServerPlayerInfo *p;
629 /* reset frame counter */
630 ServerFrameCounter = 0;
632 Error(ERR_NETWORK_SERVER, "resetting ServerFrameCounter to 0");
634 /* reset player actions */
635 for (p = first_player; p != NULL; p = p->next)
638 p->action_received = FALSE;
644 copyNetworkBufferForWriting(read_buffer, write_buffer, player->number);
646 SendNetworkBufferToAll(write_buffer);
649 static void Handle_OP_PAUSE_PLAYING(struct NetworkServerPlayerInfo *player)
652 Error(ERR_NETWORK_SERVER, "client %d (%s) pauses game",
653 player->number, player->player_name);
655 copyNetworkBufferForWriting(read_buffer, write_buffer, player->number);
657 SendNetworkBufferToAll(write_buffer);
660 static void Handle_OP_CONTINUE_PLAYING(struct NetworkServerPlayerInfo *player)
663 Error(ERR_NETWORK_SERVER, "client %d (%s) continues game",
664 player->number, player->player_name);
666 copyNetworkBufferForWriting(read_buffer, write_buffer, player->number);
668 SendNetworkBufferToAll(write_buffer);
671 static void Handle_OP_STOP_PLAYING(struct NetworkServerPlayerInfo *player)
673 int cause_for_stopping = getNetworkBuffer8BitInteger(read_buffer);
676 Error(ERR_NETWORK_SERVER, "client %d (%s) stops game [%d]",
677 player->number, player->player_name, cause_for_stopping);
679 copyNetworkBufferForWriting(read_buffer, write_buffer, player->number);
681 SendNetworkBufferToAll(write_buffer);
684 static void Handle_OP_MOVE_PLAYER(struct NetworkServerPlayerInfo *player)
686 int player_action = getNetworkBuffer8BitInteger(read_buffer);
687 int last_client_nr = 0;
688 struct NetworkServerPlayerInfo *p;
691 /* store player action */
692 for (p = first_player; p != NULL; p = p->next)
694 if (p->number == player->number)
696 p->action = player_action;
697 p->action_received = TRUE;
701 /* check if server received action from each player */
702 for (p = first_player; p != NULL; p = p->next)
704 if (!p->action_received)
707 if (p->number > last_client_nr)
708 last_client_nr = p->number;
711 int player_action_all[last_client_nr];
713 /* initialize all player actions to zero */
714 for (i = 0; i < last_client_nr; i++)
715 player_action_all[i] = 0;
717 /* broadcast actions of all players to all players */
718 for (p = first_player; p != NULL; p = p->next)
720 player_action_all[p->number - 1] = p->action;
723 p->action_received = FALSE;
726 initNetworkBufferForWriting(write_buffer, OP_MOVE_PLAYER, player->number);
728 putNetworkBuffer32BitInteger(write_buffer, ServerFrameCounter);
730 for (i = 0; i < last_client_nr; i++)
731 putNetworkBuffer8BitInteger(write_buffer, player_action_all[i]);
733 SendNetworkBufferToAll(write_buffer);
735 ServerFrameCounter++;
738 static void Handle_OP_BROADCAST_MESSAGE(struct NetworkServerPlayerInfo *player)
740 char *message = getNetworkBufferString(read_buffer);
743 Error(ERR_NETWORK_SERVER, "client %d (%s) sends message: %s",
744 player->number, player->player_name, message);
746 copyNetworkBufferForWriting(read_buffer, write_buffer, player->number);
748 SendNetworkBufferToAllButOne(write_buffer, player);
751 void ExitNetworkServer(int exit_value)
753 Error(ERR_NETWORK_SERVER, "exiting network server");
758 /* the following is not used for a standalone server;
759 the pointer points to an integer containing the port-number */
760 int NetworkServerThread(void *ptr)
762 NetworkServer(*((int *) ptr), 0);
764 /* should never be reached */
768 void NetworkServer(int port, int serveronly)
770 struct NetworkServerPlayerInfo *player;
773 #if defined(PLATFORM_UNIX) && !defined(PLATFORM_NEXT)
774 struct sigaction sact;
777 if (read_buffer == NULL)
778 read_buffer = newNetworkBuffer();
780 if (write_buffer == NULL)
781 write_buffer = newNetworkBuffer();
784 port = DEFAULT_SERVER_PORT;
786 // if only running the network server, exit on Ctrl-C
788 signal(SIGINT, ExitNetworkServer);
791 run_server_only_once = TRUE;
793 #if defined(PLATFORM_UNIX)
794 #if defined(PLATFORM_NEXT)
795 signal(SIGPIPE, SIG_IGN);
797 sact.sa_handler = SIG_IGN;
798 sigemptyset(&sact.sa_mask);
800 sigaction(SIGPIPE, &sact, NULL);
804 if (SDLNet_ResolveHost(&ip, NULL, port) == -1)
805 Error(ERR_EXIT_NETWORK_SERVER, "SDLNet_ResolveHost() failed: %s",
808 if ((fds = SDLNet_AllocSocketSet(MAX_PLAYERS + 1 + 1)) == NULL)
809 Error(ERR_EXIT_NETWORK_SERVER, "SDLNet_AllocSocketSet() failed: %s"),
812 if ((lfd = SDLNet_TCP_Open(&ip)) == NULL)
813 Error(ERR_EXIT_NETWORK_SERVER, "SDLNet_TCP_Open() failed: %s"),
816 if (SDLNet_TCP_AddSocket(fds, lfd) == -1)
817 Error(ERR_EXIT_NETWORK_SERVER, "SDLNet_TCP_AddSocket() failed: %s"),
820 if ((udp = SDLNet_UDP_Open(port)) == NULL)
821 Error(ERR_EXIT_NETWORK_SERVER, "SDLNet_UDP_Open() failed: %s",
824 if (SDLNet_UDP_AddSocket(fds, udp) == -1)
825 Error(ERR_EXIT_NETWORK_SERVER, "SDLNet_TCP_AddSocket() failed: %s"),
830 Error(ERR_NETWORK_SERVER, "started up, listening on port %d", port);
831 Error(ERR_NETWORK_SERVER, "using protocol version %d.%d.%d",
832 PROTOCOL_VERSION_MAJOR,
833 PROTOCOL_VERSION_MINOR,
834 PROTOCOL_VERSION_PATCH);
839 // wait for 100 ms for activity on open network sockets
840 if (SDLNet_CheckSockets(fds, 100) < 1)
843 /* accept incoming TCP connections */
844 if (SDLNet_SocketReady(lfd))
846 Error(ERR_DEBUG, "got TCP packet");
850 newsock = SDLNet_TCP_Accept(lfd);
856 /* accept incoming UDP packets */
857 if (SDLNet_SocketReady(udp))
859 Error(ERR_DEBUG, "got UDP packet");
861 static UDPpacket packet;
863 int num_packets = SDLNet_UDP_Recv(udp, &packet);
865 if (num_packets == 1)
868 SDLNet_UDP_Send(udp, -1, &packet);
872 for (player = first_player; player != NULL; player = player->next)
874 if (!SDLNet_SocketReady(player->fd))
877 initNetworkBufferForReceiving(read_buffer);
879 int num_bytes = receiveNetworkBufferPacket(read_buffer, player->fd);
884 Error(ERR_NETWORK_SERVER, "EOF from client %d (%s)",
885 player->number, player->player_name);
887 RemovePlayer(player);
892 initNetworkBufferForReading(read_buffer);
894 int message_type = getNetworkBuffer8BitInteger(read_buffer);
896 /* skip player number */
897 getNetworkBuffer8BitInteger(read_buffer);
899 if (!player->introduced &&
900 message_type != OP_PLAYER_NAME &&
901 message_type != OP_PROTOCOL_VERSION)
904 Error(ERR_NETWORK_SERVER, "got opcode %d for client %d which is not introduced yet (expected OP_PLAYER_NAME or OP_PROTOCOL_VERSION)", message_type, player->number);
906 RemovePlayer(player);
911 switch (message_type)
913 case OP_PROTOCOL_VERSION:
914 Handle_OP_PROTOCOL_VERSION(player);
917 case OP_NUMBER_WANTED:
918 Handle_OP_NUMBER_WANTED(player);
922 Handle_OP_PLAYER_NAME(player);
925 case OP_START_PLAYING:
926 Handle_OP_START_PLAYING(player);
929 case OP_PAUSE_PLAYING:
930 Handle_OP_PAUSE_PLAYING(player);
933 case OP_CONTINUE_PLAYING:
934 Handle_OP_CONTINUE_PLAYING(player);
937 case OP_STOP_PLAYING:
938 Handle_OP_STOP_PLAYING(player);
942 Handle_OP_MOVE_PLAYER(player);
945 case OP_BROADCAST_MESSAGE:
946 Handle_OP_BROADCAST_MESSAGE(player);
951 Error(ERR_NETWORK_SERVER,
952 "unknown opcode %d from client %d (%s)",
953 message_type, player->number, player->player_name);