libpath-ruby 0.2.1

data/test/unit/util/ts_all.rb

@@ -0,0 +1,22 @@
+#! /usr/bin/env ruby
+#
+# executes all other tests
+
+this_dir = File.expand_path(File.dirname(__FILE__))
+
+# all tc_*rb in current directory
+Dir[File.join(this_dir, 'tc_*rb')].each do |file|
+
+	$stderr.puts "requiring file '#{file}'" if $DEBUG
+
+	require file
+end
+
+# all ts_*rb in immediate sub-directories
+Dir[File.join(this_dir, '*', 'ts_*rb')].each do |file|
+
+	$stderr.puts "requiring file '#{file}'" if $DEBUG
+
+	require file
+end
+

data/test/unit/util/unix/tc_combine_paths.rb

@@ -0,0 +1,65 @@
+#! /usr/bin/env ruby
+
+$:.unshift File.join(File.dirname(__FILE__), *(['..'] * 4), 'lib')
+
+require 'libpath/util/unix'
+
+require 'test/unit'
+
+class Test_LibPath_Util_Unix_combine_paths < Test::Unit::TestCase
+
+	F = ::LibPath::Util::Unix
+
+	def test_no_arguments
+
+		assert_equal '', F.combine_paths()
+	end
+
+	def test_single_argument
+
+		assert_equal ' ', F.combine_paths(' ')
+		assert_equal 'a', F.combine_paths('a')
+		assert_equal 'abcdef/ghi/jkl.mno', F.combine_paths('abcdef/ghi/jkl.mno')
+		assert_equal '/', F.combine_paths('/')
+	end
+
+	def test_relative_cases
+
+		assert_equal 'a/b/c/d', F.combine_paths('a', 'b', 'c/d')
+		assert_equal 'a/b/c/d', F.combine_paths('a', 'b/', 'c/d')
+
+		assert_equal 'a/b', F.combine_paths('', 'a', '', '', 'b')
+
+		assert_equal 'a/ /b', F.combine_paths('', 'a', '', ' ', 'b')
+	end
+
+	def test_tail_absolute_cases
+
+		assert_equal '/', F.combine_paths('a', '/')
+
+		assert_equal '/', F.combine_paths('a/b/c/d', '/')
+
+		assert_equal '/', F.combine_paths('a', 'b', '/')
+	end
+
+	def test_dots
+
+		assert_equal 'a/.', F.combine_paths('a', '.')
+		assert_equal 'a', F.combine_paths('a', '.', elide_single_dots: true)
+
+		assert_equal 'a/b', F.combine_paths('a', '.', 'b', elide_single_dots: true)
+		assert_equal 'a/b', F.combine_paths('a', './', 'b', elide_single_dots: true)
+		assert_equal '/./b', F.combine_paths('a', '/.', 'b', elide_single_dots: true)
+	end
+
+	def test_embedded_absolute_cases
+
+		assert_equal '/a/b/c/d', F.combine_paths('x/y/z', 'z', '/a', 'b', 'c/d')
+	end
+
+	def test_multiple_embedded_absolute_cases
+
+		assert_equal '/a/b/c/d', F.combine_paths('x/y/z', '/z', '/a', 'b', 'c/d')
+	end
+end
+

data/test/unit/util/unix/tc_derive_relative_path.rb

