SecvalisbySYSDEVOPS.EU
Katalog CVE
EnglishPolski

CVE-2026-85644

WysokieCVSS 7.5
Opublikowano: Zaktualizowano: Przetłumaczono: NVD NIST

Prawdopodobieństwo exploitacji (EPSS)

Niskie ryzyko
0.39%

Percentyl 31 - wyżej niż 31% wszystkich znanych CVE

Streszczenie

Biblioteka XS::Parse::Infix w wersjach 0.40–0.49 dla Perla błędnie traktuje liczby jako referencje do tablicy. Funkcja opakowująca używa SvRV() zamiast SvROK(), przez co nie sprawdza poprawnie typu argumentu i może doprowadzić do segfaultu lub dereferencji kontrolowanego adresu. Aplikacja przetwarzająca dane wejściowe (np. z JSON) może pozwolić atakującemu na wykonanie kodu lub zawieszenie interpretera.

Ocena ryzyka

Atakujący może doprowadzić do awarii (segfault) lub potencjalnie przejąć kontrolę nad wykonaniem kodu poprzez dostarczenie spreparowanej liczby w liście argumentów. Wpływa to na poufność, integralność i dostępność aplikacji korzystających z tej biblioteki.

Rekomendacja

Zaktualizuj bibliotekę XS::Parse::Infix do wersji nowszej niż 0.49, jeśli jest dostępna, lub unikaj przekazywania niezaufanych danych do operatorów listowych. Rozważ zastosowanie walidacji typów po stronie aplikacji.

Powiązane podatności

Oryginalny opis (angielski, źródło NVD)

XS::Parse::Infix versions from 0.40 through 0.49 for Perl treat a number as an array reference. The wrapper function XS::Parse::Infix generates for a list-associative infix operator checks whether arguments are array references, but it tests using SvRV() rather than SvROK(). SvRV() reads a union slot that only holds a referent once SvROK(sv) is true, so the guard never validates that it is a reference. For an IV or NV that slot holds the number itself, SvRV() returns the caller's value and SvTYPE() dereferences it at offset 12. This will generally result in a segmentation fault. An application that hands the wrapper a list built from decoded input (for example, from JSON) lets whoever supplies a number in that list choose the address that the interpreter dereferences. An ordinary string's byte 12 is rarely SVt_PVAV so the guard croaks by luck, but an attacker-crafted string carrying 0x0b there passes, and the buffer is then used as an AV head, with AvARRAY taken from bytes 16-23 and its entries pushed onto the Perl stack as live SVs. A simple proof-of-concept uses the zip operator: use Syntax::Operator::Zip 'zip'; my @args = ([1], 2); zip(@args);

Dane podatności pochodzą z NVD (NIST) · CISA KEV · EPSS