init

test/support/conn_case.ex

@@ -0,0 +1,38 @@
+defmodule WebmonWeb.ConnCase do
+  @moduledoc """
+  This module defines the test case to be used by
+  tests that require setting up a connection.
+
+  Such tests rely on `Phoenix.ConnTest` and also
+  import other functionality to make it easier
+  to build common data structures and query the data layer.
+
+  Finally, if the test case interacts with the database,
+  we enable the SQL sandbox, so changes done to the database
+  are reverted at the end of every test. If you are using
+  PostgreSQL, you can even run database tests asynchronously
+  by setting `use WebmonWeb.ConnCase, async: true`, although
+  this option is not recommended for other databases.
+  """
+
+  use ExUnit.CaseTemplate
+
+  using do
+    quote do
+      # The default endpoint for testing
+      @endpoint WebmonWeb.Endpoint
+
+      use WebmonWeb, :verified_routes
+
+      # Import conveniences for testing with connections
+      import Plug.Conn
+      import Phoenix.ConnTest
+      import WebmonWeb.ConnCase
+    end
+  end
+
+  setup tags do
+    Webmon.DataCase.setup_sandbox(tags)
+    {:ok, conn: Phoenix.ConnTest.build_conn()}
+  end
+end

test/support/data_case.ex

@@ -0,0 +1,58 @@
+defmodule Webmon.DataCase do
+  @moduledoc """
+  This module defines the setup for tests requiring
+  access to the application's data layer.
+
+  You may define functions here to be used as helpers in
+  your tests.
+
+  Finally, if the test case interacts with the database,
+  we enable the SQL sandbox, so changes done to the database
+  are reverted at the end of every test. If you are using
+  PostgreSQL, you can even run database tests asynchronously
+  by setting `use Webmon.DataCase, async: true`, although
+  this option is not recommended for other databases.
+  """
+
+  use ExUnit.CaseTemplate
+
+  using do
+    quote do
+      alias Webmon.Repo
+
+      import Ecto
+      import Ecto.Changeset
+      import Ecto.Query
+      import Webmon.DataCase
+    end
+  end
+
+  setup tags do
+    Webmon.DataCase.setup_sandbox(tags)
+    :ok
+  end
+
+  @doc """
+  Sets up the sandbox based on the test tags.
+  """
+  def setup_sandbox(tags) do
+    pid = Ecto.Adapters.SQL.Sandbox.start_owner!(Webmon.Repo, shared: not tags[:async])
+    on_exit(fn -> Ecto.Adapters.SQL.Sandbox.stop_owner(pid) end)
+  end
+
+  @doc """
+  A helper that transforms changeset errors into a map of messages.
+
+      assert {:error, changeset} = Accounts.create_user(%{password: "short"})
+      assert "password is too short" in errors_on(changeset).password
+      assert %{password: ["password is too short"]} = errors_on(changeset)
+
+  """
+  def errors_on(changeset) do
+    Ecto.Changeset.traverse_errors(changeset, fn {message, opts} ->
+      Regex.replace(~r"%{(\w+)}", message, fn _, key ->
+        opts |> Keyword.get(String.to_existing_atom(key), key) |> to_string()
+      end)
+    end)
+  end
+end

test/support/fixtures/monitor_fixtures.ex

@@ -0,0 +1,21 @@
+defmodule Webmon.MonitorFixtures do
+  @moduledoc """
+  This module defines test helpers for creating
+  entities via the `Webmon.Monitor` context.
+  """
+
+  @doc """
+  Generate a website.
+  """
+  def website_fixture(attrs \\ %{}) do
+    {:ok, website} =
+      attrs
+      |> Enum.into(%{
+        name: "some name",
+        url: "some url"
+      })
+      |> Webmon.Monitor.create_website()
+
+    website
+  end
+end

test/test_helper.exs

@@ -0,0 +1,2 @@
+ExUnit.start()
+Ecto.Adapters.SQL.Sandbox.mode(Webmon.Repo, :manual)

test/webmon/monitor_test.exs

@@ -0,0 +1,61 @@
+defmodule Webmon.MonitorTest do
+  use Webmon.DataCase
+
+  alias Webmon.Monitor
+
+  describe "websites" do
+    alias Webmon.Monitor.Website
+
+    import Webmon.MonitorFixtures
+
+    @invalid_attrs %{name: nil, url: nil}
+
+    test "list_websites/0 returns all websites" do
+      website = website_fixture()
+      assert Monitor.list_websites() == [website]
+    end
+
+    test "get_website!/1 returns the website with given id" do
+      website = website_fixture()
+      assert Monitor.get_website!(website.id) == website
+    end
+
+    test "create_website/1 with valid data creates a website" do
+      valid_attrs = %{name: "some name", url: "some url"}
+
+      assert {:ok, %Website{} = website} = Monitor.create_website(valid_attrs)
+      assert website.name == "some name"
+      assert website.url == "some url"
+    end
+
+    test "create_website/1 with invalid data returns error changeset" do
+      assert {:error, %Ecto.Changeset{}} = Monitor.create_website(@invalid_attrs)
+    end
+
+    test "update_website/2 with valid data updates the website" do
+      website = website_fixture()
+      update_attrs = %{name: "some updated name", url: "some updated url"}
+
+      assert {:ok, %Website{} = website} = Monitor.update_website(website, update_attrs)
+      assert website.name == "some updated name"
+      assert website.url == "some updated url"
+    end
+
+    test "update_website/2 with invalid data returns error changeset" do
+      website = website_fixture()
+      assert {:error, %Ecto.Changeset{}} = Monitor.update_website(website, @invalid_attrs)
+      assert website == Monitor.get_website!(website.id)
+    end
+
+    test "delete_website/1 deletes the website" do
+      website = website_fixture()
+      assert {:ok, %Website{}} = Monitor.delete_website(website)
+      assert_raise Ecto.NoResultsError, fn -> Monitor.get_website!(website.id) end
+    end
+
+    test "change_website/1 returns a website changeset" do
+      website = website_fixture()
+      assert %Ecto.Changeset{} = Monitor.change_website(website)
+    end
+  end
+end

