rnd-19981010-1
[rocksndiamonds.git] / src / network.c
index 033bed0d7c47115f978b9711ca50b53b92945c15..bb4ea67e6237ceaeed0ef3eb1322b4b4b45386d9 100644 (file)
 #include <errno.h>
 
 #include "network.h"
+#include "netserv.h"
+#include "game.h"
+#include "tape.h"
+#include "files.h"
+#include "tools.h"
+#include "misc.h"
 
-int norestart = 0;
-int nospeedup = 0;
-
-#define DEFAULTPORT 19503
-
-#define PROT_VERS_1 1
-#define PROT_VERS_2 0
-#define PROT_VERS_3 1
-
-#define OP_NICK 1
-#define OP_PLAY 2
-#define OP_FALL 3
-#define OP_DRAW 4
-#define OP_LOST 5
-#define OP_GONE 6
-#define OP_CLEAR 7
-#define OP_NEW 8
-#define OP_LINES 9
-#define OP_GROW 10
-#define OP_MODE 11
-#define OP_LEVEL 12
-#define OP_BOT 13
-#define OP_KILL 14
-#define OP_PAUSE 15
-#define OP_CONT 16
-#define OP_VERSION 17
-#define OP_BADVERS 18
-#define OP_MSG 19
-#define OP_YOUARE 20
-#define OP_LINESTO 21
-#define OP_WON 22
-#define OP_ZERO 23
+#define MAXNICKLEN 14
 
-/* server stuff */
+struct user
+{
+  byte nr;
+  char name[MAXNICKLEN+2];
+  struct user *next;
+};
+
+struct user me =
+{
+  0,
+  "no name",
+  NULL
+};
 
-#define BUFLEN         4096
+/* server stuff */
 
 int sfd;
-unsigned char realbuf[512], readbuf[BUFLEN], writbuf[BUFLEN];
+unsigned char realbuf[512], readbuf[MAX_BUFFER_SIZE], writbuf[MAX_BUFFER_SIZE];
 unsigned char *buf = realbuf + 4;
 int nread = 0, nwrite = 0;
 
-/* like memcpy, but guaranteed to handle overlap when s <= t */
-void copydown(char *s, char *t, int n)
-{
-  for (; n; n--)
-    *(s++) = *(t++);
-}
-
 void sysmsg(char *s)
 {
-  printf("** %s\n", s);
-  fflush(stdout);
+  if (verbose)
+  {
+    printf("** %s\n", s);
+    fflush(stdout);
+  }
 }
 
-void fatal(char *s)
+void *mmalloc(int n)
 {
-  fprintf(stderr, "%s.\n", s);
-  exit(1);
+  void *r;
+
+  r = malloc(n);
+  if (r == NULL)
+    fatal("Out of memory");
+  return r;
 }
 
 void u_sleep(int i)
@@ -112,49 +99,64 @@ void sendbuf(int len)
     realbuf[0] = realbuf[1] = realbuf[2] = 0;
     realbuf[3] = (unsigned char)len;
     buf[0] = 0;
-    if (nwrite + 4 + len >= BUFLEN)
+    if (nwrite + 4 + len >= MAX_BUFFER_SIZE)
       fatal("Internal error: send buffer overflow");
     memcpy(writbuf + nwrite, realbuf, 4 + len);
     nwrite += 4 + len;
+
+
+    flushbuf();
+
+
   }
 }
 
-void startserver()
+struct user *finduser(unsigned char c)
+{
+  struct user *u;
+
+  for (u = &me; u; u = u->next)
+    if (u->nr == c)
+      return u;
+  
+  fatal("Protocol error: reference to non-existing user");
+  return NULL; /* so that gcc -Wall doesn't complain */
+}
+
+char *get_user_name(unsigned char c)
 {
-  char *options[2];
-  int n = 0;
+  struct user *u;
 
-  options[0] = options[1] = NULL;
-  if (norestart)
-    options[n++] = "-norestart";
-  if (nospeedup)
-    options[n++] = "-nospeedup";
+  if (c == 0)
+    return("the server");
+  else if (c == me.nr)
+    return("you");
+  else
+    for (u = &me; u; u = u->next)
+      if (u->nr == c && u->name && strlen(u->name))
+       return(u->name);
+
+  return("no name");
+}
 
