/[mdap]/lib/MDAP/DHCP.pm
This is repository of my old source code which isn't updated any more. Go to git.rot13.org for current projects!
ViewVC logotype

Contents of /lib/MDAP/DHCP.pm

Parent Directory Parent Directory | Revision Log Revision Log


Revision 58 - (show annotations)
Fri Nov 16 19:12:08 2007 UTC (12 years ago) by dpavlin
File size: 413 byte(s)
 r78@brr:  dpavlin | 2007-11-16 20:12:03 +0100
 cleanup messages and plugins

1 package MDAP::DHCP;
2
3 use strict;
4 use warnings;
5
6 use Module::Pluggable;
7 use MDAP;
8
9 sub check {
10 my ( $self, $h ) = @_;
11
12 my $serial = $h->{'_PROD_SERIAL_NBR'} || die "no serial?";
13 my $dhcp = $h->{'DHCP_CONFIG'} || die "no DHCP_CONFIG?";
14
15 if ( $dhcp =~ m/(\d+) server/ ) {
16 return if $1 == 0;
17
18 return 'dhcp server config state disabled';
19 } else {
20 once "OK ",__PACKAGE__," $serial $dhcp";
21 return;
22 }
23 }
24
25 1;

  ViewVC Help
Powered by ViewVC 1.1.26