Set instance reachable on fetch

[akkoma] / lib / pleroma / stats.ex

diff --git a/lib/pleroma/stats.ex b/lib/pleroma/stats.ex
index 2e7d747df9c2a6b9a978a005937abbef1c9bc454..3e3f24c2c21cae836bd7831c5c4b59d04c7dff51 100644 (file)
--- a/lib/pleroma/stats.ex
+++ b/lib/pleroma/stats.ex
@@ -1,40 +1,72 @@
 # Pleroma: A lightweight social networking server
-# Copyright © 2017-2019 Pleroma Authors <https://pleroma.social/>
+# Copyright © 2017-2021 Pleroma Authors <https://pleroma.social/>
 # SPDX-License-Identifier: AGPL-3.0-only
 
 defmodule Pleroma.Stats do
+  use GenServer
+
   import Ecto.Query
+
+  alias Pleroma.CounterCache
   alias Pleroma.Repo
   alias Pleroma.User
 
-  def start_link do
-    agent = Agent.start_link(fn -> {[], %{}} end, name: __MODULE__)
-    spawn(fn -> schedule_update() end)
-    agent
+  @interval :timer.seconds(60)
+
+  def start_link(_) do
+    GenServer.start_link(
+      __MODULE__,
+      nil,
+      name: __MODULE__
+    )
   end
 
-  def get_stats do
-    Agent.get(__MODULE__, fn {_, stats} -> stats end)
+  @impl true
+  def init(_args) do
+    if Pleroma.Config.get(:env) != :test do
+      {:ok, nil, {:continue, :calculate_stats}}
+    else
+      {:ok, calculate_stat_data()}
+    end
   end
 
-  def get_peers do
-    Agent.get(__MODULE__, fn {peers, _} -> peers end)
+  @doc "Performs update stats"
+  def force_update do
+    GenServer.call(__MODULE__, :force_update)
+  end
+
+  @doc "Returns stats data"
+  @spec get_stats() :: %{
+          domain_count: non_neg_integer(),
+          status_count: non_neg_integer(),
+          user_count: non_neg_integer()
+        }
+  def get_stats do
+    %{stats: stats} = GenServer.call(__MODULE__, :get_state)
+
+    stats
   end
 
-  def schedule_update do
-    spawn(fn ->
-      # 1 hour
-      Process.sleep(1000 * 60 * 60)
-      schedule_update()
-    end)
+  @doc "Returns list peers"
+  @spec get_peers() :: list(String.t())
+  def get_peers do
+    %{peers: peers} = GenServer.call(__MODULE__, :get_state)
 
-    update_stats()
+    peers
   end
 
-  def update_stats do
+  @spec calculate_stat_data() :: %{
+          peers: list(),
+          stats: %{
+            domain_count: non_neg_integer(),
+            status_count: non_neg_integer(),
+            user_count: non_neg_integer()
+          }
+        }
+  def calculate_stat_data do
     peers =
       from(
-        u in Pleroma.User,
+        u in User,
         select: fragment("distinct split_part(?, '@', 2)", u.nickname),
         where: u.local != ^true
       )
@@ -43,14 +75,63 @@ defmodule Pleroma.Stats do
 
     domain_count = Enum.count(peers)
 
-    status_query =
-      from(u in User.local_user_query(), select: fragment("sum((?->>'note_count')::int)", u.info))
+    status_count = Repo.aggregate(User.Query.build(%{local: true}), :sum, :note_count)
+
+    users_query =
+      from(u in User,
+        where: u.is_active == true,
+        where: u.local == true,
+        where: not is_nil(u.nickname),
+        where: not u.invisible
+      )
+
+    user_count = Repo.aggregate(users_query, :count, :id)
+
+    %{
+      peers: peers,
+      stats: %{
+        domain_count: domain_count,
+        status_count: status_count || 0,
+        user_count: user_count
+      }
+    }
+  end
+
+  @spec get_status_visibility_count(String.t() | nil) :: map()
+  def get_status_visibility_count(instance \\ nil) do
+    if is_nil(instance) do
+      CounterCache.get_sum()
+    else
+      CounterCache.get_by_instance(instance)
+    end
+  end
+
+  @impl true
+  def handle_continue(:calculate_stats, _) do
+    stats = calculate_stat_data()
 
-    status_count = Repo.one(status_query)
-    user_count = Repo.aggregate(User.active_local_user_query(), :count, :id)
+    unless Pleroma.Config.get(:env) == :test do
+      Process.send_after(self(), :run_update, @interval)
+    end
+
+    {:noreply, stats}
+  end
+
+  @impl true
+  def handle_call(:force_update, _from, _state) do
+    new_stats = calculate_stat_data()
+    {:reply, new_stats, new_stats}
+  end
+
+  @impl true
+  def handle_call(:get_state, _from, state) do
+    {:reply, state, state}
+  end
 
-    Agent.update(__MODULE__, fn _ ->
-      {peers, %{domain_count: domain_count, status_count: status_count, user_count: user_count}}
-    end)
+  @impl true
+  def handle_info(:run_update, _) do
+    new_stats = calculate_stat_data()
+    Process.send_after(self(), :run_update, @interval)
+    {:noreply, new_stats}
   end
 end