aboutsummaryrefslogtreecommitdiff
path: root/src/frontend/tubo/views/channel.cljs
blob: 30eab12c6e513a5344a07bca4aad09ace1d7c23a (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
(ns tubo.views.channel
  (:require
   [reagent.core :as r]
   [re-frame.core :as rf]
   [tubo.components.items :as items]
   [tubo.components.layout :as layout]
   [tubo.events :as events]))

(defn channel
  [query-params]
  (let [!menu-active? (r/atom nil)]
    (fn [query-params]
      (let [!show-description? (r/atom false)]
        (fn [{{:keys [url]} :query-params}]
          (let [{:keys [banner avatar name description subscriber-count related-streams next-page]
                 :as   channel}     @(rf/subscribe [:channel])
                next-page-url       (:url next-page)
                service-color       @(rf/subscribe [:service-color])
                scrolled-to-bottom? @(rf/subscribe [:scrolled-to-bottom])]
            (when scrolled-to-bottom?
              (rf/dispatch [::events/channel-pagination url next-page-url]))
            [layout/content-container
             (when banner
               [:div.flex.justify-center.h-24
                [:img.min-w-full.min-h-full.object-cover.rounded {:src banner}]])
             [:div.flex.items-center.justify-between
              [:div.flex.items-center.my-4.mx-2
               [layout/uploader-avatar avatar name]
               [:div.m-4
                [:h1.text-2xl.font-nunito-semibold.line-clamp-1 name]
                (when subscriber-count
                  [:div.flex.my-2.items-center
                   [:i.fa-solid.fa-users.text-xs]
                   [:span.mx-2 (.toLocaleString subscriber-count)]])]]
              (when related-streams
                [layout/popover-menu !menu-active?
                 [{:label    "Add to queue"
                   :icon     [:i.fa-solid.fa-headphones]
                   :on-click #(rf/dispatch [::events/enqueue-related-streams related-streams])}]])]
             [layout/show-more-container @!show-description? description
              #(reset! !show-description? (not @!show-description?))]
             [items/related-streams related-streams next-page-url]]))))))