+ }
+
+ if ( $netsettings{'GREEN_DEV'} ) { print <<END;
+ <tr><td bgcolor='$Header::colourgreen' width='25%'><a href="/cgi-bin/dhcp.cgi"><font size='2' color='white'><b>$Lang::tr{'lan'}:</b></font></a>
+ <td width='30%'>$netsettings{'GREEN_ADDRESS'}
+ <td width='45%'>
+END
+ if ( `cat /var/ipfire/proxy/advanced/settings | grep ^ENABLE=on` ) {
+ print "Proxy an";
+ if ( `cat /var/ipfire/proxy/advanced/settings | grep ^TRANSPARENT=on` ) { print " (transparent)"; }
+ } else { print "Proxy aus"; }
+ }
+ if ( $netsettings{'BLUE_DEV'} ) { print <<END;
+ <tr><td bgcolor='$Header::colourblue' width='25%'><a href="/cgi-bin/wireless.cgi"><font size='2' color='white'><b>$Lang::tr{'wireless'}:</b></font></a><br>
+ <td width='30%'>$netsettings{'BLUE_ADDRESS'}
+ <td width='45%'>
+END
+ if ( `cat /var/ipfire/proxy/advanced/settings | grep ^ENABLE_BLUE=on` ) {
+ print "Proxy an";
+ if ( `cat /var/ipfire/proxy/advanced/settings | grep ^TRANSPARENT_BLUE=on` ) { print " (transparent)"; }
+ } else { print "Proxy aus"; }
+ }
+ if ( $netsettings{'ORANGE_DEV'} ) { print <<END;
+ <tr><td bgcolor='$Header::colourorange' width='25%'><a href="/cgi-bin/dmzholes.cgi"><font size='2' color='white'><b>$Lang::tr{'dmz'}:</b></font></a><br>
+ <td width='30%'>$netsettings{'ORANGE_ADDRESS'}
+ <td width='45%'><font color=$Header::colourgreen>Online</font>
+END
+ }
+ if ( `cat /var/ipfire/vpn/settings | grep ^ENABLED=on` ||
+ `cat /var/ipfire/vpn/settings | grep ^ENABLED_BLUE=on` ) {
+ my $ipsecip = `cat /var/ipfire/vpn/settings | grep ^VPN_IP= | cut -c 8-`;
+ my @status = `/usr/sbin/ipsec auto --status`;
+ my %confighash = ();
+ &General::readhasharray("${General::swroot}/vpn/config", \%confighash);
+ print <<END;
+ <tr><td bgcolor='$Header::colourvpn' width='25%'><a href="/cgi-bin/vpnmain.cgi"><font size='2' color='white'><b>$Lang::tr{'vpn'}:</b></font></a><br>
+ <td width='30%'>$ipsecip
+ <td width='45%'><font color=$Header::colourgreen>Online</font>