mirror of
https://github.com/munin-monitoring/contrib.git
synced 2025-07-22 02:51:03 +00:00
fix function name
This commit is contained in:
parent
3886860089
commit
bf2eff5c6c
4 changed files with 12 additions and 12 deletions
|
@ -66,7 +66,7 @@ my @ports = split /,/, $ENV{"port"} || "";
|
|||
# detect rtorrent version
|
||||
use version;
|
||||
my %rtorrent_version;
|
||||
sub get_socket_version {
|
||||
sub get_rtorrent_version {
|
||||
my $version;
|
||||
my $line_version= "<?xml version=\"1.0\" encoding=\"utf-8\"?><methodCall><methodName>system.client_version</methodName></methodCall>";
|
||||
my $llen = length $line_version;
|
||||
|
@ -91,7 +91,7 @@ sub rtorrent_version_lower_than {
|
|||
{
|
||||
socket( SOCK, PF_UNIX, SOCK_STREAM, 0 ) or die;
|
||||
connect( SOCK, sockaddr_un( $socket ) ) or die $!;
|
||||
get_socket_version $port;
|
||||
get_rtorrent_version $port;
|
||||
close (SOCK);
|
||||
}
|
||||
} else {
|
||||
|
@ -99,7 +99,7 @@ sub rtorrent_version_lower_than {
|
|||
{
|
||||
socket( SOCK, PF_INET, SOCK_STREAM, getprotobyname( "tcp" ) );
|
||||
connect( SOCK, sockaddr_in( $port, inet_aton( $ip ) ) );
|
||||
get_socket_version $port;
|
||||
get_rtorrent_version $port;
|
||||
close (SOCK);
|
||||
}
|
||||
}
|
||||
|
|
|
@ -76,7 +76,7 @@ my @ports = split /,/, $ENV{"port"} || "";
|
|||
# detect rtorrent version
|
||||
use version;
|
||||
my %rtorrent_version;
|
||||
sub get_socket_version {
|
||||
sub get_rtorrent_version {
|
||||
my $version;
|
||||
my $line_version= "<?xml version=\"1.0\" encoding=\"utf-8\"?><methodCall><methodName>system.client_version</methodName></methodCall>";
|
||||
my $llen = length $line_version;
|
||||
|
@ -101,7 +101,7 @@ sub rtorrent_version_lower_than {
|
|||
{
|
||||
socket( SOCK, PF_UNIX, SOCK_STREAM, 0 ) or die;
|
||||
connect( SOCK, sockaddr_un( $socket ) ) or die $!;
|
||||
get_socket_version $port;
|
||||
get_rtorrent_version $port;
|
||||
close (SOCK);
|
||||
}
|
||||
} else {
|
||||
|
@ -109,7 +109,7 @@ sub rtorrent_version_lower_than {
|
|||
{
|
||||
socket( SOCK, PF_INET, SOCK_STREAM, getprotobyname( "tcp" ) );
|
||||
connect( SOCK, sockaddr_in( $port, inet_aton( $ip ) ) );
|
||||
get_socket_version $port;
|
||||
get_rtorrent_version $port;
|
||||
close (SOCK);
|
||||
}
|
||||
}
|
||||
|
|
|
@ -90,7 +90,7 @@ my @ports = split /,/, $ENV{"port"} || "";
|
|||
# detect rtorrent version
|
||||
use version;
|
||||
my %rtorrent_version;
|
||||
sub get_socket_version {
|
||||
sub get_rtorrent_version {
|
||||
my $version;
|
||||
my $line_version= "<?xml version=\"1.0\" encoding=\"utf-8\"?><methodCall><methodName>system.client_version</methodName></methodCall>";
|
||||
my $llen = length $line_version;
|
||||
|
@ -115,7 +115,7 @@ sub rtorrent_version_lower_than {
|
|||
{
|
||||
socket( SOCK, PF_UNIX, SOCK_STREAM, 0 ) or die;
|
||||
connect( SOCK, sockaddr_un( $socket ) ) or die $!;
|
||||
get_socket_version $port;
|
||||
get_rtorrent_version $port;
|
||||
close (SOCK);
|
||||
}
|
||||
} else {
|
||||
|
@ -123,7 +123,7 @@ sub rtorrent_version_lower_than {
|
|||
{
|
||||
socket( SOCK, PF_INET, SOCK_STREAM, getprotobyname( "tcp" ) );
|
||||
connect( SOCK, sockaddr_in( $port, inet_aton( $ip ) ) );
|
||||
get_socket_version $port;
|
||||
get_rtorrent_version $port;
|
||||
close (SOCK);
|
||||
}
|
||||
}
|
||||
|
|
|
@ -80,7 +80,7 @@ my @ports = split /,/, $ENV{"port"} || "";
|
|||
# detect rtorrent version
|
||||
use version;
|
||||
my %rtorrent_version;
|
||||
sub get_socket_version {
|
||||
sub get_rtorrent_version {
|
||||
my $version;
|
||||
my $line_version= "<?xml version=\"1.0\" encoding=\"utf-8\"?><methodCall><methodName>system.client_version</methodName></methodCall>";
|
||||
my $llen = length $line_version;
|
||||
|
@ -105,7 +105,7 @@ sub rtorrent_version_lower_than {
|
|||
{
|
||||
socket( SOCK, PF_UNIX, SOCK_STREAM, 0 ) or die;
|
||||
connect( SOCK, sockaddr_un( $socket ) ) or die $!;
|
||||
get_socket_version $port;
|
||||
get_rtorrent_version $port;
|
||||
close (SOCK);
|
||||
}
|
||||
} else {
|
||||
|
@ -113,7 +113,7 @@ sub rtorrent_version_lower_than {
|
|||
{
|
||||
socket( SOCK, PF_INET, SOCK_STREAM, getprotobyname( "tcp" ) );
|
||||
connect( SOCK, sockaddr_in( $port, inet_aton( $ip ) ) );
|
||||
get_socket_version $port;
|
||||
get_rtorrent_version $port;
|
||||
close (SOCK);
|
||||
}
|
||||
}
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue