Parent Directory
| 
Revision Log
check if client allready have ip address and if it does don't respond to it unless it's in our ip range, but record information for later review
| 1 | dpavlin | 45 | #!/usr/bin/perl |
| 2 | |||
| 3 | use warnings; | ||
| 4 | use strict; | ||
| 5 | use autodie; | ||
| 6 | |||
| 7 | dpavlin | 244 | use Test::More tests => 6; |
| 8 | dpavlin | 45 | |
| 9 | use_ok 'dhcpd'; | ||
| 10 | |||
| 11 | ok( ! $dhcpd::transaction, 'transaction' ); | ||
| 12 | dpavlin | 244 | |
| 13 | ok( dhcpd::in_our_range($_), "in_our_range $_" ) foreach ( qw/0.0.0.0 172.16.10.1/ ); | ||
| 14 | ok( ! dhcpd::in_our_range($_), "! in_our_range $_" ) foreach ( qw/10.60.0.42 161.53.120.3/ ); |
| Name | Value |
|---|---|
| svn:executable | * |
| ViewVC Help | |
| Powered by ViewVC 1.1.26 |