From f61507920beeffa925c1dd13d76939e0352e2ae7 Mon Sep 17 00:00:00 2001
From: Steve Kemp <steve@steve.org.uk>
Date: Wed, 21 Sep 2016 14:26:09 +0300
Subject: Import byteback-mysql scripts/files from jlawrie.

---
 byteback-mysql/pre-backup.d/00-mysql | 31 +++++++++++++++++++++++++++++++
 1 file changed, 31 insertions(+)
 create mode 100755 byteback-mysql/pre-backup.d/00-mysql

(limited to 'byteback-mysql/pre-backup.d/00-mysql')

diff --git a/byteback-mysql/pre-backup.d/00-mysql b/byteback-mysql/pre-backup.d/00-mysql
new file mode 100755
index 0000000..edfcd56
--- /dev/null
+++ b/byteback-mysql/pre-backup.d/00-mysql
@@ -0,0 +1,31 @@
+#!/usr/bin/perl
+
+use warnings;
+use strict;
+
+use Data::Dumper;
+
+use lib '/etc/byteback/scripts.d';
+use Bytemyback::ini qw(readconf writeconf generateconf);
+
+# Shim script to determine which MySQL backup(s) to run if any
+
+my %config = Bytemyback::ini::readconf();
+if (!%config) {
+    %config = Bytemyback::ini::generateconf();
+}
+
+# Backup directory shouldn't be world-readable
+system("mkdir -p /var/backups/byteback");
+system("chmod 700 /var/backups/byteback");
+
+# List of each script to run (not mutually exclusive). Generated automatically if it doesn't exist
+
+my $backup_method = $config{'backup_method'};
+
+foreach my $method (keys %$backup_method) {
+    next unless $backup_method->{$method};
+    print "Running /etc/byteback/scripts.d/Bytemyback/${method} pre\n";
+    `/etc/byteback/scripts.d/Bytemyback/${method} pre` if (-x "/etc/byteback/scripts.d/Bytemyback/${method}");
+    print "Finished /etc/byteback/scripts.d/Bytemyback/${method} pre\n";
+}
-- 
cgit v1.2.1