--- /dev/null
+/* Display hostname in various forms.
+ Copyright (C) 2001 Free Software Foundation, Inc.
+ Written by Bruno Haible <haible@clisp.cons.org>, 2001.
+
+ 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., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */
+
+
+#ifdef HAVE_CONFIG_H
+# include "config.h"
+#endif
+
+#include <errno.h>
+#include <getopt.h>
+#include <stdio.h>
+#include <stdlib.h>
+#include <string.h>
+#include <locale.h>
+
+#if defined _WIN32 || defined __WIN32__
+# undef WIN32 /* avoid warning on mingw32 */
+# define WIN32
+#endif
+
+/* Get gethostname(). */
+#if HAVE_UNISTD_H
+# include <unistd.h>
+#endif
+
+/* Some systems, like early Solaris versions, lack gethostname() but
+ have uname() instead. */
+#if !HAVE_GETHOSTNAME
+# include <sys/utsname.h>
+#endif
+
+/* Get MAXHOSTNAMELEN. */
+#include <sys/param.h>
+#ifndef MAXHOSTNAMELEN
+# define MAXHOSTNAMELEN 64
+#endif
+
+/* Support for using gethostbyname(). */
+#if HAVE_GETHOSTBYNAME
+# include <sys/types.h>
+# include <sys/socket.h> /* defines AF_INET, AF_INET6 */
+# include <netinet/in.h> /* declares ntohs(), defines struct sockaddr_in */
+# if HAVE_ARPA_INET_H
+# include <arpa/inet.h> /* declares inet_ntoa(), inet_ntop() */
+# endif
+# if HAVE_IPV6
+# if defined(__APPLE__) && defined(__MACH__) /* MacOS X */
+# define in6_u __u6_addr
+# define u6_addr16 __u6_addr16
+# endif
+# endif
+# include <netdb.h> /* defines struct hostent, declares gethostbyname() */
+#endif
+
+/* Include this after <sys/socket.h>, to avoid a syntax error on BeOS. */
+#include <stdbool.h>
+
+#include "error.h"
+#include "basename.h"
+#include "xmalloc.h"
+#include "system.h"
+#include "libgettext.h"
+
+#define _(str) gettext (str)
+
+
+/* Output format. */
+static enum { default_format, short_format, long_format, ip_format } format;
+
+/* Name the program is called with. */
+const char *program_name;
+
+/* Long options. */
+static const struct option long_options[] =
+{
+ { "fqdn", no_argument, NULL, 'f' },
+ { "help", no_argument, NULL, 'h' },
+ { "ip-address", no_argument, NULL, 'i' },
+ { "long", no_argument, NULL, 'f' },
+ { "short", no_argument, NULL, 's' },
+ { "version", no_argument, NULL, 'V' },
+ { NULL, 0, NULL, 0 }
+};
+
+
+/* Prototypes for local functions. Needed to ensure compiler checking of
+ function argument counts despite of K&R C function definition syntax. */
+static void usage PARAMS ((int status))
+#if defined __GNUC__ && ((__GNUC__ == 2 && __GNUC_MINOR__ >= 5) || __GNUC__ > 2)
+ __attribute__ ((noreturn))
+#endif
+;
+static char * xgethostname PARAMS ((void));
+static void print_hostname PARAMS ((void));
+
+int
+main (argc, argv)
+ int argc;
+ char *argv[];
+{
+ int optchar;
+ bool do_help;
+ bool do_version;
+
+ /* Set program name for messages. */
+ program_name = argv[0];
+ if (strncmp (program_name, "lt-", 3) == 0)
+ program_name += 3;
+
+#ifdef HAVE_SETLOCALE
+ /* Set locale via LC_ALL. */
+ setlocale (LC_ALL, "");
+#endif
+
+ /* Set the text message domain. */
+ bindtextdomain (PACKAGE, LOCALEDIR);
+ textdomain (PACKAGE);
+
+ /* Set default values for variables. */
+ do_help = false;
+ do_version = false;
+ format = default_format;
+
+ /* Parse command line options. */
+ while ((optchar = getopt_long (argc, argv, "fhisV", long_options, NULL))
+ != EOF)
+ switch (optchar)
+ {
+ case '\0': /* Long option. */
+ break;
+ case 'f':
+ format = long_format;
+ break;
+ case 's':
+ format = short_format;
+ break;
+ case 'i':
+ format = ip_format;
+ break;
+ case 'h':
+ do_help = true;
+ break;
+ case 'V':
+ do_version = true;
+ break;
+ default:
+ usage (EXIT_FAILURE);
+ /* NOTREACHED */
+ }
+
+ /* Version information requested. */
+ if (do_version)
+ {
+ printf ("%s (GNU %s) %s\n", basename (program_name), PACKAGE, VERSION);
+ /* xgettext: no-wrap */
+ printf (_("Copyright (C) %s Free Software Foundation, Inc.\n\
+This is free software; see the source for copying conditions. There is NO\n\
+warranty; not even for MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.\n\
+"),
+ "2001");
+ printf (_("Written by %s.\n"), "Bruno Haible");
+ exit (EXIT_SUCCESS);
+ }
+
+ /* Help is requested. */
+ if (do_help)
+ usage (EXIT_SUCCESS);
+
+ /* Test for extraneous arguments. */
+ if (optind != argc)
+ error (EXIT_FAILURE, 0, _("too many arguments"));
+
+ /* Get and print the hostname. */
+ print_hostname ();
+
+ exit (EXIT_SUCCESS);
+}
+
+/* Display usage information and exit. */
+static void
+usage (status)
+ int status;
+{
+ if (status != EXIT_SUCCESS)
+ fprintf (stderr, _("Try `%s --help' for more information.\n"),
+ program_name);
+ else
+ {
+ /* xgettext: no-wrap */
+ printf (_("\
+Usage: %s [OPTION]\n\
+"), program_name);
+ printf ("\n");
+ /* xgettext: no-wrap */
+ printf (_("\
+Print the machine's hostname.\n\
+"));
+ printf ("\n");
+ /* xgettext: no-wrap */
+ printf (_("\
+Output format:\n\
+ -s, --short short host name\n\
+ -f, --fqdn, --long long host name, includes fully qualified domain name,\n\
+ and aliases\n\
+ -i, --ip-address addresses for the hostname\n\
+"));
+ printf ("\n");
+ /* xgettext: no-wrap */
+ printf (_("\
+Informative output:\n\
+ -h, --help display this help and exit\n\
+ -V, --version output version information and exit\n\
+"));
+ printf ("\n");
+ fputs (_("Report bugs to <bug-gnu-gettext@gnu.org>.\n"),
+ stdout);
+ }
+
+ exit (status);
+}
+
+/* Returns an xmalloc()ed string containing the machine's host name. */
+static char *
+xgethostname ()
+{
+#if HAVE_GETHOSTNAME
+ char hostname[MAXHOSTNAMELEN+1];
+
+ if (gethostname (hostname, MAXHOSTNAMELEN) < 0)
+ error (EXIT_FAILURE, errno, _("could not get host name"));
+ hostname[MAXHOSTNAMELEN] = '\0';
+ return xstrdup (hostname);
+#else
+ struct utsname utsname;
+
+ if (uname (&utsname) < 0)
+ error (EXIT_FAILURE, errno, _("could not get host name"));
+ return xstrdup (utsname.nodename);
+#endif
+}
+
+/* Converts an AF_INET address to a printable, presentable format.
+ BUFFER is an array with at least 15+1 bytes. ADDR is sockaddr_in. */
+#if HAVE_INET_NTOP
+# define ipv4_ntop(buffer,addr) \
+ inet_ntop (AF_INET, &addr, buffer, 15+1)
+#else
+# define ipv4_ntop(buffer,addr) \
+ strcpy (buffer, inet_ntoa (addr))
+#endif
+
+#if HAVE_IPV6
+/* Converts an AF_INET6 address to a printable, presentable format.
+ BUFFER is an array with at least 45+1 bytes. ADDR is sockaddr_in6. */
+# if HAVE_INET_NTOP
+# define ipv6_ntop(buffer,addr) \
+ inet_ntop (AF_INET6, &addr, buffer, 45+1)
+# else
+# define ipv6_ntop(buffer,addr) \
+ sprintf (buffer, "%x:%x:%x:%x:%x:%x:%x:%x", \
+ ntohs ((addr).in6_u.u6_addr16[0]), \
+ ntohs ((addr).in6_u.u6_addr16[1]), \
+ ntohs ((addr).in6_u.u6_addr16[2]), \
+ ntohs ((addr).in6_u.u6_addr16[3]), \
+ ntohs ((addr).in6_u.u6_addr16[4]), \
+ ntohs ((addr).in6_u.u6_addr16[5]), \
+ ntohs ((addr).in6_u.u6_addr16[6]), \
+ ntohs ((addr).in6_u.u6_addr16[7]))
+# endif
+#endif
+
+/* Print the hostname according to the specified format. */
+static void
+print_hostname ()
+{
+ char *hostname;
+ char *dot;
+#if HAVE_GETHOSTBYNAME
+ struct hostent *h;
+ size_t i;
+#endif
+
+ hostname = xgethostname ();
+
+ switch (format)
+ {
+ case default_format:
+ /* Print the hostname, as returned by the system call. */
+ printf ("%s\n", hostname);
+ break;
+
+ case short_format:
+ /* Print only the part before the first dot. */
+ dot = strchr (hostname, '.');
+ if (dot != NULL)
+ *dot = '\0';
+ printf ("%s\n", hostname);
+ break;
+
+ case long_format:
+ /* Look for netwide usable hostname and aliases using gethostbyname(). */
+#if HAVE_GETHOSTBYNAME
+ h = gethostbyname (hostname);
+ if (h != NULL)
+ {
+ printf ("%s\n", h->h_name);
+ if (h->h_aliases != NULL)
+ for (i = 0; h->h_aliases[i] != NULL; i++)
+ printf ("%s\n", h->h_aliases[i]);
+ }
+ else
+#endif
+ printf ("%s\n", hostname);
+ break;
+
+ case ip_format:
+ /* Look for netwide usable IP addresses using gethostbyname(). */
+#if HAVE_GETHOSTBYNAME
+ h = gethostbyname (hostname);
+ if (h != NULL && h->h_addr_list != NULL)
+ for (i = 0; h->h_addr_list[i] != NULL; i++)
+ {
+#if HAVE_IPV6
+ if (h->h_addrtype == AF_INET6)
+ {
+ char buffer[45+1];
+ ipv6_ntop (buffer, *(const struct in6_addr*) h->h_addr_list[i]);
+ printf("[%s]\n", buffer);
+ }
+ else
+#endif
+ if (h->h_addrtype == AF_INET)
+ {
+ char buffer[15+1];
+ ipv4_ntop (buffer, *(const struct in_addr*) h->h_addr_list[i]);
+ printf("[%s]\n", buffer);
+ }
+ }
+#endif
+ break;
+
+ default:
+ abort ();
+ }
+}