equal
deleted
inserted
replaced
1 #! /usr/bin/perl -w |
1 #! /usr/bin/perl -w |
2 |
2 |
3 # Copyright (C) 2011 Christian Arnold |
3 # Copyright (C) 2011-2013 Christian Arnold |
|
4 # Copyright (C) 2013 Matthias Förste |
4 # |
5 # |
5 # This program is free software: you can redistribute it and/or modify |
6 # This program is free software: you can redistribute it and/or modify |
6 # it under the terms of the GNU General Public License as published by |
7 # it under the terms of the GNU General Public License as published by |
7 # the Free Software Foundation, either version 3 of the License, or |
8 # the Free Software Foundation, either version 3 of the License, or |
8 # (at your option) any later version. |
9 # (at your option) any later version. |
13 # GNU General Public License for more details. |
14 # GNU General Public License for more details. |
14 # |
15 # |
15 # You should have received a copy of the GNU General Public License |
16 # You should have received a copy of the GNU General Public License |
16 # along with this program. If not, see <http://www.gnu.org/licenses/>. |
17 # along with this program. If not, see <http://www.gnu.org/licenses/>. |
17 # |
18 # |
18 # Christian Arnold <arnold@schlittermann.de> |
19 # Christian Arnold <arnold@schlittermann.de>, Matthias Förste <foerste@schlittermann.de> |
19 |
20 |
20 use strict; |
21 use strict; |
21 use File::Basename; |
22 use File::Basename; |
22 use Getopt::Long; |
23 use Getopt::Long; |
23 use Compress::Zlib; |
24 use Compress::Zlib; |
36 sub get_status($); |
37 sub get_status($); |
37 sub report($); |
38 sub report($); |
38 sub version($$); |
39 sub version($$); |
39 |
40 |
40 my $ME = basename $0; |
41 my $ME = basename $0; |
41 my $VERSION = "2.4"; |
42 my $VERSION = "2.5"; |
42 |
43 |
43 my %opt = ( |
44 my %opt = ( |
44 binary => "/usr/bin/rsnapshot", |
45 binary => "/usr/bin/rsnapshot", |
45 logfile => "/var/log/rsnapshot.log", |
46 logfile => "/var/log/rsnapshot.log", |
46 seconds => 86400, |
47 seconds => 86400, |
151 my $progname = shift; |
152 my $progname = shift; |
152 my $version = shift; |
153 my $version = shift; |
153 |
154 |
154 print <<_VERSION; |
155 print <<_VERSION; |
155 $progname version $version |
156 $progname version $version |
156 Copyright (C) 2011 by Christian Arnold and Schlittermann internet & unix support. |
157 Copyright (C) 2011-2013 by Christian Arnold and Schlittermann internet & unix |
|
158 support. |
|
159 |
|
160 Copyright (C) 2013 by Matthias Förste and Schlittermann internet & unix support. |
157 |
161 |
158 $ME comes with ABSOLUTELY NO WARRANTY. This is free software, |
162 $ME comes with ABSOLUTELY NO WARRANTY. This is free software, |
159 and you are welcome to redistribute it under certain conditions. |
163 and you are welcome to redistribute it under certain conditions. |
160 See the GNU General Public Licence for details. |
164 See the GNU General Public Licence for details. |
161 _VERSION |
165 _VERSION |
217 |
221 |
218 check_rsnapshot -s 172800 -l /var/log/rsnapshot/rsnapshot.log -d "2 days ago" |
222 check_rsnapshot -s 172800 -l /var/log/rsnapshot/rsnapshot.log -d "2 days ago" |
219 |
223 |
220 =head1 VERSION |
224 =head1 VERSION |
221 |
225 |
222 This man page is current for version 2.4 of check_rsnapshot. |
226 This man page is current for version 2.5 of check_rsnapshot. |
223 |
227 |
224 =head1 AUTHOR |
228 =head1 AUTHORS |
225 |
229 |
226 Written by Christian Arnold L<arnold@schlittermann.de> |
230 2011-2013 Originally written by Christian Arnold L<arnold@schlittermann.de>. |
|
231 2013 Fixes by Matthias Förste L<foerste@schlittermann.de>. |
227 |
232 |
228 =head1 COPYRIGHT |
233 =head1 COPYRIGHT |
229 |
234 |
230 Copyright (C) 2011 by Christian Arnold and Schlittermann internet & unix support. |
235 Copyright (C) 2011-2013 by Christian Arnold and Schlittermann internet & unix |
231 This is free software, and you are welcome to redistribute it under certain conditions. |
236 support. Copyright (C) 2013 by Matthias Förste and Schlittermann internet & |
232 See the GNU General Public Licence for details. |
237 unix support. This is free software, and you are welcome to redistribute it |
|
238 under certain conditions. See the GNU General Public Licence for details. |
233 |
239 |
234 =cut |
240 =cut |