[LON-CAPA-cvs] cvs: loncom / lond
albertel
lon-capa-cvs@mail.lon-capa.org
Tue, 06 May 2003 21:36:42 -0000
albertel Tue May 6 17:36:42 2003 EDT
Modified files:
/loncom lond
Log:
- perl 5.8 didn't like the CHLD handler still being set in the CHLD, the pwauth children were getting reaped and we weren't getting valid returtn codes, thus unix auth on shadow systems failed
- Apache::File doesn't seem to be used
Index: loncom/lond
diff -u loncom/lond:1.125 loncom/lond:1.126
--- loncom/lond:1.125 Fri Apr 4 19:11:34 2003
+++ loncom/lond Tue May 6 17:36:42 2003
@@ -2,7 +2,7 @@
# The LearningOnline Network
# lond "LON Daemon" Server (port "LOND" 5663)
#
-# $Id: lond,v 1.125 2003/04/05 00:11:34 foxr Exp $
+# $Id: lond,v 1.126 2003/05/06 21:36:42 albertel Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -57,7 +57,7 @@
use IO::Socket;
use IO::File;
-use Apache::File;
+#use Apache::File;
use Symbol;
use POSIX;
use Crypt::IDEA;
@@ -73,7 +73,7 @@
my $status='';
my $lastlog='';
-my $VERSION='$Revision: 1.125 $'; #' stupid emacs
+my $VERSION='$Revision: 1.126 $'; #' stupid emacs
my $remoteVERSION;
my $currenthostid;
my $currentdomainid;
@@ -536,6 +536,8 @@
} else {
# Child can *not* return from this subroutine.
$SIG{INT} = 'DEFAULT'; # make SIGINT kill us as it did before
+ $SIG{CHLD} = 'DEFAULT'; #make this default so that pwauth returns
+ #don't get intercepted
$SIG{USR1}= \&logstatus;
$SIG{ALRM}= \&timeout;
$lastlog='Forked ';