Introduce group posts

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

lib/graphql/schema/discussions/comment.ex

@@ -0,0 +1,90 @@
+defmodule Mobilizon.GraphQL.Schema.Discussions.CommentType do
+  @moduledoc """
+  Schema representation for Comment
+  """
+  use Absinthe.Schema.Notation
+
+  import Absinthe.Resolution.Helpers, only: [dataloader: 1]
+
+  alias Mobilizon.{Actors, Discussions}
+  alias Mobilizon.GraphQL.Resolvers.Comment
+
+  @desc "A comment"
+  object :comment do
+    interfaces([:action_log_object])
+    field(:id, :id, description: "Internal ID for this comment")
+    field(:uuid, :uuid)
+    field(:url, :string)
+    field(:local, :boolean)
+    field(:visibility, :comment_visibility)
+    field(:text, :string)
+    field(:primaryLanguage, :string)
+
+    field(:replies, list_of(:comment)) do
+      resolve(dataloader(Discussions))
+    end
+
+    field(:total_replies, :integer)
+    field(:in_reply_to_comment, :comment, resolve: dataloader(Discussions))
+    field(:event, :event, resolve: dataloader(Events))
+    field(:origin_comment, :comment, resolve: dataloader(Discussions))
+    field(:threadLanguages, non_null(list_of(:string)))
+    field(:actor, :person, resolve: dataloader(Actors))
+    field(:inserted_at, :datetime)
+    field(:updated_at, :datetime)
+    field(:deleted_at, :datetime)
+  end
+
+  @desc "The list of visibility options for a comment"
+  enum :comment_visibility do
+    value(:public, description: "Publicly listed and federated. Can be shared.")
+    value(:unlisted, description: "Visible only to people with the link - or invited")
+
+    value(:private,
+      description: "Visible only to people members of the group or followers of the person"
+    )
+
+    value(:moderated, description: "Visible only after a moderator accepted")
+    value(:invite, description: "visible only to people invited")
+  end
+
+  object :paginated_comment_list do
+    field(:elements, list_of(:comment), description: "A list of comments")
+    field(:total, :integer, description: "The total number of comments in the list")
+  end
+
+  object :comment_queries do
+    @desc "Get replies for thread"
+    field :thread, type: list_of(:comment) do
+      arg(:id, :id)
+      resolve(&Comment.get_thread/3)
+    end
+  end
+
+  object :comment_mutations do
+    @desc "Create a comment"
+    field :create_comment, type: :comment do
+      arg(:text, non_null(:string))
+      arg(:event_id, :id)
+      arg(:in_reply_to_comment_id, :id)
+      arg(:actor_id, non_null(:id))
+
+      resolve(&Comment.create_comment/3)
+    end
+
+    @desc "Update a comment"
+    field :update_comment, type: :comment do
+      arg(:text, non_null(:string))
+      arg(:comment_id, non_null(:id))
+
+      resolve(&Comment.update_comment/3)
+    end
+
+    field :delete_comment, type: :comment do
+      arg(:comment_id, non_null(:id))
+      arg(:actor_id, non_null(:id))
+
+      resolve(&Comment.delete_comment/3)
+    end
+  end
+end

lib/graphql/schema/discussions/discussion.ex

@@ -0,0 +1,85 @@
+defmodule Mobilizon.GraphQL.Schema.Discussions.DiscussionType do
+  @moduledoc """
+  Schema representation for discussion
+  """
+  use Absinthe.Schema.Notation
+
+  import Absinthe.Resolution.Helpers, only: [dataloader: 1]
+
+  alias Mobilizon.Actors
+  alias Mobilizon.GraphQL.Resolvers.Discussion
+
+  @desc "A discussion"
+  object :discussion do
+    field(:id, :id, description: "Internal ID for this discussion")
+    field(:title, :string)
+    field(:slug, :string)
+    field(:last_comment, :comment)
+
+    field :comments, :paginated_comment_list do
+      arg(:page, :integer, default_value: 1)
+      arg(:limit, :integer, default_value: 10)
+      resolve(&Discussion.get_comments_for_discussion/3)
+      description("The comments for the discussion")
+    end
+
+    field(:creator, :person, resolve: dataloader(Actors))
+    field(:actor, :actor, resolve: dataloader(Actors))
+    field(:inserted_at, :datetime)
+    field(:updated_at, :datetime)
+  end
+
+  object :paginated_discussion_list do
+    field(:elements, list_of(:discussion), description: "A list of discussion")
+    field(:total, :integer, description: "The total number of comments in the list")
+  end
+
+  object :discussion_queries do
+    @desc "Get a discussion"
+    field :discussion, type: :discussion do
+      arg(:id, :id)
+      arg(:slug, :string)
+      resolve(&Discussion.get_discussion/3)
+    end
+  end
+
+  object :discussion_mutations do
+    @desc "Create a discussion"
+    field :create_discussion, type: :discussion do
+      arg(:title, non_null(:string))
+      arg(:text, non_null(:string))
+      arg(:actor_id, non_null(:id))
+      arg(:creator_id, non_null(:id))
+
+      resolve(&Discussion.create_discussion/3)
+    end
+
+    field :reply_to_discussion, type: :discussion do
+      arg(:discussion_id, non_null(:id))
+      arg(:text, non_null(:string))
+      resolve(&Discussion.reply_to_discussion/3)
+    end
+
+    field :update_discussion, type: :discussion do
+      arg(:title, non_null(:string))
+      arg(:discussion_id, non_null(:id))
+      resolve(&Discussion.update_discussion/3)
+    end
+
+    field :delete_discussion, type: :discussion do
+      arg(:discussion_id, non_null(:id))
+
+      resolve(&Discussion.delete_discussion/3)
+    end
+  end
+
+  object :discussion_subscriptions do
+    field :discussion_comment_changed, :discussion do
+      arg(:slug, non_null(:string))
+
+      config(fn args, _ ->
+        {:ok, topic: args.slug}
+      end)
+    end
+  end
+end