phoenix_duskmoon

defmodule PhoenixDuskmoon.Component.DataEntry.Textarea do
  @moduledoc """
  Textarea component for multi-line text input.

  ## Examples

      <.dm_form for={@form} phx-submit="save">
        <.dm_textarea field={@form[:description]} label="Description" />
        <.dm_textarea field={@form[:notes]} label="Notes" rows={5} color="success" />
        <.dm_textarea field={@form[:comment]} label="Comment" size="lg" resize="none" />
      </.dm_form>

  """
  use Phoenix.Component

  import PhoenixDuskmoon.Component.DataEntry.Form, only: [dm_error: 1, field_errors: 2]
  import PhoenixDuskmoon.Component.Helpers, only: [css_color: 1]

  @doc """
  Renders a textarea input.

  ## Examples

      <.dm_textarea field={@form[:description]} label="Description" />
      <.dm_textarea name="notes" label="Notes" rows={5} />

  """
  @doc type: :component
  attr(:id, :any, default: nil, doc: "HTML id attribute")
  attr(:name, :any, doc: "HTML name attribute for form submission")
  attr(:value, :any, default: nil, doc: "the textarea content")
  attr(:field, Phoenix.HTML.FormField, doc: "a form field struct retrieved from the form")
  attr(:label, :string, default: nil, doc: "text label displayed above the textarea")
  attr(:placeholder, :string, default: nil, doc: "placeholder text shown when empty")
  attr(:rows, :integer, default: 3, doc: "number of visible text rows")
  attr(:cols, :integer, default: nil, doc: "number of visible text columns")
  attr(:size, :string, default: "md", values: ["xs", "sm", "md", "lg"], doc: "textarea size")

  attr(:variant, :string,
    default: "bordered",
    values: ["ghost", "filled", "bordered", nil],
    doc: "the textarea style variant (ghost, filled, bordered)"
  )

  attr(:color, :string,
    default: "primary",
    values: ["primary", "secondary", "tertiary", "accent", "info", "success", "warning", "error"],
    doc: "color variant"
  )

  attr(:resize, :string,
    default: "vertical",
    values: ["none", "vertical", "horizontal", "both"],
    doc: "resize behavior"
  )

  attr(:helper, :string, default: nil, doc: "helper text displayed below the textarea")
  attr(:errors, :list, default: [], doc: "list of error messages to display")
  attr(:disabled, :boolean, default: false, doc: "disables the textarea")
  attr(:horizontal, :boolean, default: false, doc: "horizontal layout (label beside input)")

  attr(:state, :string,
    default: nil,
    values: [nil, "success", "warning"],
    doc: "validation state (applies form-group-success/warning)"
  )

  attr(:readonly, :boolean, default: false, doc: "makes the textarea read-only")
  attr(:required, :boolean, default: false, doc: "marks the textarea as required")
  attr(:maxlength, :integer, default: nil, doc: "maximum character count")
  attr(:class, :any, default: nil, doc: "additional CSS classes for the wrapper")
  attr(:label_class, :any, default: nil, doc: "additional CSS classes for the label")

  attr(:textarea_class, :any,
    default: nil,
    doc: "additional CSS classes for the textarea element"
  )

  attr(:rest, :global)

  def dm_textarea(%{field: %Phoenix.HTML.FormField{} = field} = assigns) do
    assigns
    |> assign(field: nil, id: assigns.id || field.id)
    |> assign_new(:name, fn -> field.name end)
    |> assign(:errors, field_errors(field, assigns[:errors]))
    |> assign(:value, field.value)
    |> dm_textarea()
  end

  def dm_textarea(assigns) do
    assigns = assign(assigns, :color, css_color(assigns.color))

    ~H"""
    <div class={[
      "form-group",
      @horizontal && "form-group-horizontal",
      @disabled && "form-group-disabled",
      @errors != [] && "form-group-error",
      @state && "form-group-#{@state}",
      @class
    ]} phx-feedback-for={@name}>
      <label :if={@label} for={@id} class={["form-label", @label_class]}>
        <span>{@label}</span>
      </label>
      <textarea
        id={@id}
        name={@name}
        placeholder={@placeholder}
        rows={@rows}
        cols={@cols}
        disabled={@disabled}
        aria-disabled={@disabled && "true"}
        readonly={@readonly}
        required={@required}
        maxlength={@maxlength}
        aria-invalid={@errors != [] && "true"}
        aria-describedby={
          (@errors != [] && @id && "#{@id}-errors") ||
            (@helper && @errors == [] && @id && "#{@id}-helper")
        }
        class={[
          "textarea",
          @variant && "textarea-#{@variant}",
          "textarea-#{@size}",
          "textarea-#{@color}",
          resize_class(@resize),
          @textarea_class
        ]}
        {@rest}
      >{@value}</textarea>
      <span :if={@helper && @errors == []} id={@id && "#{@id}-helper"} class={["helper-text", @state && "helper-text-#{@state}"]}>{@helper}</span>
      <div :if={@errors != []} id={@id && "#{@id}-errors"}>
        <.dm_error :for={msg <- @errors}>{msg}</.dm_error>
      </div>
    </div>
    """
  end

  defp resize_class("none"), do: "textarea-resize-none"
  defp resize_class("vertical"), do: "textarea-resize-vertical"
  defp resize_class("horizontal"), do: "textarea-resize-horizontal"
  defp resize_class("both"), do: "textarea-resize-both"
end