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 
94 extern int nfs_root_node[];   /* XXX - get from nfs_mount() */
95 
96 static int netdev_sock = -1;
97 static int open_count;
98 
99 int netio_ask = 0;            /* default to bootparam, can override */
100 
101 static    char input_line[100];
102 
103 int 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  */
109 int
netopen(struct open_file * f,...)110 netopen(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 
133 int
netclose(struct open_file * f)134 netclose(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 
145 int
netstrategy(void * devdata,int func,daddr_t dblk,size_t size,void * v_buf,size_t * rsize)146 netstrategy(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 
154 int
netmountroot(struct open_file * f,char * devname)155 netmountroot(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