implement timer, seeded playlists

Author: kluvin

lib/pling/playlists/music_library.ex

@@ -9,6 +9,7 @@ defmodule Pling.Playlists.MusicLibrary do
   alias Pling.Playlists.{Playlist, Track}
 
   @notification_key :first_track_notified
+  @default_playlist_id "4DIYG1WrBI9jRJiul9vmxj"
 
   @doc """
   Loads all playlists from the database and returns them as a map with spotify_id keys.
@@ -177,4 +178,18 @@ defmodule Pling.Playlists.MusicLibrary do
 
   defp get_first_image_url([%{"url" => url} | _]), do: url
   defp get_first_image_url(_), do: nil
+
+  @doc """
+  Loads the default playlist along with its tracks.
+  """
+  def load_default_playlist do
+    case get_or_fetch_playlist(@default_playlist_id) do
+      {:ok, _, playlist} ->
+        {:ok, playlist}
+
+      {:error, reason} ->
+        Logger.error("Failed to load default playlist: #{inspect(reason)}")
+        {:error, reason}
+    end
+  end
 end

lib/pling/rooms/room/impl.ex

@@ -31,15 +31,18 @@ defmodule Pling.Rooms.Room.Impl do
 
   def play(state) do
     state
+    |> Map.put(:timer_ref, cancel_timer(state))
     |> Map.put(:playing?, true)
-    |> Map.put(:countdown, state.spotify_track_duration)
+    |> Map.put(:countdown, 30)
     |> schedule_next_tick()
   end
 
   def pause(state) do
     state
     |> Map.put(:timer_ref, cancel_timer(state))
-    |> reset_playback()
+    |> Map.put(:countdown, 7)
+    |> Map.put(:playing?, false)
+    |> schedule_next_tick()
   end
 
   def update_track(state) do
@@ -64,10 +67,12 @@ defmodule Pling.Rooms.Room.Impl do
       track: new_track,
       queue: new_queue
     }}
+    |> Map.put(:countdown, 30)
   end
 
   def set_playlist(state, playlist_id) do
     playlists = MusicLibrary.load_playlists()
+    playlist = Map.get(playlists, playlist_id)
 
     tracks =
       playlist_id
@@ -79,7 +84,7 @@ defmodule Pling.Rooms.Room.Impl do
     state
     |> Map.put(:playlists, playlists)
     |> Map.put(:selection, %{
-      playlist: playlist_id,
+      playlist: playlist,
       track: initial_track,
       queue: initial_queue
     })
@@ -89,7 +94,7 @@ defmodule Pling.Rooms.Room.Impl do
   def process_tick(state) do
     new_state = tick(state)
 
-    if new_state.playing? do
+    if new_state.countdown && new_state.countdown > 0 do
       schedule_next_tick(new_state)
     else
       %{new_state | timer_ref: nil}
@@ -124,21 +129,23 @@ defmodule Pling.Rooms.Room.Impl do
 
   defp tick(state) do
     case state do
-      %{playing?: false} -> state
       %{countdown: nil} -> state
       %{countdown: 0} -> handle_timeout(state)
       %{countdown: count} -> update_countdown(state, count - 1)
     end
   end
 
   defp handle_timeout(state) do
-    new_state =
-      state
-      |> update_track()
-      |> Map.put(:countdown, state.spotify_track_duration)
-      |> Map.put(:playing?, false)
+    if state.playing? do
+      new_state =
+        state
+        |> update_track()
+        |> Map.put(:countdown, 30)
 
-    new_state
+      schedule_next_tick(new_state)
+    else
+      %{state | countdown: nil}
+    end
   end
 
   defp update_countdown(state, new_count) do

lib/pling/rooms/room_state.ex

@@ -4,28 +4,32 @@ defmodule Pling.Rooms.RoomState do
   """
 
   @default_track_duration 30
