From dfcc61063822dfb0fe699896da312249e93d5439 Mon Sep 17 00:00:00 2001
From: Miguel Ángel Moreno <mail@migalmoreno.com>
Date: Thu, 29 Dec 2022 01:53:08 +0100
Subject: feat(backend): Remove records and simplify API

---
 src/backend/tau/api/channel.clj | 38 --------------------------------------
 1 file changed, 38 deletions(-)
 delete mode 100644 src/backend/tau/api/channel.clj

(limited to 'src/backend/tau/api/channel.clj')

diff --git a/src/backend/tau/api/channel.clj b/src/backend/tau/api/channel.clj
deleted file mode 100644
index 89c6a7c..0000000
--- a/src/backend/tau/api/channel.clj
+++ /dev/null
@@ -1,38 +0,0 @@
-(ns tau.api.channel
-  (:require
-   [clojure.java.data :as j]
-   [ring.util.codec :refer [url-decode]]
-   [tau.api.result :as result])
-  (:import
-   org.schabi.newpipe.extractor.channel.ChannelInfo
-   org.schabi.newpipe.extractor.NewPipe
-   org.schabi.newpipe.extractor.Page))
-
-(defrecord Channel
-    [id name description verified? banner avatar
-     subscriber-count donation-links next-page
-     related-streams])
-
-(defrecord ChannelPage
-    [next-page related-streams])
-
-(defn get-info
-  ([url]
-   (let [info (ChannelInfo/getInfo (url-decode url))]
-     (map->Channel
-      {:id (.getId info)
-       :name (.getName info)
-       :verified? (.isVerified info)
-       :banner (.getBannerUrl info)
-       :avatar (.getAvatarUrl info)
-       :description (.getDescription info)
-       :subscriber-count (if (= (.getSubscriberCount info) -1) false (.getSubscriberCount info))
-       :donation-links (.getDonationLinks info)
-       :next-page (j/from-java (.getNextPage info))
-       :related-streams (result/get-results (.getRelatedItems info))})))
-  ([url page-url]
-   (let [service (NewPipe/getServiceByUrl (url-decode url))
-         info (ChannelInfo/getMoreItems service (url-decode url) (Page. (url-decode page-url)))]
-     (map->ChannelPage
-      {:related-streams (result/get-results (.getItems info))
-       :next-page (j/from-java (.getNextPage info))}))))
-- 
cgit v1.2.3