Mercurial > hg > octave-lojdl > gnulib-hg

changeset 784:03b73b3cff0d

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Thu Oct 31 19:32:32 1996 Miles Bader <miles@gnu.ai.mit.edu> [ENAMETOOLONG] (xgethostname): If gethostname returns an error other than buffer overflow, exit with an error message instead of allocating infinite amounts of space. [!EXIT_FAILURE] (EXIT_FAILURE): New macro. <errno.h>: New include. [!errno] (errno): New declaration.
author Jim Meyering <jim@meyering.net>
date Tue, 05 Nov 1996 04:38:41 +0000
parents 5fe97b3bcfd6
children b7fb2ae455ad
files lib/xgethostname.c
diffstat 1 files changed, 17 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lib/xgethostname.c
+++ b/lib/xgethostname.c
@@ -1,5 +1,5 @@
 /* xgethostname.c -- return current hostname with unlimited length
-   Copyright (C) 1992 Free Software Foundation, Inc.
+   Copyright (C) 1992, 1996 Free Software Foundation, Inc.
 
    This program is free software; you can redistribute it and/or modify
    it under the terms of the GNU General Public License as published by
@@ -23,6 +23,17 @@
 
 #include <sys/types.h>
 
+#include <errno.h>
+#ifndef errno
+extern int errno;
+#endif
+
+#include "error.h"
+
+#ifndef EXIT_FAILURE
+# define EXIT_FAILURE 1
+#endif
+
 int gethostname ();
 char *xmalloc ();
 char *xrealloc ();
@@ -42,10 +53,15 @@
   hostname = xmalloc (size);
   while (1)
     {
+      errno = 0;
       hostname[size - 1] = '\0';
       err = gethostname (hostname, size);
       if (err == 0 && hostname[size - 1] == '\0')
 	break;
+#ifdef ENAMETOOLONG
+      else if (err != 0 && errno != ENAMETOOLONG && errno != 0)
+	error (EXIT_FAILURE, errno, "gethostname");
+#endif
       size *= 2;
       hostname = xrealloc (hostname, size);
     }