src/network.c

   1 /***********************************************************
   2 *  Rocks'n'Diamonds -- McDuffin Strikes Back!              *
   3 *----------------------------------------------------------*
   4 *  (c) 1995-98 Artsoft Entertainment                       *
   5 *              Holger Schemel                              *
   6 *              Oststrasse 11a                              *
   7 *              33604 Bielefeld                             *
   8 *              phone: ++49 +521 290471                     *
   9 *              email: aeglos@valinor.owl.de                *
  10 *----------------------------------------------------------*
  11 *  network.c                                               *
  12 ***********************************************************/
  13
  14 #ifndef MSDOS
  15
  16 #include <unistd.h>
  17 #include <signal.h>
  18 #include <sys/time.h>
  19 #include <sys/wait.h>
  20 #include <sys/socket.h>
  21 #include <netinet/in.h>
  22 #include <netinet/tcp.h>
  23 #include <arpa/inet.h>
  24 #include <netdb.h>
  25
  26 #include "network.h"
  27 #include "netserv.h"
  28 #include "game.h"
  29 #include "tape.h"
  30 #include "files.h"
  31 #include "tools.h"
  32 #include "buttons.h"
  33 #include "screens.h"
  34 #include "misc.h"
  35
  36 struct NetworkClientPlayerInfo
  37 {
  38   byte nr;
  39   char name[MAX_PLAYER_NAME_LEN + 1];
  40   struct NetworkClientPlayerInfo *next;
  41 };
  42
  43 static struct NetworkClientPlayerInfo first_player =
  44 {
  45   0,
  46   EMPTY_PLAYER_NAME,
  47   NULL
  48 };
  49
  50 /* server stuff */
  51
  52 static int sfd;
  53 static byte realbuffer[512];
  54 static byte readbuffer[MAX_BUFFER_SIZE], writbuffer[MAX_BUFFER_SIZE];
  55 static byte *buffer = realbuffer + 4;
  56 static int nread = 0, nwrite = 0;
  57
  58 static void SendBufferToServer(int size)
  59 {
  60   if (!options.network)
  61     return;
  62
  63   realbuffer[0] = realbuffer[1] = realbuffer[2] = 0;
  64   realbuffer[3] = (byte)size;
  65   buffer[0] = 0;
  66
  67   if (nwrite + 4 + size >= MAX_BUFFER_SIZE)
  68     Error(ERR_EXIT, "internal error: network send buffer overflow");
  69
  70   memcpy(writbuffer + nwrite, realbuffer, 4 + size);
  71   nwrite += 4 + size;
  72
  73   /* directly send the buffer to the network server */
  74   write(sfd, writbuffer, nwrite);
  75   nwrite = 0;
  76 }
  77
  78 struct NetworkClientPlayerInfo *getNetworkPlayer(int player_nr)
  79 {
  80   struct NetworkClientPlayerInfo *player = NULL;
  81
  82   for (player = &first_player; player; player = player->next)
  83     if (player->nr == player_nr)
  84       break;
  85
  86   if (player == NULL)   /* should not happen */
  87     Error(ERR_EXIT, "protocol error: reference to non-existing player %d",
  88           player_nr);
  89
  90   return player;
  91 }
  92
  93 char *getNetworkPlayerName(int player_nr)
  94 {
  95   struct NetworkClientPlayerInfo *player;
  96
  97   if (player_nr == 0)
  98     return("the network game server");
  99   else if (player_nr == first_player.nr)
 100     return("you");
 101   else
 102     for (player=&first_player; player; player=player->next)
 103       if (player->nr == player_nr && player->name && strlen(player->name))
 104         return(player->name);
 105
 106   return(EMPTY_PLAYER_NAME);
 107 }
 108
 109 static void StartNetworkServer(int port)
 110 {
 111   switch (fork())
 112   {
 113     case 0:
 114       NetworkServer(port, options.serveronly);
 115
 116       /* never reached */
 117       exit(0);
 118
 119     case -1:
 120       Error(ERR_WARN,
 121             "cannot create network server process - no network playing");
 122       options.network = FALSE;
 123       return;
 124
 125     default:
 126       /* we are parent process -- resume normal operation */
 127       return;
 128   }
 129 }
 130
 131 boolean ConnectToServer(char *hostname, int port)
 132 {
 133   struct sockaddr_in s;
 134   struct protoent *tcpproto;
 135   int on = 1, i;
 136
 137   if (hostname)
 138   {
 139     if ((s.sin_addr.s_addr = inet_addr(hostname)) == -1)
 140     {
 141       struct hostent *host;
 142
 143       if ((host = gethostbyname(hostname)) == NULL)
 144         Error(ERR_EXIT, "cannot locate host '%s'", hostname);
 145
 146       s.sin_addr = *(struct in_addr *)(host->h_addr_list[0]);
 147     }
 148   }
 149   else
 150     s.sin_addr.s_addr = inet_addr("127.0.0.1");         /* localhost */
 151
 152   if (port == 0)
 153     port = DEFAULT_SERVER_PORT;
 154
 155   s.sin_port = htons(port);
 156   s.sin_family = AF_INET;
 157
 158   sfd = socket(PF_INET, SOCK_STREAM, 0);
 159   if (sfd < 0)
 160     Error(ERR_EXIT, "out of file descriptors");
 161
 162   if ((tcpproto = getprotobyname("tcp")) != NULL)
 163     setsockopt(sfd, tcpproto->p_proto, TCP_NODELAY, (char *)&on, sizeof(int));
 164
 165   if (connect(sfd, (struct sockaddr *)&s, sizeof(s)) == 0)      /* connected */
 166     return TRUE;
 167
 168   if (hostname) /* connect to specified server failed */
 169     return FALSE;
 170
 171   printf("No rocksndiamonds server on localhost - starting up one ...\n");
 172   StartNetworkServer(port);
 173
 174   /* wait for server to start up and try connecting several times */
 175   for (i=0; i<6; i++)
 176   {
 177     Delay(500);         /* wait 500 ms == 0.5 seconds */
 178     close(sfd);
 179
 180     sfd = socket(PF_INET, SOCK_STREAM, 0);
 181     if (sfd < 0)
 182       Error(ERR_EXIT, "out of file descriptors");
 183
 184     setsockopt(sfd, tcpproto->p_proto, TCP_NODELAY, (char *)&on, sizeof(int));
 185
 186     if (connect(sfd, (struct sockaddr *)&s, sizeof(s)) >= 0)    /* connected */
 187       return TRUE;
 188   }
 189
 190   /* when reaching this point, connect to newly started server has failed */
 191   return FALSE;
 192 }
 193
 194 void SendToServer_PlayerName(char *player_name)
 195 {
 196   int len_player_name = strlen(player_name);
 197
 198   buffer[1] = OP_PLAYER_NAME;
 199   memcpy(&buffer[2], player_name, len_player_name);
 200   SendBufferToServer(2 + len_player_name);
 201   Error(ERR_NETWORK_CLIENT, "you set your player name to \"%s\"", player_name);
 202 }
 203
 204 void SendToServer_ProtocolVersion()
 205 {
 206   buffer[1] = OP_PROTOCOL_VERSION;
 207   buffer[2] = PROTOCOL_VERSION_1;
 208   buffer[3] = PROTOCOL_VERSION_2;
 209   buffer[4] = PROTOCOL_VERSION_3;
 210
 211   SendBufferToServer(5);
 212 }
 213
 214 void SendToServer_NrWanted(int nr_wanted)
 215 {
 216   buffer[1] = OP_NUMBER_WANTED;
 217   buffer[2] = nr_wanted;
 218
 219   SendBufferToServer(3);
 220 }
 221
 222 void SendToServer_StartPlaying()
 223 {
 224   unsigned long new_random_seed = InitRND(NEW_RANDOMIZE);
 225
 226   int dummy = 0;                /* !!! HAS NO MEANING ANYMORE !!! */
 227                                 /* the name of the level must be enough */
 228
 229   buffer[1] = OP_START_PLAYING;
 230   buffer[2] = (byte)(level_nr >> 8);
 231   buffer[3] = (byte)(level_nr & 0xff);
 232   buffer[4] = (byte)(dummy >> 8);
 233   buffer[5] = (byte)(dummy & 0xff);
 234
 235   buffer[6] = (unsigned char)((new_random_seed >> 24) & 0xff);
 236   buffer[7] = (unsigned char)((new_random_seed >> 16) & 0xff);
 237   buffer[8] = (unsigned char)((new_random_seed >>  8) & 0xff);
 238   buffer[9] = (unsigned char)((new_random_seed >>  0) & 0xff);
 239
 240   strcpy((char *)&buffer[10], leveldir_current->name);
 241
 242   SendBufferToServer(10 + strlen(leveldir_current->name) + 1);
 243 }
 244
 245 void SendToServer_PausePlaying()
 246 {
 247   buffer[1] = OP_PAUSE_PLAYING;
 248
 249   SendBufferToServer(2);
 250 }
 251
 252 void SendToServer_ContinuePlaying()
 253 {
 254   buffer[1] = OP_CONTINUE_PLAYING;
 255
 256   SendBufferToServer(2);
 257 }
 258
 259 void SendToServer_StopPlaying()
 260 {
 261   buffer[1] = OP_STOP_PLAYING;
 262
 263   SendBufferToServer(2);
 264 }
 265
 266 void SendToServer_MovePlayer(byte player_action)
 267 {
 268   buffer[1] = OP_MOVE_FIGURE;
 269   buffer[2] = player_action;
 270
 271   SendBufferToServer(3);
 272 }
 273
 274 static void Handle_OP_BAD_PROTOCOL_VERSION()
 275 {
 276   Error(ERR_WARN, "protocol version mismatch");
 277   Error(ERR_EXIT, "server expects %d.%d.x instead of %d.%d.%d",
 278         buffer[2], buffer[3],
 279         PROTOCOL_VERSION_1, PROTOCOL_VERSION_2, PROTOCOL_VERSION_3);
 280 }
 281
 282 static void Handle_OP_YOUR_NUMBER()
 283 {
 284   int new_client_nr = buffer[2];
 285   int new_index_nr = new_client_nr - 1;
 286   struct PlayerInfo *old_local_player = local_player;
 287   struct PlayerInfo *new_local_player = &stored_player[new_index_nr];
 288
 289   printf("OP_YOUR_NUMBER: %d\n", buffer[0]);
 290   first_player.nr = new_client_nr;
 291
 292   if (old_local_player != new_local_player)
 293   {
 294     /* copy existing player settings and change to new player */
 295
 296     *new_local_player = *old_local_player;
 297     old_local_player->connected = FALSE;
 298     local_player = new_local_player;
 299   }
 300
 301   if (first_player.nr > MAX_PLAYERS)
 302     Error(ERR_EXIT, "sorry - no more than %d players", MAX_PLAYERS);
 303
 304   Error(ERR_NETWORK_CLIENT, "you get client # %d", new_client_nr);
 305 }
 306
 307 static void Handle_OP_NUMBER_WANTED()
 308 {
 309   int client_nr_wanted = buffer[2];
 310   int old_client_nr = buffer[0];
 311   int new_client_nr = buffer[3];
 312   int old_index_nr = old_client_nr - 1;
 313   int new_index_nr = new_client_nr - 1;
 314   int index_nr_wanted = client_nr_wanted - 1;
 315   struct PlayerInfo *old_player = &stored_player[old_index_nr];
 316   struct PlayerInfo *new_player = &stored_player[new_index_nr];
 317
 318   printf("OP_NUMBER_WANTED: %d\n", buffer[0]);
 319
 320   if (new_client_nr == client_nr_wanted)        /* switching succeeded */
 321   {
 322     struct NetworkClientPlayerInfo *player;
 323
 324     if (old_client_nr != client_nr_wanted)      /* client's nr has changed */
 325       Error(ERR_NETWORK_CLIENT, "client %d switches to # %d",
 326             old_client_nr, new_client_nr);
 327     else if (old_client_nr == first_player.nr)  /* local player keeps his nr */
 328       Error(ERR_NETWORK_CLIENT, "keeping client # %d", new_client_nr);
 329
 330     if (old_client_nr != new_client_nr)
 331     {
 332       /* copy existing player settings and change to new player */
 333
 334       *new_player = *old_player;
 335       old_player->connected = FALSE;
 336     }
 337
 338     player = getNetworkPlayer(old_client_nr);
 339     player->nr = new_client_nr;
 340
 341     if (old_player == local_player)             /* local player switched */
 342       local_player = new_player;
 343   }
 344   else if (old_client_nr == first_player.nr)    /* failed -- local player? */
 345   {
 346     char *color[] = { "yellow", "red", "green", "blue" };
 347     char request[100];
 348
 349     sprintf(request, "Sorry ! %s player still exists ! You are %s player !",
 350             color[index_nr_wanted], color[new_index_nr]);
 351     Request(request, REQ_CONFIRM);
 352
 353     Error(ERR_NETWORK_CLIENT, "cannot switch -- you keep client # %d",
 354           new_client_nr);
 355   }
 356 }
 357
 358 static void Handle_OP_PLAYER_NAME(unsigned int len)
 359 {
 360   struct NetworkClientPlayerInfo *player;
 361   int player_nr = (int)buffer[0];
 362
 363   printf("OP_PLAYER_NAME: %d\n", player_nr);
 364   player = getNetworkPlayer(player_nr);
 365   buffer[len] = 0;
 366   Error(ERR_NETWORK_CLIENT, "client %d calls itself \"%s\"",
 367         buffer[0], &buffer[2]);
 368   strncpy(player->name, (char *)&buffer[2], MAX_PLAYER_NAME_LEN);
 369 }
 370
 371 static void Handle_OP_PLAYER_CONNECTED()
 372 {
 373   struct NetworkClientPlayerInfo *player, *last_player = NULL;
 374   int new_client_nr = (int)buffer[0];
 375   int new_index_nr = new_client_nr - 1;
 376
 377   printf("OP_PLAYER_CONNECTED: %d\n", new_client_nr);
 378   Error(ERR_NETWORK_CLIENT, "new client %d connected", new_client_nr);
 379
 380   for (player=&first_player; player; player=player->next)
 381   {
 382     if (player->nr == new_client_nr)
 383       Error(ERR_EXIT, "multiplayer server sent duplicate player id");
 384
 385     last_player = player;
 386   }
 387
 388   last_player->next = player =
 389     checked_malloc(sizeof(struct NetworkClientPlayerInfo));
 390   player->nr = new_client_nr;
 391   player->name[0] = '\0';
 392   player->next = NULL;
 393
 394   stored_player[new_index_nr].connected = TRUE;
 395 }
 396
 397 static void Handle_OP_PLAYER_DISCONNECTED()
 398 {
 399   struct NetworkClientPlayerInfo *player, *player_disconnected;
 400   int player_nr = (int)buffer[0];
 401
 402   printf("OP_PLAYER_DISCONNECTED: %d\n", player_nr);
 403   player_disconnected = getNetworkPlayer(player_nr);
 404   Error(ERR_NETWORK_CLIENT, "client %d (%s) disconnected",
 405         player_nr, getNetworkPlayerName(buffer[0]));
 406
 407   for (player=&first_player; player; player=player->next)
 408     if (player->next == player_disconnected)
 409       player->next = player_disconnected->next;
 410   free(player_disconnected);
 411 }
 412
 413 static void Handle_OP_START_PLAYING()
 414 {
 415   struct LevelDirInfo *new_leveldir;
 416   int new_level_nr;
 417   int dummy;                            /* !!! HAS NO MEANING ANYMORE !!! */
 418   unsigned long new_random_seed;
 419   char *new_leveldir_name;
 420
 421   new_level_nr = (buffer[2] << 8) + buffer[3];
 422   dummy = (buffer[4] << 8) + buffer[5];
 423   new_random_seed =
 424     (buffer[6] << 24) | (buffer[7] << 16) | (buffer[8] << 8) | (buffer[9]);
 425   new_leveldir_name = (char *)&buffer[10];
 426
 427   new_leveldir = getLevelDirInfoFromFilename(new_leveldir_name);
 428   if (new_leveldir == NULL)
 429   {
 430     Error(ERR_WARN, "no such level directory: '%s'", new_leveldir_name);
 431
 432     new_leveldir = leveldir_first;
 433     Error(ERR_WARN, "using default level directory: '%s'", new_leveldir->name);
 434   }
 435
 436   printf("OP_START_PLAYING: %d\n", buffer[0]);
 437   Error(ERR_NETWORK_CLIENT,
 438         "client %d starts game [level %d from leveldir '%s']\n",
 439         buffer[0], new_level_nr, new_leveldir->name);
 440
 441   leveldir_current = new_leveldir;
 442   level_nr = new_level_nr;
 443
 444   TapeErase();
 445   LoadTape(level_nr);
 446   LoadLevel(level_nr);
 447
 448   if (setup.autorecord)
 449     TapeStartRecording();
 450
 451   if (tape.recording)
 452     tape.random_seed = new_random_seed;
 453
 454   InitRND(new_random_seed);
 455
 456   game_status = PLAYING;
 457   InitGame();
 458 }
 459
 460 static void Handle_OP_PAUSE_PLAYING()
 461 {
 462   printf("OP_PAUSE_PLAYING: %d\n", buffer[0]);
 463   Error(ERR_NETWORK_CLIENT, "client %d pauses game", buffer[0]);
 464
 465   tape.pausing = TRUE;
 466   DrawVideoDisplay(VIDEO_STATE_PAUSE_ON,0);
 467 }
 468
 469 static void Handle_OP_CONTINUE_PLAYING()
 470 {
 471   printf("OP_CONTINUE_PLAYING: %d\n", buffer[0]);
 472   Error(ERR_NETWORK_CLIENT, "client %d continues game", buffer[0]);
 473
 474   tape.pausing = FALSE;
 475   DrawVideoDisplay(VIDEO_STATE_PAUSE_OFF,0);
 476 }
 477
 478 static void Handle_OP_STOP_PLAYING()
 479 {
 480   printf("OP_STOP_PLAYING: %d\n", buffer[0]);
 481   Error(ERR_NETWORK_CLIENT, "client %d stops game", buffer[0]);
 482
 483   game_status = MAINMENU;
 484   DrawMainMenu();
 485 }
 486
 487 static void Handle_OP_MOVE_FIGURE(unsigned int len)
 488 {
 489   int server_frame_counter;
 490   int i;
 491
 492   if (!network_playing)
 493     return;
 494
 495   server_frame_counter =
 496     (buffer[2] << 24) | (buffer[3] << 16) | (buffer[4] << 8) | (buffer[5]);
 497
 498   if (server_frame_counter != FrameCounter)
 499   {
 500     Error(ERR_RETURN, "client and servers frame counters out of sync");
 501     Error(ERR_RETURN, "frame counter of client is %d", FrameCounter);
 502     Error(ERR_RETURN, "frame counter of server is %d", server_frame_counter);
 503     Error(ERR_EXIT,   "this should not happen -- please debug");
 504   }
 505
 506   /* copy valid player actions */
 507   for (i=0; i<MAX_PLAYERS; i++)
 508     stored_player[i].effective_action =
 509       (i < len - 6 && stored_player[i].active ? buffer[6 + i] : 0);
 510
 511   network_player_action_received = TRUE;
 512 }
 513
 514 static void HandleNetworkingMessages()
 515 {
 516   unsigned int message_length;
 517
 518   while (nread >= 4 && nread >= 4 + readbuffer[3])
 519   {
 520     message_length = readbuffer[3];
 521     if (readbuffer[0] || readbuffer[1] || readbuffer[2])
 522       Error(ERR_EXIT, "wrong network server line length");
 523
 524     memcpy(buffer, &readbuffer[4], message_length);
 525     nread -= 4 + message_length;
 526     memmove(readbuffer, readbuffer + 4 + message_length, nread);
 527
 528     switch(buffer[1])
 529     {
 530       case OP_BAD_PROTOCOL_VERSION:
 531         Handle_OP_BAD_PROTOCOL_VERSION();
 532         break;
 533
 534       case OP_YOUR_NUMBER:
 535         Handle_OP_YOUR_NUMBER();
 536         break;
 537
 538       case OP_NUMBER_WANTED:
 539         Handle_OP_NUMBER_WANTED();
 540         break;
 541
 542       case OP_PLAYER_NAME:
 543         Handle_OP_PLAYER_NAME(message_length);
 544         break;
 545
 546       case OP_PLAYER_CONNECTED:
 547         Handle_OP_PLAYER_CONNECTED();
 548         break;
 549
 550       case OP_PLAYER_DISCONNECTED:
 551         Handle_OP_PLAYER_DISCONNECTED();
 552         break;
 553
 554       case OP_START_PLAYING:
 555         Handle_OP_START_PLAYING();
 556         break;
 557
 558       case OP_PAUSE_PLAYING:
 559         Handle_OP_PAUSE_PLAYING();
 560         break;
 561
 562       case OP_CONTINUE_PLAYING:
 563         Handle_OP_CONTINUE_PLAYING();
 564         break;
 565
 566       case OP_STOP_PLAYING:
 567         Handle_OP_STOP_PLAYING();
 568         break;
 569
 570       case OP_MOVE_FIGURE:
 571         Handle_OP_MOVE_FIGURE(message_length);
 572         break;
 573
 574       case OP_BROADCAST_MESSAGE:
 575         printf("OP_BROADCAST_MESSAGE: %d\n", buffer[0]);
 576         Error(ERR_NETWORK_CLIENT, "client %d sends message", buffer[0]);
 577         break;
 578     }
 579   }
 580
 581   fflush(stdout);
 582 }
 583
 584 void HandleNetworking()
 585 {
 586   static struct timeval tv = { 0, 0 };
 587   fd_set rfds;
 588   int r = 0;
 589
 590   FD_ZERO(&rfds);
 591   FD_SET(sfd, &rfds);
 592
 593   r = select(sfd + 1, &rfds, NULL, NULL, &tv);
 594
 595   if (r < 0 && errno != EINTR)
 596     Error(ERR_EXIT, "HandleNetworking(): select() failed");
 597
 598   if (r < 0)
 599     FD_ZERO(&rfds);
 600
 601   if (FD_ISSET(sfd, &rfds))
 602   {
 603     int r;
 604
 605     r = read(sfd, readbuffer + nread, MAX_BUFFER_SIZE - nread);
 606
 607     if (r < 0)
 608       Error(ERR_EXIT, "error reading from network server");
 609
 610     if (r == 0)
 611       Error(ERR_EXIT, "connection to network server lost");
 612
 613     nread += r;
 614
 615     HandleNetworkingMessages();
 616   }
 617 }
 618
 619 #endif /* !MSDOS */