From 040397a67e592c0205768d366e03372047b5833f Mon Sep 17 00:00:00 2001
From: Dominik Meyer <dmeyer@federationhq.de>
Date: Fri, 1 Mar 2024 21:42:18 +0100
Subject: [PATCH] ADD: set defaultPriority by attribute

also adds all ntfy supported priorities.

CLOSES: #11
TIME: 30m
---
 FHEM/98_NTFY_CLIENT.pm | 52 ++++++++++++++++++++++++++++--------------
 1 file changed, 35 insertions(+), 17 deletions(-)

diff --git a/FHEM/98_NTFY_CLIENT.pm b/FHEM/98_NTFY_CLIENT.pm
index 0871f41..50fdc2b 100644
--- a/FHEM/98_NTFY_CLIENT.pm
+++ b/FHEM/98_NTFY_CLIENT.pm
@@ -56,9 +56,11 @@ use constant {
     LOG_RECEIVE         => 4,
     LOG_DEBUG           => 5,
 
+    PRIO_MAX            => 5,
+    PRIO_HIGH           => 4,
     PRIO_DEFAULT        => 3,
-    PRIO_HIGH           => 5,
-    PRIO_LOW            => 2
+    PRIO_LOW            => 2,
+    PRIO_MIN            => 1
 };
 
 # NTFY logging method
@@ -114,7 +116,7 @@ sub NTFY_CLIENT_Initialize
   $hash->{ParseFn}    = 'NTFY_Parse';
   $hash->{DeleteFn}   = 'NTFY_Delete';
   $hash->{AttrList}   = "defaultTopic " .
-                        ""
+                        "defaultPriority:max,high,default,low,min "
                         . $readingFnAttributes;
 
 }
@@ -275,7 +277,7 @@ sub NTFY_Create_Msg_From_Arguments
   my @keywords;
   my $text;
   my $title;
-  my $priority = AttrVal($name, "defaultPriority", PRIO_DEFAULT);
+  my $priority = AttrVal($name, "defaultPriority", "default");
 
   my $string=join(" ",@args);
   my $tmpmessage = $string =~ s/\\n/\x0a/rg;
@@ -298,19 +300,7 @@ sub NTFY_Create_Msg_From_Arguments
     }
     elsif (substr($a,0,1) eq "!")
     {
-      my $tmpPriority=substr($a,1,length($a));
-      if ($tmpPriority eq "default")
-      {
-        $priority=PRIO_DEFAULT;
-      }
-      elsif($tmpPriority eq "high")
-      {
-        $priority=PRIO_HIGH;
-      }
-      elsif($tmpPriority eq "low")
-      {
-        $priority=PRIO_LOW;
-      }
+      $priority=lc(substr($a,1,length($a)));
     }
     elsif (substr($a,0,1) eq "*")
     {
@@ -323,6 +313,32 @@ sub NTFY_Create_Msg_From_Arguments
   }
   chop $text;
   
+  if ($priority eq "default")
+      {
+        $priority=PRIO_DEFAULT;
+      }
+      elsif($priority eq "max")
+      {
+        $priority=PRIO_MAX;
+      }
+      elsif($priority eq "high")
+      {
+        $priority=PRIO_HIGH;
+      }
+      elsif($priority eq "low")
+      {
+        $priority=PRIO_LOW;
+      }
+      elsif($priority eq "min")
+      {
+        $priority=PRIO_MIN;
+      }
+      else 
+      {
+        $priority=PRIO_DEFAULT;
+      }
+
+
   if (@topics == 0)
   {
     my $defaultTopic = AttrVal($name, "defaultTopic",undef);
@@ -337,6 +353,8 @@ sub NTFY_Create_Msg_From_Arguments
     }
   }
 
+
+
   my $msg = 
   {
       topics => \@topics,