Prepare the VCL for multiple backends, with independent cache management.

[remoteglot] / config.pm

diff --git a/config.pm b/config.pm
index f9d0897d63aecfebc3af10d9c0f50efcc2f2d4f0..b169e07621df5d2415e2c7241be0a7c899bfd8e9 100644 (file)
--- a/config.pm
+++ b/config.pm
@@ -7,7 +7,36 @@ package remoteglotconf;
 our $server = "freechess.org";
 our $nick = "SesseBOT";
 our $target = "GMCarlsen";  # FICS username or HTTP to a PGN file.
+
+# Set to non-undef to pick out one specific game from a PGN file with many games.
+# See example.
+our $pgn_filter = undef;
+#our $pgn_filter = sub {
+#      my $pgn = shift;
+#      return $pgn->round() eq '7' && $pgn->white eq 'Carlsen,M';
+#};
+
+# Set to non-undef to override the clock information with our own calculations.
+# The example implements a simple 60+60 (with bonus added before the move).
+# FIXME(sesse): We might not see all moves in a PGN individually, so this might
+# skip some moves for bonus.
+our $adjust_clocks_before_move = undef;
+#our $adjust_clocks_before_move = sub {
+#        my ($white_clock_left, $black_clock_left, $move, $toplay) = @_;
+#
+#        if (!defined($$white_clock_left) || !defined($$black_clock_left)) {
+#                $$white_clock_left = 3600;
+#                $$black_clock_left = 3600;
+#        }
+#        if ($toplay eq 'W') {
+#                $$white_clock_left += 60;
+#        } else {
+#                $$black_clock_left += 60;
+#        }
+#};
+
 our $json_output = "/srv/analysis.sesse.net/www/analysis.json";
+our $json_history_dir = "/srv/analysis.sesse.net/www/history/";  # undef for none.
 
 our $engine_cmdline = "./stockfish";
 our %engine_config = (
@@ -32,6 +61,9 @@ our @masters = (
        'Sesse',
 );
 
+# ChessOK serial key (of the form NNNNN-NNNNN-NNNNN-NNNNN-NNNNN-NNNNN)
+# for looking up 7-man tablebases; undef means no lookup. Note that
+# you probably need specific prior permission to use this.
 our $tb_serial_key = undef;
 
 eval {