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 =
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=")
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)
+ else:
+ present(searchResults, options, selectionRange, player)
+ of "p":
+ if selectionRange.begin > 0:
+ let newSelectionRange = (selectionRange.begin - limit, selectionRange.until - limit)
+ present(searchResults, options, newSelectionRange, player)
+ else:
+ present(searchResults, options, selectionRange, player)
+ of "q":
+ quit(0)
else:
- discard execProcess(player, args=[url], options=processOptions)
+ let searchResult = searchResults[selectionRange.begin .. selectionRange.until][parseInt(userInput)]
+ handleUserInput(searchResult, options, player)
+ if options["feelingLucky"]:
+ quit(0)
+ else:
+ present(searchResults, options, selectionRange, player)