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
   7   import Ecto.Query
   8
   9   def verify(subscription, getter \\ &HTTPoison.get/3 ) do
  10     challenge = Base.encode16(:crypto.strong_rand_bytes(8))
  11     lease_seconds = NaiveDateTime.diff(subscription.valid_until, subscription.inserted_at) |> to_string
  12
  13     params = %{
  14       "hub.challenge": challenge,
  15       "hub.lease_seconds": lease_seconds,
  16       "hub.topic": subscription.topic,
  17       "hub.mode": "subscribe"
  18     }
  19
  20     url = hd(String.split(subscription.callback, "?"))
  21     query = URI.parse(subscription.callback).query || ""
  22     params = Map.merge(params, URI.decode_query(query))
  23     with {:ok, response} <- getter.(url, [], [params: params]),
  24          ^challenge <- response.body
  25     do
  26       changeset = Ecto.Changeset.change(subscription, %{state: "active"})
  27       Repo.update(changeset)
  28     else _e ->
  29       changeset = Ecto.Changeset.change(subscription, %{state: "rejected"})
  30       {:ok, subscription } = Repo.update(changeset)
  31       {:error, subscription}
  32     end
  33   end
  34
  35   def publish(topic, user, activity) do
  36     query = from sub in WebsubServerSubscription,
  37     where: sub.topic == ^topic and sub.state == "active"
  38     subscriptions = Repo.all(query)
  39     Enum.each(subscriptions, fn(sub) ->
  40       response = FeedRepresenter.to_simple_form(user, [activity], [user])
  41       |> :xmerl.export_simple(:xmerl_xml)
  42
  43       signature = :crypto.hmac(:sha, sub.secret, response) |> Base.encode16
  44
  45       HTTPoison.post(sub.callback, response, [
  46             {"Content-Type", "application/atom+xml"},
  47             {"X-Hub-Signature", "sha1=#{signature}"}
  48           ])
  49     end)
  50   end
  51 end