Move to GraphQL

Signed-off-by: Thomas Citharel <tcit@tcit.fr>

lib/mobilizon_web/resolvers/category.ex

@@ -0,0 +1,37 @@
+defmodule MobilizonWeb.Resolvers.Category do
+  require Logger
+
+  def list_categories(_parent, _args, _resolution) do
+    categories =
+      Mobilizon.Events.list_categories()
+      |> Enum.map(fn category ->
+        urls = MobilizonWeb.Uploaders.Category.urls({category.picture, category})
+        Map.put(category, :picture, %{url: urls.original, url_thumbnail: urls.thumb})
+      end)
+
+    {:ok, categories}
+  end
+
+  def create_category(_parent, %{title: title, picture: picture, description: description}, %{
+        context: %{current_user: user}
+      }) do
+    with {:ok, category} <-
+           Mobilizon.Events.create_category(%{
+             title: title,
+             description: description,
+             picture: picture
+           }),
+         urls <- MobilizonWeb.Uploaders.Category.urls({category.picture, category}) do
+      Logger.info("Created category " <> title)
+      {:ok, Map.put(category, :picture, %{url: urls.original, url_thumbnail: urls.thumb})}
+    else
+      {:error, %Ecto.Changeset{errors: errors} = _changeset} ->
+        # This is pretty ridiculous for changeset to error
+        errors =
+          Enum.into(errors, %{})
+          |> Enum.map(fn {key, {value, _}} -> Atom.to_string(key) <> ": " <> value end)
+
+        {:error, errors}
+    end
+  end
+end