--- lib/PXElator/ip.pm 2009/08/27 19:58:56 316 +++ lib/PXElator/ip.pm 2009/09/09 14:27:02 413 @@ -118,4 +118,16 @@ join( '.', unpack('C4', pack('N',shift)) ) } +sub in_dhcp_range { + my $ip = shift; + my $i = to_int($ip) & to_int($server::netmask); + my $s = to_int($server::ip) & to_int($server::netmask); + + if ( $i == $s ) { + $i = to_int($ip) & ( to_int($server::netmask) ^ 0xffffffff ); + return 1 if ( $i >= $server::ip_from && $i <= $server::ip_to ); + } + return 0; +} + 1;