We don't want clients hogging server resources and preventing
us from shutting down, so give them 30s to finish whatever
request they're getting.
$_->close for @listeners;
@listeners = ();
+ # give slow clients 30s to finish reading/writing whatever
+ Danga::Socket->AddTimer(30, sub { exit });
+
# drop idle connections and try to quit gracefully
Danga::Socket->SetPostLoopCallback(sub {
my ($dmap, undef) = @_;
my $n = 0;
+
foreach my $s (values %$dmap) {
next unless ref($s) eq 'PublicInbox::NNTP';
if ($s->{write_buf_size} || $s->{rbuf}) {