defmodule BerrypodWeb.Admin.EmailSettings do
use BerrypodWeb, :live_view
alias Berrypod.Mailer
alias Berrypod.Mailer.Adapters
alias Berrypod.Settings
@impl true
def mount(_params, _session, socket) do
env_locked = Mailer.env_var_configured?()
{current_adapter, current_values} = Mailer.current_config()
saved_adapter = Settings.get_setting("email_adapter")
adapter_key = current_adapter || saved_adapter
grouped = Adapters.grouped()
{:ok,
socket
|> assign(:page_title, "Email settings")
|> assign(:env_locked, env_locked)
|> assign(:adapter_key, adapter_key)
|> assign(:current_values, current_values)
|> assign(:all_email_adapters, grouped[:all_email] || [])
|> assign(:transactional_adapters, grouped[:transactional] || [])
|> assign(:advanced_adapters, grouped[:advanced] || [])
|> assign(:email_configured, Mailer.email_configured?())
|> assign(:selected_adapter, adapter_key && Adapters.get(adapter_key))
|> assign(:sending_test, false)
|> assign(:test_result, if(Mailer.email_verified?(), do: :ok))
|> assign(:test_error, nil)
|> assign(:test_retryable, false)
|> assign(:from_checklist, false)
|> assign(:field_errors, %{})
|> assign(:form, to_form(%{}, as: :email))}
end
@impl true
def handle_params(params, _uri, socket) do
# Support ?adapter=X for no-JS adapter switching
adapter_key = params["adapter"] || socket.assigns.adapter_key
socket =
if adapter_key && adapter_key != socket.assigns.adapter_key do
values = load_adapter_values(adapter_key)
socket
|> assign(:adapter_key, adapter_key)
|> assign(:selected_adapter, Adapters.get(adapter_key))
|> assign(:current_values, values)
|> assign(:field_errors, %{})
|> assign(:test_result, nil)
|> assign(:test_error, nil)
else
socket
end
{:noreply, assign(socket, :from_checklist, params["from"] == "checklist")}
end
defp load_adapter_values(nil), do: %{}
defp load_adapter_values(adapter_key) do
case Adapters.get(adapter_key) do
nil ->
%{}
adapter_info ->
for field <- adapter_info.fields, into: %{} do
settings_key = Adapters.settings_key(adapter_key, field.key)
value =
case field.type do
:secret -> Settings.secret_hint(settings_key)
_ -> Settings.get_setting(settings_key)
end
{field.key, value}
end
end
end
@impl true
def handle_event("form_change", %{"email" => %{"adapter" => key}}, socket) do
if key == socket.assigns.adapter_key do
{:noreply, socket}
else
values = load_adapter_values(key)
{:noreply,
socket
|> assign(:adapter_key, key)
|> assign(:selected_adapter, Adapters.get(key))
|> assign(:current_values, values)
|> assign(:field_errors, %{})
|> assign(:test_result, nil)
|> assign(:test_error, nil)}
end
end
def handle_event("save", %{"email" => params}, socket) do
if socket.assigns.env_locked do
{:noreply, put_flash(socket, :error, "Email config is controlled by environment variables")}
else
adapter_key = params["adapter"]
case Mailer.save_config(adapter_key, params, socket.assigns.current_scope.user.email) do
{:ok, _adapter_info} ->
{current_adapter, current_values} = Mailer.current_config()
{:noreply,
socket
|> assign(:adapter_key, current_adapter)
|> assign(:selected_adapter, Adapters.get(current_adapter))
|> assign(:current_values, current_values)
|> assign(:email_configured, Mailer.email_configured?())
|> assign(:field_errors, %{})
|> assign(:test_result, nil)
|> assign(:test_error, nil)
|> put_flash(:info, "Settings saved — send a test email to check it works")}
{:error, field_errors} when is_map(field_errors) ->
{:noreply, assign(socket, :field_errors, field_errors)}
end
end
end
def handle_event("send_test", _params, socket) do
send(self(), :do_send_test)
{:noreply, assign(socket, :sending_test, true)}
end
@impl true
def handle_info(:do_send_test, socket) do
user = socket.assigns.current_scope.user
case Mailer.send_test_email(user.email, Mailer.from_address()) do
{:ok, _} ->
Mailer.mark_email_verified()
{:noreply,
socket
|> assign(:sending_test, false)
|> assign(:test_result, :ok)
|> assign(:test_error, nil)}
{:error, reason} ->
{:noreply,
socket
|> assign(:sending_test, false)
|> assign(:test_result, :error)
|> assign(:test_error, Mailer.friendly_error(reason))
|> assign(:test_retryable, Mailer.retryable_error?(reason))}
end
end
# Swoosh test adapter sends {:email, ...} messages — ignore them
def handle_info({:email, _}, socket), do: {:noreply, socket}
@impl true
def render(assigns) do
~H"""
<.icon name="hero-clipboard-document-check" class="size-5 admin-checklist-banner-icon" />
You're setting up email for your shop.
<.link navigate={~p"/admin"} class="admin-link admin-checklist-banner-link">
← Back to checklist
<.header>
Email settings
<:subtitle>
Your shop needs an email provider to send order confirmations,
shipping updates, and newsletters to your customers.
<%= if @env_locked do %>
<.icon name="hero-lock-closed" class="size-5" />
Controlled by environment variables
Email is configured via SMTP_HOST and related env vars.
Remove them to configure email from this page instead.
<% end %>
<.form
for={@form}
action={~p"/admin/settings/email"}
method="post"
phx-change="form_change"
phx-submit="save"
>
<%!-- Hidden field tracks which adapter's config fields are rendered --%>
<%!-- Step 1: Choose a provider --%>
1
Choose a provider
<%!-- Steps 2 & 3 appear for the selected adapter only --%>
<%!-- Step 2: Create an account (providers with sign-up URLs) --%>
2
Create a free account
<.external_link href={@selected_adapter.url} class="admin-link">
Sign up at {@selected_adapter.name} ↗
if you don't already have an account. It's free.
<%!-- Step 3 (or 2 for advanced): Paste your key --%>
{if @selected_adapter.url, do: "3", else: "2"}
{adapter_fields_title(@selected_adapter)}
{adapter_fields_instruction(@selected_adapter)}
<%= for field <- @selected_adapter.fields do %>
<.adapter_field_static
field_def={field}
value={@current_values[field.key]}
disabled={@env_locked}
error={@field_errors[field.key]}
/>
<% end %>
<%= unless @env_locked do %>
<.button phx-disable-with="Saving...">
Save settings
<% end %>
<%!-- No-JS: if adapter changed but config not yet shown, submit to reload --%>
<%!-- Step 4: Send a test email (only after config saved) --%>