FHEM/fhem-mirror
2
0
Fork 0
mirror of https://github.com/fhem/fhem-mirror.git synced 2025-03-10 09:16:53 +00:00
Code Issues Releases Wiki Activity

74_Nmap: check if Nmap is located at given path

Browse Source 
git-svn-id: https://svn.fhem.de/fhem/trunk@13809 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
igami 2017-03-26 15:16:34 +00:00
parent a3c66d342f
commit 8e85cc95d1
1 changed files with 31 additions and 13 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

44
fhem/FHEM/74_Nmap.pm
View File

@ -29,14 +29,16 @@ package main;
use Blocking;
my $rc = eval{
require Nmap::Parser;
Nmap::Parser->import();
1;
};
use Nmap::Parser;
return("Error loading Nmap::Parser. Maybe this module is not installed?")
unless($rc);
# my $rc = eval{
# require Nmap::Parser;
# Nmap::Parser->import();
# 1;
# };
#
# return("Error loading Nmap::Parser. Maybe this module is not installed?")
# unless($rc);
# forward declarations ########################################################
sub Nmap_Initialize($);
@ -153,6 +155,9 @@ sub Nmap_Set($@) {
if($argument eq "interrupt"){
BlockingKill($hash->{helper}{RUNNING_PID})
if(defined($hash->{helper}{RUNNING_PID}));
Nmap_aborted($hash);
RemoveInternalTimer($hash);
InternalTimer(
gettimeofday() + $hash->{INTERVAL}, "Nmap_statusRequest", $hash
@ -247,6 +252,9 @@ sub Nmap_statusRequest($) {
my ($hash) = @_;
my $SELF = $hash->{NAME};
my $TYPE = $hash->{TYPE};
my $interval = $hash->{INTERVAL};
my $timeout = $interval - 1;
my $path = $hash->{PATH};
BlockingKill($hash->{helper}{RUNNING_PID})
if(defined($hash->{helper}{RUNNING_PID}));
@ -255,12 +263,22 @@ sub Nmap_statusRequest($) {
return if(IsDisabled($SELF));
InternalTimer(
gettimeofday() + $hash->{INTERVAL}, "Nmap_statusRequest", $hash
gettimeofday() + $interval, "Nmap_statusRequest", $hash
);
unless(-X $path){
readingsSingleUpdate($hash, "state", "aborted", 1);
Log3(
$SELF, 1, "$TYPE ($SELF) - "
. "please check if Nmap ist installed and available at path $path"
);
return;
}
if(
AttrVal($SELF, "sudo", 0) == 1
&& qx(sudo -n $hash->{PATH} -V 2>&1 > /dev/null)
&& qx(sudo -n $path -V 2>&1 > /dev/null)
){
readingsSingleUpdate($hash, "state", "aborted", 1);
Log3($SELF, 1, "$TYPE ($SELF) - sudo password required");
@ -272,9 +290,8 @@ sub Nmap_statusRequest($) {
Log3($SELF, 3, "$TYPE ($SELF) - starting network scan");
$hash->{helper}{RUNNING_PID} = BlockingCall(
"Nmap_blocking_statusRequest", $SELF
, "Nmap_done", $hash->{INTERVAL}-1
, "Nmap_aborted", $hash
"Nmap_blocking_statusRequest", $SELF, "Nmap_done"
, $timeout, "Nmap_aborted", $hash
) unless(exists($hash->{helper}{RUNNING_PID}));
return;
@ -462,7 +479,8 @@ sub Nmap_done($) {
readingsEndUpdate($hash, 1);
my $deleteOldReadings = AttrVal($SELF, "deleteOldReadings", 0);
Nmap_deleteOldReadings($hash, $deleteOldReadings) if($deleteOldReadings != 0);
Nmap_deleteOldReadings($hash, $deleteOldReadings)
if($deleteOldReadings ne "0");
Log3($SELF, 3, "$TYPE ($SELF) - network scan done");