{"id":"OESA-2026-4188","summary":"perl-DBI security update","details":"The DBI is the standard database interface module for Perl. It defines a set of methods, variables and conventions that provide a consistent database interface independent of the actual database being used. It is important to remember that the DBI is just an interface. The DBI is a layer of "glue" between an application and one or more database driver modules. It is the driver modules which do most of the real work. The DBI provides a standard interface and framework for the drivers to operate within.\r\n\r\nSecurity Fix(es):\n\nDBI versions before 1.653 for Perl load arbitrary modules via unvalidated dbm_type and dbm_mldbm attributes in DBD::DBM.\n\nDBD::DBM passes the dbm_type and dbm_mldbm connect attributes to require without checking that the value names a module. require treats a path-shaped string as a literal filename and does not consult @INC, so the attribute chooses the file that Perl loads and runs.\n\nThe MLDBM::Serializer:: prefix that DBD::DBM prepends to dbm_mldbm is not a boundary: only the :: separators are rewritten to /, so a value containing / traverses out of the serializer directory. The value is also assigned to $MLDBM::Serializer, which MLDBM requires the same way when it ties the table.\n\nA caller that lets an untrusted party influence either attribute, for example through a DSN fragment or a parameter that selects a storage backend, runs the file-scope code of whatever module the value names.\n\nFor example,\n\n    my $dsn = "dbi:DBM:f_dir=/var/db;dbm_type=../../Untrusted.pm"\n    my $dbh = DBI->connect( $dsn );\n\nNote that DBD::Gofer forwards connect attributes to the server side, and DBI::ProxyServer checks only that a DSN starts with a driver prefix.(CVE-2026-78030)","modified":"2026-10-01T02:00:07.327483333Z","published":"2026-09-30T13:47:26Z","upstream":["CVE-2026-78030"],"database_specific":{"severity":"Critical"},"references":[{"type":"ADVISORY","url":"https://www.openeuler.org/zh/security/security-bulletins/detail/?id=openEuler-SA-2026-4188"},{"type":"ADVISORY","url":"https://nvd.nist.gov/vuln/detail/CVE-2026-78030"}],"affected":[{"package":{"name":"perl-DBI","ecosystem":"openEuler:22.03-LTS-SP4","purl":"pkg:rpm/openEuler/perl-DBI&distro=openEuler-22.03-LTS-SP4"},"ranges":[{"type":"ECOSYSTEM","events":[{"introduced":"0"},{"fixed":"1.643-10.oe2203sp4"}]}],"ecosystem_specific":{"x86_64":["perl-DBI-1.643-10.oe2203sp4.x86_64.rpm","perl-DBI-debuginfo-1.643-10.oe2203sp4.x86_64.rpm","perl-DBI-debugsource-1.643-10.oe2203sp4.x86_64.rpm"],"aarch64":["perl-DBI-1.643-10.oe2203sp4.aarch64.rpm","perl-DBI-debuginfo-1.643-10.oe2203sp4.aarch64.rpm","perl-DBI-debugsource-1.643-10.oe2203sp4.aarch64.rpm"],"noarch":["perl-DBI-help-1.643-10.oe2203sp4.noarch.rpm"],"src":["perl-DBI-1.643-10.oe2203sp4.src.rpm"]},"database_specific":{"source":"https://repo.openeuler.org/security/data/osv/OESA-2026-4188.json"}}],"schema_version":"1.9.0","severity":[{"type":"CVSS_V3","score":"CVSS:3.1/AV:N/AC:L/PR:N/UI:N/S:U/C:H/I:H/A:H"}]}