sslug-teknik team mailing list archive

[Kristian.Hogh@xxxxxx]

Hej.

AFAIK, kan shell-scripts ikke være SUID.
(Dvs. det kan de godt, men det virker ikke)
Der findes noget der hedder suid-perl eller sår'n.

Kristian Høgh.


-----Original Message-----
From: Jens Lauterbach [mailto:jeans@xxxxxx]
Sent: Tuesday, May 29, 2001 6:18 PM
To: sslug-teknik@xxxxxxxx
Subject: [TEKNIK] can't do setuid ??? why not?


hej

hvorfor kan jeg ikke udføre min perlscripts setuid, når jeg har sat s-bit

scriptet skal køre som root (setuid), idet der laves icmp ping

meeen

./sg_ping.cgi
Can't do setuid

rettighederne ser således ud:

-rwsr-xr-x    1 root     w3traf        417 Mar  3 13:32 sg_ping.cgi*

jeg har kunnet gøre det før under en anden linux
Er det noget med perlopsætningen eller noget andet??

scriptet ser iøvrigt således ud:

----------------------------------
#!/usr/bin/perl
use Net::Ping;
print "Content-type: text/html\n\n";
$mask = "192.168.1.";
$wait = 0.001;
$bytes = 1;
       print "<table border=1>\n";
  $p = Net::Ping->new("icmp", $wait);
  for ($i = 1;$i < 255;$i++) {
        $host = $mask."$i";
        if ($p->ping($host)) {
        print "<tr><td valign=top>$host</td><td>is alive.</td></tr>\n";
        }
  }
           $p->close();
       print "</table>";
exit(0);
-----------------------------------

---------------
Jens Lauterbach
jeans@xxxxxx
Roskilde University