nixpkgs/pkgs/development/interpreters/perl/interpreter.nix
Stig Palmquist d59aeb80e5 perl: backport security fixes
Perl ships with some CPAN modules vendored as "dual-life", this commit
inject updated versions certain modules directly from CPAN rather than
applying patches from upstream, as they can be tricky to maintain.

It also includes a patch for CVE-2026-8376 which affects 32-bit
platforms.

- perl: CVE-2026-8376
  5e7f119eb2

- HTTP-Tiny 0.094: CVE-2026-7010
  https://metacpan.org/release/HAARG/HTTP-Tiny-0.094/changes

- Compress-Raw-Zlib 2.222: CVE-2026-3381, CVE-2026-4176
  https://metacpan.org/release/PMQS/Compress-Raw-Zlib-2.222/changes

- Compress-Raw-Bzip2 2.218
  https://metacpan.org/release/PMQS/Compress-Raw-Bzip2-2.218/changes

- IO-Compress 2.220: CVE-2026-48959, CVE-2026-48961, CVE-2026-48962
  https://metacpan.org/release/PMQS/IO-Compress-2.220/changes

- Archive-Tar 3.12: CVE-2026-42496, CVE-2026-42497, CVE-2026-9538
  https://metacpan.org/release/BINGOS/Archive-Tar-3.12/changes

Assisted-by: Codex (OpenAI)
Signed-off-by: Stig Palmquist <git@stig.io>
2026-06-04 18:10:38 +02:00

465 lines
16 KiB
Nix

