improved screen output text when trying to connect to network server
[rocksndiamonds.git] / src / network.c
1 // ============================================================================
2 // Rocks'n'Diamonds - McDuffin Strikes Back!
3 // ----------------------------------------------------------------------------
4 // (c) 1995-2014 by Artsoft Entertainment
5 //                  Holger Schemel
6 //                  info@artsoft.org
7 //                  http://www.artsoft.org/
8 // ----------------------------------------------------------------------------
9 // network.c
10 // ============================================================================
11
12 #include <signal.h>
13 #include <sys/time.h>
14
15 #include "libgame/libgame.h"
16
17 #include "network.h"
18 #include "netserv.h"
19 #include "main.h"
20 #include "game.h"
21 #include "tape.h"
22 #include "files.h"
23 #include "tools.h"
24 #include "screens.h"
25 #include "init.h"
26
27 struct NetworkClientPlayerInfo
28 {
29   byte nr;
30   char name[MAX_PLAYER_NAME_LEN + 1];
31   struct NetworkClientPlayerInfo *next;
32 };
33
34 static struct NetworkClientPlayerInfo first_player =
35 {
36   0,
37   EMPTY_PLAYER_NAME,
38   NULL
39 };
40
41 /* server stuff */
42
43 static TCPsocket sfd;           /* TCP server socket */
44 static UDPsocket udp;           /* UDP server socket */
45 static SDLNet_SocketSet rfds;   /* socket set */
46
47 static struct NetworkBuffer *read_buffer = NULL;
48 static struct NetworkBuffer *write_buffer = NULL;
49
50 static boolean stop_network_game = FALSE;
51 static boolean stop_network_client = FALSE;
52 static char stop_network_client_message[MAX_OUTPUT_LINESIZE + 1];
53
54 static struct NetworkLevelInfo network_level;
55
56 static void DrawNetworkTextExt(char *message, int font_nr, boolean initialize)
57 {
58   static int xpos = 0, ypos = 0;
59   static int max_line_width = 0;
60   int font_width = getFontWidth(font_nr);
61   int font_height = getFontHeight(font_nr);
62   int ypos_1 = 120;
63   int ypos_2 = 150;
64
65   if (initialize)
66   {
67     if (game_status == GAME_MODE_LOADING)
68     {
69       max_line_width = WIN_XSIZE;
70
71       xpos = (max_line_width - getTextWidth(message, font_nr)) / 2;
72       ypos = ypos_1;
73
74       DrawText(xpos, ypos, message, font_nr);
75
76       xpos = 0;
77       ypos = ypos_2;
78     }
79     else
80     {
81       max_line_width = SXSIZE;
82
83       DrawTextSCentered(ypos_1, font_nr, message);
84
85       /* calculate offset to x position caused by rounding */
86       int max_chars_per_line = max_line_width / font_width;
87       int xoffset = (max_line_width - max_chars_per_line * font_width) / 2;
88
89       xpos = SX + xoffset;
90       ypos = SY + ypos_2;
91     }
92
93     Error(ERR_DEBUG, "========== %s ==========", message);
94   }
95   else
96   {
97     int max_chars_per_line = max_line_width / font_width;
98     int max_lines_per_text = 10;
99     int num_lines_spacing = (font_nr == FC_YELLOW ? 1 : 3);
100     int num_lines_printed = DrawTextBuffer(xpos, ypos, message, font_nr,
101                                            max_chars_per_line, -1,
102                                            max_lines_per_text, 0, -1,
103                                            TRUE, TRUE, FALSE);
104
105     ypos += (num_lines_printed + num_lines_spacing) * font_height;
106
107     Error(ERR_DEBUG, "%s", message);
108   }
109
110   BackToFront();
111 }
112
113 static void DrawNetworkText(char *message)
114 {
115   DrawNetworkTextExt(message, FC_YELLOW, FALSE);
116 }
117
118 static void DrawNetworkText_Success(char *message)
119 {
120   DrawNetworkTextExt(message, FC_GREEN, FALSE);
121 }
122
123 static void DrawNetworkText_Failed(char *message)
124 {
125   DrawNetworkTextExt(message, FC_RED, FALSE);
126 }
127
128 static void DrawNetworkText_Title(char *message)
129 {
130   DrawNetworkTextExt(message, FC_GREEN, TRUE);
131 }
132
133 static void SendNetworkBufferToServer(struct NetworkBuffer *nb)
134 {
135   if (!network.enabled)
136     return;
137
138   /* set message length header */
139   putNetwork32BitInteger(nb->buffer, nb->size - 4);
140
141   /* directly send the buffer to the network server */
142   SDLNet_TCP_Send(sfd, nb->buffer, nb->size);
143 }
144
145 static struct NetworkClientPlayerInfo *getNetworkPlayer(int player_nr)
146 {
147   struct NetworkClientPlayerInfo *player = NULL;
148
149   for (player = &first_player; player; player = player->next)
150     if (player->nr == player_nr)
151       break;
152
153   if (player == NULL)   /* should not happen */
154     Error(ERR_EXIT, "protocol error: reference to non-existing player %d",
155           player_nr);
156
157   return player;
158 }
159
160 char *getNetworkPlayerName(int player_nr)
161 {
162   struct NetworkClientPlayerInfo *player;
163
164   if (player_nr == 0)
165     return("the network game server");
166   else if (player_nr == first_player.nr)
167     return("you");
168   else
169     for (player = &first_player; player; player = player->next)
170       if (player->nr == player_nr && strlen(player->name) > 0)
171         return(player->name);
172
173   return(EMPTY_PLAYER_NAME);
174 }
175
176 static boolean hasPathSeparator(char *s)
177 {
178   return (strchr(s, '/') != NULL);
179 }
180
181 static void StartNetworkServer(int port)
182 {
183   static int p;
184
185   p = port;
186 #if defined(TARGET_SDL2)
187   server_thread = SDL_CreateThread(NetworkServerThread,
188                                    "NetworkServerThread", &p);
189 #else
190   server_thread = SDL_CreateThread(NetworkServerThread, &p);
191 #endif
192   network_server = TRUE;
193 }
194
195 boolean ConnectToServer(char *hostname, int port)
196 {
197   IPaddress ip;
198   int server_host = 0;
199   int i;
200
201   if (read_buffer == NULL)
202     read_buffer = newNetworkBuffer();
203
204   if (write_buffer == NULL)
205     write_buffer = newNetworkBuffer();
206
207   DrawNetworkText_Title("Initializing Network");
208
209   if (port == 0)
210     port = DEFAULT_SERVER_PORT;
211
212   if (hostname == NULL)
213   {
214     // if no hostname given, try to auto-detect network server in local network
215     // by doing a UDP broadcast on the network server port and wait for answer
216
217     SDLNet_SocketSet udp_socket_set = SDLNet_AllocSocketSet(1);
218     if (!udp_socket_set)
219       Error(ERR_EXIT, "SDLNet_AllocSocketSet() failed: %s"), SDLNet_GetError();
220
221     udp = SDLNet_UDP_Open(0);
222     if(!udp)
223       Error(ERR_EXIT, "SDLNet_UDP_Open() failed: %s", SDLNet_GetError());
224
225     if (SDLNet_UDP_AddSocket(udp_socket_set, udp) == -1)
226       Error(ERR_EXIT_NETWORK_SERVER, "SDLNet_TCP_AddSocket() failed: %s"),
227         SDLNet_GetError();
228
229     char *data_ptr = "network server UDB broadcast";
230     int data_len = strlen(data_ptr) + 1;
231     IPaddress ip_address;
232
233     SDLNet_Write32(0xffffffff, &ip_address.host);       /* 255.255.255.255 */
234     SDLNet_Write16(port,       &ip_address.port);
235
236     UDPpacket packet =
237     {
238       -1,
239       (Uint8 *)data_ptr,
240       data_len,
241       data_len,
242       0,
243       ip_address
244     };
245
246     SDLNet_UDP_Send(udp, -1, &packet);
247
248     DrawNetworkText("Looking for nearby network server ...");
249
250     /* wait for any nearby network server to answer UDP broadcast */
251     for (i = 0; i < 5; i++)
252     {
253       if (SDLNet_CheckSockets(udp_socket_set, 0) == 1)
254       {
255         int num_packets = SDLNet_UDP_Recv(udp, &packet);
256
257         if (num_packets == 1)
258         {
259           char message[100];
260
261           server_host = SDLNet_Read32(&packet.address.host);
262
263           sprintf(message, "Network server found at %d.%d.%d.%d!",
264                   (server_host >> 24) & 0xff,
265                   (server_host >> 16) & 0xff,
266                   (server_host >>  8) & 0xff,
267                   (server_host >>  0) & 0xff);
268
269           DrawNetworkText_Success(message);
270         }
271         else
272         {
273           DrawNetworkText_Failed("No answer from network server!");
274         }
275
276         break;
277       }
278       else
279       {
280         Delay_WithScreenUpdates(100);
281       }
282     }
283
284     if (server_host == 0)
285       DrawNetworkText_Failed("No nearby network server found!");
286   }
287
288   rfds = SDLNet_AllocSocketSet(1);
289
290   if (hostname)
291   {
292     char message[100];
293
294     SDLNet_ResolveHost(&ip, hostname, port);
295
296     if (ip.host == INADDR_NONE)
297     {
298       sprintf(message, "Failed to resolve network server hostname '%s'!",
299               hostname);
300
301       DrawNetworkText_Failed(message);
302
303       return FALSE;
304     }
305     else
306     {
307       server_host = SDLNet_Read32(&ip.host);
308     }
309
310     sprintf(message, "Connecting to network server host %s ...", hostname);
311
312     DrawNetworkText(message);
313   }
314   else
315   {
316     // if no hostname was given and no network server was auto-detected in the
317     // local network, try to connect to a network server at the local host
318     if (server_host == 0)
319     {
320       server_host = 0x7f000001;                 /* 127.0.0.1 */
321
322       DrawNetworkText("Looking for local network server ...");
323     }
324     else
325     {
326       DrawNetworkText("Connecting to network server ...");
327     }
328
329     SDLNet_Write32(server_host, &ip.host);
330     SDLNet_Write16(port,        &ip.port);
331   }
332
333   Error(ERR_DEBUG, "trying to connect to network server at %d.%d.%d.%d ...",
334         (server_host >> 24) & 0xff,
335         (server_host >> 16) & 0xff,
336         (server_host >>  8) & 0xff,
337         (server_host >>  0) & 0xff);
338
339   sfd = SDLNet_TCP_Open(&ip);
340
341   if (sfd)
342   {
343     SDLNet_TCP_AddSocket(rfds, sfd);
344
345     DrawNetworkText_Success("Successfully connected!");
346
347     return TRUE;
348   }
349   else
350   {
351     if (hostname)
352       DrawNetworkText_Failed("Failed to connect to network server!");
353     else
354       DrawNetworkText_Failed("No local network server found!");
355
356     printf("SDLNet_TCP_Open(): %s\n", SDLNet_GetError());
357   }
358
359   if (hostname)                 /* connect to specified server failed */
360     return FALSE;
361
362   DrawNetworkText("Starting new local network server ...");
363
364   StartNetworkServer(port);
365
366   /* wait for server to start up and try connecting several times */
367   for (i = 0; i < 30; i++)
368   {
369     if ((sfd = SDLNet_TCP_Open(&ip)))           /* connected */
370     {
371       DrawNetworkText_Success("Successfully connected to newly started network server!");
372
373       SDLNet_TCP_AddSocket(rfds, sfd);
374
375       return TRUE;
376     }
377
378     Delay_WithScreenUpdates(100);
379   }
380
381   DrawNetworkText_Failed("Failed to connect to newly started network server!");
382
383   /* when reaching this point, connect to newly started server has failed */
384   return FALSE;
385 }
386
387 void SendToServer_PlayerName(char *player_name)
388 {
389   initNetworkBufferForWriting(write_buffer, OP_PLAYER_NAME, 0);
390
391   putNetworkBufferString(write_buffer, player_name);
392
393   SendNetworkBufferToServer(write_buffer);
394
395   Error(ERR_NETWORK_CLIENT, "you set your player name to \"%s\"", player_name);
396 }
397
398 void SendToServer_ProtocolVersion(void)
399 {
400   initNetworkBufferForWriting(write_buffer, OP_PROTOCOL_VERSION, 0);
401
402   putNetworkBuffer8BitInteger(write_buffer, PROTOCOL_VERSION_MAJOR);
403   putNetworkBuffer8BitInteger(write_buffer, PROTOCOL_VERSION_MINOR);
404   putNetworkBuffer8BitInteger(write_buffer, PROTOCOL_VERSION_PATCH);
405
406   SendNetworkBufferToServer(write_buffer);
407 }
408
409 void SendToServer_NrWanted(int nr_wanted)
410 {
411   initNetworkBufferForWriting(write_buffer, OP_NUMBER_WANTED, 0);
412
413   putNetworkBuffer8BitInteger(write_buffer, nr_wanted);
414
415   SendNetworkBufferToServer(write_buffer);
416 }
417
418 void SendToServer_LevelFile(void)
419 {
420   initNetworkBufferForWriting(write_buffer, OP_LEVEL_FILE, 0);
421
422   putNetworkBufferString(      write_buffer, leveldir_current->identifier);
423   putNetworkBuffer16BitInteger(write_buffer, level.file_info.nr);
424   putNetworkBuffer8BitInteger( write_buffer, level.file_info.type);
425   putNetworkBuffer8BitInteger( write_buffer, level.file_info.packed);
426   putNetworkBufferString(      write_buffer, level.file_info.basename);
427   putNetworkBufferFile(        write_buffer, level.file_info.filename);
428   putNetworkBuffer8BitInteger( write_buffer, level.use_custom_template);
429
430   if (level.use_custom_template)
431   {
432     putNetworkBufferString(write_buffer, level_template.file_info.basename);
433     putNetworkBufferFile(  write_buffer, level_template.file_info.filename);
434   }
435
436   SendNetworkBufferToServer(write_buffer);
437
438   setString(&network_level.leveldir_identifier, leveldir_current->identifier);
439
440   /* the sending client does not use network level files (but the real ones) */
441   network_level.use_network_level_files = FALSE;
442
443 #if 0
444   printf("::: '%s'\n", leveldir_current->identifier);
445   printf("::: '%d'\n", level.file_info.nr);
446   printf("::: '%d'\n", level.file_info.type);
447   printf("::: '%d'\n", level.file_info.packed);
448   printf("::: '%s'\n", level.file_info.basename);
449   printf("::: '%s'\n", level.file_info.filename);
450
451   if (level.use_custom_template)
452     printf("::: '%s'\n", level_template.file_info.filename);
453 #endif
454 }
455
456 void SendToServer_StartPlaying(void)
457 {
458   unsigned int new_random_seed = InitRND(level.random_seed);
459
460   initNetworkBufferForWriting(write_buffer, OP_START_PLAYING, 0);
461
462   putNetworkBufferString(      write_buffer, leveldir_current->identifier);
463   putNetworkBuffer16BitInteger(write_buffer, level_nr);
464   putNetworkBuffer32BitInteger(write_buffer, new_random_seed);
465
466   SendNetworkBufferToServer(write_buffer);
467 }
468
469 void SendToServer_PausePlaying(void)
470 {
471   initNetworkBufferForWriting(write_buffer, OP_PAUSE_PLAYING, 0);
472
473   SendNetworkBufferToServer(write_buffer);
474 }
475
476 void SendToServer_ContinuePlaying(void)
477 {
478   initNetworkBufferForWriting(write_buffer, OP_CONTINUE_PLAYING, 0);
479
480   SendNetworkBufferToServer(write_buffer);
481 }
482
483 void SendToServer_StopPlaying(int cause_for_stopping)
484 {
485   initNetworkBufferForWriting(write_buffer, OP_STOP_PLAYING, 0);
486
487   putNetworkBuffer8BitInteger(write_buffer, cause_for_stopping);
488
489   SendNetworkBufferToServer(write_buffer);
490 }
491
492 void SendToServer_MovePlayer(byte player_action)
493 {
494   initNetworkBufferForWriting(write_buffer, OP_MOVE_PLAYER, 0);
495
496   putNetworkBuffer8BitInteger(write_buffer, player_action);
497
498   SendNetworkBufferToServer(write_buffer);
499 }
500
501 static void Handle_OP_BAD_PROTOCOL_VERSION(void)
502 {
503   int protocol_version_major = getNetworkBuffer8BitInteger(read_buffer);
504   int protocol_version_minor = getNetworkBuffer8BitInteger(read_buffer);
505
506   Error(ERR_WARN, "protocol version mismatch");
507   Error(ERR_WARN, "server expects %d.%d.x instead of %d.%d.%d",
508         protocol_version_major,
509         protocol_version_minor,
510         PROTOCOL_VERSION_MAJOR,
511         PROTOCOL_VERSION_MINOR,
512         PROTOCOL_VERSION_PATCH);
513
514   sprintf(stop_network_client_message, "Network protocol version mismatch! Server expects version %d.%d.x instead of %d.%d.%d!",
515           protocol_version_major,
516           protocol_version_minor,
517           PROTOCOL_VERSION_MAJOR,
518           PROTOCOL_VERSION_MINOR,
519           PROTOCOL_VERSION_PATCH);
520
521   stop_network_client = TRUE;
522 }
523
524 static void Handle_OP_YOUR_NUMBER(void)
525 {
526   int old_client_nr = getNetworkBuffer8BitInteger(read_buffer);
527   int new_client_nr = getNetworkBuffer8BitInteger(read_buffer);
528   int new_index_nr = new_client_nr - 1;
529   struct PlayerInfo *old_local_player = local_player;
530   struct PlayerInfo *new_local_player = &stored_player[new_index_nr];
531
532   printf("OP_YOUR_NUMBER: %d\n", old_client_nr);
533   first_player.nr = new_client_nr;
534
535   if (old_local_player != new_local_player)
536   {
537     /* set relevant player settings and change to new player */
538
539     local_player = new_local_player;
540
541     old_local_player->connected_locally = FALSE;
542     new_local_player->connected_locally = TRUE;
543
544     old_local_player->connected_network = FALSE;
545     new_local_player->connected_network = TRUE;
546   }
547
548   if (first_player.nr > MAX_PLAYERS)
549     Error(ERR_EXIT, "sorry, more than %d players not allowed", MAX_PLAYERS);
550
551   Error(ERR_NETWORK_CLIENT, "you get client # %d", new_client_nr);
552
553   stored_player[new_index_nr].connected_network = TRUE;
554 }
555
556 static void Handle_OP_NUMBER_WANTED(void)
557 {
558   int old_client_nr    = getNetworkBuffer8BitInteger(read_buffer);
559   int client_nr_wanted = getNetworkBuffer8BitInteger(read_buffer);
560   int new_client_nr    = getNetworkBuffer8BitInteger(read_buffer);
561   int old_index_nr = old_client_nr - 1;
562   int new_index_nr = new_client_nr - 1;
563   int index_nr_wanted = client_nr_wanted - 1;
564   struct PlayerInfo *old_player = &stored_player[old_index_nr];
565   struct PlayerInfo *new_player = &stored_player[new_index_nr];
566
567   printf("OP_NUMBER_WANTED: %d\n", old_client_nr);
568
569   if (new_client_nr == client_nr_wanted)        /* switching succeeded */
570   {
571     struct NetworkClientPlayerInfo *player;
572
573     if (old_client_nr != client_nr_wanted)      /* client's nr has changed */
574       Error(ERR_NETWORK_CLIENT, "client %d switches to # %d",
575             old_client_nr, new_client_nr);
576     else if (old_client_nr == first_player.nr)  /* local player keeps his nr */
577       Error(ERR_NETWORK_CLIENT, "keeping client # %d", new_client_nr);
578
579     if (old_client_nr != new_client_nr)
580     {
581       /* set relevant player settings and change to new player */
582
583       old_player->connected_network = FALSE;
584       new_player->connected_network = TRUE;
585     }
586
587     player = getNetworkPlayer(old_client_nr);
588     player->nr = new_client_nr;
589
590     if (old_player == local_player)             /* local player switched */
591     {
592       local_player = new_player;
593
594       old_player->connected_locally = FALSE;
595       new_player->connected_locally = TRUE;
596     }
597   }
598   else if (old_client_nr == first_player.nr)    /* failed -- local player? */
599   {
600     char request[100];
601
602     sprintf(request, "Sorry! Player %d already exists! You are player %d!",
603             index_nr_wanted + 1, new_index_nr + 1);
604
605     Request(request, REQ_CONFIRM);
606
607     Error(ERR_NETWORK_CLIENT, "cannot switch -- you keep client # %d",
608           new_client_nr);
609   }
610
611   if (game_status == GAME_MODE_MAIN)
612     DrawNetworkPlayers();
613 }
614
615 static void Handle_OP_PLAYER_NAME(void)
616 {
617   int player_nr = getNetworkBuffer8BitInteger(read_buffer);
618   char *player_name = getNetworkBufferString(read_buffer);
619   struct NetworkClientPlayerInfo *player = getNetworkPlayer(player_nr);
620
621   printf("OP_PLAYER_NAME: %d\n", player_nr);
622
623   strncpy(player->name, player_name, MAX_PLAYER_NAME_LEN);
624   player->name[MAX_PLAYER_NAME_LEN] = '\0';
625
626   Error(ERR_NETWORK_CLIENT, "client %d calls itself \"%s\"",
627         player_nr, player->name);
628 }
629
630 static void Handle_OP_PLAYER_CONNECTED(void)
631 {
632   struct NetworkClientPlayerInfo *player, *last_player = NULL;
633   int new_client_nr = getNetworkBuffer8BitInteger(read_buffer);
634   int new_index_nr = new_client_nr - 1;
635
636   printf("OP_PLAYER_CONNECTED: %d\n", new_client_nr);
637   Error(ERR_NETWORK_CLIENT, "new client %d connected", new_client_nr);
638
639   for (player = &first_player; player; player = player->next)
640   {
641     if (player->nr == new_client_nr)
642       Error(ERR_EXIT, "multiplayer server sent duplicate player id");
643
644     last_player = player;
645   }
646
647   last_player->next = player =
648     checked_malloc(sizeof(struct NetworkClientPlayerInfo));
649   player->nr = new_client_nr;
650   player->name[0] = '\0';
651   player->next = NULL;
652
653   stored_player[new_index_nr].connected_network = TRUE;
654 }
655
656 static void Handle_OP_PLAYER_DISCONNECTED(void)
657 {
658   struct NetworkClientPlayerInfo *player, *player_disconnected;
659   int player_nr = getNetworkBuffer8BitInteger(read_buffer);
660   int index_nr = player_nr - 1;
661
662   printf("OP_PLAYER_DISCONNECTED: %d\n", player_nr);
663   player_disconnected = getNetworkPlayer(player_nr);
664   Error(ERR_NETWORK_CLIENT, "client %d (%s) disconnected",
665         player_nr, getNetworkPlayerName(player_nr));
666
667   for (player = &first_player; player; player = player->next)
668     if (player->next == player_disconnected)
669       player->next = player_disconnected->next;
670   free(player_disconnected);
671
672   stored_player[index_nr].connected_locally = FALSE;
673   stored_player[index_nr].connected_network = FALSE;
674
675   if (game_status == GAME_MODE_PLAYING)
676   {
677     char message[100];
678
679     sprintf(message, "Player %d left network server! Network game stopped!",
680             player_nr);
681
682     Request(message, REQ_CONFIRM | REQ_STAY_CLOSED);
683
684     SetGameStatus(GAME_MODE_MAIN);
685
686     DrawMainMenu();
687   }
688   else if (game_status == GAME_MODE_MAIN)
689   {
690     DrawNetworkPlayers();
691   }
692 }
693
694 static void Handle_OP_START_PLAYING(void)
695 {
696   int player_nr = getNetworkBuffer8BitInteger(read_buffer);
697   char *new_leveldir_identifier = getNetworkBufferString(read_buffer);
698   int new_level_nr = getNetworkBuffer16BitInteger(read_buffer);
699   unsigned int new_random_seed = getNetworkBuffer32BitInteger(read_buffer);
700
701   if (!strEqual(new_leveldir_identifier, network_level.leveldir_identifier))
702   {
703     Error(ERR_WARN, "no such level identifier: '%s'", new_leveldir_identifier);
704
705     stop_network_game = TRUE;
706
707     return;
708   }
709
710   printf("OP_START_PLAYING: %d\n", player_nr);
711   Error(ERR_NETWORK_CLIENT,
712         "client %d starts game [level %d from level identifier '%s']\n",
713         player_nr, new_level_nr, new_leveldir_identifier);
714
715   LevelDirTree *new_leveldir =
716     getTreeInfoFromIdentifier(leveldir_first, new_leveldir_identifier);
717
718   if (new_leveldir != NULL)
719   {
720     leveldir_current = new_leveldir;
721     level_nr = new_level_nr;
722   }
723
724   /* needed if level set of network game changed graphics, sounds or music */
725   ReloadCustomArtwork(0);
726
727   TapeErase();
728
729   if (network_level.use_network_level_files)
730     LoadNetworkLevel(&network_level);
731   else
732     LoadLevel(level_nr);
733
734   StartGameActions(FALSE, setup.autorecord, new_random_seed);
735 }
736
737 static void Handle_OP_PAUSE_PLAYING(void)
738 {
739   int player_nr = getNetworkBuffer8BitInteger(read_buffer);
740
741   printf("OP_PAUSE_PLAYING: %d\n", player_nr);
742   Error(ERR_NETWORK_CLIENT, "client %d pauses game", player_nr);
743
744   if (game_status == GAME_MODE_PLAYING)
745   {
746     tape.pausing = TRUE;
747     DrawVideoDisplay(VIDEO_STATE_PAUSE_ON, 0);
748   }
749 }
750
751 static void Handle_OP_CONTINUE_PLAYING(void)
752 {
753   int player_nr = getNetworkBuffer8BitInteger(read_buffer);
754
755   printf("OP_CONTINUE_PLAYING: %d\n", player_nr);
756   Error(ERR_NETWORK_CLIENT, "client %d continues game", player_nr);
757
758   if (game_status == GAME_MODE_PLAYING)
759   {
760     tape.pausing = FALSE;
761     DrawVideoDisplay(VIDEO_STATE_PAUSE_OFF, 0);
762   }
763 }
764
765 static void Handle_OP_STOP_PLAYING(void)
766 {
767   int client_nr = getNetworkBuffer8BitInteger(read_buffer);
768   int cause_for_stopping = getNetworkBuffer8BitInteger(read_buffer);
769
770   printf("OP_STOP_PLAYING: %d [%d]\n", client_nr, cause_for_stopping);
771   Error(ERR_NETWORK_CLIENT, "client %d stops game [%d]",
772         client_nr, cause_for_stopping);
773
774   if (game_status == GAME_MODE_PLAYING)
775   {
776     int index_nr = client_nr - 1;
777     struct PlayerInfo *client_player = &stored_player[index_nr];
778     boolean stopped_by_remote_player = (!client_player->connected_locally);
779     char message[100];
780
781     if (cause_for_stopping == NETWORK_STOP_BY_PLAYER)
782       sprintf(message, "Network game stopped by player %d!", client_nr);
783     else
784       sprintf(message, (cause_for_stopping == NETWORK_STOP_BY_ERROR ?
785                         "Network game stopped due to internal error!" :
786                         "Network game stopped!"));
787
788     if (cause_for_stopping != NETWORK_STOP_BY_PLAYER ||
789         stopped_by_remote_player)
790       Request(message, REQ_CONFIRM | REQ_STAY_CLOSED);
791
792     SetGameStatus(GAME_MODE_MAIN);
793
794     DrawMainMenu();
795   }
796 }
797
798 static void Handle_OP_MOVE_PLAYER(void)
799 {
800   int player_nr = getNetworkBuffer8BitInteger(read_buffer);
801   int server_frame_counter = getNetworkBuffer32BitInteger(read_buffer);
802   int i;
803
804   if (!network_playing)
805     return;
806
807   if (server_frame_counter != FrameCounter)
808   {
809     Error(ERR_INFO, "frame counters of client %d and server out of sync",
810           player_nr);
811     Error(ERR_INFO, "frame counter of client is %d", FrameCounter);
812     Error(ERR_INFO, "frame counter of server is %d", server_frame_counter);
813     Error(ERR_INFO, "this should not happen -- please debug");
814
815     stop_network_game = TRUE;
816
817     return;
818   }
819
820   /* copy valid player actions (will be set to 0 for not connected players) */
821   for (i = 0; i < MAX_PLAYERS; i++)
822     stored_player[i].effective_action =
823       getNetworkBuffer8BitInteger(read_buffer);
824
825   network_player_action_received = TRUE;
826 }
827
828 static void Handle_OP_BROADCAST_MESSAGE(void)
829 {
830   int player_nr = getNetworkBuffer8BitInteger(read_buffer);
831
832   printf("OP_BROADCAST_MESSAGE: %d\n", player_nr);
833   Error(ERR_NETWORK_CLIENT, "client %d sends message", player_nr);
834 }
835
836 static void Handle_OP_LEVEL_FILE(void)
837 {
838   int player_nr = getNetworkBuffer8BitInteger(read_buffer);
839   char *leveldir_identifier;
840   char *network_level_dir;
841   struct LevelFileInfo *file_info = &network_level.file_info;
842   struct LevelFileInfo *tmpl_info = &network_level.tmpl_info;
843   boolean use_custom_template;
844
845   setString(&network_level.leveldir_identifier, NULL);
846   setString(&network_level.file_info.basename,  NULL);
847   setString(&network_level.file_info.filename,  NULL);
848   setString(&network_level.tmpl_info.basename,  NULL);
849   setString(&network_level.tmpl_info.filename,  NULL);
850
851   printf("OP_LEVEL_FILE: %d\n", player_nr);
852
853   leveldir_identifier = getStringCopy(getNetworkBufferString(read_buffer));
854
855   if (hasPathSeparator(leveldir_identifier))
856     Error(ERR_EXIT, "protocol error: invalid filename from network client");
857
858   InitNetworkLevelDirectory(leveldir_identifier);
859
860   network_level_dir   = getNetworkLevelDir(leveldir_identifier);
861
862   file_info->nr       = getNetworkBuffer16BitInteger(read_buffer);
863   file_info->type     = getNetworkBuffer8BitInteger(read_buffer);
864   file_info->packed   = getNetworkBuffer8BitInteger(read_buffer);
865   file_info->basename = getStringCopy(getNetworkBufferString(read_buffer));
866   file_info->filename = getPath2(network_level_dir, file_info->basename);
867
868   if (hasPathSeparator(file_info->basename))
869     Error(ERR_EXIT, "protocol error: invalid filename from network client");
870
871   getNetworkBufferFile(read_buffer, file_info->filename);
872
873   use_custom_template = getNetworkBuffer8BitInteger(read_buffer);
874   if (use_custom_template)
875   {
876     *tmpl_info = *file_info;
877
878     tmpl_info->basename = getStringCopy(getNetworkBufferString(read_buffer));
879     tmpl_info->filename = getPath2(network_level_dir, tmpl_info->basename);
880
881     if (hasPathSeparator(tmpl_info->basename))
882       Error(ERR_EXIT, "protocol error: invalid filename from network client");
883
884     getNetworkBufferFile(read_buffer, tmpl_info->filename);
885   }
886
887   network_level.leveldir_identifier = leveldir_identifier;
888   network_level.use_custom_template = use_custom_template;
889
890   /* the receiving client(s) use(s) the transferred network level files */
891   network_level.use_network_level_files = TRUE;
892
893 #if 0
894   printf("::: '%s'\n", leveldir_identifier);
895   printf("::: '%d'\n", file_info->nr);
896   printf("::: '%d'\n", file_info->type);
897   printf("::: '%d'\n", file_info->packed);
898   printf("::: '%s'\n", file_info->basename);
899   printf("::: '%s'\n", file_info->filename);
900
901   if (use_custom_template)
902     printf("::: '%s'\n", tmpl_info->filename);
903 #endif
904 }
905
906 static void HandleNetworkingMessage(void)
907 {
908   stop_network_game = FALSE;
909
910   initNetworkBufferForReading(read_buffer);
911
912   int message_type = getNetworkBuffer8BitInteger(read_buffer);
913
914   switch (message_type)
915   {
916     case OP_BAD_PROTOCOL_VERSION:
917       Handle_OP_BAD_PROTOCOL_VERSION();
918       break;
919
920     case OP_YOUR_NUMBER:
921       Handle_OP_YOUR_NUMBER();
922       break;
923
924     case OP_NUMBER_WANTED:
925       Handle_OP_NUMBER_WANTED();
926       break;
927
928     case OP_PLAYER_NAME:
929       Handle_OP_PLAYER_NAME();
930       break;
931
932     case OP_PLAYER_CONNECTED:
933       Handle_OP_PLAYER_CONNECTED();
934       break;
935
936     case OP_PLAYER_DISCONNECTED:
937       Handle_OP_PLAYER_DISCONNECTED();
938       break;
939
940     case OP_START_PLAYING:
941       Handle_OP_START_PLAYING();
942       break;
943
944     case OP_PAUSE_PLAYING:
945       Handle_OP_PAUSE_PLAYING();
946       break;
947
948     case OP_CONTINUE_PLAYING:
949       Handle_OP_CONTINUE_PLAYING();
950       break;
951
952     case OP_STOP_PLAYING:
953       Handle_OP_STOP_PLAYING();
954       break;
955
956     case OP_MOVE_PLAYER:
957       Handle_OP_MOVE_PLAYER();
958       break;
959
960     case OP_BROADCAST_MESSAGE:
961       Handle_OP_BROADCAST_MESSAGE();
962       break;
963
964     case OP_LEVEL_FILE:
965       Handle_OP_LEVEL_FILE();
966       break;
967
968     default:
969       if (options.verbose)
970         Error(ERR_NETWORK_CLIENT,
971               "unknown opcode %d from server", message_type);
972   }
973
974   fflush(stdout);
975
976   /* in case of internal error, stop network game */
977   if (stop_network_game)
978     SendToServer_StopPlaying(NETWORK_STOP_BY_ERROR);
979 }
980
981 static char *HandleNetworkingPackets(void)
982 {
983   while (1)
984   {
985     /* ---------- check network server for activity ---------- */
986
987     int num_active_sockets = SDLNet_CheckSockets(rfds, 0);
988
989     if (num_active_sockets < 0)
990       return "Error checking network sockets!";
991
992     if (num_active_sockets == 0)
993       break;    // no active sockets, stop here
994
995     /* ---------- read packets from network server ---------- */
996
997     initNetworkBufferForReceiving(read_buffer);
998
999     int num_bytes = receiveNetworkBufferPacket(read_buffer, sfd);
1000
1001     if (num_bytes < 0)
1002       return "Error reading from network server!";
1003
1004     if (num_bytes == 0)
1005       return "Connection to network server lost!";
1006
1007     HandleNetworkingMessage();
1008
1009     if (stop_network_client)
1010       return stop_network_client_message;
1011   }
1012
1013   return NULL;
1014 }
1015
1016 static void FreeNetworkClientPlayerInfo(struct NetworkClientPlayerInfo *player)
1017 {
1018   if (player == NULL)
1019     return;
1020
1021   if (player->next)
1022     FreeNetworkClientPlayerInfo(player->next);
1023
1024   checked_free(player);
1025 }
1026
1027 static void HandleNetworkingDisconnect(void)
1028 {
1029   int i;
1030
1031   SDLNet_TCP_DelSocket(rfds, sfd);
1032   SDLNet_TCP_Close(sfd);
1033
1034   network_playing = FALSE;
1035
1036   network.enabled = FALSE;
1037   network.connected = FALSE;
1038
1039   setup.network_mode = FALSE;
1040
1041   for (i = 0; i < MAX_PLAYERS; i++)
1042     stored_player[i].connected_network = FALSE;
1043
1044   FreeNetworkClientPlayerInfo(first_player.next);
1045
1046   first_player.nr = 0;
1047   first_player.next = NULL;
1048 }
1049
1050 void HandleNetworking(void)
1051 {
1052   char *error_message = HandleNetworkingPackets();
1053
1054   if (error_message != NULL)
1055   {
1056     HandleNetworkingDisconnect();
1057
1058     if (game_status == GAME_MODE_PLAYING)
1059     {
1060       Request(error_message, REQ_CONFIRM | REQ_STAY_CLOSED);
1061
1062       SetGameStatus(GAME_MODE_MAIN);
1063
1064       DrawMainMenu();
1065     }
1066     else
1067     {
1068       Request(error_message, REQ_CONFIRM);
1069
1070       if (game_status == GAME_MODE_MAIN)
1071         ClearNetworkPlayers();
1072     }
1073   }
1074 }
1075
1076 void DisconnectFromNetworkServer(void)
1077 {
1078   DrawNetworkText_Title("Terminating Network");
1079   DrawNetworkText("Disconnecting from network server ...");
1080
1081   HandleNetworkingDisconnect();
1082
1083   DrawNetworkText_Success("Successfully disconnected!");
1084 }