mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-01-12 16:23:57 +00:00
Code Issues Releases Activity

(main): Eliminate arbitrary limit on

Browse Source
This commit is contained in:
Richard M. Stallman 1999-01-16 21:44:56 +00:00
parent b6a98c5219
commit 40beb971f4
1 changed files with 18 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

22
lib-src/emacsserver.c
View File

@ -213,7 +213,8 @@ main (argc, argv)
int argc;
char **argv;
{
char system_name[32];
char *system_name;
int system_name_length;
int s, infd;
#ifdef SOCKLEN_TYPE
SOCKLEN_TYPE fromlen;
@ -250,9 +251,22 @@ main (argc, argv)
}
server.sun_family = AF_UNIX;
#ifndef SERVER_HOME_DIR
gethostname (system_name, sizeof (system_name));
/* system_name must be null-terminated string */
system_name[sizeof (system_name) - 1] = '\0';
system_name_length = 32;
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 (unlink (server.sun_path) == -1 && errno != ENOENT)