Add .leaders command to replay map records in T5 and T6

t5/tws_t5_leaderboard.gsc

@@ -1,4 +1,4 @@
-/* tws_t5_leaderboard.gsc - private map record announcement, once per connection. */
+/* tws_t5_leaderboard.gsc - private map record announcements and .leaders replay. */
 
 #include maps\_utility;
 #include common_scripts\utility;
@@ -24,7 +24,9 @@ init()
     level.tws_lb_pending = undefined;
     level.tws_lb_cache = undefined;
     level.tws_lb_attempt = 0;
+    scripts\sp\tws_t5_common::register_help_command(".leaders", "Show the map record again");
     scripts\sp\tws_t5_common::register_connect_handler(::lb_welcome);
+    level thread lb_chat_listener();
     level thread lb_worker();
 }
 
@@ -65,6 +67,7 @@ lb_worker()
 lb_welcome()
 {
     self endon("disconnect");
+    self endon("tws_lb_requested");
     level endon("end_game");
     level endon("game_ended");
     level endon("intermission");
@@ -84,18 +87,62 @@ lb_welcome()
     while (!isDefined(level.tws_lb_cache) && level.tws_lb_attempt == 0)
         wait 0.25;
 
+    self lb_request(false);
+}
+
+lb_chat_listener()
+{
+    level endon("end_game");
+    level endon("game_ended");
+    level endon("intermission");
+
+    for (;;)
+    {
+        level waittill("say", message, player);
+        if (!isDefined(player) || !isDefined(message))
+            continue;
+        if (toLower(message) == ".leaders")
+            player thread lb_request(true);
+    }
+}
+
+lb_cached_record()
+{
     if (!isDefined(level.tws_lb_cache))
-        return;
+        return undefined;
     snapshot = level.tws_lb_cache;
     // Do not advertise an indefinitely stale record during an outage.
     if (getTime() - snapshot.saved_at > 900000)
-        return;
+        return undefined;
+    return snapshot;
+}
 
+lb_request(manual)
+{
+    self endon("disconnect");
+    level endon("end_game");
+    level endon("game_ended");
+    level endon("intermission");
+
+    snapshot = lb_cached_record();
+    if (!isDefined(snapshot))
+    {
+        if (manual)
+            self iPrintLnBold("^3Map record unavailable; try .leaders again shortly");
+        return;
+    }
+    // A manual replay replaces any welcome announcement still waiting to run.
+    if (manual)
+        self notify("tws_lb_requested");
     self lb_show_hud(snapshot);
 }
 
 lb_show_hud(snapshot)
 {
+    // Stop the previous display and its cleanup threads before replacing it.
+    self notify("tws_lb_hud_done");
+    if (isDefined(self.tws_lb_elems))
+        lb_hud_destroy(self.tws_lb_elems);
     self endon("disconnect");
     self endon("tws_lb_hud_done");
 
@@ -121,8 +168,9 @@ lb_show_hud(snapshot)
         elems[elems.size] = row;
     }
 
-    // Cleanup runs independently of the welcome thread's endon handlers.
-    self thread scripts\sp\tws_t5_common::destroy_on_disconnect(elems);
+    // Cleanup runs independently of the display and ends when it is replaced.
+    self.tws_lb_elems = elems;
+    self thread lb_hud_disconnect(elems);
     self thread lb_hud_end_game(elems, "end_game");
     self thread lb_hud_end_game(elems, "game_ended");
     self thread lb_hud_end_game(elems, "intermission");
@@ -156,6 +204,7 @@ lb_show_hud(snapshot)
             break;
     }
     lb_hud_destroy(elems);
+    self.tws_lb_elems = undefined;
     self notify("tws_lb_hud_done");
 }
 
@@ -165,12 +214,20 @@ lb_hud_help_visible()
         isDefined(self.tws_help_elems[0]) && self.tws_help_elems[0].alpha > 0;
 }
 
+lb_hud_disconnect(elems)
+{
+    self endon("tws_lb_hud_done");
+    self waittill("disconnect");
+    lb_hud_destroy(elems);
+}
+
 lb_hud_end_game(elems, event)
 {
     self endon("disconnect");
     self endon("tws_lb_hud_done");
     level waittill(event);
     lb_hud_destroy(elems);
+    self.tws_lb_elems = undefined;
     self notify("tws_lb_hud_done");
 }