watch: use "self-inotify-tempfile trick" for quit

[public-inbox.git] / script / public-inbox-watch

diff --git a/script/public-inbox-watch b/script/public-inbox-watch
index 42ae55ae9b760567e4238738329a7457a59994b5..0d1cd8319fed5f44a89542ff0aaa27dfc0089385 100755 (executable)
--- a/script/public-inbox-watch
+++ b/script/public-inbox-watch
@@ -5,12 +5,22 @@ use strict;
 use warnings;
 use PublicInbox::WatchMaildir;
 use PublicInbox::Config;
-my $config = PublicInbox::Config->new;
-my $watch_md = PublicInbox::WatchMaildir->new($config);
+my ($config, $watch_md);
+my $reload = sub {
+       $config = PublicInbox::Config->new;
+       $watch_md->quit if $watch_md;
+       $watch_md = PublicInbox::WatchMaildir->new($config);
+};
+$reload->();
 if ($watch_md) {
-       my $scan = sub { $watch_md->scan };
+       my $scan = sub { $watch_md->trigger_scan('full') if $watch_md };
+       $SIG{HUP} = $reload;
        $SIG{USR1} = $scan;
        $SIG{ALRM} = sub { $SIG{ALRM} = 'DEFAULT'; $scan->() };
+       $SIG{QUIT} = $SIG{TERM} = $SIG{INT} = sub {
+               $watch_md->quit if $watch_md;
+               $watch_md = undef;
+       };
        alarm(1);
-       $watch_md->watch;
+       $watch_md->watch while ($watch_md);
 }