Add "On this day" section to stats

lib/music_library/collection.ex

@@ -40,6 +40,19 @@ defmodule MusicLibrary.Collection do
     Repo.all(q)
   end
 
+  def get_records_on_this_day(date \\ Date.utc_today()) do
+    month_day = Calendar.strftime(date, "%m-%d")
+
+    q =
+      from r in Record,
+        where: not is_nil(r.purchased_at),
+        where: fragment("strftime('%m-%d', ?) = ?", r.release_date, ^month_day),
+        order_by: [desc: r.release_date],
+        select: ^Records.essential_fields()
+
+    Repo.all(q)
+  end
+
   def get_latest_record! do
     q =
       from r in Record,

lib/music_library_web/components/stats_components.ex

@@ -1,7 +1,11 @@
 defmodule MusicLibraryWeb.StatsComponents do
   use MusicLibraryWeb, :live_component
 
-  attr :record, MusicLibrary.Records.Record, required: true
+  import MusicLibraryWeb.RecordComponents, only: [format_label: 1, type_label: 1, artist_links: 1]
+
+  alias MusicLibrary.Records
+
+  attr :record, Records.Record, required: true
   attr :title, :string, required: true
   attr :class, :string
 
@@ -79,6 +83,88 @@ defmodule MusicLibraryWeb.StatsComponents do
     """
   end
 
+  attr :record_show_path, :any, required: true
+  attr :records, :list, required: true
+  attr :current_date, Date, required: false, default: nil
+
+  def records_on_this_day(assigns) do
+    ~H"""
+    <ul
+      class="mt-5"
+      role="list"
+      id="records"
+      phx-update="stream"
+    >
+      <li
+        :for={{id, record} <- @records}
+        phx-click={JS.navigate(@record_show_path.(record))}
+        class="flex justify-between gap-x-6 py-2 hover:bg-zinc-50 dark:hover:bg-zinc-800 px-2 -mx-2 md:px-4 md:-mx-4 cursor-pointer"
+        id={id}
+      >
+        <div class="flex min-w-0 gap-x-4 items-center">
+          <div class="relative w-12 flex-none">
+            <img
+              class="rounded-lg"
+              alt={record.title}
+              src={~p"/covers/#{record.id}?vsn=#{record.cover_hash}"}
+            />
+            <span
+              :if={Records.Record.included_release_groups_count(record) > 0}
+              class={[
+                "absolute right-0 bottom-0 rounded-br-lg rounded-tl-lg px-1",
+                "text-xs font-medium",
+                "bg-zinc-200/80 dark:bg-zinc-500/70",
+                "text-zinc-700 dark:text-zinc-200",
+                "border-1 border-zinc-600/20 dark:border-zinc-500/20"
+              ]}
+            >
+              {Records.Record.included_release_groups_count(record)}
+            </span>
+          </div>
+          <div class="min-w-0 flex-auto">
+            <h1 class="text-sm leading-6 text-zinc-700">
+              <.artist_links joinphrase_class="text-xs" artists={record.artists} />
+            </h1>
+            <h2 class="mt-1 flex font-semibold text-sm sm:text-base leading-5 text-zinc-700 dark:text-zinc-300 text-wrap">
+              {record.title}
+            </h2>
+            <p class="mt-1 text-xs leading-5 text-zinc-500 dark:text-zinc-400">
+              {Records.Record.format_release_date(record.release_date)}
+              <span :if={@current_date && !Records.Record.released?(record, @current_date)}>
+                ({gettext("Unreleased")})
+              </span>
+            </p>
+            <p class="sm:hidden mt-1 text-xs leading-5 text-zinc-500 dark:text-zinc-400">
+              {format_label(record.format)} · {type_label(record.type)}
+              <span :if={record.purchased_at}>
+                ·
+                <span class="sr-only">
+                  {gettext("Purchased on")}
+                </span>
+                <.icon
+                  name="hero-banknotes"
+                  class="-mt-1 h-4 w-4"
+                  aria-hidden="true"
+                  data-slot="icon"
+                />
+                {Records.Record.format_as_date(record.purchased_at)}
+              </span>
+              <span :if={!record.purchased_at}>
+                ·
+                <span class="sr-only">
+                  {gettext("Wishlisted on")}
+                </span>
+                <.icon name="hero-star" class="-mt-1 h-4 w-4" aria-hidden="true" data-slot="icon" />
+                {Records.Record.format_as_date(record.inserted_at)}
+              </span>
+            </p>
+          </div>
+        </div>
+      </li>
+    </ul>
+    """
+  end
+
   def tracked_record?(tracked_releases, release_id) do
     Enum.find_value(tracked_releases, fn tracked_release ->
       if tracked_release.release_id == release_id, do: tracked_release.record_id

lib/music_library_web/live/stats_live/index.ex

@@ -13,6 +13,7 @@ defmodule MusicLibraryWeb.StatsLive.Index do
     recent_tracks = LastFm.get_scrobbled_tracks()
     records_by_artists = Collection.count_records_by_artist(limit: 20)
     records_by_genre = Collection.count_records_by_genre(limit: 20)
+    records_on_this_day = Collection.get_records_on_this_day()
 
     if connected?(socket) do
       LastFm.subscribe_to_feed()
@@ -27,6 +28,7 @@ defmodule MusicLibraryWeb.StatsLive.Index do
      |> stream_configure(:recent_albums,
        dom_id: fn album -> "album-#{album.scrobbled_at_uts}" end
      )
+     |> stream(:records_on_this_day, records_on_this_day, reset: true)
      |> assign_counts()
      |> assign_scrobble_activity(recent_tracks)
      |> assign(

lib/music_library_web/live/stats_live/index.html.heex

@@ -487,7 +487,16 @@
   </.tabs>
 </div>
 
-<div class="mt-5 grid grid-cols-1 lg:grid-cols-2 gap-5">
+<div class="mt-5 grid grid-cols-1 lg:grid-cols-3 gap-4">
+  <div class="px-4 shadow-sm">
+    <h1 class="text-base lg:text-2xl text-zinc-900 dark:text-zinc-200 font-semibold">
+      {gettext("On This day")}
+    </h1>
+    <.records_on_this_day
+      records={@streams.records_on_this_day}
+      record_show_path={fn record -> ~p"/collection/#{record}" end}
+    />
+  </div>
   <div>
     <h1 class="text-base lg:text-2xl text-zinc-900 dark:text-zinc-200 font-semibold">
       {gettext("Top %{n} Artists", %{n: length(@records_by_artist)})}

priv/gettext/default.pot

@@ -143,6 +143,7 @@ msgid "Purchased at"
 msgstr ""
 
 #: lib/music_library_web/components/record_components.ex
+#: lib/music_library_web/components/stats_components.ex
 #: lib/music_library_web/live/collection_live/show.html.heex
 #, elixir-autogen, elixir-format
 msgid "Purchased on"
@@ -434,6 +435,7 @@ msgid "ID"
 msgstr ""
 
 #: lib/music_library_web/components/record_components.ex
+#: lib/music_library_web/components/stats_components.ex
 #: lib/music_library_web/live/wishlist_live/show.html.heex
 #, elixir-autogen, elixir-format
 msgid "Unreleased"
@@ -905,6 +907,7 @@ msgid "Last year"
 msgstr ""
 
 #: lib/music_library_web/components/record_components.ex
+#: lib/music_library_web/components/stats_components.ex
 #, elixir-autogen, elixir-format
 msgid "Wishlisted on"
 msgstr ""
@@ -1295,3 +1298,8 @@ msgstr ""
 #, elixir-autogen, elixir-format
 msgid "Rotate colors"
 msgstr ""
+
+#: lib/music_library_web/live/stats_live/index.html.heex
+#, elixir-autogen, elixir-format
+msgid "On This day"
+msgstr ""

priv/gettext/en/LC_MESSAGES/default.po

@@ -143,6 +143,7 @@ msgid "Purchased at"
 msgstr ""
 
 #: lib/music_library_web/components/record_components.ex
+#: lib/music_library_web/components/stats_components.ex
 #: lib/music_library_web/live/collection_live/show.html.heex
 #, elixir-autogen, elixir-format
 msgid "Purchased on"
@@ -434,6 +435,7 @@ msgid "ID"
 msgstr ""
 
 #: lib/music_library_web/components/record_components.ex
+#: lib/music_library_web/components/stats_components.ex
 #: lib/music_library_web/live/wishlist_live/show.html.heex
 #, elixir-autogen, elixir-format
 msgid "Unreleased"
@@ -905,6 +907,7 @@ msgid "Last year"
 msgstr ""
 
 #: lib/music_library_web/components/record_components.ex
+#: lib/music_library_web/components/stats_components.ex
 #, elixir-autogen, elixir-format, fuzzy
 msgid "Wishlisted on"
 msgstr ""
@@ -1295,3 +1298,8 @@ msgstr ""
 #, elixir-autogen, elixir-format
 msgid "Rotate colors"
 msgstr ""
+
+#: lib/music_library_web/live/stats_live/index.html.heex
+#, elixir-autogen, elixir-format
+msgid "On This day"
+msgstr ""