sanity checking for aggregation features

lib/Rose/Controller/Commands.pm6

@@ -16,6 +16,12 @@ submethod TWEAK () {
 }
 
 method despatch($str, :$payload) {
+    CATCH {
+        when X::Command::Despatch::InvalidCommand {
+            return "Invalid command."
+        }
+    }
+
     $.commands.run($str, :$payload);
 }
 
@@ -26,6 +32,19 @@ method toxicity-aggregate($cmd-obj) {
         $user-id = $/;
     }
 
+    unless $user-id ~~ / <(\d+)> / { return my $response = "Invalid user."; }
+
     my $result = $!db.toxicity-aggregate(:user($user-id), :guild($cmd-obj.payload<guild-id>));
-    my $response = "<@$user-id> aggregate threat level $result.";
+
+    if $result == 0 {
+        my $response = "Invalid user.";
+    } else {
+        my $risk = do given $result {
+            when .0 < * <= .4 { $risk = "**LOW**" }
+            when .4 < * <= .7 { $risk = "**MEDIUM**" }
+            when .7 < * { $risk = "**HIGH**" }
+        }
+
+        my $response = "<@$user-id> aggregate threat level $result.round(0.01).\nRisk level classification: $risk.";
+    }
 }

lib/Rose/Persistence/PostgreSQL.pm6

@@ -36,5 +36,5 @@ method toxicity-aggregate(:$guild, :$user) {
     my $query = $!dbi.db.prepare('SELECT AVG("perspective-score") FROM rose_messages WHERE "guild-id" = $1 AND "user-id" = $2 LIMIT 200;');
     my $result = $query.execute($guild, $user);
     $query.finish;
-    return $result.value;
+    return $result.value // 0;
 }