This commit is contained in:
Quentin Garnier 2014-03-24 19:36:26 +01:00
parent 1033cca113
commit 1e53de18a5
2 changed files with 8 additions and 8 deletions

View File

@ -103,12 +103,12 @@ sub run {
network::fritzbox::mode::libgetdata::init($self, pfad => '/upnp/control/WANCommonIFC1',
uri => 'urn:schemas-upnp-org:service:WANCommonInterfaceConfig:1');
network::fritzbox::mode::libgetdata::call($self, soap_method => 'GetAddonInfos');
my $NewTotalBytesSent = network::fritzbox::mode::libgetdata::value($self, path => '/GetAddonInfosResponse/NewTotalBytesSent');
my $NewTotalBytesReceived = network::fritzbox::mode::libgetdata::value($self, path => '/GetAddonInfosResponse/NewTotalBytesReceived');
my $NewTotalBytesSent = network::fritzbox::mode::libgetdata::value($self, path => '//GetAddonInfosResponse/NewTotalBytesSent');
my $NewTotalBytesReceived = network::fritzbox::mode::libgetdata::value($self, path => '//GetAddonInfosResponse/NewTotalBytesReceived');
network::fritzbox::mode::libgetdata::call($self, soap_method => 'GetCommonLinkProperties');
my $NewLayer1UpstreamMaxBitRate = network::fritzbox::mode::libgetdata::value($self, path => '/GetCommonLinkPropertiesResponse/NewLayer1UpstreamMaxBitRate');
my $NewLayer1DownstreamMaxBitRate = network::fritzbox::mode::libgetdata::value($self, path => '/GetCommonLinkPropertiesResponse/NewLayer1DownstreamMaxBitRate');
my $NewLayer1UpstreamMaxBitRate = network::fritzbox::mode::libgetdata::value($self, path => '//GetCommonLinkPropertiesResponse/NewLayer1UpstreamMaxBitRate');
my $NewLayer1DownstreamMaxBitRate = network::fritzbox::mode::libgetdata::value($self, path => '//GetCommonLinkPropertiesResponse/NewLayer1DownstreamMaxBitRate');
### GET DATA END
# DID U KNOW?

View File

@ -86,14 +86,14 @@ sub run {
network::fritzbox::mode::libgetdata::init($self, pfad => '/upnp/control/WANCommonIFC1',
uri => 'urn:schemas-upnp-org:service:WANCommonInterfaceConfig:1');
network::fritzbox::mode::libgetdata::call($self, soap_method => 'GetCommonLinkProperties');
my $WANAccessType = network::fritzbox::mode::libgetdata::value($self, path => '/GetCommonLinkPropertiesResponse/NewWANAccessType');
my $LinkStatus = network::fritzbox::mode::libgetdata::value($self, path => '/GetCommonLinkPropertiesResponse/NewPhysicalLinkStatus');
my $WANAccessType = network::fritzbox::mode::libgetdata::value($self, path => '//GetCommonLinkPropertiesResponse/NewWANAccessType');
my $LinkStatus = network::fritzbox::mode::libgetdata::value($self, path => '//GetCommonLinkPropertiesResponse/NewPhysicalLinkStatus');
network::fritzbox::mode::libgetdata::init($self, pfad => '/upnp/control/WANIPConn1',
uri => 'urn:schemas-upnp-org:service:WANIPConnection:1');
network::fritzbox::mode::libgetdata::call($self, soap_method => 'GetStatusInfo');
my $uptime = network::fritzbox::mode::libgetdata::value($self, path => '/GetStatusInfoResponse/NewUptime');
my $ConnectionStatus = network::fritzbox::mode::libgetdata::value($self, path => '/GetStatusInfoResponse/NewConnectionStatus');
my $uptime = network::fritzbox::mode::libgetdata::value($self, path => '//GetStatusInfoResponse/NewUptime');
my $ConnectionStatus = network::fritzbox::mode::libgetdata::value($self, path => '//GetStatusInfoResponse/NewConnectionStatus');
$exit_code = $self->{perfdata}->threshold_check(value => floor($uptime),
threshold => [ { label => 'critical', exit_litteral => 'critical' },