#include <netdb.h>
#include <sys/socket.h>
#include <netinet/in.h>
#include <arpa/inet.h>



extern struct hostent *gethostbyname();

main(argc, argv)
int	argc;
char	*argv[];
{

	struct hostent	*newhost;

	newhost = gethostbyname(argv[1]);

	printf ("Name = %s\n", newhost->h_name);
	printf ("First alias = %s\n", newhost->h_aliases[0]);
	printf ("Address type = %d\n", newhost->h_addrtype);
	printf ("Address length = %d\n", newhost->h_length);
	printf ("addressone = %s\n", (char *) inet_ntoa(*(newhost->h_addr_list[0])) );
	pr_inet (newhost->h_addr_list, newhost->h_length);
}

pr_inet(listptr, length)
char	**listptr;
int	length;
{
	struct in_addr	*ptr;

	while  ((ptr = (struct in_addr *) *listptr++) != 0) {
		printf ("address = %s\n", (char *) inet_ntoa(*ptr) );
	}
}