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