Handle errors when parsing XML

lib/parser/atom.ex

@@ -12,16 +12,23 @@ defmodule FeedParser.Parser.Atom do
   def accepts(data, content_type) do
     case content_type do
       "application/atom+xml" ->
-        {true, XML.parse(data)}
+        case XML.parse(data) do
+          {:error, _} -> false
+          {:ok, doc} -> {true, doc}
+        end
 
       _ when content_type in ["text/xml", "application/xml"] ->
-        doc = XML.parse(data)
+        case XML.parse(data) do
+          {:error, _} ->
+            false
 
+          {:ok, doc} ->
             if XML.xmlElement(doc, :name) == :feed do
               {true, doc}
             else
               false
             end
+        end
 
       _ ->
         false

lib/parser/rss2.ex

@@ -12,16 +12,23 @@ defmodule FeedParser.Parser.RSS2 do
   def accepts(data, content_type) do
     cond do
       content_type in ["application/rss+xml", "text/rss+xml"] ->
-        {true, XML.parse(data)}
+        case XML.parse(data) do
+          {:error, _} -> false
+          {:ok, doc} -> {true, doc}
+        end
 
       content_type in ["text/xml", "application/xml"] ->
-        doc = XML.parse(data)
+        case XML.parse(data) do
+          {:error, _} ->
+            false
 
+          {:ok, doc} ->
             if XML.xmlElement(doc, :name) == :rss do
               {true, doc}
             else
               false
             end
+        end
 
       true ->
         false

lib/xml.ex

@@ -9,12 +9,16 @@ defmodule FeedParser.XML do
   defrecord :xmlAttribute, extract(:xmlAttribute, from_lib: "xmerl/include/xmerl.hrl")
   defrecord :xmlText, extract(:xmlText, from_lib: "xmerl/include/xmerl.hrl")
 
-  @spec parse(data :: String.t()) :: tuple()
+  @spec parse(data :: String.t()) :: {:ok, tuple()} | {:error, String.t()}
   def parse(data) do
     {doc, _} =
+      try do
         data
         |> :binary.bin_to_list()
         |> :xmerl_scan.string()
+      catch
+        :exit, reason -> {:error, "parsing XML failed: #{inspect(reason)}"}
+      end
 
     doc
   end