Introduce group basic federation, event new page and notifications

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

lib/graphql/schema/actors/group.ex

@@ -5,10 +5,7 @@ defmodule Mobilizon.GraphQL.Schema.Actors.GroupType do
 
   use Absinthe.Schema.Notation
 
-  import Absinthe.Resolution.Helpers, only: [dataloader: 1]
-
-  alias Mobilizon.Events
-  alias Mobilizon.GraphQL.Resolvers.{Group, Member}
+  alias Mobilizon.GraphQL.Resolvers.{Conversation, Group, Member, Resource, Todos}
   alias Mobilizon.GraphQL.Schema
 
   import_types(Schema.Actors.MemberType)
@@ -44,10 +41,15 @@ defmodule Mobilizon.GraphQL.Schema.Actors.GroupType do
     field(:followingCount, :integer, description: "Number of actors following this actor")
 
     # This one should have a privacy setting
-    field(:organized_events, list_of(:event),
-      resolve: dataloader(Events),
-      description: "A list of the events this actor has organized"
-    )
+    field :organized_events, :paginated_event_list do
+      resolve(&Group.find_events_for_group/3)
+      description("A list of the events this actor has organized")
+    end
+
+    field :conversations, :paginated_conversation_list do
+      resolve(&Conversation.find_conversations_for_actor/3)
+      description("A list of the conversations for this group")
+    end
 
     field(:types, :group_type, description: "The type of group : Group, Community,…")
 
@@ -55,10 +57,22 @@ defmodule Mobilizon.GraphQL.Schema.Actors.GroupType do
       description: "Whether the group is opened to all or has restricted access"
     )
 
-    field(:members, non_null(list_of(:member)),
-      resolve: &Member.find_members_for_group/3,
-      description: "List of group members"
-    )
+    field :members, :paginated_member_list do
+      resolve(&Member.find_members_for_group/3)
+      description("List of group members")
+    end
+
+    field :resources, :paginated_resource_list do
+      arg(:page, :integer, default_value: 1)
+      arg(:limit, :integer, default_value: 10)
+      resolve(&Resource.find_resources_for_group/3)
+      description("A paginated list of the resources this group has")
+    end
+
+    field :todo_lists, :paginated_todo_list_list do
+      resolve(&Todos.find_todo_lists_for_group/3)
+      description("A paginated list of the todo lists this group has")
+    end
   end
 
   @desc """
@@ -80,9 +94,14 @@ defmodule Mobilizon.GraphQL.Schema.Actors.GroupType do
     value(:open, description: "The actor is open to followings")
   end
 
+  object :paginated_group_list do
+    field(:elements, list_of(:group), description: "A list of groups")
+    field(:total, :integer, description: "The total number of elements in the list")
+  end
+
   object :group_queries do
     @desc "Get all groups"
-    field :groups, list_of(:group) do
+    field :groups, :paginated_group_list do
       arg(:page, :integer, default_value: 1)
       arg(:limit, :integer, default_value: 10)
       resolve(&Group.list_groups/3)

lib/graphql/schema/actors/member.ex

@@ -4,15 +4,27 @@ defmodule Mobilizon.GraphQL.Schema.Actors.MemberType do
   """
   use Absinthe.Schema.Notation
 
-  alias Mobilizon.GraphQL.Resolvers.Group
+  alias Mobilizon.GraphQL.Resolvers.{Group, Member}
 
   @desc """
   Represents a member of a group
   """
   object :member do
+    field(:id, :id, description: "The member's ID")
     field(:parent, :group, description: "Of which the profile is member")
     field(:actor, :person, description: "Which profile is member of")
-    field(:role, :integer, description: "The role of this membership")
+    field(:role, :member_role_enum, description: "The role of this membership")
+    field(:invited_by, :person, description: "Who invited this member")
+  end
+
+  enum :member_role_enum do
+    value(:not_approved)
+    value(:invited)
+    value(:member)
+    value(:moderator)
+    value(:administrator)
+    value(:creator)
+    value(:rejected)
   end
 
   @desc "Represents a deleted member"
@@ -21,6 +33,11 @@ defmodule Mobilizon.GraphQL.Schema.Actors.MemberType do
     field(:actor, :deleted_object)
   end
 
+  object :paginated_member_list do
+    field(:elements, list_of(:member), description: "A list of members")
+    field(:total, :integer, description: "The total number of elements in the list")
+  end
+
   object :member_mutations do
     @desc "Join a group"
     field :join_group, :member do
