FHEM/mod-hombot
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

check path to sshpass and .ssh

Browse Source
This commit is contained in:
Marko Oldenburg
2016-04-08 07:53:24 +02:00
parent 2ec50eaec3
commit 552efdf558
1 changed files with 9 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

11
74_HOMBOT.pm
View File

@ -70,10 +70,17 @@ sub HOMBOT_Define($$) {
return "too few parameters: define <name> HOMBOT <HOST>" if( @a != 3 ); return "too few parameters: define <name> HOMBOT <HOST>" if( @a != 3 );
return "please check if ssh installed" unless( -X "/usr/bin/ssh" ); return "please check if ssh installed" unless( -X "/usr/bin/ssh" );
return "please check if /opt/fhem/.ssh/known_hosts exist" unless( -R "/opt/fhem/.ssh/known_hosts" ); return "please check if /opt/fhem/.ssh/known_hosts exist" unless( -R "/opt/fhem/.ssh/known_hosts" ) || unless( -R "/root/.ssh/known_hosts" );;
return "please check if sshpass installed" unless( -X "/usr/bin/sshpass" ); return "please check if sshpass installed" unless( -X "/usr/bin/sshpass" ) || unless( -X "/usr/local/bin/sshpass" );
my $sshpass;
my $knowhosts;
$sshpass = "/usr/bin/sshpass" unless( -X "/usr/bin/sshpass" );
$sshpass = "/usr/local/bin/sshpass" unless( -X "/usr/local/bin/sshpass" );
$knowhosts = "/opt/fhem/.ssh/known_hosts" unless( -R "/opt/fhem/.ssh/known_hosts" )
$knowhosts = "/root/.ssh/known_hosts" unless( -R "/root/.ssh/known_hosts" )
my $name = $a[0]; my $name = $a[0];
my $host = $a[2]; my $host = $a[2];
my $port = 6260; my $port = 6260;