mhop/fhem
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

PRESENCE: use getlogin and getpwuid to obtain FHEM username; use usleep instead of sleep.

Browse Source 
git-svn-id: svn://svn.code.sf.net/p/fhem/code/trunk@5188 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
markusbloch
2014-03-10 16:58:36 +00:00
parent 1299574bc0
commit c9fd2d67dc
1 changed files with 4 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

8
fhem/FHEM/73_PRESENCE.pm
View File

@@ -30,7 +30,7 @@ package main;
use strict;
use warnings;
use Blocking;
use Time::HiRes qw(gettimeofday sleep);
use Time::HiRes qw(gettimeofday usleep sleep);
use DevIo;
@@ -62,7 +62,7 @@ PRESENCE_Define($$)
my ($hash, $def) = @_;
my @a = split("[ \t]+", $def);
my $dev;
my $username = (getpwuid($<))[0];
my $username = getlogin || getpwuid($<) || "[unknown]";
if(defined($a[2]) and defined($a[3]))
{
@@ -582,7 +582,7 @@ PRESENCE_ExecuteFritzBoxCMD($$)
qx(touch /var/tmp/fhem-PRESENCE-cmd-lock.tmp);
$status = qx($cmd);
usleep 200000;
unlink("/var/tmp/fhem-PRESENCE-cmd-lock.tmp") if(-e "/var/tmp/fhem-PRESENCE-cmd-lock.tmp");
return $status;
@@ -668,7 +668,7 @@ PRESENCE_DoLocalFritzBoxScan($)
}
$number++;
sleep 0.2;
}
return ($status == 0 ? "$name|$local|absent" : "$name|$local|present").($number <= $max ? "|$number" : "");