xref: /src/usr.bin/getnameinfo/getnameinfo.c

/*	$NetBSD: getnameinfo.c,v 1.8 2025/02/06 20:59:00 christos Exp $	*/

/*
 * Copyright (c) 2025 The NetBSD Foundation, Inc.
 * All rights reserved.
 *
 * This code is derived from software contributed to The NetBSD Foundation
 * by Attaullah Ansari.
 *
 * Redistribution and use in source and binary forms, with or without
 * modification, are permitted provided that the following conditions
 * are met:
 * 1. Redistributions of source code must retain the above copyright
 *    notice, this list of conditions and the following disclaimer.
 * 2. Redistributions in binary form must reproduce the above copyright
 *    notice, this list of conditions and the following disclaimer in
 *    the documentation and/or other materials provided with the distribution.
 *
 * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
 * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
 * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A
 * PARTICULAR PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR
 * CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,
 * EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
 * PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS;
 * OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
 * WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR
 * OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF
 * ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
 */

#include <sys/cdefs.h>
#ifndef lint
__RCSID("$NetBSD: getnameinfo.c,v 1.8 2025/02/06 20:59:00 christos Exp $");
#endif

#include <sys/types.h>

#include <sys/socket.h>

#include <arpa/inet.h>
#include <netinet/in.h>
#include <netatalk/at.h>
#include <sys/un.h>
#include <net/if_dl.h>
#include <arpa/inet.h>

#include <assert.h>
#include <err.h>
#include <errno.h>
#include <netdb.h>
#include <stdbool.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <unistd.h>

#include "support.h"

/*
 * getnameinfo: Resolve IP addresses and ports to hostnames and service names,
 * similar to the getnameinfo function in the standard library.
 *
 * usage:
 *   getnameinfo [-46FHNnrSu] [-f family] [-p port] <IP-address>
 *
 *   -4: Restrict lookup to IPv4 addresses only
 *   -6: Restrict lookup to IPv6 addresses only
 *   -F: Suppress the fully-qualified domain name (FQDN)
 *   -f: Specify address family to look up
 *   -H: Display only the hostname, omitting the service name
 *   -N: Display the numeric service name instead of the service name
 *   -n: Display the numeric host address instead of the hostname
 *   -p: Specify the port number to be used in the lookup
 *   -r: Ensure that the name is returned (error if no name is found)
 *   -S: Display only the service name, omitting the hostname
 *   -u: Use UDP instead of the default TCP
 */

static void		usage(void) __dead;
static void		print_result(bool, bool, char *, char *);
static in_port_t	get_port(const char *);
static uint8_t		get_family_from_address(const char *);
static uint8_t		get_family(const char *);
static void		parse_atalk(const char *, struct sockaddr_at *);

