1 /***********************************************************
2 * Rocks'n'Diamonds -- McDuffin Strikes Back! *
3 *----------------------------------------------------------*
4 * (c) 1995-2001 Artsoft Entertainment *
6 * Detmolder Strasse 189 *
9 * e-mail: info@artsoft.org *
10 *----------------------------------------------------------*
12 ***********************************************************/
14 #include "libgame/libgame.h"
16 #if defined(PLATFORM_UNIX)
21 #include <sys/socket.h>
24 #include <netinet/in.h>
25 #include <netinet/tcp.h>
26 #include <arpa/inet.h>
30 #include "libgame/libgame.h"
35 static int clients = 0;
36 static int onceonly = 0;
38 struct NetworkServerPlayerInfo
43 struct NetworkServerPlayerInfo *next;
46 unsigned char readbuffer[MAX_BUFFER_SIZE];
47 unsigned char writbuffer[MAX_BUFFER_SIZE];
50 boolean action_received;
53 static struct NetworkServerPlayerInfo *first_player = NULL;
55 #define NEXT(player) ((player)->next ? (player)->next : first_player)
57 static struct sockaddr_in saddr;
59 static unsigned char realbuffer[512], *buffer = realbuffer + 4;
64 static unsigned long ServerFrameCounter = 0;
68 static void addtobuffer(struct NetworkServerPlayerInfo *player,
69 unsigned char *b, int len)
71 if (player->nwrite + len >= MAX_BUFFER_SIZE)
72 Error(ERR_EXIT_NETWORK_SERVER,
73 "internal error: network send buffer overflow");
75 memcpy(player->writbuffer + player->nwrite, b, len);
76 player->nwrite += len;
79 static void flushuser(struct NetworkServerPlayerInfo *player)
83 write(player->fd, player->writbuffer, player->nwrite);
88 static void broadcast(struct NetworkServerPlayerInfo *except,
89 int len, int activeonly)
91 struct NetworkServerPlayerInfo *player;
93 realbuffer[0] = realbuffer[1] = realbuffer[2] = 0;
94 realbuffer[3] = (unsigned char)len;
95 for (player=first_player; player; player=player->next)
96 if (player != except && (player->active || !activeonly) && player->introduced)
97 addtobuffer(player, realbuffer, 4 + len);
100 static void sendtoone(struct NetworkServerPlayerInfo *to, int len)
102 realbuffer[0] = realbuffer[1] = realbuffer[2] = 0;
103 realbuffer[3] = (unsigned char)len;
104 addtobuffer(to, realbuffer, 4 + len);
107 static void RemovePlayer(struct NetworkServerPlayerInfo *player)
109 struct NetworkServerPlayerInfo *v;
112 Error(ERR_NETWORK_SERVER, "dropping client %d (%s)",
113 player->number, player->player_name);
115 if (player == first_player)
116 first_player = player->next;
119 for (v=first_player; v; v=v->next)
121 if (v->next && v->next == player)
123 v->next = player->next;
130 if (player->introduced)
132 buffer[0] = player->number;
133 buffer[1] = OP_PLAYER_DISCONNECTED;
134 broadcast(player, 2, 0);
140 if (onceonly && clients == 0)
144 Error(ERR_NETWORK_SERVER, "no clients left");
145 Error(ERR_NETWORK_SERVER, "aborting");
151 static void AddPlayer(int fd)
153 struct NetworkServerPlayerInfo *player, *v;
156 player = checked_malloc(sizeof (struct NetworkServerPlayerInfo));
159 player->player_name[0] = 0;
160 player->next = first_player;
164 player->introduced = 0;
166 player->action_received = FALSE;
168 first_player = player;
176 if (v->number == nxn)
184 player->number = nxn;
186 Error(ERR_NETWORK_SERVER, "client %d connecting from %s",
187 nxn, inet_ntoa(saddr.sin_addr));
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) still has # %d",
255 player->number, player->player_name, nr_wanted);
257 Error(ERR_NETWORK_SERVER,
258 "client %d (%s) cannot switch (client %d still 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 levedir %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 /* reset player actions */
350 for (v=first_player; v; v=v->next)
353 v->action_received = FALSE;
356 broadcast(NULL, 10 + strlen((char *)&buffer[10])+1, 0);
359 static void Handle_OP_PAUSE_PLAYING(struct NetworkServerPlayerInfo *player)
362 Error(ERR_NETWORK_SERVER, "client %d (%s) pauses game",
363 player->number, player->player_name);
364 broadcast(NULL, 2, 0);
367 static void Handle_OP_CONTINUE_PLAYING(struct NetworkServerPlayerInfo *player)
370 Error(ERR_NETWORK_SERVER, "client %d (%s) continues game",
371 player->number, player->player_name);
372 broadcast(NULL, 2, 0);
375 static void Handle_OP_STOP_PLAYING(struct NetworkServerPlayerInfo *player)
378 Error(ERR_NETWORK_SERVER, "client %d (%s) stops game",
379 player->number, player->player_name);
380 broadcast(NULL, 2, 0);
383 static void Handle_OP_MOVE_FIGURE(struct NetworkServerPlayerInfo *player)
385 struct NetworkServerPlayerInfo *v;
386 int last_client_nr = 0;
389 /* store player action */
390 for (v=first_player; v; v=v->next)
392 if (v->number == player->number)
394 v->action = buffer[2];
395 v->action_received = TRUE;
399 /* check if server received action from each player */
400 for (v=first_player; v; v=v->next)
402 if (!v->action_received)
405 if (v->number > last_client_nr)
406 last_client_nr = v->number;
409 /* initialize all player actions to zero */
410 for (i=0; i<last_client_nr; i++)
413 /* broadcast actions of all players to all players */
414 for (v=first_player; v; v=v->next)
416 buffer[6 + v->number-1] = v->action;
418 v->action_received = FALSE;
421 buffer[2] = (unsigned char)((ServerFrameCounter >> 24) & 0xff);
422 buffer[3] = (unsigned char)((ServerFrameCounter >> 16) & 0xff);
423 buffer[4] = (unsigned char)((ServerFrameCounter >> 8) & 0xff);
424 buffer[5] = (unsigned char)((ServerFrameCounter >> 0) & 0xff);
426 broadcast(NULL, 6 + last_client_nr, 0);
428 ServerFrameCounter++;
431 void NetworkServer(int port, int serveronly)
434 struct NetworkServerPlayerInfo *player;
438 struct protoent *tcpproto;
443 struct sigaction sact;
447 port = DEFAULT_SERVER_PORT;
452 if ((tcpproto = getprotobyname("tcp")) != NULL)
453 tcp = tcpproto->p_proto;
456 signal(SIGPIPE, SIG_IGN);
458 sact.sa_handler = SIG_IGN;
459 sigemptyset(&sact.sa_mask);
461 sigaction(SIGPIPE, &sact, NULL);
465 if ((lfd = socket(PF_INET, SOCK_STREAM, 0)) < 0)
466 Error(ERR_EXIT_NETWORK_SERVER, "socket() failed");
468 saddr.sin_family = AF_INET;
469 saddr.sin_addr.s_addr = htonl(INADDR_ANY);
470 saddr.sin_port = htons(port);
474 setsockopt(lfd, SOL_SOCKET, SO_REUSEADDR, (char *)&on, sizeof(int));
475 if (bind(lfd, (struct sockaddr *)&saddr, sizeof(saddr)) < 0)
476 Error(ERR_EXIT_NETWORK_SERVER, "bind() failed");
482 /* become a daemon, breaking all ties with the controlling terminal */
484 for (i=0; i<255; i++)
497 /* open a fake stdin, stdout, stderr, just in case */
498 open("/dev/null", O_RDONLY);
499 open("/dev/null", O_WRONLY);
500 open("/dev/null", O_WRONLY);
505 Error(ERR_NETWORK_SERVER, "started up, listening on port %d", port);
506 Error(ERR_NETWORK_SERVER, "using protocol version %d.%d.%d",
507 PROTOCOL_VERSION_1, PROTOCOL_VERSION_2, PROTOCOL_VERSION_3);
514 for (player=first_player; player; player=player->next)
519 player = first_player;
522 FD_SET(player->fd, &fds);
523 if (player->fd > mfd)
525 player = player->next;
530 if ((sl = select(mfd + 1, &fds, NULL, NULL, &tv)) < 0)
533 Error(ERR_EXIT_NETWORK_SERVER, "select() failed");
544 if (FD_ISSET(lfd, &fds))
548 slen = sizeof(saddr);
549 newfd = accept(lfd, (struct sockaddr *)&saddr, &slen);
553 Error(ERR_EXIT_NETWORK_SERVER, "accept() failed");
560 setsockopt(newfd, tcp, TCP_NODELAY, (char *)&on, sizeof(int));
567 player = first_player;
571 if (FD_ISSET(player->fd, &fds))
573 r = read(player->fd, player->readbuffer + player->nread, MAX_BUFFER_SIZE - player->nread);
577 Error(ERR_NETWORK_SERVER, "EOF from client %d (%s)",
578 player->number, player->player_name);
579 RemovePlayer(player);
584 while (player->nread >= 4 && player->nread >= 4 + player->readbuffer[3])
586 len = player->readbuffer[3];
587 if (player->readbuffer[0] || player->readbuffer[1] || player->readbuffer[2])
590 Error(ERR_NETWORK_SERVER, "crap from client %d (%s)",
591 player->number, player->player_name);
592 RemovePlayer(player);
596 memcpy(buffer, &player->readbuffer[4], len);
597 player->nread -= 4 + len;
598 memmove(player->readbuffer, player->readbuffer + 4 + len, player->nread);
600 buffer[0] = player->number;
601 if (!player->introduced && buffer[1] != OP_PLAYER_NAME)
604 Error(ERR_NETWORK_SERVER, "!(client %d)->introduced && buffer[1]==%d (expected OP_PLAYER_NAME)", buffer[0], buffer[1]);
606 RemovePlayer(player);
614 Handle_OP_PLAYER_NAME(player, len);
617 case OP_PROTOCOL_VERSION:
618 Handle_OP_PROTOCOL_VERSION(player, len);
621 case OP_NUMBER_WANTED:
622 Handle_OP_NUMBER_WANTED(player);
625 case OP_START_PLAYING:
626 Handle_OP_START_PLAYING(player);
629 case OP_PAUSE_PLAYING:
630 Handle_OP_PAUSE_PLAYING(player);
633 case OP_CONTINUE_PLAYING:
634 Handle_OP_CONTINUE_PLAYING(player);
637 case OP_STOP_PLAYING:
638 Handle_OP_STOP_PLAYING(player);
642 Handle_OP_MOVE_FIGURE(player);
645 case OP_BROADCAST_MESSAGE:
648 Error(ERR_NETWORK_SERVER, "client %d (%s) sends message: %s",
649 player->number, player->player_name, &buffer[2]);
650 broadcast(player, len, 0);
655 Error(ERR_NETWORK_SERVER,
656 "unknown opcode %d from client %d (%s)",
657 buffer[0], player->number, player->player_name);
662 if (player && !interrupt)
663 player = player->next;
665 while (player && !interrupt);
669 #endif /* PLATFORM_UNIX */