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