Add radio_fieldset function component that autogenerates radio buttons

Author: codeanpeace

lib/live_cal/scheduling/calendar.ex

@@ -5,6 +5,7 @@ defmodule LiveCal.Scheduling.Calendar do
   schema "calendars" do
     field :description, :string
     field :name, :string
+    field :visibility, Ecto.Enum, values: [:public, :private], default: :private
 
     has_many :events, LiveCal.Scheduling.Event, on_replace: :delete
 
@@ -14,12 +15,12 @@ defmodule LiveCal.Scheduling.Calendar do
   @doc false
   def changeset(calendar, attrs) do
     calendar
-    |> cast(attrs, [:name, :description])
+    |> cast(attrs, [:name, :description, :visibility])
     |> cast_assoc(:events,
       with: &LiveCal.Scheduling.Event.changeset/2,
       sort_param: :events_sort,
       drop_param: :events_drop
     )
-    |> validate_required([:name, :description])
+    |> validate_required([:name, :description, :visibility])
   end
 end

lib/live_cal_web/components/core_components.ex

@@ -387,6 +387,31 @@ defmodule LiveCalWeb.CoreComponents do
     """
   end
 
+  @doc """
+  Renders a fieldset with multiple radio buttons representing `Ecto.Enum` fields.
+  note: string interpolation of `@field.value` is because it can switch from an atom to string
+        depending on whether it came from the database or form
+  """
+  attr :field, Phoenix.HTML.FormField,
+    doc: "a form field struct retrieved from the form, for example: @form[:email]"
+  attr :options, :list, doc: "the options for the radio buttons in the fieldset"
+  attr :checked_value, :string, doc: "the currently checked value"
+  def radio_fieldset(%{field: %Phoenix.HTML.FormField{}} = assigns) do
+    ~H"""
+    <div phx-feedback-for={@field.name}>
+      <.input :for={option <- @options}
+        field={@field}
+        id={"#{@field.id}_#{option}"}
+        type="radio"
+        label={String.capitalize(option)}
+        value={option}
+        checked={(@checked_value == option) || (@field.value == String.to_atom(option))}
+      />
+    </div>
+    """
+  end
+
+
   @doc """
   Renders a label.
   """

lib/live_cal_web/live/calendar_live/form_component.ex

@@ -22,6 +22,11 @@ defmodule LiveCalWeb.CalendarLive.FormComponent do
         <.input field={@form[:name]} type="text" label="Name" />
         <.input field={@form[:description]} type="text" label="Description" />
 
+        <.radio_fieldset field={@form[:visibility]}
+          options={Ecto.Enum.dump_values(Scheduling.Calendar, :visibility)}
+          checked_value={@form.params["visibility"]}
+        />
+
         <h2>Manage Events</h2>
         <.inputs_for :let={ef} field={@form[:events]}>
           <input type="hidden" name="calendar[events_sort][]" value={ef.index} />

priv/repo/migrations/20230614220250_create_calendars.exs

@@ -5,6 +5,7 @@ defmodule LiveCal.Repo.Migrations.CreateCalendars do
     create table(:calendars) do
       add :name, :string
       add :description, :string
+      add :visibility, :string
 
       timestamps()
     end