feat(elixir:gsmlg): Add blog module.

Author: gsmlg

elixir/gsmlg_umbrella/apps/gsmlg/lib/gsmlg/content.ex

@@ -0,0 +1,104 @@
+defmodule GSMLG.Content do
+  @moduledoc """
+  The Content context.
+  """
+
+  import Ecto.Query, warn: false
+  alias GSMLG.Repo
+
+  alias GSMLG.Content.Blog
+
+  @doc """
+  Returns the list of blogs.
+
+  ## Examples
+
+      iex> list_blogs()
+      [%Blog{}, ...]
+
+  """
+  def list_blogs do
+    Repo.all(Blog)
+  end
+
+  @doc """
+  Gets a single blog.
+
+  Raises `Ecto.NoResultsError` if the Blog does not exist.
+
+  ## Examples
+
+      iex> get_blog!(123)
+      %Blog{}
+
+      iex> get_blog!(456)
+      ** (Ecto.NoResultsError)
+
+  """
+  def get_blog!(id), do: Repo.get!(Blog, id)
+
+  @doc """
+  Creates a blog.
+
+  ## Examples
+
+      iex> create_blog(%{field: value})
+      {:ok, %Blog{}}
+
+      iex> create_blog(%{field: bad_value})
+      {:error, %Ecto.Changeset{}}
+
+  """
+  def create_blog(attrs \\ %{}) do
+    %Blog{}
+    |> Blog.changeset(attrs)
+    |> Repo.insert()
+  end
+
+  @doc """
+  Updates a blog.
+
+  ## Examples
+
+      iex> update_blog(blog, %{field: new_value})
+      {:ok, %Blog{}}
+
+      iex> update_blog(blog, %{field: bad_value})
+      {:error, %Ecto.Changeset{}}
+
+  """
+  def update_blog(%Blog{} = blog, attrs) do
+    blog
+    |> Blog.changeset(attrs)
+    |> Repo.update()
+  end
+
+  @doc """
+  Deletes a blog.
+
+  ## Examples
+
+      iex> delete_blog(blog)
+      {:ok, %Blog{}}
+
+      iex> delete_blog(blog)
+      {:error, %Ecto.Changeset{}}
+
+  """
+  def delete_blog(%Blog{} = blog) do
+    Repo.delete(blog)
+  end
+
+  @doc """
+  Returns an `%Ecto.Changeset{}` for tracking blog changes.
+
+  ## Examples
+
+      iex> change_blog(blog)
+      %Ecto.Changeset{data: %Blog{}}
+
+  """
+  def change_blog(%Blog{} = blog, attrs \\ %{}) do
+    Blog.changeset(blog, attrs)
+  end
+end

elixir/gsmlg_umbrella/apps/gsmlg/lib/gsmlg/content/blog.ex

@@ -0,0 +1,21 @@
+defmodule GSMLG.Content.Blog do
+  use Ecto.Schema
+  import Ecto.Changeset
+
+  schema "blogs" do
+    field :author, :string
+    field :content, :string
+    field :date, :date
+    field :slug, :string
+    field :title, :string
+
+    timestamps()
+  end
+
+  @doc false
+  def changeset(blog, attrs) do
+    blog
+    |> cast(attrs, [:slug, :title, :date, :author, :content])
+    |> validate_required([:slug, :title, :date, :author, :content])
+  end
+end

elixir/gsmlg_umbrella/apps/gsmlg/priv/repo/migrations/20210927075550_create_blogs.exs

@@ -0,0 +1,15 @@
+defmodule GSMLG.Repo.Migrations.CreateBlogs do
+  use Ecto.Migration
+
+  def change do
+    create table(:blogs) do
+      add :slug, :string
+      add :title, :string
+      add :date, :date
+      add :author, :string
+      add :content, :text
+
+      timestamps()
+    end
+  end
+end

elixir/gsmlg_umbrella/apps/gsmlg/test/gsmlg/content_test.exs

