feat: add lsar.yazi plugin

lsar.yazi/init.lua

@@ -0,0 +1,54 @@
+local M = {}
+
+function M:peek()
+	local child, code = Command("lsar"):arg(tostring(self.file.url)):stdout(Command.PIPED):spawn()
+	if not child then
+		return ya.err("spawn `lsar` command returns " .. tostring(code))
+	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 = self.area.h
+	local i, lines = 0, {}
+	repeat
+		local next, event = child:read_line()
+		if event == 1 then
+			goto continue
+		elseif event ~= 0 then
+			break
+		end
+
+		i = i + 1
+		if i > self.skip then
+			lines[#lines + 1] = ui.Line(next)
+		end
+
+		::continue::
+	until i >= self.skip + limit
+
+	child:start_kill()
+	if self.skip > 0 and i < self.skip + limit then
+		ya.manager_emit("peek", { math.max(0, i - limit), only_if = self.file.url, upper_bound = true })
+	else
+		ya.preview_widgets(self, { ui.Paragraph(self.area, lines) })
+	end
+end
+
+function M:seek(units)
+	local h = cx.active.current.hovered
+	if h and h.url == self.file.url then
+		local step = math.floor(units * self.area.h / 10)
+		ya.manager_emit("peek", {
+			math.max(0, cx.active.preview.skip + step),
+			only_if = self.file.url,
+		})
+	end
+end
+
+return M