@@ -0,0 +1,123 @@
+#! /usr/bin/env ruby
+
+$:.unshift File.join(File.dirname(__FILE__), *(['..'] * 4), 'lib')
+
+require 'libpath/util/unix'
+
+require 'test/unit'
+
+class Test_LibPath_Util_Unix_derive_relative_path < Test::Unit::TestCase
+
+	M = ::LibPath::Util::Unix
+
+	def test_nils_and_empties
+
+		# to get nowhere from nowhere, go nowhere
+		assert_nil M.derive_relative_path(nil, nil)
+		assert_nil M.derive_relative_path('', nil)
+		assert_equal '', M.derive_relative_path('', '')
+		assert_equal '', M.derive_relative_path(nil, '')
+
+		# to get somewhere from nowhere, just go there
+		assert_equal 'abc', M.derive_relative_path(nil, 'abc')
+		assert_equal 'abc', M.derive_relative_path('', 'abc')
+
+		# to get nowhere from anywhere else, go nowhere
+		assert_nil M.derive_relative_path('dir', nil)
+		assert_equal '', M.derive_relative_path('dir', '')
+	end
+
+	def test_same_location
+
+		assert_equal '.', M.derive_relative_path('.', '.')
+		assert_equal '.', M.derive_relative_path('..', '..')
+
+		assert_equal '.', M.derive_relative_path('abc', 'abc')
+		assert_equal './', M.derive_relative_path('abc/', 'abc/')
+		assert_equal './', M.derive_relative_path('abc', 'abc/')
+
+		assert_equal './', M.derive_relative_path('/', '/')
+
+		assert_equal '.', M.derive_relative_path('./abc', 'abc')
+		assert_equal '.', M.derive_relative_path('./abc/', 'abc')
+		assert_equal './', M.derive_relative_path('./abc', 'abc/')
+		assert_equal './', M.derive_relative_path('./abc/', 'abc/')
+
+		assert_equal '.', M.derive_relative_path('/abc', '/abc')
+		assert_equal '.', M.derive_relative_path('/abc/', '/abc')
+		assert_equal './', M.derive_relative_path('/abc/', '/abc/')
+		assert_equal '../', M.derive_relative_path('/abc/', '/')
+
+		assert_equal '../../', M.derive_relative_path('/abc/def/', '/')
+		assert_equal '../../', M.derive_relative_path('/abc/def/', '/')
+	end
+
+	def test_from_here
+
+		assert_equal 'abc', M.derive_relative_path('.', 'abc')
+		assert_equal 'abc', M.derive_relative_path('./', 'abc')
+		assert_equal 'abc/', M.derive_relative_path('.', 'abc/')
+		assert_equal 'abc/', M.derive_relative_path('./', 'abc/')
+
+		assert_equal('abc/', M.derive_relative_path('/dir1/dir2', '/dir1/dir2/abc/'))
+		assert_equal('.', M.derive_relative_path('/dir1/dir2/abc', '/dir1/dir2/abc'))
+		assert_equal('./', M.derive_relative_path('/dir1/dir2/abc', '/dir1/dir2/abc/'))
+	end
+
+	def test_ones_above
+
+		assert_equal '../', M.derive_relative_path('.', '..')
+
+		assert_equal '../', M.derive_relative_path('abc/def', 'abc')
+
+		assert_equal '../', M.derive_relative_path('abc/def/ghi', 'abc/def')
+		assert_equal '../', M.derive_relative_path('abc/def/ghi', 'abc/def/')
+
+		assert_equal '../', M.derive_relative_path('abc/def/./ghi', 'abc/def')
+		assert_equal '../', M.derive_relative_path('abc/def/ghi/jkl/..', 'abc/def')
+		assert_equal '../', M.derive_relative_path('abc/def/ghi/jkl/../', 'abc/def')
+		assert_equal '../', M.derive_relative_path('abc/def/ghi/jkl/..', 'abc/def/')
+
+		assert_equal '../../', M.derive_relative_path('abc/def/ghi/jkl/', 'abc/def')
+
+		assert_equal '../../', M.derive_relative_path('/dir1/dir2/dir3/dir4', '/dir1/dir2')
+	end
+
+	def test_ones_below
+
+		assert_equal 'dir-1/', M.derive_relative_path('..', '.', pwd: '/dir-1/')
+
+		assert_equal '../', M.derive_relative_path('.', '..', pwd: '/dir-1/')
+
+		assert_equal 'def', M.derive_relative_path('abc', 'abc/def')
+
+		assert_equal 'def/ghi', M.derive_relative_path('abc', 'abc/def/ghi')
+	end
+
+	def test_ones_across
+
+		assert_equal '../e-1', M.derive_relative_path('abc/d-1', 'abc/e-1')
+		assert_equal '../e-1', M.derive_relative_path('abc/d-1/', 'abc/e-1')
+
+		assert_equal '../e-1/e-2', M.derive_relative_path('abc/d-1/', 'abc/e-1/e-2')
+		assert_equal '../../e-1/e-2', M.derive_relative_path('abc/d-1/d-2/', 'abc/e-1/e-2')
+	end
+
+	def test_simple_cases
+
+		assert_equal 'def', M.derive_relative_path('/abc', '/abc/def')
+	end
+
+	def test_absolute_path_cases
+
+		assert_equal '../../def', M.derive_relative_path('ghi', '/def', pwd: '/abc')
+
+		assert_equal '../def', M.derive_relative_path('abc', '/def', pwd: '/')
+	end
+
+	def test_both_relative
+
+		assert_equal '../def', M.derive_relative_path('abc', 'def', pwd: '/')
+	end
+end
+

