#include <sys/types.h>
#include <sys/socket.h>
#include <netinet/in.h>
#include <arpa/inet.h>
#include <ctype.h>
#include <err.h>
#include <netdb.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <unistd.h>
#include <rpc/rpc.h>
#include <rpc/xdr.h>
#include <rpcsvc/yp.h>
#include <rpcsvc/ypclnt.h>
#include "yplib_host.h"
struct ypalias {
char *alias, *name;
} ypaliases[] = {
{ "passwd", "passwd.byname" },
{ "group", "group.byname" },
{ "networks", "networks.byaddr" },
{ "hosts", "hosts.byaddr" },
{ "protocols", "protocols.bynumber" },
{ "services", "services.byname" },
{ "aliases", "mail.aliases" },
{ "ethers", "ethers.byname" },
};
int bind_host(char *dom, struct sockaddr_in *sin);
static void
usage(void)
{
fprintf(stderr,
"usage: ypwhich [-t] [-d domain] [[-h] host]\n"
" ypwhich [-t] [-d domain] [-h host] -m [mname]\n"
" ypwhich -x\n");
exit(1);
}
int
bind_host(char *dom, struct sockaddr_in *sin)
{
struct hostent *hent = NULL;
struct ypbind_resp ypbr;
struct in_addr ss_addr;
struct timeval tv;
CLIENT *client;
int sock, r;
sock = RPC_ANYSOCK;
tv.tv_sec = 15;
tv.tv_usec = 0;
client = clntudp_create(sin, YPBINDPROG, YPBINDVERS, tv, &sock);
if (client == NULL) {
fprintf(stderr, "ypwhich: host is not bound to a ypmaster\n");
return YPERR_YPBIND;
}
tv.tv_sec = 5;
tv.tv_usec = 0;
r = clnt_call(client, YPBINDPROC_DOMAIN,
xdr_domainname, &dom, xdr_ypbind_resp, &ypbr, tv);
if (r != RPC_SUCCESS) {
fprintf(stderr, "can't clnt_call: %s\n",
yperr_string(YPERR_YPBIND));
clnt_destroy(client);
return YPERR_YPBIND;
} else {
if (ypbr.ypbind_status != YPBIND_SUCC_VAL) {
fprintf(stderr, "can't yp_bind: Reason: %s\n",
yperr_string(ypbr.ypbind_status));
clnt_destroy(client);
return r;
}
}
clnt_destroy(client);
memmove(&ss_addr.s_addr, &ypbr.ypbind_resp_u.ypbind_bindinfo.ypbind_binding_addr,
sizeof (ss_addr));
hent = gethostbyaddr((char *)&ss_addr.s_addr, sizeof(ss_addr.s_addr),
AF_INET);
if (hent != NULL)
printf("%s\n", hent->h_name);
else
printf("%s\n", inet_ntoa(ss_addr));
return 0;
}
int
main(int argc, char *argv[])
{
char *domain, *master, *map = NULL, *host = NULL;
int notrans = 0, mode = 0, c, r, i;
struct ypmaplist *ypml, *y;
struct sockaddr_in sin;
struct addrinfo hints, *res;
CLIENT *client = NULL;
yp_get_default_domain(&domain);
if (domain == NULL)
errx(1, "YP domain name not set");
while ((c = getopt(argc, argv, "xd:h:mt")) != -1)
switch (c) {
case 'x':
for (i=0; i<sizeof ypaliases/sizeof ypaliases[0]; i++)
printf("Use \"%s\" for \"%s\"\n",
ypaliases[i].alias, ypaliases[i].name);
exit(0);
case 'h':
host = optarg;
break;
case 'd':
domain = optarg;
break;
case 't':
notrans = 1;
break;
case 'm':
mode = 1;
break;
default:
usage();
}
argc -= optind;
argv += optind;
if (mode == 0) {
switch (argc) {
case 0:
memset(&sin, 0, sizeof sin);
sin.sin_family = AF_INET;
sin.sin_addr.s_addr = htonl(INADDR_LOOPBACK);
if (bind_host(domain, &sin))
exit(1);
break;
case 1:
bzero(&sin, sizeof sin);
memset(&hints, 0, sizeof(hints));
hints.ai_family = AF_INET;
sin.sin_family = AF_INET;
if (getaddrinfo(argv[0], NULL, &hints, &res) != 0) {
fprintf(stderr, "ypwhich: host %s unknown\n",
argv[0]);
exit(1);
}
sin.sin_addr =
((struct sockaddr_in *)res->ai_addr)->sin_addr;
freeaddrinfo(res);
if (bind_host(domain, &sin))
exit(1);
break;
default:
usage();
}
exit(0);
}
if (argc > 1)
usage();
if (host != NULL)
client = yp_bind_host(host, YPPROG, YPVERS, 0, 1);
if (argv[0]) {
map = argv[0];
for (i=0; (!notrans) && i<sizeof ypaliases/sizeof ypaliases[0]; i++)
if (strcmp(map, ypaliases[i].alias) == 0)
map = ypaliases[i].name;
if (host != NULL)
r = yp_master_host(client, domain, map, &master);
else
r = yp_master(domain, map, &master);
switch (r) {
case 0:
printf("%s\n", master);
free(master);
break;
case YPERR_YPBIND:
fprintf(stderr, "ypwhich: not running ypbind\n");
exit(1);
default:
fprintf(stderr, "Can't find master for map %s. Reason: %s\n",
map, yperr_string(r));
exit(1);
}
exit(0);
}
ypml = NULL;
if (host != NULL)
r = yp_maplist_host(client, domain, &ypml);
else
r = yp_maplist(domain, &ypml);
r = 0;
switch (r) {
case 0:
for (y = ypml; y; ) {
ypml = y;
if (host != NULL) {
r = yp_master_host(client,
domain, ypml->map, &master);
} else {
r = yp_master(domain, ypml->map, &master);
}
switch (r) {
case 0:
printf("%s %s\n", ypml->map, master);
free(master);
break;
default:
fprintf(stderr,
"YP: can't find the master of %s: Reason: %s\n",
ypml->map, yperr_string(r));
break;
}
y = ypml->next;
free(ypml);
}
break;
case YPERR_YPBIND:
fprintf(stderr, "ypwhich: not running ypbind\n");
exit(1);
default:
fprintf(stderr, "Can't get map list for domain %s. Reason: %s\n",
domain, yperr_string(r));
exit(1);
}
exit(0);
}
