In diesem Menue koennen Sie ihren IPFire administrieren.
END ; &Header::closebox(); &Header::openbox('100%', 'center', &Header::cleanhtml(`/bin/uname -n`,"y")); if ( ( $pppsettings{'VALID'} eq 'yes' && $modemsettings{'VALID'} eq 'yes' ) || ( $netsettings{'CONFIG_TYPE'} =~ /^(2|3|6|7)$/ && $netsettings{'RED_TYPE'} =~ /^(DHCP|STATIC)$/ )) { if (open(IPADDR,"${General::swroot}/ddns/ipcache")) { $ipaddr =$Lang::tr{'network'} | IP | $Lang::tr{'status'} | ||||||||||||||||||||||
---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|
$Lang::tr{'internet'}: | $ipaddr | $connstate | ||||||||||||||||||||||
$Lang::tr{'lan'}:
| $netsettings{'GREEN_ADDRESS'}
|
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 < | $Lang::tr{'wireless'}: | $netsettings{'BLUE_ADDRESS'}
|
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 < | $Lang::tr{'dmz'}: | $netsettings{'ORANGE_ADDRESS'}
| Online
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-`;
print < | $Lang::tr{'vpn'}: | $ipsecip
| Online
END
}
if ( `cat /var/ipfire/ovpn/settings | grep ^ENABLED=on` ||
`cat /var/ipfire/ovpn/settings | grep ^ENABLED_BLUE=on` ||
`cat /var/ipfire/ovpn/settings | grep ^ENABLED_ORANGE=on`) {
my $ovpnip = `cat /var/ipfire/ovpn/settings | grep ^DOVPN_SUBNET= | cut -c 14- | sed -e 's\/\\/255.255.255.0\/\/'`;
print < | OpenVPN: | $ovpnip
| Online
END
}
if ( $netsettings{'DNS1'} ) { print < | DNS-Server: | $netsettings{'DNS1'}
END
}
if ( $netsettings{'DNS2'} ) { print < | $warnmessage | |