--- loncom/Attic/lonc	2003/07/23 16:52:30	1.51
+++ loncom/Attic/lonc	2003/08/29 18:25:01	1.54
@@ -5,7 +5,7 @@
 # provides persistent TCP connections to the other servers in the network
 # through multiplexed domain sockets
 #
-# $Id: lonc,v 1.51 2003/07/23 16:52:30 bowersj2 Exp $
+# $Id: lonc,v 1.54 2003/08/29 18:25:01 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -124,7 +124,7 @@ close(CONFIG);
 %childatt               = ();       # number of attempts to start server
                                     # for ID
 
-$childmaxattempts=5;
+$childmaxattempts=15;
 
 # ---------------------------------------------------- Fork once and dissociate
 &status("Fork and dissociate");
@@ -638,7 +638,7 @@ sub handle {
             $request="enc:$cmdlength:$encrequest";
         }
 # --------------------------------------------------------------- Main exchange
-	$answer = londtransaction($remotesock, $request, 300);
+	$answer = londtransaction($remotesock, $request, 60);
 
 	if($DEBUG) { 
 	    &logthis("<font color=green> Request data exchange complete");
@@ -759,8 +759,7 @@ sub openremote {
 
     sleep 5;
     &status("Ponging $conserver");
-    print $remotesock "pong\n";
-    $answer=<$remotesock>;
+    $answer= londtransaction($remotesock,"pong",60);
     chomp($answer);
     if ($answer!~/^$conserver/) {
 	&logthis("Pong reply: >$answer<");
@@ -768,8 +767,7 @@ sub openremote {
 # ----------------------------------------------------------- Initialize cipher
 
     &status("Initialize cipher");
-    print $remotesock "ekey\n";
-    my $buildkey=<$remotesock>;
+    my $buildkey=londtransaction($remotesock,"ekey",60);
     my $key=$conserver.$perlvar{'lonHostID'};
     $key=~tr/a-z/A-Z/;
     $key=~tr/G-P/0-9/;
@@ -1151,12 +1149,12 @@ Learner B<H> solves a problem on server
 B<H>'s Home Server, so this information gets forwarded to B<E>, where
 the records of H are updated.
 
-=head2 lond, lonc, lonnet
+=head2 lond, lonc, and lonnet
 
 =begin latex
 
 \begin{figure}
-\includegraphics[width=0.75\paperwidth,keepaspectratio]{LONCAPA_Network_Diagram2}
+\includegraphics[width=0.65\paperwidth,keepaspectratio]{LONCAPA_Network_Diagram2}
   \caption{\label{Overview_Of_Network_Communication}Overview of
 Network Communication} \end{figure}
 
@@ -1428,9 +1426,9 @@ be copied over using the same mechanism
 B<D7>, which represents steps Steps B<U4a> through B<U6> in the
 replication figure.
 
-=head2 Load Balancing X<load balancing>
+=head2 Load Balancing 
 
-C<lond> provides a function to query the server's current loadavg. As
+X<load balancing>C<lond> provides a function to query the server's current loadavg. As
 a configuration parameter, one can determine the value of loadavg,
 which is to be considered 100%, for example, 2.00.