1 /* 2 * Copyright (c) 1992/3 Theo de Raadt <deraadt@fsa.ca> 3 * All rights reserved. 4 * 5 * Redistribution and use in source and binary forms, with or without 6 * modification, are permitted provided that the following conditions 7 * are met: 8 * 1. Redistributions of source code must retain the above copyright 9 * notice, this list of conditions and the following disclaimer. 10 * 2. Redistributions in binary form must reproduce the above copyright 11 * notice, this list of conditions and the following disclaimer in the 12 * documentation and/or other materials provided with the distribution. 13 * 3. The name of the author may not be used to endorse or promote 14 * products derived from this software without specific prior written 15 * permission. 16 * 17 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS 18 * OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED 19 * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 20 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY 21 * DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 22 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 23 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 24 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 25 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 26 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 27 * SUCH DAMAGE. 28 */ 29 30 #ifndef lint 31 static const char rcsid[] = 32 "$FreeBSD$"; 33 #endif /* not lint */ 34 35 #include <err.h> 36 #include <netdb.h> 37 #include <stdio.h> 38 #include <string.h> 39 #include <unistd.h> 40 #include <sys/param.h> 41 #include <sys/types.h> 42 #include <sys/socket.h> 43 #include <rpc/rpc.h> 44 #include <rpc/xdr.h> 45 #include <rpcsvc/yp.h> 46 struct dom_binding{}; 47 #include <rpcsvc/ypclnt.h> 48 #include <arpa/inet.h> 49 50 extern bool_t xdr_domainname(); 51 52 static void 53 usage(void) 54 { 55 fprintf(stderr, "usage: ypset [-h host] [-d domain] server\n"); 56 exit(1); 57 } 58 59 int 60 bind_tohost(struct sockaddr_in *sin, char *dom, char *server) 61 { 62 struct ypbind_setdom ypsd; 63 struct timeval tv; 64 struct hostent *hp; 65 CLIENT *client; 66 int sock, port; 67 int r; 68 unsigned long server_addr; 69 70 if ((port = htons(getrpcport(server, YPPROG, YPPROC_NULL, IPPROTO_UDP))) == 0) 71 errx(1, "%s not running ypserv", server); 72 73 bzero(&ypsd, sizeof ypsd); 74 75 if ((hp = gethostbyname (server)) != NULL) { 76 /* is this the most compatible way?? */ 77 bcopy (hp->h_addr_list[0], 78 (u_long *)&ypsd.ypsetdom_binding.ypbind_binding_addr, 79 sizeof (unsigned long)); 80 } else if ((long)(server_addr = inet_addr (server)) == -1) { 81 errx(1, "can't find address for %s", server); 82 } else 83 bcopy (&server_addr, 84 (u_long *)&ypsd.ypsetdom_binding.ypbind_binding_addr, 85 sizeof (server_addr)); 86 87 /* strncpy(ypsd.ypsetdom_domain, dom, sizeof ypsd.ypsetdom_domain); */ 88 ypsd.ypsetdom_domain = dom; 89 *(u_long *)&ypsd.ypsetdom_binding.ypbind_binding_port = port; 90 ypsd.ypsetdom_vers = YPVERS; 91 92 tv.tv_sec = 15; 93 tv.tv_usec = 0; 94 sock = RPC_ANYSOCK; 95 client = clntudp_create(sin, YPBINDPROG, YPBINDVERS, tv, &sock); 96 if (client == NULL) { 97 warnx("can't yp_bind, reason: %s", yperr_string(YPERR_YPBIND)); 98 return (YPERR_YPBIND); 99 } 100 client->cl_auth = authunix_create_default(); 101 102 r = clnt_call(client, YPBINDPROC_SETDOM, 103 (xdrproc_t)xdr_ypbind_setdom, &ypsd, 104 (xdrproc_t)xdr_void, NULL, tv); 105 if (r) { 106 warnx("sorry, cannot ypset for domain %s on host", dom); 107 clnt_destroy(client); 108 return (YPERR_YPBIND); 109 } 110 clnt_destroy(client); 111 return (0); 112 } 113 114 int 115 main(int argc, char *argv[]) 116 { 117 struct sockaddr_in sin; 118 struct hostent *hent; 119 char *domainname; 120 int c; 121 122 yp_get_default_domain(&domainname); 123 124 bzero(&sin, sizeof sin); 125 sin.sin_family = AF_INET; 126 sin.sin_addr.s_addr = htonl(INADDR_LOOPBACK); 127 128 while ((c = getopt(argc, argv, "h:d:")) != -1) 129 switch (c) { 130 case 'd': 131 domainname = optarg; 132 break; 133 case 'h': 134 if ((sin.sin_addr.s_addr = inet_addr(optarg)) == -1) { 135 hent = gethostbyname(optarg); 136 if (hent == NULL) 137 errx(1, "host %s unknown", optarg); 138 bcopy(&hent->h_addr_list[0], &sin.sin_addr, 139 sizeof sin.sin_addr); 140 } 141 break; 142 default: 143 usage(); 144 } 145 146 if (optind + 1 != argc) 147 usage(); 148 149 if (bind_tohost(&sin, domainname, argv[optind])) 150 exit(1); 151 exit(0); 152 } 153