git.squeep.com Git - akkoma/blob - lib/pleroma/web/federator/federator.ex

   1 defmodule Pleroma.Web.Federator do
   2   use GenServer
   3   alias Pleroma.User
   4   alias Pleroma.Web.{WebFinger, Websub}
   5   require Logger
   6
   7   @websub Application.get_env(:pleroma, :websub)
   8   @ostatus Application.get_env(:pleroma, :ostatus)
   9   @httpoison Application.get_env(:pleroma, :httpoison)
  10   @max_jobs 10
  11
  12   def start_link do
  13     spawn(fn ->
  14       Process.sleep(1000 * 60 * 1) # 1 minute
  15       enqueue(:refresh_subscriptions, nil)
  16     end)
  17     GenServer.start_link(__MODULE__, {:sets.new(), :queue.new()}, name: __MODULE__)
  18   end
  19
  20   def handle(:refresh_subscriptions, _) do
  21     Logger.debug("Federator running refresh subscriptions")
  22     Websub.refresh_subscriptions()
  23     spawn(fn ->
  24       Process.sleep(1000 * 60 * 60 * 6) # 6 hours
  25       enqueue(:refresh_subscriptions, nil)
  26     end)
  27   end
  28
  29   def handle(:request_subscription, websub) do
  30     Logger.debug("Refreshing #{websub.topic}")
  31     with {:ok, websub } <- Websub.request_subscription(websub) do
  32       Logger.debug("Successfully refreshed #{websub.topic}")
  33     else
  34       _e -> Logger.debug("Couldn't refresh #{websub.topic}")
  35     end
  36   end
  37
  38   def handle(:publish, activity) do
  39     Logger.debug(fn -> "Running publish for #{activity.data["id"]}" end)
  40     with actor when not is_nil(actor) <- User.get_cached_by_ap_id(activity.data["actor"]) do
  41       Logger.debug(fn -> "Sending #{activity.data["id"]} out via websub" end)
  42       Websub.publish(Pleroma.Web.OStatus.feed_path(actor), actor, activity)
  43
  44       {:ok, actor} = WebFinger.ensure_keys_present(actor)
  45       Logger.debug(fn -> "Sending #{activity.data["id"]} out via salmon" end)
  46       Pleroma.Web.Salmon.publish(actor, activity)
  47     end
  48   end
  49
  50   def handle(:verify_websub, websub) do
  51     Logger.debug(fn -> "Running websub verification for #{websub.id} (#{websub.topic}, #{websub.callback})" end)
  52     @websub.verify(websub)
  53   end
  54
  55   def handle(:incoming_doc, doc) do
  56     Logger.debug("Got document, trying to parse")
  57     @ostatus.handle_incoming(doc)
  58   end
  59
  60   def handle(:publish_single_websub, %{xml: xml, topic: topic, callback: callback, secret: secret}) do
  61     signature = @websub.sign(secret || "", xml)
  62     Logger.debug(fn -> "Pushing #{topic} to #{callback}" end)
  63
  64     with {:ok, %{status_code: code}} <- @httpoison.post(callback, xml, [
  65                   {"Content-Type", "application/atom+xml"},
  66                   {"X-Hub-Signature", "sha1=#{signature}"}
  67                 ], timeout: 10000, recv_timeout: 20000) do
  68       Logger.debug(fn -> "Pushed to #{callback}, code #{code}" end)
  69     else e ->
  70         Logger.debug(fn -> "Couldn't push to #{callback}, #{inspect(e)}" end)
  71     end
  72   end
  73
  74   def handle(type, _) do
  75     Logger.debug(fn -> "Unknown task: #{type}" end)
  76     {:error, "Don't know what do do with this"}
  77   end
  78
  79   def enqueue(type, payload) do
  80     if Mix.env == :test do
  81       handle(type, payload)
  82     else
  83       GenServer.cast(__MODULE__, {:enqueue, type, payload})
  84     end
  85   end
  86
  87   def maybe_start_job(running_jobs, queue) do
  88     if (:sets.size(running_jobs) < @max_jobs) && !:queue.is_empty(queue) do
  89       {{:value, {type, payload}}, queue} = :queue.out(queue)
  90       {:ok, pid} = Task.start(fn -> handle(type, payload) end)
  91       mref = Process.monitor(pid)
  92       {:sets.add_element(mref, running_jobs), queue}
  93     else
  94       {running_jobs, queue}
  95     end
  96   end
  97
  98   def handle_cast({:enqueue, type, payload}, {running_jobs, queue}) do
  99     queue = :queue.in({type, payload}, queue)
 100     {running_jobs, queue} = maybe_start_job(running_jobs, queue)
 101     {:noreply, {running_jobs, queue}}
 102   end
 103
 104   def handle_cast(m, state) do
 105     IO.inspect("Unknown: #{inspect(m)}, #{inspect(state)}")
 106     {:noreply, state}
 107   end
 108
 109   def handle_info({:DOWN, ref, :process, _pid, _reason}, {running_jobs, queue}) do
 110     running_jobs = :sets.del_element(ref, running_jobs)
 111     {running_jobs, queue} = maybe_start_job(running_jobs, queue)
 112     {:noreply, {running_jobs, queue}}
 113   end
 114 end