xref: /netbsd-src/sys/arch/hp300/stand/common/netio.c (revision 181254a7b1bdde6873432bffef2d2decc4b5c22f)
1 /*	$NetBSD: netio.c,v 1.17 2020/04/28 14:45:23 tsutsui 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 <net/if.h>
79 #include <netinet/in.h>
80 #include <netinet/in_systm.h>
81 
82 #include <lib/libsa/stand.h>
83 #include <lib/libsa/net.h>
84 #include <lib/libsa/netif.h>
85 #include <lib/libsa/bootp.h>
86 #include <lib/libsa/bootparam.h>
87 #include <lib/libsa/nfs.h>
88 
89 #include <lib/libkern/libkern.h>
90 
91 #include <hp300/stand/common/conf.h>
92 #include <hp300/stand/common/samachdep.h>
93 
94 extern int nfs_root_node[];	/* XXX - get from nfs_mount() */
95 
96 struct	in_addr myip, rootip, gateip;
97 n_long	netmask;
98 char rootpath[FNAME_SIZE];
99 
100 static int netdev_sock = -1;
101 static int open_count;
102 
103 int netio_ask = 0;		/* default to bootparam, can override */
104 
105 static	char input_line[100];
106 
107 int netmountroot(struct open_file *, char *);
108 
109 /*
110  * Called by devopen after it sets f->f_dev to our devsw entry.
111  * This opens the low-level device and sets f->f_devdata.
112  */
113 int
114 netopen(struct open_file *f, ...)
115 {
116 	va_list ap;
117 	char *devname;
118 	int error = 0;
119 
120 	va_start(ap, f);
121 	devname = va_arg(ap, char *);
122 	va_end(ap);
123 
124 	/* On first open, do netif open, mount, etc. */
125 	if (open_count == 0) {
126 		/* Find network interface. */
127 		if ((netdev_sock = netif_open(devname)) < 0)
128 			return ENXIO;
129 		if ((error = netmountroot(f, devname)) != 0)
130 			return error;
131 	}
132 	open_count++;
133 	f->f_devdata = nfs_root_node;
134 	return error;
135 }
136 
137 int
138 netclose(struct open_file *f)
139 {
140 	/* On last close, do netif close, etc. */
141 	if (open_count > 0)
142 		if (--open_count == 0)
143 			netif_close(netdev_sock);
144 	f->f_devdata = NULL;
145 
146 	return 0;
147 }
148 
149 int
150 netstrategy(void *devdata, int func, daddr_t dblk, size_t size, void *v_buf,
151     size_t *rsize)
152 {
153 
154 	*rsize = size;
155 	return EIO;
156 }
157 
158 int
159 netmountroot(struct open_file *f, char *devname)
160 {
161 	struct iodesc *d;
162 
163 #ifdef DEBUG
164 	printf("netmountroot: %s\n", devname);
165 #endif
166 
167 	if (netio_ask) {
168  get_my_ip:
169 		printf("My IP address? ");
170 		memset(input_line, 0, sizeof(input_line));
171 		kgets(input_line, sizeof(input_line));
172 		if ((myip.s_addr = inet_addr(input_line)) ==
173 		    htonl(INADDR_NONE)) {
174 			printf("invalid IP address: %s\n", input_line);
175 			goto get_my_ip;
176 		}
177 
178  get_my_netmask:
179 		printf("My netmask? ");
180 		memset(input_line, 0, sizeof(input_line));
181 		kgets(input_line, sizeof(input_line));
182 		if ((netmask = inet_addr(input_line)) ==
183 		    htonl(INADDR_NONE)) {
184 			printf("invalid netmask: %s\n", input_line);
185 			goto get_my_netmask;
186 		}
187 
188  get_my_gateway:
189 		printf("My gateway? ");
190 		memset(input_line, 0, sizeof(input_line));
191 		kgets(input_line, sizeof(input_line));
192 		if ((gateip.s_addr = inet_addr(input_line)) ==
193 		    htonl(INADDR_NONE)) {
194 			printf("invalid IP address: %s\n", input_line);
195 			goto get_my_gateway;
196 		}
197 
198  get_server_ip:
199 		printf("Server IP address? ");
200 		memset(input_line, 0, sizeof(input_line));
201 		kgets(input_line, sizeof(input_line));
202 		if ((rootip.s_addr = inet_addr(input_line)) ==
203 		    htonl(INADDR_NONE)) {
204 			printf("invalid IP address: %s\n", input_line);
205 			goto get_server_ip;
206 		}
207 
208  get_server_path:
209 		printf("Server path? ");
210 		memset(rootpath, 0, sizeof(rootpath));
211 		kgets(rootpath, sizeof(rootpath));
212 		if (rootpath[0] == '\0' || rootpath[0] == '\n')
213 			goto get_server_path;
214 
215 		if ((d = socktodesc(netdev_sock)) == NULL)
216 			return EMFILE;
217 
218 		d->myip = myip;
219 
220 		goto do_nfs_mount;
221 	}
222 
223 	/*
224 	 * Get info for NFS boot: our IP address, our hostname,
225 	 * server IP address, and our root path on the server.
226 	 * There are two ways to do this:  The old, Sun way,
227 	 * and the more modern, BOOTP way. (RFC951, RFC1048)
228 	 */
229 
230 #ifdef	SUN_BOOTPARAMS
231 	/* Get boot info using RARP and Sun bootparams. */
232 
233 	/* Get our IP address.  (rarp.c) */
234 	if (rarp_getipaddress(netdev_sock) == -1)
235 		return errno;
236 
237 	printf("boot: client IP address: %s\n", inet_ntoa(myip));
238 
239 	/* Get our hostname, server IP address. */
240 	if (bp_whoami(netdev_sock))
241 		return errno;
242 
243 	printf("boot: client name: %s\n", hostname);
244 
245 	/* Get the root pathname. */
246 	if (bp_getfile(netdev_sock, "root", &rootip, rootpath))
247 		return errno;
248 
249 #else
250 
251 	/* Get boot info using BOOTP way. (RFC951, RFC1048) */
252 	bootp(netdev_sock);
253 
254 	printf("boot: client IP address: %s \n", inet_ntoa(myip));
255 
256 #endif /* SUN_BOOTPARAMS */
257 
258 	printf("root addr=%s path=%s\n", inet_ntoa(rootip), rootpath);
259 
260  do_nfs_mount:
261 	/* Get the NFS file handle (mount). */
262 	if (nfs_mount(netdev_sock, rootip, rootpath))
263 		return errno;
264 
265 	return 0;
266 }
267