Something went wrong. Try again.
🎥 Command line media player
Something went wrong. Try again.
Lua
at absurd_test
123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221-- This script automatically loads playlist entries before and after the-- the currently played file. It does so by scanning the directory a file is-- located in when starting playback. It sorts the directory entries-- alphabetically, and adds entries before and after the current file to-- the internal playlist. (It stops if the it would add an already existing-- playlist entry at the same position - this makes it "stable".)-- Add at most 5000 * 2 files when starting a file (before + after).
--[[To configure this script use file autoload.conf in director script-opts (the "script-opts"directory must be in the mpv configuration directory, typically ~/.config/mpv/).
Example configuration would be:
disabled=falseimages=falsevideos=trueaudio=true
--]]
MAXENTRIES = 5000
local msg = require 'mp.msg'local options = require 'mp.options'local utils = require 'mp.utils'
o = { disabled = false, images = true, videos = true, audio = true}options.read_options(o)
function Set (t) local set = {} for _, v in pairs(t) do set[v] = true end return setend
function SetUnion (a,b) local res = {} for k in pairs(a) do res[k] = true end for k in pairs(b) do res[k] = true end return resend
EXTENSIONS_VIDEO = Set { 'mkv', 'avi', 'mp4', 'ogv', 'webm', 'rmvb', 'flv', 'wmv', 'mpeg', 'mpg', 'm4v', '3gp'}
EXTENSIONS_AUDIO = Set { 'mp3', 'wav', 'ogm', 'flac', 'm4a', 'wma', 'ogg', 'opus'}
EXTENSIONS_IMAGES = Set { 'jpg', 'jpeg', 'png', 'tif', 'tiff', 'gif', 'webp', 'svg', 'bmp'}
EXTENSIONS = Set {}if o.videos then EXTENSIONS = SetUnion(EXTENSIONS, EXTENSIONS_VIDEO) endif o.audio then EXTENSIONS = SetUnion(EXTENSIONS, EXTENSIONS_AUDIO) endif o.images then EXTENSIONS = SetUnion(EXTENSIONS, EXTENSIONS_IMAGES) end
function add_files_at(index, files) index = index - 1 local oldcount = mp.get_property_number("playlist-count", 1) for i = 1, #files do mp.commandv("loadfile", files[i], "append") mp.commandv("playlist-move", oldcount + i - 1, index + i - 1) endend
function get_extension(path) match = string.match(path, "%.([^%.]+)$" ) if match == nil then return "nomatch" else return match endend
table.filter = function(t, iter) for i = #t, 1, -1 do if not iter(t[i]) then table.remove(t, i) end endend
-- splitbynum and alnumcomp from alphanum.lua (C) Andre Bogus-- Released under the MIT License-- http://www.davekoelle.com/files/alphanum.lua
-- split a string into a table of number and string valuesfunction splitbynum(s) local result = {} for x, y in (s or ""):gmatch("(%d*)(%D*)") do if x ~= "" then table.insert(result, tonumber(x)) end if y ~= "" then table.insert(result, y) end end return resultend
function clean_key(k) k = (' '..k..' '):gsub("%s+", " "):sub(2, -2):lower() return splitbynum(k)end
-- compare two stringsfunction alnumcomp(x, y) local xt, yt = clean_key(x), clean_key(y) for i = 1, math.min(#xt, #yt) do local xe, ye = xt[i], yt[i] if type(xe) == "string" then ye = tostring(ye) elseif type(ye) == "string" then xe = tostring(xe) end if xe ~= ye then return xe < ye end end return #xt < #ytend
local autoloaded = nil
function find_and_add_entries() local path = mp.get_property("path", "") local dir, filename = utils.split_path(path) msg.trace(("dir: %s, filename: %s"):format(dir, filename)) if o.disabled then msg.verbose("stopping: autoload disabled") return elseif #dir == 0 then msg.verbose("stopping: not a local path") return end
local pl_count = mp.get_property_number("playlist-count", 1) -- check if this is a manually made playlist if (pl_count > 1 and autoloaded == nil) or (pl_count == 1 and EXTENSIONS[string.lower(get_extension(filename))] == nil) then msg.verbose("stopping: manually made playlist") return else autoloaded = true end
local pl = mp.get_property_native("playlist", {}) local pl_current = mp.get_property_number("playlist-pos-1", 1) msg.trace(("playlist-pos-1: %s, playlist: %s"):format(pl_current, utils.to_string(pl)))
local files = utils.readdir(dir, "files") if files == nil then msg.verbose("no other files in directory") return end table.filter(files, function (v, k) if string.match(v, "^%.") then return false end local ext = get_extension(v) if ext == nil then return false end return EXTENSIONS[string.lower(ext)] end) table.sort(files, alnumcomp)
if dir == "." then dir = "" end
-- Find the current pl entry (dir+"/"+filename) in the sorted dir list local current for i = 1, #files do if files[i] == filename then current = i break end end if current == nil then return end msg.trace("current file position in files: "..current)
local append = {[-1] = {}, [1] = {}} for direction = -1, 1, 2 do -- 2 iterations, with direction = -1 and +1 for i = 1, MAXENTRIES do local file = files[current + i * direction] local pl_e = pl[pl_current + i * direction] if file == nil or file[1] == "." then break end
local filepath = dir .. file if pl_e then -- If there's a playlist entry, and it's the same file, stop. msg.trace(pl_e.filename.." == "..filepath.." ?") if pl_e.filename == filepath then break end end
if direction == -1 then if pl_current == 1 then -- never add additional entries in the middle msg.info("Prepending " .. file) table.insert(append[-1], 1, filepath) end else msg.info("Adding " .. file) table.insert(append[1], filepath) end end end
add_files_at(pl_current + 1, append[1]) add_files_at(pl_current, append[-1])end
mp.register_event("start-file", find_and_add_entries)