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 ***********************************************************/
18 #include <sys/types.h>
21 #include <sys/socket.h>
22 #include <netinet/in.h>
23 #include <netinet/tcp.h>
24 #include <arpa/inet.h>
43 char name[MAXNICKLEN+2];
54 static char msgbuf[300];
59 unsigned char realbuf[512], readbuf[MAX_BUFFER_SIZE], writbuf[MAX_BUFFER_SIZE];
60 unsigned char *buf = realbuf + 4;
61 int nread = 0, nwrite = 0;
63 static void sysmsg(char *s)
72 static void *mmalloc(int n)
78 fatal("Out of memory");
82 static void u_sleep(int i)
85 tm.tv_sec = i / 1000000;
86 tm.tv_usec = i % 1000000;
87 select(0, NULL, NULL, NULL, &tm);
90 static void flushbuf()
94 write(sfd, writbuf, nwrite);
99 static void sendbuf(int len)
103 realbuf[0] = realbuf[1] = realbuf[2] = 0;
104 realbuf[3] = (unsigned char)len;
106 if (nwrite + 4 + len >= MAX_BUFFER_SIZE)
107 fatal("Internal error: send buffer overflow");
108 memcpy(writbuf + nwrite, realbuf, 4 + len);
118 struct user *finduser(unsigned char c)
122 for (u = &me; u; u = u->next)
126 fatal("Protocol error: reference to non-existing user");
127 return NULL; /* so that gcc -Wall doesn't complain */
130 char *get_user_name(unsigned char c)
135 return("the server");
139 for (u = &me; u; u = u->next)
140 if (u->nr == c && u->name && strlen(u->name))
146 static void StartNetworkServer(int port)
151 NetworkServer(port, serveronly);
158 "cannot create network server process - no network games");
163 /* we are parent process -- resume normal operation */
168 BOOL ConnectToServer(char *host, int port)
171 struct sockaddr_in s;
172 struct protoent *tcpproto;
177 if ((s.sin_addr.s_addr = inet_addr(host)) == -1)
179 hp = gethostbyname(host);
181 fatal("Host not found");
182 s.sin_addr = *(struct in_addr *)(hp->h_addr_list[0]);
186 s.sin_addr.s_addr = inet_addr("127.0.0.1");
191 s.sin_port = htons(port);
192 s.sin_family = AF_INET;
193 sfd = socket(PF_INET, SOCK_STREAM, 0);
195 fatal("Out of file descriptors");
196 if ((tcpproto = getprotobyname("tcp")) != NULL)
197 setsockopt(sfd, tcpproto->p_proto, TCP_NODELAY, (char *)&on, sizeof(int));
199 if (connect(sfd, (struct sockaddr *)&s, sizeof(s)) < 0)
203 printf("No rocksndiamonds server on localhost - starting up one ...\n");
205 StartNetworkServer(port);
211 sfd = socket(PF_INET, SOCK_STREAM, 0);
213 fatal("Out of file descriptors");
214 setsockopt(sfd, tcpproto->p_proto, TCP_NODELAY, (char *)&on, sizeof(int));
215 if (connect(sfd, (struct sockaddr *)&s, sizeof(s)) >= 0)
219 fatal("Can't connect to server");
222 fatal("Can't connect to server");
228 void SendToServer_Nickname(char *nickname)
230 static char msgbuf[300];
232 buf[1] = OP_NICKNAME;
233 memcpy(&buf[2], nickname, strlen(nickname));
234 sendbuf(2 + strlen(nickname));
235 sprintf(msgbuf, "you set your nick to \"%s\"", nickname);
239 void SendToServer_ProtocolVersion()
241 buf[1] = OP_PROTOCOL_VERSION;
242 buf[2] = PROT_VERS_1;
243 buf[3] = PROT_VERS_2;
244 buf[4] = PROT_VERS_3;
249 void SendToServer_NrWanted(int nr_wanted)
251 buf[1] = OP_NUMBER_WANTED;
257 void SendToServer_StartPlaying()
259 unsigned long new_random_seed = InitRND(NEW_RANDOMIZE);
261 buf[1] = OP_START_PLAYING;
262 buf[2] = (byte)(level_nr >> 8);
263 buf[3] = (byte)(level_nr & 0xff);
264 buf[4] = (byte)(leveldir_nr >> 8);
265 buf[5] = (byte)(leveldir_nr & 0xff);
267 buf[6] = (unsigned char)((new_random_seed >> 24) & 0xff);
268 buf[7] = (unsigned char)((new_random_seed >> 16) & 0xff);
269 buf[8] = (unsigned char)((new_random_seed >> 8) & 0xff);
270 buf[9] = (unsigned char)((new_random_seed >> 0) & 0xff);
272 strcpy(&buf[10], leveldir[leveldir_nr].name);
274 sendbuf(10 + strlen(leveldir[leveldir_nr].name)+1);
277 void SendToServer_PausePlaying()
279 buf[1] = OP_PAUSE_PLAYING;
284 void SendToServer_ContinuePlaying()
286 buf[1] = OP_CONTINUE_PLAYING;
291 void SendToServer_StopPlaying()
293 buf[1] = OP_STOP_PLAYING;
298 void SendToServer_MovePlayer(byte player_action)
300 buf[1] = OP_MOVE_FIGURE;
301 buf[2] = player_action;
306 static void Handle_OP_BAD_PROTOCOL_VERSION()
308 Error(ERR_RETURN, "protocol version mismatch");
309 Error(ERR_EXIT, "server expects %d.%d.x instead of %d.%d.%d",
310 buf[2], buf[3], PROT_VERS_1, PROT_VERS_2, PROT_VERS_3);
313 static void Handle_OP_YOUR_NUMBER()
315 int new_client_nr = buf[2];
316 int new_index_nr = new_client_nr - 1;
318 printf("OP_YOUR_NUMBER: %d\n", buf[0]);
319 me.nr = new_client_nr;
321 stored_player[new_index_nr] = *local_player;
322 local_player = &stored_player[new_index_nr];
324 TestPlayer = new_index_nr;
326 if (me.nr > MAX_PLAYERS)
327 Error(ERR_EXIT, "sorry - no more than %d players", MAX_PLAYERS);
329 sprintf(msgbuf, "you get client # %d", new_client_nr);
333 static void Handle_OP_NUMBER_WANTED()
335 int client_nr_wanted = buf[2];
336 int new_client_nr = buf[3];
337 int new_index_nr = new_client_nr - 1;
339 printf("OP_NUMBER_WANTED: %d\n", buf[0]);
341 if (new_client_nr != client_nr_wanted)
343 char *color[] = { "yellow", "red", "green", "blue" };
345 sprintf(msgbuf, "Sorry ! You are %s player !",
346 color[new_index_nr]);
347 Request(msgbuf, REQ_CONFIRM);
349 sprintf(msgbuf, "cannot switch -- you keep client # %d",
355 if (me.nr != client_nr_wanted)
356 sprintf(msgbuf, "switching to client # %d", new_client_nr);
358 sprintf(msgbuf, "keeping client # %d", new_client_nr);
361 me.nr = new_client_nr;
363 stored_player[new_index_nr] = *local_player;
364 local_player = &stored_player[new_index_nr];
366 TestPlayer = new_index_nr;
370 static void Handle_OP_NICKNAME(unsigned int len)
374 printf("OP_NICKNAME: %d\n", buf[0]);
375 u = finduser(buf[0]);
377 sprintf(msgbuf, "client %d calls itself \"%s\"", buf[0], &buf[2]);
379 strncpy(u->name, &buf[2], MAXNICKLEN);
382 static void Handle_OP_PLAYER_CONNECTED()
384 struct user *u, *v = NULL;
386 printf("OP_PLAYER_CONNECTED: %d\n", buf[0]);
387 sprintf(msgbuf, "new client %d connected", buf[0]);
390 for (u = &me; u; u = u->next)
393 Error(ERR_EXIT, "multiplayer server sent duplicate player id");
398 v->next = u = mmalloc(sizeof(struct user));
404 static void Handle_OP_PLAYER_DISCONNECTED()
408 printf("OP_PLAYER_DISCONNECTED: %d\n", buf[0]);
409 u = finduser(buf[0]);
410 sprintf(msgbuf, "client %d (%s) disconnected",
411 buf[0], get_user_name(buf[0]));
414 for (v = &me; v; v = v->next)
420 static void Handle_OP_START_PLAYING()
422 int new_level_nr, new_leveldir_nr;
423 unsigned long new_random_seed;
424 unsigned char *new_leveldir_name;
427 if (game_status == PLAYING)
431 new_level_nr = (buf[2] << 8) + buf[3];
432 new_leveldir_nr = (buf[4] << 8) + buf[5];
434 (buf[6] << 24) | (buf[7] << 16) | (buf[8] << 8) | (buf[9]);
435 new_leveldir_name = &buf[10];
437 printf("OP_START_PLAYING: %d\n", buf[0]);
438 sprintf(msgbuf, "client %d starts game [level %d from levedir %d (%s)]\n",
446 if (strcmp(leveldir[new_leveldir_nr].name, new_leveldir_name) != 0)
447 Error(ERR_RETURN, "no such level directory: '%s'",new_leveldir_name);
449 leveldir_nr = new_leveldir_nr;
451 local_player->leveldir_nr = leveldir_nr;
452 LoadPlayerInfo(PLAYER_LEVEL);
453 SavePlayerInfo(PLAYER_SETUP);
455 level_nr = new_level_nr;
458 LoadLevelTape(level_nr);
466 TapeStartRecording();
471 tape.random_seed = new_random_seed;
473 InitRND(new_random_seed);
477 printf("tape.random_seed == %d\n", tape.random_seed);
480 game_status = PLAYING;
484 static void Handle_OP_PAUSE_PLAYING()
486 printf("OP_PAUSE_PLAYING: %d\n", buf[0]);
487 sprintf(msgbuf, "client %d pauses game", buf[0]);
491 DrawVideoDisplay(VIDEO_STATE_PAUSE_ON,0);
494 static void Handle_OP_CONTINUE_PLAYING()
496 printf("OP_CONTINUE_PLAYING: %d\n", buf[0]);
497 sprintf(msgbuf, "client %d continues game", buf[0]);
500 tape.pausing = FALSE;
501 DrawVideoDisplay(VIDEO_STATE_PAUSE_OFF,0);
504 static void Handle_OP_STOP_PLAYING()
506 printf("OP_STOP_PLAYING: %d\n", buf[0]);
507 sprintf(msgbuf, "client %d stops game", buf[0]);
510 game_status = MAINMENU;
514 static void Handle_OP_MOVE_FIGURE()
519 if (!network_playing)
523 (buf[2] << 24) | (buf[3] << 16) | (buf[4] << 8) | (buf[5]);
525 if (frame_nr != FrameCounter)
527 Error(ERR_RETURN, "client and servers frame counters out of sync");
528 Error(ERR_RETURN, "frame counter of client is %d", FrameCounter);
529 Error(ERR_RETURN, "frame counter of server is %d", frame_nr);
530 Error(ERR_EXIT, "this should not happen -- please debug");
533 for (i=0; i<MAX_PLAYERS; i++)
535 if (stored_player[i].active)
536 network_player_action[i] = buf[6 + i];
539 network_player_action_received = TRUE;
542 sprintf(msgbuf, "frame %d: client %d moves player [0x%02x]",
543 FrameCounter, buf[0], buf[2]);
548 static void handlemessages()
552 while (nread >= 4 && nread >= 4 + readbuf[3])
555 if (readbuf[0] || readbuf[1] || readbuf[2])
556 fatal("Wrong server line length");
558 memcpy(buf, &readbuf[4], len);
560 copydown(readbuf, readbuf + 4 + len, nread);
564 case OP_BAD_PROTOCOL_VERSION:
565 Handle_OP_BAD_PROTOCOL_VERSION();
569 Handle_OP_YOUR_NUMBER();
572 case OP_NUMBER_WANTED:
573 Handle_OP_NUMBER_WANTED();
577 Handle_OP_NICKNAME(len);
580 case OP_PLAYER_CONNECTED:
581 Handle_OP_PLAYER_CONNECTED();
584 case OP_PLAYER_DISCONNECTED:
585 Handle_OP_PLAYER_DISCONNECTED();
588 case OP_START_PLAYING:
589 Handle_OP_START_PLAYING();
592 case OP_PAUSE_PLAYING:
593 Handle_OP_PAUSE_PLAYING();
596 case OP_CONTINUE_PLAYING:
597 Handle_OP_CONTINUE_PLAYING();
600 case OP_STOP_PLAYING:
601 Handle_OP_STOP_PLAYING();
605 Handle_OP_MOVE_FIGURE();
609 printf("OP_WON: %d\n", buf[0]);
610 sprintf(msgbuf, "client %d wins the game", buf[0]);
615 printf("OP_ZERO: %d\n", buf[0]);
616 sprintf(msgbuf, "client %d resets game counters", buf[0]);
621 printf("OP_MSG: %d\n", buf[0]);
622 sprintf(msgbuf, "client %d sends message", buf[0]);
626 printf("OP_MSG: %d\n", buf[0]);
627 sprintf(msgbuf, "client %d has lost", buf[0]);
631 printf("OP_MSG: %d\n", buf[0]);
632 sprintf(msgbuf, "client %d sets level to %d", buf[0], buf[2]);
640 void HandleNetworking()
642 static struct timeval tv = { 0, 0 };
651 r = select(sfd + 1, &rfds, NULL, NULL, &tv);
653 if (r < 0 && errno != EINTR)
656 fatal("fatal: select() failed");
662 if (FD_ISSET(sfd, &rfds))
666 r = read(sfd, readbuf + nread, MAX_BUFFER_SIZE - nread);
669 fatal("Error reading from server");
671 fatal("Connection to server lost");