@@ -30,12 +47,27 @@ defmodule Mobilizon.GraphQL.Schema.Actors.MemberType do
       resolve(&Group.join_group/3)
     end
 
-    @desc "Leave an event"
+    @desc "Leave a group"
     field :leave_group, :deleted_member do
       arg(:group_id, non_null(:id))
       arg(:actor_id, non_null(:id))
 
       resolve(&Group.leave_group/3)
     end
+
+    @desc "Invite an actor to join the group"
+    field :invite_member, :member do
+      arg(:group_id, non_null(:id))
+      arg(:target_actor_username, non_null(:string))
+
+      resolve(&Member.invite_member/3)
+    end
+
+    @desc "Accept an invitation to a group"
+    field :accept_invitation, :member do
+      arg(:id, non_null(:id))
+
+      resolve(&Member.accept_invitation/3)
+    end
   end
 end

lib/graphql/schema/actors/person.ex

@@ -64,6 +64,13 @@ defmodule Mobilizon.GraphQL.Schema.Actors.PersonType do
       arg(:event_id, :id)
       resolve(&Person.person_participations/3)
     end
+
+    @desc "The list of group this person is member of"
+    field(:memberships, :paginated_member_list,
+      description: "The list of group this person is member of"
+    ) do
+      resolve(&Person.person_memberships/3)
+    end
   end
 
   object :person_queries do

lib/graphql/schema/admin.ex

@@ -5,7 +5,8 @@ defmodule Mobilizon.GraphQL.Schema.AdminType do
 
   use Absinthe.Schema.Notation
 
-  alias Mobilizon.Events.{Comment, Event}
+  alias Mobilizon.Conversations.Comment
+  alias Mobilizon.Events.Event
   alias Mobilizon.Reports.{Note, Report}
 
   alias Mobilizon.GraphQL.Resolvers.Admin

lib/graphql/schema/config.ex

@@ -20,6 +20,8 @@ defmodule Mobilizon.GraphQL.Schema.ConfigType do
     field(:geocoding, :geocoding)
     field(:maps, :maps)
     field(:anonymous, :anonymous)
+    field(:resource_providers, list_of(:resource_provider))
+    field(:timezones, list_of(:string))
 
     field(:terms, :terms, description: "The instance's terms") do
       arg(:locale, :string, default_value: "en")
@@ -97,6 +99,12 @@ defmodule Mobilizon.GraphQL.Schema.ConfigType do
     field(:enabled, :boolean)
   end
 
+  object :resource_provider do
+    field(:type, :string)
+    field(:endpoint, :string)
+    field(:software, :string)
+  end
+
   object :config_queries do
     @desc "Get the instance config"
     field :config, :config do

lib/graphql/schema/conversations/comment.ex

@@ -1,4 +1,4 @@
-defmodule Mobilizon.GraphQL.Schema.CommentType do
+defmodule Mobilizon.GraphQL.Schema.Conversations.CommentType do
   @moduledoc """
   Schema representation for Comment
   """
@@ -48,6 +48,11 @@ defmodule Mobilizon.GraphQL.Schema.CommentType do
     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
@@ -67,6 +72,14 @@ defmodule Mobilizon.GraphQL.Schema.CommentType do
       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))

lib/graphql/schema/conversations/conversation.ex

@@ -0,0 +1,74 @@
+defmodule Mobilizon.GraphQL.Schema.Conversations.ConversationType do
+  @moduledoc """
+  Schema representation for Conversation
+  """
+  use Absinthe.Schema.Notation
+
+  import Absinthe.Resolution.Helpers, only: [dataloader: 1]
+
+  alias Mobilizon.Actors
+  alias Mobilizon.GraphQL.Resolvers.Conversation
+
+  @desc "A conversation"
+  object :conversation do
+    field(:id, :id, description: "Internal ID for this conversation")
+    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(&Conversation.get_comments_for_conversation/3)
+      description("The comments for the conversation")
+    end
+
+    field(:creator, :person, resolve: dataloader(Actors))
+    field(:actor, :actor, resolve: dataloader(Actors))
+    field(:inserted_at, :datetime)
+    field(:updated_at, :datetime)
+  end
+
+  object :paginated_conversation_list do
+    field(:elements, list_of(:conversation), description: "A list of conversation")
+    field(:total, :integer, description: "The total number of comments in the list")
+  end
+
+  object :conversation_queries do
+    @desc "Get a conversation"
+    field :conversation, type: :conversation do
+      arg(:id, non_null(:id))
+      resolve(&Conversation.get_conversation/3)
+    end
+  end
+
+  object :conversation_mutations do
+    @desc "Create a conversation"
+    field :create_conversation, type: :conversation do
+      arg(:title, non_null(:string))
+      arg(:text, non_null(:string))
+      arg(:actor_id, non_null(:id))
+      arg(:creator_id, non_null(:id))
+
+      resolve(&Conversation.create_conversation/3)
+    end
+
+    field :reply_to_conversation, type: :conversation do
+      arg(:conversation_id, non_null(:id))
+      arg(:text, non_null(:string))
+      resolve(&Conversation.reply_to_conversation/3)
+    end
+
+    field :update_conversation, type: :conversation do
+      arg(:title, non_null(:string))
+      arg(:conversation_id, non_null(:id))
+      resolve(&Conversation.update_conversation/3)
+    end
+
+    field :delete_conversation, type: :conversation do
+      arg(:conversation_id, non_null(:id))
+
+      # resolve(&Conversation.delete_conversation/3)
+    end
+  end
+end

