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