]>
Commit | Line | Data |
---|---|---|
1 | import htmlparser | |
2 | import httpClient | |
3 | import os | |
4 | import osproc | |
5 | import sequtils, sugar | |
6 | import strtabs | |
7 | import strutils | |
8 | import uri | |
9 | import xmltree | |
10 | ||
11 | # Supported video players in order of preference | |
12 | let supportedPlayers = @["mpv", "mplayer", "vlc"] | |
13 | ||
14 | # Only show these many results | |
15 | let limit = 10 | |
16 | ||
17 | # Hard-coded terminal colors | |
18 | proc reset(): string {.procvar.} = "\e[0m" | |
19 | proc bold*(s: string): string {.procvar.} = "\e[1m" & s & reset() | |
20 | ||
21 | proc fgMagenta*(s: string): string {.procvar.} = "\e[35m" & s & reset() | |
22 | proc fgCyan*(s: string): string {.procvar.} = "\e[36m" & s & reset() | |
23 | ||
24 | type SearchResult = tuple[title: string, url: string] | |
25 | ||
26 | proc selectMediaPlayer(): string = | |
27 | let availablePlayers = filterIt(supportedPlayers, execProcess("which " & it).len != 0) | |
28 | if len(availablePlayers) == 0: | |
29 | echo "Please install one of the supported media players: ", supportedPlayers | |
30 | raise newException(OSError, "No supported media player found") | |
31 | else: | |
32 | return availablePlayers[0] | |
33 | ||
34 | proc getYoutubePage(searchQuery: string): string = | |
35 | let queryParam = encodeUrl(searchQuery) | |
36 | var client = newHttpClient() | |
37 | let response = get(client, "https://www.youtube.com/results?hl=en&search_query=" & queryParam) | |
38 | writeFile("/tmp/cli-tube-page.html", response.body) | |
39 | return "/tmp/cli-tube-page.html" | |
40 | ||
41 | proc extractTitlesAndUrls(htmlFile: string): seq[SearchResult] = | |
42 | loadHtml(htmlFile).findAll("a"). | |
43 | filter(a => "watch" in a.attrs["href"] and a.attrs.hasKey "title"). | |
44 | map(a => (a.attrs["title"], "https://www.youtube.com" & a.attrs["href"]))[..(limit-1)] | |
45 | ||
46 | proc presentVideoOptions(searchResults: seq[SearchResult]) = | |
47 | echo "" | |
48 | for index, (title, url) in searchResults: | |
49 | echo index, ". ", title.bold.fgMagenta, "\n", url.fgCyan, "\n" | |
50 | ||
51 | let searchResults = extractTitlesAndUrls(getYoutubePage(paramStr(1))) | |
52 | ||
53 | presentVideoOptions(searchResults) | |
54 | ||
55 | stdout.write "Choose video number: " | |
56 | var number: int = parseInt(readLine(stdin)) | |
57 | ||
58 | var player = selectMediaPlayer() | |
59 | echo "\n", "Playing ", searchResults[number].title.bold.fgMagenta | |
60 | ||
61 | # Play the video in the media player | |
62 | discard execProcess(player & " " & searchResults[number].url) |