This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
foo_cloexec() under PERL_GLOBAL_STRUCT_PRIVATE
authorDavid Mitchell <davem@iabyn.com>
Wed, 26 Dec 2018 12:58:06 +0000 (12:58 +0000)
committerDavid Mitchell <davem@iabyn.com>
Tue, 19 Feb 2019 13:28:12 +0000 (13:28 +0000)
commit999d65ede909a162fb0accd370ffdf1411e94d5e
treef729bec46a0a745f8f178d03aae29602da4aa014
parent4ef8bdf9dc2018cb385cf00d11e2e74f0491f8e9
foo_cloexec() under PERL_GLOBAL_STRUCT_PRIVATE

Fix the various Perl_PerlSock_dup2_cloexec() type functions so that
t/porting/liberl.a passes under -DPERL_GLOBAL_STRUCT_PRIVATE builds.

In these builds it is forbidden to have any static variables, but each
of these functions (via convoluted macros) has a static var called
'strategy' which records, for each function, whether a run-time probe
has been done to determine the best way of achieving close-exec
functionality, and the result.

Replace them all with 'global' vars: PL_strategy_dup2 etc.

NB these vars aren't thread-safe but it doesn't really matter, as the
worst that can happen is for a redundant probe or two to be done before
a suitable "don't probe any more" value is written to the var and seen
by all the threads.
doio.c
embedvar.h
globvar.sym
perlapi.h
perlvars.h