Fix llng-fastcgi-server could fail to setgid (#1810)

6 years ago · 2fa7efcaf3
parent c325c55e5c
commit 2fa7efcaf3
1 changed files with 4 additions and 4 deletions
--- a/fastcgi-server/sbin/llng-fastcgi-server
+++ b/fastcgi-server/sbin/llng-fastcgi-server
@ -44,13 +44,13 @@ GetOptions(
 );

 if ($group) {
-    my $grp = getgrnam($group) or warn "Can't change uid to $group";
-    POSIX::setgid($grp);
+    my $grp = getgrnam($group) or die "Can't change uid to $group";
+    POSIX::setgid($grp) or die "setgid: $!";
 }

 if ($user) {
-    my $uid = getpwnam($user) or warn "Can't change uid to $user";
-    POSIX::setuid($uid);
+    my $uid = getpwnam($user) or die "Can't change uid to $user";
+    POSIX::setuid($uid) or die "setuid: $!";
 }

 unless ($>) {