From Dmitry V. Levin

4 files changed, 421 insertions, 0 deletions

diff --git a/tests/readlink/Makefile.am b/tests/readlink/Makefile.am
new file mode 100644
index 000000000..7a409ffca
--- /dev/null
+++ b/tests/readlink/Makefile.am
@@ -0,0 +1,7 @@
+## Process this file with automake to produce Makefile.in -*-Makefile-*-.
+AUTOMAKE_OPTIONS = 1.4 gnits
+
+TESTS = rl-1 can-e can-f can-m
+EXTRA_DIST = $(TESTS)
+TESTS_ENVIRONMENT = \
+  PATH="`pwd`/../../src$(PATH_SEPARATOR)$$PATH"
diff --git a/tests/readlink/can-e b/tests/readlink/can-e
new file mode 100755
index 000000000..4e36c2f40
--- /dev/null
+++ b/tests/readlink/can-e
@@ -0,0 +1,115 @@
+#!/bin/sh
+# tests for canonicalize-existing mode (readlink -e).
+
+if test "$VERBOSE" = yes; then
+  set -x
+  readlink --version
+fi
+
+pwd=`pwd`
+t0=`echo "$0" |sed 's,.*/,,'`.tmp; tmp=$t0/$$
+trap 'status=$?; cd $pwd; chmod -R u+rwx $t0; rm -rf $t0 && exit $status' 0
+trap 'status=$?; (exit $status); exit $status' 1 2 13 15
+
+fail=1
+while :; do
+  bindir=`cd ../../src; pwd`|| break
+  my_pwd=`$bindir/pwd` || break
+
+  mkdir -p $tmp || break
+  cd $tmp || break
+
+  mkdir subdir removed || break
+  touch regfile || break
+
+  ln -s regfile link1 || break
+  ln -s subdir link2 || break
+  ln -s missing link3 || break
+  ln -s subdir/missing link4 || break
+
+  fail=0
+  break
+done
+
+if test $fail = 1; then
+  echo "$0: failure in testing framework" 1>&2
+  (exit 1); exit 1
+fi
+
+fail=1
+while :; do
+  cd "$pwd/$tmp/removed" || break
+  rmdir ../removed || break
+  v=`readlink -e .` && break
+  test -z "$v" || break
+  cd "$pwd/$tmp" || break
+
+  fail=0
+  break
+done
+
+if test $fail = 1; then
+  (exit $fail); exit $fail
+fi
+
+for p in "" "$pwd/$tmp/"; do
+  fail=1
+
+  v=`readlink -e ${p}regfile` || break
+  test "$v" = "$my_pwd/$tmp/regfile" || break
+
+  v=`readlink -e ${p}./regfile/` && break
+  test -z "$v" || break
+
+  v=`readlink -e ${p}subdir` || break
+  test "$v" = "$my_pwd/$tmp/subdir" || break
+
+  v=`readlink -e ${p}./subdir/` || break
+  test "$v" = "$my_pwd/$tmp/subdir" || break
+
+  v=`readlink -e ${p}missing` && break
+  test -z "$v" || break
+
+  v=`readlink -e ${p}./missing/` && break
+  test -z "$v" || break
+
+  v=`readlink -e ${p}link1` || break
+  test "$v" = "$my_pwd/$tmp/regfile" || break
+
+  v=`readlink -e ${p}./link1/` && break
+  test -z "$v" || break
+
+  v=`readlink -e ${p}link1/more` && break
+  test -z "$v" || break
+
+  v=`readlink -e ${p}link2` || break
+  test "$v" = "$my_pwd/$tmp/subdir" || break
+
+  v=`readlink -e ${p}./link2/` || break
+  test "$v" = "$my_pwd/$tmp/subdir" || break
+
+  v=`readlink -e ${p}link2/more` && break
+  test -z "$v" || break
+
+  v=`readlink -e ${p}link3` && break
+  test -z "$v" || break
+
+  v=`readlink -e ${p}./link3/` && break
+  test -z "$v" || break
+
+  v=`readlink -e ${p}link3/more` && break
+  test -z "$v" || break
+
+  v=`readlink -e ${p}link4` && break
+  test -z "$v" || break
+
+  v=`readlink -e ${p}./link4/` && break
+  test -z "$v" || break
+
+  v=`readlink -e ${p}link4/more` && break
+  test -z "$v" || break
+
+  fail=0
+done
+
+(exit $fail); exit $fail
diff --git a/tests/readlink/can-f b/tests/readlink/can-f
new file mode 100755
index 000000000..3d76b2b1a
--- /dev/null
+++ b/tests/readlink/can-f
@@ -0,0 +1,148 @@
+#!/bin/sh
+# tests for canonicalize mode (readlink -f).
+
+if test "$VERBOSE" = yes; then
+  set -x
+  readlink --version
+fi
+
+pwd=`pwd`
+t0=`echo "$0" |sed 's,.*/,,'`.tmp; tmp=$t0/$$
+trap 'status=$?; cd $pwd; chmod -R u+rwx $t0; rm -rf $t0 && exit $status' 0
+trap 'status=$?; (exit $status); exit $status' 1 2 13 15
+
+fail=1
+while :; do
+  bindir=`cd ../../src; pwd`|| break
+  my_pwd=`$bindir/pwd` || break
+
+  mkdir -p $tmp || break
+  cd $tmp || break
+
+  mkdir subdir removed || break
+  touch regfile || break
+
+  ln -s regfile link1 || break
+  ln -s subdir link2 || break
+  ln -s missing link3 || break
+  ln -s subdir/missing link4 || break
+
+  fail=0
+  break
+done
+
+if test $fail = 1; then
+  echo "$0: failure in testing framework" 1>&2
+  (exit 1); exit 1
+fi
+
+fail=1
+while :; do
+  cd "$pwd/$tmp/removed" || break
+  rmdir ../removed || break
+  v=`readlink -f .` && break
+  test -z "$v" || break
+  cd "$pwd/$tmp" || break
+
+  fail=0
+  break
+done
+
+if test $fail = 1; then
+  (exit $fail); exit $fail
+fi
+
+for p in "" "$pwd/$tmp/"; do
+  fail=1
+
+  v=`readlink -f ${p}regfile` || break
+  test "$v" = "$my_pwd/$tmp/regfile" || break
+
+  v=`readlink -f ${p}./regfile/` && break
+  test -z "$v" || break
+
+  v=`readlink -f ${p}regfile/more` && break
+  test -z "$v" || break
+
+  v=`readlink -f ${p}./regfile/more/` && break
+  test -z "$v" || break
+
+  v=`readlink -f ${p}subdir` || break
+  test "$v" = "$my_pwd/$tmp/subdir" || break
+
+  v=`readlink -f ${p}./subdir/` || break
+  test "$v" = "$my_pwd/$tmp/subdir" || break
+
+  v=`readlink -f ${p}subdir/more` || break
+  test "$v" = "$my_pwd/$tmp/subdir/more" || break
+
+  v=`readlink -f ${p}./subdir/more/` && break
+  test -z "$v" || break
+
+  v=`readlink -f ${p}missing` || break
+  test "$v" = "$my_pwd/$tmp/missing" || break
+
+  v=`readlink -f ${p}./missing/` && break
+  test -z "$v" || break
+
+  v=`readlink -f ${p}missing/more` && break
+  test -z "$v" || break
+
+  v=`readlink -f ${p}./missing/more/` && break
+  test -z "$v" || break
+
+  v=`readlink -f ${p}link1` || break
+  test "$v" = "$my_pwd/$tmp/regfile" || break
+
+  v=`readlink -f ${p}./link1/` && break
+  test -z "$v" || break
+
+  v=`readlink -f ${p}link1/more` && break
+  test -z "$v" || break
+
+  v=`readlink -f ${p}./link1/more/` && break
+  test -z "$v" || break
+
+  v=`readlink -f ${p}link2` || break
+  test "$v" = "$my_pwd/$tmp/subdir" || break
+
+  v=`readlink -f ${p}./link2/` || break
+  test "$v" = "$my_pwd/$tmp/subdir" || break
+
+  v=`readlink -f ${p}link2/more` || break
+  test "$v" = "$my_pwd/$tmp/subdir/more" || break
+
+  v=`readlink -f ${p}./link2/more/` && break
+  test -z "$v" || break
+
+  v=`readlink -f ${p}link2/more/more2` && break
+  test -z "$v" || break
+
+  v=`readlink -f ${p}./link2/more/more2/` && break
+  test -z "$v" || break
+
+  v=`readlink -f ${p}link3` || break
+  test "$v" = "$my_pwd/$tmp/missing" || break
+
+  v=`readlink -f ${p}./link3/` && break
+  test -z "$v" || break
+
+  v=`readlink -f ${p}link3/more` && break
+  test -z "$v" || break
+
+  v=`readlink -f ${p}./link3/more/` && break
+  test -z "$v" || break
+
+  v=`readlink -f ${p}link4` || break
+  test "$v" = "$my_pwd/$tmp/subdir/missing" || break
+
+  v=`readlink -f ${p}./link4/` && break
+  test -z "$v" || break
+
+  v=`readlink -f ${p}link4/more` && break
+  test -z "$v" || break
+
+  fail=0
+done
+
+(exit $fail); exit $fail
diff --git a/tests/readlink/can-m b/tests/readlink/can-m
new file mode 100755
index 000000000..cf2de5d52
--- /dev/null
+++ b/tests/readlink/can-m
@@ -0,0 +1,151 @@
+#!/bin/sh
+# tests for canonicalize-missing mode (readlink -m).
+
+if test "$VERBOSE" = yes; then
+  set -x
+  readlink --version
+fi
+
+pwd=`pwd`
+t0=`echo "$0" |sed 's,.*/,,'`.tmp; tmp=$t0/$$
+trap 'status=$?; cd $pwd; chmod -R u+rwx $t0; rm -rf $t0 && exit $status' 0
+trap 'status=$?; (exit $status); exit $status' 1 2 13 15
+
+fail=1
+while :; do
+  bindir=`cd ../../src; pwd`|| break
+  my_pwd=`$bindir/pwd` || break
+
+  mkdir -p $tmp || break
+  cd $tmp || break
+
+  mkdir subdir removed || break
+  touch regfile || break
+
+  ln -s regfile link1 || break
+  ln -s subdir link2 || break
+  ln -s missing link3 || break
+  ln -s subdir/missing link4 || break
+
+  fail=0
+  break
+done
+
+if test $fail = 1; then
+  echo "$0: failure in testing framework" 1>&2
+  (exit 1); exit 1
+fi
+
+fail=1
+while :; do
+  cd "$pwd/$tmp/removed" || break
+  rmdir ../removed || break
+  v=`readlink -m .` && break
+  test -z "$v" || break
+  cd "$pwd/$tmp" || break
+
+  fail=0
+  break
+done
+
+if test $fail = 1; then
+  (exit $fail); exit $fail
+fi
+
+for p in "" "$pwd/$tmp/"; do
+  fail=1
+
+  v=`readlink -m ${p}regfile` || break
+  test "$v" = "$my_pwd/$tmp/regfile" || break
+
+  v=`readlink -m ${p}./regfile/` || break
+  test "$v" = "$my_pwd/$tmp/regfile" || break
+
+  v=`readlink -m ${p}regfile/more` || break
+  test "$v" = "$my_pwd/$tmp/regfile/more" || break
+
+  v=`readlink -m ${p}./regfile/more/` || break
+  test "$v" = "$my_pwd/$tmp/regfile/more" || break
+
+  v=`readlink -m ${p}subdir` || break
+  test "$v" = "$my_pwd/$tmp/subdir" || break
+
+  v=`readlink -m ${p}./subdir/` || break
+  test "$v" = "$my_pwd/$tmp/subdir" || break
+
+  v=`readlink -m ${p}subdir/more` || break
+  test "$v" = "$my_pwd/$tmp/subdir/more" || break
+
+  v=`readlink -m ${p}./subdir/more/` || break
+  test "$v" = "$my_pwd/$tmp/subdir/more" || break
+
+  v=`readlink -m ${p}missing` || break
+  test "$v" = "$my_pwd/$tmp/missing" || break
+
+  v=`readlink -m ${p}./missing/` || break
+  test "$v" = "$my_pwd/$tmp/missing" || break
+
+  v=`readlink -m ${p}missing/more` || break
+  test "$v" = "$my_pwd/$tmp/missing/more" || break
+
+  v=`readlink -m ${p}./missing/more/` || break
+  test "$v" = "$my_pwd/$tmp/missing/more" || break
+
+  v=`readlink -m ${p}link1` || break
+  test "$v" = "$my_pwd/$tmp/regfile" || break
+
+  v=`readlink -m ${p}./link1/` || break
+  test "$v" = "$my_pwd/$tmp/regfile" || break
+
+  v=`readlink -m ${p}link1/more` || break
+  test "$v" = "$my_pwd/$tmp/regfile/more" || break
+
+  v=`readlink -m ${p}./link1/more/` || break
+  test "$v" = "$my_pwd/$tmp/regfile/more" || break
+
+  v=`readlink -m ${p}link2` || break
+  test "$v" = "$my_pwd/$tmp/subdir" || break
+
+  v=`readlink -m ${p}./link2/` || break
+  test "$v" = "$my_pwd/$tmp/subdir" || break
+
+  v=`readlink -m ${p}link2/more` || break
+  test "$v" = "$my_pwd/$tmp/subdir/more" || break
+
+  v=`readlink -m ${p}./link2/more/` || break
+  test "$v" = "$my_pwd/$tmp/subdir/more" || break
+
+  v=`readlink -m ${p}link2/more/more2` || break
+  test "$v" = "$my_pwd/$tmp/subdir/more/more2" || break
+
+  v=`readlink -m ${p}./link2/more/more2/` || break
+  test "$v" = "$my_pwd/$tmp/subdir/more/more2" || break
+
+  v=`readlink -m ${p}link3` || break
+  test "$v" = "$my_pwd/$tmp/missing" || break
+
+  v=`readlink -m ${p}./link3/` || break
+  test "$v" = "$my_pwd/$tmp/missing" || break
+
+  v=`readlink -m ${p}link3/more` || break
+  test "$v" = "$my_pwd/$tmp/missing/more" || break
+
+  v=`readlink -m ${p}./link3/more/` || break
+  test "$v" = "$my_pwd/$tmp/missing/more" || break
+
+  v=`readlink -m ${p}link4` || break
+  test "$v" = "$my_pwd/$tmp/subdir/missing" || break
+
+  v=`readlink -m ${p}./link4/` || break
+  test "$v" = "$my_pwd/$tmp/subdir/missing" || break
+
+  v=`readlink -m ${p}link4/more` || break
+  test "$v" = "$my_pwd/$tmp/subdir/missing/more" || break
+
+  v=`readlink -m ${p}./link4/more/` || break
+  test "$v" = "$my_pwd/$tmp/subdir/missing/more" || break
+
+  fail=0
+done
+
+(exit $fail); exit $fail