git.squeep.com Git - akkoma/blob - lib/pleroma/object/fetcher.ex

   1 defmodule Pleroma.Object.Fetcher do
   2   alias Pleroma.{Object, Repo}
   3   alias Pleroma.Object.Containment
   4   alias Pleroma.Web.ActivityPub.Transmogrifier
   5   alias Pleroma.Web.OStatus
   6
   7   require Logger
   8
   9   @httpoison Application.get_env(:pleroma, :httpoison)
  10
  11   # TODO:
  12   # This will create a Create activity, which we need internally at the moment.
  13   def fetch_object_from_id(id) do
  14     if object = Object.get_cached_by_ap_id(id) do
  15       {:ok, object}
  16     else
  17       Logger.info("Fetching #{id} via AP")
  18
  19       with {:ok, data} <- fetch_and_contain_remote_object_from_id(id),
  20            nil <- Object.normalize(data),
  21            params <- %{
  22              "type" => "Create",
  23              "to" => data["to"],
  24              "cc" => data["cc"],
  25              "actor" => data["actor"] || data["attributedTo"],
  26              "object" => data
  27            },
  28            :ok <- Containment.contain_origin(id, params),
  29            {:ok, activity} <- Transmogrifier.handle_incoming(params) do
  30         {:ok, Object.normalize(activity.data["object"])}
  31       else
  32         {:error, {:reject, nil}} ->
  33           {:reject, nil}
  34
  35         object = %Object{} ->
  36           {:ok, object}
  37
  38         _e ->
  39           Logger.info("Couldn't get object via AP, trying out OStatus fetching...")
  40
  41           case OStatus.fetch_activity_from_url(id) do
  42             {:ok, [activity | _]} -> {:ok, Object.normalize(activity.data["object"])}
  43             e -> e
  44           end
  45       end
  46     end
  47   end
  48
  49   def fetch_and_contain_remote_object_from_id(id) do
  50     Logger.info("Fetching #{id} via AP")
  51
  52     with true <- String.starts_with?(id, "http"),
  53          {:ok, %{body: body, status_code: code}} when code in 200..299 <-
  54            @httpoison.get(
  55              id,
  56              [Accept: "application/activity+json"],
  57              follow_redirect: true,
  58              timeout: 10000,
  59              recv_timeout: 20000
  60            ),
  61          {:ok, data} <- Jason.decode(body),
  62          :ok <- Containment.contain_origin_from_id(id, data) do
  63       {:ok, data}
  64     else
  65       e ->
  66         {:error, e}
  67     end
  68   end
  69 end