$node is rebooting
\n"; print "
The LAN subnet has changed. You will need to acquire a new DHCP lease
";
print "and reset any name service caches you may be using.
\n"; print "
When the node reboots you get your new DHCP lease and reconnect with
\n";
print "http://localnode.local.mesh:8080/
or
\n";
print "http://$node.local.mesh:8080/
\n";
}
else
{
html_header("$node rebooting", 0);
print "\n";
print "$node is rebooting
\n"; print "
Your browser should return to this node in 60 seconds.
\n";
print "If something goes astray you can try to connect with
";
print "http://localnode.local.mesh:8080/
or
\n";
print "http://$node.local.mesh:8080/
\n";
}
print "";
#AREDN Banner
print "![](\"/AREDN.png\")
";
# Device compatibility alert
if ( is_hardware_supported() != 1 ){
if (is_hardware_supported() == 0 ){
print "\n";
}
elsif ( is_hardware_supported() == -2 ){
print "\n";
}
else {
print "\n";
}
}
#TopBanner
print "
";
}
sub page_footer
{
print ""
}
sub get_interface
{
my ($intf) = @_;
my $intfname = `uci -q get network.$intf.ifname`;
chomp $intfname;
if ($intfname) {
return $intfname;
} else {
# Capture rules incase uci file is not in sync.
if ( $intf eq "lan" )
{
return "eth0";
} elsif ( $intf eq "wan" ){
return "eth0.1";
} elsif ( $intf eq "wifi" ){
return "wlan0";
} elsif ( $intf eq "dtdlink" ){
return "eth0.2";
} else {
# we have a problem
die("Unknown interface in call to get_interface");
}
}
}
sub reboot_required()
{
http_header();
html_header("$node setup", 1);
print "| \n"; navbar("vpn"); print " |
"; if($config eq "") { print "This page is not available until the configuration has been set."; } else { print "The configuration has been changed. This page will not be available until the node is rebooted.\n"; print ""; } print " |