blob: 69bc480d24ec381b3a1687dc9e0ed0729686de44 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
|
--- @since 25.5.31
local M = {}
function M:peek(job)
local child, err = Command("lsar"):arg(tostring(job.file.url)):stdout(Command.PIPED):spawn()
if not child then
return ya.err("spawn `lsar` command failed: " .. err)
end
-- Skip the first line which is the archive file itself
while true do
local _, event = child:read_line()
if event == 0 or event ~= 1 then
break
end
end
local limit = job.area.h
local i, lines = 0, {}
repeat
local next, event = child:read_line()
if event ~= 0 then
break
end
i = i + 1
if i > job.skip then
lines[#lines + 1] = next
end
until i >= job.skip + limit
child:start_kill()
if job.skip > 0 and i < job.skip + limit then
ya.emit("peek", { math.max(0, i - limit), only_if = job.file.url, upper_bound = true })
else
ya.preview_widget(job, ui.Text(lines):area(job.area))
end
end
function M:seek(job) require("code"):seek(job) end
return M
|
