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

added get filesystems command

Browse Source 
git-svn-id: https://svn.fhem.de/fhem/trunk@2664 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
justme-1968 2013-02-08 15:46:57 +00:00
parent c3d0b75e54
commit 5e1e7eeb48
1 changed files with 26 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

26
fhem/FHEM/32_SYSSTAT.pm
View File

@ -12,6 +12,7 @@ SYSSTAT_Initialize($)
$hash->{DefFn} = "SYSSTAT_Define";
$hash->{UndefFn} = "SYSSTAT_Undefine";
$hash->{GetFn} = "SYSSTAT_Get";
$hash->{AttrFn} = "SYSSTAT_Attr";
$hash->{AttrList} = "filesystems showpercent:1 useregex:1 loglevel:0,1,2,3,4,5,6 ".
$readingFnAttributes;
@ -51,6 +52,31 @@ SYSSTAT_Undefine($$)
return undef;
}
sub
SYSSTAT_Get($@)
{
my ($hash, @a) = @_;
my $name = $a[0];
return "$name: get needs at least one parameter" if(@a < 2);
my $cmd= $a[1];
if($cmd eq "filesystems") {
my $sys = Sys::Statistics::Linux->new(diskusage => 1);
my $filesystems = $sys->get->{diskusage};
my $ret;
foreach my $filesystem (keys %$filesystems ) {
$ret .= $filesystem ." <= ". $filesystems->{$filesystem}->{mountpoint} ."\n";
}
return $ret;
} else {
return "Unknown argument $cmd, choose one of filesystems";
}
}
sub
SYSSTAT_Attr($$$)
{