@@ -0,0 +1,67 @@
+defmodule GSMLG.ContentTest do
+  use GSMLG.DataCase
+
+  alias GSMLG.Content
+
+  describe "blogs" do
+    alias GSMLG.Content.Blog
+
+    import GSMLG.ContentFixtures
+
+    @invalid_attrs %{author: nil, content: nil, date: nil, slug: nil, title: nil}
+
+    test "list_blogs/0 returns all blogs" do
+      blog = blog_fixture()
+      assert Content.list_blogs() == [blog]
+    end
+
+    test "get_blog!/1 returns the blog with given id" do
+      blog = blog_fixture()
+      assert Content.get_blog!(blog.id) == blog
+    end
+
+    test "create_blog/1 with valid data creates a blog" do
+      valid_attrs = %{author: "some author", content: "some content", date: ~D[2021-09-26], slug: "some slug", title: "some title"}
+
+      assert {:ok, %Blog{} = blog} = Content.create_blog(valid_attrs)
+      assert blog.author == "some author"
+      assert blog.content == "some content"
+      assert blog.date == ~D[2021-09-26]
+      assert blog.slug == "some slug"
+      assert blog.title == "some title"
+    end
+
+    test "create_blog/1 with invalid data returns error changeset" do
+      assert {:error, %Ecto.Changeset{}} = Content.create_blog(@invalid_attrs)
+    end
+
+    test "update_blog/2 with valid data updates the blog" do
+      blog = blog_fixture()
+      update_attrs = %{author: "some updated author", content: "some updated content", date: ~D[2021-09-27], slug: "some updated slug", title: "some updated title"}
+
+      assert {:ok, %Blog{} = blog} = Content.update_blog(blog, update_attrs)
+      assert blog.author == "some updated author"
+      assert blog.content == "some updated content"
+      assert blog.date == ~D[2021-09-27]
+      assert blog.slug == "some updated slug"
+      assert blog.title == "some updated title"
+    end
+
+    test "update_blog/2 with invalid data returns error changeset" do
+      blog = blog_fixture()
+      assert {:error, %Ecto.Changeset{}} = Content.update_blog(blog, @invalid_attrs)
+      assert blog == Content.get_blog!(blog.id)
+    end
+
+    test "delete_blog/1 deletes the blog" do
+      blog = blog_fixture()
+      assert {:ok, %Blog{}} = Content.delete_blog(blog)
+      assert_raise Ecto.NoResultsError, fn -> Content.get_blog!(blog.id) end
+    end
+
+    test "change_blog/1 returns a blog changeset" do
+      blog = blog_fixture()
+      assert %Ecto.Changeset{} = Content.change_blog(blog)
+    end
+  end
+end

elixir/gsmlg_umbrella/apps/gsmlg/test/support/fixtures/content_fixtures.ex

@@ -0,0 +1,24 @@
+defmodule GSMLG.ContentFixtures do
+  @moduledoc """
+  This module defines test helpers for creating
+  entities via the `GSMLG.Content` context.
+  """
+
+  @doc """
+  Generate a blog.
+  """
+  def blog_fixture(attrs \\ %{}) do
+    {:ok, blog} =
+      attrs
+      |> Enum.into(%{
+        author: "some author",
+        content: "some content",
+        date: ~D[2021-09-26],
+        slug: "some slug",
+        title: "some title"
+      })
+      |> GSMLG.Content.create_blog()
+
+    blog
+  end
+end

elixir/gsmlg_umbrella/apps/gsmlg_web/lib/gsmlg_web.ex

@@ -83,6 +83,7 @@ defmodule GSMLGWeb do
 
       # Import LiveView and .heex helpers (live_render, live_patch, <.form>, etc)
       import Phoenix.LiveView.Helpers
+      import GSMLGWeb.LiveHelpers
 
       # Import basic rendering functionality (render, render_layout, etc)
       import Phoenix.View

elixir/gsmlg_umbrella/apps/gsmlg_web/lib/gsmlg_web/live/blog_live/form_component.ex

