1 /* $NetBSD: netif_of.c,v 1.9 2011/07/30 04:18:38 jakllsch 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 * Open Firmware does most of the job for interfacing to the hardware,
36 * so it is easiest to just replace the netif module with
37 * this adaptation to the PROM network interface.
38 *
39 * Note: this is based in part on sys/arch/sparc/stand/netif_sun.c
40 */
41
42 #include <sys/param.h>
43 #include <sys/socket.h>
44
45 #include <net/if.h>
46 #include <net/if_ether.h>
47
48 #include <netinet/in.h>
49 #include <netinet/in_systm.h>
50
51 #include <lib/libsa/stand.h>
52 #include <lib/libsa/net.h>
53 #include <lib/libsa/netif.h>
54
55 #include <machine/promlib.h>
56
57 #include "ofdev.h"
58
59 static struct netif netif_of;
60
61 struct iodesc sockets[SOPEN_MAX];
62
63 struct iodesc *
socktodesc(int sock)64 socktodesc(int sock)
65 {
66 if (sock != 0)
67 return NULL;
68 return sockets;
69 }
70
71 int
netif_open(void * machdep_hint)72 netif_open(void *machdep_hint)
73 {
74 struct of_dev *op = machdep_hint;
75 struct iodesc *io;
76
77 #ifdef NETIF_DEBUG
78 printf("netif_open...");
79 #endif
80 /* find a free socket */
81 io = sockets;
82 if (io->io_netif) {
83 #ifdef NETIF_DEBUG
84 printf("device busy\n");
85 #endif
86 errno = ENFILE;
87 return -1;
88 }
89 memset(io, 0, sizeof *io);
90
91 netif_of.nif_devdata = op;
92 io->io_netif = &netif_of;
93
94 /* Put our ethernet address in io->myea */
95 _prom_getprop(prom_instance_to_package(op->handle),
96 "mac-address", io->myea, sizeof io->myea);
97
98 #ifdef NETIF_DEBUG
99 printf("OK\n");
100 #endif
101 return 0;
102 }
103
104 int
netif_close(int fd)105 netif_close(int fd)
106 {
107 struct iodesc *io;
108 struct netif *ni;
109
110 #ifdef NETIF_DEBUG
111 printf("netif_close(%x)...", fd);
112 #endif
113 if (fd != 0) {
114 #ifdef NETIF_DEBUG
115 printf("EBADF\n");
116 #endif
117 errno = EBADF;
118 return -1;
119 }
120
121 io = &sockets[fd];
122 ni = io->io_netif;
123 if (ni != NULL) {
124 ni->nif_devdata = NULL;
125 io->io_netif = NULL;
126 }
127 #ifdef NETIF_DEBUG
128 printf("OK\n");
129 #endif
130 return 0;
131 }
132
133 /*
134 * Send a packet. The ether header is already there.
135 * Return the length sent (or -1 on error).
136 */
137 ssize_t
netif_put(struct iodesc * desc,void * pkt,size_t len)138 netif_put(struct iodesc *desc, void *pkt, size_t len)
139 {
140 struct of_dev *op;
141 ssize_t rv;
142 size_t sendlen;
143
144 op = ((struct netif *)desc->io_netif)->nif_devdata;
145
146 #ifdef NETIF_DEBUG
147 {
148 struct ether_header *eh;
149
150 printf("netif_put: desc=%p pkt=%p len=%zu\n",
151 desc, pkt, len);
152 eh = pkt;
153 printf("dst: %s ", ether_sprintf(eh->ether_dhost));
154 printf("src: %s ", ether_sprintf(eh->ether_shost));
155 printf("type: 0x%x\n", eh->ether_type & 0xFFFF);
156 }
157 #endif
158
159 sendlen = len;
160 if (sendlen < 60) {
161 sendlen = 60;
162 #ifdef NETIF_DEBUG
163 printf("netif_put: length padded to %zu\n", sendlen);
164 #endif
165 }
166
167 rv = prom_write(op->handle, pkt, sendlen);
168
169 #ifdef NETIF_DEBUG
170 printf("netif_put: xmit returned %zd\n", rv);
171 #endif
172
173 if (rv > len)
174 rv = len;
175
176 return rv;
177 }
178
179 /*
180 * Receive a packet, including the ether header.
181 * Return the total length received (or -1 on error).
182 */
183 ssize_t
netif_get(struct iodesc * desc,void * pkt,size_t maxlen,saseconds_t timo)184 netif_get(struct iodesc *desc, void *pkt, size_t maxlen, saseconds_t timo)
185 {
186 struct of_dev *op;
187 int tick0, tmo_ms;
188 int len;
189
190 op = ((struct netif *)desc->io_netif)->nif_devdata;
191
192 #ifdef NETIF_DEBUG
193 printf("netif_get: pkt=%p, maxlen=%zu, tmo=%d\n",
194 pkt, maxlen, timo);
195 #endif
196
197 tmo_ms = timo * 1000;
198 tick0 = prom_ticks();
199
200 do {
201 len = prom_read(op->handle, pkt, maxlen);
202 } while ((len == -2 || len == 0) &&
203 (prom_ticks() - tick0 < tmo_ms));
204
205 #ifdef NETIF_DEBUG
206 printf("netif_get: received len=%d\n", len);
207 #endif
208
209 if (len < 12)
210 return -1;
211
212 #ifdef NETIF_DEBUG
213 {
214 struct ether_header *eh = pkt;
215
216 printf("dst: %s ", ether_sprintf(eh->ether_dhost));
217 printf("src: %s ", ether_sprintf(eh->ether_shost));
218 printf("type: 0x%x\n", eh->ether_type & 0xFFFF);
219 }
220 #endif
221
222 return len;
223 }
224
225 /*
226 * Shouldn't really be here, but is used solely for networking, so...
227 */
228 satime_t
getsecs(void)229 getsecs(void)
230 {
231
232 return prom_ticks() / 1000;
233 }
234