Try host-meta call over https.

This commit is contained in:
Roger Braun 2017-09-13 11:59:56 +02:00
parent 07b694814e
commit f03524805f
1 changed files with 7 additions and 7 deletions

View File

@ -62,11 +62,6 @@ def ensure_keys_present(user) do
end end
end end
# FIXME: Make this call the host-meta to find the actual address.
defp webfinger_address(domain) do
"//#{domain}/.well-known/webfinger"
end
defp webfinger_from_xml(doc) do defp webfinger_from_xml(doc) do
magic_key = XML.string_from_xpath(~s{//Link[@rel="magic-public-key"]/@href}, doc) magic_key = XML.string_from_xpath(~s{//Link[@rel="magic-public-key"]/@href}, doc)
"data:application/magic-public-key," <> magic_key = magic_key "data:application/magic-public-key," <> magic_key = magic_key
@ -91,12 +86,17 @@ def get_template_from_xml(body) do
end end
def find_lrdd_template(domain) do def find_lrdd_template(domain) do
with {:ok, %{status_code: status_code, body: body}} <- @httpoison.get("http://#{domain}/.well-known/host-meta", [], follow_redirect: true) do with {:ok, %{status_code: status_code, body: body}} when status_code in 200..299 <- @httpoison.get("http://#{domain}/.well-known/host-meta", [], follow_redirect: true) do
get_template_from_xml(body)
else
e ->
with {:ok, %{body: body}} <- @httpoison.get("https://#{domain}/.well-known/host-meta", []) do
get_template_from_xml(body) get_template_from_xml(body)
else else
e -> {:error, "Can't find lrdd template: #{inspect(e)}"} e -> {:error, "Can't find lrdd template: #{inspect(e)}"}
end end
end end
end
def finger(account) do def finger(account) do
domain = with [_name, domain] <- String.split(account, "@") do domain = with [_name, domain] <- String.split(account, "@") do