@@ -0,0 +1,55 @@
+defmodule GSMLGWeb.BlogLive.FormComponent do
+  use GSMLGWeb, :live_component
+
+  alias GSMLG.Content
+
+  @impl true
+  def update(%{blog: blog} = assigns, socket) do
+    changeset = Content.change_blog(blog)
+
+    {:ok,
+     socket
+     |> assign(assigns)
+     |> assign(:changeset, changeset)}
+  end
+
+  @impl true
+  def handle_event("validate", %{"blog" => blog_params}, socket) do
+    changeset =
+      socket.assigns.blog
+      |> Content.change_blog(blog_params)
+      |> Map.put(:action, :validate)
+
+    {:noreply, assign(socket, :changeset, changeset)}
+  end
+
+  def handle_event("save", %{"blog" => blog_params}, socket) do
+    save_blog(socket, socket.assigns.action, blog_params)
+  end
+
+  defp save_blog(socket, :edit, blog_params) do
+    case Content.update_blog(socket.assigns.blog, blog_params) do
+      {:ok, _blog} ->
+        {:noreply,
+         socket
+         |> put_flash(:info, "Blog updated successfully")
+         |> push_redirect(to: socket.assigns.return_to)}
+
+      {:error, %Ecto.Changeset{} = changeset} ->
+        {:noreply, assign(socket, :changeset, changeset)}
+    end
+  end
+
+  defp save_blog(socket, :new, blog_params) do
+    case Content.create_blog(blog_params) do
+      {:ok, _blog} ->
+        {:noreply,
+         socket
+         |> put_flash(:info, "Blog created successfully")
+         |> push_redirect(to: socket.assigns.return_to)}
+
+      {:error, %Ecto.Changeset{} = changeset} ->
+        {:noreply, assign(socket, changeset: changeset)}
+    end
+  end
+end

elixir/gsmlg_umbrella/apps/gsmlg_web/lib/gsmlg_web/live/blog_live/form_component.html.heex

@@ -0,0 +1,36 @@
+<div>
+  <h2><%= @title %></h2>
+
+  <.form
+    let={f}
+    for={@changeset}
+    id="blog-form"
+    phx-target={@myself}
+    phx-change="validate"
+    phx-submit="save">
+  
+    <%= label f, :slug %>
+    <%= text_input f, :slug %>
+    <%= error_tag f, :slug %>
+  
+    <%= label f, :title %>
+    <%= text_input f, :title %>
+    <%= error_tag f, :title %>
+  
+    <%= label f, :date %>
+    <%= date_select f, :date %>
+    <%= error_tag f, :date %>
+  
+    <%= label f, :author %>
+    <%= text_input f, :author %>
+    <%= error_tag f, :author %>
+  
+    <%= label f, :content %>
+    <%= textarea f, :content %>
+    <%= error_tag f, :content %>
+  
+    <div>
+      <%= submit "Save", phx_disable_with: "Saving..." %>
+    </div>
+  </.form>
+</div>

elixir/gsmlg_umbrella/apps/gsmlg_web/lib/gsmlg_web/live/blog_live/index.ex

@@ -0,0 +1,46 @@
+defmodule GSMLGWeb.BlogLive.Index do
+  use GSMLGWeb, :live_view
+
+  alias GSMLG.Content
+  alias GSMLG.Content.Blog
+
+  @impl true
+  def mount(_params, _session, socket) do
+    {:ok, assign(socket, :blogs, list_blogs())}
+  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 Blog")
+    |> assign(:blog, Content.get_blog!(id))
+  end
+
+  defp apply_action(socket, :new, _params) do
+    socket
+    |> assign(:page_title, "New Blog")
+    |> assign(:blog, %Blog{})
+  end
+
+  defp apply_action(socket, :index, _params) do
+    socket
+    |> assign(:page_title, "Listing Blogs")
+    |> assign(:blog, nil)
+  end
+
+  @impl true
+  def handle_event("delete", %{"id" => id}, socket) do
+    blog = Content.get_blog!(id)
+    {:ok, _} = Content.delete_blog(blog)
+
+    {:noreply, assign(socket, :blogs, list_blogs())}
+  end
+
+  defp list_blogs do
+    Content.list_blogs()
+  end
+end