lib/graphql/schema/event.ex

@@ -115,6 +115,11 @@ defmodule Mobilizon.GraphQL.Schema.EventType do
     value(:cancelled, description: "The event is cancelled")
   end
 
+  object :paginated_event_list do
+    field(:elements, list_of(:event), description: "A list of events")
+    field(:total, :integer, description: "The total number of events in the list")
+  end
+
   object :participant_stats do
     field(:going, :integer,
       description: "The number of approved participants",
@@ -201,6 +206,11 @@ defmodule Mobilizon.GraphQL.Schema.EventType do
 
     field(:show_start_time, :boolean, description: "Show event start time")
     field(:show_end_time, :boolean, description: "Show event end time")
+
+    field(:hide_organizer_when_group_event, :boolean,
+      description:
+        "Whether to show or hide the person organizer when event is organized by a group"
+    )
   end
 
   input_object :event_options_input do
@@ -242,6 +252,11 @@ defmodule Mobilizon.GraphQL.Schema.EventType do
 
     field(:show_start_time, :boolean, description: "Show event start time")
     field(:show_end_time, :boolean, description: "Show event end time")
+
+    field(:hide_organizer_when_group_event, :boolean,
+      description:
+        "Whether to show or hide the person organizer when event is organized by a group"
+    )
   end
 
   object :event_queries do
@@ -284,6 +299,7 @@ defmodule Mobilizon.GraphQL.Schema.EventType do
       arg(:online_address, :string)
       arg(:phone_address, :string)
       arg(:organizer_actor_id, non_null(:id))
+      arg(:attributed_to_id, :id)
       arg(:category, :string, default_value: "meeting")
       arg(:physical_address, :address_input)
       arg(:options, :event_options_input)
@@ -314,6 +330,7 @@ defmodule Mobilizon.GraphQL.Schema.EventType do
       arg(:online_address, :string)
       arg(:phone_address, :string)
       arg(:organizer_actor_id, :id)
+      arg(:attributed_to_id, :id)
       arg(:category, :string)
       arg(:physical_address, :address_input)
       arg(:options, :event_options_input)

lib/graphql/schema/resource.ex

@@ -0,0 +1,95 @@
+defmodule Mobilizon.GraphQL.Schema.ResourceType do
+  @moduledoc """
+  Schema representation for Resources
+  """
+  use Absinthe.Schema.Notation
+  alias Mobilizon.GraphQL.Resolvers.Resource
+
+  @desc "A resource"
+  object :resource do
+    field(:id, :id, description: "The resource's ID")
+    field(:title, :string, description: "The resource's title")
+    field(:summary, :string, description: "The resource's summary")
+    field(:url, :string, description: "The resource's URL")
+    field(:resource_url, :string, description: "The resource's URL")
+    field(:metadata, :resource_metadata, description: "The resource's metadata")
+    field(:creator, :actor, description: "The resource's creator")
+    field(:actor, :actor, description: "The resource's owner")
+    field(:inserted_at, :naive_datetime, description: "The resource's creation date")
+    field(:updated_at, :naive_datetime, description: "The resource's last update date")
+    field(:type, :string, description: "The resource's type (if it's a folder)")
+    field(:path, :string, description: "The resource's path")
+    field(:parent, :resource, description: "The resource's parent")
+
+    field :children, :paginated_resource_list do
+      description("Children resources in folder")
+      resolve(&Resource.find_resources_for_parent/3)
+    end
+  end
+
+  object :paginated_resource_list do
+    field(:elements, list_of(:resource), description: "A list of resources")
+    field(:total, :integer, description: "The total number of resources in the list")
+  end
+
+  object :resource_metadata do
+    field(:type, :string, description: "The type of the resource")
+    field(:title, :string, description: "The resource's metadata title")
+    field(:description, :string, description: "The resource's metadata description")
+    field(:image_remote_url, :string, description: "The resource's metadata image")
+    field(:width, :integer)
+    field(:height, :integer)
+    field(:author_name, :string)
+    field(:author_url, :string)
+    field(:provider_name, :string)
+    field(:provider_url, :string)
+    field(:html, :string)
+    field(:favicon_url, :string)
+  end
+
+  object :resource_queries do
+    @desc "Get a resource"
+    field :resource, :resource do
+      arg(:path, non_null(:string))
+      arg(:username, non_null(:string))
+      resolve(&Resource.get_resource/3)
+    end
+  end
+
+  object :resource_mutations do
+    @desc "Create a resource"
+    field :create_resource, :resource do
+      arg(:parent_id, :id)
+      arg(:actor_id, non_null(:id))
+      arg(:title, non_null(:string))
+      arg(:summary, :string)
+      arg(:resource_url, :string)
+      arg(:type, :string, default_value: "link")
+
+      resolve(&Resource.create_resource/3)
+    end
+
+    @desc "Update a resource"
+    field :update_resource, :resource do
+      arg(:id, non_null(:id))
+      arg(:title, :string)
+      arg(:summary, :string)
+      arg(:parent_id, :id)
+      arg(:resource_url, :string)
+
+      resolve(&Resource.update_resource/3)
+    end
+
+    @desc "Delete a resource"
+    field :delete_resource, :deleted_object do
+      arg(:id, non_null(:id))
+      resolve(&Resource.delete_resource/3)
+    end
+
+    @desc "Get a preview for a resource link"
+    field :preview_resource_link, :resource_metadata do
+      arg(:resource_url, non_null(:string))
+      resolve(&Resource.preview_resource_link/3)
+    end
+  end
+end

lib/graphql/schema/todos/todo.ex

@@ -0,0 +1,72 @@
+defmodule Mobilizon.GraphQL.Schema.Todos.TodoType do
+  @moduledoc """
+  Schema representation for Todos
+  """
+  use Absinthe.Schema.Notation
+  import Absinthe.Resolution.Helpers, only: [dataloader: 1]
+  alias Mobilizon.GraphQL.Resolvers.Todos, as: TodoResolver
+  alias Mobilizon.{Actors, Todos}
+
+  @desc "A todo"
+  object :todo do
+    field(:id, :id, description: "The todo's ID")
+    field(:title, :string, description: "The todo's title")
+    field(:status, :boolean, description: "The todo's status")
+    field(:due_date, :datetime, description: "The todo's due date")
+    field(:creator, :actor, resolve: dataloader(Actors), description: "The todo's creator")
+
+    field(:todo_list, :todo_list,
+      resolve: dataloader(Todos),
+      description: "The todo list this todo is attached to"
+    )
+
+    field(:assigned_to, :actor,
+      resolve: dataloader(Actors),
+      description: "The todos's assigned person"
+    )
+  end
+
+  object :paginated_todo_list do
+    field(:elements, list_of(:todo), description: "A list of todos")
+    field(:total, :integer, description: "The total number of todos in the list")
+  end
+
+  object :todo_queries do
+    @desc "Get a todo"
+    field :todo, :todo do
+      arg(:id, non_null(:id))
+      resolve(&TodoResolver.get_todo/3)
+    end
+  end
+
+  object :todo_mutations do
+    @desc "Create a todo"
+    field :create_todo, :todo do
+      arg(:todo_list_id, non_null(:id))
+      arg(:title, non_null(:string))
+      arg(:status, :boolean)
+      arg(:due_date, :datetime)
+      arg(:assigned_to_id, :id)
+
+      resolve(&TodoResolver.create_todo/3)
+    end
+
+    @desc "Update a todo"
+    field :update_todo, :todo do
+      arg(:id, non_null(:id))
+      arg(:todo_list_id, :id)
+      arg(:title, :string)
+      arg(:status, :boolean)
+      arg(:due_date, :datetime)
+      arg(:assigned_to_id, :id)
+
+      resolve(&TodoResolver.update_todo/3)
+    end
+
+    # @desc "Delete a todo"
+    # field :delete_todo, :deleted_object do
+    #   arg(:id, non_null(:id))
+    #   resolve(&TodoResolver.delete_todo/3)
+    # end
+  end
+end

lib/graphql/schema/todos/todo_list.ex

@@ -0,0 +1,47 @@
+defmodule Mobilizon.GraphQL.Schema.Todos.TodoListType do
+  @moduledoc """
+  Schema representation for Todo Lists
+  """
+  use Absinthe.Schema.Notation
+  import Absinthe.Resolution.Helpers, only: [dataloader: 1]
+  alias Mobilizon.Actors
+  alias Mobilizon.GraphQL.Resolvers.Todos
+
+  @desc "A todo list"
+  object :todo_list do
+    field(:id, :id, description: "The todo list's ID")
+    field(:title, :string, description: "The todo list's title")
+
+    field(:actor, :actor,
+      resolve: dataloader(Actors),
+      description: "The actor that owns this todo list"
+    )
+
+    field(:todos, :paginated_todo_list,
+      resolve: &Todos.find_todos_for_todo_list/3,
+      description: "The todo-list's todos"
+    )
+  end
+
+  object :paginated_todo_list_list do
+    field(:elements, list_of(:todo_list), description: "A list of todo lists")
+    field(:total, :integer, description: "The total number of todo lists in the list")
+  end
+
+  object :todo_list_queries do
+    @desc "Get a todo list"
+    field :todo_list, :todo_list do
+      arg(:id, non_null(:id))
+      resolve(&Todos.get_todo_list/3)
+    end
+  end
+
+  object :todo_list_mutations do
+    @desc "Create a todo list"
+    field :create_todo_list, :todo_list do
+      arg(:title, non_null(:string))
+      arg(:group_id, non_null(:id))
+      resolve(&Todos.create_todo_list/3)
+    end
+  end
+end

lib/graphql/schema/user.ex

@@ -51,7 +51,7 @@ defmodule Mobilizon.GraphQL.Schema.UserType do
 
     field(:locale, :string, description: "The user's locale")
 
-    field(:participations, list_of(:participant),
+    field(:participations, :paginated_participant_list,
       description: "The list of participations this user has"
     ) do
       arg(:after_datetime, :datetime)
@@ -61,11 +61,23 @@ defmodule Mobilizon.GraphQL.Schema.UserType do
       resolve(&User.user_participations/3)
     end
 
+    field(:memberships, :paginated_member_list,
+      description: "The list of memberships for this user"
+    ) do
+      arg(:page, :integer, default_value: 1)
+      arg(:limit, :integer, default_value: 10)
+      resolve(&User.user_memberships/3)
+    end
+
     field(:drafts, list_of(:event), description: "The list of draft events this user has created") do
       arg(:page, :integer, default_value: 1)
       arg(:limit, :integer, default_value: 10)
       resolve(&User.user_drafted_events/3)
     end
+
+    field(:settings, :user_settings, description: "The list of settings for this user") do
+      resolve(&User.user_settings/3)
+    end
   end
 
   enum :user_role do
@@ -91,6 +103,22 @@ defmodule Mobilizon.GraphQL.Schema.UserType do
     value(:id)
   end
 
+  object :user_settings do
+    field(:timezone, :string, description: "The timezone for this user")
+
+    field(:notification_on_day, :boolean,
+      description: "Whether this user will receive an email at the start of the day of an event."
+    )
+
+    field(:notification_each_week, :boolean,
+      description: "Whether this user will receive an weekly event recap"
+    )
+
+    field(:notification_before_event, :boolean,
+      description: "Whether this user will receive a notification right before event"
+    )
+  end
+
   object :user_queries do
     @desc "Get an user"
     field :user, :user do
@@ -179,20 +207,31 @@ defmodule Mobilizon.GraphQL.Schema.UserType do
       resolve(&User.change_password/3)
     end
 
+    @desc "Change an user email"
     field :change_email, :user do
       arg(:email, non_null(:string))
       arg(:password, non_null(:string))
       resolve(&User.change_email/3)
     end
 
+    @desc "Validate an user email"
     field :validate_email, :user do
       arg(:token, non_null(:string))
       resolve(&User.validate_email/3)
     end
 
+    @desc "Delete an account"
     field :delete_account, :deleted_object do
       arg(:password, non_null(:string))
       resolve(&User.delete_account/3)
     end
+
+    field :set_user_settings, :user_settings do
+      arg(:timezone, :string)
+      arg(:notification_on_day, :boolean)
+      arg(:notification_each_week, :boolean)
+      arg(:notification_before_event, :boolean)
+      resolve(&User.set_user_setting/3)
+    end
   end
 end