{
    "dataType": "CVE_RECORD",
    "dataVersion": "5.2",
    "cveMetadata": {
        "cveId": "CVE-2026-73194",
        "assignerOrgId": "9b29abf9-4ab0-4765-b253-1875cd9b441e",
        "state": "PUBLISHED",
        "assignerShortName": "CPANSec",
        "dateReserved": "2026-08-11T11:58:19.137Z",
        "datePublished": "2026-08-15T12:09:22.962Z",
        "dateUpdated": "2026-08-17T20:29:56.764Z"
    },
    "containers": {
        "cna": {
            "affected": [
                {
                    "collectionURL": "https://cpan.org/modules",
                    "defaultStatus": "unaffected",
                    "modules": [
                        "DBI"
                    ],
                    "packageName": "DBI",
                    "packageURL": "pkg:cpan/DBI",
                    "programFiles": [
                        "DBI.xs"
                    ],
                    "programRoutines": [
                        {
                            "name": "preparse"
                        }
                    ],
                    "repo": "https://github.com/perl5-dbi/dbi",
                    "versions": [
                        {
                            "lessThan": "1.652",
                            "status": "affected",
                            "version": "0",
                            "versionType": "custom"
                        }
                    ]
                }
            ],
            "credits": [
                {
                    "lang": "en",
                    "type": "finder",
                    "value": "Harsh Raj Singhania"
                }
            ],
            "descriptions": [
                {
                    "lang": "en",
                    "value": "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."
                }
            ],
            "problemTypes": [
                {
                    "descriptions": [
                        {
                            "cweId": "CWE-1284",
                            "description": "CWE-1284 Improper Validation of Specified Quantity in Input",
                            "lang": "en",
                            "type": "CWE"
                        }
                    ]
                },
                {
                    "descriptions": [
                        {
                            "cweId": "CWE-787",
                            "description": "CWE-787 Out-of-bounds Write",
                            "lang": "en",
                            "type": "CWE"
                        }
                    ]
                }
            ],
            "providerMetadata": {
                "orgId": "9b29abf9-4ab0-4765-b253-1875cd9b441e",
                "shortName": "CPANSec",
                "dateUpdated": "2026-08-15T12:09:22.962Z"
            },
            "references": [
                {
                    "tags": [
                        "vendor-advisory"
                    ],
                    "url": "https://github.com/perl5-dbi/dbi/security/advisories/GHSA-623j-hfpc-mrc4"
                },
                {
                    "tags": [
                        "patch"
                    ],
                    "url": "https://github.com/perl5-dbi/dbi/commit/29b72ae7d2a8114a734a55840bf1c45b89207809.patch"
                },
                {
                    "tags": [
                        "related"
                    ],
                    "url": "https://www.cve.org/CVERecord?id=CVE-2026-14739"
                },
                {
                    "tags": [
                        "related"
                    ],
                    "url": "https://www.cve.org/CVERecord?id=CVE-2026-10879"
                }
            ],
            "solutions": [
                {
                    "lang": "en",
                    "value": "Upgrade to DBI 1.652 or later."
                }
            ],
            "source": {
                "discovery": "UNKNOWN"
            },
            "title": "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",
            "workarounds": [
                {
                    "lang": "en",
                    "value": "For deployments that cannot be upgraded, limit SQL statements to 99,999 placeholders."
                }
            ],
            "x_generator": {
                "engine": "cpansec-cna-tool 0.1"
            }
        },
        "adp": [
            {
                "metrics": [
                    {
                        "cvssV3_1": {
                            "scope": "UNCHANGED",
                            "version": "3.1",
                            "baseScore": 9.1,
                            "attackVector": "NETWORK",
                            "baseSeverity": "CRITICAL",
                            "vectorString": "CVSS:3.1/AV:N/AC:L/PR:N/UI:N/S:U/C:H/I:N/A:H",
                            "integrityImpact": "NONE",
                            "userInteraction": "NONE",
                            "attackComplexity": "LOW",
                            "availabilityImpact": "HIGH",
                            "privilegesRequired": "NONE",
                            "confidentialityImpact": "HIGH"
                        }
                    },
                    {
                        "other": {
                            "type": "ssvc",
                            "content": {
                                "timestamp": "2026-08-17T20:29:15.870047Z",
                                "id": "CVE-2026-73194",
                                "options": [
                                    {
                                        "Exploitation": "none"
                                    },
                                    {
                                        "Automatable": "yes"
                                    },
                                    {
                                        "Technical Impact": "partial"
                                    }
                                ],
                                "role": "CISA Coordinator",
                                "version": "2.0.3"
                            }
                        }
                    }
                ],
                "title": "CISA ADP Vulnrichment",
                "providerMetadata": {
                    "orgId": "134c704f-9b21-4f2e-91b3-4a467353bcc0",
                    "shortName": "CISA-ADP",
                    "dateUpdated": "2026-08-17T20:29:56.764Z"
                }
            }
        ]
    }
}