Merge of 22511 and 22584.

1 files changed, 28 insertions, 0 deletions

diff --git a/Completion/Unix/Type/_tar_archive b/Completion/Unix/Type/_tar_archive
new file mode 100644
index 000000000..1ac7cd0bf
--- /dev/null
+++ b/Completion/Unix/Type/_tar_archive
@@ -0,0 +1,28 @@
+#autoload
+
+# This is used to generate filenames usable as a tar archive. This may
+# get one argument, a collection of tar option characters that may be
+# used to find out what kind of filename is needed. If no argument is
+# given but the parameter `_tar_cmd' is set, that is used.
+# If your version of `tar' supports this you may want to complete
+# things like `host:file' or `user@host:file' here.
+
+local expl
+
+[[ $# -eq 0 && $+_tar_cmd -ne 0 ]] && set "$_tar_cmd"
+
+_description files expl 'archive file'
+
+if [[ "$1" = *[urtx]* ]]; then
+  if [[ "$1" = *[zZ]* ]]; then
+    _files "$expl[@]" -g '*.((tar|TAR).(gz|GZ|Z)|tgz)(-.)'
+  elif [[ "$1" = *[Ijy]* ]]; then
+    _files "$expl[@]" -g '*.(tar|TAR).bz2(-.)'
+  elif [[ "$_cmd_variant[$service]" == gnu ]]; then
+    _files "$expl[@]" -g '*.((tar|TAR)(.gz|.GZ|.Z|.bz2|)|tgz)(-.)'
+  else
+    _files "$expl[@]" -g '*.(tar|TAR)(-.)'
+  fi
+else
+  _files "$expl[@]"
+fi