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 clients = 0;
24 static int onceonly = 0;
26 struct NetworkServerPlayerInfo
31 struct NetworkServerPlayerInfo *next;
34 unsigned char readbuffer[MAX_BUFFER_SIZE];
35 unsigned char writbuffer[MAX_BUFFER_SIZE];
38 boolean action_received;
41 static struct NetworkServerPlayerInfo *first_player = NULL;
43 #define NEXT(player) ((player)->next ? (player)->next : first_player)
45 /* TODO: peer address */
46 static TCPsocket lfd; /* listening TCP socket */
47 static UDPsocket udp; /* listening UDP socket */
48 static SDLNet_SocketSet fds; /* socket set */
50 static unsigned char realbuffer[512], *buffer = realbuffer + 4;
54 static unsigned int ServerFrameCounter = 0;
56 static void addtobuffer(struct NetworkServerPlayerInfo *player,
57 unsigned char *b, int len)
59 if (player->nwrite + len >= MAX_BUFFER_SIZE)
60 Error(ERR_EXIT_NETWORK_SERVER,
61 "internal error: network send buffer overflow");
63 memcpy(player->writbuffer + player->nwrite, b, len);
64 player->nwrite += len;
67 static void flushuser(struct NetworkServerPlayerInfo *player)
71 SDLNet_TCP_Send(player->fd, player->writbuffer, player->nwrite);
77 static void broadcast(struct NetworkServerPlayerInfo *except,
78 int len, int activeonly)
80 struct NetworkServerPlayerInfo *player;
82 realbuffer[0] = realbuffer[1] = realbuffer[2] = 0;
83 realbuffer[3] = (unsigned char)len;
84 for (player = first_player; player; player = player->next)
85 if (player != except && player->introduced &&
86 (player->active || !activeonly))
87 addtobuffer(player, realbuffer, 4 + len);
90 static void sendtoone(struct NetworkServerPlayerInfo *to, int len)
92 realbuffer[0] = realbuffer[1] = realbuffer[2] = 0;
93 realbuffer[3] = (unsigned char)len;
94 addtobuffer(to, realbuffer, 4 + len);
97 static void RemovePlayer(struct NetworkServerPlayerInfo *player)
99 struct NetworkServerPlayerInfo *v;
102 Error(ERR_NETWORK_SERVER, "dropping client %d (%s)",
103 player->number, player->player_name);
105 if (player == first_player)
106 first_player = player->next;
109 for (v = first_player; v; v = v->next)
111 if (v->next && v->next == player)
113 v->next = player->next;
119 SDLNet_TCP_DelSocket(fds, player->fd);
120 SDLNet_TCP_Close(player->fd);
122 if (player->introduced)
124 buffer[0] = player->number;
125 buffer[1] = OP_PLAYER_DISCONNECTED;
126 broadcast(player, 2, 0);
132 #if 0 /* do not terminate network server if last player disconnected */
133 if (onceonly && clients == 0)
137 Error(ERR_NETWORK_SERVER, "no clients left");
138 Error(ERR_NETWORK_SERVER, "aborting");
145 static void AddPlayer(TCPsocket fd)
147 struct NetworkServerPlayerInfo *player, *v;
149 boolean again = TRUE;
151 player = checked_malloc(sizeof (struct NetworkServerPlayerInfo));
154 player->player_name[0] = 0;
155 player->next = first_player;
159 player->introduced = 0;
161 player->action_received = FALSE;
163 SDLNet_TCP_AddSocket(fds, fd);
165 first_player = player;
176 if (v->number == nxn)
187 player->number = nxn;
191 buffer[1] = OP_YOUR_NUMBER;
192 buffer[2] = player->number;
193 sendtoone(player, 3);
196 static void Handle_OP_PROTOCOL_VERSION(struct NetworkServerPlayerInfo *player,
200 buffer[2] != PROTOCOL_VERSION_1 ||
201 buffer[3] != PROTOCOL_VERSION_2)
204 Error(ERR_NETWORK_SERVER,
205 "client %d (%s) has wrong protocol version %d.%d.%d",
206 player->number, player->player_name, buffer[2], buffer[3], buffer[4]);
209 buffer[1] = OP_BAD_PROTOCOL_VERSION;
210 buffer[2] = PROTOCOL_VERSION_1;
211 buffer[3] = PROTOCOL_VERSION_2;
212 buffer[4] = PROTOCOL_VERSION_3;
213 sendtoone(player, 5);
216 RemovePlayer(player);
222 Error(ERR_NETWORK_SERVER,
223 "client %d (%s) uses protocol version %d.%d.%d",
224 player->number, player->player_name, buffer[2], buffer[3], buffer[4]);
228 static void Handle_OP_NUMBER_WANTED(struct NetworkServerPlayerInfo *player)
230 struct NetworkServerPlayerInfo *v;
231 int client_nr = player->number;
232 int nr_wanted = buffer[2];
236 Error(ERR_NETWORK_SERVER, "client %d (%s) wants to switch to # %d",
237 player->number, player->player_name, nr_wanted);
239 for (v = first_player; v; v = v->next)
241 if (v->number == nr_wanted)
251 Error(ERR_NETWORK_SERVER, "client %d (%s) switches to # %d",
252 player->number, player->player_name, nr_wanted);
253 else if (player->number == nr_wanted)
254 Error(ERR_NETWORK_SERVER, "client %d (%s) already has # %d",
255 player->number, player->player_name, nr_wanted);
257 Error(ERR_NETWORK_SERVER,
258 "client %d (%s) cannot switch (client %d already exists)",
259 player->number, player->player_name, nr_wanted);
263 player->number = nr_wanted;
265 buffer[0] = client_nr;
266 buffer[1] = OP_NUMBER_WANTED;
267 buffer[2] = nr_wanted;
268 buffer[3] = player->number;
271 sendtoone(player, 4);
274 broadcast(NULL, 4, 0);
277 static void Handle_OP_PLAYER_NAME(struct NetworkServerPlayerInfo *player,
280 struct NetworkServerPlayerInfo *v;
285 memcpy(player->player_name, &buffer[2], len-2);
286 player->player_name[len-2] = 0;
287 for (i = 0; i < len - 2; i++)
289 if (player->player_name[i] < ' ' ||
290 ((unsigned char)(player->player_name[i]) > 0x7e &&
291 (unsigned char)(player->player_name[i]) <= 0xa0))
293 player->player_name[i] = 0;
298 if (!player->introduced)
300 buffer[0] = player->number;
301 buffer[1] = OP_PLAYER_CONNECTED;
302 broadcast(player, 2, 0);
306 Error(ERR_NETWORK_SERVER, "client %d calls itself \"%s\"",
307 player->number, player->player_name);
308 buffer[1] = OP_PLAYER_NAME;
309 broadcast(player, len, 0);
311 if (!player->introduced)
313 for (v = first_player; v; v = v->next)
315 if (v != player && v->introduced)
317 buffer[0] = v->number;
318 buffer[1] = OP_PLAYER_CONNECTED;
319 sendtoone(player, 2);
320 buffer[1] = OP_PLAYER_NAME;
321 memcpy(&buffer[2], v->player_name, 14);
322 sendtoone(player, 2+strlen(v->player_name));
327 player->introduced = 1;
330 static void Handle_OP_START_PLAYING(struct NetworkServerPlayerInfo *player)
332 struct NetworkServerPlayerInfo *v, *w;
335 Error(ERR_NETWORK_SERVER,
336 "client %d (%s) starts game [level %d from leveldir %d (%s)]",
337 player->number, player->player_name,
338 (buffer[2] << 8) + buffer[3],
339 (buffer[4] << 8) + buffer[5],
342 for (w = first_player; w; w = w->next)
346 /* reset frame counter */
347 ServerFrameCounter = 0;
349 Error(ERR_NETWORK_SERVER, "resetting ServerFrameCounter to 0");
351 /* reset player actions */
352 for (v = first_player; v; v = v->next)
355 v->action_received = FALSE;
358 broadcast(NULL, 10 + strlen((char *)&buffer[10])+1, 0);
361 static void Handle_OP_PAUSE_PLAYING(struct NetworkServerPlayerInfo *player)
364 Error(ERR_NETWORK_SERVER, "client %d (%s) pauses game",
365 player->number, player->player_name);
366 broadcast(NULL, 2, 0);
369 static void Handle_OP_CONTINUE_PLAYING(struct NetworkServerPlayerInfo *player)
372 Error(ERR_NETWORK_SERVER, "client %d (%s) continues game",
373 player->number, player->player_name);
374 broadcast(NULL, 2, 0);
377 static void Handle_OP_STOP_PLAYING(struct NetworkServerPlayerInfo *player)
379 int cause_for_stopping = buffer[2];
382 Error(ERR_NETWORK_SERVER, "client %d (%s) stops game [%d]",
383 player->number, player->player_name, cause_for_stopping);
384 broadcast(NULL, 3, 0);
387 static void Handle_OP_MOVE_PLAYER(struct NetworkServerPlayerInfo *player)
389 struct NetworkServerPlayerInfo *v;
390 int last_client_nr = 0;
393 /* store player action */
394 for (v = first_player; v; v = v->next)
396 if (v->number == player->number)
398 v->action = buffer[2];
399 v->action_received = TRUE;
403 /* check if server received action from each player */
404 for (v = first_player; v; v = v->next)
406 if (!v->action_received)
409 if (v->number > last_client_nr)
410 last_client_nr = v->number;
413 /* initialize all player actions to zero */
414 for (i = 0; i < last_client_nr; i++)
417 /* broadcast actions of all players to all players */
418 for (v = first_player; v; v = v->next)
420 buffer[6 + v->number-1] = v->action;
422 v->action_received = FALSE;
425 buffer[2] = (unsigned char)((ServerFrameCounter >> 24) & 0xff);
426 buffer[3] = (unsigned char)((ServerFrameCounter >> 16) & 0xff);
427 buffer[4] = (unsigned char)((ServerFrameCounter >> 8) & 0xff);
428 buffer[5] = (unsigned char)((ServerFrameCounter >> 0) & 0xff);
430 broadcast(NULL, 6 + last_client_nr, 0);
432 ServerFrameCounter++;
435 void ExitNetworkServer(int exit_value)
437 Error(ERR_NETWORK_SERVER, "exiting network server");
442 /* the following is not used for a standalone server;
443 the pointer points to an integer containing the port-number */
444 int NetworkServerThread(void *ptr)
446 NetworkServer(*((int *) ptr), 0);
448 /* should never be reached */
452 void NetworkServer(int port, int serveronly)
454 struct NetworkServerPlayerInfo *player;
459 #if defined(PLATFORM_UNIX) && !defined(PLATFORM_NEXT)
460 struct sigaction sact;
464 port = DEFAULT_SERVER_PORT;
466 // if only running the network server, exit on Ctrl-C
468 signal(SIGINT, ExitNetworkServer);
473 #if defined(PLATFORM_UNIX)
474 #if defined(PLATFORM_NEXT)
475 signal(SIGPIPE, SIG_IGN);
477 sact.sa_handler = SIG_IGN;
478 sigemptyset(&sact.sa_mask);
480 sigaction(SIGPIPE, &sact, NULL);
484 if (SDLNet_ResolveHost(&ip, NULL, port) == -1)
485 Error(ERR_EXIT_NETWORK_SERVER, "SDLNet_ResolveHost() failed: %s",
488 if ((fds = SDLNet_AllocSocketSet(MAX_PLAYERS + 1 + 1)) == NULL)
489 Error(ERR_EXIT_NETWORK_SERVER, "SDLNet_AllocSocketSet() failed: %s"),
492 if ((lfd = SDLNet_TCP_Open(&ip)) == NULL)
493 Error(ERR_EXIT_NETWORK_SERVER, "SDLNet_TCP_Open() failed: %s"),
496 if (SDLNet_TCP_AddSocket(fds, lfd) == -1)
497 Error(ERR_EXIT_NETWORK_SERVER, "SDLNet_TCP_AddSocket() failed: %s"),
500 if ((udp = SDLNet_UDP_Open(port)) == NULL)
501 Error(ERR_EXIT_NETWORK_SERVER, "SDLNet_UDP_Open() failed: %s",
504 if (SDLNet_UDP_AddSocket(fds, udp) == -1)
505 Error(ERR_EXIT_NETWORK_SERVER, "SDLNet_TCP_AddSocket() failed: %s"),
510 Error(ERR_NETWORK_SERVER, "started up, listening on port %d", port);
511 Error(ERR_NETWORK_SERVER, "using protocol version %d.%d.%d",
512 PROTOCOL_VERSION_1, PROTOCOL_VERSION_2, PROTOCOL_VERSION_3);
519 for (player = first_player; player; player = player->next)
522 // wait for 100 ms for activity on open network sockets
523 if (SDLNet_CheckSockets(fds, 100) < 1)
526 /* accept incoming TCP connections */
527 if (SDLNet_SocketReady(lfd))
529 Error(ERR_DEBUG, "got TCP packet");
533 newsock = SDLNet_TCP_Accept(lfd);
539 /* accept incoming UDP packets */
540 if (SDLNet_SocketReady(udp))
542 Error(ERR_DEBUG, "got UDP packet");
544 static UDPpacket packet;
546 int num_packets = SDLNet_UDP_Recv(udp, &packet);
548 if (num_packets == 1)
551 SDLNet_UDP_Send(udp, -1, &packet);
555 player = first_player;
557 while (player && !interrupt)
559 if (SDLNet_SocketReady(player->fd))
561 /* read only 1 byte, because SDLNet blocks when we want more than is
563 r = SDLNet_TCP_Recv(player->fd, player->readbuffer + player->nread, 1);
568 Error(ERR_NETWORK_SERVER, "EOF from client %d (%s)",
569 player->number, player->player_name);
570 RemovePlayer(player);
575 while (player->nread >= 4 && player->nread >= 4 + player->readbuffer[3])
577 len = player->readbuffer[3];
578 if (player->readbuffer[0] || player->readbuffer[1] || player->readbuffer[2])
581 Error(ERR_NETWORK_SERVER, "crap from client %d (%s)",
582 player->number, player->player_name);
583 RemovePlayer(player);
587 memcpy(buffer, &player->readbuffer[4], len);
588 player->nread -= 4 + len;
589 memmove(player->readbuffer, player->readbuffer + 4 + len, player->nread);
591 buffer[0] = player->number;
592 if (!player->introduced && buffer[1] != OP_PLAYER_NAME)
595 Error(ERR_NETWORK_SERVER, "!(client %d)->introduced && buffer[1]==%d (expected OP_PLAYER_NAME)", buffer[0], buffer[1]);
597 RemovePlayer(player);
605 Handle_OP_PLAYER_NAME(player, len);
608 case OP_PROTOCOL_VERSION:
609 Handle_OP_PROTOCOL_VERSION(player, len);
612 case OP_NUMBER_WANTED:
613 Handle_OP_NUMBER_WANTED(player);
616 case OP_START_PLAYING:
617 Handle_OP_START_PLAYING(player);
620 case OP_PAUSE_PLAYING:
621 Handle_OP_PAUSE_PLAYING(player);
624 case OP_CONTINUE_PLAYING:
625 Handle_OP_CONTINUE_PLAYING(player);
628 case OP_STOP_PLAYING:
629 Handle_OP_STOP_PLAYING(player);
633 Handle_OP_MOVE_PLAYER(player);
636 case OP_BROADCAST_MESSAGE:
639 Error(ERR_NETWORK_SERVER, "client %d (%s) sends message: %s",
640 player->number, player->player_name, &buffer[2]);
641 broadcast(player, len, 0);
646 Error(ERR_NETWORK_SERVER,
647 "unknown opcode %d from client %d (%s)",
648 buffer[0], player->number, player->player_name);
653 if (player && !interrupt)
654 player = player->next;