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 ***********************************************************/
19 #include <sys/socket.h>
22 #include <netinet/in.h>
23 #include <netinet/tcp.h>
24 #include <arpa/inet.h>
30 static int clients = 0;
31 static int onceonly = 0;
33 struct NetworkServerPlayerInfo
38 struct NetworkServerPlayerInfo *next;
41 unsigned char readbuffer[MAX_BUFFER_SIZE];
42 unsigned char writbuffer[MAX_BUFFER_SIZE];
45 boolean action_received;
48 static struct NetworkServerPlayerInfo *first_player = NULL;
50 #define NEXT(player) ((player)->next ? (player)->next : first_player)
52 static struct sockaddr_in saddr;
54 static unsigned char realbuffer[512], *buffer = realbuffer + 4;
59 static unsigned long ServerFrameCounter = 0;
63 static void addtobuffer(struct NetworkServerPlayerInfo *player,
64 unsigned char *b, int len)
66 if (player->nwrite + len >= MAX_BUFFER_SIZE)
67 Error(ERR_EXIT_NETWORK_SERVER,
68 "internal error: network send buffer overflow");
70 memcpy(player->writbuffer + player->nwrite, b, len);
71 player->nwrite += len;
74 static void flushuser(struct NetworkServerPlayerInfo *player)
78 write(player->fd, player->writbuffer, player->nwrite);
83 static void broadcast(struct NetworkServerPlayerInfo *except,
84 int len, int activeonly)
86 struct NetworkServerPlayerInfo *player;
88 realbuffer[0] = realbuffer[1] = realbuffer[2] = 0;
89 realbuffer[3] = (unsigned char)len;
90 for (player=first_player; player; player=player->next)
91 if (player != except && (player->active || !activeonly) && player->introduced)
92 addtobuffer(player, realbuffer, 4 + len);
95 static void sendtoone(struct NetworkServerPlayerInfo *to, int len)
97 realbuffer[0] = realbuffer[1] = realbuffer[2] = 0;
98 realbuffer[3] = (unsigned char)len;
99 addtobuffer(to, realbuffer, 4 + len);
102 static void RemovePlayer(struct NetworkServerPlayerInfo *player)
104 struct NetworkServerPlayerInfo *v;
107 Error(ERR_NETWORK_SERVER, "dropping client %d (%s)",
108 player->number, player->player_name);
110 if (player == first_player)
111 first_player = player->next;
114 for (v=first_player; v; v=v->next)
116 if (v->next && v->next == player)
118 v->next = player->next;
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(int fd)
148 struct NetworkServerPlayerInfo *player, *v;
151 player = checked_malloc(sizeof (struct NetworkServerPlayerInfo));
154 player->player_name[0] = 0;
155 player->next = first_player;
159 player->introduced = 0;
161 player->action_received = FALSE;
163 first_player = player;
171 if (v->number == nxn)
179 player->number = nxn;
181 Error(ERR_NETWORK_SERVER, "client %d connecting from %s",
182 nxn, inet_ntoa(saddr.sin_addr));
186 buffer[1] = OP_YOUR_NUMBER;
187 buffer[2] = player->number;
188 sendtoone(player, 3);
191 static void Handle_OP_PROTOCOL_VERSION(struct NetworkServerPlayerInfo *player,
195 buffer[2] != PROTOCOL_VERSION_1 ||
196 buffer[3] != PROTOCOL_VERSION_2)
199 Error(ERR_NETWORK_SERVER,
200 "client %d (%s) has wrong protocol version %d.%d.%d",
201 player->number, player->player_name, buffer[2], buffer[3], buffer[4]);
204 buffer[1] = OP_BAD_PROTOCOL_VERSION;
205 buffer[2] = PROTOCOL_VERSION_1;
206 buffer[3] = PROTOCOL_VERSION_2;
207 buffer[4] = PROTOCOL_VERSION_3;
208 sendtoone(player, 5);
211 RemovePlayer(player);
217 Error(ERR_NETWORK_SERVER,
218 "client %d (%s) uses protocol version %d.%d.%d",
219 player->number, player->player_name, buffer[2], buffer[3], buffer[4]);
223 static void Handle_OP_NUMBER_WANTED(struct NetworkServerPlayerInfo *player)
225 struct NetworkServerPlayerInfo *v;
226 int client_nr = player->number;
227 int nr_wanted = buffer[2];
231 Error(ERR_NETWORK_SERVER, "client %d (%s) wants to switch to # %d",
232 player->number, player->player_name, nr_wanted);
234 for (v=first_player; v; v=v->next)
236 if (v->number == nr_wanted)
246 Error(ERR_NETWORK_SERVER, "client %d (%s) switches to # %d",
247 player->number, player->player_name, nr_wanted);
248 else if (player->number == nr_wanted)
249 Error(ERR_NETWORK_SERVER, "client %d (%s) still has # %d",
250 player->number, player->player_name, nr_wanted);
252 Error(ERR_NETWORK_SERVER,
253 "client %d (%s) cannot switch (client %d still exists)",
254 player->number, player->player_name, nr_wanted);
258 player->number = nr_wanted;
260 buffer[0] = client_nr;
261 buffer[1] = OP_NUMBER_WANTED;
262 buffer[2] = nr_wanted;
263 buffer[3] = player->number;
266 sendtoone(player, 4);
269 broadcast(NULL, 4, 0);
272 static void Handle_OP_PLAYER_NAME(struct NetworkServerPlayerInfo *player,
275 struct NetworkServerPlayerInfo *v;
280 memcpy(player->player_name, &buffer[2], len-2);
281 player->player_name[len-2] = 0;
282 for (i=0; i<len-2; i++)
284 if (player->player_name[i] < ' ' ||
285 ((unsigned char)(player->player_name[i]) > 0x7e &&
286 (unsigned char)(player->player_name[i]) <= 0xa0))
288 player->player_name[i] = 0;
293 if (!player->introduced)
295 buffer[0] = player->number;
296 buffer[1] = OP_PLAYER_CONNECTED;
297 broadcast(player, 2, 0);
301 Error(ERR_NETWORK_SERVER, "client %d calls itself \"%s\"",
302 player->number, player->player_name);
303 buffer[1] = OP_PLAYER_NAME;
304 broadcast(player, len, 0);
306 if (!player->introduced)
308 for (v=first_player; v; v=v->next)
310 if (v != player && v->introduced)
312 buffer[0] = v->number;
313 buffer[1] = OP_PLAYER_CONNECTED;
314 sendtoone(player, 2);
315 buffer[1] = OP_PLAYER_NAME;
316 memcpy(&buffer[2], v->player_name, 14);
317 sendtoone(player, 2+strlen(v->player_name));
322 player->introduced = 1;
325 static void Handle_OP_START_PLAYING(struct NetworkServerPlayerInfo *player)
327 struct NetworkServerPlayerInfo *v, *w;
330 Error(ERR_NETWORK_SERVER,
331 "client %d (%s) starts game [level %d from levedir %d (%s)]",
332 player->number, player->player_name,
333 (buffer[2] << 8) + buffer[3],
334 (buffer[4] << 8) + buffer[5],
337 for (w=first_player; w; w=w->next)
341 /* reset frame counter */
342 ServerFrameCounter = 0;
344 /* reset player actions */
345 for (v=first_player; v; v=v->next)
348 v->action_received = FALSE;
351 broadcast(NULL, 10 + strlen((char *)&buffer[10])+1, 0);
354 static void Handle_OP_PAUSE_PLAYING(struct NetworkServerPlayerInfo *player)
357 Error(ERR_NETWORK_SERVER, "client %d (%s) pauses game",
358 player->number, player->player_name);
359 broadcast(NULL, 2, 0);
362 static void Handle_OP_CONTINUE_PLAYING(struct NetworkServerPlayerInfo *player)
365 Error(ERR_NETWORK_SERVER, "client %d (%s) continues game",
366 player->number, player->player_name);
367 broadcast(NULL, 2, 0);
370 static void Handle_OP_STOP_PLAYING(struct NetworkServerPlayerInfo *player)
373 Error(ERR_NETWORK_SERVER, "client %d (%s) stops game",
374 player->number, player->player_name);
375 broadcast(NULL, 2, 0);
378 static void Handle_OP_MOVE_FIGURE(struct NetworkServerPlayerInfo *player)
380 struct NetworkServerPlayerInfo *v;
381 int last_client_nr = 0;
384 /* store player action */
385 for (v=first_player; v; v=v->next)
387 if (v->number == player->number)
389 v->action = buffer[2];
390 v->action_received = TRUE;
394 /* check if server received action from each player */
395 for (v=first_player; v; v=v->next)
397 if (!v->action_received)
400 if (v->number > last_client_nr)
401 last_client_nr = v->number;
404 /* initialize all player actions to zero */
405 for (i=0; i<last_client_nr; i++)
408 /* broadcast actions of all players to all players */
409 for (v=first_player; v; v=v->next)
411 buffer[6 + v->number-1] = v->action;
413 v->action_received = FALSE;
416 buffer[2] = (unsigned char)((ServerFrameCounter >> 24) & 0xff);
417 buffer[3] = (unsigned char)((ServerFrameCounter >> 16) & 0xff);
418 buffer[4] = (unsigned char)((ServerFrameCounter >> 8) & 0xff);
419 buffer[5] = (unsigned char)((ServerFrameCounter >> 0) & 0xff);
421 broadcast(NULL, 6 + last_client_nr, 0);
423 ServerFrameCounter++;
426 void NetworkServer(int port, int serveronly)
429 struct NetworkServerPlayerInfo *player;
433 struct protoent *tcpproto;
438 struct sigaction sact;
442 port = DEFAULT_SERVER_PORT;
447 if ((tcpproto = getprotobyname("tcp")) != NULL)
448 tcp = tcpproto->p_proto;
451 signal(SIGPIPE, SIG_IGN);
453 sact.sa_handler = SIG_IGN;
454 sigemptyset(&sact.sa_mask);
456 sigaction(SIGPIPE, &sact, NULL);
460 if ((lfd = socket(PF_INET, SOCK_STREAM, 0)) < 0)
461 Error(ERR_EXIT_NETWORK_SERVER, "socket() failed");
463 saddr.sin_family = AF_INET;
464 saddr.sin_addr.s_addr = htonl(INADDR_ANY);
465 saddr.sin_port = htons(port);
469 setsockopt(lfd, SOL_SOCKET, SO_REUSEADDR, (char *)&on, sizeof(int));
470 if (bind(lfd, (struct sockaddr *)&saddr, sizeof(saddr)) < 0)
471 Error(ERR_EXIT_NETWORK_SERVER, "bind() failed");
477 /* become a daemon, breaking all ties with the controlling terminal */
479 for (i=0; i<255; i++)
492 /* open a fake stdin, stdout, stderr, just in case */
493 open("/dev/null", O_RDONLY);
494 open("/dev/null", O_WRONLY);
495 open("/dev/null", O_WRONLY);
500 Error(ERR_NETWORK_SERVER, "started up, listening on port %d", port);
501 Error(ERR_NETWORK_SERVER, "using protocol version %d.%d.%d",
502 PROTOCOL_VERSION_1, PROTOCOL_VERSION_2, PROTOCOL_VERSION_3);
509 for (player=first_player; player; player=player->next)
514 player = first_player;
517 FD_SET(player->fd, &fds);
518 if (player->fd > mfd)
520 player = player->next;
525 if ((sl = select(mfd + 1, &fds, NULL, NULL, &tv)) < 0)
528 Error(ERR_EXIT_NETWORK_SERVER, "select() failed");
539 if (FD_ISSET(lfd, &fds))
543 slen = sizeof(saddr);
544 newfd = accept(lfd, (struct sockaddr *)&saddr, &slen);
548 Error(ERR_EXIT_NETWORK_SERVER, "accept() failed");
555 setsockopt(newfd, tcp, TCP_NODELAY, (char *)&on, sizeof(int));
562 player = first_player;
566 if (FD_ISSET(player->fd, &fds))
568 r = read(player->fd, player->readbuffer + player->nread, MAX_BUFFER_SIZE - player->nread);
572 Error(ERR_NETWORK_SERVER, "EOF from client %d (%s)",
573 player->number, player->player_name);
574 RemovePlayer(player);
579 while (player->nread >= 4 && player->nread >= 4 + player->readbuffer[3])
581 len = player->readbuffer[3];
582 if (player->readbuffer[0] || player->readbuffer[1] || player->readbuffer[2])
585 Error(ERR_NETWORK_SERVER, "crap from client %d (%s)",
586 player->number, player->player_name);
587 RemovePlayer(player);
591 memcpy(buffer, &player->readbuffer[4], len);
592 player->nread -= 4 + len;
593 memmove(player->readbuffer, player->readbuffer + 4 + len, player->nread);
595 buffer[0] = player->number;
596 if (!player->introduced && buffer[1] != OP_PLAYER_NAME)
599 Error(ERR_NETWORK_SERVER, "!(client %d)->introduced && buffer[1]==%d (expected OP_PLAYER_NAME)", buffer[0], buffer[1]);
601 RemovePlayer(player);
609 Handle_OP_PLAYER_NAME(player, len);
612 case OP_PROTOCOL_VERSION:
613 Handle_OP_PROTOCOL_VERSION(player, len);
616 case OP_NUMBER_WANTED:
617 Handle_OP_NUMBER_WANTED(player);
620 case OP_START_PLAYING:
621 Handle_OP_START_PLAYING(player);
624 case OP_PAUSE_PLAYING:
625 Handle_OP_PAUSE_PLAYING(player);
628 case OP_CONTINUE_PLAYING:
629 Handle_OP_CONTINUE_PLAYING(player);
632 case OP_STOP_PLAYING:
633 Handle_OP_STOP_PLAYING(player);
637 Handle_OP_MOVE_FIGURE(player);
640 case OP_BROADCAST_MESSAGE:
643 Error(ERR_NETWORK_SERVER, "client %d (%s) sends message: %s",
644 player->number, player->player_name, &buffer[2]);
645 broadcast(player, len, 0);
650 Error(ERR_NETWORK_SERVER,
651 "unknown opcode %d from client %d (%s)",
652 buffer[0], player->number, player->player_name);
657 if (player && !interrupt)
658 player = player->next;
660 while (player && !interrupt);