New test-suite for LuaRocks (#581)

First version of new test-suite, using Busted framework based on Google Summer of Code project:
https://summerofcode.withgoogle.com/projects/#5695811874717696

* Rewritten from Bash to Lua
* Tests now check if they did what they were supposed to, beyond only checking success or failure of the `luarocks` command
* Support for black-box (launching `luarocks` as an external command) and white-box (testing functions in modules directly) testing

1 files changed, 56 insertions, 0 deletions

diff --git a/spec/show_spec.lua b/spec/show_spec.lua
new file mode 100644
index 00000000..85797eb6
--- /dev/null
+++ b/spec/show_spec.lua
@@ -0,0 +1,56 @@
+local test_env = require("test/test_environment")
+local lfs = require("lfs")
+
+test_env.unload_luarocks()
+local show = require("luarocks.show")
+
+expose("LuaRocks show tests #blackbox #b_show", function()
+   
+   before_each(function()
+      test_env.setup_specs(extra_rocks)
+      run = test_env.run
+   end)
+
+   it("LuaRocks show with no flags/arguments", function()
+         assert.is_false(run.luarocks_bool("show"))
+   end)
+   
+   describe("LuaRocks show basic tests with flags", function()
+      it("LuaRocks show invalid", function()
+         assert.is_false(run.luarocks_bool("show invalid"))
+      end)
+      
+      it("LuaRocks show luacov", function()
+         local output = run.luarocks("show luacov")
+      end)
+      
+      it("LuaRocks show modules of luacov", function()
+         local output = run.luarocks("show --modules luacov")
+      end)
+      
+      it("LuaRocks show dependencies of luacov", function()
+         local output = run.luarocks("show --deps luacov")
+      end)
+      
+      it("LuaRocks show rockspec of luacov", function()
+         local output = run.luarocks("show --rockspec luacov")
+      end)
+      
+      it("LuaRocks show mversion of luacov", function()
+         local output = run.luarocks("show --mversion luacov")
+      end)
+      
+      it("LuaRocks show rock tree of luacov", function()
+         local output = run.luarocks("show --rock-tree luacov")
+      end)
+      
+      it("LuaRocks show rock directory of luacov", function()
+         local output = run.luarocks("show --rock-dir luacov")
+      end)
+   end)
+
+   it("LuaRocks show old version of luacov", function()
+      run.luarocks("install luacov 0.11.0")
+      run.luarocks("show luacov 0.11.0")
+   end)
+end)