xref: /netbsd-src/sys/arch/hp300/stand/common/netio.c (revision b1c86f5f087524e68db12794ee9c3e3da1ab17a0)
1 /*	$NetBSD: netio.c,v 1.13 2009/10/21 23:12:09 snj Exp $	*/
2 
3 /*-
4  * Copyright (c) 1996, 1997 The NetBSD Foundation, Inc.
5  * All rights reserved.
6  *
7  * This code is derived from software contributed to The NetBSD Foundation
8  * by Jason R. Thorpe.
9  *
10  * Redistribution and use in source and binary forms, with or without
11  * modification, are permitted provided that the following conditions
12  * are met:
13  * 1. Redistributions of source code must retain the above copyright
14  *    notice, this list of conditions and the following disclaimer.
15  * 2. Redistributions in binary form must reproduce the above copyright
16  *    notice, this list of conditions and the following disclaimer in the
17  *    documentation and/or other materials provided with the distribution.
18  *
19  * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
20  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
21  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
22  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
23  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
24  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
25  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
26  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
27  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
28  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
29  * POSSIBILITY OF SUCH DAMAGE.
30  */
31 
32 /*
33  * Copyright (c) 1995 Gordon W. Ross
34  * All rights reserved.
35  *
36  * Redistribution and use in source and binary forms, with or without
37  * modification, are permitted provided that the following conditions
38  * are met:
39  * 1. Redistributions of source code must retain the above copyright
40  *    notice, this list of conditions and the following disclaimer.
41  * 2. Redistributions in binary form must reproduce the above copyright
42  *    notice, this list of conditions and the following disclaimer in the
43  *    documentation and/or other materials provided with the distribution.
44  *
45  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
46  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
47  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
48  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
49  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
50  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
51  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
52  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
53  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
54  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
55  */
56 
57 /*
58  * This module implements a "raw device" interface suitable for
59  * use by the stand-alone I/O library NFS code.  This interface
60  * does not support any "block" access, and exists only for the
61  * purpose of initializing the network interface, getting boot
62  * parameters, and performing the NFS mount.
63  *
64  * At open time, this does:
65  *
66  * find interface      - netif_open()
67  * RARP for IP address - rarp_getipaddress()
68  * RPC/bootparams      - callrpc(d, RPC_BOOTPARAMS, ...)
69  * RPC/mountd          - nfs_mount(sock, ip, path)
70  *
71  * the root file handle from mountd is saved in a global
72  * for use by the NFS open code (NFS/lookup).
73  */
74 
75 #include <sys/param.h>
76 #include <sys/socket.h>
77 
78 #include <machine/stdarg.h>
79 
80 #include <net/if.h>
81 #include <netinet/in.h>
82 #include <netinet/in_systm.h>
83 
84 #include <lib/libsa/stand.h>
85 #include <lib/libsa/net.h>
86 #include <lib/libsa/netif.h>
87 #include <lib/libsa/bootp.h>
88 #include <lib/libsa/bootparam.h>
89 #include <lib/libsa/nfs.h>
90 
91 #include <lib/libkern/libkern.h>
92 
93 #include <hp300/stand/common/conf.h>
94 #include <hp300/stand/common/samachdep.h>
95 
96 extern int nfs_root_node[];	/* XXX - get from nfs_mount() */
97 
98 struct	in_addr myip, rootip, gateip;
99 n_long	netmask;
100 char rootpath[FNAME_SIZE];
101 
102 static int netdev_sock = -1;
103 static int open_count;
104 
105 int netio_ask = 0;		/* default to bootparam, can override */
106 
107 static	char input_line[100];
108 
109 int netmountroot(struct open_file *, char *);
110 
111 /*
112  * Called by devopen after it sets f->f_dev to our devsw entry.
113  * This opens the low-level device and sets f->f_devdata.
114  */
115 int
116 netopen(struct open_file *f, ...)
117 {
118 	va_list ap;
119 	char *devname;
120 	int error = 0;
121 
122 	va_start(ap, f);
123 	devname = va_arg(ap, char *);
124 	va_end(ap);
125 
126 	/* On first open, do netif open, mount, etc. */
127 	if (open_count == 0) {
128 		/* Find network interface. */
129 		if ((netdev_sock = netif_open(devname)) < 0)
130 			return ENXIO;
131 		if ((error = netmountroot(f, devname)) != 0)
132 			return error;
133 	}
134 	open_count++;
135 	f->f_devdata = nfs_root_node;
136 	return error;
137 }
138 
139 int
140 netclose(struct open_file *f)
141 {
142 	/* On last close, do netif close, etc. */
143 	if (open_count > 0)
144 		if (--open_count == 0)
145 			netif_close(netdev_sock);
146 	f->f_devdata = NULL;
147 
148 	return 0;
149 }
150 
151 int
152 netstrategy(void *devdata, int func, daddr_t dblk, size_t size, void *v_buf,
153     size_t *rsize)
154 {
155 
156 	*rsize = size;
157 	return EIO;
158 }
159 
160 int
161 netmountroot(struct open_file *f, char *devname)
162 {
163 	int error;
164 	struct iodesc *d;
165 
166 #ifdef DEBUG
167 	printf("netmountroot: %s\n", devname);
168 #endif
169 
170 	if (netio_ask) {
171  get_my_ip:
172 		printf("My IP address? ");
173 		memset(input_line, 0, sizeof(input_line));
174 		gets(input_line);
175 		if ((myip.s_addr = inet_addr(input_line)) ==
176 		    htonl(INADDR_NONE)) {
177 			printf("invalid IP address: %s\n", input_line);
178 			goto get_my_ip;
179 		}
180 
181  get_my_netmask:
182 		printf("My netmask? ");
183 		memset(input_line, 0, sizeof(input_line));
184 		gets(input_line);
185 		if ((netmask = inet_addr(input_line)) ==
186 		    htonl(INADDR_NONE)) {
187 			printf("invalid netmask: %s\n", input_line);
188 			goto get_my_netmask;
189 		}
190 
191  get_my_gateway:
192 		printf("My gateway? ");
193 		memset(input_line, 0, sizeof(input_line));
194 		gets(input_line);
195 		if ((gateip.s_addr = inet_addr(input_line)) ==
196 		    htonl(INADDR_NONE)) {
197 			printf("invalid IP address: %s\n", input_line);
198 			goto get_my_gateway;
199 		}
200 
201  get_server_ip:
202 		printf("Server IP address? ");
203 		memset(input_line, 0, sizeof(input_line));
204 		gets(input_line);
205 		if ((rootip.s_addr = inet_addr(input_line)) ==
206 		    htonl(INADDR_NONE)) {
207 			printf("invalid IP address: %s\n", input_line);
208 			goto get_server_ip;
209 		}
210 
211  get_server_path:
212 		printf("Server path? ");
213 		memset(rootpath, 0, sizeof(rootpath));
214 		gets(rootpath);
215 		if (rootpath[0] == '\0' || rootpath[0] == '\n')
216 			goto get_server_path;
217 
218 		if ((d = socktodesc(netdev_sock)) == NULL)
219 			return EMFILE;
220 
221 		d->myip = myip;
222 
223 		goto do_nfs_mount;
224 	}
225 
226 	/*
227 	 * Get info for NFS boot: our IP address, our hostname,
228 	 * server IP address, and our root path on the server.
229 	 * There are two ways to do this:  The old, Sun way,
230 	 * and the more modern, BOOTP way. (RFC951, RFC1048)
231 	 */
232 
233 #ifdef	SUN_BOOTPARAMS
234 	/* Get boot info using RARP and Sun bootparams. */
235 
236 	/* Get our IP address.  (rarp.c) */
237 	if (rarp_getipaddress(netdev_sock) == -1)
238 		return errno;
239 
240 	printf("boot: client IP address: %s\n", inet_ntoa(myip));
241 
242 	/* Get our hostname, server IP address. */
243 	if (bp_whoami(netdev_sock))
244 		return errno;
245 
246 	printf("boot: client name: %s\n", hostname);
247 
248 	/* Get the root pathname. */
249 	if (bp_getfile(netdev_sock, "root", &rootip, rootpath))
250 		return errno;
251 
252 #else
253 
254 	/* Get boot info using BOOTP way. (RFC951, RFC1048) */
255 	bootp(netdev_sock);
256 
257 	printf("boot: client IP address: %s \n", inet_ntoa(myip));
258 
259 #endif /* SUN_BOOTPARAMS */
260 
261 	printf("root addr=%s path=%s\n", inet_ntoa(rootip), rootpath);
262 
263  do_nfs_mount:
264 	/* Get the NFS file handle (mount). */
265 	error = nfs_mount(netdev_sock, rootip, rootpath);
266 
267 	return error;
268 }
269