Searched refs:PerlProc_getgid (Results 1 – 10 of 10) sorted by relevance
68 else if (PerlProc_getgid() != PerlProc_getegid()) in Perl_taint_proper()
267 PerlProc_getgid() == PerlProc_getegid()) ? TRUE : FALSE; in perl_construct()2461 PerlProc_getgid() == PerlProc_getegid()) { in S_parse_body()4292 const Gid_t my_gid = PerlProc_getgid(); in S_validate_suid()4352 const Gid_t my_gid = PerlProc_getgid(); in S_init_ids()4389 Gid_t gid = PerlProc_getgid(); in Perl_doing_taint()4428 if (PerlProc_getgid() != PerlProc_getegid()) in S_forbid_setid()5094 PerlProc_getgid() != PerlProc_getegid())) { in S_mayberelocate()
597 # define getgid PerlProc_getgid
1038 # define PerlProc_getgid() \ macro1104 # define PerlProc_getgid() getgid() macro
1250 sv_setgid(sv, PerlProc_getgid()); in Perl_magic_get()3504 if (new_egid == PerlProc_getgid()) /* special case $) = $( */ in Perl_magic_set()
2727 Gid_t tmp_gid = PerlProc_getgid(); in S_aassign_uid()2796 tmp_gid = PerlProc_getgid(); in S_aassign_uid()
3014 if (testgid == (effective ? PerlProc_getegid() : PerlProc_getgid()))
345 PerlProc_getgid() == PerlProc_getegid()) { in PerlIO_debug()
305 PerlProc_getgid # Z added by devel/scanprov
11478 uic.uic$v_group= PerlProc_getgid();