data/test/unit/util/unix/tc_make_path_absolute.rb

@@ -0,0 +1,117 @@
+#! /usr/bin/env ruby
+
+$:.unshift File.join(File.dirname(__FILE__), *(['..'] * 4), 'lib')
+
+require 'libpath/util/unix'
+
+require 'test/unit'
+
+class Test_LibPath_Util_Unix_make_path_absolute < Test::Unit::TestCase
+
+	F = ::LibPath::Util::Unix
+
+	def test_nil
+
+		if $DEBUG
+
+			assert_raise(::ArgumentError) { F.make_path_absolute(nil) }
+		else
+
+			assert_nil F.make_path_absolute(nil)
+		end
+	end
+
+	def test_empty
+
+		assert_equal '', F.make_path_absolute('')
+	end
+
+	def test_absolute_paths
+
+		assert_equal '/', F.make_path_absolute('/')
+		assert_equal '/.', F.make_path_absolute('/.')
+		assert_equal '/a', F.make_path_absolute('/a')
+		assert_equal '/a/.', F.make_path_absolute('/a/.')
+	end
+
+	def test_absolute_paths_with_canonicalisation
+
+		options	=	{ make_canonical: true }
+
+		assert_equal '/', F.make_path_absolute('/', **options)
+		assert_equal '/', F.make_path_absolute('/.', **options)
+		assert_equal '/a', F.make_path_absolute('/a', **options)
+		assert_equal '/a/', F.make_path_absolute('/a/.', **options)
+	end
+
+	def test_relative_path_with_fixed_pwd
+
+		pwd = '/some-path/or-other'
+
+		assert_equal '/some-path/or-other/.', F.make_path_absolute('.', pwd: pwd)
+		assert_equal '/some-path/or-other/', F.make_path_absolute('.', pwd: pwd, make_canonical: true)
+
+		assert_equal '/some-path/or-other/abc', F.make_path_absolute('abc', pwd: pwd)
+		assert_equal '/some-path/or-other/abc', F.make_path_absolute('abc', pwd: pwd, make_canonical: true)
+
+		assert_equal '/some-path/or-other/./abc', F.make_path_absolute('./abc', pwd: pwd)
+		assert_equal '/some-path/or-other/abc', F.make_path_absolute('./abc', pwd: pwd, make_canonical: true)
+
+		assert_equal '/some-path/or-other/./abc/', F.make_path_absolute('./abc/', pwd: pwd)
+		assert_equal '/some-path/or-other/abc/', F.make_path_absolute('./abc/', pwd: pwd, make_canonical: true)
+
+		assert_equal '/some-path/or-other/def/../abc', F.make_path_absolute('def/../abc', pwd: pwd)
+		assert_equal '/some-path/or-other/abc', F.make_path_absolute('def/../abc', pwd: pwd, make_canonical: true)
+
+		assert_equal '/some-path/or-other/def/../abc/', F.make_path_absolute('def/../abc/', pwd: pwd)
+		assert_equal '/some-path/or-other/abc/', F.make_path_absolute('def/../abc/', pwd: pwd, make_canonical: true)
+	end
+
+	def test_relative_path_with_fixed_home
+
+		home = '/Users/libpath-tester'
+
+		assert_equal '/Users/libpath-tester/.', F.make_path_absolute('~/.', home: home)
+		assert_equal '/Users/libpath-tester/', F.make_path_absolute('~/.', home: home, make_canonical: true)
+
+		assert_equal '/Users/libpath-tester/abc', F.make_path_absolute('~/abc', home: home)
+		assert_equal '/Users/libpath-tester/abc', F.make_path_absolute('~/abc', home: home, make_canonical: true)
+
+		assert_equal '/Users/libpath-tester/./abc', F.make_path_absolute('~/./abc', home: home)
+		assert_equal '/Users/libpath-tester/abc', F.make_path_absolute('~/./abc', home: home, make_canonical: true)
+
+		assert_equal '/Users/libpath-tester/./abc/', F.make_path_absolute('~/./abc/', home: home)
+		assert_equal '/Users/libpath-tester/abc/', F.make_path_absolute('~/./abc/', home: home, make_canonical: true)
+
+		assert_equal '/Users/libpath-tester/def/../abc', F.make_path_absolute('~/def/../abc', home: home)
+		assert_equal '/Users/libpath-tester/abc', F.make_path_absolute('~/def/../abc', home: home, make_canonical: true)
+
+		assert_equal '/Users/libpath-tester/def/../abc/', F.make_path_absolute('~/def/../abc/', home: home)
+		assert_equal '/Users/libpath-tester/abc/', F.make_path_absolute('~/def/../abc/', home: home, make_canonical: true)
+	end
+
+	def test_nonhome_tilde_with_fixed_pwd
+
+		pwd = '/some-path/or-other'
+
+		assert_equal '/some-path/or-other/~.', F.make_path_absolute('~.', pwd: pwd)
+		assert_equal '/some-path/or-other/~.', F.make_path_absolute('~.', pwd: pwd, make_canonical: true)
+
+		assert_equal '/some-path/or-other/~abc', F.make_path_absolute('~abc', pwd: pwd)
+		assert_equal '/some-path/or-other/~abc', F.make_path_absolute('~abc', pwd: pwd, make_canonical: true)
+
+		assert_equal '/some-path/or-other/~./abc', F.make_path_absolute('~./abc', pwd: pwd)
+		assert_equal '/some-path/or-other/~./abc', F.make_path_absolute('~./abc', pwd: pwd, make_canonical: true)
+
+		assert_equal '/some-path/or-other/~./abc/', F.make_path_absolute('~./abc/', pwd: pwd)
+		assert_equal '/some-path/or-other/~./abc/', F.make_path_absolute('~./abc/', pwd: pwd, make_canonical: true)
+
+		assert_equal '/some-path/or-other/~def/../abc', F.make_path_absolute('~def/../abc', pwd: pwd)
+		assert_equal '/some-path/or-other/abc', F.make_path_absolute('~def/../abc', pwd: pwd, make_canonical: true)
+
+		assert_equal '/some-path/or-other/~def/../abc/', F.make_path_absolute('~def/../abc/', pwd: pwd)
+		assert_equal '/some-path/or-other/abc/', F.make_path_absolute('~def/../abc/', pwd: pwd, make_canonical: true)
+	end
+
+end
+

