X-Git-Url: https://njoseph.me/gitweb/nimcoon.git/blobdiff_plain/5f9cdfeff96bb2848e3dc72bab410859d78b9c65..f4db2dfeab3abaf50943765005e3a3218bad0f90:/src/lib.nim

diff --git a/src/lib.nim b/src/lib.nim
index 204c328..3dcf78a 100644
--- a/src/lib.nim
+++ b/src/lib.nim
@@ -1,6 +1,4 @@
 import
-  httpClient,
-  json,
   os,
   osproc,
   re,
@@ -12,12 +10,13 @@ import
 
 import
   config,
+  peertube,
   types,
   youtube
 
 
 let
-  processOptions = {poStdErrToStdOut, poUsePath, poEchoCmd}
+  processOptions = {poStdErrToStdOut, poUsePath} # Add poEchoCmd to debug
   PEERTUBE_REGEX = re"videos\/watch\/[0-9a-f]{8}\b-[0-9a-f]{4}-[0-9a-f]{4}-[0-9a-f]{4}-\b[0-9a-f]{12}"
 
 
@@ -34,22 +33,35 @@ proc selectMediaPlayer*(): string =
     return availablePlayers[0]
 
 
-proc getPeerTubeMagnetLink(url: string): string =
-  ## Gets the magnet link of the best possible resolution from PeerTube
-  let uuid = url.substr(find(url, PEERTUBE_REGEX) + "videos/watch/".len)
-  let domainName = url.substr(8, find(url, '/', start=8) - 1)
-  let apiURL = &"https://{domainName}/api/v1/videos/{uuid}"
-  let client = newHttpClient()
-  let response = get(client, apiURL)
-  let jsonNode = parseJson($response.body)
-  jsonNode["files"][0]["magnetUri"].getStr()
+proc printTitle(action: string, title: string) =
+    styledEcho "\n", fgGreen, &"{action} ", styleBright, fgMagenta, title
 
 
-proc presentVideoOptions*(searchResults: SearchResults) =
-  eraseScreen()
-  for index, (title, url) in searchResults:
-    styledEcho $index, ". ", styleBright, fgMagenta, title, "\n", resetStyle, fgCyan, "   ", url, "\n"
+###############
+# URL CLEANUP #
+###############
+
+func rewriteInvidiousToYouTube*(url: string): string =
+  {.noSideEffect.}:
+    if rewriteInvidiousURLs and url.replace(".", "").contains("invidious"):
+       &"https://www.youtube.com/watch?v={url.split(\"=\")[1]}"
+    else: url
+
+
+func urlLongen(url: string): string =
+  url.replace("youtu.be/", "www.youtube.com/watch?v=")
+
+
+func stripZshEscaping(url: string): string = url.replace("\\", "")
+
 
+func sanitizeURL*(url: string): string =
+  rewriteInvidiousToYouTube(urlLongen(stripZshEscaping(url)))
+
+
+########
+# PLAY #
+########
 
 func buildPlayerArgs(url: string, options: Table[string, bool], player: string): seq[string] =
   let musicOnly = if options["musicOnly"]: "--no-video" else: ""
@@ -60,51 +72,16 @@ func buildPlayerArgs(url: string, options: Table[string, bool], player: string):
 proc play*(player: string, options: Table[string, bool], url: string, title: string = "") =
   let args = buildPlayerArgs(url, options, player)
   if title != "":
-    styledEcho "\n", fgGreen, "Playing ", styleBright, fgMagenta, title
+    printTitle("Playing", title)
   if "--no-video" in args:
     discard execShellCmd(&"{player} {args.join(\" \")}")
   else:
     discard execProcess(player, args=args, options=processOptions)
 
 
-func buildMusicDownloadArgs(url: string): seq[string] =
-  {.noSideEffect.}:
-    let downloadLocation = &"'{expandTilde(musicDownloadDirectory)}/%(title)s.%(ext)s'"
-    @["--ignore-errors", "-f", "bestaudio", "--extract-audio", "--audio-format", "mp3",
-      "--audio-quality", "0", "-o", downloadLocation, url]
-
-
-func buildVideoDownloadArgs(url: string): seq[string] =
-  {.noSideEffect.}:
-    let downloadLocation = &"'{expandTilde(videoDownloadDirectory)}/%(title)s.%(ext)s'"
-    @["-f", "best", "-o", downloadLocation, url]
-
-
-proc download*(args: openArray[string], title: string) =
-  styledEcho "\n", fgGreen, "Downloading ", styleBright, fgMagenta, title
-  discard execShellCmd(&"youtube-dl {args.join(\" \")}")
-
-
-func urlLongen(url: string): string = url.replace("youtu.be/", "www.youtube.com/watch?v=")
-
-
-func rewriteInvidiousToYouTube*(url: string): string =
-  {.noSideEffect.}:
-    if rewriteInvidiousURLs and url.replace(".", "").contains("invidious"):
-       &"https://www.youtube.com/watch?v={url.split(\"=\")[1]}"
-    else: url
-
-
-func stripZshEscaping(url: string): string = url.replace("\\", "")
-
-
-func sanitizeURL*(url: string): string =
-  rewriteInvidiousToYouTube(urlLongen(stripZshEscaping(url)))
-
-
 proc directPlay*(url: string, player: string, options: Table[string, bool]) =
   let url =
-    if find(url, PEERTUBE_REGEX) != -1 and isInstalled("webtorrent"):
+    if find(url, PEERTUBE_REGEX) != -1 and "webtorrent".isInstalled:
       getPeerTubeMagnetLink(url)
     else: url
   if url.startswith("magnet:") or url.endswith(".torrent"):
