RepoMirrors/mars
1
0
Fork 0
mirror of https://github.com/schoebel/mars synced 2024-12-12 01:36:06 +00:00
Code Issues Packages Projects Releases Wiki Activity

marsadm: new command 'cron'

Browse Source
This commit is contained in:
Thomas Schoebel-Theuer 2017-02-22 08:22:49 +01:00
parent 7f7b6b99a7
commit ab51a56b0b
1 changed files with 21 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

24
userspace/marsadm
View File

@ -2060,6 +2060,14 @@ sub logdelete_res {
}
}
sub cron_res {
my ($cmd, $res) = @_;
logrotate_res(@_);
finish_links();
sleep(5);
logdelete_res(@_);
}
sub attach_res_phase0 {
my ($cmd, $res) = @_;
return if $force;
@ -4462,7 +4470,8 @@ my %cmd_table =
=> [
"Only useful at the primary side.",
"Start writing transaction logs into a new transaction logfile.",
"This must be regularly called by a cron job or similar.",
"This should be regularly called by a cron job or similar.",
"For regular maintainance cron jobs, please prefer 'marsadm cron'.",
"For details and best practices, please refer to the PDF manual.",
\&logrotate_res,
],
@ -4472,7 +4481,8 @@ my %cmd_table =
"which is known to be superfluous, i.e. all secondaries no longer",
"need to replay it.",
"Hint: use this only for testing and manual inspection.",
"For regular maintainance cron jobs, please prefer log-delete-all.",
"For regular maintainance cron jobs, please prefer cron",
"or log-delete-all.",
\&logdelete_res,
],
"log-delete-all"
@ -4482,9 +4492,17 @@ my %cmd_table =
"to replay them.",
"This must be regularly called by a cron job or similar, in order",
"to prevent overflow of the /mars/ directory.",
"For regular maintainance cron jobs, please prefer 'marsadm cron'.",
"For details and best practices, please refer to the PDF manual.",
\&logdelete_res,
],
"cron"
=> [
"usage: cron (no parameters)",
"Do all necessary regular housekeeping tasks.",
"This is equivalent to log-rotate all; sleep 5; log-delete-all all.",
\&cron_res,
],
"log-purge-all"
=> [
"This is potentially dangerous.",
@ -5210,7 +5228,7 @@ if ($cmd !~ m/(create|join)-cluster|create-uuid|cat|view|pretty/) {
}
my $res = "";
if ($cmd =~ "show") {
if ($cmd =~ "show|cron") {
$res = shift @args || "all";
} elsif ($cmd =~ m/^(view|pretty)/) {
$res = shift @args || "";