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