summaryrefslogtreecommitdiff
path: root/test/lib/completions/tar.exp
diff options
context:
space:
mode:
Diffstat (limited to 'test/lib/completions/tar.exp')
-rw-r--r--test/lib/completions/tar.exp132
1 files changed, 0 insertions, 132 deletions
diff --git a/test/lib/completions/tar.exp b/test/lib/completions/tar.exp
deleted file mode 100644
index 75434e94..00000000
--- a/test/lib/completions/tar.exp
+++ /dev/null
@@ -1,132 +0,0 @@
-proc setup {} {
- save_env
-}
-
-proc teardown {} {
- assert_env_unmodified {
- /OLDPWD=/d
- /declare -f _tar/d
- }
-}
-
-setup
-
-# Detect whether system's tar is GNU tar
-set cmd "tar --version"
-send "$cmd\r"
-expect "^$cmd\r\n"
-expect {
- -re "GNU\[^\n\]*\n" {
- set tar_version gnu
- }
- -re ".*\n" {
- set tar_version unknown
- }
-}
-sync_after_int
-
-
-set test "old option: list escaped chars"
-assert_complete_dir "a/b\\'c/" "tar tf escape.tar a/b\\\'" $::srcdir/fixtures/tar $test
-sync_after_int
-
-# TODO: "tar tf escape.tar a/b"
-
-set test "check that any completion done"
-assert_complete_any "tar "
-sync_after_int
-
-# Use bsdtar as the it completes to only 'zc zt zx' ('tar' can be GNU tar and it
-# can would have more options)
-set test "old option: mode is not on first place"
-assert_complete {zc zt zx} "bsdtar z" $test
-sync_after_int
-
-set test "old option: test 'f' when mode is not as a first option"
-assert_complete_dir "dir/ dir2/" "tar zfc " $::srcdir/fixtures/tar
-sync_after_int
-
-set test "old option: creating archive and 'f' option"
-assert_complete_dir "dir/ dir2/" "tar cf " $::srcdir/fixtures/tar
-sync_after_int
-
-set test "old option: archive listing"
-assert_complete_dir "dir/fileA dir/fileB dir/fileC" "tar tf archive.tar.xz dir/file" $::srcdir/fixtures/tar
-sync_after_int
-
-set test "old option: check _second_ option in \"old\" argument"
-assert_complete_dir "dir/ dir2/" "bsdtar cbfvv NOT_EXISTS " $::srcdir/fixtures/tar
-sync_after_int
-
-set test "old option: create and members"
-assert_complete_dir "dir/ dir2/ archive.tar.xz escape.tar" "tar cTfvv NOT_EXISTS DONT_CREATE.tar " $::srcdir/fixtures/tar
-sync_after_int
-
-set test "old option: extract and archive"
-assert_complete_dir "dir/ dir2/ archive.tar.xz escape.tar" "tar xvf " $::srcdir/fixtures/tar
-sync_after_int
-
-if { "$tar_version" == "gnu" } {
- set test "check short options"
- assert_complete_any "tar -c"
- sync_after_int
-
- set test "mode not as a first option"
- assert_complete_dir "dir/ dir2/" "tar -zcf " $::srcdir/fixtures/tar
- sync_after_int
-
- # Only directories should be completed.
- set test "check that we do not suggest re-writing existing archive"
- assert_complete_dir "dir/ dir2/" "tar -cf " $::srcdir/fixtures/tar
- sync_after_int
-
- set test "check --file option"
- assert_complete_dir "dir/ dir2/" "tar -c --file " $::srcdir/fixtures/tar
- sync_after_int
-
- set test "check --file option #2"
- assert_complete_dir "dir/ dir2/" "tar -cvv --file " $::srcdir/fixtures/tar
- sync_after_int
-
- set test "archive listing"
- assert_complete_dir "dir/fileA dir/fileB dir/fileC" "tar -tf archive.tar.xz dir/file" $::srcdir/fixtures/tar
- sync_after_int
-
- set test "archive listing with --file"
- assert_complete_dir "dir/fileA dir/fileB dir/fileC" "tar -t --file archive.tar.xz dir/file" $::srcdir/fixtures/tar
- sync_after_int
-
- # Some random options should work:
- set test "test random tar's long option #1"
- assert_complete "--blocking-factor= --block-number" "tar --block" $test
- sync_after_int
-
- set test "test random tar's long option #2"
- assert_complete "--add-file=" "tar --add-fil" $test -nospace
- sync_after_int
-
- set test "test random tar's long option #3"
- assert_complete "--posix" "tar -cf /dev/null --posi" $test
- sync_after_int
-
- # --owner
- set users [exec bash -c "compgen -A user"]
- set test "test --owner option"
- assert_complete $users "tar --owner=" $test
- sync_after_int
-
- # --group
- set groups [exec bash -c "compgen -A group"]
- set test "test --group option"
- assert_complete $groups "tar --group=" $test
- sync_after_int
-
- # use -b for this as -b is still not handled by tar's completion
- set test "short opt -XXXb <TAB> (arg required)"
- assert_no_complete "tar -cvvfb " $test
- sync_after_int
-
- # TODO: how to test that 'tar -cf<TAB>' completes to 'tar -cf '
-}
-
-teardown