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)
23 #include "libgame/libgame.h"
27 static int clients = 0;
28 static int onceonly = 0;
30 struct NetworkServerPlayerInfo
35 struct NetworkServerPlayerInfo *next;
38 unsigned char readbuffer[MAX_BUFFER_SIZE];
39 unsigned char writbuffer[MAX_BUFFER_SIZE];
42 boolean action_received;
45 static struct NetworkServerPlayerInfo *first_player = NULL;
47 #define NEXT(player) ((player)->next ? (player)->next : first_player)
49 /* TODO: peer address */
50 static TCPsocket lfd; /* listening TCP socket */
51 static UDPsocket udp; /* listening UDP socket */
52 static SDLNet_SocketSet fds; /* socket set */
54 static unsigned char realbuffer[512], *buffer = realbuffer + 4;
58 static unsigned int ServerFrameCounter = 0;
60 static void addtobuffer(struct NetworkServerPlayerInfo *player,
61 unsigned char *b, int len)
63 if (player->nwrite + len >= MAX_BUFFER_SIZE)
64 Error(ERR_EXIT_NETWORK_SERVER,
65 "internal error: network send buffer overflow");
67 memcpy(player->writbuffer + player->nwrite, b, len);
68 player->nwrite += len;
71 static void flushuser(struct NetworkServerPlayerInfo *player)
75 SDLNet_TCP_Send(player->fd, player->writbuffer, player->nwrite);
81 static void broadcast(struct NetworkServerPlayerInfo *except,
82 int len, int activeonly)
84 struct NetworkServerPlayerInfo *player;
86 realbuffer[0] = realbuffer[1] = realbuffer[2] = 0;
87 realbuffer[3] = (unsigned char)len;
88 for (player = first_player; player; player = player->next)
89 if (player != except && player->introduced &&
90 (player->active || !activeonly))
91 addtobuffer(player, realbuffer, 4 + len);
94 static void sendtoone(struct NetworkServerPlayerInfo *to, int len)
96 realbuffer[0] = realbuffer[1] = realbuffer[2] = 0;
97 realbuffer[3] = (unsigned char)len;
98 addtobuffer(to, realbuffer, 4 + len);
101 static void RemovePlayer(struct NetworkServerPlayerInfo *player)
103 struct NetworkServerPlayerInfo *v;
106 Error(ERR_NETWORK_SERVER, "dropping client %d (%s)",
107 player->number, player->player_name);
109 if (player == first_player)
110 first_player = player->next;
113 for (v = first_player; v; v = v->next)
115 if (v->next && v->next == player)
117 v->next = player->next;
123 SDLNet_TCP_DelSocket(fds, player->fd);
124 SDLNet_TCP_Close(player->fd);
126 if (player->introduced)
128 buffer[0] = player->number;
129 buffer[1] = OP_PLAYER_DISCONNECTED;
130 broadcast(player, 2, 0);
136 if (onceonly && clients == 0)
140 Error(ERR_NETWORK_SERVER, "no clients left");
141 Error(ERR_NETWORK_SERVER, "aborting");
147 static void AddPlayer(TCPsocket fd)
149 struct NetworkServerPlayerInfo *player, *v;
151 boolean again = TRUE;
153 player = checked_malloc(sizeof (struct NetworkServerPlayerInfo));
156 player->player_name[0] = 0;
157 player->next = first_player;
161 player->introduced = 0;
163 player->action_received = FALSE;
165 SDLNet_TCP_AddSocket(fds, fd);
167 first_player = player;
178 if (v->number == nxn)
189 player->number = nxn;
193 buffer[1] = OP_YOUR_NUMBER;
194 buffer[2] = player->number;
195 sendtoone(player, 3);
198 static void Handle_OP_PROTOCOL_VERSION(struct NetworkServerPlayerInfo *player,
202 buffer[2] != PROTOCOL_VERSION_1 ||
203 buffer[3] != PROTOCOL_VERSION_2)
206 Error(ERR_NETWORK_SERVER,
207 "client %d (%s) has wrong protocol version %d.%d.%d",
208 player->number, player->player_name, buffer[2], buffer[3], buffer[4]);
211 buffer[1] = OP_BAD_PROTOCOL_VERSION;
212 buffer[2] = PROTOCOL_VERSION_1;
213 buffer[3] = PROTOCOL_VERSION_2;
214 buffer[4] = PROTOCOL_VERSION_3;
215 sendtoone(player, 5);
218 RemovePlayer(player);
224 Error(ERR_NETWORK_SERVER,
225 "client %d (%s) uses protocol version %d.%d.%d",
226 player->number, player->player_name, buffer[2], buffer[3], buffer[4]);
230 static void Handle_OP_NUMBER_WANTED(struct NetworkServerPlayerInfo *player)
232 struct NetworkServerPlayerInfo *v;
233 int client_nr = player->number;
234 int nr_wanted = buffer[2];
238 Error(ERR_NETWORK_SERVER, "client %d (%s) wants to switch to # %d",
239 player->number, player->player_name, nr_wanted);
241 for (v = first_player; v; v = v->next)
243 if (v->number == nr_wanted)
253 Error(ERR_NETWORK_SERVER, "client %d (%s) switches to # %d",
254 player->number, player->player_name, nr_wanted);
255 else if (player->number == nr_wanted)
256 Error(ERR_NETWORK_SERVER, "client %d (%s) already has # %d",
257 player->number, player->player_name, nr_wanted);
259 Error(ERR_NETWORK_SERVER,
260 "client %d (%s) cannot switch (client %d already exists)",
261 player->number, player->player_name, nr_wanted);
265 player->number = nr_wanted;
267 buffer[0] = client_nr;
268 buffer[1] = OP_NUMBER_WANTED;
269 buffer[2] = nr_wanted;
270 buffer[3] = player->number;
273 sendtoone(player, 4);
276 broadcast(NULL, 4, 0);
279 static void Handle_OP_PLAYER_NAME(struct NetworkServerPlayerInfo *player,
282 struct NetworkServerPlayerInfo *v;
287 memcpy(player->player_name, &buffer[2], len-2);
288 player->player_name[len-2] = 0;
289 for (i = 0; i < len - 2; i++)
291 if (player->player_name[i] < ' ' ||
292 ((unsigned char)(player->player_name[i]) > 0x7e &&
293 (unsigned char)(player->player_name[i]) <= 0xa0))
295 player->player_name[i] = 0;
300 if (!player->introduced)
302 buffer[0] = player->number;
303 buffer[1] = OP_PLAYER_CONNECTED;
304 broadcast(player, 2, 0);
308 Error(ERR_NETWORK_SERVER, "client %d calls itself \"%s\"",
309 player->number, player->player_name);
310 buffer[1] = OP_PLAYER_NAME;
311 broadcast(player, len, 0);
313 if (!player->introduced)
315 for (v = first_player; v; v = v->next)
317 if (v != player && v->introduced)
319 buffer[0] = v->number;
320 buffer[1] = OP_PLAYER_CONNECTED;
321 sendtoone(player, 2);
322 buffer[1] = OP_PLAYER_NAME;
323 memcpy(&buffer[2], v->player_name, 14);
324 sendtoone(player, 2+strlen(v->player_name));
329 player->introduced = 1;
332 static void Handle_OP_START_PLAYING(struct NetworkServerPlayerInfo *player)
334 struct NetworkServerPlayerInfo *v, *w;
337 Error(ERR_NETWORK_SERVER,
338 "client %d (%s) starts game [level %d from leveldir %d (%s)]",
339 player->number, player->player_name,
340 (buffer[2] << 8) + buffer[3],
341 (buffer[4] << 8) + buffer[5],
344 for (w = first_player; w; w = w->next)
348 /* reset frame counter */
349 ServerFrameCounter = 0;
351 Error(ERR_NETWORK_SERVER, "resetting ServerFrameCounter to 0");
353 /* reset player actions */
354 for (v = first_player; v; v = v->next)
357 v->action_received = FALSE;
360 broadcast(NULL, 10 + strlen((char *)&buffer[10])+1, 0);
363 static void Handle_OP_PAUSE_PLAYING(struct NetworkServerPlayerInfo *player)
366 Error(ERR_NETWORK_SERVER, "client %d (%s) pauses game",
367 player->number, player->player_name);
368 broadcast(NULL, 2, 0);
371 static void Handle_OP_CONTINUE_PLAYING(struct NetworkServerPlayerInfo *player)
374 Error(ERR_NETWORK_SERVER, "client %d (%s) continues game",
375 player->number, player->player_name);
376 broadcast(NULL, 2, 0);
379 static void Handle_OP_STOP_PLAYING(struct NetworkServerPlayerInfo *player)
381 int cause_for_stopping = buffer[2];
384 Error(ERR_NETWORK_SERVER, "client %d (%s) stops game [%d]",
385 player->number, player->player_name, cause_for_stopping);
386 broadcast(NULL, 3, 0);
389 static void Handle_OP_MOVE_PLAYER(struct NetworkServerPlayerInfo *player)
391 struct NetworkServerPlayerInfo *v;
392 int last_client_nr = 0;
395 /* store player action */
396 for (v = first_player; v; v = v->next)
398 if (v->number == player->number)
400 v->action = buffer[2];
401 v->action_received = TRUE;
405 /* check if server received action from each player */
406 for (v = first_player; v; v = v->next)
408 if (!v->action_received)
411 if (v->number > last_client_nr)
412 last_client_nr = v->number;
415 /* initialize all player actions to zero */
416 for (i = 0; i < last_client_nr; i++)
419 /* broadcast actions of all players to all players */
420 for (v = first_player; v; v = v->next)
422 buffer[6 + v->number-1] = v->action;
424 v->action_received = FALSE;
427 buffer[2] = (unsigned char)((ServerFrameCounter >> 24) & 0xff);
428 buffer[3] = (unsigned char)((ServerFrameCounter >> 16) & 0xff);
429 buffer[4] = (unsigned char)((ServerFrameCounter >> 8) & 0xff);
430 buffer[5] = (unsigned char)((ServerFrameCounter >> 0) & 0xff);
432 broadcast(NULL, 6 + last_client_nr, 0);
434 ServerFrameCounter++;
437 void ExitNetworkServer(int exit_value)
439 Error(ERR_NETWORK_SERVER, "exiting network server");
444 /* the following is not used for a standalone server;
445 the pointer points to an integer containing the port-number */
446 int NetworkServerThread(void *ptr)
448 NetworkServer(*((int *) ptr), 0);
450 /* should never be reached */
454 void NetworkServer(int port, int serveronly)
456 struct NetworkServerPlayerInfo *player;
461 #if defined(PLATFORM_UNIX) && !defined(PLATFORM_NEXT)
462 struct sigaction sact;
466 port = DEFAULT_SERVER_PORT;
468 // if only running the network server, exit on Ctrl-C
470 signal(SIGINT, ExitNetworkServer);
475 #if defined(PLATFORM_UNIX)
476 #if defined(PLATFORM_NEXT)
477 signal(SIGPIPE, SIG_IGN);
479 sact.sa_handler = SIG_IGN;
480 sigemptyset(&sact.sa_mask);
482 sigaction(SIGPIPE, &sact, NULL);
486 if (SDLNet_ResolveHost(&ip, NULL, port) == -1)
487 Error(ERR_EXIT_NETWORK_SERVER, "SDLNet_ResolveHost() failed: %s",
490 if ((fds = SDLNet_AllocSocketSet(MAX_PLAYERS + 1 + 1)) == NULL)
491 Error(ERR_EXIT_NETWORK_SERVER, "SDLNet_AllocSocketSet() failed: %s"),
494 if ((lfd = SDLNet_TCP_Open(&ip)) == NULL)
495 Error(ERR_EXIT_NETWORK_SERVER, "SDLNet_TCP_Open() failed: %s"),
498 if (SDLNet_TCP_AddSocket(fds, lfd) == -1)
499 Error(ERR_EXIT_NETWORK_SERVER, "SDLNet_TCP_AddSocket() failed: %s"),
502 if ((udp = SDLNet_UDP_Open(port)) == NULL)
503 Error(ERR_EXIT_NETWORK_SERVER, "SDLNet_UDP_Open() failed: %s",
506 if (SDLNet_UDP_AddSocket(fds, udp) == -1)
507 Error(ERR_EXIT_NETWORK_SERVER, "SDLNet_TCP_AddSocket() failed: %s"),
512 Error(ERR_NETWORK_SERVER, "started up, listening on port %d", port);
513 Error(ERR_NETWORK_SERVER, "using protocol version %d.%d.%d",
514 PROTOCOL_VERSION_1, PROTOCOL_VERSION_2, PROTOCOL_VERSION_3);
521 for (player = first_player; player; player = player->next)
524 // wait for 100 ms for activity on open network sockets
525 if (SDLNet_CheckSockets(fds, 100) < 1)
528 /* accept incoming TCP connections */
529 if (SDLNet_SocketReady(lfd))
531 Error(ERR_DEBUG, "got TCP packet");
535 newsock = SDLNet_TCP_Accept(lfd);
541 /* accept incoming UDP packets */
542 if (SDLNet_SocketReady(udp))
544 Error(ERR_DEBUG, "got UDP packet");
546 static UDPpacket packet;
548 int num_packets = SDLNet_UDP_Recv(udp, &packet);
550 if (num_packets == 1)
553 SDLNet_UDP_Send(udp, -1, &packet);
557 player = first_player;
559 while (player && !interrupt)
561 if (SDLNet_SocketReady(player->fd))
563 /* read only 1 byte, because SDLNet blocks when we want more than is
565 r = SDLNet_TCP_Recv(player->fd, player->readbuffer + player->nread, 1);
570 Error(ERR_NETWORK_SERVER, "EOF from client %d (%s)",
571 player->number, player->player_name);
572 RemovePlayer(player);
577 while (player->nread >= 4 && player->nread >= 4 + player->readbuffer[3])
579 len = player->readbuffer[3];
580 if (player->readbuffer[0] || player->readbuffer[1] || player->readbuffer[2])
583 Error(ERR_NETWORK_SERVER, "crap from client %d (%s)",
584 player->number, player->player_name);
585 RemovePlayer(player);
589 memcpy(buffer, &player->readbuffer[4], len);
590 player->nread -= 4 + len;
591 memmove(player->readbuffer, player->readbuffer + 4 + len, player->nread);
593 buffer[0] = player->number;
594 if (!player->introduced && buffer[1] != OP_PLAYER_NAME)
597 Error(ERR_NETWORK_SERVER, "!(client %d)->introduced && buffer[1]==%d (expected OP_PLAYER_NAME)", buffer[0], buffer[1]);
599 RemovePlayer(player);
607 Handle_OP_PLAYER_NAME(player, len);
610 case OP_PROTOCOL_VERSION:
611 Handle_OP_PROTOCOL_VERSION(player, len);
614 case OP_NUMBER_WANTED:
615 Handle_OP_NUMBER_WANTED(player);
618 case OP_START_PLAYING:
619 Handle_OP_START_PLAYING(player);
622 case OP_PAUSE_PLAYING:
623 Handle_OP_PAUSE_PLAYING(player);
626 case OP_CONTINUE_PLAYING:
627 Handle_OP_CONTINUE_PLAYING(player);
630 case OP_STOP_PLAYING:
631 Handle_OP_STOP_PLAYING(player);
635 Handle_OP_MOVE_PLAYER(player);
638 case OP_BROADCAST_MESSAGE:
641 Error(ERR_NETWORK_SERVER, "client %d (%s) sends message: %s",
642 player->number, player->player_name, &buffer[2]);
643 broadcast(player, len, 0);
648 Error(ERR_NETWORK_SERVER,
649 "unknown opcode %d from client %d (%s)",
650 buffer[0], player->number, player->player_name);
655 if (player && !interrupt)
656 player = player->next;
661 #endif /* NETWORK_AVALIABLE */