Merge branch 'feature/1822-files-consistency' into 'develop'

Feature/1822 files consistency

Closes #1822

See merge request pleroma/pleroma!2680

1 files changed, 45 insertions, 0 deletions

diff --git a/lib/pleroma/web/xml.ex b/lib/pleroma/web/xml.ex
new file mode 100644
index 000000000..c69a86a1e
--- /dev/null
+++ b/lib/pleroma/web/xml.ex
@@ -0,0 +1,45 @@
+# Pleroma: A lightweight social networking server
+# Copyright © 2017-2020 Pleroma Authors <https://pleroma.social/>
+# SPDX-License-Identifier: AGPL-3.0-only
+
+defmodule Pleroma.Web.XML do
+  require Logger
+
+  def string_from_xpath(_, :error), do: nil
+
+  def string_from_xpath(xpath, doc) do
+    try do
+      {:xmlObj, :string, res} = :xmerl_xpath.string('string(#{xpath})', doc)
+
+      res =
+        res
+        |> to_string
+        |> String.trim()
+
+      if res == "", do: nil, else: res
+    catch
+      _e ->
+        Logger.debug("Couldn't find xpath #{xpath} in XML doc")
+        nil
+    end
+  end
+
+  def parse_document(text) do
+    try do
+      {doc, _rest} =
+        text
+        |> :binary.bin_to_list()
+        |> :xmerl_scan.string(quiet: true)
+
+      doc
+    rescue
+      _e ->
+        Logger.debug("Couldn't parse XML: #{inspect(text)}")
+        :error
+    catch
+      :exit, _error ->
+        Logger.debug("Couldn't parse XML: #{inspect(text)}")
+        :error
+    end
+  end
+end