From: Jeremy Davis <jeremyd@freeside.biz>
Date: Mon, 6 Apr 2015 20:08:05 +0000 (-0400)
Subject: freeside-backup
X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=commitdiff_plain;h=e34541531eb37fe02b33c614cd9c48b7638347f2

freeside-backup
---

diff --git a/FS/bin/freeside-backup b/FS/bin/freeside-backup
new file mode 100644
index 000000000..25e74a451
--- /dev/null
+++ b/FS/bin/freeside-backup
@@ -0,0 +1,42 @@
+#!/usr/bin/perl -w
+
+use strict;
+use Getopt::Std;
+use FS::UID qw(adminsuidsetup);
+use FS::Conf;
+
+my $user = shift or die &usage;
+adminsuidsetup $user;
+
+#you can skip this just by not having the config
+use FS::Cron::backup qw(backup);
+backup();
+
+sub usage {
+  die "Usage:\n\n  freeside-backup user\n";
+}
+
+###
+# documentation
+###
+
+=head1 NAME
+
+freeside-backup - Runs a backup
+
+=head1 SYNOPSIS
+
+  freeside-backup user
+
+=head1 DESCRIPTION
+
+Runs a backup.  See the dump-scpdest and dump-localdest configuration options.
+
+=head1 BUGS
+
+=head1 SEE ALSO
+
+=cut
+
+1;
+