+void InitNetworkServer(int port)
+{
   switch (fork())
   {
     case 0:
-      execlp(
-#ifdef XTRISPATH
-      XTRISPATH "/rnd_server",
-#else
-      "rnd_server",
-#endif
-      "rnd_server", "-once", "-v", options[0], options[1], NULL);
-
-      fprintf(stderr, "Can't start server '%s'.\n",
-#ifdef XTRISPATH
-       XTRISPATH "/rnd_server"
-#else
-       "rnd_server"
-#endif
-             );
-
-      _exit(1);
-    
+      NetworkServer(port, !serveronly);
+
+      /* never reached */
+      exit(0);
+
     case -1:
-      fatal("fork() failed");
-    
+      Error(ERR_RETURN,
+           "cannot create network server process - no network games");
+      standalone = TRUE;
+      return;
+
     default:
+      /* we are parent process -- resume normal operation */
       return;
   }
 }
@@ -195,7 +197,9 @@ BOOL ConnectToServer(char *host, int port)
     if (!host)
     {
       printf("No rocksndiamonds server on localhost - starting up one ...\n");
-      startserver();
+
+      InitNetworkServer(port);
+
       for (i=0; i<6; i++)
       {
        u_sleep(500000);
@@ -217,29 +221,67 @@ BOOL ConnectToServer(char *host, int port)
   return(TRUE);
 }
 
-void SendNicknameToServer(char *nickname)
+void SendToServer_Nickname(char *nickname)
 {
   static char msgbuf[300];
 
-  buf[1] = OP_NICK;
+  buf[1] = OP_NICKNAME;
   memcpy(&buf[2], nickname, strlen(nickname));
   sendbuf(2 + strlen(nickname));
   sprintf(msgbuf, "you set your nick to \"%s\"", nickname);
   sysmsg(msgbuf);
 }
 
-void SendProtocolVersionToServer()
+void SendToServer_ProtocolVersion()
 {
-  buf[1] = OP_VERSION;
+  buf[1] = OP_PROTOCOL_VERSION;
   buf[2] = PROT_VERS_1;
   buf[3] = PROT_VERS_2;
   buf[4] = PROT_VERS_3;
+
   sendbuf(5);
 }
 
+void SendToServer_NrWanted(int nr_wanted)
+{
+  buf[1] = OP_NUMBER_WANTED;
+  buf[2] = nr_wanted;
+
+  sendbuf(3);
+}
+
+void SendToServer_StartPlaying()
+{
+  unsigned long new_random_seed = InitRND(NEW_RANDOMIZE);
+
+  buf[1] = OP_START_PLAYING;
+  buf[2] = (byte)(level_nr >> 8);
+  buf[3] = (byte)(level_nr & 0xff);
+  buf[4] = (byte)(leveldir_nr >> 8);
+  buf[5] = (byte)(leveldir_nr & 0xff);
+
+  buf[6] = (unsigned char)((new_random_seed >> 24) & 0xff);
+  buf[7] = (unsigned char)((new_random_seed >> 16) & 0xff);
+  buf[8] = (unsigned char)((new_random_seed >>  8) & 0xff);
+  buf[9] = (unsigned char)((new_random_seed >>  0) & 0xff);
+
+  strcpy(&buf[10], leveldir[leveldir_nr].name);
+
+  sendbuf(10 + strlen(leveldir[leveldir_nr].name)+1);
+}
+
+void SendToServer_MovePlayer(byte player_action)
+{
+  buf[1] = OP_MOVE_FIGURE;
+  buf[2] = player_action;
+
+  sendbuf(3);
+}
+
 void handlemessages()
 {
   unsigned int len;
+  struct user *u, *v = NULL;
   static char msgbuf[300];
 
   while (nread >= 4 && nread >= 4 + readbuf[3])
@@ -254,36 +296,210 @@ void handlemessages()
 
     switch(buf[1])
     {
-      case OP_YOUARE:
-       printf("OP_YOUARE: %d\n", buf[0]);
+      case OP_YOUR_NUMBER:
+      {
+       int new_client_nr = buf[2];
+       int new_index_nr = new_client_nr - 1;
+
+       printf("OP_YOUR_NUMBER: %d\n", buf[0]);
+       me.nr = new_client_nr;
+
+       stored_player[new_index_nr] = *local_player;
+       local_player = &stored_player[new_index_nr];
+
+       TestPlayer = new_index_nr;
+
+       if (me.nr > MAX_PLAYERS)
+         Error(ERR_EXIT, "sorry - no more than %d players", MAX_PLAYERS);
+
+       sprintf(msgbuf, "you get client # %d", new_client_nr);
+       sysmsg(msgbuf);
+
+       break;
+      }
+
+      case OP_NUMBER_WANTED:
+      {
+       int client_nr_wanted = buf[2];
+       int new_client_nr = buf[3];
+       int new_index_nr = new_client_nr - 1;
+
+       printf("OP_NUMBER_WANTED: %d\n", buf[0]);
+
+       if (new_client_nr != client_nr_wanted)
+       {
+         char *color[] = { "yellow", "red", "green", "blue" };
+
+         sprintf(msgbuf, "Sorry ! You are %s player !",
+                 color[new_index_nr]);
+         Request(msgbuf, REQ_CONFIRM);
+
+         sprintf(msgbuf, "cannot switch -- you keep client # %d",
+                 new_client_nr);
+         sysmsg(msgbuf);
+       }
+       else
+       {
+         if (me.nr != client_nr_wanted)
+           sprintf(msgbuf, "switching to client # %d", new_client_nr);
+         else
+           sprintf(msgbuf, "keeping client # %d", new_client_nr);
+         sysmsg(msgbuf);
+
+         me.nr = new_client_nr;
+
+         stored_player[new_index_nr] = *local_player;
+         local_player = &stored_player[new_index_nr];
+
+         TestPlayer = new_index_nr;
+       }
+
        break;
+      }
 
-      case OP_NEW:
-       printf("OP_NEW: %d\n", buf[0]);
+      case OP_PLAYER_CONNECTED:
+       printf("OP_PLAYER_CONNECTED: %d\n", buf[0]);
        sprintf(msgbuf, "new client %d connected", buf[0]);
        sysmsg(msgbuf);
+
+       for (u = &me; u; u = u->next)
+       {
+         if (u->nr == buf[0])
+           Error(ERR_EXIT, "multiplayer server sent duplicate player id");
+         else
+           v = u;
+       }
+
+       v->next = u = mmalloc(sizeof(struct user));
+       u->nr = buf[0];
+       u->name[0] = '\0';
+       u->next = NULL;
+
+       break;
+
+      case OP_NICKNAME:
+       printf("OP_NICKNAME: %d\n", buf[0]);
+       u = finduser(buf[0]);
+       buf[len] = 0;
+       sprintf(msgbuf, "client %d calls itself \"%s\"", buf[0], &buf[2]);
+       sysmsg(msgbuf);
+       strncpy(u->name, &buf[2], MAXNICKLEN);
        break;
       
       case OP_GONE:
        printf("OP_GONE: %d\n", buf[0]);
-       sprintf(msgbuf, "client %d disconnected", buf[0]);
+       u = finduser(buf[0]);
+       sprintf(msgbuf, "client %d (%s) disconnected",
+               buf[0], get_user_name(buf[0]));
+       sysmsg(msgbuf);
+
+       for (v = &me; v; v = v->next)
+         if (v->next == u)
+           v->next = u->next;
+       free(u);
+
+       break;
+
+      case OP_BAD_PROTOCOL_VERSION:
+       Error(ERR_RETURN, "protocol version mismatch");
+       Error(ERR_EXIT, "server expects %d.%d.x instead of %d.%d.%d",
+             buf[2], buf[3], PROT_VERS_1, PROT_VERS_2, PROT_VERS_3);
+       break;
+
+      case OP_START_PLAYING:
+      {
+       int new_level_nr, new_leveldir_nr;
+       unsigned long new_random_seed;
+       unsigned char *new_leveldir_name;
+
+       /*
+       if (game_status == PLAYING)
+         break;
+       */
+
+       new_level_nr = (buf[2] << 8) + buf[3];
+       new_leveldir_nr = (buf[4] << 8) + buf[5];
+       new_random_seed =
+         (buf[6] << 24) | (buf[7] << 16) | (buf[8] << 8) | (buf[9]);
+       new_leveldir_name = &buf[10];
+
+       printf("OP_START_PLAYING: %d\n", buf[0]);
+       sprintf(msgbuf, "client %d starts game [level %d from levedir %d (%s)]\n",
+               buf[0],
+               new_level_nr,
+               new_leveldir_nr,
+               new_leveldir_name);
        sysmsg(msgbuf);
+
+
+       if (strcmp(leveldir[new_leveldir_nr].name, new_leveldir_name) != 0)
+         Error(ERR_RETURN, "no such level directory: '%s'",new_leveldir_name);
+
+       leveldir_nr = new_leveldir_nr;
+
+       local_player->leveldir_nr = leveldir_nr;
+       LoadPlayerInfo(PLAYER_LEVEL);
+       SavePlayerInfo(PLAYER_SETUP);
+
+       level_nr = new_level_nr;
+
+       TapeErase();
+       LoadLevelTape(level_nr);
+
+       GetPlayerConfig();
+       LoadLevel(level_nr);
+
+       /*
+       if (autorecord_on)
+         TapeStartRecording();
+       */
+
+       if (tape.recording)
+         tape.random_seed = new_random_seed;
+
+       InitRND(new_random_seed);
+
+
+       /*
+       printf("tape.random_seed == %d\n", tape.random_seed);
+       */
+
+       game_status = PLAYING;
+       InitGame();
+
        break;
+      }
+
+      case OP_MOVE_FIGURE:
+      {
+       int frame_nr;
+       int i;
+
+       frame_nr =
+         (buf[2] << 24) | (buf[3] << 16) | (buf[4] << 8) | (buf[5]);
 
-      case OP_BADVERS:
+       if (frame_nr != FrameCounter)
        {
-         static char tmpbuf[128];
+         Error(ERR_RETURN, "client and servers frame counters out of sync");
+         Error(ERR_RETURN, "frame counter of client is %d", FrameCounter);
+         Error(ERR_RETURN, "frame counter of server is %d", frame_nr);
+         Error(ERR_EXIT,   "this should not happen -- please debug");
+       }
 
-         sprintf(tmpbuf, "Protocol version mismatch: server expects %d.%d.x instead of %d.%d.%d\n", buf[2], buf[3], PROT_VERS_1, PROT_VERS_2, PROT_VERS_3);
-         fatal(tmpbuf);
+       for (i=0; i<MAX_PLAYERS; i++)
+       {
+         if (stored_player[i].active)
+           network_player_action[i] = buf[6 + i];
        }
-       break;
-      
-      case OP_PLAY:
-       printf("OP_PLAY: %d\n", buf[0]);
-       sprintf(msgbuf, "client %d starts game", buf[0]);
+
+       network_player_action_received = TRUE;
+
+       sprintf(msgbuf, "frame %d: client %d moves player [0x%02x]",
+               FrameCounter, buf[0], buf[2]);
        sysmsg(msgbuf);
+
        break;
+      }
 
       case OP_PAUSE:
        printf("OP_PAUSE: %d\n", buf[0]);
@@ -309,12 +525,6 @@ void handlemessages()
        sysmsg(msgbuf);
        break;
 
-      case OP_NICK:
-       printf("OP_NICK: %d\n", buf[0]);
-        sprintf(msgbuf, "client %d calls itself \"%s\"", buf[0], &buf[2]);
-        sysmsg(msgbuf);
-       break;
-
       case OP_MSG:
        printf("OP_MSG: %d\n", buf[0]);
        sprintf(msgbuf, "client %d sends message", buf[0]);
@@ -364,7 +574,7 @@ void HandleNetworking()
   {
     int r;
 
-    r = read(sfd, readbuf + nread, BUFLEN - nread);
+    r = read(sfd, readbuf + nread, MAX_BUFFER_SIZE - nread);
 
     if (r < 0)
       fatal("Error reading from server");