2018-08-24 16:16:56 +02:00
|
|
|
#
|
2018-08-06 14:37:28 +02:00
|
|
|
# RouterOS script: sms-forward
|
2018-07-05 15:29:26 +02:00
|
|
|
# Copyright (c) 2013-2018 Christian Hesse <mail@eworm.de>
|
|
|
|
|
#
|
|
|
|
|
# forward SMS to e-mail
|
|
|
|
|
|
|
|
|
|
:global "identity";
|
|
|
|
|
:global "email-general-to";
|
|
|
|
|
:global "email-general-cc";
|
|
|
|
|
|
|
|
|
|
# check mail server
|
2018-08-06 14:37:28 +02:00
|
|
|
:if ([ / tool netwatch get [ find where comment=[ / tool e-mail get address ] ] status ] != "up") do={
|
2018-07-05 15:29:26 +02:00
|
|
|
:error "Mail server is not up.";
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
# forward SMS in a loop
|
2018-08-06 16:05:34 +02:00
|
|
|
:foreach sms in=[ / tool sms inbox find where message~"^([^:][^c][^m][^d][^ ])" ] do={
|
2018-07-05 15:29:26 +02:00
|
|
|
:local message [ / tool sms inbox get $sms message ];
|
|
|
|
|
:local phone [ / tool sms inbox get $sms phone ];
|
|
|
|
|
:local timestamp [ / tool sms inbox get $sms timestamp ];
|
|
|
|
|
:local type [ / tool sms inbox get $sms type ];
|
|
|
|
|
/ tool e-mail send to=$"email-general-to" cc=$"email-general-cc" \
|
|
|
|
|
subject=("[" . $identity . "] SMS Forwarding") \
|
|
|
|
|
body=("A message was received by " . $identity . ":\n\n" . \
|
|
|
|
|
"Phone: " . $phone . "\n" . \
|
|
|
|
|
"Timestamp: " . $timestamp . "\n" . \
|
|
|
|
|
"Type: " . $type . "\n\n" . \
|
|
|
|
|
"Message:\n" . $message);
|
|
|
|
|
/ tool sms inbox remove $sms;
|
|
|
|
|
}
|
