Index: ossp-pkg/snmpdx/snmpdx.d/sysFs.pm
RCS File: /v/ossp/cvs/ossp-pkg/snmpdx/snmpdx.d/sysFs.pm,v
co -q -kk -p'1.1' '/v/ossp/cvs/ossp-pkg/snmpdx/snmpdx.d/sysFs.pm,v' | diff -u /dev/null - -L'ossp-pkg/snmpdx/snmpdx.d/sysFs.pm' 2>/dev/null
--- ossp-pkg/snmpdx/snmpdx.d/sysFs.pm
+++ - 2025-04-05 09:04:18.823850891 +0200
@@ -0,0 +1,185 @@
+##
+## snmpdx -- SNMP Daemon Extension
+## Copyright (c) 2003 The OSSP Project
+## Copyright (c) 2003 Ralf S. Engelschall
+## Copyright (c) 2003 Cable & Wireless
+##
+## Permission to use, copy, modify, and distribute this software for
+## any purpose with or without fee is hereby granted, provided that
+## the above copyright notice and this permission notice appear in all
+## copies.
+##
+## THIS SOFTWARE IS PROVIDED ``AS IS'' AND ANY EXPRESSED OR IMPLIED
+## WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF
+## MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
+## IN NO EVENT SHALL THE AUTHORS AND COPYRIGHT HOLDERS AND THEIR
+## CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
+## SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT
+## LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF
+## USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND
+## ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY,
+## OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT
+## OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
+## SUCH DAMAGE.
+##
+## sysFs: System, Filesystem
+##
+
+package My::Probe::sysFs;
+our @ISA = qw(My::Probe);
+
+sub oids ($) {
+ my ($self) = @_;
+ return $self->{-ctx}->{-mib}->oids("*.snmpdx.host.system.sysFs.*");
+}
+
+sub probe ($$) {
+ my ($self, $obj) = @_;
+
+ if ($self->{-ctx}->{-platform}->id() =~ m/FreeBSD/i) {
+ my $sysFsInfoENTRY = undef;
+
+ # local workspace
+ my $out; my $raw; my $n2i; my @dat; my $new;
+
+ # process df
+ $out = $self->{-ctx}->{-sys}->run("/bin/df -m", "1m");
+ $raw = $out->{-stdout};
+ $n2i = {};
+ if ($raw =~ m/^([^\n]*\bFilesystem\b[^\n]*)\n(.*)$/s) {
+ $n2i = &mkn2i(split / +/, $1);
+ foreach $line (split "\n", $2) {
+ @dat = split(/ +/, $line);
+ if (@dat[$n2i->{Filesystem}] =~ m|^/dev/|) {
+ $new = {};
+ if (defined $n2i->{Filesystem}) {
+ $new->{sysFsDevice} = @dat[$n2i->{Filesystem}];
+ }
+ if (defined $n2i->{Mounted}) {
+ $new->{sysFsMountpoint} = @dat[$n2i->{Mounted}];
+ }
+ if (defined $n2i->{_1M_blocks}) {
+ $new->{sysFsMax} = @dat[$n2i->{_1M_blocks}];
+ }
+ if (defined $n2i->{Avail}) {
+ $new->{sysFsFree} = @dat[$n2i->{Avail}];
+ }
+ if (defined $new->{sysFsMax} and defined $new->{sysFsFree}) {
+ $new->{sysFsUsed} = $new->{sysFsMax} - $new->{sysFsFree};
+ }
+ push(@sysFsInfoENTRY, $new);
+ }
+ }
+ }
+
+ if ($obj->{-name} =~ m/\.sysFsInfoENTRY\.([^.]+)\.(\d+)$/) {
+ my $col = $1;
+ my $row = ($2 > 0 ? $2 - 1 : 0);
+ $self->{-ctx}->{-log}->printf(4, "col=%s row=%s", $col, $row);
+ $obj->{-value} = @sysFsInfoENTRY[$row]->{$col} if (defined @sysFsInfoENTRY[$row]->{$col});
+ }
+ }
+ elsif ($self->{-ctx}->{-platform}->id() =~ m/Linux/i) {
+ my $sysFsInfoENTRY = undef;
+
+ # local workspace
+ my $out; my $raw; my $n2i; my @dat; my $new;
+
+ # process df
+ $out = $self->{-ctx}->{-sys}->run("/bin/df -m", "1m");
+ $raw = $out->{-stdout};
+ $n2i = {};
+ if ($raw =~ m/^([^\n]*\bFilesystem\b[^\n]*)\n(.*)$/s) {
+ $n2i = &mkn2i(split / +/, $1);
+ foreach $line (split "\n", $2) {
+ @dat = split(/ +/, $line);
+ if (@dat[$n2i->{Filesystem}] =~ m|^/dev/|) {
+ $new = {};
+ if (defined $n2i->{Filesystem}) {
+ $new->{sysFsDevice} = @dat[$n2i->{Filesystem}];
+ }
+ if (defined $n2i->{Mounted}) {
+ $new->{sysFsMountpoint} = @dat[$n2i->{Mounted}];
+ }
+ if (defined $n2i->{_1M_blocks}) {
+ $new->{sysFsMax} = @dat[$n2i->{_1M_blocks}];
+ }
+ if (defined $n2i->{Available}) {
+ $new->{sysFsFree} = @dat[$n2i->{Available}];
+ }
+ if (defined $new->{sysFsMax} and defined $new->{sysFsFree}) {
+ $new->{sysFsUsed} = $new->{sysFsMax} - $new->{sysFsFree};
+ }
+ push(@sysFsInfoENTRY, $new);
+ }
+ }
+ }
+
+ if ($obj->{-name} =~ m/\.sysFsInfoENTRY\.([^.]+)\.(\d+)$/) {
+ my $col = $1;
+ my $row = ($2 > 0 ? $2 - 1 : 0);
+ $self->{-ctx}->{-log}->printf(4, "col=%s row=%s", $col, $row);
+ $obj->{-value} = @sysFsInfoENTRY[$row]->{$col} if (defined @sysFsInfoENTRY[$row]->{$col});
+ }
+ }
+ elsif($self->{-ctx}->{-platform}->id() =~ m/SunOS/i) {
+ my $sysFsInfoENTRY = undef;
+
+ # local workspace
+ my $out; my $raw; my $n2i; my @dat; my $new;
+
+ # process df
+ $out = $self->{-ctx}->{-sys}->run("/bin/df -k", "1m");
+ $raw = $out->{-stdout};
+ $n2i = {};
+ if ($raw =~ m/^([^\n]*\bFilesystem\b[^\n]*)\n(.*)$/s) {
+ $n2i = &mkn2i(split / +/, $1);
+ foreach $line (split "\n", $2) {
+ @dat = split(/ +/, $line);
+ if (@dat[$n2i->{Filesystem}] =~ m|^/dev/|) {
+ $new = {};
+ if (defined $n2i->{Filesystem}) {
+ $new->{sysFsDevice} = @dat[$n2i->{Filesystem}];
+ }
+ if (defined $n2i->{Mounted}) {
+ $new->{sysFsMountpoint} = @dat[$n2i->{Mounted}];
+ }
+ if (defined $n2i->{kbytes}) {
+ $new->{sysFsMax} = int(@dat[$n2i->{kbytes}] / 1024);
+ }
+ if (defined $n2i->{avail}) {
+ $new->{sysFsFree} = int(@dat[$n2i->{avail}] / 1024);
+ }
+ if (defined $new->{sysFsMax} and defined $new->{sysFsFree}) {
+ $new->{sysFsUsed} = $new->{sysFsMax} - $new->{sysFsFree};
+ }
+ push(@sysFsInfoENTRY, $new);
+ }
+ }
+ }
+
+ if ($obj->{-name} =~ m/\.sysFsInfoENTRY\.([^.]+)\.(\d+)$/) {
+ my $col = $1;
+ my $row = ($2 > 0 ? $2 - 1 : 0);
+ $self->{-ctx}->{-log}->printf(4, "col=%s row=%s", $col, $row);
+ $obj->{-value} = @sysFsInfoENTRY[$row]->{$col} if (defined @sysFsInfoENTRY[$row]->{$col});
+ }
+ }
+ return;
+}
+
+# name to index
+sub mkn2i ($) {
+ my (@name) = @_;
+ my $rc = {};
+ my $i = 0;
+ foreach my $f (@name) {
+ $f =~ s/[^\w]/_/;
+ $f =~ s/^([^a-zA-Z_])/_$1/;
+ $rc->{$f} = $i++;
+ };
+ return $rc;
+}
+
+1;
+
Index: ossp-pkg/snmpdx/snmpdx.mib/snmpdx.mib
RCS File: /v/ossp/cvs/ossp-pkg/snmpdx/snmpdx.mib/snmpdx.mib,v
rcsdiff -q -kk '-r1.5' '-r1.6' -u '/v/ossp/cvs/ossp-pkg/snmpdx/snmpdx.mib/snmpdx.mib,v' 2>/dev/null
--- snmpdx.mib 2003/09/08 11:25:28 1.5
+++ snmpdx.mib 2003/09/08 12:50:17 1.6
@@ -190,6 +190,70 @@
::= { system 6 }
--
+-- System Filesystem
+--
+
+sysFs OBJECT IDENTIFIER
+ ::= { system 7 }
+
+sysFsInfoTABLE OBJECT-TYPE
+ SYNTAX SEQUENCE OF SysFsIndexENTRY
+ MAX-ACCESS not-accessible
+ STATUS current
+ DESCRIPTION "FIXME Table description!?"
+ ::= { sysFs 1 }
+
+sysFsInfoENTRY OBJECT-TYPE
+ SYNTAX SysFsIndexENTRY
+ MAX-ACCESS not-accessible
+ STATUS current
+ DESCRIPTION "FIXME Row description!?"
+ INDEX { sysFsInfoIndex }
+ ::= { sysFsInfoTABLE 1 }
+
+SysFsIndexENTRY ::= SEQUENCE {
+ sysFsDevice DisplayString,
+ sysFsMountpoint DisplayString,
+ sysFsMax Integer32,
+ sysFsUsed Integer32,
+ sysFsFree Integer32
+}
+
+sysFsDevice OBJECT-TYPE
+ SYNTAX DisplayString
+ MAX-ACCESS read-only
+ STATUS current
+ DESCRIPTION "filesystem device"
+ ::= { sysFsInfoENTRY 1 }
+
+sysFsMountpoint OBJECT-TYPE
+ SYNTAX DisplayString
+ MAX-ACCESS read-only
+ STATUS current
+ DESCRIPTION "filesystem mount point"
+ ::= { sysFsInfoENTRY 2 }
+
+sysFsMax OBJECT-TYPE
+ SYNTAX Integer32
+ MAX-ACCESS read-only
+ STATUS current
+ DESCRIPTION "maximum available filesystem space in MB"
+ ::= { sysFsInfoENTRY 3 }
+
+sysFsUsed OBJECT-TYPE
+ SYNTAX Integer32
+ MAX-ACCESS read-only
+ STATUS current
+ DESCRIPTION "currently used filesystem space in MB"
+ ::= { sysFsInfoENTRY 4 }
+
+sysFsFree OBJECT-TYPE
+ SYNTAX Integer32
+ MAX-ACCESS read-only
+ STATUS current
+ DESCRIPTION "currently free filesystem space in MB"
+ ::= { sysFsInfoENTRY 5 }
+--
-- Hardware: Product
--