summary |
shortlog |
log |
commit | commitdiff |
tree
raw |
patch |
inline | side by side (from parent 1:
c410bf7)
In retrospect, warnings for EPERM on accept4(2) failure may
help detect misconfigured firewalls, so start emitting warnings
for EPERM. Fwiw, I've never known excessive EPERM warnings
to be excessively noisy in other TCP services I've run over
the years.
use Socket qw(SOL_SOCKET SO_KEEPALIVE IPPROTO_TCP TCP_NODELAY);
use IO::Handle;
use PublicInbox::Syscall qw(EPOLLIN EPOLLEXCLUSIVE);
use Socket qw(SOL_SOCKET SO_KEEPALIVE IPPROTO_TCP TCP_NODELAY);
use IO::Handle;
use PublicInbox::Syscall qw(EPOLLIN EPOLLEXCLUSIVE);
-use Errno qw(EAGAIN ECONNABORTED EPERM);
+use Errno qw(EAGAIN ECONNABORTED);
# Warn on transient errors, mostly resource limitations.
# EINTR would indicate the failure to set NonBlocking in systemd or similar
# Warn on transient errors, mostly resource limitations.
# EINTR would indicate the failure to set NonBlocking in systemd or similar
IO::Handle::blocking($c, 0); # no accept4 :<
eval { $self->{post_accept}->($c, $addr, $sock) };
warn "E: $@\n" if $@;
IO::Handle::blocking($c, 0); # no accept4 :<
eval { $self->{post_accept}->($c, $addr, $sock) };
warn "E: $@\n" if $@;
- } elsif ($! == EAGAIN || $! == ECONNABORTED || $! == EPERM) {
+ } elsif ($! == EAGAIN || $! == ECONNABORTED) {
# EAGAIN is common and likely
# ECONNABORTED is common with bad connections
# EAGAIN is common and likely
# ECONNABORTED is common with bad connections
- # EPERM happens if firewall rules prevent a connection
- # on Linux (and everything that emulates Linux).
- # Firewall rules are sometimes intentional, so we don't
- # warn on EPERM to avoid being too noisy...
return;
} elsif (my $sym = $ERR_WARN{int($!)}) {
warn "W: accept(): $! ($sym)\n";
return;
} elsif (my $sym = $ERR_WARN{int($!)}) {
warn "W: accept(): $! ($sym)\n";