1/*	$NetBSD: net.c,v 1.10 2021/04/12 03:55:41 mrg Exp $	*/
2
3/*
4 * Copyright (C) 1995 Wolfgang Solfrank.
5 * Copyright (C) 1995 TooLs GmbH.
6 * All rights reserved.
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 TooLs GmbH.
19 * 4. The name of TooLs GmbH may not be used to endorse or promote products
20 *    derived from this software without specific prior written permission.
21 *
22 * THIS SOFTWARE IS PROVIDED BY TOOLS GMBH ``AS IS'' AND ANY EXPRESS OR
23 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
24 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
25 * IN NO EVENT SHALL TOOLS GMBH BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
26 * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
27 * PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS;
28 * OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
29 * WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR
30 * OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF
31 * ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
32 */
33
34/*
35 * This module implements a "raw device" interface suitable for
36 * use by the stand-alone I/O library NFS code.  This interface
37 * does not support any "block" access, and exists only for the
38 * purpose of initializing the network interface, getting boot
39 * parameters, and performing the NFS mount.
40 *
41 * At open time, this does:
42 *
43 * find interface	- netif_open()
44 * BOOTP		- bootp()
45 * RPC/mountd		- nfs_mount()
46 *
47 * The root file handle from mountd is saved in a global
48 * for use by the NFS open code (NFS/lookup).
49 *
50 * Note: this is based in part on sys/arch/sparc/stand/net.c
51 */
52
53#include <sys/param.h>
54#include <sys/socket.h>
55
56#include <net/if.h>
57#include <netinet/in.h>
58#include <netinet/in_systm.h>
59
60#include <lib/libsa/stand.h>
61#include <lib/libsa/net.h>
62#include <lib/libsa/netif.h>
63#include <lib/libsa/bootp.h>
64#include <lib/libsa/bootparam.h>
65#include <lib/libsa/nfs.h>
66
67#include <lib/libkern/libkern.h>
68
69#include "ofdev.h"
70#include "net.h"
71
72
73static int net_mountroot_bootparams(void);
74static int net_mountroot_bootp(void);
75
76static	int netdev_sock = -1;
77static	int open_count;
78
79/*
80 * Called by devopen after it sets f->f_dev to our devsw entry.
81 * This opens the low-level device and sets f->f_devdata.
82 */
83int
84net_open(struct of_dev *op)
85{
86	int error = 0;
87
88	/*
89	 * On first open, do netif open, mount, etc.
90	 */
91	if (open_count == 0) {
92		/* Find network interface. */
93		if ((netdev_sock = netif_open(op)) < 0) {
94			error = errno;
95			goto bad;
96		}
97	}
98	open_count++;
99bad:
100	if (netdev_sock >= 0 && open_count == 0) {
101		netif_close(netdev_sock);
102		netdev_sock = -1;
103	}
104	return error;
105}
106
107int
108net_close(struct of_dev *op)
109{
110
111	/*
112	 * On last close, do netif close, etc.
113	 */
114	if (open_count > 0)
115		if (--open_count == 0) {
116			netif_close(netdev_sock);
117			netdev_sock = -1;
118		}
119	return 0;
120}
121
122static void
123net_clear_params(void)
124{
125
126	myip.s_addr = 0;
127	netmask = 0;
128	gateip.s_addr = 0;
129	*hostname = '\0';
130	rootip.s_addr = 0;
131	*rootpath = '\0';
132}
133
134int
135net_mountroot_bootparams(void)
136{
137
138	net_clear_params();
139
140	/* Get our IP address.  (rarp.c) */
141	if (rarp_getipaddress(netdev_sock) == -1)
142		return (errno);
143	printf("Using BOOTPARAMS protocol:\n  ip addr=%s\n", inet_ntoa(myip));
144	if (bp_whoami(netdev_sock))
145		return (errno);
146	printf("  hostname=%s\n", hostname);
147	if (bp_getfile(netdev_sock, "root", &rootip, rootpath))
148		return (errno);
149
150	return (0);
151}
152
153int
154net_mountroot_bootp(void)
155{
156	int attempts;
157
158	/* We need a few attempts here as some DHCP servers
159	 * require >1 packet and my wireless bridge is always
160	 * in learning mode until the 2nd attempt ... */
161	for (attempts = 0; attempts < 3; attempts++) {
162		net_clear_params();
163		bootp(netdev_sock);
164		if (myip.s_addr != 0)
165			break;
166	}
167	if (myip.s_addr == 0)
168		return(ENOENT);
169
170	printf("Using BOOTP protocol:\n ip addr=%s\n", inet_ntoa(myip));
171	if (hostname[0])
172		printf("  hostname=%s\n", hostname);
173	if (netmask)
174		printf("  netmask=%s\n", intoa(netmask));
175	if (gateip.s_addr)
176		printf("  gateway=%s\n", inet_ntoa(gateip));
177
178	return (0);
179}
180
181/*
182 * libsa's tftp_open expects a pointer to netdev_sock, i.e. an (int *),
183 * in f_devdata, a pointer to which gets handed down from devopen().
184 *
185 * Do not expect booting via different methods to have the same
186 * requirements or semantics.
187 *
188 * net_tftp_bootp uses net_mountroot_bootp because that incidentially does
189 * most of what it needs to do. It of course in no manner actually mounts
190 * anything, all that routine actually does is prepare the socket for the
191 * necessary net access, and print info for the user.
192 */
193
194int
195net_tftp_bootp(int **sock)
196{
197
198	net_mountroot_bootp();
199	if (myip.s_addr == 0)
200		return(ENOENT);
201
202	*sock = &netdev_sock;
203	return (0);
204}
205
206int
207net_mountroot(void)
208{
209	int error;
210
211#ifdef DEBUG
212	printf("net_mountroot\n");
213#endif
214
215	/*
216	 * Get info for NFS boot: our IP address, our hostname,
217	 * server IP address, and our root path on the server.
218	 * There are two ways to do this:  The old, Sun way,
219	 * and the more modern, BOOTP way. (RFC951, RFC1048)
220	 */
221
222		/* Try BOOTP first */
223	error = net_mountroot_bootp();
224		/* Historically, we've used BOOTPARAMS, so try that next */
225	if (error != 0)
226		error = net_mountroot_bootparams();
227	if (error != 0)
228		return (error);
229
230	printf("  root addr=%s\n  path=%s\n", inet_ntoa(rootip), rootpath);
231
232	/* Get the NFS file handle (mount). */
233	if (nfs_mount(netdev_sock, rootip, rootpath) != 0)
234		return (errno);
235
236	return (0);
237}
238