{
   "document": {
      "category": "csaf_security_advisory",
      "csaf_version": "2.0",
      "distribution": {
         "tlp": {
            "label": "WHITE",
            "url": "https://www.first.org/tlp/"
         }
      },
      "lang": "en",
      "notes": [
         {
            "category": "description",
            "text": "DBI versions before 1.652 for Perl allow a heap out-of-bounds write via an unvalidated numeric placeholder that sets the binder counter in preparse.\n\npreparse reserves seven output bytes per input byte, the width of the longest ':p99999' expansion. The ':N' branch parses the number with `atoi(src)` and assigns it to the binder counter with no range check, so a statement containing ':2147483648' leaves the counter negative (-2147483648 with glibc, where atoi wraps). Each following '?' then expands through `sprintf(start, \":p%d\", idx++)` to ':p-2147483648', 14 bytes with the terminating NUL where the buffer budgets 7. The placeholder limit added in 1.650 tests the counter against 99,999, which a negative counter passes.\n\nAny caller that preparses an untrusted statement into ':pN' style placeholders gets a heap out-of-bounds write that grows with the number of '?' marks following the poisoned placeholder. The '?' and '%s' return styles compare the parsed number against the expected sequence and error out, and are unaffected.",
            "title": "Vulnerability Description"
         }
      ],
      "publisher": {
         "category": "other",
         "contact_details": "gdt@cpan.org",
         "name": "giterlizzi",
         "namespace": "https://github.com/giterlizzi/"
      },
      "references": [
         {
            "category": "self",
            "summary": "CPANSA-DBI-2026-73194 JSON",
            "url": "https://raw.githubusercontent.com/giterlizzi/perl-CPANSA-CSAF/develop/csaf/white/2026/cpansa-dbi-2026-73194.json"
         },
         {
            "category": "external",
            "summary": "https://github.com/perl5-dbi/dbi/commit/29b72ae7d2a8114a734a55840bf1c45b89207809.patch",
            "url": "https://github.com/perl5-dbi/dbi/commit/29b72ae7d2a8114a734a55840bf1c45b89207809.patch"
         },
         {
            "category": "external",
            "summary": "https://github.com/perl5-dbi/dbi/security/advisories/GHSA-623j-hfpc-mrc4",
            "url": "https://github.com/perl5-dbi/dbi/security/advisories/GHSA-623j-hfpc-mrc4"
         },
         {
            "category": "external",
            "summary": "https://www.cve.org/CVERecord?id=CVE-2026-10879",
            "url": "https://www.cve.org/CVERecord?id=CVE-2026-10879"
         },
         {
            "category": "external",
            "summary": "https://www.cve.org/CVERecord?id=CVE-2026-14739",
            "url": "https://www.cve.org/CVERecord?id=CVE-2026-14739"
         },
         {
            "category": "external",
            "summary": "CVE-2026-73194 (NVD)",
            "url": "https://nvd.nist.gov/vuln/detail/CVE-2026-73194"
         }
      ],
      "title": "DBI vulnerability",
      "tracking": {
         "current_release_date": "2026-08-15T00:00:00",
         "generator": {
            "engine": {
               "name": "CSAF Perl Toolkit",
               "version": "0.26"
            }
         },
         "id": "CPANSA-DBI-2026-73194",
         "initial_release_date": "2026-08-15T00:00:00",
         "revision_history": [
            {
               "date": "2026-08-15T00:00:00",
               "number": "1",
               "summary": "First release"
            }
         ],
         "status": "final",
         "version": "1"
      }
   },
   "product_tree": {
      "branches": [
         {
            "branches": [
               {
                  "category": "product_version_range",
                  "name": "vers:cpan/<1.652",
                  "product": {
                     "name": "DBI less than 1.652",
                     "product_id": "CSAFPID-0001",
                     "product_identification_helper": {
                        "purl": "pkg:cpan/DBI"
                     }
                  }
               },
               {
                  "category": "product_version_range",
                  "name": "vers:cpan/>=1.652",
                  "product": {
                     "name": "DBI greater than or equal 1.652",
                     "product_id": "CSAFPID-0002",
                     "product_identification_helper": {
                        "purl": "pkg:cpan/DBI"
                     }
                  }
               }
            ],
            "category": "product_name",
            "name": "DBI"
         }
      ]
   },
   "vulnerabilities": [
      {
         "cve": "CVE-2026-73194",
         "cwe": {
            "id": "CWE-787",
            "name": "Out-of-bounds Write"
         },
         "notes": [
            {
               "category": "description",
               "text": "DBI versions before 1.652 for Perl allow a heap out-of-bounds write via an unvalidated numeric placeholder that sets the binder counter in preparse.\n\npreparse reserves seven output bytes per input byte, the width of the longest ':p99999' expansion. The ':N' branch parses the number with `atoi(src)` and assigns it to the binder counter with no range check, so a statement containing ':2147483648' leaves the counter negative (-2147483648 with glibc, where atoi wraps). Each following '?' then expands through `sprintf(start, \":p%d\", idx++)` to ':p-2147483648', 14 bytes with the terminating NUL where the buffer budgets 7. The placeholder limit added in 1.650 tests the counter against 99,999, which a negative counter passes.\n\nAny caller that preparses an untrusted statement into ':pN' style placeholders gets a heap out-of-bounds write that grows with the number of '?' marks following the poisoned placeholder. The '?' and '%s' return styles compare the parsed number against the expected sequence and error out, and are unaffected.",
               "title": "Vulnerability Description"
            }
         ],
         "product_status": {
            "fixed": [
               "CSAFPID-0002"
            ],
            "known_affected": [
               "CSAFPID-0001"
            ]
         }
      }
   ]
}