diff options
| author | Dag-Erling Smørgrav <des@FreeBSD.org> | 2005-06-20 06:52:08 +0000 |
|---|---|---|
| committer | Dag-Erling Smørgrav <des@FreeBSD.org> | 2005-06-20 06:52:08 +0000 |
| commit | 35aef96de59118af702d329f9afabf36ffb11068 (patch) | |
| tree | 57d23e34ca11f81433d97adee124c38f17f42fee /net/p5-Net-Server | |
| parent | be4add44a9b3b6242730972cec5bddf0a4c306cd (diff) | |
| download | ports-35aef96de59118af702d329f9afabf36ffb11068.tar.gz ports-35aef96de59118af702d329f9afabf36ffb11068.zip | |
Notes
Diffstat (limited to 'net/p5-Net-Server')
| -rw-r--r-- | net/p5-Net-Server/files/patch-set_ugid | 24 |
1 files changed, 24 insertions, 0 deletions
diff --git a/net/p5-Net-Server/files/patch-set_ugid b/net/p5-Net-Server/files/patch-set_ugid new file mode 100644 index 000000000000..0fa1327d9a55 --- /dev/null +++ b/net/p5-Net-Server/files/patch-set_ugid @@ -0,0 +1,24 @@ +--- lib/Net/Server/Daemonize.pm.orig Mon Jun 20 08:33:05 2005 ++++ lib/Net/Server/Daemonize.pm Mon Jun 20 08:34:31 2005 +@@ -200,8 +200,8 @@ + sub set_uid { + my $uid = get_uid( shift() ); + $< = $> = $uid; +- if( $< != $uid ){ +- die "Couldn't become uid \"$uid\"\n"; ++ if( $< == $uid ){ ++ return 1; + } + my $result = POSIX::setuid( $uid ); + if( ! defined($result) ){ +@@ -218,8 +218,8 @@ + $) = $gids; + $( = $gid; + my $result = (split(/\s+/,$())[0]; +- if( $result != $gid ){ +- die "Couldn't become gid \"$gid\" ($result)\n"; ++ if( $result == $gid ){ ++ return 1; + } + POSIX::setgid( $gid ) || die "Couldn't POSIX::setgid to \"$gid\" [$!]\n"; + return 1; |