⚝
One Hat Cyber Team
⚝
Your IP:
216.73.216.133
Server IP:
185.119.109.197
Server:
Linux managedhosting.chostar.me 5.15.0-160-generic #170-Ubuntu SMP Wed Oct 1 10:06:56 UTC 2025 x86_64
Server Software:
Apache
PHP Version:
8.1.33
Buat File
|
Buat Folder
Eksekusi
Dir :
~
/
usr
/
share
/
webmin
/
virtualmin-awstats
/
Edit File: index.cgi
#!/usr/bin/perl # Show all damains for which awstats is enabled, plus their schedules use strict; use warnings; our (%access, %text); our $module_name; require './virtualmin-awstats-lib.pl'; &foreign_require("cron", "cron-lib.pl"); &ui_print_header(undef, $text{'index_title'}, "", undef, 1, 1); # Make sure it is installed my $err = &check_awstats(); if ($err) { print $err,"\n"; print &text('index_econfig', "../config.cgi?$module_name"),"<p>\n"; &foreign_require("software", "software-lib.pl"); my $lnk = &software::missing_install_link( "awstats", $text{'index_awstats'}, "../$module_name/", $text{'index_title'}); print $lnk,"<p>\n" if ($lnk); &ui_print_footer("/", $text{'index'}); exit; } # Build table for domains my @alldoms = &list_configs(); my @doms = grep { &can_domain($_) } @alldoms; my @table; foreach my $d (sort { $a cmp $b } @doms) { my $conf = &get_config($d); my $log = &find_value("LogFile", $conf); my $job = &find_cron_job($d); push(@table, [ $access{'editsched'} ? "<a href='edit.cgi?dom=$d'>$d</a>" : $d, $log, $job ? &text('index_yes', &cron::when_text($job)) : $text{'index_no'}, &ui_links_row([ "<a href='view.cgi?config=$d'>$text{'index_view'}</a>", "<a href='config.cgi?dom=$d'>$text{'index_conf'}</a>", ]), ]); } # Show domains table print &ui_form_columns_table( undef, undef, 0, $access{'create'} ? [ [ "edit.cgi?new=1", $text{'index_add'} ] ] : [ ], undef, [ $text{'index_dom'}, $text{'index_log'}, $text{'index_sched'}, $text{'index_report'} ], undef, \@table, undef, 0, undef, $text{'index_none'}); &ui_print_footer("/", $text{'index'});
Simpan