Fix: Back link on update page and scheduled page return to awstats main page.
#!/usr/bin/perl
# index.cgi
# Display available config files
+# $Revision$ - $Author$ - $Date$
require './awstats-lib.pl';
next if (!&can_edit_config($l));
$nbofallowedconffound++;
+ # Head of config file's table list
if ($nbofallowedconffound == 1) {
print "<a href='edit_config.cgi?new=1'>$text{'index_add'}</a>\n" if ($access{'add'});
print "<table border width=100%>\n";
- print "<tr $tb> <td rowspan=2><b>$text{'index_path'}</b></td> ";
+ print "<tr $tb>";
+ print "<td rowspan=2 colspan=2><b>$text{'index_path'}</b></td> ";
print "<td rowspan=2 align=center><b>$text{'index_create'}</b></td> ";
#print "<td rowspan=2 align=center><b>$text{'index_databasesize'}</b></td> ";
print "<td colspan=2 align=center><b>$text{'index_update'}</b></td> ";
print "<tr $tb><td align=center>$text{'index_scheduled'}</td><td align=center>$text{'index_now'}</td></tr>\n";
}
+ # Config file line
local @files = &all_config_files($l);
next if (!@files);
local $lconf = &get_config($l);
print "<tr $cb>\n";
+ print "<td width=\"40\" align=\"center\">$nbofallowedconffound</td>";
+
local ($size, $latest);
print "<td>";
print "$l";
update_title=Update statistics
update_ecannot=You are not allowed to update statistics
+update_run=Run update process with command
+update_finished=Update process finished
+update_wait=Please wait
scheduled_title=Schedule statistic's update
scheduled_ecannot=You are not allowed to update or schedule update process
update_title=Mise à jour des statistiques
update_ecannot=Vous n'êtes pas autorisé à mettre à jour les statistiques
+update_run=Lancement de la mise à jour par la commande
+update_finished=Mise a jour terminée
+update_wait=Merci de patienter
scheduled_title=Programmation de mise à jour
scheduled_ecannot=Vous n'êtes pas autorisé à mettre à jour ou programmer une mise à jour des statistiques
&foreign_require("logrotate", "logrotate-lib.pl");\r
# For global update
-print "<u>Update processes scheduled by a <b>cron</b> task :</u><br><br>";
-print "<table border width=100% cellpadding=4 cellspacing=2>\n";
+print "<u>List of update processes scheduled by a <b>cron</b> task :</u><br><br>";
+print "<table border width=100%>\n";
print "<tr $tb><td align=left>User</td>";
print "<td>Task</td><td align=center>Active</td><td>Note on task</td><td>Action</td></tr>\n";
# For logrotate scheduling
-print "<u>Update processes scheduled by a <b>logrotate</b> task :</u><br><br>";
+print "<u>List of update processes scheduled by a <b>logrotate</b> task :</u><br><br>";
print "<table border width=100%>\n";
print "<tr $tb><td>Logrotate file</td>";
print "<td>Task</td><td>Note on task</td><td>Action</td></tr>\n";
if ( foreign_installed('logrotate', 0) ) {
-
-
+ print "<tr><td colspan=4>This feature is not yet available</td></tr>";
}
else {
print "<tr><td colspan=4>Webmin logrotate module is not installed. It is required to setup logrotate scheduled tasks</td></tr>";
}
print "</table>";
-print "<br>\n";
+print "<br><br>\n";
+
+# Back to config list
+print "<hr>\n";
+&footer("", $text{'index_return'});
0;
#!/usr/bin/perl
# update_stats.cgi
-# run AWStats update process
+# Run AWStats update process
+# $Revision$ - $Author$ - $Date$
require './awstats-lib.pl';
&ReadParse();
print "<hr>\n";
my $command=$config{'awstats'}." -update -config=$conf -configdir=$dir";
-print "Run update process with command:\n<br>\n";
+print $text{'update_run'}.":\n<br>\n";
print "$command<br>\n";
-print "\Please wait...<br>\n";
+print $text{'update_wait'}."...<br>\n";
print "<br>\n";
&foreign_require("proc", "proc-lib.pl");
#print "$retour\n";
print "<hr>\n";
-print "Update process finished<br>\n";
+print $text{'update_finished'}.".<br>\n";
print "<br>\n";
-&footer( "/", $text{ 'index' } );\r
+
+# Back to config list
+&footer("", $text{'index_return'});
0;