Lines Matching defs:suidscript

2529         bool suidscript = FALSE;
2531         rsfp = open_script(scriptname, dosearch, &suidscript);
2555             /* This will croak if suidscript is true, as -x cannot be used with
2557             forbid_setid('x', suidscript);
2558             /* Hence you can't get here if suidscript is true */
4149 S_open_script(pTHX_ const char *scriptname, bool dosearch, bool *suidscript)
4184                 *suidscript = TRUE;
4210         forbid_setid(0, *suidscript);
4301             Perl_croak_nocontext( "Illegal suidscript");
4363      * Should go by suidscript, not uid!=euid: why disallow
4365      * Or, is this run before we check arguments and set suidscript?
4367      * (We never have suidscript, can we be sure to have fdscript?)
4414 S_forbid_setid(pTHX_ const char flag, const bool suidscript) /* g */
4431     if (suidscript)