email-backup


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53

#!rsc
# RouterOS script: email-backup
# Copyright (c) 2013-2020 Christian Hesse <mail@eworm.de>
#
# create and email backup and config file

:global Identity;
:global Domain;
:global EmailBackupTo;
:global EmailBackupCc;
:global BackupSendBinary;
:global BackupSendExport;
:global BackupPassword;

:global CharacterReplace;
:global DeviceInfo;
:global LogAndError;

:if ($BackupSendBinary != true && \
     $BackupSendExport != true) do={
  $LogAndError ("Configured to send neither backup nor config export.");
}

# filename based on identity
:local FileName [ $CharacterReplace ($Identity . "." . $Domain) "." "_" ];
:local BackupFile "none";
:local ConfigFile "none";
:local Attach [ :toarray "" ];

# binary backup
:if ($BackupSendBinary = true) do={
  / system backup save encryption=aes-sha256 name=$FileName password=$BackupPassword;
  :set BackupFile ($FileName . ".backup");
  :set Attach ($Attach, $BackupFile);
}

# create configuration export
:if ($BackupSendExport = true) do={
  / export terse file=$FileName;
  :set ConfigFile ($FileName . ".rsc");
  :set Attach ($Attach, $ConfigFile);
}

# send email with status and files
/ tool e-mail send to=$EmailBackupTo cc=$EmailBackupCc \
    subject=("[" . $Identity . "] Backup & Config") \
    body=("See attached files for backup and config export for " . \
      $Identity . ".\n\n" . \
      [ $DeviceInfo ] . "\n\n" . \
      "Backup file:    " . $BackupFile . "\n" . \
      "Config file:    " . $ConfigFile) \
    file=$Attach;
}