if_prom.c revision 1.2 1 /* $NetBSD: if_prom.c,v 1.2 2003/03/13 13:55:24 drochner Exp $ */
2
3 /* Copyright (c) 1999 The NetBSD Foundation, Inc.
4 * All rights reserved.
5 *
6 * This code is derived from software contributed to The NetBSD Foundation
7 * by Gregory McGarry.
8 *
9 * Redistribution and use in source and binary forms, with or without
10 * modification, are permitted provided that the following conditions
11 * are met:
12 * 1. Redistributions of source code must retain the above copyright
13 * notice, this list of conditions and the following disclaimer.
14 * 2. Redistributions in binary form must reproduce the above copyright
15 * notice, this list of conditions and the following disclaimer in the
16 * documentation and/or other materials provided with the distribution.
17 * 3. All advertising materials mentioning features or use of this software
18 * must display the following acknowledgement:
19 * This product includes software developed by the NetBSD
20 * Foundation, Inc. and its contributors.
21 * 4. Neither the name of The NetBSD Foundation nor the names of its
22 * contributors may be used to endorse or promote products derived
23 * from this software without specific prior written permission.
24 *
25 * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
26 * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
27 * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
28 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
29 * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
30 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
31 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
32 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
33 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
34 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
35 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
36 * POSSIBILITY OF SUCH DAMAGE.
37 */
38
39 #include <sys/param.h>
40 #include <sys/types.h>
41
42 #include <net/if_ether.h>
43 #include <netinet/in.h>
44 #include <netinet/in_systm.h>
45 #include <netinet/ip.h>
46
47 #include <lib/libsa/stand.h>
48 #include <lib/libsa/net.h>
49 #include <lib/libsa/netif.h>
50 #include <lib/libkern/libkern.h>
51
52 #include <machine/dec_prom.h>
53 #include <stand/common/common.h>
54
55 #ifdef NET_DEBUG
56 void dump_packet_info __P((void *, int));
57 #endif
58
59 /*
60 * For some reason the proms won't pass arp responses back to us. I
61 * have checked if the first parameter to bootread/bootwrite do anything
62 * but it doesn't appear so. Therefore, we stop the upper layers from
63 * sending arp requests in the first place, by monitoring packets which
64 * come in and filling the arp cache ourselves. - gmcgarry
65 */
66 #ifdef FILL_ARPCACHE
67 struct arp_list {
68 struct in_addr addr;
69 u_char ea[6];
70 };
71 extern struct arp_list arp_list[8];
72 extern int arp_num;
73 void fill_arpcache __P((void *, int));
74 #endif
75
76 /* forward declarations */
77 int prom_probe __P((struct netif *, void *));
78 int prom_match __P((struct netif *, void *));
79 void prom_init __P((struct iodesc *, void *));
80 int prom_get __P((struct iodesc *, void *, size_t, time_t));
81 int prom_put __P((struct iodesc *, void *, size_t));
82 void prom_end __P((struct netif *));
83
84 extern int try_bootp;
85
86 extern struct netif_stats prom_stats[];
87 struct netif_dif prom_ifs[] = {
88 /* dif_unit dif_nsel dif_stats dif_private */
89 { 0, 1, &prom_stats[0], 0, },
90 };
91 #define NPROM_IFS (sizeof(prom_ifs) / sizeof(prom_ifs[0]))
92 struct netif_stats prom_stats[NPROM_IFS];
93
94 struct netif_driver prom_netif_driver = {
95 "prom", /* netif_bname */
96 prom_match, /* netif_match */
97 prom_probe, /* netif_probe */
98 prom_init, /* netif_init */
99 prom_get, /* netif_get */
100 prom_put, /* netif_put */
101 prom_end, /* netif_end */
102 prom_ifs, /* netif_ifs */
103 NPROM_IFS /* netif_nifs */
104 };
105
106 static int sc_fd; /* PROM file id */
107
108 int
109 prom_match(nif, machdep_hint)
110 struct netif *nif;
111 void *machdep_hint;
112 {
113
114 #ifdef NET_DEBUG
115 printf("prom_match: called\n");
116 #endif
117 return (1);
118 }
119
120
121 int
122 prom_probe(nif, machdep_hint)
123 struct netif *nif;
124 void *machdep_hint;
125 {
126
127 #ifdef NET_DEBUG
128 printf("prom_probe: called\n");
129 #endif
130 return 0;
131 }
132
133
134 void
135 prom_init(desc, machdep_hint)
136 struct iodesc *desc;
137 void *machdep_hint;
138 {
139 char *device =
140 ((struct netif *)desc->io_netif)->nif_driver->netif_bname;
141 char *c, *enet;
142 int i, j, num;
143
144 #ifdef NET_DEBUG
145 printf("prom_init: called\n");
146 #endif
147
148 try_bootp = 1;
149
150 /*
151 * Get our hardware address (this prom call is one of the rare ones
152 * which is the same for new and old proms)
153 */
154 enet = (*callv->_getenv)("enet");
155
156 #ifdef NET_DEBUG
157 if (debug)
158 printf("enet=%s\n", enet);
159 #endif
160
161 i=0;
162 c = enet;
163 for (i=0; i<6; i++) {
164 j = *c - '0';
165 num = (j<10?j:j-39);
166 num <<= 4;
167 c++;
168 j = *c - '0';
169 num += (j<10?j:j-39);
170 desc->myea[i] = num;
171 c++;
172 c++; /* skip '-' */
173 }
174
175 desc->xid = 0x66d30000;
176
177 if (callv == &callvec)
178 sc_fd = prom_open(device, 0);
179 else
180 sc_fd = (*callv->_bootinit)(device);
181
182 if (sc_fd < 0)
183 printf("problem initialising device\n");
184 }
185
186
187 int
188 prom_put(desc, pkt, len)
189 struct iodesc *desc;
190 void *pkt;
191 size_t len;
192 {
193 int s;
194
195 #ifdef NET_DEBUG
196 printf("prom_put: called\n");
197 #endif
198
199 #ifdef NET_DEBUG
200 if (debug)
201 dump_packet_info(pkt,len);
202 #endif
203
204 if (callv == &callvec)
205 s = prom_write(sc_fd, pkt, len);
206 else {
207 s = (*callv->_bootwrite)(0, pkt, len);
208 (*callv->_wbflush)(); /* didn't really make a difference */
209 }
210 if (s < 0)
211 return (EIO);
212 return s;
213 }
214
215
216 int
217 prom_get(desc, pkt, len, timeout)
218 struct iodesc *desc;
219 void *pkt;
220 size_t len;
221 time_t timeout;
222 {
223 int s;
224 time_t t;
225
226 #ifdef NET_DEBUG
227 printf("prom_get: called\n");
228 #endif
229
230 t = getsecs();
231 s = 0;
232 while (((getsecs() - t) < timeout) && !s) {
233 if (callv == &callvec)
234 s = prom_read(sc_fd, pkt, len);
235 else
236 s = (*callv->_bootread)(0, pkt, len);
237 }
238
239 #ifdef FILL_ARPCACHE
240 if (s > 0)
241 fill_arpcache(pkt,s);
242 #endif
243
244 return s;
245
246 }
247
248
249 void
250 prom_end(nif)
251 struct netif *nif;
252 {
253
254 #ifdef NET_DEBUG
255 printf("prom_end: called\n");
256 #endif
257
258 if (callv == &callvec)
259 prom_close(sc_fd);
260 }
261
262
263 #ifdef FILL_ARPCACHE
264 void fill_arpcache (pkt, len)
265 void *pkt;
266 int len;
267 {
268 int i;
269 struct arp_list *al;
270 struct ether_header *eh = (struct ether_header *)pkt;
271 struct ip *ih = (struct ip *)(eh + 1);
272
273 #ifdef NET_DEBUG
274 if (debug)
275 dump_packet_info(pkt, len);
276 #endif
277
278 if (ntohs(eh->ether_type) == 0x0800) {
279
280 /* check arp cache */
281 for (i=0, al=arp_list; i<arp_num; ++i, ++al) {
282 if (al->addr.s_addr == ih->ip_src.s_addr) {
283 /* already in cache */
284 return;
285 }
286 }
287 if (arp_num > 7)
288 arp_num = 1; /* recycle */
289 al->addr.s_addr = ih->ip_src.s_addr;
290 for (i=0; i<6; i++)
291 al->ea[i] = eh->ether_shost[i];
292 ++arp_num;
293 }
294
295 }
296 #endif
297
298 #ifdef NET_DEBUG
299 void dump_packet_info(pkt, len)
300 void *pkt;
301 int len;
302 {
303 struct ether_header *eh = (struct ether_header *)pkt;
304 struct ip *ih = (struct ip *)(eh + 1);
305
306 printf("ether_dhost = %s\n", ether_sprintf(eh->ether_dhost));
307 printf("ether_shost = %s\n", ether_sprintf(eh->ether_shost));
308 printf("ether_type = 0x%x\n", ntohs(eh->ether_type));
309
310 if (ntohs(eh->ether_type) == 0x0800) {
311 printf("ip packet version %d\n", ih->ip_v);
312 printf("source ip: 0x%x\n", ih->ip_src.s_addr);
313 printf("dest ip: 0x%x\n", ih->ip_dst.s_addr);
314
315 }
316
317 }
318 #endif
319