data/test/unit/util/unix/tc_make_path_canonical.rb

@@ -0,0 +1,139 @@
+#! /usr/bin/env ruby
+
+$:.unshift File.join(File.dirname(__FILE__), *(['..'] * 4), 'lib')
+
+require 'libpath/util/unix'
+
+require 'test/unit'
+
+class Test_LibPath_Util_Unix_make_path_canonical < Test::Unit::TestCase
+
+	F = ::LibPath::Util::Unix
+
+	def test_empty
+
+		assert_equal '', F.make_path_canonical('')
+	end
+
+	def test_one_dot
+
+		assert_equal './', F.make_path_canonical('.')
+		assert_equal './', F.make_path_canonical('./')
+		assert_equal './', F.make_path_canonical('./.')
+		assert_equal './', F.make_path_canonical('./.')
+		assert_equal './', F.make_path_canonical('././')
+		assert_equal './', F.make_path_canonical('.//./')
+		assert_equal './', F.make_path_canonical('.////./')
+		assert_equal './', F.make_path_canonical('././.')
+		assert_equal './', F.make_path_canonical('./././')
+	end
+
+	def test_two_dots
+
+		assert_equal '../', F.make_path_canonical('..')
+		assert_equal '../', F.make_path_canonical('../')
+		assert_equal '../', F.make_path_canonical('../.')
+		assert_equal '../', F.make_path_canonical('.././')
+		assert_equal '../', F.make_path_canonical('..//./')
+		assert_equal '../', F.make_path_canonical('..////./')
+		assert_equal '../', F.make_path_canonical('.././.')
+	end
+
+	def test_unresolveable
+
+		assert_equal '../', F.make_path_canonical('..')
+		assert_equal '../', F.make_path_canonical('../')
+
+		assert_equal '../dir-1', F.make_path_canonical('../dir-1')
+		assert_equal '../dir-1/', F.make_path_canonical('../dir-1/')
+
+		assert_equal '../../', F.make_path_canonical('../..')
+		assert_equal '../../', F.make_path_canonical('../../')
+
+		assert_equal '../../dir-1', F.make_path_canonical('../../dir-1')
+		assert_equal '../../dir-1/', F.make_path_canonical('../../dir-1/')
+	end
+
+	def test_partially_resolveable
+
+		assert_equal '../', F.make_path_canonical('../dir-1/..')
+		assert_equal '../', F.make_path_canonical('../dir-1/../')
+
+		assert_equal '../abc', F.make_path_canonical('../dir-1/../abc')
+		assert_equal '../abc/', F.make_path_canonical('../dir-1/../abc/')
+
+		assert_equal '../../', F.make_path_canonical('../../dir-1/..')
+		assert_equal '../../', F.make_path_canonical('../../dir-1/../')
+
+		assert_equal '../../abc', F.make_path_canonical('../../dir-1/../abc')
+		assert_equal '../../abc/', F.make_path_canonical('../../dir-1/../abc/')
+
+		assert_equal '/dir.14/', F.make_path_canonical('/dir.14/dir.2/..')
+		assert_equal 'dir.14/', F.make_path_canonical('dir.14/dir.2/..')
+
+		assert_equal '/', F.make_path_canonical('/dir.14/dir.2/../..')
+		assert_equal '/', F.make_path_canonical('/dir.14/dir.2/../../..')
+		assert_equal './', F.make_path_canonical('dir.14/dir.2/../..')
+	end
+
+	def test_basenames
+
+		assert_equal 'a', F.make_path_canonical('a')
+
+		assert_equal 'file.ext', F.make_path_canonical('file.ext')
+
+		assert_equal '../', F.make_path_canonical('..')
+	end
+
+	def test_no_dots
+
+		assert_equal 'abc/def', F.make_path_canonical('abc/def')
+		assert_equal 'abc/def', F.make_path_canonical('abc//def')
+		assert_equal 'abc/def', F.make_path_canonical('abc///def')
+	end
+
+	def test_one_dots_directories
+
+		assert_equal 'abc', F.make_path_canonical('./abc')
+		assert_equal 'abc/', F.make_path_canonical('./abc/')
+
+		assert_equal 'abc', F.make_path_canonical('././abc')
+		assert_equal 'abc/', F.make_path_canonical('././abc/')
+
+		assert_equal 'abc', F.make_path_canonical('./././././././././abc')
+		assert_equal 'abc/', F.make_path_canonical('./././././././././abc/')
+
+		assert_equal 'abc/', F.make_path_canonical('abc/.')
+		assert_equal 'abc/', F.make_path_canonical('abc/./')
+
+		assert_equal 'abc/', F.make_path_canonical('./abc/.')
+		assert_equal 'abc/', F.make_path_canonical('./abc/./')
+	end
+
+	def test_two_dots_directories
+
+		assert_equal '../', F.make_path_canonical('..')
+		assert_equal '../', F.make_path_canonical('../')
+
+		assert_equal '../abc', F.make_path_canonical('../abc')
+		assert_equal '../abc/', F.make_path_canonical('../abc/')
+
+		assert_equal './', F.make_path_canonical('abc/..')
+		assert_equal './', F.make_path_canonical('abc/../')
+
+		assert_equal 'def', F.make_path_canonical('abc/../def')
+		assert_equal 'def/', F.make_path_canonical('abc/../def/')
+
+		assert_equal './', F.make_path_canonical('abc/../def/..')
+		assert_equal './', F.make_path_canonical('abc/../def/../')
+
+		assert_equal '../dir-2/', F.make_path_canonical('../dir-1/../dir-2/')
+		assert_equal '../dir-2', F.make_path_canonical('../dir-1/../dir-2')
+		assert_equal '/dir-2', F.make_path_canonical('/../dir-1/../dir-2')
+		assert_equal '/', F.make_path_canonical('/../')
+		assert_equal '/', F.make_path_canonical('/..')
+		assert_equal('/', F.make_path_canonical('/dir.14/dir.2/../..'))
+		assert_equal('/', F.make_path_canonical('/dir.14/dir.2/../../..'))
+	end
+end
+