# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 916523110 0
# Node ID c0b0893dd5a6152e46686525f884355dfd91f262
# Parent  33b162fe450738bc940a96a811db0c7fb1a3a37d
(main): Eliminate arbitrary limit on length of system_name.
(xmalloc): Define unconditionally.

diff -r 33b162fe4507 -r c0b0893dd5a6 lib-src/emacsclient.c
--- a/lib-src/emacsclient.c	Sat Jan 16 21:44:56 1999 +0000
+++ b/lib-src/emacsclient.c	Sat Jan 16 21:45:10 1999 +0000
@@ -146,7 +146,6 @@
   return copy;
 }
 
-#ifdef C_ALLOCA
 /* Like malloc but get fatal error if memory is exhausted.  */
 
 char *
@@ -161,7 +160,6 @@
   }
   return result;
 }
-#endif /* C_ALLOCA */
 
 #if !defined (HAVE_SOCKETS) && !defined (HAVE_SYSVIPC)
 
@@ -194,7 +192,8 @@
      int argc;
      char **argv;
 {
-  char system_name[32];
+  char *system_name;
+  int system_name_length;
   int s, i;
   FILE *out, *in;
   struct sockaddr_un server;
@@ -223,10 +222,22 @@
 #ifndef SERVER_HOME_DIR
   {
     struct stat statbfr;
+    system_name_length = 32;
 
-    gethostname (system_name, sizeof (system_name));
-    /* system_name must be null-terminated string */
-    system_name[sizeof (system_name) - 1] = '\0';
+    while (1)
+      {
+	system_name = (char *) xmalloc (system_name_length + 1);
+
+	/* system_name must be null-terminated string.  */
+	system_name[system_name_length] = '\0';
+
+ 	if (gethostname (system_name, system_name_length) == 0)
+	  break;
+
+	free (system_name);
+	system_name_length *= 2;
+      }
+
     sprintf (server.sun_path, "/tmp/esrv%d-%s", geteuid (), system_name);
 
     if (stat (server.sun_path, &statbfr) == -1)