Lines Matching defs:effective
2944 Perl_cando(pTHX_ Mode_t mode, bool effective, const Stat_t *statbufp)
2945 /* effective is a flag, true for EUID, or for checking if the effective gid
2974 PERL_UNUSED_ARG(effective);
2979 if (ingroup(544,effective)) { /* member of Administrators */
2981 if ((effective ? PerlProc_geteuid() : PerlProc_getuid()) == 0) { /* root is special */
2991 if (statbufp->st_uid == (effective ? PerlProc_geteuid() : PerlProc_getuid()) ) {
2995 else if (ingroup(statbufp->st_gid,effective)) {
3008 S_ingroup(pTHX_ Gid_t testgid, bool effective)
3014 if (testgid == (effective ? PerlProc_getegid() : PerlProc_getgid()))