Re: PATCH: update Cygwin completion functions

[Clint Adams <clint@zsh.org>]

On Mon, Jan 26, 2009 at 07:06:33PM +1100, Doug Kearns wrote:
> % setfacl --version
> setfacl (cygwin) 1.13
> ACL Modification Utility
> Copyright 2000, 2001, 2002 Red Hat, Inc.
> Compiled on Jun 12 2008

Thanks.

Index: Completion/Unix/Command/_getfacl
===================================================================
RCS file: /cvsroot/zsh/zsh/Completion/Unix/Command/_getfacl,v
retrieving revision 1.3
diff -u -r1.3 _getfacl
--- Completion/Unix/Command/_getfacl	29 Jan 2009 16:06:48 -0000	1.3
+++ Completion/Unix/Command/_getfacl	29 Jan 2009 16:23:20 -0000
@@ -1,7 +1,7 @@
 #compdef getfacl getfacl.exe
 
+if _pick_variant cygwin=cygwin unix --version; then
 # cygwin 1.5.25
-
 _arguments -s -S \
   '(--all -a)'{-a,--all}'[display the filename, owner, group, and ACL of the file]' \
   '(--dir -d)'{-d,--dir}'[display the filename, owner, group, and default ACL of the directory]' \
@@ -9,3 +9,20 @@
   '(- *)'{-h,--help}'[display help information]' \
   '(- *)'{-v,--version}'[display version information]' \
   '*: :_files'
+else
+_arguments -s -S \
+  '--access[display the file access control list only]' \
+  '(-d --default)'{-d,--default}'[display the default access control list only]' \
+  '--omit-header[do not display the comment header]' \
+  '--all-effective[print all effective rights]' \
+  '--no-effective[print no effective rights] '\
+  '--skip-base[skip files that only have the base entries]' \
+  '(-R --recursive)'{-R,--recursive}'[recurse into subdirectories]' \
+  '(-L --logical)'{-L,--logical}'[logical walk, follow symbolic links]' \
+  '(-P --physical)'{-P,--physical}'[physical walk, do not follow symbolic links]' \
+  '--tabular[use tabular output format]' \
+  '--numeric[print numeric user/group identifiers]' \
+  '--absolute-names[don'"'"'t strip leading '"'"'/'"'"' in pathnames' \
+  '--version[print version and exit]' \
+  '--help[this help text]'
+fi
Index: Completion/Unix/Command/_setfacl
===================================================================
RCS file: /cvsroot/zsh/zsh/Completion/Unix/Command/_setfacl,v
retrieving revision 1.1
diff -u -r1.1 _setfacl
--- Completion/Unix/Command/_setfacl	29 Jan 2009 16:02:54 -0000	1.1
+++ Completion/Unix/Command/_setfacl	29 Jan 2009 16:23:20 -0000
@@ -1,7 +1,7 @@
 #compdef setfacl setfacl.exe
 
+if _pick_variant cygwin=cygwin unix --version; then
 # cygwin 1.5.25
-
 _arguments -s -S \
   '(-d, --delete)'{-d,--delete}'[delete one or more specified ACL entries]:ACL entry:' \
   '(-f, --file)'{-f,--file}'[set ACL entries for FILE to ACL entries read from a ACL_FILE]:ACL file:_files' \
@@ -11,3 +11,24 @@
   '(- *)'{-h,--help}'[output usage information and exit]' \
   '(- *)'{-v,--version}'[output version information and exit]' \
   '*: :_files'
+else
+_arguments -s -S \
+  '(-m --modify)'{-m,--modify=}'[modify the current ACL]:ACL:' \
+  '(-M --modify-file)'{-M,--modify-file=}'[read ACL entries to modify from file]:file:_files' \
+  '(-x --remove)'{-x,--remove=}'[remove ACL entries]:ACL:' \
+  '(-X --remove-file)'{-X,--remove-file=}'[read ACL entries to remove from file]:file:_files' \
+  '(-b --remove-all)'{-b,--remove-all}'[remove all extended ACL entries]' \
+  '(-k --remove-default)'{-k,--remove-default}'[remove the default ACL]' \
+  '--set=[set the ACL, replacing the current ACL]:ACL:' \
+  '--set-file=[read ACL entries to set from file]:file:_files' \
+  '--mask[do recalculate the effective rights mask]' \
+  '(-n --no-mask)'{-n,--no-mask}'[don'"'"'t recalculate the effective rights mask]' \
+  '(-d --default)'{-d,--default}'[operations apply to the default ACL]' \
+  '(-R --recursive)'{-R,--recursive}'[recurse into subdirectories]' \
+  '(-L --logical)'{-L,--logical}'[logical walk, follow symbolic links]' \
+  '(-P --physical)'{-P,--physical}'[physical walk, do not follow symbolic links]' \
+  '--restore=[restore ACLs]:file:_files' \
+  '--test[test mode (ACLs are not modified)]' \
+  '--version[print version and exit]' \
+  '--help[this help text]'
+fi