|
Server : Apache/2.2.2 (Fedora) System : Linux App1.pathumtani.go.th 2.6.20-1.2320.fc5smp #1 SMP Tue Jun 12 19:40:16 EDT 2007 i686 User : apache ( 48) PHP Version : 5.2.9 Disable Function : NONE Directory : /usr/libexec/webmin/frox/ |
Upload File : |
#!/usr/bin/perl
# Display icons for the various Frox config sections
require './frox-lib.pl';
# Make sure frox is installed
if (!-r $config{'frox_conf'} && -r $config{'alt_frox_conf'}) {
system("cp ".quotemeta($config{'alt_frox_conf'})." ".
quotemeta($config{'frox_conf'}));
}
if (!-r $config{'frox_conf'}) {
&ui_print_header(undef, $text{'index_title'}, "", "intro", 1, 1);
&ui_print_endpage(
&ui_config_link('index_econf',
[ "<tt>$config{'frox_conf'}</tt>", undef ]));
}
if (!&has_command($config{'frox'})) {
&ui_print_header(undef, $text{'index_title'}, "", "intro", 1, 1);
&ui_print_endpage(
&ui_config_link('index_ecmd',
[ "<tt>$config{'frox'}</tt>", undef ]));
}
# Get the version
# XXX
# Show icons
&ui_print_header(undef, $text{'index_title'}, "", "intro", 1, 1, 0,
&help_search_link("frox", "man", "doc", "google"),
undef, undef,
&text('index_version', $frox_version));
@names = ( "net", "general", "ftp", "cache", "acl" );
push(@names, "iptables") if (&foreign_check("firewall"));
@titles = map { $text{$_."_title"} } @names;
@icons = map { "images/$_.gif" } @names;
@links = map { "edit_${_}.cgi" } @names;
&icons_table(\@links, \@titles, \@icons);
# Show start/stop/apply buttons
$conf = &get_config();
if (&find_value("FromInetd", $conf) ne "yes") {
print &ui_hr();
print &ui_buttons_start();
if (&is_frox_running()) {
print &ui_buttons_row("apply.cgi", $text{'index_apply'},
$text{'index_applydesc'});
print &ui_buttons_row("stop.cgi", $text{'index_stop'},
$text{'index_stopdesc'});
}
else {
print &ui_buttons_row("start.cgi", $text{'index_start'},
$text{'index_startdesc'});
}
print &ui_buttons_end();
}
else {
print "<b>$text{'index_inetd'}</b><p>\n";
}
&ui_print_footer("/", $text{'index'});