loncom/loncnew - diff

Return to loncnew CVS log

Up to [LON-CAPA] / loncom

version 1.42, 2004/02/17 09:43:21	version 1.43, 2004/02/17 15:09:08
Line 263 sub SocketTimeout {	Line 263 sub SocketTimeout {
Debug(0, " SocketTimeout called: ");	Debug(0, " SocketTimeout called: ");
$Socket->Dump();	$Socket->Dump();
if(exists($ActiveTransactions{$Socket})) {	if(exists($ActiveTransactions{$Socket})) {
FailTransaction($ActiveTransactions{$Socket});	FailTransaction($ActiveTransactions{$Socket});
}	}
KillSocket($Socket); # A transaction timeout also counts as	KillSocket($Socket); # A transaction timeout also counts as
# a connection failure:	# a connection failure:
Line 959 sub LondWritable {	Line 959 sub LondWritable {
# so that the writing states are actually NO-OPs.	# so that the writing states are actually NO-OPs.

if ($Socket->Writable() != 0) {	if ($Socket->Writable() != 0) {
# The write resulted in an error.	# The write resulted in an error.
# We'll treat this as if the socket got disconnected:	# We'll treat this as if the socket got disconnected:
Log("WARNING", "Connection to ".$RemoteHost.	Log("WARNING", "Connection to ".$RemoteHost.
" has been disconnected");	" has been disconnected");
if(exists($ActiveTransactions{$Socket})) {	if(exists($ActiveTransactions{$Socket})) {
FailTransaction($ActiveTransactions{$Socket});	FailTransaction($ActiveTransactions{$Socket});
}	}
$Watcher->cancel();	$Watcher->cancel();
KillSocket($Socket);	KillSocket($Socket);
return;	return;
}	}