test/webmon_web/controllers/error_html_test.exs

@@ -0,0 +1,14 @@
+defmodule WebmonWeb.ErrorHTMLTest do
+  use WebmonWeb.ConnCase, async: true
+
+  # Bring render_to_string/4 for testing custom views
+  import Phoenix.Template
+
+  test "renders 404.html" do
+    assert render_to_string(WebmonWeb.ErrorHTML, "404", "html", []) == "Not Found"
+  end
+
+  test "renders 500.html" do
+    assert render_to_string(WebmonWeb.ErrorHTML, "500", "html", []) == "Internal Server Error"
+  end
+end

test/webmon_web/controllers/error_json_test.exs

@@ -0,0 +1,12 @@
+defmodule WebmonWeb.ErrorJSONTest do
+  use WebmonWeb.ConnCase, async: true
+
+  test "renders 404" do
+    assert WebmonWeb.ErrorJSON.render("404.json", %{}) == %{errors: %{detail: "Not Found"}}
+  end
+
+  test "renders 500" do
+    assert WebmonWeb.ErrorJSON.render("500.json", %{}) ==
+             %{errors: %{detail: "Internal Server Error"}}
+  end
+end

test/webmon_web/controllers/page_controller_test.exs

@@ -0,0 +1,8 @@
+defmodule WebmonWeb.PageControllerTest do
+  use WebmonWeb.ConnCase
+
+  test "GET /", %{conn: conn} do
+    conn = get(conn, ~p"/")
+    assert html_response(conn, 200) =~ "Peace of mind from prototype to production"
+  end
+end

test/webmon_web/live/website_live_test.exs

@@ -0,0 +1,113 @@
+defmodule WebmonWeb.WebsiteLiveTest do
+  use WebmonWeb.ConnCase
+
+  import Phoenix.LiveViewTest
+  import Webmon.MonitorFixtures
+
+  @create_attrs %{name: "some name", url: "some url"}
+  @update_attrs %{name: "some updated name", url: "some updated url"}
+  @invalid_attrs %{name: nil, url: nil}
+
+  defp create_website(_) do
+    website = website_fixture()
+    %{website: website}
+  end
+
+  describe "Index" do
+    setup [:create_website]
+
+    test "lists all websites", %{conn: conn, website: website} do
+      {:ok, _index_live, html} = live(conn, ~p"/websites")
+
+      assert html =~ "Listing Websites"
+      assert html =~ website.name
+    end
+
+    test "saves new website", %{conn: conn} do
+      {:ok, index_live, _html} = live(conn, ~p"/websites")
+
+      assert index_live |> element("a", "New Website") |> render_click() =~
+               "New Website"
+
+      assert_patch(index_live, ~p"/websites/new")
+
+      assert index_live
+             |> form("#website-form", website: @invalid_attrs)
+             |> render_change() =~ "can't be blank"
+
+      assert index_live
+             |> form("#website-form", website: @create_attrs)
+             |> render_submit()
+
+      assert_patch(index_live, ~p"/websites")
+
+      html = render(index_live)
+      assert html =~ "Website created successfully"
+      assert html =~ "some name"
+    end
+
+    test "updates website in listing", %{conn: conn, website: website} do
+      {:ok, index_live, _html} = live(conn, ~p"/websites")
+
+      assert index_live |> element("#websites-#{website.id} a", "Edit") |> render_click() =~
+               "Edit Website"
+
+      assert_patch(index_live, ~p"/websites/#{website}/edit")
+
+      assert index_live
+             |> form("#website-form", website: @invalid_attrs)
+             |> render_change() =~ "can't be blank"
+
+      assert index_live
+             |> form("#website-form", website: @update_attrs)
+             |> render_submit()
+
+      assert_patch(index_live, ~p"/websites")
+
+      html = render(index_live)
+      assert html =~ "Website updated successfully"
+      assert html =~ "some updated name"
+    end
+
+    test "deletes website in listing", %{conn: conn, website: website} do
+      {:ok, index_live, _html} = live(conn, ~p"/websites")
+
+      assert index_live |> element("#websites-#{website.id} a", "Delete") |> render_click()
+      refute has_element?(index_live, "#websites-#{website.id}")
+    end
+  end
+
+  describe "Show" do
+    setup [:create_website]
+
+    test "displays website", %{conn: conn, website: website} do
+      {:ok, _show_live, html} = live(conn, ~p"/websites/#{website}")
+
+      assert html =~ "Show Website"
+      assert html =~ website.name
+    end
+
+    test "updates website within modal", %{conn: conn, website: website} do
+      {:ok, show_live, _html} = live(conn, ~p"/websites/#{website}")
+
+      assert show_live |> element("a", "Edit") |> render_click() =~
+               "Edit Website"
+
+      assert_patch(show_live, ~p"/websites/#{website}/show/edit")
+
+      assert show_live
+             |> form("#website-form", website: @invalid_attrs)
+             |> render_change() =~ "can't be blank"
+
+      assert show_live
+             |> form("#website-form", website: @update_attrs)
+             |> render_submit()
+
+      assert_patch(show_live, ~p"/websites/#{website}")
+
+      html = render(show_live)
+      assert html =~ "Website updated successfully"
+      assert html =~ "some updated name"
+    end
+  end
+end