82 lines
2.4 KiB
Lua
82 lines
2.4 KiB
Lua
--[[
|
|
An addon for mpv-file-browser which uses powershell commands to parse native directories
|
|
|
|
This is slower than the default parser for local drives, but faster for network drives
|
|
The drive_letters array below is used to list the drives to use this parser for
|
|
]]--
|
|
|
|
--list the drive letters to use here (case sensitive)
|
|
local drive_letters = {
|
|
"Y", "Z"
|
|
}
|
|
|
|
local mp = require "mp"
|
|
local msg = require "mp.msg"
|
|
local fb = require "file-browser"
|
|
|
|
local wn = {
|
|
priority = 109,
|
|
api_version = "1.1.0",
|
|
name = "powershell",
|
|
keybind_name = "file"
|
|
}
|
|
|
|
local drives = {}
|
|
for _, letter in ipairs(drive_letters) do
|
|
drives[letter] = true
|
|
end
|
|
|
|
local function command(args, parse_state)
|
|
local _, cmd = parse_state:yield(
|
|
mp.command_native_async({
|
|
name = "subprocess",
|
|
playback_only = false,
|
|
capture_stdout = true,
|
|
capture_stderr = true,
|
|
args = args
|
|
}, fb.coroutine.callback())
|
|
)
|
|
|
|
return cmd.status == 0 and cmd.stdout or nil, cmd.stderr
|
|
end
|
|
|
|
function wn:can_parse(directory)
|
|
return directory ~= '' and not self.get_protocol(directory) and drives[ directory:sub(1,1) ]
|
|
end
|
|
|
|
function wn:parse(directory, parse_state)
|
|
local list = {}
|
|
local files, err = command({"powershell", "-noprofile", "-command", [[
|
|
$dirs = Get-ChildItem -LiteralPath ]]..string.format("%q", directory)..[[ -Directory
|
|
$files = Get-ChildItem -LiteralPath ]]..string.format("%q", directory)..[[ -File
|
|
|
|
foreach ($n in $dirs.Name) {
|
|
$n += "/"
|
|
$u8clip = [System.Text.Encoding]::UTF8.GetBytes($n)
|
|
[Console]::OpenStandardOutput().Write($u8clip, 0, $u8clip.Length)
|
|
Write-Host ""
|
|
}
|
|
|
|
foreach ($n in $files.Name) {
|
|
$u8clip = [System.Text.Encoding]::UTF8.GetBytes($n)
|
|
[Console]::OpenStandardOutput().Write($u8clip, 0, $u8clip.Length)
|
|
Write-Host ""
|
|
}
|
|
]]}, parse_state)
|
|
|
|
if not files then msg.debug(err) ; return nil end
|
|
|
|
for str in files:gmatch("[^\n\r]+") do
|
|
local is_dir = str:sub(-1) == "/"
|
|
if is_dir and self.valid_dir(str) then
|
|
table.insert(list, {name = str, type = "dir"})
|
|
elseif self.valid_file(str) then
|
|
table.insert(list, {name = str, type = "file"})
|
|
end
|
|
end
|
|
|
|
return self.sort(list), {filtered = true, sorted = true}
|
|
end
|
|
|
|
return wn
|