first commit

mpv/scripts/file-browser/addons/m3u-browser.lua

@@ -0,0 +1,54 @@
+--[[
+    An addon for mpv-file-browser which adds support for m3u playlists
+
+    If the first entry of a playlist isn't working it is because some playlists are created with random invisible unicode in the first line
+    Vim makes it easy to detect these
+
+    This addon requires that my API mpv-read-file be available in ~~/script-modules/
+    https://github.com/CogentRedTester/mpv-read-file
+]]--
+
+local rf = require "read-file"
+
+local m3u = {
+    priority = 100,
+    api_version = "1.0.0",
+    name = "m3u"
+}
+
+local full_paths = {}
+
+function m3u:setup()
+    self.register_parseable_extension("m3u")
+    self.register_parseable_extension("m3u8")
+end
+
+function m3u:can_parse(directory)
+    return directory:find("m3u8?/?$")
+end
+
+function m3u:parse(directory)
+    directory = directory:gsub("/$", "")
+    local list = {}
+
+    local path = full_paths[ directory ] or directory
+    local playlist = rf.get_file_handler( path )
+
+    --if we can't read the path then stop here
+    if not playlist then return {}, {sorted = true, filtered = true, empty_text = "Could not read filepath"} end
+
+    local parent = self.fix_path(path:match("^(.+/[^/]+)/"), true)
+
+    local lines = playlist:read("*a")
+
+    for item in lines:gmatch("[^%c]+") do
+        item = self.fix_path(item)
+        local fullpath = self.join_path(parent, item)
+
+        local name = ( self.get_protocol(item) and item or fullpath:match("([^/]+)/?$") )
+        table.insert(list, {name = name, path = fullpath, type = "file"})
+    end
+    return list, {filtered = true, sorted = true}
+end
+
+return m3u