[Commit] rrserver clients.5c,1.4,1.5 dispatch.5c,1.27,1.28 main.5c,1.4,1.5 net.5c,1.2,1.3 server.5c,1.14,1.15

[Keith Packard]

Committed by: keithp

Update of /local/src/CVS/rrserver
In directory home.keithp.com:/tmp/cvs-serv5098

Modified Files:
	clients.5c dispatch.5c main.5c net.5c server.5c 
Log Message:
Use stderr for messages so that crashes will also be logged

Index: clients.5c
===================================================================
RCS file: /local/src/CVS/rrserver/clients.5c,v
retrieving revision 1.4
retrieving revision 1.5
diff -u -d -r1.4 -r1.5
--- clients.5c	30 May 2003 21:39:11 -0000	1.4
+++ clients.5c	26 Jun 2003 09:18:28 -0000	1.5
@@ -89,7 +89,7 @@
 	}
 
 	public void dispose (&Client c) {
-	    printf ("Client closed %v\n", c.user);
+	    File::fprintf (stderr, "Client closed %v\n", c.user);
 	    if (c.user != User.none)
 		Clients::server_send ("NOTICE QUIT %s\n", c.user.username);
 	    Array::remove (&clients, &c);
@@ -97,7 +97,7 @@
 	}
 
 	public void print (&Client c) {
-	    printf ("%v\n", c);
+	    File::fprintf (stderr, "%v\n", c);
 	}
 	
 	public void print_client (&Client c, &Client o) {

Index: dispatch.5c
===================================================================
RCS file: /local/src/CVS/rrserver/dispatch.5c,v
retrieving revision 1.27
retrieving revision 1.28
diff -u -d -r1.27 -r1.28
--- dispatch.5c	26 Jun 2003 09:07:12 -0000	1.27
+++ dispatch.5c	26 Jun 2003 09:18:28 -0000	1.28
@@ -608,7 +608,7 @@
 		}
 	    };
 
-	    printf ("New client\n");
+	    File::fprintf (stderr, "New client\n");
 
 	    for (;;) {
 		try {

Index: main.5c
===================================================================
RCS file: /local/src/CVS/rrserver/main.5c,v
retrieving revision 1.4
retrieving revision 1.5
diff -u -d -r1.4 -r1.5
--- main.5c	26 Jun 2003 09:07:12 -0000	1.4
+++ main.5c	26 Jun 2003 09:18:28 -0000	1.5
@@ -33,11 +33,12 @@
 	    for (int i = 0; i < dim (argv); i++)
 		switch (argv[i]) {
 		case "--logfile":
-		    File::reopen (argv[i+1], "a", stdout);
+		    File::reopen (argv[i+1], "a", stderr);
 		    break;
 		}
+	    File::setbuffer (stderr, 1);
 	    file    f = Net::create (RR::Port);
-	    printf ("RR server started on port %d.\n", RR::Port);
+	    File::fprintf (stderr, "RR server started on port %d.\n", RR::Port);
     	    Net::listen (Dispatch::client, f);
 	}
     }

Index: net.5c
===================================================================
RCS file: /local/src/CVS/rrserver/net.5c,v
retrieving revision 1.2
retrieving revision 1.3
diff -u -d -r1.2 -r1.3
--- net.5c	29 May 2003 17:46:29 -0000	1.2
+++ net.5c	26 Jun 2003 09:18:28 -0000	1.3
@@ -40,7 +40,7 @@
 	    for (;;)
 	    {
 		file	a = Sockets::accept (f);
-		printf ("accept succeeds\n");
+		File::fprintf (stderr, "accept succeeds\n");
 		fork accept (a);
 	    }
 	}

Index: server.5c
===================================================================
RCS file: /local/src/CVS/rrserver/server.5c,v
retrieving revision 1.14
retrieving revision 1.15
diff -u -d -r1.14 -r1.15
--- server.5c	14 Jun 2003 07:00:41 -0000	1.14
+++ server.5c	26 Jun 2003 09:18:28 -0000	1.15
@@ -41,12 +41,12 @@
 
     public bool lock () {
 	Mutex::acquire (server_mutex);
-#	printf ("lock %v\n", Thread::current());
+#	File::fprintf (stderr, "lock %v\n", Thread::current());
 	return true;
     }
 
     public bool unlock () {
-#	printf ("unlock %v\n", Thread::current());
+#	File::fprintf (stderr, "unlock %v\n", Thread::current());
 	Mutex::release (server_mutex);
 	return true;
     }