X-Git-Url: https://njoseph.me/gitweb/nimcoon.git/blobdiff_plain/17955bba9f852c8264f1bfdf8259f19d4aeefd2a..13a4017d99baaf7919263edaf05b13063e91cb8d:/src/lib.nim

diff --git a/src/lib.nim b/src/lib.nim
index c737f02..3d3f515 100644
--- a/src/lib.nim
+++ b/src/lib.nim
@@ -1,22 +1,29 @@
 import
   htmlparser,
   httpClient,
+  os,
   osproc,
   sequtils,
   sugar,
   strformat,
   std/[terminal],
+  strformat,
   strtabs,
   strutils,
+  tables,
   uri,
   xmltree
 
 import config
 
 type
+  Options* = Table[string, bool]
   SearchResult* = tuple[title: string, url: string]
-  CommandLineOptions* = tuple[searchQuery: string, musicOnly: bool, feelingLucky: bool, fullScreen: bool]
+  SearchResults* = seq[tuple[title: string, url: string]]
+  CommandLineOptions* = tuple[searchQuery: string, options: Options]
+  SelectionRange* = tuple[begin: int, until: int]
 
+# poEchoCmd can be added to options for debugging
 let processOptions = {poStdErrToStdOut, poUsePath}
 
 proc selectMediaPlayer*(): string =
@@ -33,21 +40,43 @@ proc getYoutubePage*(searchQuery: string): string =
   let response = get(client, &"https://www.youtube.com/results?hl=en&search_query={queryParam}")
   return $response.body
 
-func extractTitlesAndUrls*(html: string): seq[SearchResult] =
+func extractTitlesAndUrls*(html: string): SearchResults =
   {.noSideEffect.}:
     parseHtml(html).findAll("a").
       filter(a => "watch" in a.attrs["href"] and a.attrs.hasKey "title").
       map(a => (a.attrs["title"], "https://www.youtube.com" & a.attrs["href"]))
 
-proc presentVideoOptions*(searchResults: seq[SearchResult]) =
+proc presentVideoOptions*(searchResults: SearchResults) =
   eraseScreen()
   for index, (title, url) in searchResults:
     styledEcho $index, ". ", styleBright, fgMagenta, title, "\n", resetStyle, fgCyan, url, "\n"
 
 proc play*(player: string, args: openArray[string], title: string) =
-  # poEchoCmd can be added to options for debugging
   styledEcho "\n", fgGreen, "Playing ", styleBright, fgMagenta, title
-  discard execProcess(player, args=args, options=processOptions)
+  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.}:
+    var args = @["--ignore-errors", "-f", "bestaudio", "--extract-audio", "--audio-format", "mp3", "--audio-quality", "0", "-o"]
+    let downloadLocation = &"'{expandTilde(musicDownloadDirectory)}/%(title)s.%(ext)s'"
+    args.add(downloadLocation)
+    args.add(url)
+    return args
+
+func buildVideoDownloadArgs*(url: string): seq[string] =
+  {.noSideEffect.}:
+    var args = @["-f", "best", "-o"]
+    let downloadLocation = &"'{expandTilde(videoDownloadDirectory)}/%(title)s.%(ext)s'"
+    args.add(downloadLocation)
+    args.add(url)
+    return args
+
+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=")
@@ -58,9 +87,72 @@ func stripZshEscaping(url: string): string =
 func sanitizeURL*(url: string): string =
   urlLongen(stripZshEscaping(url))
 
-proc directPlay*(searchQuery: string, player: string) =
-  let url = sanitizeURL(searchQuery)
-  if searchQuery.startswith("magnet:"):
-    discard execProcess("peerflix", args=[url, &"--{player}"], options=processOptions)
+proc directPlay*(url: string, player: string, musicOnly: bool) =
+  if url.startswith("magnet:"):
+    if musicOnly:
+      discard execShellCmd(&"peerflix '{url}' -a --{player} -- --no-video")
+    else:
+      discard execProcess("peerflix", args=[url, &"--{player}"], options=processOptions)
+  else:
+    if musicOnly:
+      discard execShellCmd(&"{player} --no-video {url}")
+    else:
+      discard execProcess(player, args=[url], options=processOptions)
+
+proc directDownload*(url: string, musicOnly: bool) =
+  let args =
+    if musicOnly: buildMusicDownloadArgs(url)
+    else: buildVideoDownloadArgs(url)
+  discard execShellCmd(&"youtube-dl {args.join(\" \")}")
+
+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)
+
+# This is a pure function with no side effects
+func buildPlayerArgs(searchResult: SearchResult, options: Table[string, bool]): seq[string] =
+  var args = @[searchResult.url]
+  if options["musicOnly"]: args.add("--no-video")
+  if options["fullScreen"]: args.add("--fullscreen")
+  return args
+
+proc handleUserInput(searchResult: SearchResult, options: Table[string, bool], player: string) =
+  if options["download"]:
+    if options["musicOnly"]:
+      download(buildMusicDownloadArgs(searchResult.url), searchResult.title)
+    else:
+      download(buildVideoDownloadArgs(searchResult.url), searchResult.title)
+  else:
+    play(player, buildPlayerArgs(searchResult, options), searchResult.title)
+
+proc present*(searchResults: SearchResults, options: Table[string, bool], selectionRange: SelectionRange, player: string) =
+  #[ Continuously present options till the user quits the application
+       selectionRange: Currently available range to choose from depending on pagination
+  ]#
+
+  let userInput = offerSelection(searchResults, options, selectionRange)
+
+  case userInput
+  of "all":
+    for selection in selectionRange.begin .. selectionRange.until:
+      handleUserInput(searchResults[selection], options, player)
+    quit(0)
+  of "n":
+    if selectionRange.until + 1 < len(searchResults):
+      let newSelectionRange = (selectionRange.until + 1, min(len(searchResults) - 1, selectionRange.until + limit))
+      present(searchResults, options, newSelectionRange, player)
+  of "p":
+    if selectionRange.begin > 0:
+      let newSelectionRange = (selectionRange.begin - limit, selectionRange.until - limit)
+      present(searchResults, options, newSelectionRange, player)
+  of "q":
+    quit(0)
   else:
-    discard execProcess(player, args=[url], options=processOptions)
+    handleUserInput(searchResults[parseInt(userInput)], options, player)
+    if options["feelingLucky"]:
+      quit(0)
+    else:
+      present(searchResults, options, selectionRange, player)