Add pages to help issues removal to admin

From
#1011 (comment)
can probably be removed soon.

app/controllers/admin/stats_controller.rb

@@ -1,6 +1,22 @@
 # frozen_string_literal: true
 
 class Admin::StatsController < ApplicationController
+  def issues_untagged
+    @issues_untagged = Issue.joins(:threads).where(
+      <<~SQL
+        not exists (select 1 from issue_tags where issue_tags.issue_id = issues.id)
+        and not exists (select 1 from message_thread_tags where message_thread_tags.thread_id = message_threads.id)
+      SQL
+    ).distinct
+  end
+
+  def issues_with_multiple_threads
+    multiple_ids = Issue.joins(:threads).group(:id).having("count(*) > 1").ids
+    @issues_with_multiple_threads = Issue.where(id: multiple_ids).left_joins(:tags).group(:id, :title).select(
+      "issues.id, title, json_agg(tags.name) as tag_names"
+    )
+  end
+
   def index
     users_scope = User.all
     messages_scope = Message.all

app/models/tag.rb

@@ -1,6 +1,5 @@
 # frozen_string_literal: true
 
-
 class Tag < ApplicationRecord
   validates :name, presence: true
   has_and_belongs_to_many :issues, join_table: "issue_tags"

app/views/admin/home/index.html.haml

@@ -8,6 +8,8 @@
   %li= link_to t(".manage_message_moderations"), admin_message_moderations_path
   %li= link_to t(".manage_site_config"), admin_site_config_path
   %li= link_to t(".stats"), admin_stats_path
+  %li= link_to "Issues Untagged", issues_untagged_admin_stats_path
+  %li= link_to "Issues with multiple threads", issues_with_multiple_threads_admin_stats_path
   %li= link_to t(".resque"), resque_server_path
   %li= link_to t(".manage_planning_filters"), admin_planning_filters_path
   %li= link_to t(".mail_previews"), "/rails/mailers"

app/views/admin/stats/index.html.haml

@@ -5,6 +5,7 @@
 - else
   %h3 For the whole site:
 - month_sum = usr_sum = 0
+
 %div= line_chart(@users.map{ |usr| [ usr.month, usr_sum += usr.count]}, ytitle: 'New Users (Cumulative)', library: {title: 'Users'})
 
 %div= line_chart(@messages.map{ |mes| [ mes.month, month_sum += mes.count]}, ytitle: 'New Messages (Cumulative)', library: {title: 'Messages'})

app/views/admin/stats/issues_untagged.html.haml

@@ -0,0 +1,5 @@
+%div Issues with threads where neither the issue or the thread have tags
+%ul
+  - @issues_untagged.each do |issue|
+    %li= link_to issue.title, issue
+

app/views/admin/stats/issues_with_multiple_threads.html.haml

@@ -0,0 +1,10 @@
+%table
+  %thead
+    %th Issue
+    %th Tags (on the issue only)
+  %tbody
+    - @issues_with_multiple_threads.each do |issue|
+      %tr
+        %td= link_to issue.title, issue
+        %td= issue.tag_names.compact
+

config/authorization_rules.rb

@@ -16,7 +16,7 @@
     has_permission_on :admin_user_locations, to: %i[manage geometry combined_geometry]
     has_permission_on :admin_home, to: :view
     has_permission_on :admin_message_moderations, to: :view
-    has_permission_on :admin_stats, to: :view
+    has_permission_on :admin_stats, to: %i[view issues_untagged issues_with_multiple_threads]
     has_permission_on :admin_planning_filters, to: :manage
     has_permission_on :admin_site_configs, to: :manage
     has_permission_on :admin_templates, to: :show

config/routes.rb

@@ -60,7 +60,10 @@ def issues_route(opts = {})
       put :disable, :enable, on: :member
     end
     resource :site_config
-    resources :stats, only: :index
+    resources :stats, only: :index do
+      get :issues_untagged, on: :collection
+      get :issues_with_multiple_threads, on: :collection
+    end
     resources :message_moderations, only: :index
     resources :planning_filters
     resources :users do