Parent Directory | Revision Log | Patch
revision 200 by dpavlin, Tue Aug 11 15:55:26 2009 UTC | revision 201 by dpavlin, Tue Aug 11 23:38:53 2009 UTC | |
---|---|---|
# | Line 84 sub process_packet { | Line 84 sub process_packet { |
84 | my $mac = substr($dhcp->chaddr(),0,$dhcp->hlen()*2); | my $mac = substr($dhcp->chaddr(),0,$dhcp->hlen()*2); |
85 | my $ip = client_ip($mac); | my $ip = client_ip($mac); |
86 | ||
87 | my $hostname = $dhcp->getOptionValue(DHO_HOST_NAME); | |
88 | print "$ip ", client::conf( $ip => 'hostname', default => $hostname ), " >> /etc/hosts\n"; | |
89 | ||
90 | =for later | =for later |
91 | ||
92 | my $user_class = $dhcp->getOptionValue(DHO_USER_CLASS()); | my $user_class = $dhcp->getOptionValue(DHO_USER_CLASS()); |
|
ViewVC Help | |
Powered by ViewVC 1.1.26 |