Searched refs:PerlProc_geteuid (Results 1 – 10 of 10) sorted by relevance
47 const Uid_t euid = PerlProc_geteuid(); in Perl_taint_proper()66 if (PerlProc_getuid() != PerlProc_geteuid()) in Perl_taint_proper()
266 (PerlProc_getuid() == PerlProc_geteuid() && in perl_construct()2460 PerlProc_getuid() == PerlProc_geteuid() && in S_parse_body()4291 const Uid_t my_euid = PerlProc_geteuid(); in S_validate_suid()4351 const Uid_t my_euid = PerlProc_geteuid(); in S_init_ids()4388 Uid_t euid = PerlProc_geteuid(); in Perl_doing_taint()4426 if (PerlProc_getuid() != PerlProc_geteuid()) in S_forbid_setid()5093 (PerlProc_getuid() != PerlProc_geteuid() || in S_mayberelocate()
596 # define geteuid PerlProc_geteuid
1036 # define PerlProc_geteuid() \ macro1103 # define PerlProc_geteuid() geteuid() macro
2981 if ((effective ? PerlProc_geteuid() : PerlProc_getuid()) == 0) { /* root is special */2991 if (statbufp->st_uid == (effective ? PerlProc_geteuid() : PerlProc_getuid()) ) {
1247 sv_setuid(sv, PerlProc_geteuid()); in Perl_magic_get()3370 if (new_uid == PerlProc_geteuid()) { /* special case $< = $> */ in Perl_magic_set()
3600 if (PL_statcache.st_uid == PerlProc_geteuid()) in PP()4037 … if (PerlProc_geteuid() || PerlLIO_stat(tmps2, &statbuf) < 0 || !S_ISDIR(statbuf.st_mode))
2726 Uid_t tmp_euid = PerlProc_geteuid(); in S_aassign_uid()2762 tmp_euid = PerlProc_geteuid(); in S_aassign_uid()
344 PerlProc_getuid() == PerlProc_geteuid() && in PerlIO_debug()
304 PerlProc_geteuid # Z added by devel/scanprov