From 1c4dfeaa4aef8121377821184c0ed798605e6282 Mon Sep 17 00:00:00 2001 From: Christian Hesse Date: Thu, 25 Jul 2019 13:17:51 +0200 Subject: sms-forward: get values into arrays --- sms-forward | 13 +++++-------- 1 file changed, 5 insertions(+), 8 deletions(-) (limited to 'sms-forward') diff --git a/sms-forward b/sms-forward index 1c50552..6a3cf70 100644 --- a/sms-forward +++ b/sms-forward @@ -14,8 +14,7 @@ :error "Warning: See log for details."; } -:local Allowed [ / tool sms get allowed-number ]; -:local Secret [ / tool sms get secret ]; +:local Settings [ / tool sms get ]; # forward SMS in a loop :while ([ / tool sms inbox print count-only ] > 0) do={ @@ -24,16 +23,14 @@ :local Delete [ :toarray "" ]; :foreach Sms in=[ / tool sms inbox find where phone=$Phone ] do={ - :local Message [ / tool sms inbox get $Sms message ]; - :local TimeStamp [ / tool sms inbox get $Sms timestamp ]; - :local Type [ / tool sms inbox get $Sms type ]; + :local SmsVal [ / tool sms inbox get $Sms ]; - :if ($Phone = $Allowed && $Message~("^:cmd " . $Secret . " script ")) do={ + :if ($Phone = $Settings->"allowed" && ($SmsVal->"message")~("^:cmd " . $Settings->"secret" . " script ")) do={ :log debug "Removing SMS, which started a script."; / tool sms inbox remove $Sms; } else={ - :set Messages ($Messages . "\n\nOn " . $TimeStamp . \ - " type " . $Type . ":\n" . $Message); + :set Messages ($Messages . "\n\nOn " . $SmsVal->"timestamp" . \ + " type " . $SmsVal->"type" . ":\n" . $SmsVal->"message"); :set Delete ($Delete, $Sms); } } -- cgit v1.2.3-70-g09d2