1/*-
2 * Copyright (c) 1990 The Regents of the University of California.
3 * All rights reserved.
4 *
5 * This code is derived from software contributed to Berkeley by
6 * William Jolitz.
7 *
8 * Redistribution and use in source and binary forms, with or without
9 * modification, are permitted provided that the following conditions
10 * are met:
11 * 1. Redistributions of source code must retain the above copyright
12 * notice, this list of conditions and the following disclaimer.
13 * 2. Redistributions in binary form must reproduce the above copyright
14 * notice, this list of conditions and the following disclaimer in the
15 * documentation and/or other materials provided with the distribution.
16 * 3. All advertising materials mentioning features or use of this software
17 * must display the following acknowledgement:
18 * This product includes software developed by the University of
19 * California, Berkeley and its contributors.
20 * 4. Neither the name of the University nor the names of its contributors
21 * may be used to endorse or promote products derived from this software
22 * without specific prior written permission.
23 *
24 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
25 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
26 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
27 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
28 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
29 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
30 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
31 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
32 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
33 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
34 * SUCH DAMAGE.
35 *
36 * from: @(#)autoconf.c 7.1 (Berkeley) 5/9/91
37 * $FreeBSD: head/sys/nfsclient/nfs_diskless.c 108172 2002-12-22 05:35:03Z hsu $
38 */
39
40#include <sys/param.h>
41#include <sys/systm.h>
42#include <sys/kernel.h>
43#include <sys/malloc.h>
44#include <sys/mount.h>
45
46#include <sys/socket.h>
47#include <net/if.h>
48#include <net/if_dl.h>
49#include <net/if_types.h>
50#include <net/if_var.h>
51#include <net/ethernet.h>
52#include <netinet/in.h>
53#include <nfs/rpcv2.h>
54#include <nfs/nfsproto.h>
55#include <nfsclient/nfs.h>
56#include <nfsclient/nfsdiskless.h>
57
58static int inaddr_to_sockaddr(char *ev, struct sockaddr_in *sa);
59static int hwaddr_to_sockaddr(char *ev, struct sockaddr_dl *sa);
60static int decode_nfshandle(char *ev, u_char *fh);
61
62/*
63 * Populate the essential fields in the nfsv3_diskless structure.
64 *
65 * The loader is expected to export the following environment variables:
66 *
67 * boot.netif.ip IP address on boot interface
68 * boot.netif.netmask netmask on boot interface
69 * boot.netif.gateway default gateway (optional)
70 * boot.netif.hwaddr hardware address of boot interface
71 * boot.nfsroot.server IP address of root filesystem server
72 * boot.nfsroot.path path of the root filesystem on server
73 * boot.nfsroot.nfshandle NFS handle for root filesystem on server
74 */
75void
76nfs_setup_diskless(void)
77{
78 struct nfs_diskless *nd = &nfs_diskless;
79 struct ifnet *ifp;
80 struct ifaddr *ifa;
81 struct sockaddr_dl *sdl, ourdl;
82 struct sockaddr_in myaddr, netmask;
83 char *cp;
84
85 if (nfs_diskless_valid)
86 return;
87 /* set up interface */
88 if (inaddr_to_sockaddr("boot.netif.ip", &myaddr))
89 return;
90 if (inaddr_to_sockaddr("boot.netif.netmask", &netmask)) {
91 printf("nfs_diskless: no netmask\n");
92 return;
93 }
94 bcopy(&myaddr, &nd->myif.ifra_addr, sizeof(myaddr));
95 bcopy(&myaddr, &nd->myif.ifra_broadaddr, sizeof(myaddr));
96 ((struct sockaddr_in *) &nd->myif.ifra_broadaddr)->sin_addr.s_addr =
97 myaddr.sin_addr.s_addr | ~ netmask.sin_addr.s_addr;
98 bcopy(&netmask, &nd->myif.ifra_mask, sizeof(netmask));
99
100 if (hwaddr_to_sockaddr("boot.netif.hwaddr", &ourdl)) {
101 printf("nfs_diskless: no hardware address\n");
102 return;
103 }
104 ifa = NULL;
105 IFNET_RLOCK();
106 TAILQ_FOREACH(ifp, &ifnet, if_link) {
107 TAILQ_FOREACH(ifa, &ifp->if_addrhead, ifa_link) {
108 if ((ifa->ifa_addr->sa_family == AF_LINK) &&
109 (sdl = ((struct sockaddr_dl *)ifa->ifa_addr))) {
110 if ((sdl->sdl_type == ourdl.sdl_type) &&
111 (sdl->sdl_alen == ourdl.sdl_alen) &&
112 !bcmp(sdl->sdl_data + sdl->sdl_nlen,
113 ourdl.sdl_data + ourdl.sdl_nlen,
114 sdl->sdl_alen)) {
115 IFNET_RUNLOCK();
116 goto match_done;
117 }
118 }
119 }
120 }
121 IFNET_RUNLOCK();
122 printf("nfs_diskless: no interface\n");
123 return; /* no matching interface */
124match_done:
125 sprintf(nd->myif.ifra_name, "%s%d", ifp->if_name, ifp->if_unit);
126
127 /* set up gateway */
128 inaddr_to_sockaddr("boot.netif.gateway", &nd->mygateway);
129
130 /* XXX set up swap? */
131
132 /* set up root mount */
133 nd->root_args.rsize = 8192; /* XXX tunable? */
134 nd->root_args.wsize = 8192;
135 nd->root_args.sotype = SOCK_DGRAM;
136 nd->root_args.flags = (NFSMNT_WSIZE | NFSMNT_RSIZE | NFSMNT_RESVPORT);
137 if (inaddr_to_sockaddr("boot.nfsroot.server", &nd->root_saddr)) {
138 printf("nfs_diskless: no server\n");
139 return;
140 }
141 nd->root_saddr.sin_port = htons(NFS_PORT);
142 if (decode_nfshandle("boot.nfsroot.nfshandle", &nd->root_fh[0]) == 0) {
143 printf("nfs_diskless: no NFS handle\n");
144 return;
145 }
146 if ((cp = getenv("boot.nfsroot.path")) != NULL) {
147 strncpy(nd->root_hostnam, cp, MNAMELEN - 1);
148 freeenv(cp);
149 }
150
151 nfs_diskless_valid = 1;
152}
153
154static int
155inaddr_to_sockaddr(char *ev, struct sockaddr_in *sa)
156{
157 u_int32_t a[4];
158 char *cp;
159 int count;
160
161 bzero(sa, sizeof(*sa));
162 sa->sin_len = sizeof(*sa);
163 sa->sin_family = AF_INET;
164
165 if ((cp = getenv(ev)) == NULL)
166 return (1);
167 count = sscanf(cp, "%d.%d.%d.%d", &a[0], &a[1], &a[2], &a[3]);
168 freeenv(cp);
169 if (count != 4)
170 return (1);
171 sa->sin_addr.s_addr =
172 htonl((a[0] << 24) | (a[1] << 16) | (a[2] << 8) | a[3]);
173 return (0);
174}
175
176static int
177hwaddr_to_sockaddr(char *ev, struct sockaddr_dl *sa)
178{
179 char *cp;
180 u_int32_t a[6];
181 int count;
182
183 bzero(sa, sizeof(*sa));
184 sa->sdl_len = sizeof(*sa);
185 sa->sdl_family = AF_LINK;
186 sa->sdl_type = IFT_ETHER;
187 sa->sdl_alen = ETHER_ADDR_LEN;
188 if ((cp = getenv(ev)) == NULL)
189 return (1);
190 count = sscanf(cp, "%x:%x:%x:%x:%x:%x",
191 &a[0], &a[1], &a[2], &a[3], &a[4], &a[5]);
192 freeenv(cp);
193 if (count != 6)
194 return (1);
195 sa->sdl_data[0] = a[0];
196 sa->sdl_data[1] = a[1];
197 sa->sdl_data[2] = a[2];
198 sa->sdl_data[3] = a[3];
199 sa->sdl_data[4] = a[4];
200 sa->sdl_data[5] = a[5];
201 return (0);
202}
203
204static int
205decode_nfshandle(char *ev, u_char *fh)
206{
207 u_char *cp, *ep;
208 int len, val;
209
210 ep = cp = getenv(ev);
211 if (cp == NULL)
212 return (0);
213 if ((strlen(cp) < 2) || (*cp != 'X')) {
214 freeenv(ep);
215 return (0);
216 }
217 len = 0;
218 cp++;
219 for (;;) {
220 if (*cp == 'X') {
221 freeenv(ep);
222 return (len);
223 }
224 if ((sscanf(cp, "%2x", &val) != 1) || (val > 0xff)) {
225 freeenv(ep);
226 return (0);
227 }
228 *(fh++) = val;
229 len++;
230 cp += 2;
231 if (len > NFSX_V2FH) {
232 freeenv(ep);
233 return (0);
234 }
235 }
236}