defmodule MemexWeb.UserSettingsController do use MemexWeb, :controller import MemexWeb.Gettext alias Memex.Accounts alias MemexWeb.UserAuth plug :assign_email_and_password_changesets def edit(conn, _params) do render(conn, :edit, page_title: gettext("settings")) end def update(%{assigns: %{current_user: user}} = conn, %{ "action" => "update_email", "current_password" => password, "user" => user_params }) do case Accounts.apply_user_email(user, password, user_params) do {:ok, applied_user} -> Accounts.deliver_update_email_instructions( applied_user, user.email, fn token -> url(MemexWeb.Endpoint, ~p"/users/settings/confirm_email/#{token}") end ) conn |> put_flash( :info, dgettext( "prompts", "a link to confirm your email change has been sent to the new address." ) ) |> redirect(to: ~p"/users/settings") {:error, changeset} -> conn |> render(:edit, email_changeset: changeset) end end def update(%{assigns: %{current_user: user}} = conn, %{ "action" => "update_password", "current_password" => password, "user" => user_params }) do case Accounts.update_user_password(user, password, user_params) do {:ok, user} -> conn |> put_flash(:info, dgettext("prompts", "password updated successfully.")) |> put_session(:user_return_to, ~p"/users/settings") |> UserAuth.log_in_user(user) {:error, changeset} -> conn |> render(:edit, password_changeset: changeset) end end def update( %{assigns: %{current_user: user}} = conn, %{"action" => "update_locale", "user" => %{"locale" => locale}} ) do case Accounts.update_user_locale(user, locale) do {:ok, _user} -> conn |> put_flash(:info, dgettext("prompts", "language updated successfully.")) |> redirect(to: ~p"/users/settings") {:error, changeset} -> conn |> render(:edit, locale_changeset: changeset) end end def confirm_email(%{assigns: %{current_user: user}} = conn, %{"token" => token}) do case Accounts.update_user_email(user, token) do :ok -> conn |> put_flash(:info, dgettext("prompts", "email changed successfully.")) |> redirect(to: ~p"/users/settings") :error -> conn |> put_flash( :error, dgettext("errors", "email change link is invalid or it has expired.") ) |> redirect(to: ~p"/users/settings") end end def delete(%{assigns: %{current_user: current_user}} = conn, %{"id" => user_id}) do if user_id == current_user.id do current_user |> Accounts.delete_user!(current_user) conn |> put_flash(:error, dgettext("prompts", "your account has been deleted")) |> redirect(to: ~p"/") else conn |> put_flash(:error, dgettext("errors", "unable to delete user")) |> redirect(to: ~p"/users/settings") end end defp assign_email_and_password_changesets(%{assigns: %{current_user: user}} = conn, _opts) do conn |> assign(:email_changeset, Accounts.change_user_email(user)) |> assign(:password_changeset, Accounts.change_user_password(user)) |> assign(:locale_changeset, Accounts.change_user_locale(user)) end end