Add functions to add admins

lib/real_estate/accounts.ex

@@ -79,6 +79,24 @@ defmodule RealEstate.Accounts do
     |> Repo.insert()
   end
 
+  @doc """
+  Registers an admin.
+
+  ## Examples
+
+      iex> register_admin(%{field: value})
+      {:ok, %User{}}
+
+      iex> register_admin(%{field: bad_value})
+      {:error, %Ecto.Changeset{}}
+
+  """
+  def register_admin(attrs) do
+    %User{}
+    |> User.admin_registration_changeset(attrs)
+    |> Repo.insert()
+  end
+
   @doc """
   Returns an `%Ecto.Changeset{}` for tracking user changes.
 

lib/real_estate/accounts/user.ex

@@ -34,6 +34,15 @@ defmodule RealEstate.Accounts.User do
     |> validate_password()
   end
 
+  @doc """
+  A user changeset for registering admins.
+  """
+  def admin_registration_changeset(user, attrs) do
+    user
+    |> registration_changeset(attrs)
+    |> prepare_changes(&set_admin_role/1)
+  end
+
   defp validate_email(changeset) do
     changeset
     |> validate_required([:email])
@@ -61,6 +70,11 @@ defmodule RealEstate.Accounts.User do
     |> delete_change(:password)
   end
 
+  defp set_admin_role(changeset) do
+    changeset
+    |> put_change(:role, :admin)
+  end
+
   @doc """
   A user changeset for changing the email.