1 files changed, 106 insertions, 0 deletions
diff --git a/usr.bin/hesinfo/hesinfo.c b/usr.bin/hesinfo/hesinfo.c
new file mode 100644
index 000000000000..ed91f14f5644
--- /dev/null
+++ b/usr.bin/hesinfo/hesinfo.c
@@ -0,0 +1,106 @@
+/*	$NetBSD: hesinfo.c,v 1.1 1999/01/25 22:45:55 lukem Exp $	*/
+
+/* Copyright 1988, 1996 by the Massachusetts Institute of Technology.
+ *
+ * Permission to use, copy, modify, and distribute this
+ * software and its documentation for any purpose and without
+ * fee is hereby granted, provided that the above copyright
+ * notice appear in all copies and that both that copyright
+ * notice and this permission notice appear in supporting
+ * documentation, and that the name of M.I.T. not be used in
+ * advertising or publicity pertaining to distribution of the
+ * software without specific, written prior permission.
+ * M.I.T. makes no representations about the suitability of
+ * this software for any purpose.  It is provided "as is"
+ * without express or implied warranty.
+ */
+
+/* This file is a simple driver for the Hesiod library. */
+
+
+#include <sys/cdefs.h>
+#include <err.h>
+#include <errno.h>
+#include <hesiod.h>
+#include <stdio.h>
+#include <stdlib.h>
+#include <string.h>
+#include <unistd.h>
+
+int 
+main(int argc, char **argv)
+{
+	char  **list, **p, *bindname, *name, *type;
+	int     lflag = 0, errflg = 0, bflag = 0, c;
+	void   *context;
+
+	while ((c = getopt(argc, argv, "lb")) != -1) {
+		switch (c) {
+		case 'l':
+			lflag = 1;
+			break;
+		case 'b':
+			bflag = 1;
+			break;
+		default:
+			errflg++;
+			break;
+		}
+	}
+	if (argc - optind != 2 || errflg) {
+		fprintf(stderr, "usage: hesinfo [-bl] name type\n");
+		fprintf(stderr, "\t-l selects long format\n");
+		fprintf(stderr, "\t-b also does hes_to_bind conversion\n");
+		exit(2);
+	}
+	name = argv[optind];
+	type = argv[optind + 1];
+
+	if (hesiod_init(&context) < 0) {
+		if (errno == ENOEXEC)
+			warnx(
+			    "hesiod_init: Invalid Hesiod configuration file.");
+		else
+			warn("hesiod_init");
+	}
+	/* Display bind name if requested. */
+	if (bflag) {
+		if (lflag)
+			printf("hes_to_bind(%s, %s) expands to\n", name, type);
+		bindname = hesiod_to_bind(context, name, type);
+		if (!bindname) {
+			if (lflag)
+				printf("nothing\n");
+			if (errno == ENOENT)
+				warnx("hesiod_to_bind: Unknown rhs-extension.");
+			else
+				warn("hesiod_to_bind");
+			exit(1);
+		}
+		printf("%s\n", bindname);
+		free(bindname);
+		if (lflag)
+			printf("which ");
+	}
+	if (lflag)
+		printf("resolves to\n");
+
+	/* Do the hesiod resolve and check for errors. */
+	list = hesiod_resolve(context, name, type);
+	if (!list) {
+		if (lflag)
+			printf("nothing\n");
+		if (errno == ENOENT)
+			warnx("hesiod_resolve: Hesiod name not found.");
+		else
+			warn("hesiod_resolve");
+		exit(1);
+	}
+	/* Display the results. */
+	for (p = list; *p; p++)
+		printf("%s\n", *p);
+
+	hesiod_free_list(context, list);
+	hesiod_end(context);
+	exit(0);
+}