From bab3021fc1d9eff1fc1fd6c07b63904bce44d55d Mon Sep 17 00:00:00 2001
From: Assar Westerlund <assar@sics.se>
Date: Sat, 4 Dec 1999 18:13:03 +0000
Subject: [PATCH] (client_doit): move identical code here and start using
 getaddrinfo

git-svn-id: svn://svn.h5l.se/heimdal/trunk/heimdal@7501 ec53bebd-3082-4978-b11e-865c3cabbd6b
---
 appl/test/common.c | 40 ++++++++++++++++++++++++++++++++++++++++
 1 file changed, 40 insertions(+)

diff --git a/appl/test/common.c b/appl/test/common.c
index 8b6ff7334..8ad0b89df 100644
--- a/appl/test/common.c
+++ b/appl/test/common.c
@@ -117,3 +117,43 @@ client_setup(krb5_context *context, int *argc, char **argv)
     *argc = optind;
     return port;
 }
+
+int
+client_doit (const char *hostname, int port, const char *service,
+	     int (*func)(int, const char *hostname, const char *service))
+{
+    struct addrinfo *ai, *a;
+    struct addrinfo hints;
+    int error;
+    char portstr[NI_MAXSERV];
+
+    memset (&hints, 0, sizeof(hints));
+    hints.ai_socktype = SOCK_STREAM;
+    hints.ai_protocol = IPPROTO_TCP;
+
+    snprintf (portstr, sizeof(portstr), "%u", port);
+
+    error = getaddrinfo (hostname, portstr, &hints, &ai);
+    if (error) {
+	errx (1, "%s: %s", hostname, gai_strerror(error));
+	return -1;
+    }
+
+    for (a = ai; a != NULL; a = a->ai_next) {
+	int s;
+
+	s = socket (a->ai_family, a->ai_socktype, a->ai_protocol);
+	if (s < 0)
+	    continue;
+	if (connect (s, a->ai_addr, a->ai_addrlen) < 0) {
+	    warn ("connect(%s)", hostname);
+	    close (s);
+	    continue;
+	}
+	freeaddrinfo (ai);
+	return (*func) (s, hostname, service);
+    }
+    warnx ("failed to contact %s", hostname);
+    freeaddrinfo (ai);
+    return 1;
+}