RepoMirrors
/
mars
mirror of https://github.com/schoebel/mars
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

marsadm: new command 'cron'

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