in dev, allow dev FE
[akkoma] / lib / pleroma / web / rel_me.ex
index b23c49977eac3237df2ba93039d698a1daeae208..afb525dbe7c4ddeb7bc6e8fdf922431282bc6045 100644 (file)
@@ -1,22 +1,19 @@
 # Pleroma: A lightweight social networking server
-# Copyright © 2017-2019 Pleroma Authors <https://pleroma.social/>
+# Copyright © 2017-2021 Pleroma Authors <https://pleroma.social/>
 # SPDX-License-Identifier: AGPL-3.0-only
 
 defmodule Pleroma.Web.RelMe do
-  @hackney_options [
-    pool: :media,
-    timeout: 2_000,
-    recv_timeout: 2_000,
-    max_body: 2_000_000
+  @options [
+    max_body: 2_000_000,
+    receive_timeout: 2_000
   ]
 
-  def parse(nil), do: {:error, "No URL provided"}
-
-  if Mix.env() == :test do
-    def parse(url), do: parse_url(url)
+  if Pleroma.Config.get(:env) == :test do
+    def parse(url) when is_binary(url), do: parse_url(url)
   else
-    def parse(url) do
-      Cachex.fetch!(:rel_me_cache, url, fn _ ->
+    @cachex Pleroma.Config.get([:cachex, :provider], Cachex)
+    def parse(url) when is_binary(url) do
+      @cachex.fetch!(:rel_me_cache, url, fn _ ->
         {:commit, parse_url(url)}
       end)
     rescue
@@ -24,23 +21,34 @@ defmodule Pleroma.Web.RelMe do
     end
   end
 
-  defp parse_url(url) do
-    {:ok, %Tesla.Env{body: html}} = Pleroma.HTTP.get(url, [], adapter: @hackney_options)
+  def parse(_), do: {:error, "No URL provided"}
 
-    Floki.attribute(html, "link[rel=me]", "href") ++ Floki.attribute(html, "a[rel=me]", "href")
+  defp parse_url(url) do
+    with {:ok, %Tesla.Env{body: html, status: status}} when status in 200..299 <-
+           Pleroma.HTTP.get(url, [], @options),
+         {:ok, html_tree} <- Floki.parse_document(html),
+         data <-
+           Floki.attribute(html_tree, "link[rel~=me]", "href") ++
+             Floki.attribute(html_tree, "a[rel~=me]", "href") do
+      {:ok, data}
+    end
   rescue
     e -> {:error, "Parsing error: #{inspect(e)}"}
   end
 
-  def maybe_put_rel_me("http" <> _ = target_page, urls) when not is_nil(urls) do
-    if Enum.any?(parse(target_page), fn x -> x in urls end) do
-      "rel=\"me\" "
+  def maybe_put_rel_me("http" <> _ = target_page, profile_urls) when is_list(profile_urls) do
+    with {:parse, {:ok, rel_me_hrefs}} <- {:parse, parse(target_page)},
+         {:link_match, true} <-
+           {:link_match, Enum.any?(rel_me_hrefs, fn x -> x in profile_urls end)} do
+      "me"
     else
-      ""
+      e -> {:error, {:could_not_verify, target_page, e}}
     end
+  rescue
+    e -> {:error, {:could_not_fetch, target_page, e}}
   end
 
   def maybe_put_rel_me(_, _) do
-    ""
+    {:error, :invalid_url}
   end
 end