1 /***********************************************************
2 * Rocks'n'Diamonds -- McDuffin Strikes Back! *
3 *----------------------------------------------------------*
4 * (c) 1995-98 Artsoft Entertainment *
8 * phone: ++49 +521 290471 *
9 * email: aeglos@valinor.owl.de *
10 *----------------------------------------------------------*
12 ***********************************************************/
20 #include <sys/socket.h>
23 #include <netinet/in.h>
24 #include <netinet/tcp.h>
25 #include <arpa/inet.h>
31 static int clients = 0;
32 static int onceonly = 0;
34 struct NetworkServerPlayerInfo
39 struct NetworkServerPlayerInfo *next;
42 unsigned char readbuffer[MAX_BUFFER_SIZE];
43 unsigned char writbuffer[MAX_BUFFER_SIZE];
46 boolean action_received;
49 static struct NetworkServerPlayerInfo *first_player = NULL;
51 #define NEXT(player) ((player)->next ? (player)->next : first_player)
53 static struct sockaddr_in saddr;
55 static unsigned char realbuffer[512], *buffer = realbuffer + 4;
60 static unsigned long ServerFrameCounter = 0;
64 static void addtobuffer(struct NetworkServerPlayerInfo *player,
65 unsigned char *b, int len)
67 if (player->nwrite + len >= MAX_BUFFER_SIZE)
68 Error(ERR_EXIT_NETWORK_SERVER,
69 "internal error: network send buffer overflow");
71 memcpy(player->writbuffer + player->nwrite, b, len);
72 player->nwrite += len;
75 static void flushuser(struct NetworkServerPlayerInfo *player)
79 write(player->fd, player->writbuffer, player->nwrite);
84 static void broadcast(struct NetworkServerPlayerInfo *except,
85 int len, int activeonly)
87 struct NetworkServerPlayerInfo *player;
89 realbuffer[0] = realbuffer[1] = realbuffer[2] = 0;
90 realbuffer[3] = (unsigned char)len;
91 for (player=first_player; player; player=player->next)
92 if (player != except && (player->active || !activeonly) && player->introduced)
93 addtobuffer(player, realbuffer, 4 + len);
96 static void sendtoone(struct NetworkServerPlayerInfo *to, int len)
98 realbuffer[0] = realbuffer[1] = realbuffer[2] = 0;
99 realbuffer[3] = (unsigned char)len;
100 addtobuffer(to, realbuffer, 4 + len);
103 static void RemovePlayer(struct NetworkServerPlayerInfo *player)
105 struct NetworkServerPlayerInfo *v;
108 Error(ERR_NETWORK_SERVER, "dropping client %d (%s)",
109 player->number, player->player_name);
111 if (player == first_player)
112 first_player = player->next;
115 for (v=first_player; v; v=v->next)
117 if (v->next && v->next == player)
119 v->next = player->next;
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(int fd)
149 struct NetworkServerPlayerInfo *player, *v;
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 first_player = player;
172 if (v->number == nxn)
180 player->number = nxn;
182 Error(ERR_NETWORK_SERVER, "client %d connecting from %s",
183 nxn, inet_ntoa(saddr.sin_addr));
187 buffer[1] = OP_YOUR_NUMBER;
188 buffer[2] = player->number;
189 sendtoone(player, 3);
192 static void Handle_OP_PROTOCOL_VERSION(struct NetworkServerPlayerInfo *player,
196 buffer[2] != PROTOCOL_VERSION_1 ||
197 buffer[3] != PROTOCOL_VERSION_2)
200 Error(ERR_NETWORK_SERVER,
201 "client %d (%s) has wrong protocol version %d.%d.%d",
202 player->number, player->player_name, buffer[2], buffer[3], buffer[4]);
205 buffer[1] = OP_BAD_PROTOCOL_VERSION;
206 buffer[2] = PROTOCOL_VERSION_1;
207 buffer[3] = PROTOCOL_VERSION_2;
208 buffer[4] = PROTOCOL_VERSION_3;
209 sendtoone(player, 5);
212 RemovePlayer(player);
218 Error(ERR_NETWORK_SERVER,
219 "client %d (%s) uses protocol version %d.%d.%d",
220 player->number, player->player_name, buffer[2], buffer[3], buffer[4]);
224 static void Handle_OP_NUMBER_WANTED(struct NetworkServerPlayerInfo *player)
226 struct NetworkServerPlayerInfo *v;
227 int client_nr = player->number;
228 int nr_wanted = buffer[2];
232 Error(ERR_NETWORK_SERVER, "client %d (%s) wants to switch to # %d",
233 player->number, player->player_name, nr_wanted);
235 for (v=first_player; v; v=v->next)
237 if (v->number == nr_wanted)
247 Error(ERR_NETWORK_SERVER, "client %d (%s) switches to # %d",
248 player->number, player->player_name, nr_wanted);
249 else if (player->number == nr_wanted)
250 Error(ERR_NETWORK_SERVER, "client %d (%s) still has # %d",
251 player->number, player->player_name, nr_wanted);
253 Error(ERR_NETWORK_SERVER,
254 "client %d (%s) cannot switch (client %d still exists)",
255 player->number, player->player_name, nr_wanted);
259 player->number = nr_wanted;
261 buffer[0] = client_nr;
262 buffer[1] = OP_NUMBER_WANTED;
263 buffer[2] = nr_wanted;
264 buffer[3] = player->number;
267 sendtoone(player, 4);
270 broadcast(NULL, 4, 0);
273 static void Handle_OP_PLAYER_NAME(struct NetworkServerPlayerInfo *player,
276 struct NetworkServerPlayerInfo *v;
281 memcpy(player->player_name, &buffer[2], len-2);
282 player->player_name[len-2] = 0;
283 for (i=0; i<len-2; i++)
285 if (player->player_name[i] < ' ' ||
286 ((unsigned char)(player->player_name[i]) > 0x7e &&
287 (unsigned char)(player->player_name[i]) <= 0xa0))
289 player->player_name[i] = 0;
294 if (!player->introduced)
296 buffer[0] = player->number;
297 buffer[1] = OP_PLAYER_CONNECTED;
298 broadcast(player, 2, 0);
302 Error(ERR_NETWORK_SERVER, "client %d calls itself \"%s\"",
303 player->number, player->player_name);
304 buffer[1] = OP_PLAYER_NAME;
305 broadcast(player, len, 0);
307 if (!player->introduced)
309 for (v=first_player; v; v=v->next)
311 if (v != player && v->introduced)
313 buffer[0] = v->number;
314 buffer[1] = OP_PLAYER_CONNECTED;
315 sendtoone(player, 2);
316 buffer[1] = OP_PLAYER_NAME;
317 memcpy(&buffer[2], v->player_name, 14);
318 sendtoone(player, 2+strlen(v->player_name));
323 player->introduced = 1;
326 static void Handle_OP_START_PLAYING(struct NetworkServerPlayerInfo *player)
328 struct NetworkServerPlayerInfo *v, *w;
331 Error(ERR_NETWORK_SERVER,
332 "client %d (%s) starts game [level %d from levedir %d (%s)]",
333 player->number, player->player_name,
334 (buffer[2] << 8) + buffer[3],
335 (buffer[4] << 8) + buffer[5],
338 for (w=first_player; w; w=w->next)
342 /* reset frame counter */
343 ServerFrameCounter = 0;
345 /* reset player actions */
346 for (v=first_player; v; v=v->next)
349 v->action_received = FALSE;
352 broadcast(NULL, 10 + strlen((char *)&buffer[10])+1, 0);
355 static void Handle_OP_PAUSE_PLAYING(struct NetworkServerPlayerInfo *player)
358 Error(ERR_NETWORK_SERVER, "client %d (%s) pauses game",
359 player->number, player->player_name);
360 broadcast(NULL, 2, 0);
363 static void Handle_OP_CONTINUE_PLAYING(struct NetworkServerPlayerInfo *player)
366 Error(ERR_NETWORK_SERVER, "client %d (%s) continues game",
367 player->number, player->player_name);
368 broadcast(NULL, 2, 0);
371 static void Handle_OP_STOP_PLAYING(struct NetworkServerPlayerInfo *player)
374 Error(ERR_NETWORK_SERVER, "client %d (%s) stops game",
375 player->number, player->player_name);
376 broadcast(NULL, 2, 0);
379 static void Handle_OP_MOVE_FIGURE(struct NetworkServerPlayerInfo *player)
381 struct NetworkServerPlayerInfo *v;
382 int last_client_nr = 0;
385 /* store player action */
386 for (v=first_player; v; v=v->next)
388 if (v->number == player->number)
390 v->action = buffer[2];
391 v->action_received = TRUE;
395 /* check if server received action from each player */
396 for (v=first_player; v; v=v->next)
398 if (!v->action_received)
401 if (v->number > last_client_nr)
402 last_client_nr = v->number;
405 /* initialize all player actions to zero */
406 for (i=0; i<last_client_nr; i++)
409 /* broadcast actions of all players to all players */
410 for (v=first_player; v; v=v->next)
412 buffer[6 + v->number-1] = v->action;
414 v->action_received = FALSE;
417 buffer[2] = (unsigned char)((ServerFrameCounter >> 24) & 0xff);
418 buffer[3] = (unsigned char)((ServerFrameCounter >> 16) & 0xff);
419 buffer[4] = (unsigned char)((ServerFrameCounter >> 8) & 0xff);
420 buffer[5] = (unsigned char)((ServerFrameCounter >> 0) & 0xff);
422 broadcast(NULL, 6 + last_client_nr, 0);
424 ServerFrameCounter++;
427 void NetworkServer(int port, int serveronly)
430 struct NetworkServerPlayerInfo *player;
434 struct protoent *tcpproto;
439 struct sigaction sact;
443 port = DEFAULT_SERVER_PORT;
448 if ((tcpproto = getprotobyname("tcp")) != NULL)
449 tcp = tcpproto->p_proto;
452 signal(SIGPIPE, SIG_IGN);
454 sact.sa_handler = SIG_IGN;
455 sigemptyset(&sact.sa_mask);
457 sigaction(SIGPIPE, &sact, NULL);
461 if ((lfd = socket(PF_INET, SOCK_STREAM, 0)) < 0)
462 Error(ERR_EXIT_NETWORK_SERVER, "socket() failed");
464 saddr.sin_family = AF_INET;
465 saddr.sin_addr.s_addr = htonl(INADDR_ANY);
466 saddr.sin_port = htons(port);
470 setsockopt(lfd, SOL_SOCKET, SO_REUSEADDR, (char *)&on, sizeof(int));
471 if (bind(lfd, (struct sockaddr *)&saddr, sizeof(saddr)) < 0)
472 Error(ERR_EXIT_NETWORK_SERVER, "bind() failed");
478 /* become a daemon, breaking all ties with the controlling terminal */
480 for (i=0; i<255; i++)
493 /* open a fake stdin, stdout, stderr, just in case */
494 open("/dev/null", O_RDONLY);
495 open("/dev/null", O_WRONLY);
496 open("/dev/null", O_WRONLY);
501 Error(ERR_NETWORK_SERVER, "started up, listening on port %d", port);
502 Error(ERR_NETWORK_SERVER, "using protocol version %d.%d.%d",
503 PROTOCOL_VERSION_1, PROTOCOL_VERSION_2, PROTOCOL_VERSION_3);
510 for (player=first_player; player; player=player->next)
515 player = first_player;
518 FD_SET(player->fd, &fds);
519 if (player->fd > mfd)
521 player = player->next;
526 if ((sl = select(mfd + 1, &fds, NULL, NULL, &tv)) < 0)
529 Error(ERR_EXIT_NETWORK_SERVER, "select() failed");
540 if (FD_ISSET(lfd, &fds))
544 slen = sizeof(saddr);
545 newfd = accept(lfd, (struct sockaddr *)&saddr, &slen);
549 Error(ERR_EXIT_NETWORK_SERVER, "accept() failed");
556 setsockopt(newfd, tcp, TCP_NODELAY, (char *)&on, sizeof(int));
563 player = first_player;
567 if (FD_ISSET(player->fd, &fds))
569 r = read(player->fd, player->readbuffer + player->nread, MAX_BUFFER_SIZE - player->nread);
573 Error(ERR_NETWORK_SERVER, "EOF from client %d (%s)",
574 player->number, player->player_name);
575 RemovePlayer(player);
580 while (player->nread >= 4 && player->nread >= 4 + player->readbuffer[3])
582 len = player->readbuffer[3];
583 if (player->readbuffer[0] || player->readbuffer[1] || player->readbuffer[2])
586 Error(ERR_NETWORK_SERVER, "crap from client %d (%s)",
587 player->number, player->player_name);
588 RemovePlayer(player);
592 memcpy(buffer, &player->readbuffer[4], len);
593 player->nread -= 4 + len;
594 memmove(player->readbuffer, player->readbuffer + 4 + len, player->nread);
596 buffer[0] = player->number;
597 if (!player->introduced && buffer[1] != OP_PLAYER_NAME)
600 Error(ERR_NETWORK_SERVER, "!(client %d)->introduced && buffer[1]==%d (expected OP_PLAYER_NAME)", buffer[0], buffer[1]);
602 RemovePlayer(player);
610 Handle_OP_PLAYER_NAME(player, len);
613 case OP_PROTOCOL_VERSION:
614 Handle_OP_PROTOCOL_VERSION(player, len);
617 case OP_NUMBER_WANTED:
618 Handle_OP_NUMBER_WANTED(player);
621 case OP_START_PLAYING:
622 Handle_OP_START_PLAYING(player);
625 case OP_PAUSE_PLAYING:
626 Handle_OP_PAUSE_PLAYING(player);
629 case OP_CONTINUE_PLAYING:
630 Handle_OP_CONTINUE_PLAYING(player);
633 case OP_STOP_PLAYING:
634 Handle_OP_STOP_PLAYING(player);
638 Handle_OP_MOVE_FIGURE(player);
641 case OP_BROADCAST_MESSAGE:
644 Error(ERR_NETWORK_SERVER, "client %d (%s) sends message: %s",
645 player->number, player->player_name, &buffer[2]);
646 broadcast(player, len, 0);
651 Error(ERR_NETWORK_SERVER,
652 "unknown opcode %d from client %d (%s)",
653 buffer[0], player->number, player->player_name);
658 if (player && !interrupt)
659 player = player->next;
661 while (player && !interrupt);