added bot messages as "known negatives" for learning purposes (#44)

fsharplang-ru · Jul 24, 2024 · 187033b · 187033b
1 parent 35ea56a
commit 187033b
Showing 1 changed file with 9 additions and 4 deletions.
diff --git a/src/VahterBanBot/DB.fs b/src/VahterBanBot/DB.fs
@@ -196,10 +196,15 @@ WITH really_banned AS (SELECT *
      spam_or_ham AS (SELECT DISTINCT COALESCE(m.text, re_id.message_text) AS text,
                                      CASE
                                          -- known false negative spam messages
-                                         WHEN EXISTS(SELECT 1
-                                                     FROM false_negative_messages fnm
-                                                     WHERE fnm.chat_id = m.chat_id
-                                                       AND fnm.message_id = m.message_id)
+                                         WHEN (EXISTS(SELECT 1
+                                                      FROM false_negative_messages fnm
+                                                      WHERE fnm.chat_id = m.chat_id
+                                                        AND fnm.message_id = m.message_id)
+                                             -- known banned spam messages by bot, and not marked as false positive
+                                             OR EXISTS(SELECT 1
+                                                       FROM banned_by_bot bbb
+                                                       WHERE bbb.banned_in_chat_id = m.chat_id
+                                                         AND bbb.message_id = m.message_id))
                                              THEN TRUE
                                          WHEN re_id.banned_user_id IS NULL AND re_text.banned_user_id IS NULL
                                              THEN FALSE