Commitd6f09a8

committed

Use PerlLIO_dup_cloexec in Perl_dirp_dup to set O_CLOEXEC

dup doesn't mark the new descriptor as close-on-exec, which can lead toa descriptor leaking to the new process.

1 parentc87d901 commitd6f09a8Copy full SHA for d6f09a8

File tree

-1

lines changed

-1

lines changed

Lines changed: 1 addition & 1 deletion

Original file line number	Diff line number	Diff line change
`@@ -14111,7 +14111,7 @@ Perl_dirp_dup(pTHX_ DIR const dp, CLONE_PARAMS const param)`
`14111`	`14111`
`14112`	`14112`	`PERL_UNUSED_ARG(param);`
`14113`	`14113`
`14114`		`- ret = fdopendir(dup(my_dirfd(dp)));`
	`14114`	`+ ret = fdopendir(PerlLIO_dup_cloexec(my_dirfd(dp)));`
`14115`	`14115`
`14116`	`14116`	`#elif defined(WIN32)`
`14117`	`14117`	`ret = win32_dirp_dup(dp, param);`

Comments

(0)