DBD::Pg version 3.21.0 for Perl has a heap out-of-bounds write in quote_float

{
  "dataType": "CVE_RECORD",
  "dataVersion": "5.2",
  "cveMetadata": {
    "cveId": "CVE-2026-78183",
    "assignerOrgId": "9b29abf9-4ab0-4765-b253-1875cd9b441e",
    "assignerShortName": "CPANSec",
    "dateUpdated": "2026-08-23T19:53:18.185Z",
    "dateReserved": "2026-08-23T16:38:31.813Z",
    "datePublished": "2026-08-23T19:53:18.185Z",
    "state": "PUBLISHED"
  },
  "containers": {
    "cna": {
      "providerMetadata": {
        "orgId": "9b29abf9-4ab0-4765-b253-1875cd9b441e",
        "shortName": "CPANSec",
        "dateUpdated": "2026-08-23T19:53:18.185Z"
      },
      "title": "DBD::Pg version 3.21.0 for Perl has a heap out-of-bounds write in quote_float",
      "descriptions": [
        {
          "lang": "en",
          "value": "DBD::Pg version 3.21.0 for Perl has a heap out-of-bounds write in quote_float.\n\nquote_float() allocates the length of the string + 1, which is the size of the bare numeric symbol plus NULL.  But for special literals NaN, Inf, +Inf, -Inf, Infinity, +Infinity, -Infinity it emits the literal surrounded by quotes plus NULL, which is length + 3 bytes. Every recognised literal (case-insensitive) overflows by 2 bytes, a single quote and a NULL.\n\nThis can be reached by the $dbh->quote method, for example\n\n    $dbh->quote( \"Infinity\", DBI::SQL_NUMERIC ).\n\nThis regression was introduced in 3.21.0 by the quote.c rewrite."
        }
      ],
      "affected": [
        {
          "collectionURL": "https://cpan.org/modules",
          "packageName": "DBD-Pg",
          "modules": [
            "DBD::Pg"
          ],
          "programFiles": [
            "quote.c"
          ],
          "programRoutines": [
            {
              "name": "quote_float"
            }
          ],
          "repo": "https://github.com/bucardo/dbdpg",
          "defaultStatus": "unaffected",
          "versions": [
            {
              "version": "3.21.0",
              "status": "affected",
              "versionType": "custom"
            }
          ]
        }
      ],
      "problemTypes": [
        {
          "descriptions": [
            {
              "lang": "en",
              "description": "CWE-787 Out-of-bounds Write",
              "cweId": "CWE-787",
              "type": "CWE"
            }
          ]
        }
      ],
      "references": [
        {
          "url": "https://github.com/bucardo/dbdpg/security/advisories/GHSA-785p-fw3v-r822",
          "tags": [
            "vendor-advisory"
          ]
        },
        {
          "url": "https://metacpan.org/release/TURNSTEP/DBD-Pg-3.21.1/source/Changes",
          "tags": [
            "release-notes"
          ]
        },
        {
          "url": "https://github.com/bucardo/dbdpg/commit/6d6f47ed2403cda55c82b1bad56e388ba7390065.patch",
          "tags": [
            "patch"
          ]
        },
        {
          "url": "https://github.com/bucardo/dbdpg/commit/adacf1de872326a465e13f9e4281a674ebcd227e",
          "tags": [
            "related"
          ]
        }
      ],
      "solutions": [
        {
          "lang": "en",
          "value": "Upgrade to version 3.21.1 or later."
        }
      ]
    }
  }
}