X-Git-Url: https://git.sesse.net/?p=remoteglot;a=blobdiff_plain;f=config.pm;h=2bb1974fa578a1bd46d10fc7f93c5e34ecf6d7bd;hp=182d6ebeb31af6a5233cf47e32b1a92fbdeacf6b;hb=4f754b372829496a9f53eb52923446cc2a0398c1;hpb=e3abe43333d1f536f34f746889ba46428989f50e

diff --git a/config.pm b/config.pm
index 182d6eb..2bb1974 100644
--- a/config.pm
+++ b/config.pm
@@ -7,6 +7,34 @@ 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.
 
@@ -39,5 +67,6 @@ our @masters = (
 our $tb_serial_key = undef;
 
 eval {
-	require 'config.local.pm';
+	my $config_filename = $ENV{'REMOTEGLOT_CONFIG'} // 'config.local.pm';
+	require $config_filename;
 };