From c062644c64bf44b48bd6469e1d4e77d8b9cfdc87 Mon Sep 17 00:00:00 2001 From: "Eric Wong (Contractor, The Linux Foundation)" Date: Fri, 2 Mar 2018 03:12:23 +0000 Subject: evcleanup: disable outside of daemon We'll be using these in a more OO manner for V2Writable (which doesn't use Danga::Socket), so lets not unnecessarily register cleanup handlers intended for network daemons. --- lib/PublicInbox/Daemon.pm | 1 + lib/PublicInbox/EvCleanup.pm | 2 ++ lib/PublicInbox/Inbox.pm | 1 + 3 files changed, 4 insertions(+) (limited to 'lib') diff --git a/lib/PublicInbox/Daemon.pm b/lib/PublicInbox/Daemon.pm index 0329bd34..9d27d2be 100644 --- a/lib/PublicInbox/Daemon.pm +++ b/lib/PublicInbox/Daemon.pm @@ -460,6 +460,7 @@ sub daemon_loop ($$) { @listeners = map { PublicInbox::Listener->new($_, $post_accept) } @listeners; + $PublicInbox::EvCleanup::ENABLED = 1; Danga::Socket->EventLoop; $parent_pipe = undef; } diff --git a/lib/PublicInbox/EvCleanup.pm b/lib/PublicInbox/EvCleanup.pm index 559730e9..8ed5180b 100644 --- a/lib/PublicInbox/EvCleanup.pm +++ b/lib/PublicInbox/EvCleanup.pm @@ -7,6 +7,8 @@ use strict; use warnings; use base qw(Danga::Socket); use fields qw(rd); + +our $ENABLED; my $singleton; my $asapq = [ [], undef ]; my $nextq = [ [], undef ]; diff --git a/lib/PublicInbox/Inbox.pm b/lib/PublicInbox/Inbox.pm index 54a6eb32..b9cd4c40 100644 --- a/lib/PublicInbox/Inbox.pm +++ b/lib/PublicInbox/Inbox.pm @@ -29,6 +29,7 @@ sub cleanup_task () { sub _cleanup_later ($) { my ($self) = @_; + return unless $PublicInbox::EvCleanup::ENABLED; $cleanup_timer ||= PublicInbox::EvCleanup::later(*cleanup_task); $CLEANUP->{"$self"} = $self; } -- cgit v1.2.3-24-ge0c7