nagios/check_bioctl/check_bioctl - diff

Return to check_bioctl CVS log

Up to [local] / nagios / check_bioctl

version 1.19, 2011/12/27 02:23:57

version 1.20, 2014/06/27 19:59:56

Line 1

#!/usr/bin/perl -T

# $AFresh1$

# $AFresh1: check_bioctl,v 1.19 2011/12/27 02:23:57 andrew Exp $

########################################################################

# check_bioctl *** A nagios check for OpenBSD bioctl

Line 30

my $PROGNAME = 'check_bioctl';

my $BIOCTL = '/sbin/bioctl';

my $SUDO = '/usr/bin/sudo';

use POSIX;

my $PREFIX;

Line 124

Line 125

my %volumes;

foreach my $d ( @{$devices} ) {

open my $bioctl, q{-|}, $BIOCTL, $d

open my $bioctl, q{-|}, $SUDO, $BIOCTL, $d

or die "Couldn't open bioctl: $!\n";

LINE: while ( my $line = <$bioctl> ) {

my ( $i, $item ) = parse_bioctl_line($line);