import
- htmlparser,
httpClient,
json,
os,
sequtils,
std/[terminal],
strformat,
- strformat,
- strtabs,
strutils,
- sugar,
- tables,
- uri,
- xmltree
+ tables
+
+import
+ config,
+ types
-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]
+let
+ processOptions = {poStdErrToStdOut, poUsePath} # poEchoCmd can be added to options for debugging
+ 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}"
-# poEchoCmd can be added to options for debugging
-let processOptions = {poStdErrToStdOut, poUsePath}
-let 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}"
proc isInstalled(program: string): bool =
execProcess("which " & program).len != 0
+
proc selectMediaPlayer*(): string =
let availablePlayers = supportedPlayers.filter(isInstalled)
if len(availablePlayers) == 0:
else:
return availablePlayers[0]
-proc getYoutubePage*(searchQuery: string): string =
- let queryParam = encodeUrl(searchQuery)
- let client = newHttpClient()
- let response = get(client, &"https://www.youtube.com/results?hl=en&search_query={queryParam}")
- return $response.body
proc getPeerTubeMagnetLink(url: string): string =
- # Gets the magnet link of the best possible resolutino from PeerTube
+ ## 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 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] =
- let url =
- # Playlists are only supported for MPV player
- if isPlaylist(url) and player == "mpv":
- "https://www.youtube.com/playlist?" & url.split('&')[1]
- else: url
let musicOnly = if options["musicOnly"]: "--no-video" else: ""
let fullScreen = if options["fullScreen"]: "--fullscreen" else: ""
- return filterIt([url, musicOnly, fullScreen], it != "")
+ filterIt([url, musicOnly, fullScreen], it != "")
+
proc play*(player: string, options: Table[string, bool], url: string, title: string = "") =
let args = buildPlayerArgs(url, options, player)
else:
discard execProcess(player, args=args, options=processOptions)
-func buildMusicDownloadArgs*(url: string): seq[string] =
+
+func buildMusicDownloadArgs(url: string): seq[string] =
{.noSideEffect.}:
let downloadLocation = &"'{expandTilde(musicDownloadDirectory)}/%(title)s.%(ext)s'"
- return @["--ignore-errors", "-f", "bestaudio", "--extract-audio", "--audio-format", "mp3", "--audio-quality", "0", "-o", downloadLocation, url]
+ @["--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.}:
let downloadLocation = &"'{expandTilde(videoDownloadDirectory)}/%(title)s.%(ext)s'"
- return @["-f", "best", "-o", downloadLocation, url]
+ @["-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: url.replace("invidio.us", "www.youtube.com") 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 =
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"
stdout.styledWrite(fgYellow, "Choose video number: ")
readLine(stdin)
+
proc handleUserInput(searchResult: SearchResult, options: Table[string, bool], player: string) =
if options["download"]:
if options["musicOnly"]:
else:
play(player, options, searchResult.url, 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
- ]#
+ ##[ 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)