We need to be able to close open server sockets.
VERSION=0.72.1
PACKAGE=librados2-perl
-PKGREL=2
+PKGREL=3
DESTDIR=
PREFIX=/usr
use Carp;
use JSON;
use Socket;
-
+use PVE::INotify;
+use PVE::RPCEnvironment;
+
require Exporter;
our @ISA = qw(Exporter);
sub new {
my ($class, %params) = @_;
+ my $rpcenv = PVE::RPCEnvironment::get();
+
socketpair(my $child, my $parent, AF_UNIX, SOCK_STREAM, PF_UNSPEC)
|| die "socketpair: $!";
} else { # child
$0 = 'pverados';
-
+
+ PVE::INotify::inotify_close();
+
+ if (my $atfork = $rpcenv->{atfork}) {
+ &$atfork();
+ }
+
# fixme: timeout?
close $child;
+librados2-perl (0.72.1-3) unstable; urgency=low
+
+ * depend on libpve-access-control
+
+ -- Proxmox Support Team <support@proxmox.com> Tue, 21 Jan 2014 09:17:44 +0100
+
librados2-perl (0.72.1-2) unstable; urgency=low
* always fork worker process
Section: perl
Priority: optional
Architecture: @@ARCH@@
-Depends: libc6 (>= 2.2.5), perl (>= 5.14.2-21+deb7u1), perlapi-5.14.2, librados2 (>= 0.72.1)
+Depends: libc6 (>= 2.2.5), perl (>= 5.14.2-21+deb7u1), perlapi-5.14.2, librados2 (>= 0.72.1), libpve-access-control
Maintainer: Proxmox Support Team <support@proxmox.com>
Description: Perl bindings for librados
This package contains librados perl binding used by Proxmox VE.