added cli test

spec/integrity_spec.lua

@@ -0,0 +1,166 @@
+local argparse = require "argparse"
+
+describe("tests related to CLI behaviour #unsafe", function()
+   describe("error messages", function()
+      it("generates correct error message without arguments", function()
+         local handler = io.popen("./spec/script 2>&1", "r")
+         assert.equal(table.concat({
+            "Usage: test [-v] [-h] <input> [<command>] ...",
+            "",
+            "Error: too few arguments",
+            ""
+         }, "\r\n"), handler:read "*a")
+         handler:close()
+      end)
+
+      it("generates correct error message with too many arguments", function()
+         local handler = io.popen("./spec/script foo bar 2>&1", "r")
+         assert.equal(table.concat({
+            "Usage: test [-v] [-h] <input> [<command>] ...",
+            "",
+            "Error: unknown command 'bar'",
+            ""
+         }, "\r\n"), handler:read "*a")
+         handler:close()
+      end)
+
+      it("generates correct error message with unexpected argument", function()
+         local handler = io.popen("./spec/script --verbose=true 2>&1", "r")
+         assert.equal(table.concat({
+            "Usage: test [-v] [-h] <input> [<command>] ...",
+            "",
+            "Error: option '--verbose' does not take arguments",
+            ""
+         }, "\r\n"), handler:read "*a")
+         handler:close()
+      end)
+
+      it("generates correct error message with unexpected option", function()
+         local handler = io.popen("./spec/script -vq 2>&1", "r")
+         assert.equal(table.concat({
+            "Usage: test [-v] [-h] <input> [<command>] ...",
+            "",
+            "Error: unknown option '-q'",
+            "Did you mean one of these: '-h' '-v'?",
+            ""
+         }, "\r\n"), handler:read "*a")
+         handler:close()
+      end)
+
+      it("generates correct error message and tip with unexpected command", function()
+         local handler = io.popen("./spec/script foo nstall 2>&1", "r")
+         assert.equal(table.concat({
+            "Usage: test [-v] [-h] <input> [<command>] ...",
+            "",
+            "Error: unknown command 'nstall'",
+            "Did you mean 'install'?",
+            ""
+         }, "\r\n"), handler:read "*a")
+         handler:close()
+      end)
+
+      it("generates correct error message without arguments in command", function()
+         local handler = io.popen("./spec/script foo install 2>&1", "r")
+         assert.equal(table.concat({
+            "Usage: test install [-f <server>] [-h] <rock> [<version>]",
+            "",
+            "Error: too few arguments",
+            ""
+         }, "\r\n"), handler:read "*a")
+         handler:close()
+      end)
+
+      it("generates correct error message and tip in command", function()
+         local handler = io.popen("./spec/script foo install bar --form=there 2>&1", "r")
+         assert.equal(table.concat({
+            "Usage: test install [-f <server>] [-h] <rock> [<version>]",
+            "",
+            "Error: unknown option '--form'",
+            "Did you mean '--from'?",
+            ""
+         }, "\r\n"), handler:read "*a")
+         handler:close()
+      end)
+   end)
+
+   describe("help messages", function()
+      it("generates correct help message", function()
+         local handler = io.popen("./spec/script --help 2>&1", "r")
+         assert.equal(table.concat({
+            "Usage: test [-v] [-h] <input> [<command>] ...",
+            "",
+            "A testing program. ",
+            "",
+            "Arguments: ",
+            "   input",
+            "",
+            "Options: ",
+            "   -v, --verbose         Sets verbosity level. ",
+            "   -h, --help            Show this help message and exit. ",
+            "",
+            "Commands: ",
+            "   install               Install a rock. ",
+            ""
+         }, "\r\n"), handler:read "*a")
+         handler:close()
+      end)
+
+      it("generates correct help message for command", function()
+         local handler = io.popen("./spec/script foo install --help 2>&1", "r")
+         assert.equal(table.concat({
+            "Usage: test install [-f <server>] [-h] <rock> [<version>]",
+            "",
+            "Install a rock. ",
+            "",
+            "Arguments: ",
+            "   rock                  Name of the rock. ",
+            "   version               Version of the rock. ",
+            "",
+            "Options: ",
+            "   -f <server>, --from <server>",
+            "                         Fetch the rock from this server. ",
+            "   -h, --help            Show this help message and exit. ",
+            "",
+         }, "\r\n"), handler:read "*a")
+         handler:close()
+      end)
+   end)
+
+   describe("data flow", function()
+      it("works with one argument", function()
+         local handler = io.popen("./spec/script foo 2>&1", "r")
+         assert.equal("foo", handler:read "*l")
+         assert.equal("0", handler:read "*l")
+         handler:close()
+      end)
+
+      it("works with one argument and a flag", function()
+         local handler = io.popen("./spec/script -v foo --verbose 2>&1", "r")
+         assert.equal("foo", handler:read "*l")
+         assert.equal("2", handler:read "*l")
+         handler:close()
+      end)
+
+      it("works with command", function()
+         local handler = io.popen("./spec/script foo -v install bar 2>&1", "r")
+         assert.equal("foo", handler:read "*l")
+         assert.equal("1", handler:read "*l")
+         assert.equal("true", handler:read "*l")
+         assert.equal("bar", handler:read "*l")
+         assert.equal("nil", handler:read "*l")
+         assert.equal("nil", handler:read "*l")
+         handler:close()
+      end)
+
+      it("works with command and options", function()
+         local handler = io.popen("./spec/script foo --verbose install bar 0.1 --from=there -vv 2>&1", "r")
+         assert.equal("foo", handler:read "*l")
+         assert.equal("2", handler:read "*l")
+         assert.equal("true", handler:read "*l")
+         assert.equal("bar", handler:read "*l")
+         assert.equal("0.1", handler:read "*l")
+         assert.equal("there", handler:read "*l")
+         handler:close()
+      end)
+   end)
+end)