rebuild mac links

diff --git a/lib/PXElator/client.pm b/lib/PXElator/client.pm
index a66f90f..cc889a7 100644 (file)
--- a/lib/PXElator/client.pm
+++ b/lib/PXElator/client.pm
@@ -194,4 +194,16 @@ sub arp_mac_dev {
        return $arp;
 }
 
+sub rebuild_mac_links {
+       warn "# rebuild mac links";
+       foreach my $ip ( all_ips ) {
+               my $mac = ip_path $ip, 'mac';
+               if ( -e $mac ) {
+                       $mac = read_file $mac;
+                       save_ip_mac( $ip, $mac );
+                       warn "## $ip $mac\n";
+               }
+       }
+}
+
 1;

diff --git a/lib/PXElator/httpd.pm b/lib/PXElator/httpd.pm
index 6325d95..89a6357 100644 (file)
--- a/lib/PXElator/httpd.pm
+++ b/lib/PXElator/httpd.pm
@@ -467,6 +467,7 @@ sub start {
        print "url $url\n";
 
        syslogd::install_local;
+       client::rebuild_mac_links;
 
        while (1) {
                my $client = $server->accept() || next; # ALARM trickle us