Make register/1 only create an user
Signed-off-by: Thomas Citharel <tcit@tcit.fr> Credo fix Signed-off-by: Thomas Citharel <tcit@tcit.fr> Fix rebase Signed-off-by: Thomas Citharel <tcit@tcit.fr>
This commit is contained in:
@@ -11,7 +11,7 @@ defmodule Mobilizon.Actors do
|
||||
alias Mobilizon.Actors.{Actor, Bot, Member, Follower, User}
|
||||
|
||||
alias Mobilizon.Service.ActivityPub
|
||||
import Exgravatar
|
||||
# import Exgravatar
|
||||
|
||||
@doc false
|
||||
def data() do
|
||||
@@ -68,8 +68,14 @@ defmodule Mobilizon.Actors do
|
||||
where: u.id == ^user.id
|
||||
)
|
||||
) do
|
||||
nil -> user |> get_actors_for_user() |> hd
|
||||
actor -> actor
|
||||
nil ->
|
||||
case user |> get_actors_for_user() do
|
||||
[] -> nil
|
||||
actors -> hd(actors)
|
||||
end
|
||||
|
||||
actor ->
|
||||
actor
|
||||
end
|
||||
end
|
||||
|
||||
@@ -597,56 +603,71 @@ defmodule Mobilizon.Actors do
|
||||
@doc """
|
||||
Register user
|
||||
"""
|
||||
@spec register(map()) :: {:ok, Actor.t()} | {:error, String.t()}
|
||||
def register(%{email: email, password: password, username: username}) do
|
||||
with avatar <- gravatar(email),
|
||||
user_changeset <-
|
||||
User.registration_changeset(%User{}, %{
|
||||
email: email,
|
||||
password: password,
|
||||
default_actor: %{
|
||||
preferred_username: username,
|
||||
domain: nil,
|
||||
keys: create_keys(),
|
||||
avatar_url: avatar
|
||||
}
|
||||
}),
|
||||
{:ok, %User{default_actor: %Actor{} = actor, id: user_id} = user} <-
|
||||
Mobilizon.Repo.insert(user_changeset),
|
||||
{:ok, %Actor{} = _actor} <- update_actor(actor, %{user_id: user_id}) do
|
||||
{:ok, Repo.preload(user, [:actors])}
|
||||
else
|
||||
{:error, %Ecto.Changeset{} = changeset} ->
|
||||
handle_actor_user_changeset(changeset)
|
||||
@spec register(map()) :: {:ok, User.t()} | {:error, String.t()}
|
||||
def register(%{email: _email, password: _password} = args) do
|
||||
with {:ok, %User{} = user} <-
|
||||
%User{} |> User.registration_changeset(args) |> Mobilizon.Repo.insert() do
|
||||
{:ok, user}
|
||||
# else
|
||||
# {:error, %Ecto.Changeset{} = changeset} ->
|
||||
# {:error, Ecto.Changeset.traverse_errors(changeset, fn {msg, opts} ->
|
||||
# Enum.reduce(opts, msg, fn {key, value}, acc ->
|
||||
# String.replace(acc, "%{#{key}}", to_string(value))
|
||||
# end)
|
||||
# end)}
|
||||
end
|
||||
end
|
||||
|
||||
@spec gravatar(String.t()) :: String.t() | nil
|
||||
defp gravatar(nil), do: nil
|
||||
# @spec register(map()) :: {:ok, Actor.t()} | {:error, String.t()}
|
||||
# def register(%{email: email, password: password, username: username}) do
|
||||
# with avatar <- gravatar(email),
|
||||
# user_changeset <-
|
||||
# User.registration_changeset(%User{}, %{
|
||||
# email: email,
|
||||
# password: password,
|
||||
# default_actor: %{
|
||||
# preferred_username: username,
|
||||
# domain: nil,
|
||||
# keys: create_keys(),
|
||||
# avatar_url: avatar
|
||||
# }
|
||||
# }),
|
||||
# {:ok, %User{default_actor: %Actor{} = actor, id: user_id} = user} <-
|
||||
# Mobilizon.Repo.insert(user_changeset),
|
||||
# {:ok, %Actor{} = _actor} <- update_actor(actor, %{user_id: user_id}) do
|
||||
# {:ok, Repo.preload(user, [:actors])}
|
||||
# else
|
||||
# {:error, %Ecto.Changeset{} = changeset} ->
|
||||
# handle_actor_user_changeset(changeset)
|
||||
# end
|
||||
# end
|
||||
|
||||
defp gravatar(email) do
|
||||
avatar_url = gravatar_url(email, default: "404")
|
||||
# @spec handle_actor_user_changeset(Ecto.Changeset.t()) :: {:error, String.t()}
|
||||
# defp handle_actor_user_changeset(changeset) do
|
||||
# changeset =
|
||||
# Ecto.Changeset.traverse_errors(changeset, fn
|
||||
# {msg, _opts} -> msg
|
||||
# msg -> msg
|
||||
# end)
|
||||
|
||||
case HTTPoison.get(avatar_url) do
|
||||
{:ok, %HTTPoison.Response{status_code: 200}} ->
|
||||
avatar_url
|
||||
# email_msg = Map.get(changeset, :email) || [:empty_email]
|
||||
# {:error, hd(email_msg)}
|
||||
# end
|
||||
|
||||
_ ->
|
||||
nil
|
||||
end
|
||||
end
|
||||
# @spec gravatar(String.t()) :: String.t() | nil
|
||||
# defp gravatar(nil), do: nil
|
||||
|
||||
@spec handle_actor_user_changeset(Ecto.Changeset.t()) :: {:error, String.t()}
|
||||
defp handle_actor_user_changeset(changeset) do
|
||||
changeset =
|
||||
Ecto.Changeset.traverse_errors(changeset, fn
|
||||
{msg, _opts} -> msg
|
||||
msg -> msg
|
||||
end)
|
||||
# defp gravatar(email) do
|
||||
# avatar_url = gravatar_url(email, default: "404")
|
||||
|
||||
email_msg = Map.get(changeset, :email) || [:empty_email]
|
||||
{:error, hd(email_msg)}
|
||||
end
|
||||
# case HTTPoison.get(avatar_url) do
|
||||
# {:ok, %HTTPoison.Response{status_code: 200}} ->
|
||||
# avatar_url
|
||||
|
||||
# _ ->
|
||||
# nil
|
||||
# end
|
||||
# end
|
||||
|
||||
@doc """
|
||||
Create a new person actor
|
||||
|
||||
@@ -43,12 +43,10 @@ defmodule MobilizonWeb.Resolvers.User do
|
||||
@doc """
|
||||
Register an user :
|
||||
- create the user
|
||||
- create the actor
|
||||
- set the user's default_actor to the newly created actor
|
||||
- send a validation email to the user
|
||||
"""
|
||||
@spec create_user_actor(any(), map(), any()) :: tuple()
|
||||
def create_user_actor(_parent, args, _resolution) do
|
||||
@spec create_user(any(), map(), any()) :: tuple()
|
||||
def create_user(_parent, args, _resolution) do
|
||||
with {:ok, %User{} = user} <- Actors.register(args) do
|
||||
Mobilizon.Actors.Service.Activation.send_confirmation_email(user)
|
||||
{:ok, user}
|
||||
@@ -62,7 +60,7 @@ defmodule MobilizonWeb.Resolvers.User do
|
||||
with {:check_confirmation_token, {:ok, %User{} = user}} <-
|
||||
{:check_confirmation_token,
|
||||
Mobilizon.Actors.Service.Activation.check_confirmation_token(token)},
|
||||
{:get_actor, %Actor{} = actor} <- {:get_actor, Actors.get_actor_for_user(user)},
|
||||
{:get_actor, actor} <- {:get_actor, Actors.get_actor_for_user(user)},
|
||||
{:guardian_encode_and_sign, {:ok, token, _}} <-
|
||||
{:guardian_encode_and_sign, MobilizonWeb.Guardian.encode_and_sign(user)} do
|
||||
{:ok, %{token: token, user: user, person: actor}}
|
||||
@@ -70,7 +68,7 @@ defmodule MobilizonWeb.Resolvers.User do
|
||||
err ->
|
||||
Logger.info("Unable to validate user with token #{token}")
|
||||
Logger.debug(inspect(err))
|
||||
{:error, :validation_failed}
|
||||
{:error, "Unable to validate user"}
|
||||
end
|
||||
end
|
||||
|
||||
|
||||
@@ -245,9 +245,8 @@ defmodule MobilizonWeb.Schema do
|
||||
field :create_user, type: :user do
|
||||
arg(:email, non_null(:string))
|
||||
arg(:password, non_null(:string))
|
||||
arg(:username, non_null(:string))
|
||||
|
||||
resolve(&Resolvers.User.create_user_actor/3)
|
||||
resolve(handle_errors(&Resolvers.User.create_user/3))
|
||||
end
|
||||
|
||||
@desc "Validate an user after registration"
|
||||
@@ -314,18 +313,30 @@ defmodule MobilizonWeb.Schema do
|
||||
resolve(&Resolvers.Group.create_group/3)
|
||||
end
|
||||
|
||||
@desc "Delete a group"
|
||||
field :delete_group, :deleted_object do
|
||||
arg(:group_id, non_null(:integer))
|
||||
arg(:actor_id, non_null(:integer))
|
||||
|
||||
resolve(&Resolvers.Group.delete_group/3)
|
||||
end
|
||||
|
||||
# @desc "Upload a picture"
|
||||
# field :upload_picture, :picture do
|
||||
# arg(:file, non_null(:upload))
|
||||
# resolve(&Resolvers.Upload.upload_picture/3)
|
||||
# end
|
||||
end
|
||||
|
||||
def handle_errors(fun) do
|
||||
fn source, args, info ->
|
||||
case Absinthe.Resolution.call(fun, source, args, info) do
|
||||
{:error, %Ecto.Changeset{} = changeset} -> format_changeset(changeset)
|
||||
val -> val
|
||||
end
|
||||
end
|
||||
end
|
||||
|
||||
def format_changeset(changeset) do
|
||||
# {:error, [email: {"has already been taken", []}]}
|
||||
errors =
|
||||
changeset.errors
|
||||
|> Enum.map(fn {_key, {value, context}} ->
|
||||
[message: "#{value}", details: context]
|
||||
end)
|
||||
|
||||
{:error, errors}
|
||||
end
|
||||
end
|
||||
|
||||
@@ -69,4 +69,42 @@ defmodule MobilizonWeb.Schema.Actors.GroupType do
|
||||
|
||||
value(:open, description: "The actor is open to followings")
|
||||
end
|
||||
|
||||
object :group_queries do
|
||||
@desc "Get all groups"
|
||||
field :groups, list_of(:group) do
|
||||
arg(:page, :integer, default_value: 1)
|
||||
arg(:limit, :integer, default_value: 10)
|
||||
resolve(&Resolvers.Group.list_groups/3)
|
||||
end
|
||||
|
||||
@desc "Get a group by it's preferred username"
|
||||
field :group, :group do
|
||||
arg(:preferred_username, non_null(:string))
|
||||
resolve(&Resolvers.Group.find_group/3)
|
||||
end
|
||||
end
|
||||
|
||||
object :group_mutations do
|
||||
@desc "Create a group"
|
||||
field :create_group, :group do
|
||||
arg(:preferred_username, non_null(:string), description: "The name for the group")
|
||||
arg(:name, :string, description: "The displayed name for the group")
|
||||
arg(:description, :string, description: "The summary for the group", default_value: "")
|
||||
|
||||
arg(:admin_actor_username, :string,
|
||||
description: "The actor's username which will be the admin (otherwise user's default one)"
|
||||
)
|
||||
|
||||
resolve(&Resolvers.Group.create_group/3)
|
||||
end
|
||||
|
||||
@desc "Delete a group"
|
||||
field :delete_group, :deleted_object do
|
||||
arg(:group_id, non_null(:integer))
|
||||
arg(:actor_id, non_null(:integer))
|
||||
|
||||
resolve(&Resolvers.Group.delete_group/3)
|
||||
end
|
||||
end
|
||||
end
|
||||
|
||||
@@ -13,7 +13,7 @@ defmodule MobilizonWeb.Schema.UserType do
|
||||
description: "The user's list of profiles (identities)"
|
||||
)
|
||||
|
||||
field(:default_actor, non_null(:person), description: "The user's default actor")
|
||||
field(:default_actor, :person, description: "The user's default actor")
|
||||
|
||||
field(:confirmed_at, :datetime,
|
||||
description: "The datetime when the user was confirmed/activated"
|
||||
|
||||
Reference in New Issue
Block a user