{
stdenv,
fetchurl,
fetchFromGitHub,
buildPackages,
lib,
self,
version,
sha256,
pkgsBuildBuild,
pkgsBuildHost,
pkgsBuildTarget,
pkgsHostHost,
pkgsTargetTarget,
zlib,
config,
passthruFun,
perlAttr ? "perl${lib.versions.major version}",
enableThreading ? true,
coreutils,
makeWrapper,
enableCrypt ? true,
libxcrypt ? null,
overrides ? config.perlPackageOverrides or (p: { }), # TODO: (self: super: {}) like in python
}@inputs:
# Note: this package is used for bootstrapping fetchurl, and thus
# cannot use fetchpatch! All mutable patches (generated by GitHub or
# cgit) that are needed here should be included directly in Nixpkgs as
# files.
assert (enableCrypt -> (libxcrypt != null));
let
crossCompiling = !(stdenv.buildPlatform.canExecute stdenv.hostPlatform);
commonPatches = [
# Do not look in /usr etc. for dependencies.
./no-sys-dirs.patch
./CVE-2026-8376.patch
]
# Fix build on Solaris on x86_64
# See also:
# * perl tracker: https://github.com/Perl/perl5/issues/9669
# * netbsd tracker: https://gnats.netbsd.org/cgi-bin/query-pr-single.pl?number=44999
++ lib.optional stdenv.hostPlatform.isSunOS ./ld-shared.patch
# Don't pass -no-cpp-precomp, even if it is "supported"
#
# cpp-precomp is a relic from NeXT days, when there was a separate
# cpp preprocessor that produced "precompiled header files" (hence
# cpp-precomp) - binary files containing information from .h files, that
# sped up the compilation slightly.
#
# However, cpp-precomp was semi-broken and didn't accept a lot of valid
# code, so there was a way to disable it (-no-cpp-precomp).
#
# This flag seems to have lost all relevance back in 2002 or so, when
# cpp-precomp stopped being used; gcc dropped it completely in 4.8 (and
# now errors out if you pass it), but for some reason clang still accepts
# it (but it's a no-op). This means that if you compile perl with clang,
# it will think that this flag is still supported, and it can cause issues
# if you compile c code from perl:
# https://trac.macports.org/ticket/38913
#
# More info about -no-cpp-precomp: https://www.mistys-internet.website/blog/blog/2013/10/19/no-cpp-precomp-the-compiler-flag-that-time-forgot
#
# See also: https://github.com/NixOS/nixpkgs/pull/1160
++ lib.optional stdenv.hostPlatform.isDarwin ./cpp-precomp.patch
# Miniperl is a "bootstrap" perl which doesn't support dynamic loading, among other things.
# It is used to build modules for the "final" perl.
#
# This patch enables more modules to be loaded with miniperl (mostly by
# removing dynamically loaded libraries and using perl builtins instead),
# which is needed during cross-compilation because the bootstrapping process
# has more stages than the default build and doesn't get to the main perl
# binary as early.
#
# Some more details: https://arsv.github.io/perl-cross/modules.html
++ lib.optional crossCompiling ./cross.patch;
# Inject fixed CPAN releases for bundled dual-life distributions until the
# next perl maintenance release includes them.
vendoredPerlDistributions = [
{
# CVE-2026-7010
path = "cpan/HTTP-Tiny";
src = fetchurl {
url = "mirror://cpan/authors/id/H/HA/HAARG/HTTP-Tiny-0.094.tar.gz";
hash = "sha256-poQemfwbVdFd6VlHzL17dnvsxRxxAhl/qPBE333cB0M=";
};
}
{
# CVE-2026-3381, CVE-2026-4176
path = "cpan/Compress-Raw-Zlib";
src = fetchurl {
url = "mirror://cpan/authors/id/P/PM/PMQS/Compress-Raw-Zlib-2.222.tar.gz";
hash = "sha256-Hf19URplVifIGBXTDTurwo+luIRV/wP4sECZ3LUShrg=";
};
}
{
# Runtime dependency of IO-Compress 2.220.
path = "cpan/Compress-Raw-Bzip2";
src = fetchurl {
url = "mirror://cpan/authors/id/P/PM/PMQS/Compress-Raw-Bzip2-2.218.tar.gz";
hash = "sha256-iRU+ai69pSNJSTsHT6S3VJ/x+QU952E8GKXgXFtBX6g=";
};
}
{
# CVE-2026-48962, CVE-2026-48961, CVE-2026-48959
path = "cpan/IO-Compress";
src = fetchurl {
url = "mirror://cpan/authors/id/P/PM/PMQS/IO-Compress-2.220.tar.gz";
hash = "sha256-nZbqKR8sVO82fHOWuFfZO6GsHEsvG84T7Yo+Xz7rtic=";
};
}
{
# CVE-2026-42496, CVE-2026-42497, CVE-2026-9538
path = "cpan/Archive-Tar";
src = fetchurl {
url = "mirror://cpan/authors/id/B/BI/BINGOS/Archive-Tar-3.12.tar.gz";
hash = "sha256-ARTvObZfSfiWgoOrR3Gdfoj5jXNg/jZJvjMcf1PVgyw=";
};
}
];
replaceVendoredPerlDistributions = lib.concatMapStringsSep "\n" (d: ''
rm -rf ${d.path}
mkdir -p ${d.path}
tar --strip-components=1 -C ${d.path} -xf ${d.src}
# Remove executable bits to make t/porting/exec-bit.t happy.
find ${d.path} -type f -exec chmod a-x {} +
'') vendoredPerlDistributions;
libc = if stdenv.cc.libc or null != null then stdenv.cc.libc else "/usr";
libcInc = lib.getDev libc;
libcLib = lib.getLib libc;
in
stdenv.mkDerivation (
finalAttrs:
{
inherit version;
pname = "perl";
src = fetchurl {
url = "mirror://cpan/src/5.0/perl-${version}.tar.gz";
inherit sha256;
};
strictDeps = true;
# TODO: Add a "dev" output containing the header files.
outputs = [
"out"
"man"
"devdoc"
]
++ lib.optional crossCompiling "mini";
setOutputFlags = false;
# On FreeBSD, if Perl is built with threads support, having
# libxcrypt available will result in a build failure, because
# perl.h will get conflicting definitions of struct crypt_data
# from libc's unistd.h and libxcrypt's crypt.h.
#
# FreeBSD Ports has the same issue building the perl port if
# the libxcrypt port has been installed.
#
# Without libxcrypt, Perl will still find FreeBSD's crypt functions.
propagatedBuildInputs = lib.optional (enableCrypt && !stdenv.hostPlatform.isFreeBSD) libxcrypt;
disallowedReferences = [ stdenv.cc ];
patches = commonPatches;
# This is not done for native builds because pwd may need to come from
# bootstrap tools when building bootstrap perl.
postPatch =
(
if crossCompiling then
''
substituteInPlace dist/PathTools/Cwd.pm \
--replace "/bin/pwd" '${coreutils}/bin/pwd'
substituteInPlace cnf/configure_tool.sh --replace "cc -E -P" "cc -E"
''
else
''
substituteInPlace dist/PathTools/Cwd.pm \
--replace "/bin/pwd" "$(type -P pwd)"
''
)
+ replaceVendoredPerlDistributions
+ ''
# Perl's build system uses the src variable, and its value may end up in
# the output in some cases (when cross-compiling).
unset src
'';
# Build a thread-safe Perl with a dynamic libperl.so. We need the
# "installstyle" option to ensure that modules are put under
# $out/lib/perl5 - this is the general default, but because $out
# contains the string "perl", Configure would select $out/lib.
# Miniperl needs -lm. perl needs -lrt.
configureFlags =
(
if crossCompiling then
[
"-Dlibpth=\"\""
"-Dglibpth=\"\""
"-Ddefault_inc_excludes_dot"
# https://github.com/arsv/perl-cross/issues/158
"-Dd_gnulibc=define"
]
else
(
[
"-de"
"-Dprefix=${placeholder "out"}"
"-Dman1dir=${placeholder "out"}/share/man/man1"
"-Dman3dir=${placeholder "out"}/share/man/man3"
]
++ (
if (stdenv.cc.targetPrefix != "") then
[
"-Dcc=${stdenv.cc.targetPrefix}cc"
"-Dnm=${stdenv.cc.targetPrefix}nm"
"-Dar=${stdenv.cc.targetPrefix}ar"
]
else
[
"-Dcc=cc"
"-Duseshrplib"
]
)
)
)
++ [
"-Uinstallusrbinperl"
"-Dinstallstyle=lib/perl5"
"-Dlocincpth=${libcInc}/include"
"-Dloclibpth=${libcLib}/lib"
"-Accflags=-D_GNU_SOURCE"
]
++ lib.optional stdenv.hostPlatform.isStatic "-Uusedl"
++ lib.optionals ((builtins.match ''5\.[0-9]*[13579]\..+'' version) != null) [
"-Dusedevel"
"-Uversiononly"
]
++ lib.optional stdenv.hostPlatform.isSunOS "-Dcc=gcc"
++ lib.optional enableThreading "-Dusethreads"
++ lib.optional (!enableCrypt) "-A clear:d_crypt_r"
++ lib.optionals (stdenv.hostPlatform.isFreeBSD && crossCompiling && enableCrypt) [
# https://github.com/Perl/perl5/issues/22295
# configure cannot figure out that we have crypt automatically, but we really do
"-Dd_crypt"
];
configureScript = lib.optionalString (!crossCompiling) "${stdenv.shell} ./Configure";
# !canExecute cross uses miniperl which doesn't have this
postConfigure =
lib.optionalString (!crossCompiling && stdenv.cc.targetPrefix != "") ''
substituteInPlace Makefile \
--replace-fail "AR = ar" "AR = ${stdenv.cc.targetPrefix}ar"
''
+ lib.optionalString crossCompiling ''
substituteInPlace miniperl_top --replace-fail '-I$top/lib' '-I$top/cpan/JSON-PP/lib -I$top/cpan/CPAN-Meta-YAML/lib -I$top/lib'
'';
dontAddStaticConfigureFlags = true;
dontAddPrefix = !crossCompiling;
enableParallelBuilding = true;
# perl includes the build date, the uname of the build system and the
# username of the build user in some files.
# We override these to make it build deterministically.
# other distro solutions
# https://github.com/bmwiedemann/openSUSE/blob/master/packages/p/perl/perl-reproducible.patch
# https://github.com/archlinux/svntogit-packages/blob/packages/perl/trunk/config.over
# https://salsa.debian.org/perl-team/interpreter/perl/blob/debian-5.26/debian/config.over
# A ticket has been opened upstream to possibly clean some of this up: https://rt.perl.org/Public/Bug/Display.html?id=133452
preConfigure = ''
cat > config.over <<EOF
${lib.optionalString (
stdenv.hostPlatform.isLinux && stdenv.hostPlatform.isGnu
) ''osvers="gnulinux"''}
myuname="nixpkgs"
myhostname="nixpkgs"
cf_by="nixpkgs"
cf_time="$(date -d "@$SOURCE_DATE_EPOCH")"
EOF
# Compress::Raw::Zlib should use our zlib package instead of the one
# included with the distribution
cat > ./cpan/Compress-Raw-Zlib/config.in <<EOF
BUILD_ZLIB = False
INCLUDE = ${zlib.dev}/include
LIB = ${zlib.out}/lib
OLD_ZLIB = False
GZIP_OS_CODE = AUTO_DETECT
USE_ZLIB_NG = False
''
+ lib.optionalString (lib.versionAtLeast version "5.40.0") ''
ZLIB_INCLUDE = ${zlib.dev}/include
ZLIB_LIB = ${zlib.out}/lib
''
+ ''
EOF
''
+ lib.optionalString stdenv.hostPlatform.isDarwin ''
substituteInPlace hints/darwin.sh --replace "env MACOSX_DEPLOYMENT_TARGET=10.3" ""
''
+ lib.optionalString (!enableThreading) ''
# We need to do this because the bootstrap doesn't have a static libpthread
sed -i 's,\(libswanted.*\)pthread,\1,g' Configure
'';
# Default perl does not support --host= & co.
configurePlatforms = [ ];
setupHook = ./setup-hook.sh;
env = {
# https://github.com/llvm/llvm-project/issues/152241
NIX_CFLAGS_COMPILE = lib.optionalString (
stdenv.hasCC && stdenv.cc.isClang && lib.versionAtLeast stdenv.cc.version "21"
) "-fno-strict-aliasing";
};
# copied from python
passthru =
let
# When we override the interpreter we also need to override the spliced versions of the interpreter
inputs' = lib.filterAttrs (n: v: !lib.isDerivation v && n != "passthruFun") inputs;
override =
attr:
let
perl = attr.override (inputs' // { self = perl; });
in
perl;
in
passthruFun rec {
inherit self perlAttr;
inherit overrides;
perlOnBuildForBuild = override pkgsBuildBuild.${perlAttr};
perlOnBuildForHost = override pkgsBuildHost.${perlAttr};
perlOnBuildForTarget = override pkgsBuildTarget.${perlAttr};
perlOnHostForHost = override pkgsHostHost.${perlAttr};
perlOnTargetForTarget =
if lib.hasAttr perlAttr pkgsTargetTarget then (override pkgsTargetTarget.${perlAttr}) else { };
tests.withCheck = finalAttrs.finalPackage.overrideAttrs (_: {
preCheck = ''
# Weird test failure, can't even understand what it's about
# Disable the test for now
sed -i '/ext\/Pod-Html\/t\/htmldir3.*/d' MANIFEST
'';
doCheck = true;
});
};
# TODO: it seems like absolute paths to some coreutils is required.
postInstall = ''
# Remove dependency between "out" and "man" outputs.
rm "$out"/lib/perl5/*/*/.packlist
# Remove dependencies on glibc and gcc
sed "/ *libpth =>/c libpth => ' '," \
-i "$out"/lib/perl5/*/*/Config.pm
# TODO: removing those paths would be cleaner than overwriting with nonsense.
substituteInPlace "$out"/lib/perl5/*/*/Config_heavy.pl \
--replace "${libcInc}" /no-such-path \
--replace "${if stdenv.hasCC then stdenv.cc else "/no-such-path"}" /no-such-path \
--replace "${
if stdenv.hasCC && stdenv.cc.cc != null then stdenv.cc.cc else "/no-such-path"
}" /no-such-path \
--replace "${
if stdenv.hasCC && stdenv.cc.fallback_sdk or null != null then
stdenv.cc.fallback_sdk
else
"/no-such-path"
}" /no-such-path \
--replace "$man" /no-such-path
''
+ lib.optionalString crossCompiling ''
mkdir -p $mini/lib/perl5/cross_perl/${version}
for dir in cnf/{stub,cpan}; do
cp -r $dir/* $mini/lib/perl5/cross_perl/${version}
done
mkdir -p $mini/bin
install -m755 miniperl $mini/bin/perl
export runtimeArch="$(ls $out/lib/perl5/site_perl/${version})"
# wrapProgram should use a runtime-native SHELL by default, but
# it actually uses a buildtime-native one. If we ever fix that,
# we'll need to fix this to use a buildtime-native one.
#
# Adding the arch-specific directory is morally incorrect, as
# miniperl can't load the native modules there. However, it can
# (and sometimes needs to) load and run some of the pure perl
# code there, so we add it anyway. When needed, stubs can be put
# into $mini/lib/perl5/cross_perl/${version}.
wrapProgram $mini/bin/perl --prefix PERL5LIB : \
"$mini/lib/perl5/cross_perl/${version}:$out/lib/perl5/${version}:$out/lib/perl5/${version}/$runtimeArch"
''; # */
meta = {
homepage = "https://www.perl.org/";
description = "Standard implementation of the Perl 5 programming language";
license = lib.licenses.artistic1;
maintainers = [ ];
teams = [
lib.teams.perl
lib.teams.security-review
];
platforms = lib.platforms.all;
priority = 6; # in `buildEnv' (including the one inside `perl.withPackages') the library files will have priority over files in `perl`
mainProgram = "perl";
identifiers.cpeParts = lib.meta.cpeFullVersionWithVendor "perl" finalAttrs.version;
};
}
// lib.optionalAttrs crossCompiling rec {
crossVersion = "1.6.4";
perl-cross-src = fetchFromGitHub {
name = "perl-cross-${crossVersion}";
owner = "arsv";
repo = "perl-cross";
rev = crossVersion;
hash = "sha256-Qcysy7f887XHlq23iE5U92PhxDhpgaluITZBSdcc9Ck=";
};
patches = commonPatches ++ [
# fixes build failure due to missing d_fdopendir/HAS_FDOPENDIR configure option
# https://github.com/arsv/perl-cross/pull/159
./cross-fdopendir.patch
];
depsBuildBuild = [
buildPackages.stdenv.cc
makeWrapper
];
postUnpack = ''
unpackFile ${perl-cross-src}
chmod -R u+w ${perl-cross-src.name}
cp -R ${perl-cross-src.name}/* perl-${version}/
'';
configurePlatforms = [
"build"
"host"
"target"
];
# TODO merge setup hooks
setupHook = ./setup-hook-cross.sh;
}
)