+
+proc directDownload*(url: string, options: Options) =
+ let args = buildDownloadArgs(url, options)
+ if "aria2c".isInstalled:
+ 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 luckyDownload*(searchQuery: string, options: Options) =
+ let args = @[&"ytsearch:\"{searchQuery}\""] & buildDownloadArgs("", options)
+ let title = execProcess(&"youtube-dl --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(&"youtube-dl --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
+ var invalidCombinations = [("musicOnly", "fullScreen"), ("download", "fullScreen"), ("download", "autoPlay")]
+ 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
+ # TODO Make this overridable in configuration
+ if options["autoPlay"] and not options["musicOnly"]:
+ stderr.writeLine "--music-only must be provided with --auto-play. This is to prevent binge-watching."
+ result = false
+
+
+proc updateOptions(options: Options, newOptions: string): Options =
+ result = options
+
+ # Interactive options
+ for option in newOptions:
+ case option
+ of 'm': result["musicOnly"] = true
+ of 'f': result["fullScreen"] = true
+ of 'd': result["download"] = true
+ of 'a': result["autoPlay"] = true
+ else:
+ stderr.writeLine "Invalid option provided!"
+ quit(2)
+
+ if(not isValidOptions(result)):
+ 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"
+
+