int
main(int argc, char **argv)
{
	socklen_t hostlen = NI_MAXHOST, servlen = NI_MAXSERV, addrlen;
	char hostname[NI_MAXHOST], service[NI_MAXSERV];
	bool hostname_only = false, service_only = false;
	uint8_t family = AF_UNSPEC;
	int flags = 0;
	char *address = NULL;
	in_port_t port = 0;
	struct sockaddr_storage addr_st;
	struct sockaddr_in *addr_in;
	struct sockaddr_in6 *addr_in6;
	struct sockaddr_un *addr_un;
	struct sockaddr_dl *addr_dl;
	int ch;
	int error;

	setprogname(argv[0]);

	while ((ch = getopt(argc, argv, "46Ff:HNnp:rSu")) != -1) {
		switch (ch) {
		case '4':
			if (family != AF_UNSPEC)
				goto opt46f;
			family = AF_INET;
			break;
		case '6':
			if (family != AF_UNSPEC)
				goto opt46f;
			family = AF_INET6;
			break;
		case 'r':
			flags |= NI_NAMEREQD;
			break;
		case 'u':
			flags |= NI_DGRAM;
			break;
		case 'f':
			if (family != AF_UNSPEC)
				goto opt46f;
			family = get_family(optarg);
			break;
		case 'F':
			flags |= NI_NOFQDN;
			break;
		case 'n':
			flags |= NI_NUMERICHOST;
			break;
		case 'N':
			flags |= NI_NUMERICSERV;
			break;
		case 'H':
			if (service_only)
				goto optHS;
			hostname_only = true;
			break;
		case 'S':
			if (hostname_only)
				goto optHS;
			service_only = true;
			break;
		case 'p':
			port = get_port(optarg);
			break;
		case '?':
		default:
			usage();
		}
	}

	argc -= optind;
	argv += optind;

	if (argc > 1) {
		warnx("Too many addresses");
		usage();
	}

	if (argc == 0 && (hostname_only ||
	    (!hostname_only && !service_only))) {
		warnx("No IP address provided");
		usage();
	}

	if (port == 0 && (service_only ||
	    (!hostname_only && !service_only))) {
		warnx("No port number provided");
		usage();
	}

	if (argc == 1) {
		address = argv[0];
		if (family == AF_UNSPEC)
			family = get_family_from_address(address);
	}

	memset(&addr_st, 0, sizeof(addr_st));

	switch (family) {
	case AF_APPLETALK:
		parse_atalk(address, (struct sockaddr_at *)&addr_st);
		addrlen = sizeof(struct sockaddr_at *);
		break;
	case AF_INET:
		addr_in = (struct sockaddr_in *)&addr_st;
		addr_in->sin_family = family;
		addr_in->sin_port = htons(port);
		if (address == NULL) {
			addr_in->sin_addr.s_addr = INADDR_ANY;
		} else if (inet_pton(family, address, &addr_in->sin_addr)
		    == 0)
			errx(EXIT_FAILURE, "Invalid IPv4 address: %s", address);
		addrlen = sizeof(*addr_in);
		break;
	case AF_INET6:
		addr_in6 = (struct sockaddr_in6 *)&addr_st;
		addr_in6->sin6_family = family;
		addr_in6->sin6_port = htons(port);
		if (address == NULL) {
			addr_in6->sin6_addr =
			    (struct in6_addr)IN6ADDR_ANY_INIT;
		} else if (inet_pton(family, address, &addr_in6->sin6_addr)
		    == 0)
			errx(EXIT_FAILURE, "Invalid IPv6 address: %s", address);
		addrlen = sizeof(*addr_in6);
		break;
	case AF_LINK:
		addr_dl = (struct sockaddr_dl *)&addr_st;
		addr_dl->sdl_len = sizeof(addr_st);
		link_addr(address, addr_dl);
		addrlen = addr_dl->sdl_len;
		break;
	case AF_LOCAL:
		addr_un = (struct sockaddr_un *)&addr_st;
		addr_un->sun_family = family;
		if (strlen(address) >= sizeof(addr_un->sun_path))
			errx(EXIT_FAILURE, "Invalid AF_LOCAL address: %s",
			    address);
		(void)strncpy(addr_un->sun_path, address,
		    sizeof(addr_un->sun_path));
		addrlen = sizeof(*addr_un);
		break;
	default:
		errx(EXIT_FAILURE, "Unsupported family %d", family);
	}

	if (hostname_only)
		servlen = 0;
	else if (service_only)
		hostlen = 0;

	error = getnameinfo((struct sockaddr *)&addr_st, addrlen,
	    hostname, hostlen, service, servlen, flags);
	if (error)
		errx(EXIT_FAILURE, "%s", gai_strerror(error));

	print_result(hostname_only, service_only, hostname, service);

	fflush(stdout);
	return ferror(stdout) ? EXIT_FAILURE : EXIT_SUCCESS;
opt46f:
	warnx("Options -4, -6, -f cannot be used together");
	usage();
optHS:
	warnx("Options -H and -S cannot be used together");
	usage();
}

static void
parse_atalk(const char *address, struct sockaddr_at *addr_at)
{
	int net, node, port;

	if (sscanf(address, "%d:%d:%d", &net, &node, &port) != 3)
badat:		errx(EXIT_FAILURE, "Invalid appletalk address: %s", address);

	if (net < 0 || net > 0xFFFF || node < 0 || node > 0xFF ||
	     port < 0 || port > 0xFFFF)
		goto badat;
	addr_at->sat_family = AF_APPLETALK;
	addr_at->sat_addr.s_net = htons((u_short)net);
	addr_at->sat_addr.s_node = (u_char)node;
	addr_at->sat_port = htons((u_short)port);
}

static uint8_t
get_family_from_address(const char *address)
{
	struct in_addr ipv4_addr;
	struct in6_addr ipv6_addr;

	if (inet_pton(AF_INET, address, &ipv4_addr) == 1)
		return AF_INET;

	if (inet_pton(AF_INET6, address, &ipv6_addr) == 1)
		return AF_INET6;

	errx(EXIT_FAILURE, "Invalid addrsss %s", address);
}

static uint8_t
get_family(const char* str)
{
	int fam;
	if (!parse_af(str, &fam) || fam <= 0 || fam > 255)
		errx(EXIT_FAILURE, "Invalid family %s", str);
	return (int8_t)fam;
}

static in_port_t
get_port(const char *port_str)
{
	int r;

	const intmax_t port = strtoi(port_str, NULL, 0, 0, 65535, &r);
	if (r)
		errc(EXIT_FAILURE, r, "Invalid port number %s", port_str);

	return (in_port_t)port;
}

static void
print_result(bool hostname_only, bool service_only,
    char *hostname, char *service)
{

	if (hostname_only)
		printf("%s\n", hostname);
	else if (service_only)
		printf("%s\n", service);
	else
		printf("%s %s\n", hostname, service);
}

static void __dead
usage(void)
{

	(void)fprintf(stderr, "Usage: %s", getprogname());
	(void)fprintf(stderr, " [-46fHNnrSu] [-p port] [<IP-address>]\n");
	exit(EXIT_FAILURE);
}