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

   1 defmodule Pleroma.Web.Websub do
   2   alias Pleroma.Repo
   3   alias Pleroma.Websub
   4   alias Pleroma.Web.Websub.WebsubServerSubscription
   5   alias Pleroma.Web.OStatus.FeedRepresenter
   6   alias Pleroma.Web.OStatus
   7
   8   import Ecto.Query
   9
  10   @websub_verifier Application.get_env(:pleroma, :websub_verifier)
  11
  12   def verify(subscription, getter \\ &HTTPoison.get/3 ) do
  13     challenge = Base.encode16(:crypto.strong_rand_bytes(8))
  14     lease_seconds = NaiveDateTime.diff(subscription.valid_until, subscription.updated_at) |> to_string
  15
  16     params = %{
  17       "hub.challenge": challenge,
  18       "hub.lease_seconds": lease_seconds,
  19       "hub.topic": subscription.topic,
  20       "hub.mode": "subscribe"
  21     }
  22
  23     url = hd(String.split(subscription.callback, "?"))
  24     query = URI.parse(subscription.callback).query || ""
  25     params = Map.merge(params, URI.decode_query(query))
  26     with {:ok, response} <- getter.(url, [], [params: params]),
  27          ^challenge <- response.body
  28     do
  29       changeset = Ecto.Changeset.change(subscription, %{state: "active"})
  30       Repo.update(changeset)
  31     else _e ->
  32       changeset = Ecto.Changeset.change(subscription, %{state: "rejected"})
  33       {:ok, subscription } = Repo.update(changeset)
  34       {:error, subscription}
  35     end
  36   end
  37
  38   def publish(topic, user, activity) do
  39     query = from sub in WebsubServerSubscription,
  40     where: sub.topic == ^topic and sub.state == "active"
  41     subscriptions = Repo.all(query)
  42     Enum.each(subscriptions, fn(sub) ->
  43       response = FeedRepresenter.to_simple_form(user, [activity], [user])
  44       |> :xmerl.export_simple(:xmerl_xml)
  45
  46       signature = :crypto.hmac(:sha, sub.secret, response) |> Base.encode16
  47
  48       HTTPoison.post(sub.callback, response, [
  49             {"Content-Type", "application/atom+xml"},
  50             {"X-Hub-Signature", "sha1=#{signature}"}
  51           ])
  52     end)
  53   end
  54
  55   def incoming_subscription_request(user, %{"hub.mode" => "subscribe"} = params) do
  56     with {:ok, topic} <- valid_topic(params, user),
  57          {:ok, lease_time} <- lease_time(params),
  58          secret <- params["hub.secret"],
  59          callback <- params["hub.callback"]
  60     do
  61       subscription = get_subscription(topic, callback)
  62       data = %{
  63         state: subscription.state || "requested",
  64         topic: topic,
  65         secret: secret,
  66         callback: callback
  67       }
  68
  69       change = Ecto.Changeset.change(subscription, data)
  70       websub = Repo.insert_or_update!(change)
  71
  72       change = Ecto.Changeset.change(websub, %{valid_until: NaiveDateTime.add(websub.updated_at, lease_time)})
  73       websub = Repo.update!(change)
  74
  75       # Just spawn that for now, maybe pool later.
  76       spawn(fn -> @websub_verifier.verify(websub) end)
  77
  78       {:ok, websub}
  79     else {:error, reason} ->
  80       {:error, reason}
  81     end
  82   end
  83
  84   defp get_subscription(topic, callback) do
  85     Repo.get_by(WebsubServerSubscription, topic: topic, callback: callback) || %WebsubServerSubscription{}
  86   end
  87
  88   defp lease_time(%{"hub.lease_seconds" => lease_seconds}) do
  89     {:ok, String.to_integer(lease_seconds)}
  90   end
  91
  92   defp lease_time(_) do
  93     {:ok, 60 * 60 * 24 * 3} # three days
  94   end
  95
  96   defp valid_topic(%{"hub.topic" => topic}, user) do
  97     if topic == OStatus.feed_path(user) do
  98       {:ok, topic}
  99     else
 100       {:error, "Wrong topic requested, expected #{OStatus.feed_path(user)}, got #{topic}"}
 101     end
 102   end
 103 end