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 socket */
51 static SDLNet_SocketSet fds; /* socket set */
53 static unsigned char realbuffer[512], *buffer = realbuffer + 4;
57 static unsigned int ServerFrameCounter = 0;
59 static void addtobuffer(struct NetworkServerPlayerInfo *player,
60 unsigned char *b, int len)
62 if (player->nwrite + len >= MAX_BUFFER_SIZE)
63 Error(ERR_EXIT_NETWORK_SERVER,
64 "internal error: network send buffer overflow");
66 memcpy(player->writbuffer + player->nwrite, b, len);
67 player->nwrite += len;
70 static void flushuser(struct NetworkServerPlayerInfo *player)
74 SDLNet_TCP_Send(player->fd, player->writbuffer, player->nwrite);
80 static void broadcast(struct NetworkServerPlayerInfo *except,
81 int len, int activeonly)
83 struct NetworkServerPlayerInfo *player;
85 realbuffer[0] = realbuffer[1] = realbuffer[2] = 0;
86 realbuffer[3] = (unsigned char)len;
87 for (player = first_player; player; player = player->next)
88 if (player != except && player->introduced &&
89 (player->active || !activeonly))
90 addtobuffer(player, realbuffer, 4 + len);
93 static void sendtoone(struct NetworkServerPlayerInfo *to, int len)
95 realbuffer[0] = realbuffer[1] = realbuffer[2] = 0;
96 realbuffer[3] = (unsigned char)len;
97 addtobuffer(to, realbuffer, 4 + len);
100 static void RemovePlayer(struct NetworkServerPlayerInfo *player)
102 struct NetworkServerPlayerInfo *v;
105 Error(ERR_NETWORK_SERVER, "dropping client %d (%s)",
106 player->number, player->player_name);
108 if (player == first_player)
109 first_player = player->next;
112 for (v = first_player; v; v = v->next)
114 if (v->next && v->next == player)
116 v->next = player->next;
122 SDLNet_TCP_DelSocket(fds, player->fd);
123 SDLNet_TCP_Close(player->fd);
125 if (player->introduced)
127 buffer[0] = player->number;
128 buffer[1] = OP_PLAYER_DISCONNECTED;
129 broadcast(player, 2, 0);
135 if (onceonly && clients == 0)
139 Error(ERR_NETWORK_SERVER, "no clients left");
140 Error(ERR_NETWORK_SERVER, "aborting");
146 static void AddPlayer(TCPsocket fd)
148 struct NetworkServerPlayerInfo *player, *v;
150 boolean again = TRUE;
152 player = checked_malloc(sizeof (struct NetworkServerPlayerInfo));
155 player->player_name[0] = 0;
156 player->next = first_player;
160 player->introduced = 0;
162 player->action_received = FALSE;
164 SDLNet_TCP_AddSocket(fds, fd);
166 first_player = player;
177 if (v->number == nxn)
188 player->number = nxn;
192 buffer[1] = OP_YOUR_NUMBER;
193 buffer[2] = player->number;
194 sendtoone(player, 3);
197 static void Handle_OP_PROTOCOL_VERSION(struct NetworkServerPlayerInfo *player,
201 buffer[2] != PROTOCOL_VERSION_1 ||
202 buffer[3] != PROTOCOL_VERSION_2)
205 Error(ERR_NETWORK_SERVER,
206 "client %d (%s) has wrong protocol version %d.%d.%d",
207 player->number, player->player_name, buffer[2], buffer[3], buffer[4]);
210 buffer[1] = OP_BAD_PROTOCOL_VERSION;
211 buffer[2] = PROTOCOL_VERSION_1;
212 buffer[3] = PROTOCOL_VERSION_2;
213 buffer[4] = PROTOCOL_VERSION_3;
214 sendtoone(player, 5);
217 RemovePlayer(player);
223 Error(ERR_NETWORK_SERVER,
224 "client %d (%s) uses protocol version %d.%d.%d",
225 player->number, player->player_name, buffer[2], buffer[3], buffer[4]);
229 static void Handle_OP_NUMBER_WANTED(struct NetworkServerPlayerInfo *player)
231 struct NetworkServerPlayerInfo *v;
232 int client_nr = player->number;
233 int nr_wanted = buffer[2];
237 Error(ERR_NETWORK_SERVER, "client %d (%s) wants to switch to # %d",
238 player->number, player->player_name, nr_wanted);
240 for (v = first_player; v; v = v->next)
242 if (v->number == nr_wanted)
252 Error(ERR_NETWORK_SERVER, "client %d (%s) switches to # %d",
253 player->number, player->player_name, nr_wanted);
254 else if (player->number == nr_wanted)
255 Error(ERR_NETWORK_SERVER, "client %d (%s) already has # %d",
256 player->number, player->player_name, nr_wanted);
258 Error(ERR_NETWORK_SERVER,
259 "client %d (%s) cannot switch (client %d already exists)",
260 player->number, player->player_name, nr_wanted);
264 player->number = nr_wanted;
266 buffer[0] = client_nr;
267 buffer[1] = OP_NUMBER_WANTED;
268 buffer[2] = nr_wanted;
269 buffer[3] = player->number;
272 sendtoone(player, 4);
275 broadcast(NULL, 4, 0);
278 static void Handle_OP_PLAYER_NAME(struct NetworkServerPlayerInfo *player,
281 struct NetworkServerPlayerInfo *v;
286 memcpy(player->player_name, &buffer[2], len-2);
287 player->player_name[len-2] = 0;
288 for (i = 0; i < len - 2; i++)
290 if (player->player_name[i] < ' ' ||
291 ((unsigned char)(player->player_name[i]) > 0x7e &&
292 (unsigned char)(player->player_name[i]) <= 0xa0))
294 player->player_name[i] = 0;
299 if (!player->introduced)
301 buffer[0] = player->number;
302 buffer[1] = OP_PLAYER_CONNECTED;
303 broadcast(player, 2, 0);
307 Error(ERR_NETWORK_SERVER, "client %d calls itself \"%s\"",
308 player->number, player->player_name);
309 buffer[1] = OP_PLAYER_NAME;
310 broadcast(player, len, 0);
312 if (!player->introduced)
314 for (v = first_player; v; v = v->next)
316 if (v != player && v->introduced)
318 buffer[0] = v->number;
319 buffer[1] = OP_PLAYER_CONNECTED;
320 sendtoone(player, 2);
321 buffer[1] = OP_PLAYER_NAME;
322 memcpy(&buffer[2], v->player_name, 14);
323 sendtoone(player, 2+strlen(v->player_name));
328 player->introduced = 1;
331 static void Handle_OP_START_PLAYING(struct NetworkServerPlayerInfo *player)
333 struct NetworkServerPlayerInfo *v, *w;
336 Error(ERR_NETWORK_SERVER,
337 "client %d (%s) starts game [level %d from leveldir %d (%s)]",
338 player->number, player->player_name,
339 (buffer[2] << 8) + buffer[3],
340 (buffer[4] << 8) + buffer[5],
343 for (w = first_player; w; w = w->next)
347 /* reset frame counter */
348 ServerFrameCounter = 0;
350 Error(ERR_NETWORK_SERVER, "resetting ServerFrameCounter to 0");
352 /* reset player actions */
353 for (v = first_player; v; v = v->next)
356 v->action_received = FALSE;
359 broadcast(NULL, 10 + strlen((char *)&buffer[10])+1, 0);
362 static void Handle_OP_PAUSE_PLAYING(struct NetworkServerPlayerInfo *player)
365 Error(ERR_NETWORK_SERVER, "client %d (%s) pauses game",
366 player->number, player->player_name);
367 broadcast(NULL, 2, 0);
370 static void Handle_OP_CONTINUE_PLAYING(struct NetworkServerPlayerInfo *player)
373 Error(ERR_NETWORK_SERVER, "client %d (%s) continues game",
374 player->number, player->player_name);
375 broadcast(NULL, 2, 0);
378 static void Handle_OP_STOP_PLAYING(struct NetworkServerPlayerInfo *player)
380 int cause_for_stopping = buffer[2];
383 Error(ERR_NETWORK_SERVER, "client %d (%s) stops game [%d]",
384 player->number, player->player_name, cause_for_stopping);
385 broadcast(NULL, 3, 0);
388 static void Handle_OP_MOVE_PLAYER(struct NetworkServerPlayerInfo *player)
390 struct NetworkServerPlayerInfo *v;
391 int last_client_nr = 0;
394 /* store player action */
395 for (v = first_player; v; v = v->next)
397 if (v->number == player->number)
399 v->action = buffer[2];
400 v->action_received = TRUE;
404 /* check if server received action from each player */
405 for (v = first_player; v; v = v->next)
407 if (!v->action_received)
410 if (v->number > last_client_nr)
411 last_client_nr = v->number;
414 /* initialize all player actions to zero */
415 for (i = 0; i < last_client_nr; i++)
418 /* broadcast actions of all players to all players */
419 for (v = first_player; v; v = v->next)
421 buffer[6 + v->number-1] = v->action;
423 v->action_received = FALSE;
426 buffer[2] = (unsigned char)((ServerFrameCounter >> 24) & 0xff);
427 buffer[3] = (unsigned char)((ServerFrameCounter >> 16) & 0xff);
428 buffer[4] = (unsigned char)((ServerFrameCounter >> 8) & 0xff);
429 buffer[5] = (unsigned char)((ServerFrameCounter >> 0) & 0xff);
431 broadcast(NULL, 6 + last_client_nr, 0);
433 ServerFrameCounter++;
436 /* the following is not used for a standalone server;
437 the pointer points to an integer containing the port-number */
438 int NetworkServerThread(void *ptr)
440 NetworkServer(*((int *) ptr), 0);
442 /* should never be reached */
446 void NetworkServer(int port, int serveronly)
449 struct NetworkServerPlayerInfo *player;
454 #if defined(PLATFORM_UNIX) && !defined(PLATFORM_NEXT)
455 struct sigaction sact;
459 port = DEFAULT_SERVER_PORT;
464 #if defined(PLATFORM_UNIX)
465 #if defined(PLATFORM_NEXT)
466 signal(SIGPIPE, SIG_IGN);
468 sact.sa_handler = SIG_IGN;
469 sigemptyset(&sact.sa_mask);
471 sigaction(SIGPIPE, &sact, NULL);
475 if (SDLNet_ResolveHost(&ip, NULL, port) == -1)
476 Error(ERR_EXIT_NETWORK_SERVER, "SDLNet_ResolveHost() failed");
478 lfd = SDLNet_TCP_Open(&ip);
480 Error(ERR_EXIT_NETWORK_SERVER, "SDLNet_TCP_Open() failed");
482 fds = SDLNet_AllocSocketSet(MAX_PLAYERS+1);
483 SDLNet_TCP_AddSocket(fds, lfd);
487 Error(ERR_NETWORK_SERVER, "started up, listening on port %d", port);
488 Error(ERR_NETWORK_SERVER, "using protocol version %d.%d.%d",
489 PROTOCOL_VERSION_1, PROTOCOL_VERSION_2, PROTOCOL_VERSION_3);
496 for (player = first_player; player; player = player->next)
499 if ((sl = SDLNet_CheckSockets(fds, 500000)) < 1)
501 Error(ERR_NETWORK_SERVER, "SDLNet_CheckSockets failed: %s",
503 perror("SDLNet_CheckSockets");
512 /* accept incoming connections */
513 if (SDLNet_SocketReady(lfd))
517 newsock = SDLNet_TCP_Accept(lfd);
523 player = first_player;
527 if (SDLNet_SocketReady(player->fd))
529 /* read only 1 byte, because SDLNet blocks when we want more than is
531 r = SDLNet_TCP_Recv(player->fd, player->readbuffer + player->nread, 1);
536 Error(ERR_NETWORK_SERVER, "EOF from client %d (%s)",
537 player->number, player->player_name);
538 RemovePlayer(player);
543 while (player->nread >= 4 && player->nread >= 4 + player->readbuffer[3])
545 len = player->readbuffer[3];
546 if (player->readbuffer[0] || player->readbuffer[1] || player->readbuffer[2])
549 Error(ERR_NETWORK_SERVER, "crap from client %d (%s)",
550 player->number, player->player_name);
551 RemovePlayer(player);
555 memcpy(buffer, &player->readbuffer[4], len);
556 player->nread -= 4 + len;
557 memmove(player->readbuffer, player->readbuffer + 4 + len, player->nread);
559 buffer[0] = player->number;
560 if (!player->introduced && buffer[1] != OP_PLAYER_NAME)
563 Error(ERR_NETWORK_SERVER, "!(client %d)->introduced && buffer[1]==%d (expected OP_PLAYER_NAME)", buffer[0], buffer[1]);
565 RemovePlayer(player);
573 Handle_OP_PLAYER_NAME(player, len);
576 case OP_PROTOCOL_VERSION:
577 Handle_OP_PROTOCOL_VERSION(player, len);
580 case OP_NUMBER_WANTED:
581 Handle_OP_NUMBER_WANTED(player);
584 case OP_START_PLAYING:
585 Handle_OP_START_PLAYING(player);
588 case OP_PAUSE_PLAYING:
589 Handle_OP_PAUSE_PLAYING(player);
592 case OP_CONTINUE_PLAYING:
593 Handle_OP_CONTINUE_PLAYING(player);
596 case OP_STOP_PLAYING:
597 Handle_OP_STOP_PLAYING(player);
601 Handle_OP_MOVE_PLAYER(player);
604 case OP_BROADCAST_MESSAGE:
607 Error(ERR_NETWORK_SERVER, "client %d (%s) sends message: %s",
608 player->number, player->player_name, &buffer[2]);
609 broadcast(player, len, 0);
614 Error(ERR_NETWORK_SERVER,
615 "unknown opcode %d from client %d (%s)",
616 buffer[0], player->number, player->player_name);
621 if (player && !interrupt)
622 player = player->next;
624 while (player && !interrupt);
628 #endif /* NETWORK_AVALIABLE */