#!/usr/bin/perl
require "gray-theme/gray-theme-lib.pl";
require "gray-theme/theme.pl";
&ReadParse();
# Work out which module to open by default
$hasvirt = &foreign_available("virtual-server");
$hasvm2 = &foreign_available("server-manager");
if ($in{'dom'} && $hasvirt) {
# Caller has requested a specific domain ..
&foreign_require("virtual-server", "virtual-server-lib.pl");
$d = &virtual_server::get_domain($in{'dom'});
if ($d) {
$goto = &virtual_server::can_config_domain($d) ?
"virtual-server/edit_domain.cgi?dom=$d->{'id'}" :
"virtual-server/view_domain.cgi?dom=$d->{'id'}";
$left = "left.cgi?dom=$d->{'id'}";
}
}
if (!$goto) {
# Default is determined by theme or Webmin config,
# defaults to system info page
local $sects = &get_right_frame_sections();
$minfo = &get_goto_module();
if ($sects->{'list'} == 1 && $hasvirt) {
$goto = "virtual-server/";
}
elsif ($sects->{'list'} == 2 && $hasvm2) {
$goto = "server-manager/";
}
elsif ($minfo &&
$minfo->{'dir'} ne 'virtual-server' &&
$minfo->{'dir'} ne 'server-manager') {
$goto = "$minfo->{'dir'}/";
}
else {
$goto = "right.cgi".
"?open=system&auto=status&open=updates&".
"open=common&open=owner&open=reseller&open=vm2limits&".
"open=vm2usage";
}
$left = "left.cgi";
if ($minfo) {
$left .= "?$minfo->{'category'}=1";
}
}
# Work out the title that includes the version
if ($hasvirt) {
%minfo = &get_module_info("virtual-server");
$title = &text('index_virtualmintitle', $minfo{'version'});
}
elsif ($hasvm2) {
%minfo = &get_module_info("server-manager");
$title = &text('index_cloudmintitle', $minfo{'version'});
}
elsif (&get_product_name() eq 'usermin') {
$title = &text('index_usermintitle', &get_webmin_version());
}
else {
$title = &text('index_webmintitle', &get_webmin_version());
}
$title = &get_html_title($title);
# Work out if we have a top frame
if ($hasvirt) {
%vconfig = &foreign_config("virtual-server");
}
$upperframe = $vconfig{'theme_topframe'} ||
$gconfig{'theme_topframe'};
$upperrows = $vconfig{'theme_toprows'} ||
$gconfig{'theme_toprows'} || 200;
if ($upperframe =~ /\$LEVEL|\$\{LEVEL/) {
# Sub in user level
$levelnum = &get_virtualmin_user_level();
$level = $levelnum == 0 ? "master" :
$levelnum == 1 ? "reseller" :
$levelnum == 2 ? "domain" :
$levelnum == 3 ? "usermin" :
$levelnum == 4 ? "owner" : "unknown";
$upperframe = &substitute_template($upperframe, { 'level' => $level });
}
# Show frameset
&PrintHeader();
$cols = &get_left_frame_width();
$frame1 = "<frame name=left title=Navigation src='$left' scrolling=auto>";
$frame2 = "<frame name=right title=Content src='$goto' noresize scrolling=auto>";
$fscols = "$cols,*";
if ($current_lang_info->{'rtl'} || $current_lang eq "ar") {
($frame1, $frame2) = ($frame2, $frame1);
$fscols = "*,$cols";
}
# Page header
print "<html>\n";
print "<head>\n";
print "<title>$title</title>\n";
my $imgdir = "@{[&get_webprefix()]}/images";
my $prod = 'webmin';
if (foreign_available("server-manager")) {
$prod = 'cloudmin';
}
elsif (foreign_available("virtual-server")) {
$prod = 'virtualmin';
}
elsif (get_product_name() eq 'usermin') {
$prod = 'usermin';
}
print "<link rel='icon' type='image/png' sizes='16x16' href='$imgdir/favicons/$prod/favicon-16x16.png'>\n";
print "<link rel='icon' type='image/png' sizes='32x32' href='$imgdir/favicons/$prod/favicon-32x32.png'>\n";
print "<link rel='icon' type='image/png' sizes='192x192' href='$imgdir/favicons/$prod/favicon-192x192.png'>\n";
print "</head>\n";
# Upper custom frame
if ($upperframe) {
print "<frameset rows='$upperrows,*' border=0>\n";
if ($upperframe =~ /^\//) {
# Local file to serve
print "<frame name=top src='top.cgi' scrolling=auto>\n";
}
else {
# Absolute URL
print "<frame name=top src='$upperframe' scrolling=auto>\n";
}
}
# Left and right frames
print "<frameset cols='$fscols' border=0>\n";
print $frame1,"\n";
print $frame2,"\n";
# What if no frames?
print "<noframes>\n";
print "<body>\n";
print "<p>This page uses frames, but your browser doesn't support them.</p>\n";
print "</body>\n";
print "</noframes>\n";
# End of the frames and page
if ($upperframe) {
print "</frameset>\n";
}
print "</frameset>\n";
print "</html>\n";
| Name | Type | Size | Permission | Actions |
|---|---|---|---|---|
| acl | Folder | 0755 |
|
|
| adsl-client | Folder | 0755 |
|
|
| apache | Folder | 0755 |
|
|
| at | Folder | 0755 |
|
|
| backup-config | Folder | 0755 |
|
|
| bandwidth | Folder | 0755 |
|
|
| bind8 | Folder | 0755 |
|
|
| bsdfdisk | Folder | 0755 |
|
|
| burner | Folder | 0755 |
|
|
| cfengine | Folder | 0755 |
|
|
| change-user | Folder | 0755 |
|
|
| cluster-copy | Folder | 0755 |
|
|
| cluster-cron | Folder | 0755 |
|
|
| cluster-passwd | Folder | 0755 |
|
|
| cluster-shell | Folder | 0755 |
|
|
| cluster-software | Folder | 0755 |
|
|
| cluster-useradmin | Folder | 0755 |
|
|
| cluster-webmin | Folder | 0755 |
|
|
| cpan | Folder | 0755 |
|
|
| cron | Folder | 0755 |
|
|
| custom | Folder | 0755 |
|
|
| dhcpd | Folder | 0755 |
|
|
| dhcpd-2.0 | Folder | 0755 |
|
|
| dnsadmin | Folder | 0755 |
|
|
| dovecot | Folder | 0755 |
|
|
| download | Folder | 0755 |
|
|
| escputil | Folder | 0755 |
|
|
| exports | Folder | 0755 |
|
|
| fdisk | Folder | 0755 |
|
|
| fetchmail | Folder | 0755 |
|
|
| file | Folder | 0755 |
|
|
| firewall | Folder | 0755 |
|
|
| frox | Folder | 0755 |
|
|
| fsdump | Folder | 0755 |
|
|
| generate-acls | Folder | 0755 |
|
|
| gnupg | Folder | 0755 |
|
|
| grub | Folder | 0755 |
|
|
| heartbeat | Folder | 0755 |
|
|
| help | Folder | 0755 |
|
|
| htaccess-htpasswd | Folder | 0755 |
|
|
| htpasswd-file | Folder | 0755 |
|
|
| idmapd | Folder | 0755 |
|
|
| images | Folder | 0755 |
|
|
| inetd | Folder | 0755 |
|
|
| init | Folder | 0755 |
|
|
| inittab | Folder | 0755 |
|
|
| ipchains | Folder | 0755 |
|
|
| ipsec | Folder | 0755 |
|
|
| iptables | Folder | 0755 |
|
|
| iscsi-client | Folder | 0755 |
|
|
| iscsi-server | Folder | 0755 |
|
|
| iscsi-target | Folder | 0755 |
|
|
| jabber | Folder | 0755 |
|
|
| jsample | Folder | 0755 |
|
|
| krb5 | Folder | 0755 |
|
|
| lang | Folder | 0755 |
|
|
| ldap-useradmin | Folder | 0755 |
|
|
| lilo | Folder | 0755 |
|
|
| logrotate | Folder | 0755 |
|
|
| lpadmin | Folder | 0755 |
|
|
| lvm | Folder | 0755 |
|
|
| lvs | Folder | 0755 |
|
|
| mailbox | Folder | 0755 |
|
|
| mailboxes | Folder | 0755 |
|
|
| majordomo | Folder | 0755 |
|
|
| man | Folder | 0755 |
|
|
| mon | Folder | 0755 |
|
|
| mount | Folder | 0755 |
|
|
| mysql | Folder | 0755 |
|
|
| net | Folder | 0755 |
|
|
| nettools | Folder | 0755 |
|
|
| nis | Folder | 0755 |
|
|
| openslp | Folder | 0755 |
|
|
| pam | Folder | 0755 |
|
|
| pap | Folder | 0755 |
|
|
| passwd | Folder | 0755 |
|
|
| phpini | Folder | 0755 |
|
|
| postfix | Folder | 0755 |
|
|
| postgresql | Folder | 0755 |
|
|
| ppp-client | Folder | 0755 |
|
|
| pptp-client | Folder | 0755 |
|
|
| pptp-server | Folder | 0755 |
|
|
| proc | Folder | 0755 |
|
|
| procmail | Folder | 0755 |
|
|
| procyonguide | Folder | 0755 |
|
|
| proftpd | Folder | 0755 |
|
|
| pserver | Folder | 0755 |
|
|
| qmailadmin | Folder | 0755 |
|
|
| quota | Folder | 0755 |
|
|
| raid | Folder | 0755 |
|
|
| samba | Folder | 0755 |
|
|
| sarg | Folder | 0755 |
|
|
| sargreports | Folder | 0755 |
|
|
| sendmail | Folder | 0755 |
|
|
| sentry | Folder | 0755 |
|
|
| servers | Folder | 0755 |
|
|
| shell | Folder | 0755 |
|
|
| shorewall | Folder | 0755 |
|
|
| simple-firewall | Folder | 0755 |
|
|
| smart-status | Folder | 0755 |
|
|
| software | Folder | 0755 |
|
|
| spam | Folder | 0755 |
|
|
| squid | Folder | 0755 |
|
|
| squidguard | Folder | 0755 |
|
|
| squidinfo | Folder | 0755 |
|
|
| squidreports | Folder | 0755 |
|
|
| squidstat | Folder | 0755 |
|
|
| ssh | Folder | 0755 |
|
|
| sshd | Folder | 0755 |
|
|
| status | Folder | 0755 |
|
|
| stunnel | Folder | 0755 |
|
|
| swell-wizard | Folder | 0755 |
|
|
| sysgraph | Folder | 0755 |
|
|
| sysinfo | Folder | 0755 |
|
|
| syslog | Folder | 0755 |
|
|
| sysstats | Folder | 0755 |
|
|
| telnet | Folder | 0755 |
|
|
| template | Folder | 0755 |
|
|
| time | Folder | 0755 |
|
|
| tsunamiguide | Folder | 0755 |
|
|
| tunnel | Folder | 0755 |
|
|
| unauthenticated | Folder | 0755 |
|
|
| updown | Folder | 0755 |
|
|
| useradmin | Folder | 0755 |
|
|
| usermin | Folder | 0755 |
|
|
| vgetty | Folder | 0755 |
|
|
| webalizer | Folder | 0755 |
|
|
| webfetch | Folder | 0755 |
|
|
| webmin | Folder | 0755 |
|
|
| webmin-iptables | Folder | 0755 |
|
|
| webminguide | Folder | 0755 |
|
|
| webminlog | Folder | 0755 |
|
|
| wpad-wizard | Folder | 0755 |
|
|
| wuftpd | Folder | 0755 |
|
|
| xinetd | Folder | 0755 |
|
|
| zones | Folder | 0755 |
|
|
| config | File | 337 B | 0644 |
|
| config.cgi | File | 3.48 KB | 0755 |
|
| config_save.cgi | File | 1.46 KB | 0755 |
|
| edit_overlay.cgi | File | 783 B | 0755 |
|
| edit_right.cgi | File | 3.77 KB | 0755 |
|
| favicon.ico | File | 1.12 KB | 0644 |
|
| gray-theme-lib.pl | File | 4.63 KB | 0755 |
|
| index.cgi | File | 4.19 KB | 0755 |
|
| left.cgi | File | 10.06 KB | 0755 |
|
| pngfix.html | File | 95 B | 0644 |
|
| pngfix.js | File | 1.21 KB | 0644 |
|
| recollect.cgi | File | 277 B | 0755 |
|
| right.cgi | File | 54.67 KB | 0755 |
|
| save_overlay.cgi | File | 902 B | 0755 |
|
| save_right.cgi | File | 1.55 KB | 0755 |
|
| theme.info | File | 151 B | 0644 |
|
| theme.pl | File | 34.32 KB | 0755 |
|
| top.cgi | File | 346 B | 0755 |
|
| uconfig.cgi | File | 2.98 KB | 0755 |
|
| uconfig_save.cgi | File | 1.39 KB | 0755 |
|