1 /***********************************************************
2 * Rocks'n'Diamonds -- McDuffin Strikes Back! *
3 *----------------------------------------------------------*
4 * (c) 1995-2002 Artsoft Entertainment *
6 * Detmolder Strasse 189 *
9 * e-mail: info@artsoft.org *
10 *----------------------------------------------------------*
12 ***********************************************************/
14 #include "libgame/platform.h"
16 #if defined(PLATFORM_UNIX)
21 #include <sys/socket.h>
23 #include <netinet/in.h>
24 #include <netinet/tcp.h>
25 #include <arpa/inet.h>
28 #include "libgame/libgame.h"
32 static int clients = 0;
33 static int onceonly = 0;
35 struct NetworkServerPlayerInfo
40 struct NetworkServerPlayerInfo *next;
43 unsigned char readbuffer[MAX_BUFFER_SIZE];
44 unsigned char writbuffer[MAX_BUFFER_SIZE];
47 boolean action_received;
50 static struct NetworkServerPlayerInfo *first_player = NULL;
52 #define NEXT(player) ((player)->next ? (player)->next : first_player)
54 static struct sockaddr_in saddr;
56 static unsigned char realbuffer[512], *buffer = realbuffer + 4;
61 static unsigned long ServerFrameCounter = 0;
65 static void addtobuffer(struct NetworkServerPlayerInfo *player,
66 unsigned char *b, int len)
68 if (player->nwrite + len >= MAX_BUFFER_SIZE)
69 Error(ERR_EXIT_NETWORK_SERVER,
70 "internal error: network send buffer overflow");
72 memcpy(player->writbuffer + player->nwrite, b, len);
73 player->nwrite += len;
76 static void flushuser(struct NetworkServerPlayerInfo *player)
80 write(player->fd, player->writbuffer, player->nwrite);
85 static void broadcast(struct NetworkServerPlayerInfo *except,
86 int len, int activeonly)
88 struct NetworkServerPlayerInfo *player;
90 realbuffer[0] = realbuffer[1] = realbuffer[2] = 0;
91 realbuffer[3] = (unsigned char)len;
92 for (player=first_player; player; player=player->next)
93 if (player != except && (player->active || !activeonly) && player->introduced)
94 addtobuffer(player, realbuffer, 4 + len);
97 static void sendtoone(struct NetworkServerPlayerInfo *to, int len)
99 realbuffer[0] = realbuffer[1] = realbuffer[2] = 0;
100 realbuffer[3] = (unsigned char)len;
101 addtobuffer(to, realbuffer, 4 + len);
104 static void RemovePlayer(struct NetworkServerPlayerInfo *player)
106 struct NetworkServerPlayerInfo *v;
109 Error(ERR_NETWORK_SERVER, "dropping client %d (%s)",
110 player->number, player->player_name);
112 if (player == first_player)
113 first_player = player->next;
116 for (v=first_player; v; v=v->next)
118 if (v->next && v->next == player)
120 v->next = player->next;
127 if (player->introduced)
129 buffer[0] = player->number;
130 buffer[1] = OP_PLAYER_DISCONNECTED;
131 broadcast(player, 2, 0);
137 if (onceonly && clients == 0)
141 Error(ERR_NETWORK_SERVER, "no clients left");
142 Error(ERR_NETWORK_SERVER, "aborting");
148 static void AddPlayer(int fd)
150 struct NetworkServerPlayerInfo *player, *v;
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 first_player = player;
173 if (v->number == nxn)
181 player->number = nxn;
183 Error(ERR_NETWORK_SERVER, "client %d connecting from %s",
184 nxn, inet_ntoa(saddr.sin_addr));
188 buffer[1] = OP_YOUR_NUMBER;
189 buffer[2] = player->number;
190 sendtoone(player, 3);
193 static void Handle_OP_PROTOCOL_VERSION(struct NetworkServerPlayerInfo *player,
197 buffer[2] != PROTOCOL_VERSION_1 ||
198 buffer[3] != PROTOCOL_VERSION_2)
201 Error(ERR_NETWORK_SERVER,
202 "client %d (%s) has wrong protocol version %d.%d.%d",
203 player->number, player->player_name, buffer[2], buffer[3], buffer[4]);
206 buffer[1] = OP_BAD_PROTOCOL_VERSION;
207 buffer[2] = PROTOCOL_VERSION_1;
208 buffer[3] = PROTOCOL_VERSION_2;
209 buffer[4] = PROTOCOL_VERSION_3;
210 sendtoone(player, 5);
213 RemovePlayer(player);
219 Error(ERR_NETWORK_SERVER,
220 "client %d (%s) uses protocol version %d.%d.%d",
221 player->number, player->player_name, buffer[2], buffer[3], buffer[4]);
225 static void Handle_OP_NUMBER_WANTED(struct NetworkServerPlayerInfo *player)
227 struct NetworkServerPlayerInfo *v;
228 int client_nr = player->number;
229 int nr_wanted = buffer[2];
233 Error(ERR_NETWORK_SERVER, "client %d (%s) wants to switch to # %d",
234 player->number, player->player_name, nr_wanted);
236 for (v=first_player; v; v=v->next)
238 if (v->number == nr_wanted)
248 Error(ERR_NETWORK_SERVER, "client %d (%s) switches to # %d",
249 player->number, player->player_name, nr_wanted);
250 else if (player->number == nr_wanted)
251 Error(ERR_NETWORK_SERVER, "client %d (%s) still has # %d",
252 player->number, player->player_name, nr_wanted);
254 Error(ERR_NETWORK_SERVER,
255 "client %d (%s) cannot switch (client %d still exists)",
256 player->number, player->player_name, nr_wanted);
260 player->number = nr_wanted;
262 buffer[0] = client_nr;
263 buffer[1] = OP_NUMBER_WANTED;
264 buffer[2] = nr_wanted;
265 buffer[3] = player->number;
268 sendtoone(player, 4);
271 broadcast(NULL, 4, 0);
274 static void Handle_OP_PLAYER_NAME(struct NetworkServerPlayerInfo *player,
277 struct NetworkServerPlayerInfo *v;
282 memcpy(player->player_name, &buffer[2], len-2);
283 player->player_name[len-2] = 0;
284 for (i=0; i<len-2; i++)
286 if (player->player_name[i] < ' ' ||
287 ((unsigned char)(player->player_name[i]) > 0x7e &&
288 (unsigned char)(player->player_name[i]) <= 0xa0))
290 player->player_name[i] = 0;
295 if (!player->introduced)
297 buffer[0] = player->number;
298 buffer[1] = OP_PLAYER_CONNECTED;
299 broadcast(player, 2, 0);
303 Error(ERR_NETWORK_SERVER, "client %d calls itself \"%s\"",
304 player->number, player->player_name);
305 buffer[1] = OP_PLAYER_NAME;
306 broadcast(player, len, 0);
308 if (!player->introduced)
310 for (v=first_player; v; v=v->next)
312 if (v != player && v->introduced)
314 buffer[0] = v->number;
315 buffer[1] = OP_PLAYER_CONNECTED;
316 sendtoone(player, 2);
317 buffer[1] = OP_PLAYER_NAME;
318 memcpy(&buffer[2], v->player_name, 14);
319 sendtoone(player, 2+strlen(v->player_name));
324 player->introduced = 1;
327 static void Handle_OP_START_PLAYING(struct NetworkServerPlayerInfo *player)
329 struct NetworkServerPlayerInfo *v, *w;
332 Error(ERR_NETWORK_SERVER,
333 "client %d (%s) starts game [level %d from levedir %d (%s)]",
334 player->number, player->player_name,
335 (buffer[2] << 8) + buffer[3],
336 (buffer[4] << 8) + buffer[5],
339 for (w=first_player; w; w=w->next)
343 /* reset frame counter */
344 ServerFrameCounter = 0;
346 /* reset player actions */
347 for (v=first_player; v; v=v->next)
350 v->action_received = FALSE;
353 broadcast(NULL, 10 + strlen((char *)&buffer[10])+1, 0);
356 static void Handle_OP_PAUSE_PLAYING(struct NetworkServerPlayerInfo *player)
359 Error(ERR_NETWORK_SERVER, "client %d (%s) pauses game",
360 player->number, player->player_name);
361 broadcast(NULL, 2, 0);
364 static void Handle_OP_CONTINUE_PLAYING(struct NetworkServerPlayerInfo *player)
367 Error(ERR_NETWORK_SERVER, "client %d (%s) continues game",
368 player->number, player->player_name);
369 broadcast(NULL, 2, 0);
372 static void Handle_OP_STOP_PLAYING(struct NetworkServerPlayerInfo *player)
375 Error(ERR_NETWORK_SERVER, "client %d (%s) stops game",
376 player->number, player->player_name);
377 broadcast(NULL, 2, 0);
380 static void Handle_OP_MOVE_PLAYER(struct NetworkServerPlayerInfo *player)
382 struct NetworkServerPlayerInfo *v;
383 int last_client_nr = 0;
386 /* store player action */
387 for (v=first_player; v; v=v->next)
389 if (v->number == player->number)
391 v->action = buffer[2];
392 v->action_received = TRUE;
396 /* check if server received action from each player */
397 for (v=first_player; v; v=v->next)
399 if (!v->action_received)
402 if (v->number > last_client_nr)
403 last_client_nr = v->number;
406 /* initialize all player actions to zero */
407 for (i=0; i<last_client_nr; i++)
410 /* broadcast actions of all players to all players */
411 for (v=first_player; v; v=v->next)
413 buffer[6 + v->number-1] = v->action;
415 v->action_received = FALSE;
418 buffer[2] = (unsigned char)((ServerFrameCounter >> 24) & 0xff);
419 buffer[3] = (unsigned char)((ServerFrameCounter >> 16) & 0xff);
420 buffer[4] = (unsigned char)((ServerFrameCounter >> 8) & 0xff);
421 buffer[5] = (unsigned char)((ServerFrameCounter >> 0) & 0xff);
423 broadcast(NULL, 6 + last_client_nr, 0);
425 ServerFrameCounter++;
428 void NetworkServer(int port, int serveronly)
431 struct NetworkServerPlayerInfo *player;
435 struct protoent *tcpproto;
440 struct sigaction sact;
444 port = DEFAULT_SERVER_PORT;
449 if ((tcpproto = getprotobyname("tcp")) != NULL)
450 tcp = tcpproto->p_proto;
453 signal(SIGPIPE, SIG_IGN);
455 sact.sa_handler = SIG_IGN;
456 sigemptyset(&sact.sa_mask);
458 sigaction(SIGPIPE, &sact, NULL);
462 if ((lfd = socket(PF_INET, SOCK_STREAM, 0)) < 0)
463 Error(ERR_EXIT_NETWORK_SERVER, "socket() failed");
465 saddr.sin_family = AF_INET;
466 saddr.sin_addr.s_addr = htonl(INADDR_ANY);
467 saddr.sin_port = htons(port);
471 setsockopt(lfd, SOL_SOCKET, SO_REUSEADDR, (char *)&on, sizeof(int));
472 if (bind(lfd, (struct sockaddr *)&saddr, sizeof(saddr)) < 0)
473 Error(ERR_EXIT_NETWORK_SERVER, "bind() failed");
479 /* become a daemon, breaking all ties with the controlling terminal */
480 options.verbose = FALSE;
481 for (i=0; i<255; i++)
494 /* open a fake stdin, stdout, stderr, just in case */
495 open("/dev/null", O_RDONLY);
496 open("/dev/null", O_WRONLY);
497 open("/dev/null", O_WRONLY);
502 Error(ERR_NETWORK_SERVER, "started up, listening on port %d", port);
503 Error(ERR_NETWORK_SERVER, "using protocol version %d.%d.%d",
504 PROTOCOL_VERSION_1, PROTOCOL_VERSION_2, PROTOCOL_VERSION_3);
511 for (player=first_player; player; player=player->next)
516 player = first_player;
519 FD_SET(player->fd, &fds);
520 if (player->fd > mfd)
522 player = player->next;
527 if ((sl = select(mfd + 1, &fds, NULL, NULL, &tv)) < 0)
530 Error(ERR_EXIT_NETWORK_SERVER, "select() failed");
541 if (FD_ISSET(lfd, &fds))
545 slen = sizeof(saddr);
546 newfd = accept(lfd, (struct sockaddr *)&saddr, &slen);
550 Error(ERR_EXIT_NETWORK_SERVER, "accept() failed");
557 setsockopt(newfd, tcp, TCP_NODELAY, (char *)&on, sizeof(int));
564 player = first_player;
568 if (FD_ISSET(player->fd, &fds))
570 r = read(player->fd, player->readbuffer + player->nread, MAX_BUFFER_SIZE - player->nread);
574 Error(ERR_NETWORK_SERVER, "EOF from client %d (%s)",
575 player->number, player->player_name);
576 RemovePlayer(player);
581 while (player->nread >= 4 && player->nread >= 4 + player->readbuffer[3])
583 len = player->readbuffer[3];
584 if (player->readbuffer[0] || player->readbuffer[1] || player->readbuffer[2])
587 Error(ERR_NETWORK_SERVER, "crap from client %d (%s)",
588 player->number, player->player_name);
589 RemovePlayer(player);
593 memcpy(buffer, &player->readbuffer[4], len);
594 player->nread -= 4 + len;
595 memmove(player->readbuffer, player->readbuffer + 4 + len, player->nread);
597 buffer[0] = player->number;
598 if (!player->introduced && buffer[1] != OP_PLAYER_NAME)
601 Error(ERR_NETWORK_SERVER, "!(client %d)->introduced && buffer[1]==%d (expected OP_PLAYER_NAME)", buffer[0], buffer[1]);
603 RemovePlayer(player);
611 Handle_OP_PLAYER_NAME(player, len);
614 case OP_PROTOCOL_VERSION:
615 Handle_OP_PROTOCOL_VERSION(player, len);
618 case OP_NUMBER_WANTED:
619 Handle_OP_NUMBER_WANTED(player);
622 case OP_START_PLAYING:
623 Handle_OP_START_PLAYING(player);
626 case OP_PAUSE_PLAYING:
627 Handle_OP_PAUSE_PLAYING(player);
630 case OP_CONTINUE_PLAYING:
631 Handle_OP_CONTINUE_PLAYING(player);
634 case OP_STOP_PLAYING:
635 Handle_OP_STOP_PLAYING(player);
639 Handle_OP_MOVE_PLAYER(player);
642 case OP_BROADCAST_MESSAGE:
645 Error(ERR_NETWORK_SERVER, "client %d (%s) sends message: %s",
646 player->number, player->player_name, &buffer[2]);
647 broadcast(player, len, 0);
652 Error(ERR_NETWORK_SERVER,
653 "unknown opcode %d from client %d (%s)",
654 buffer[0], player->number, player->player_name);
659 if (player && !interrupt)
660 player = player->next;
662 while (player && !interrupt);
666 #endif /* PLATFORM_UNIX */