-  @default_playlist_id "6ZSeHvrhmEH4erjxudpULB"
+  @default_playlist_id "4DIYG1WrBI9jRJiul9vmxj"
 
   def initialize(room_code, game_mode \\ "vs", leader_id \\ nil) do
     if leader_id == nil do
       raise "leader_id must be provided when initializing a room"
     end
 
+    # Load default playlist
+    {:ok, default_playlist} = Pling.Playlists.MusicLibrary.load_default_playlist()
+
     %{
       scores: %{},
       playing?: false,
       countdown: nil,
       timer_ref: nil,
       timer_threshold: 10,
       spotify_track_duration: @default_track_duration,
-      playlists: %{},
+      playlists: %{@default_playlist_id => default_playlist},
       room_code: room_code,
       game_mode: game_mode,
       leader_id: leader_id,
       recent_plings: [],
       selection: %{
-        playlist: @default_playlist_id,
-        queue: []
+        playlist: default_playlist,
+        track: nil,
+        queue: Pling.Playlists.MusicLibrary.get_tracks(@default_playlist_id, %{})
       }
     }
   end
@@ -47,7 +51,7 @@ defmodule Pling.Rooms.RoomState do
     }
   end
 
-  defp format_playlist(playlist), do: Map.take(playlist, [:spotify_id, :name])
+  defp format_playlist(playlist), do: Map.take(playlist, [:spotify_id, :name, :official, :image_url])
 
   defp format_playlists(playlists) when is_map(playlists) do
     playlists

lib/pling_web/live/room_live.ex

@@ -188,22 +188,12 @@ defmodule PlingWeb.RoomLive do
     """
   end
 
-  defp playlist_info(%{selection: selection, playlists: playlists} = assigns)
-       when not is_nil(selection) and not is_nil(playlists) do
+  defp playlist_info(%{selection: selection} = assigns) do
     playlist_name =
-      cond do
-        # Get playlist name directly from the playlists map using playlist ID
-        selection.playlist && Map.has_key?(playlists, selection.playlist) ->
-          Map.get(playlists, selection.playlist).name
-
-        # Get playlist name from track's playlist_spotify_id
-        selection.track && Map.has_key?(playlists, selection.track.playlist_spotify_id) ->
-          Map.get(playlists, selection.track.playlist_spotify_id).name
-
-        true ->
-          # Track exists but playlist not found, nothing.
-          nil
-          gettext("Unknown Playlist")
+      if selection.playlist do
+        selection.playlist.name || gettext("Unknown Playlist")
+      else
+        nil
       end
 
     assigns = assign(assigns, :playlist_name, playlist_name)
@@ -218,8 +208,6 @@ defmodule PlingWeb.RoomLive do
     """
   end
 
-  defp playlist_info(assigns), do: ~H""
-
   defp user_list(%{users: []} = assigns) do
     ~H"""
     {gettext("Waiting for users...")}
@@ -237,8 +225,8 @@ defmodule PlingWeb.RoomLive do
     <span class={["text-slate-900", @is_current_user? && "font-bold"]}>
       {@single_user.user_id}
     </span>
-    {gettext("is in the")}
-    <span class="text-slate-900">{@room_code}</span>{gettext("room")}
+    {gettext("is in")}
+    <span class="text-slate-900">{@room_code}</span>
     """
   end
 
@@ -266,7 +254,7 @@ defmodule PlingWeb.RoomLive do
       </span>
       {if index < length(@other_users_with_current) - 1, do: ", "}
     <% end %>
-    {gettext("in the")}
+    {gettext("is in")}
     <span class="text-slate-900">{@room_code}</span>{gettext("room")}
     """
   end
@@ -452,7 +440,7 @@ defmodule PlingWeb.RoomLive do
     active? = assigns[:active?]
 
     active_class =
-      if active?, do: "bg-indigo-900 text-indigo-50", else: "bg-indigo-50 text-indigo-900"
+      if active?, do: "bg-brand text-red-50", else: "bg-red-50 text-red-900"
 
     assigns = assign(assigns, :active_class, active_class)