WIP: add liveview

lib/mv_web/property_live/form_component.ex

@@ -0,0 +1,77 @@
+defmodule MvWeb.PropertyLive.FormComponent do
+  use MvWeb, :live_component
+
+  @impl true
+  def render(assigns) do
+    ~H"""
+    <div>
+      <.header>
+        {@title}
+        <:subtitle>Use this form to manage property records in your database.</:subtitle>
+      </.header>
+
+      <.simple_form
+        for={@form}
+        id="property-form"
+        phx-target={@myself}
+        phx-change="validate"
+        phx-submit="save"
+      >
+        <.input field={@form[:value]} type="text" label="Value" /><.input
+          field={@form[:member_id]}
+          type="text"
+          label="Member"
+        /><.input field={@form[:property_type_id]} type="text" label="Property type" />
+
+        <:actions>
+          <.button phx-disable-with="Saving...">Save Property</.button>
+        </:actions>
+      </.simple_form>
+    </div>
+    """
+  end
+
+  @impl true
+  def update(assigns, socket) do
+    {:ok,
+     socket
+     |> assign(assigns)
+     |> assign_form()}
+  end
+
+  @impl true
+  def handle_event("validate", %{"property" => property_params}, socket) do
+    {:noreply,
+     assign(socket, form: AshPhoenix.Form.validate(socket.assigns.form, property_params))}
+  end
+
+  def handle_event("save", %{"property" => property_params}, socket) do
+    case AshPhoenix.Form.submit(socket.assigns.form, params: property_params) do
+      {:ok, property} ->
+        notify_parent({:saved, property})
+
+        socket =
+          socket
+          |> put_flash(:info, "Property #{socket.assigns.form.source.type}d successfully")
+          |> push_patch(to: socket.assigns.patch)
+
+        {:noreply, socket}
+
+      {:error, form} ->
+        {:noreply, assign(socket, form: form)}
+    end
+  end
+
+  defp notify_parent(msg), do: send(self(), {__MODULE__, msg})
+
+  defp assign_form(%{assigns: %{property: property}} = socket) do
+    form =
+      if property do
+        AshPhoenix.Form.for_update(property, :update, as: "property")
+      else
+        AshPhoenix.Form.for_create(Mv.Membership.Property, :create, as: "property")
+      end
+
+    assign(socket, form: to_form(form))
+  end
+end

lib/mv_web/property_live/index.ex

@@ -0,0 +1,99 @@
+defmodule MvWeb.PropertyLive.Index do
+  use MvWeb, :live_view
+
+  @impl true
+  def render(assigns) do
+    ~H"""
+    <.header>
+      Listing Properties
+      <:actions>
+        <.link patch={~p"/properties/new"}>
+          <.button>New Property</.button>
+        </.link>
+      </:actions>
+    </.header>
+
+    <.table
+      id="properties"
+      rows={@streams.properties}
+      row_click={fn {_id, property} -> JS.navigate(~p"/properties/#{property}") end}
+    >
+      <:col :let={{_id, property}} label="Id">{property.id}</:col>
+
+      <:action :let={{_id, property}}>
+        <div class="sr-only">
+          <.link navigate={~p"/properties/#{property}"}>Show</.link>
+        </div>
+
+        <.link patch={~p"/properties/#{property}/edit"}>Edit</.link>
+      </:action>
+
+      <:action :let={{id, property}}>
+        <.link
+          phx-click={JS.push("delete", value: %{id: property.id}) |> hide("##{id}")}
+          data-confirm="Are you sure?"
+        >
+          Delete
+        </.link>
+      </:action>
+    </.table>
+
+    <.modal
+      :if={@live_action in [:new, :edit]}
+      id="property-modal"
+      show
+      on_cancel={JS.patch(~p"/properties")}
+    >
+      <.live_component
+        module={MvWeb.PropertyLive.FormComponent}
+        id={(@property && @property.id) || :new}
+        title={@page_title}
+        action={@live_action}
+        property={@property}
+        patch={~p"/properties"}
+      />
+    </.modal>
+    """
+  end
+
+  @impl true
+  def mount(_params, _session, socket) do
+    {:ok, stream(socket, :properties, Ash.read!(Mv.Membership.Property))}
+  end
+
+  @impl true
+  def handle_params(params, _url, socket) do
+    {:noreply, apply_action(socket, socket.assigns.live_action, params)}
+  end
+
+  defp apply_action(socket, :edit, %{"id" => id}) do
+    socket
+    |> assign(:page_title, "Edit Property")
+    |> assign(:property, Ash.get!(Mv.Membership.Property, id))
+  end
+
+  defp apply_action(socket, :new, _params) do
+    socket
+    |> assign(:page_title, "New Property")
+    |> assign(:property, nil)
+  end
+
+  defp apply_action(socket, :index, _params) do
+    socket
+    |> assign(:page_title, "Listing Properties")
+    |> assign(:property, nil)
+  end
+
+  @impl true
+  def handle_info({MvWeb.PropertyLive.FormComponent, {:saved, property}}, socket) do
+    {:noreply, stream_insert(socket, :properties, property)}
+  end
+
+  @impl true
+  def handle_event("delete", %{"id" => id}, socket) do
+    property = Ash.get!(Mv.Membership.Property, id)
+    Ash.destroy!(property)
+
+    {:noreply, stream_delete(socket, :properties, property)}
+  end
+end

lib/mv_web/property_live/show.ex

@@ -0,0 +1,57 @@
+defmodule MvWeb.PropertyLive.Show do
+  use MvWeb, :live_view
+
+  @impl true
+  def render(assigns) do
+    ~H"""
+    <.header>
+      Property {@property.id}
+      <:subtitle>This is a property record from your database.</:subtitle>
+
+      <:actions>
+        <.link patch={~p"/properties/#{@property}/show/edit"} phx-click={JS.push_focus()}>
+          <.button>Edit property</.button>
+        </.link>
+      </:actions>
+    </.header>
+
+    <.list>
+      <:item title="Id">{@property.id}</:item>
+    </.list>
+
+    <.back navigate={~p"/properties"}>Back to properties</.back>
+
+    <.modal
+      :if={@live_action == :edit}
+      id="property-modal"
+      show
+      on_cancel={JS.patch(~p"/properties/#{@property}")}
+    >
+      <.live_component
+        module={MvWeb.PropertyLive.FormComponent}
+        id={@property.id}
+        title={@page_title}
+        action={@live_action}
+        property={@property}
+        patch={~p"/properties/#{@property}"}
+      />
+    </.modal>
+    """
+  end
+
+  @impl true
+  def mount(_params, _session, socket) do
+    {:ok, socket}
+  end
+
+  @impl true
+  def handle_params(%{"id" => id}, _, socket) do
+    {:noreply,
+     socket
+     |> assign(:page_title, page_title(socket.assigns.live_action))
+     |> assign(:property, Ash.get!(Mv.Membership.Property, id))}
+  end
+
+  defp page_title(:show), do: "Show Property"
+  defp page_title(:edit), do: "Edit Property"
+end