1 /* $NetBSD: bootparam.c,v 1.11 1997/06/26 19:11:32 drochner Exp $ */
4 * Copyright (c) 1995 Gordon W. Ross
7 * Redistribution and use in source and binary forms, with or without
8 * modification, are permitted provided that the following conditions
10 * 1. Redistributions of source code must retain the above copyright
11 * notice, this list of conditions and the following disclaimer.
12 * 2. Redistributions in binary form must reproduce the above copyright
13 * notice, this list of conditions and the following disclaimer in the
14 * documentation and/or other materials provided with the distribution.
15 * 3. The name of the author may not be used to endorse or promote products
16 * derived from this software without specific prior written permission.
17 * 4. All advertising materials mentioning features or use of this software
18 * must display the following acknowledgement:
19 * This product includes software developed by Gordon W. Ross
21 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
22 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
23 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
24 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
25 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
26 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
27 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
28 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
29 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
30 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
33 #include <sys/cdefs.h>
34 __FBSDID("$FreeBSD$");
40 #include <sys/param.h>
41 #include <sys/socket.h>
45 #include <netinet/in.h>
46 #include <netinet/in_systm.h>
56 #include "bootparam.h"
59 #define RPC_PRINTF(a) printf a
64 struct in_addr bp_server_addr; /* net order */
65 n_short bp_server_port; /* net order */
68 * RPC definitions for bootparamd
70 #define BOOTPARAM_PROG 100026
71 #define BOOTPARAM_VERS 1
72 #define BOOTPARAM_WHOAMI 1
73 #define BOOTPARAM_GETFILE 2
76 * Inet address in RPC messages
77 * (Note, really four ints, NOT chars. Blech.)
84 int xdr_inaddr_encode(char **p, struct in_addr ia);
85 int xdr_inaddr_decode(char **p, struct in_addr *ia);
87 int xdr_string_encode(char **p, char *str, int len);
88 int xdr_string_decode(char **p, char *str, int *len_p);
92 * RPC: bootparam/whoami
93 * Given client IP address, get:
94 * client name (hostname)
95 * domain name (domainname)
98 * The hostname and domainname are set here for convenience.
100 * Note - bpsin is initialized to the broadcast address,
101 * and will be replaced with the bootparam server address
102 * after this call is complete. Have to use PMAP_PROC_CALL
103 * to make sure we get responses only from a servers that
104 * know about us (don't want to broadcast a getport call).
107 bp_whoami(int sockfd)
109 /* RPC structures for PMAPPROC_CALLIT */
115 struct xdr_inaddr xina;
121 /* encapsulated data here */
125 n_long h[RPC_HEADER_WORDS];
128 char *send_tail, *recv_head;
133 RPC_PRINTF(("bp_whoami: myip=%s\n", inet_ntoa(myip)));
136 if (!(d = socktodesc(sockfd))) {
137 RPC_PRINTF(("bp_whoami: bad socket. %d\n", sockfd));
143 * Build request args for PMAPPROC_CALLIT.
145 args->prog = htonl(BOOTPARAM_PROG);
146 args->vers = htonl(BOOTPARAM_VERS);
147 args->proc = htonl(BOOTPARAM_WHOAMI);
148 args->arglen = htonl(sizeof(struct xdr_inaddr));
149 send_tail = (char*) &args->xina;
152 * append encapsulated data (client IP address)
154 if (xdr_inaddr_encode(&send_tail, myip))
157 /* RPC: portmap/callit */
158 d->myport = htons(--rpc_port);
159 d->destip.s_addr = INADDR_BROADCAST; /* XXX: subnet bcast? */
160 /* rpc_call will set d->destport */
163 len = rpc_call(d, PMAPPROG, PMAPVERS, PMAPPROC_CALLIT,
164 args, send_tail - (char*)args, (void **)&repl, &pkt);
166 printf("bootparamd: 'whoami' call failed\n");
170 /* Save bootparam server address (from IP header). */
171 rpc_fromaddr(repl, &bp_server_addr, &bp_server_port);
174 * Note that bp_server_port is now 111 due to the
175 * indirect call (using PMAPPROC_CALLIT), so get the
176 * actual port number from the reply data.
178 bp_server_port = repl->port;
180 RPC_PRINTF(("bp_whoami: server at %s:%d\n",
181 inet_ntoa(bp_server_addr), ntohs(bp_server_port)));
183 /* We have just done a portmap call, so cache the portnum. */
184 rpc_pmap_putcache(bp_server_addr,
187 (int)ntohs(bp_server_port));
190 * Parse the encapsulated results from bootparam/whoami
192 x = ntohl(repl->encap_len);
194 printf("bp_whoami: short reply, %d < %d\n", len, x);
197 recv_head = (char*) repl->capsule;
200 hostnamelen = MAXHOSTNAMELEN-1;
201 if (xdr_string_decode(&recv_head, hostname, &hostnamelen)) {
202 RPC_PRINTF(("bp_whoami: bad hostname\n"));
207 domainnamelen = MAXHOSTNAMELEN-1;
208 if (xdr_string_decode(&recv_head, domainname, &domainnamelen)) {
209 RPC_PRINTF(("bp_whoami: bad domainname\n"));
213 /* gateway address */
214 if (xdr_inaddr_decode(&recv_head, &gateip)) {
215 RPC_PRINTF(("bp_whoami: bad gateway\n"));
228 * RPC: bootparam/getfile
229 * Given client name and file "key", get:
235 bp_getfile(int sockfd, char *key, struct in_addr *serv_addr, char *pathname)
238 n_long h[RPC_HEADER_WORDS];
242 char serv_name[FNAME_SIZE];
243 char *rdata, *send_tail;
246 int rc = -1, sn_len, path_len, rlen;
248 if (!(d = socktodesc(sockfd))) {
249 RPC_PRINTF(("bp_getfile: bad socket. %d\n", sockfd));
253 send_tail = (char*) sdata.d;
256 * Build request message.
259 /* client name (hostname) */
260 if (xdr_string_encode(&send_tail, hostname, hostnamelen)) {
261 RPC_PRINTF(("bp_getfile: bad client\n"));
265 /* key name (root or swap) */
266 if (xdr_string_encode(&send_tail, key, strlen(key))) {
267 RPC_PRINTF(("bp_getfile: bad key\n"));
271 /* RPC: bootparam/getfile */
272 d->myport = htons(--rpc_port);
273 d->destip = bp_server_addr;
274 /* rpc_call will set d->destport */
277 BOOTPARAM_PROG, BOOTPARAM_VERS, BOOTPARAM_GETFILE,
278 sdata.d, send_tail - (char*)sdata.d,
279 (void **)&rdata, &pkt);
281 RPC_PRINTF(("bp_getfile: short reply\n"));
287 * Parse result message.
291 sn_len = FNAME_SIZE-1;
292 if (xdr_string_decode(&rdata, serv_name, &sn_len)) {
293 RPC_PRINTF(("bp_getfile: bad server name\n"));
297 /* server IP address (mountd/NFS) */
298 if (xdr_inaddr_decode(&rdata, serv_addr)) {
299 RPC_PRINTF(("bp_getfile: bad server addr\n"));
303 /* server pathname */
304 path_len = MAXPATHLEN-1;
305 if (xdr_string_decode(&rdata, pathname, &path_len)) {
306 RPC_PRINTF(("bp_getfile: bad server path\n"));
319 * eXternal Data Representation routines.
320 * (but with non-standard args...)
325 xdr_string_encode(char **pkt, char *str, int len)
329 int padlen = (len + 3) & ~3; /* padded length */
331 /* The data will be int aligned. */
332 lenp = (uint32_t *) *pkt;
333 *pkt += sizeof(*lenp);
338 bcopy(str, datap, len);
344 xdr_string_decode(char **pkt, char *str, int *len_p)
348 int slen; /* string length */
349 int plen; /* padded length */
351 /* The data will be int aligned. */
352 lenp = (uint32_t *) *pkt;
353 *pkt += sizeof(*lenp);
355 plen = (slen + 3) & ~3;
361 bcopy(datap, str, slen);
371 xdr_inaddr_encode(char **pkt, struct in_addr ia)
373 struct xdr_inaddr *xi;
377 n_long l; /* network order */
381 /* The data will be int aligned. */
382 xi = (struct xdr_inaddr *) *pkt;
384 xi->atype = htonl(1);
389 * Note: the htonl() calls below DO NOT
390 * imply that uia.l is in host order.
391 * In fact this needs it in net order.
393 *ip++ = htonl((unsigned int)*cp++);
394 *ip++ = htonl((unsigned int)*cp++);
395 *ip++ = htonl((unsigned int)*cp++);
396 *ip++ = htonl((unsigned int)*cp++);
402 xdr_inaddr_decode(char **pkt, struct in_addr *ia)
404 struct xdr_inaddr *xi;
408 n_long l; /* network order */
412 /* The data will be int aligned. */
413 xi = (struct xdr_inaddr *) *pkt;
415 if (xi->atype != htonl(1)) {
416 RPC_PRINTF(("xdr_inaddr_decode: bad addrtype=%d\n",
424 * Note: the ntohl() calls below DO NOT
425 * imply that uia.l is in host order.
426 * In fact this needs it in net order.
428 *cp++ = ntohl(*ip++);
429 *cp++ = ntohl(*ip++);
430 *cp++ = ntohl(*ip++);
431 *cp++ = ntohl(*ip++);