lua: add tests for the different vis.pipe argument variants

test/lua/pipe.in

@@ -0,0 +1 @@
+foo

test/lua/pipe.lua

@@ -0,0 +1,86 @@
+require 'busted.runner'()
+
+local file = vis.win.file
+
+describe("vis.pipe", function()
+
+	local FULLSCREEN = true
+
+	it("vis.pipe no input", function()
+		vis:pipe("cat > f")
+		local f = io.open("f", "r")
+		assert.truthy(f)
+		assert.are.equal("", f:read("*a"))
+		f:close()
+		os.remove("f")
+	end)
+
+	it("vis.pipe no input fullscreen", function()
+		vis:pipe("cat > f", FULLSCREEN)
+		local f = io.open("f", "r")
+		assert.truthy(f)
+		assert.are.equal("", f:read("*a"))
+		f:close()
+		os.remove("f")
+	end)
+
+	it("vis.pipe buffer", function()
+		vis:pipe("foo", "cat > f")
+		local f = io.open("f", "r")
+		assert.truthy(f)
+		assert.are.equal(f:read("*a"), "foo")
+		f:close()
+		os.remove("f")
+	end)
+
+	it("vis.pipe buffer fullscreen", function()
+		vis:pipe("foo", "cat > f", FULLSCREEN)
+		local f = io.open("f", "r")
+		assert.truthy(f)
+		assert.are.equal(f:read("*a"), "foo")
+		f:close()
+		os.remove("f")
+	end)
+
+	it("vis.pipe range", function()
+		vis:pipe(file, {start=0, finish=3}, "cat > f")
+		local f = io.open("f", "r")
+		assert.truthy(f)
+		assert.are.equal(f:read("*a"), "foo")
+		f:close()
+		os.remove("f")
+	end)
+
+	it("vis.pipe range fullscreen", function()
+		vis:pipe(file, {start=0, finish=3}, "cat > f", FULLSCREEN)
+		local f = io.open("f", "r")
+		assert.truthy(f)
+		assert.are.equal(f:read("*a"), "foo")
+		f:close()
+		os.remove("f")
+	end)
+
+	it("vis.pipe explicit nil text", function()
+		assert.has_error(function() vis:pipe(nil, "true") end)
+	end)
+
+	it("vis.pipe explicit nil text fullscreen", function()
+		assert.has_error(function() vis:pipe(nil, "true", FULLSCREEN) end)
+	end)
+
+	it("vis.pipe explicit nil file", function()
+		assert.has_error(function() vis:pipe(nil, {start=0, finish=0}, "true") end)
+	end)
+
+	it("vis.pipe explicit nil file fullscreen", function()
+		assert.has_error(function() vis:pipe(nil, {start=0, finish=0}, "true", FULLSCREEN) end)
+	end)
+
+	it("vis.pipe wrong argument order file, range, cmd", function()
+		assert.has_error(function() vis:pipe({start=0, finish=0}, vis.win.file, "true") end)
+	end)
+
+	it("vis.pipe wrong argument order fullscreen, cmd", function()
+		assert.has_error(function() vis:pipe(FULLSCREEN, "true") end)
+	end)
+end)