head	1.4;
access;
symbols
	SNMPDX_1_0_0:1.4
	SNMPDX_0_2_11:1.3
	SNMPDX_0_2_10:1.2
	SNMPDX_0_2_9:1.2
	SNMPDX_0_2_8:1.2
	SNMPDX_0_2_7:1.2
	SNMPDX_0_2_6:1.1
	SNMPDX_0_2_5:1.1
	SNMPDX_0_2_4:1.1
	SNMPDX_0_2_3:1.1
	SNMPDX_0_2_2:1.1
	SNMPDX_0_2_1:1.1
	SNMPDX_0_2_0:1.1;
locks; strict;
comment	@# @;


1.4
date	2007.03.01.10.52.39;	author rse;	state Exp;
branches;
next	1.3;
commitid	FNuFlqR2Qo3fkn8s;

1.3
date	2005.10.05.17.42.13;	author rse;	state Exp;
branches;
next	1.2;

1.2
date	2003.09.10.15.01.46;	author rse;	state Exp;
branches;
next	1.1;

1.1
date	2003.09.01.15.22.42;	author rse;	state Exp;
branches;
next	;


desc
@@


1.4
log
@Upgrade build environment to GNU shtool 2.0.6 and GNU autoconf 2.60
@
text
@##
##  OSSP snmpdx - SNMP Daemon Extension
##  Copyright (c) 2003-2007 The OSSP Project <http://www.ossp.org/>
##  Copyright (c) 2003-2007 Ralf S. Engelschall <rse@@engelschall.com>
##  Copyright (c) 2003-2005 Cable & Wireless <http://www.cw.com/>
##
##  This file is part of OSSP snmpdx, a SNMP daemon extension which
##  can be found at http://www.ossp.org/pkg/tool/snmpdx/.
##
##  This program is free software; you can redistribute it and/or
##  modify it under the terms of the GNU General Public  License
##  as published by the Free Software Foundation; either version
##  2.0 of the License, or (at your option) any later version.
##
##  This program is distributed in the hope that it will be useful,
##  but WITHOUT ANY WARRANTY; without even the implied warranty of
##  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
##  General Public License for more details.
##
##  You should have received a copy of the GNU General Public License
##  along with this file; if not, write to the Free Software
##  Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307
##  USA, or contact Ralf S. Engelschall <rse@@engelschall.com>.
##
##  sysUptime.pm: probe for System Uptime
##

package My::Probe::sysUptime;
our @@ISA = qw(My::Probe);

sub oids ($) {
    my ($self) = @@_;
    return $self->{-ctx}->{-mib}->oids("*.snmpdx.host.system.sysUptime");
}

sub probe ($$) {
    my ($self, $obj) = @@_;
    
    #   query system via uptime(1)
    my $uptime = "uptime";
    if ($self->{-ctx}->{-platform}->id() =~ m/(FreeBSD|Linux|SunOS)/i) {
        $uptime = "/usr/bin/uptime"
    }
    my $out = $self->{-ctx}->{-sys}->run($uptime, "1m");

    #   parse out details (example outputs follow)
    #   FreeBSD: "5:36PM  up 6 days, 54 mins, 9 users, load averages: 0.00, 0.02, 0.00"
    #   Linux:   "17:36:50 up 49 days,  8:16,  2 users,  load average: 0.00, 0.00, 0.00"
    #   SunOS:   "5:36pm  up 71 day(s),  3:29,  2 users,  load average: 0.16, 0.11, 0.13"
    my ($days, $hours, $mins) = (0, 0, 0);
    my $spec = $out->{-stdout};
    $spec =~ s|^.*\s+up\s+||s;
    $spec =~ s|,\s+\d+\s+users.*$||s;
    $spec =~ s/(\d+)\s+day(s|\(s\))?/$days = $1, ''/se;
    $spec =~ s/(\d+):(\d{2})/$hours = $1, $mins = $2, ''/se;
    $spec =~ s/(\d+)\s+min(s|\(s\))?/$mins = $1, ''/se;

    #   provide results
    my $t = 0;
    $t += ($days  * 24 * 60 * 60);
    $t += ($hours *      60 * 60);
    $t += ($mins  *           60);
    $t *= 100;
    $obj->{-value} = $t;
    return;
}

1;

@


1.3
log
@flush pending changes
@
text
@d3 2
a4 2
##  Copyright (c) 2003-2005 The OSSP Project <http://www.ossp.org/>
##  Copyright (c) 2003-2005 Ralf S. Engelschall <rse@@engelschall.com>
@


1.2
log
@More source tree cleanups and polishing, especially adding the GPL-based copyright header used inside OSSP packages
@
text
@d3 3
a5 3
##  Copyright (c) 2003 The OSSP Project <http://www.ossp.org/>
##  Copyright (c) 2003 Ralf S. Engelschall <rse@@engelschall.com>
##  Copyright (c) 2003 Cable & Wireless <http://www.cw.com/>
@


1.1
log
@genesis of OSSP snmpdx
@
text
@d2 1
a2 1
##  snmpdx -- SNMP Daemon Extension
d7 2
a8 4
##  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.
d10 4
a13 12
##  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.
d15 11
a25 1
##  sysUptime: System Uptime
@