Perlscript mit Rootrechten
Nils Juenemann
nils at ilmenau-network.de
Die Mar 7 18:23:13 CET 2000
Lutz Donnerhacke wrote:
> Du möchtest einen Wrapper für Dein Perl Script schreiben, der folgender-
> maßen aussieht und der +s ist.
nils at extreme:~ > wrapper testprg
Insecure $ENV{PATH} while running setuid at /home/nils/testprg line 2.
Programm wird nicht ausgefuehrt.
nils at extreme:~ > cat testprg
#!/usr/bin/perl
system("ls /root");
Wenn ich die Shellvariablen PATH und IFS auskommentiere funktioniert es
allerdings.
const char pathtoscript[] = "/home/nils/";
char * const enviroment[] = {
/* "PATH=/bin:/sbin:/usr/bin:/usr/sbin",
"IFS=' \t\r\n'", */
"SHELL=/bin/sh",
NULL
};
Gruss
nils
--
Hi! I'm a .signature virus! Copy me into you .signature to help me
spread!