]> njoseph.me Git - nimcoon.git/blobdiff - src/lib.nim
Add interactive arguments to override global ones
[nimcoon.git] / src / lib.nim
index 24aa9305218c02a599af07e93eeb223589b0e071..17761f390339cc8821d62984d4979acf7601ea37 100644 (file)
@@ -1,71 +1,60 @@
 import
-  htmlparser,
   httpClient,
+  json,
   os,
   osproc,
+  re,
   sequtils,
-  sugar,
-  strformat,
   std/[terminal],
   strformat,
-  strtabs,
   strutils,
-  tables,
-  uri,
-  xmltree
+  tables
+
+import
+  config,
+  types
+
+
+let
+  processOptions = {poStdErrToStdOut, poUsePath, poEchoCmd}
+  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}"
 
-import config
 
-type
-  Options* = Table[string, bool]
-  SearchResult* = tuple[title: string, url: string]
-  SearchResults* = seq[tuple[title: string, url: string]]
-  CommandLineOptions* = tuple[searchQuery: string, options: Options]
-  SelectionRange* = tuple[begin: int, until: int]
+proc isInstalled(program: string): bool =
+  execProcess("which " & program).len != 0
 
-# poEchoCmd can be added to options for debugging
-let processOptions = {poStdErrToStdOut, poUsePath}
 
 proc selectMediaPlayer*(): string =
-  let availablePlayers = filterIt(supportedPlayers, execProcess("which " & it).len != 0)
+  let availablePlayers = supportedPlayers.filter(isInstalled)
   if len(availablePlayers) == 0:
     stderr.writeLine &"Please install one of the supported media players: {supportedPlayers}"
     raise newException(OSError, "No supported media player found")
   else:
     return availablePlayers[0]
 
-proc getYoutubePage*(searchQuery: string): string =
-  let queryParam = encodeUrl(searchQuery)
+
+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, &"https://www.youtube.com/results?hl=en&search_query={queryParam}")
-  return $response.body
+  let response = get(client, apiURL)
+  let jsonNode = parseJson($response.body)
+  jsonNode["files"][0]["magnetUri"].getStr()
 
-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: SearchResults) =
   eraseScreen()
   for index, (title, url) in searchResults:
-    styledEcho $index, ". ", styleBright, fgMagenta, title, "\n", resetStyle, fgCyan, url, "\n"
+    styledEcho $index, ". ", styleBright, fgMagenta, title, "\n", resetStyle, fgCyan, "   ", url, "\n"
 
-func isPlaylist(url: string): bool =
-  # Identifies if video is part of a playlist
-  # Only YouTube playlists are supported for now
-  "www.youtube.com" in url and "&list=" in url
 
-# This is a pure function with no side effects
 func buildPlayerArgs(url: string, options: Table[string, bool], player: string): seq[string] =
-  var args = @[url]
-  if options["musicOnly"]: args.add("--no-video")
-  if options["fullScreen"]: args.add("--fullscreen")
-  # Playlists are only supported for MPV player
-  if isPlaylist(url) and player == "mpv":
-    let list_arg = url.split('&')[1]
-    args[0] = "https://www.youtube.com/playlist?" & list_arg
-  return args
+  let musicOnly = if options["musicOnly"]: "--no-video" else: ""
+  let fullScreen = if options["fullScreen"]: "--fullscreen" else: ""
+  filterIt([url, musicOnly, fullScreen], it != "")
+
 
 proc play*(player: string, options: Table[string, bool], url: string, title: string = "") =
   let args = buildPlayerArgs(url, options, player)
@@ -76,36 +65,47 @@ proc play*(player: string, options: Table[string, bool], url: string, title: str
   else:
     discard execProcess(player, args=args, options=processOptions)
 
-func buildMusicDownloadArgs*(url: string): seq[string] =
+
+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
+    @["--ignore-errors", "-f", "bestaudio", "--extract-audio", "--audio-format", "mp3",
+      "--audio-quality", "0", "-o", downloadLocation, url]
 
-func buildVideoDownloadArgs*(url: string): seq[string] =
+
+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
+    @["-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 stripZshEscaping(url: string): string =
-  url.replace("\\", "")
+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 =
-  urlLongen(stripZshEscaping(url))
+  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"):
+      getPeerTubeMagnetLink(url)
+    else: url
   if url.startswith("magnet:") or url.endswith(".torrent"):
     if options["musicOnly"]:
       # TODO Replace with WebTorrent once it supports media player options
@@ -116,11 +116,16 @@ proc directPlay*(url: string, player: string, options: Table[string, bool]) =
   else:
     play(player, options, url)
 
+
 proc directDownload*(url: string, musicOnly: bool) =
   let args =
     if musicOnly: buildMusicDownloadArgs(url)
     else: buildVideoDownloadArgs(url)
-  discard execShellCmd(&"youtube-dl {args.join(\" \")}")
+  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(\" \")}")
+
 
 proc offerSelection(searchResults: SearchResults, options: Table[string, bool], selectionRange: SelectionRange): string =
   if options["feelingLucky"]: "0"
@@ -129,6 +134,7 @@ proc offerSelection(searchResults: SearchResults, options: Table[string, bool],
     stdout.styledWrite(fgYellow, "Choose video number: ")
     readLine(stdin)
 
+
 proc handleUserInput(searchResult: SearchResult, options: Table[string, bool], player: string) =
   if options["download"]:
     if options["musicOnly"]:
@@ -138,10 +144,38 @@ proc handleUserInput(searchResult: SearchResult, options: Table[string, bool], p
   else:
     play(player, options, searchResult.url, searchResult.title)
 
+
+proc isValidOptions*(options: Options): bool =
+  # Check for invalid combinations of options
+  var invalidCombinations = [("musicOnly", "fullScreen"), ("download", "fullScreen")]
+  result = true
+  for combination in invalidCombinations:
+    if options[combination[0]] and options[combination[1]]:
+     stderr.writeLine fmt"Incompatible options provided: {combination[0]} and {combination[1]}"
+     result = false
+
+
+proc updateOptions(options: Options, newOptions: string): Options =
+  result = options
+
+  for option in newOptions:
+    case option
+    of 'm': result["musicOnly"] = true
+    of 'f': result["fullScreen"] = true
+    of 'd': result["download"] = true
+    else:
+      echo "Invalid option provided!"
+      quit(2)
+
+  if(not isValidOptions(result)):
+    quit(2)
+
+
 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
-  ]#
+  ##[ 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)
 
@@ -165,8 +199,14 @@ proc present*(searchResults: SearchResults, options: Table[string, bool], select
   of "q":
     quit(0)
   else:
-    let searchResult = searchResults[selectionRange.begin .. selectionRange.until][parseInt(userInput)]
-    handleUserInput(searchResult, options, player)
+    if " " in userInput:
+      let selection = parseInt(userInput.split(" ")[0])
+      let updatedOptions = updateOptions(options, userInput.split(" ")[1])
+      let searchResult = searchResults[selectionRange.begin .. selectionRange.until][selection]
+      handleUserInput(searchResult, updatedOptions, player)
+    else:
+      let searchResult = searchResults[selectionRange.begin .. selectionRange.until][parseInt(userInput)]
+      handleUserInput(searchResult, options, player)
     if options["feelingLucky"]:
       quit(0)
     else: