routeros-scripts/email-backup
Christian Hesse ceaa83b83e global-functions: merge $LogAnd{Error,Put} to $LogPrintExit ...
... and fix logging.

Logging with severity from variable (:log $severity ...) is not
possible, this is considered a syntax error. Also the 'workaround' with
parsing code failed with missing message in log.

The reliable code is a lot longer, so merge the two functions to save a
lot of duplicate code.
2020-02-26 14:19:54 +01:00

53 lines
1.5 KiB
Text

#!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 LogPrintExit;
:if ($BackupSendBinary != true && \
$BackupSendExport != true) do={
$LogPrintExit error ("Configured to send neither backup nor config export.") true;
}
# 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;
}