@@ -118,37 +95,56 @@ proc directPlay*(url: string, player: string, options: Table[string, bool]) =
     play(player, options, url)
 
 
-proc directDownload*(url: string, musicOnly: bool) =
-  let args =
-    if musicOnly: buildMusicDownloadArgs(url)
-    else: buildVideoDownloadArgs(url)
-  if isInstalled("aria2c"):
-    discard execShellCmd(&"youtube-dl {args.join(\" \")} --external-downloader aria2c --external-downloader-args '-x 16 -s 16 -k 2M'")
-  else:
-    discard execShellCmd(&"youtube-dl {args.join(\" \")}")
+############
+# DOWNLOAD #
+############
 
+func buildMusicDownloadArgs(url: string): seq[string] =
+  {.noSideEffect.}:
+    let downloadLocation = &"'{expandTilde(musicDownloadDirectory)}/%(title)s.%(ext)s'"
+    @["--ignore-errors", "-f", "bestaudio", "--extract-audio", "--audio-format", "mp3",
+      "--audio-quality", "0", "-o", downloadLocation, url]
 
-proc offerSelection(searchResults: SearchResults, options: Table[string, bool], selectionRange: SelectionRange): string =
-  if options["feelingLucky"]: "0"
-  else:
-    presentVideoOptions(searchResults[selectionRange.begin .. selectionRange.until])
-    stdout.styledWrite(fgYellow, "Choose video number: ")
-    readLine(stdin)
+
+func buildVideoDownloadArgs(url: string): seq[string] =
+  {.noSideEffect.}:
+    let downloadLocation = &"'{expandTilde(videoDownloadDirectory)}/%(title)s.%(ext)s'"
+    @["-f", "best", "-o", downloadLocation, url]
 
 
-proc handleUserInput(searchResult: SearchResult, options: Table[string, bool], player: string) =
-  if options["autoPlay"]:
-    play(player, options, searchResult.url, searchResult.title)
-    let nextResult = getAutoPlayVideo(searchResult)
-    handleUserInput(nextResult, options, player) # inifinite playlist till user quits
-  elif options["download"]:
-    if options["musicOnly"]:
-      download(buildMusicDownloadArgs(searchResult.url), searchResult.title)
-    else:
-      download(buildVideoDownloadArgs(searchResult.url), searchResult.title)
+func buildDownloadArgs(url: string, options: Options): seq[string] =
+  if options["musicOnly"]: buildMusicDownloadArgs(url)
+  else: buildVideoDownloadArgs(url)
+
+
+proc download*(args: openArray[string], title: string) =
+  printTitle("Downloading", title)
+  discard execShellCmd(&"yt-dlp {args.join(\" \")}")
+
+
+proc directDownload*(url: string, options: Options) =
+  let args = buildDownloadArgs(url, options)
+  if "aria2c".isInstalled:
+    discard execShellCmd(&"yt-dlp {args.join(\" \")} --external-downloader aria2c --external-downloader-args '-x 16 -s 16 -k 2M'")
   else:
-    play(player, options, searchResult.url, searchResult.title)
+    discard execShellCmd(&"yt-dlp {args.join(\" \")}")
+
+proc luckyDownload*(searchQuery: string, options: Options) =
+  let args = @[&"ytsearch1:\"{searchQuery}\""] & buildDownloadArgs("", options)
+  let title = execProcess(&"yt-dlp --get-title {args.join(\" \")}").split("\n")[0]
+  download(args, title)
+
+proc luckyPlay*(searchQuery: string, player: string, options: Options) =
+  let args = @[&"ytsearch:\"{searchQuery}\""] & buildDownloadArgs("", options)
+  let output = execProcess(&"yt-dlp --get-url --get-title {args.join(\" \")}").split("\n")
+  let
+    title = output[0]
+    url = &"\"{output[1]}\""
+  play(player, options, url, title)
 
+###########
+# OPTIONS #
+###########
 
 proc isValidOptions*(options: Options): bool =
   # Check for invalid combinations of options
@@ -182,6 +178,34 @@ proc updateOptions(options: Options, newOptions: string): Options =
     quit(2)
 
 
+################
+# PRESENTATION #
+################
+
+proc handleUserInput(searchResult: SearchResult, options: Table[string, bool], player: string) =
+  if options["autoPlay"]:
+    play(player, options, searchResult.url, searchResult.title)
+    handleUserInput(getAutoPlayVideo(searchResult), options, player) # inifinite playlist till user quits
+  elif options["download"]:
+    download(buildDownloadArgs(searchResult.url, options), searchResult.title)
+  else:
+    play(player, options, searchResult.url, searchResult.title)
+
+
+proc presentVideoOptions(searchResults: SearchResults) =
+  eraseScreen()
+  for index, (title, url) in searchResults:
+    styledEcho $index, ". ", styleBright, fgMagenta, title, "\n", resetStyle, fgCyan, "   ", url, "\n"
+
+
+proc offerSelection(searchResults: SearchResults, options: Table[string, bool], selectionRange: SelectionRange): string =
+  if options["feelingLucky"]: "0"
+  else:
+    presentVideoOptions(searchResults[selectionRange.begin .. selectionRange.until])
+    stdout.styledWrite(fgYellow, "Choose video number: ")
+    readLine(stdin)
+
+
 proc present*(searchResults: SearchResults, options: Table[string, bool], selectionRange: SelectionRange, player: string) =
   ##[ Continuously present options till the user quits the application