From 5cba4b83f60966045b86ac615df2692c953ebba7 Mon Sep 17 00:00:00 2001 From: Hisham Muhammad Date: Mon, 26 Feb 2024 17:47:28 -0300 Subject: fix(fs): make current_dir always return 1 arg only --- spec/dir_spec.lua | 72 ------------------------------------------------------- 1 file changed, 72 deletions(-) delete mode 100644 spec/dir_spec.lua (limited to 'spec/dir_spec.lua') diff --git a/spec/dir_spec.lua b/spec/dir_spec.lua deleted file mode 100644 index b5dadda8..00000000 --- a/spec/dir_spec.lua +++ /dev/null @@ -1,72 +0,0 @@ -local test_env = require("spec.util.test_env") -local testing_paths = test_env.testing_paths -local P = test_env.P - -test_env.unload_luarocks() -test_env.setup_specs() -local dir = require("luarocks.dir") - -describe("luarocks.dir #unit", function() - local runner - - setup(function() - runner = require("luacov.runner") - runner.init(testing_paths.testrun_dir .. "/luacov.config") - runner.tick = true - end) - - teardown(function() - runner.shutdown() - end) - - describe("dir.is_basic_protocol", function() - it("checks whether the arguments represent a valid protocol and returns the result of the check", function() - assert.truthy(dir.is_basic_protocol("http")) - assert.truthy(dir.is_basic_protocol("https")) - assert.truthy(dir.is_basic_protocol("ftp")) - assert.truthy(dir.is_basic_protocol("file")) - assert.falsy(dir.is_basic_protocol("git")) - assert.falsy(dir.is_basic_protocol("git+https")) - assert.falsy(dir.is_basic_protocol("invalid")) - end) - end) - - describe("dir.deduce_base_dir", function() - it("deduces the base dir from archives", function() - assert.are.same("v0.3", dir.deduce_base_dir("https://example.com/hishamhm/lua-compat-5.2/archive/v0.3.zip")) - assert.are.same("lua-compat-5.2", dir.deduce_base_dir("https://example.com/hishamhm/lua-compat-5.2.zip")) - assert.are.same("lua-compat-5.2", dir.deduce_base_dir("https://example.com/hishamhm/lua-compat-5.2.tar.gz")) - assert.are.same("lua-compat-5.2", dir.deduce_base_dir("https://example.com/hishamhm/lua-compat-5.2.tar.bz2")) - end) - it("returns the basename when not given an archive", function() - assert.are.same("parser.moon", dir.deduce_base_dir("git://example.com/Cirru/parser.moon")) - assert.are.same("v0.3", dir.deduce_base_dir("https://example.com/hishamhm/lua-compat-5.2/archive/v0.3")) - end) - end) - - describe("dir.normalize", function() - it("converts backslashes and removes trailing slashes", function() - assert.are.same(P"/foo/ovo", dir.normalize("\\foo\\ovo\\")) - assert.are.same(P"c:/some/dir", dir.normalize("c:\\..\\some\\foo\\..\\dir")) - assert.are.same("http://example.com/foo/ovo", dir.normalize("http://example.com/foo\\ovo\\")) - end) - it("strips unneeded /../ and /./", function() - assert.are.same(P"/some/dir/file.txt", dir.normalize("/../../../some/./foo/bar/.././../dir/bla/../file.txt")) - assert.are.same(P"/some/dir/file.txt", dir.normalize("/../../../some/./foo/bar/.././../dir/bla/../file.txt")) - assert.are.same(P"/some/dir", dir.normalize("/../../../some/./foo/bar/.././../dir/./some/subdir/../..")) - assert.are.same(P"/some/dir", dir.normalize("/../../../some/./foo/bar/.././../dir/./.")) - end) - it("respects relative paths", function() - assert.are.same(P".", dir.normalize(".")) - assert.are.same(P"boo", dir.normalize("./boo")) - assert.are.same(P"/boo", dir.normalize("/./boo")) - assert.are.same(P"../../../../boo", dir.normalize("../../../hello/world/../../../boo")) - end) - it("respects root directory", function() - assert.are.same(P"/", dir.normalize("/")) - assert.are.same(P"/", dir.normalize("/////")) - assert.are.same(P"/", dir.normalize("/a/b/.././../c/./../../")) - end) - end) - -end) -- cgit v1.2.3-55-g6feb