cygwin potentially corrupting permissions?
Greg Freemyer
greg.freemyer@gmail.com
Thu Sep 24 16:13:00 GMT 2015
Linda,
We seem to travel the same mailing lists. This is my first time to cygwin's.
I saved your script as "lsacl.txt". Then I used "cp lsacl.txt it" to
make a copy.
The copy is permission denied for reading. Basic ls -l shows no
difference (as expected)
$ ls -l lsacl.sh it
----rwx---+ 1 gaf None 1630 Sep 24 12:05 it
----rwx---+ 1 gaf None 1630 Sep 24 12:00 lsacl.sh
But your script does show a difference:
$ ./lsacl.sh lsacl.sh it
[u::---,g::---,g:root:rwx,g:Authenticated
Users:rwx,g:SYSTEM:rwx,g:Users:r-x,m:rwx,o:---/] lsacl.sh
[u::---,g::r-x,g:root:rwx,g:Authenticated
Users:rwx,g:SYSTEM:rwx,g:Users:r-x,m:rwx,o:---/] it
My user id is "gaf".
fyi: I thought I knew how to read an ACL, but the above makes little
sense to me. Note I can cat out "lsacl.sh", but I can't cat out "it".
Greg
--
Greg Freemyer
www.IntelligentAvatar.net
On Wed, Sep 23, 2015 at 10:58 PM, Linda Walsh <cygwin@tlinx.org> wrote:
> Greg Freemyer wrote:
>>
>> All,
>>
>> I've noticed on 2 different machines that if I copy (cp) a file I can
>> read with cygwin, I don't have permission to read the copy.
>
> ---
> What does the acl say?
>
> (Attached a script, lsacl, that I use -- it works
> with linux or cygwin and allows wildcards).
>
>
> #!/bin/bash
>
> ## $Id: lsacl,v 1.5 2015-08-02 10:29:25-07 law Exp law $
> # Version 2 -- try to work with getfacl on cygwin
> #
>
>
> shopt -s expand_aliases
> alias int=declare\ -i sub=function string=declare
>
> gfacl=$(type -P getfacl)
>
> if ! type -f cygwin 2>/dev/null ; then
> _un_=$(type -P uname)
> if [[ $_un_ ]] ; then _os_=$($_un_ -o);
> elif [[ -e /proc/sys/kernel ]]; then _os_=Linux;
> else _os_=Cygwin;
> fi
> if [[ $_os_ =~ Cygwin ]]; then function cygwin () {
> return 0; }
> else function cygwin () { return 1; }
> fi
> unset _un_ _os_
> export -f cygwin
> fi
>
> if cygwin 2>/dev/null ;then
> [[ $gfacl ]] || { printf "FATAL: Cannot find getfacl in path\n";
> exit 1; }
> sub gfacl () { "$gfacl" "$@"; }
> else
> ## linux version has broken semantics requiring "-p"
> sub gfacl () { "$gfacl" -p "$@" ; }
> fi
>
> export -f gfacl
>
>
> sub facl2str {
> string fn=${1:?"Need pathname"}
> string s1='/^\#.*$/d; /^\s*$/d; s/\s*#.*$//;
> s/^(.)(ser|roup|ask|ther):/\1:/; y/\n/,/'
> string facl=$(gfacl -a "$fn"|sed -r "$s1"|tr "\n" ",")
> facl=${facl%,}
> string dacl=$(gfacl -d "$fn"|sed -r "s/^default://; $s1"|tr "\n"
> ",")
> dacl=${dacl%,}
> printf "[%s/%s]\n" "$facl" "$dacl"
> }
>
>
>
> int acllen=0 maxfnln=0
> #for fn in "$@" ; do if ((maxfnln<${#fn})); then maxfnln=${#fn}; fi ; done
>
> sub acl_str () {
> if cygwin ;then
> perm=$(facl2str "$fn")
> else
> qfn=$(printf "%q " "$fn")
> out="$(chacl -l "$fn")"
> perm="${out#$qfn}"
> fi
> printf "%s\n" "$perm"
> }
>
>
> for fn in "$@"; do
> int max=40
> perm=$(acl_str "$fn")
> int len=${#perm}
> if ((len>_acl_len_)); then acllen=len; fi
> if ((acllen>max)); then acllen=max; fi
> printf "%-${acllen}s %s\n" "$perm" "$fn"
> done
>
--
Problem reports: http://cygwin.com/problems.html
FAQ: http://cygwin.com/faq/
Documentation: http://cygwin.com/docs.html
Unsubscribe info: http://cygwin.com/ml/#unsubscribe-simple
More information about the Cygwin
mailing list