Mercurial > hg > octave-jordi > gnulib-hg
view lib/gethostname.c @ 439:a9015d648b2e
No longer include safe-l?stat.h.
author | Jim Meyering <jim@meyering.net> |
---|---|
date | Fri, 19 May 1995 15:23:18 +0000 |
parents | f8dce34b5ab0 |
children | 21add36c3efa 242f0fe39aa7 |
line wrap: on
line source
/* gethostname emulation for SysV and POSIX.1. Copyright (C) 1992 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 the Free Software Foundation; either version 2, or (at your option) any later version. This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details. You should have received a copy of the GNU General Public License along with this program; if not, write to the Free Software Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. */ /* David MacKenzie <djm@gnu.ai.mit.edu> */ #ifdef HAVE_UNAME #include <sys/utsname.h> #endif /* Put up to LEN chars of the host name into NAME. Null terminate it if the name is shorter than LEN. Return 0 if ok, -1 if error. */ int gethostname (name, len) char *name; int len; { #ifdef HAVE_UNAME struct utsname uts; if (uname (&uts) == -1) return -1; if (len > sizeof (uts.nodename)) { /* More space than we need is available. */ name[sizeof (uts.nodename)] = '\0'; len = sizeof (uts.nodename); } strncpy (name, uts.nodename, len); #else strcpy (name, ""); /* Hardcode your system name if you want. */ #endif return 0; }