cs89x0.c revision 1.54 1 1.54 andvar /* $NetBSD: cs89x0.c,v 1.54 2024/02/10 18:43:52 andvar Exp $ */
2 1.14 chris
3 1.14 chris /*
4 1.14 chris * Copyright (c) 2004 Christopher Gilbert
5 1.14 chris * All rights reserved.
6 1.14 chris *
7 1.14 chris * 1. Redistributions of source code must retain the above copyright
8 1.14 chris * notice, this list of conditions and the following disclaimer.
9 1.14 chris * 2. Redistributions in binary form must reproduce the above copyright
10 1.14 chris * notice, this list of conditions and the following disclaimer in the
11 1.14 chris * documentation and/or other materials provided with the distribution.
12 1.14 chris * 3. The name of the company nor the name of the author may be used to
13 1.14 chris * endorse or promote products derived from this software without specific
14 1.14 chris * prior written permission.
15 1.14 chris *
16 1.14 chris * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR IMPLIED
17 1.14 chris * WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF
18 1.14 chris * MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
19 1.14 chris * IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT,
20 1.14 chris * INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
21 1.14 chris * (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR
22 1.14 chris * SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
23 1.14 chris * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
24 1.14 chris * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
25 1.14 chris * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
26 1.14 chris * SUCH DAMAGE.
27 1.14 chris */
28 1.1 yamt
29 1.1 yamt /*
30 1.1 yamt * Copyright 1997
31 1.1 yamt * Digital Equipment Corporation. All rights reserved.
32 1.1 yamt *
33 1.1 yamt * This software is furnished under license and may be used and
34 1.1 yamt * copied only in accordance with the following terms and conditions.
35 1.1 yamt * Subject to these conditions, you may download, copy, install,
36 1.1 yamt * use, modify and distribute this software in source and/or binary
37 1.1 yamt * form. No title or ownership is transferred hereby.
38 1.1 yamt *
39 1.1 yamt * 1) Any source code used, modified or distributed must reproduce
40 1.1 yamt * and retain this copyright notice and list of conditions as
41 1.1 yamt * they appear in the source file.
42 1.1 yamt *
43 1.1 yamt * 2) No right is granted to use any trade name, trademark, or logo of
44 1.1 yamt * Digital Equipment Corporation. Neither the "Digital Equipment
45 1.1 yamt * Corporation" name nor any trademark or logo of Digital Equipment
46 1.1 yamt * Corporation may be used to endorse or promote products derived
47 1.1 yamt * from this software without the prior written permission of
48 1.1 yamt * Digital Equipment Corporation.
49 1.1 yamt *
50 1.1 yamt * 3) This software is provided "AS-IS" and any express or implied
51 1.1 yamt * warranties, including but not limited to, any implied warranties
52 1.1 yamt * of merchantability, fitness for a particular purpose, or
53 1.1 yamt * non-infringement are disclaimed. In no event shall DIGITAL be
54 1.1 yamt * liable for any damages whatsoever, and in particular, DIGITAL
55 1.1 yamt * shall not be liable for special, indirect, consequential, or
56 1.1 yamt * incidental damages or damages for lost profits, loss of
57 1.1 yamt * revenue or loss of use, whether such damages arise in contract,
58 1.1 yamt * negligence, tort, under statute, in equity, at law or otherwise,
59 1.1 yamt * even if advised of the possibility of such damage.
60 1.1 yamt */
61 1.1 yamt
62 1.1 yamt /*
63 1.1 yamt **++
64 1.1 yamt ** FACILITY
65 1.1 yamt **
66 1.1 yamt ** Device Driver for the Crystal CS8900 ISA Ethernet Controller.
67 1.1 yamt **
68 1.1 yamt ** ABSTRACT
69 1.1 yamt **
70 1.1 yamt ** This module provides standard ethernet access for INET protocols
71 1.1 yamt ** only.
72 1.1 yamt **
73 1.1 yamt ** AUTHORS
74 1.1 yamt **
75 1.1 yamt ** Peter Dettori SEA - Software Engineering.
76 1.1 yamt **
77 1.1 yamt ** CREATION DATE:
78 1.1 yamt **
79 1.1 yamt ** 13-Feb-1997.
80 1.1 yamt **
81 1.1 yamt ** MODIFICATION HISTORY (Digital):
82 1.1 yamt **
83 1.1 yamt ** Revision 1.27 1998/01/20 17:59:40 cgd
84 1.1 yamt ** update for moved headers
85 1.1 yamt **
86 1.1 yamt ** Revision 1.26 1998/01/12 19:29:36 cgd
87 1.1 yamt ** use arm32/isa versions of isadma code.
88 1.1 yamt **
89 1.1 yamt ** Revision 1.25 1997/12/12 01:35:27 cgd
90 1.1 yamt ** convert to use new arp code (from Brini)
91 1.1 yamt **
92 1.1 yamt ** Revision 1.24 1997/12/10 22:31:56 cgd
93 1.1 yamt ** trim some fat (get rid of ability to explicitly supply enet addr, since
94 1.1 yamt ** it was never used and added a bunch of code which really doesn't belong in
95 1.1 yamt ** an enet driver), and clean up slightly.
96 1.1 yamt **
97 1.1 yamt ** Revision 1.23 1997/10/06 16:42:12 cgd
98 1.1 yamt ** copyright notices
99 1.1 yamt **
100 1.1 yamt ** Revision 1.22 1997/06/20 19:38:01 chaiken
101 1.1 yamt ** fixes some smartcard problems
102 1.1 yamt **
103 1.1 yamt ** Revision 1.21 1997/06/10 02:56:20 grohn
104 1.1 yamt ** Added call to ledNetActive
105 1.1 yamt **
106 1.1 yamt ** Revision 1.20 1997/06/05 00:47:06 dettori
107 1.1 yamt ** Changed cs_process_rx_dma to reset and re-initialise the
108 1.1 yamt ** ethernet chip when DMA gets out of sync, or mbufs
109 1.1 yamt ** can't be allocated.
110 1.1 yamt **
111 1.1 yamt ** Revision 1.19 1997/06/03 03:09:58 dettori
112 1.1 yamt ** Turn off sc_txbusy flag when a transmit underrun
113 1.1 yamt ** occurs.
114 1.1 yamt **
115 1.1 yamt ** Revision 1.18 1997/06/02 00:04:35 dettori
116 1.1 yamt ** redefined the transmit table to get around the nfs_timer bug while we are
117 1.1 yamt ** looking into it further.
118 1.1 yamt **
119 1.1 yamt ** Also changed interrupts from EDGE to LEVEL.
120 1.1 yamt **
121 1.1 yamt ** Revision 1.17 1997/05/27 23:31:01 dettori
122 1.1 yamt ** Pulled out changes to DMAMODE defines.
123 1.1 yamt **
124 1.1 yamt ** Revision 1.16 1997/05/23 04:25:16 cgd
125 1.1 yamt ** reformat log so it fits in 80cols
126 1.1 yamt **
127 1.1 yamt ** Revision 1.15 1997/05/23 04:22:18 cgd
128 1.1 yamt ** remove the existing copyright notice (which Peter Dettori indicated
129 1.1 yamt ** was incorrect, copied from an existing NetBSD file only so that the
130 1.1 yamt ** file would have a copyright notice on it, and which he'd intended to
131 1.1 yamt ** replace). Replace it with a Digital copyright notice, cloned from
132 1.1 yamt ** ess.c. It's not really correct either (it indicates that the source
133 1.1 yamt ** is Digital confidential!), but is better than nothing and more
134 1.1 yamt ** correct than what was there before.
135 1.1 yamt **
136 1.1 yamt ** Revision 1.14 1997/05/23 04:12:50 cgd
137 1.1 yamt ** use an adaptive transmit start algorithm: start by telling the chip
138 1.1 yamt ** to start transmitting after 381 bytes have been fed to it. if that
139 1.1 yamt ** gets transmit underruns, ramp down to 1021 bytes then "whole
140 1.1 yamt ** packet." If successful at a given level for a while, try the next
141 1.50 andvar ** more aggressive level. This code doesn't ever try to start
142 1.1 yamt ** transmitting after 5 bytes have been sent to the NIC, because
143 1.1 yamt ** that underruns rather regularly. The back-off and ramp-up mechanism
144 1.1 yamt ** could probably be tuned a little bit, but this works well enough to
145 1.1 yamt ** support > 1MB/s transmit rates on a clear ethernet (which is about
146 1.1 yamt ** 20-25% better than the driver had previously been getting).
147 1.1 yamt **
148 1.1 yamt ** Revision 1.13 1997/05/22 21:06:54 cgd
149 1.1 yamt ** redo cs_copy_tx_frame() from scratch. It had a fatal flaw: it was blindly
150 1.43 msaitoh ** casting from uint8_t * to uint16_t * without worrying about alignment
151 1.1 yamt ** issues. This would cause bogus data to be spit out for mbufs with
152 1.1 yamt ** misaligned data. For instance, it caused the following bits to appear
153 1.1 yamt ** on the wire:
154 1.1 yamt ** ... etBND 1S2C .SHA(K) R ...
155 1.1 yamt ** 11112222333344445555
156 1.1 yamt ** which should have appeared as:
157 1.1 yamt ** ... NetBSD 1.2C (SHARK) ...
158 1.1 yamt ** 11112222333344445555
159 1.1 yamt ** Note the apparent 'rotate' of the bytes in the word, which was due to
160 1.1 yamt ** incorrect unaligned accesses. This data corruption was the cause of
161 1.1 yamt ** incoming telnet/rlogin hangs.
162 1.1 yamt **
163 1.1 yamt ** Revision 1.12 1997/05/22 01:55:32 cgd
164 1.1 yamt ** reformat log so it fits in 80cols
165 1.1 yamt **
166 1.1 yamt ** Revision 1.11 1997/05/22 01:50:27 cgd
167 1.1 yamt ** * enable input packet address checking in the BPF+IFF_PROMISCUOUS case,
168 1.1 yamt ** so packets aimed at other hosts don't get sent to ether_input().
169 1.1 yamt ** * Add a static const char *rcsid initialized with an RCS Id tag, so that
170 1.1 yamt ** you can easily tell (`strings`) what version of the driver is in your
171 1.1 yamt ** kernel binary.
172 1.1 yamt ** * get rid of ether_cmp(). It was inconsistently used, not necessarily
173 1.1 yamt ** safe, and not really a performance win anyway. (It was only used when
174 1.1 yamt ** setting up the multicast logical address filter, which is an
175 1.1 yamt ** infrequent event. It could have been used in the IFF_PROMISCUOUS
176 1.1 yamt ** address check above, but the benefit of it vs. memcmp would be
177 1.1 yamt ** inconsequential, there.) Use memcmp() instead.
178 1.50 andvar ** * restructure csStartOutput to avoid the following bugs in the case where
179 1.1 yamt ** txWait was being set:
180 1.1 yamt ** * it would accidentally drop the outgoing packet if told to wait
181 1.1 yamt ** but the outgoing packet queue was empty.
182 1.1 yamt ** * it would bpf_mtap() the outgoing packet multiple times (once for
183 1.1 yamt ** each time it was told to wait), and would also recalculate
184 1.1 yamt ** the length of the outgoing packet each time it was told to
185 1.1 yamt ** wait.
186 1.1 yamt ** While there, rename txWait to txLoop, since with the new structure of
187 1.1 yamt ** the code, the latter name makes more sense.
188 1.1 yamt **
189 1.1 yamt ** Revision 1.10 1997/05/19 02:03:20 cgd
190 1.1 yamt ** Set RX_CTL in cs_set_ladr_filt(), rather than cs_initChip(). cs_initChip()
191 1.1 yamt ** is the only caller of cs_set_ladr_filt(), and always calls it, so this
192 1.1 yamt ** ends up being logically the same. In cs_set_ladr_filt(), if IFF_PROMISC
193 1.1 yamt ** is set, enable promiscuous mode (and set IFF_ALLMULTI), otherwise behave
194 1.1 yamt ** as before.
195 1.1 yamt **
196 1.1 yamt ** Revision 1.9 1997/05/19 01:45:37 cgd
197 1.1 yamt ** create a new function, cs_ether_input(), which does received-packet
198 1.1 yamt ** BPF and ether_input processing. This code used to be in three places,
199 1.1 yamt ** and centralizing it will make adding IFF_PROMISC support much easier.
200 1.1 yamt ** Also, in cs_copy_tx_frame(), put it some (currently disabled) code to
201 1.1 yamt ** do copies with bus_space_write_region_2(). It's more correct, and
202 1.1 yamt ** potentially more efficient. That function needs to be gutted (to
203 1.1 yamt ** deal properly with alignment issues, which it currently does wrong),
204 1.1 yamt ** however, and the change doesn't gain much, so there's no point in
205 1.1 yamt ** enabling it now.
206 1.1 yamt **
207 1.1 yamt ** Revision 1.8 1997/05/19 01:17:10 cgd
208 1.1 yamt ** fix a comment re: the setting of the TxConfig register. Clean up
209 1.1 yamt ** interface counter maintenance (make it use standard idiom).
210 1.1 yamt **
211 1.1 yamt **--
212 1.1 yamt */
213 1.1 yamt
214 1.1 yamt #include <sys/cdefs.h>
215 1.54 andvar __KERNEL_RCSID(0, "$NetBSD: cs89x0.c,v 1.54 2024/02/10 18:43:52 andvar Exp $");
216 1.1 yamt
217 1.1 yamt #include "opt_inet.h"
218 1.1 yamt
219 1.1 yamt #include <sys/param.h>
220 1.1 yamt #include <sys/systm.h>
221 1.1 yamt #include <sys/mbuf.h>
222 1.1 yamt #include <sys/syslog.h>
223 1.1 yamt #include <sys/socket.h>
224 1.1 yamt #include <sys/device.h>
225 1.1 yamt #include <sys/malloc.h>
226 1.1 yamt #include <sys/ioctl.h>
227 1.1 yamt #include <sys/errno.h>
228 1.44 msaitoh #include <sys/bus.h>
229 1.44 msaitoh #include <sys/intr.h>
230 1.35 riastrad #include <sys/rndsource.h>
231 1.1 yamt
232 1.1 yamt #include <net/if.h>
233 1.1 yamt #include <net/if_ether.h>
234 1.1 yamt #include <net/if_media.h>
235 1.40 msaitoh #include <net/bpf.h>
236 1.40 msaitoh
237 1.1 yamt #ifdef INET
238 1.1 yamt #include <netinet/in.h>
239 1.1 yamt #include <netinet/if_inarp.h>
240 1.1 yamt #endif
241 1.1 yamt
242 1.1 yamt #include <dev/ic/cs89x0reg.h>
243 1.1 yamt #include <dev/ic/cs89x0var.h>
244 1.1 yamt
245 1.1 yamt #ifdef SHARK
246 1.3 pooka #include <shark/shark/sequoia.h>
247 1.1 yamt #endif
248 1.1 yamt
249 1.1 yamt /*
250 1.1 yamt * MACRO DEFINITIONS
251 1.1 yamt */
252 1.1 yamt #define CS_OUTPUT_LOOP_MAX 100 /* max times round notorious tx loop */
253 1.1 yamt
254 1.1 yamt /*
255 1.1 yamt * FUNCTION PROTOTYPES
256 1.1 yamt */
257 1.28 tsutsui static void cs_get_default_media(struct cs_softc *);
258 1.28 tsutsui static int cs_get_params(struct cs_softc *);
259 1.28 tsutsui static int cs_get_enaddr(struct cs_softc *);
260 1.28 tsutsui static int cs_reset_chip(struct cs_softc *);
261 1.28 tsutsui static void cs_reset(struct cs_softc *);
262 1.28 tsutsui static int cs_ioctl(struct ifnet *, u_long, void *);
263 1.28 tsutsui static void cs_initChip(struct cs_softc *);
264 1.43 msaitoh static void cs_buffer_event(struct cs_softc *, uint16_t);
265 1.43 msaitoh static void cs_transmit_event(struct cs_softc *, uint16_t);
266 1.43 msaitoh static void cs_receive_event(struct cs_softc *, uint16_t);
267 1.28 tsutsui static void cs_process_receive(struct cs_softc *);
268 1.28 tsutsui static void cs_process_rx_early(struct cs_softc *);
269 1.28 tsutsui static void cs_start_output(struct ifnet *);
270 1.28 tsutsui static void cs_copy_tx_frame(struct cs_softc *, struct mbuf *);
271 1.28 tsutsui static void cs_set_ladr_filt(struct cs_softc *, struct ethercom *);
272 1.43 msaitoh static uint16_t cs_hash_index(char *);
273 1.43 msaitoh static void cs_counter_event(struct cs_softc *, uint16_t);
274 1.5 augustss
275 1.28 tsutsui static int cs_mediachange(struct ifnet *);
276 1.28 tsutsui static void cs_mediastatus(struct ifnet *, struct ifmediareq *);
277 1.5 augustss
278 1.25 tsutsui static bool cs_shutdown(device_t, int);
279 1.5 augustss static int cs_enable(struct cs_softc *);
280 1.5 augustss static void cs_disable(struct cs_softc *);
281 1.5 augustss static void cs_stop(struct ifnet *, int);
282 1.14 chris static int cs_scan_eeprom(struct cs_softc *);
283 1.43 msaitoh static int cs_read_pktpg_from_eeprom(struct cs_softc *, int, uint16_t *);
284 1.14 chris
285 1.1 yamt
286 1.1 yamt /*
287 1.1 yamt * GLOBAL DECLARATIONS
288 1.1 yamt */
289 1.1 yamt
290 1.1 yamt /*
291 1.1 yamt * Xmit-early table.
292 1.1 yamt *
293 1.1 yamt * To get better performance, we tell the chip to start packet
294 1.1 yamt * transmission before the whole packet is copied to the chip.
295 1.1 yamt * However, this can fail under load. When it fails, we back off
296 1.1 yamt * to a safer setting for a little while.
297 1.1 yamt *
298 1.1 yamt * txcmd is the value of txcmd used to indicate when to start transmission.
299 1.1 yamt * better is the next 'better' state in the table.
300 1.1 yamt * better_count is the number of output packets before transition to the
301 1.1 yamt * better state.
302 1.1 yamt * worse is the next 'worse' state in the table.
303 1.1 yamt *
304 1.1 yamt * Transition to the next worse state happens automatically when a
305 1.54 andvar * transmission underrun occurs.
306 1.1 yamt */
307 1.1 yamt struct cs_xmit_early {
308 1.43 msaitoh uint16_t txcmd;
309 1.43 msaitoh int better;
310 1.43 msaitoh int better_count;
311 1.43 msaitoh int worse;
312 1.1 yamt } cs_xmit_early_table[3] = {
313 1.1 yamt { TX_CMD_START_381, 0, INT_MAX, 1, },
314 1.1 yamt { TX_CMD_START_1021, 0, 50000, 2, },
315 1.1 yamt { TX_CMD_START_ALL, 1, 5000, 2, },
316 1.1 yamt };
317 1.1 yamt
318 1.1 yamt int cs_default_media[] = {
319 1.43 msaitoh IFM_ETHER | IFM_10_2,
320 1.43 msaitoh IFM_ETHER | IFM_10_5,
321 1.43 msaitoh IFM_ETHER | IFM_10_T,
322 1.43 msaitoh IFM_ETHER | IFM_10_T | IFM_FDX,
323 1.1 yamt };
324 1.43 msaitoh int cs_default_nmedia = __arraycount(cs_default_media);
325 1.1 yamt
326 1.16 perry int
327 1.43 msaitoh cs_attach(struct cs_softc *sc, uint8_t *enaddr, int *media,
328 1.5 augustss int nmedia, int defmedia)
329 1.1 yamt {
330 1.1 yamt struct ifnet *ifp = &sc->sc_ethercom.ec_if;
331 1.1 yamt const char *chipname, *medname;
332 1.43 msaitoh uint16_t reg;
333 1.1 yamt int i;
334 1.1 yamt
335 1.1 yamt /* Start out in IO mode */
336 1.1 yamt sc->sc_memorymode = FALSE;
337 1.1 yamt
338 1.43 msaitoh /* Make sure we're right */
339 1.1 yamt for (i = 0; i < 10000; i++) {
340 1.1 yamt reg = CS_READ_PACKET_PAGE(sc, PKTPG_EISA_NUM);
341 1.43 msaitoh if (reg == EISA_NUM_CRYSTAL)
342 1.1 yamt break;
343 1.1 yamt }
344 1.1 yamt if (i == 10000) {
345 1.26 tsutsui aprint_error_dev(sc->sc_dev, "wrong id(0x%x)\n", reg);
346 1.1 yamt return 1; /* XXX should panic? */
347 1.1 yamt }
348 1.1 yamt
349 1.1 yamt reg = CS_READ_PACKET_PAGE(sc, PKTPG_PRODUCT_ID);
350 1.1 yamt sc->sc_prodid = reg & PROD_ID_MASK;
351 1.1 yamt sc->sc_prodrev = (reg & PROD_REV_MASK) >> 8;
352 1.1 yamt
353 1.1 yamt switch (sc->sc_prodid) {
354 1.1 yamt case PROD_ID_CS8900:
355 1.1 yamt chipname = "CS8900";
356 1.1 yamt break;
357 1.1 yamt case PROD_ID_CS8920:
358 1.1 yamt chipname = "CS8920";
359 1.1 yamt break;
360 1.1 yamt case PROD_ID_CS8920M:
361 1.1 yamt chipname = "CS8920M";
362 1.1 yamt break;
363 1.1 yamt default:
364 1.1 yamt panic("cs_attach: impossible");
365 1.1 yamt }
366 1.1 yamt
367 1.1 yamt /*
368 1.43 msaitoh * The first thing to do is check that the mbuf cluster size is
369 1.1 yamt * greater than the MTU for an ethernet frame. The code depends on
370 1.1 yamt * this and to port this to a OS where this was not the case would
371 1.1 yamt * not be straightforward.
372 1.2 yamt *
373 1.43 msaitoh * We need 1 byte spare because our packet read loop can overrun.
374 1.2 yamt * and we may need pad bytes to align ip header.
375 1.1 yamt */
376 1.43 msaitoh if (MCLBYTES < ETHER_MAX_LEN + 1 + ALIGN(sizeof(struct ether_header))
377 1.43 msaitoh - sizeof(struct ether_header)) {
378 1.1 yamt printf("%s: MCLBYTES too small for Ethernet frame\n",
379 1.26 tsutsui device_xname(sc->sc_dev));
380 1.1 yamt return 1;
381 1.1 yamt }
382 1.1 yamt
383 1.1 yamt /* Start out not transmitting */
384 1.1 yamt sc->sc_txbusy = FALSE;
385 1.1 yamt
386 1.51 andvar /* Set up early transmit threshold */
387 1.1 yamt sc->sc_xe_ent = 0;
388 1.1 yamt sc->sc_xe_togo = cs_xmit_early_table[sc->sc_xe_ent].better_count;
389 1.1 yamt
390 1.1 yamt /* Initialize ifnet structure. */
391 1.26 tsutsui strlcpy(ifp->if_xname, device_xname(sc->sc_dev), IFNAMSIZ);
392 1.1 yamt ifp->if_softc = sc;
393 1.1 yamt ifp->if_start = cs_start_output;
394 1.1 yamt ifp->if_init = cs_init;
395 1.1 yamt ifp->if_ioctl = cs_ioctl;
396 1.1 yamt ifp->if_stop = cs_stop;
397 1.43 msaitoh ifp->if_watchdog = NULL; /* No watchdog at this stage */
398 1.42 msaitoh ifp->if_flags = IFF_SIMPLEX | IFF_BROADCAST | IFF_MULTICAST;
399 1.1 yamt IFQ_SET_READY(&ifp->if_snd);
400 1.1 yamt
401 1.1 yamt /* Initialize ifmedia structures. */
402 1.47 msaitoh sc->sc_ethercom.ec_ifmedia = &sc->sc_media;
403 1.1 yamt ifmedia_init(&sc->sc_media, 0, cs_mediachange, cs_mediastatus);
404 1.1 yamt
405 1.1 yamt if (media != NULL) {
406 1.1 yamt for (i = 0; i < nmedia; i++)
407 1.1 yamt ifmedia_add(&sc->sc_media, media[i], 0, NULL);
408 1.1 yamt ifmedia_set(&sc->sc_media, defmedia);
409 1.1 yamt } else {
410 1.1 yamt for (i = 0; i < cs_default_nmedia; i++)
411 1.1 yamt ifmedia_add(&sc->sc_media, cs_default_media[i],
412 1.1 yamt 0, NULL);
413 1.1 yamt cs_get_default_media(sc);
414 1.1 yamt }
415 1.16 perry
416 1.14 chris if (sc->sc_cfgflags & CFGFLG_PARSE_EEPROM) {
417 1.14 chris if (cs_scan_eeprom(sc) == CS_ERROR) {
418 1.43 msaitoh /*
419 1.43 msaitoh * Failed to scan the eeprom, pretend there isn't an
420 1.43 msaitoh * eeprom
421 1.43 msaitoh */
422 1.43 msaitoh aprint_error_dev(sc->sc_dev,
423 1.43 msaitoh "unable to scan EEPROM\n");
424 1.14 chris sc->sc_cfgflags |= CFGFLG_NOT_EEPROM;
425 1.14 chris }
426 1.16 perry }
427 1.1 yamt
428 1.1 yamt if ((sc->sc_cfgflags & CFGFLG_NOT_EEPROM) == 0) {
429 1.1 yamt /* Get parameters from the EEPROM */
430 1.1 yamt if (cs_get_params(sc) == CS_ERROR) {
431 1.26 tsutsui aprint_error_dev(sc->sc_dev,
432 1.26 tsutsui "unable to get settings from EEPROM\n");
433 1.1 yamt return 1;
434 1.1 yamt }
435 1.1 yamt }
436 1.1 yamt
437 1.1 yamt if (enaddr != NULL)
438 1.1 yamt memcpy(sc->sc_enaddr, enaddr, sizeof(sc->sc_enaddr));
439 1.1 yamt else if ((sc->sc_cfgflags & CFGFLG_NOT_EEPROM) == 0) {
440 1.1 yamt /* Get and store the Ethernet address */
441 1.1 yamt if (cs_get_enaddr(sc) == CS_ERROR) {
442 1.26 tsutsui aprint_error_dev(sc->sc_dev,
443 1.26 tsutsui "unable to read Ethernet address\n");
444 1.1 yamt return 1;
445 1.1 yamt }
446 1.1 yamt } else {
447 1.6 augustss #if 1
448 1.17 christos int j;
449 1.6 augustss uint v;
450 1.6 augustss
451 1.17 christos for (j = 0; j < 6; j += 2) {
452 1.17 christos v = CS_READ_PACKET_PAGE(sc, PKTPG_IND_ADDR + j);
453 1.17 christos sc->sc_enaddr[j + 0] = v;
454 1.17 christos sc->sc_enaddr[j + 1] = v >> 8;
455 1.6 augustss }
456 1.6 augustss #else
457 1.26 tsutsui printf("%s: no Ethernet address!\n", device_xname(sc->sc_dev));
458 1.1 yamt return 1;
459 1.6 augustss #endif
460 1.1 yamt }
461 1.1 yamt
462 1.1 yamt switch (IFM_SUBTYPE(sc->sc_media.ifm_cur->ifm_media)) {
463 1.1 yamt case IFM_10_2:
464 1.1 yamt medname = "BNC";
465 1.1 yamt break;
466 1.1 yamt case IFM_10_5:
467 1.1 yamt medname = "AUI";
468 1.1 yamt break;
469 1.1 yamt case IFM_10_T:
470 1.1 yamt if (sc->sc_media.ifm_cur->ifm_media & IFM_FDX)
471 1.1 yamt medname = "UTP <full-duplex>";
472 1.1 yamt else
473 1.1 yamt medname = "UTP";
474 1.1 yamt break;
475 1.1 yamt default:
476 1.1 yamt panic("cs_attach: impossible");
477 1.1 yamt }
478 1.26 tsutsui printf("%s: %s rev. %c, address %s, media %s\n",
479 1.26 tsutsui device_xname(sc->sc_dev),
480 1.1 yamt chipname, sc->sc_prodrev + 'A', ether_sprintf(sc->sc_enaddr),
481 1.1 yamt medname);
482 1.1 yamt
483 1.1 yamt if (sc->sc_dma_attach)
484 1.1 yamt (*sc->sc_dma_attach)(sc);
485 1.1 yamt
486 1.1 yamt /* Attach the interface. */
487 1.1 yamt if_attach(ifp);
488 1.39 ozaki if_deferred_start_init(ifp, NULL);
489 1.1 yamt ether_ifattach(ifp, sc->sc_enaddr);
490 1.1 yamt
491 1.26 tsutsui rnd_attach_source(&sc->rnd_source, device_xname(sc->sc_dev),
492 1.34 tls RND_TYPE_NET, RND_FLAG_DEFAULT);
493 1.1 yamt sc->sc_cfgflags |= CFGFLG_ATTACHED;
494 1.1 yamt
495 1.26 tsutsui if (pmf_device_register1(sc->sc_dev, NULL, NULL, cs_shutdown))
496 1.26 tsutsui pmf_class_network_register(sc->sc_dev, ifp);
497 1.25 tsutsui else
498 1.26 tsutsui aprint_error_dev(sc->sc_dev,
499 1.25 tsutsui "couldn't establish power handler\n");
500 1.25 tsutsui
501 1.1 yamt /* Reset the chip */
502 1.1 yamt if (cs_reset_chip(sc) == CS_ERROR) {
503 1.26 tsutsui aprint_error_dev(sc->sc_dev, "reset failed\n");
504 1.1 yamt cs_detach(sc);
505 1.1 yamt return 1;
506 1.1 yamt }
507 1.1 yamt
508 1.1 yamt return 0;
509 1.1 yamt }
510 1.1 yamt
511 1.1 yamt int
512 1.5 augustss cs_detach(struct cs_softc *sc)
513 1.1 yamt {
514 1.1 yamt struct ifnet *ifp = &sc->sc_ethercom.ec_if;
515 1.1 yamt
516 1.1 yamt if (sc->sc_cfgflags & CFGFLG_ATTACHED) {
517 1.1 yamt rnd_detach_source(&sc->rnd_source);
518 1.1 yamt ether_ifdetach(ifp);
519 1.1 yamt if_detach(ifp);
520 1.49 thorpej ifmedia_fini(&sc->sc_media);
521 1.1 yamt sc->sc_cfgflags &= ~CFGFLG_ATTACHED;
522 1.1 yamt }
523 1.16 perry
524 1.1 yamt #if 0
525 1.43 msaitoh /* XXX not necessary */
526 1.1 yamt if (sc->sc_cfgflags & CFGFLG_DMA_MODE) {
527 1.43 msaitoh isa_dmamem_unmap(sc->sc_ic, sc->sc_drq, sc->sc_dmabase,
528 1.43 msaitoh sc->sc_dmasize);
529 1.43 msaitoh isa_dmamem_free(sc->sc_ic, sc->sc_drq, sc->sc_dmaaddr,
530 1.43 msaitoh sc->sc_dmasize);
531 1.1 yamt isa_dmamap_destroy(sc->sc_ic, sc->sc_drq);
532 1.1 yamt sc->sc_cfgflags &= ~CFGFLG_DMA_MODE;
533 1.1 yamt }
534 1.1 yamt #endif
535 1.1 yamt
536 1.26 tsutsui pmf_device_deregister(sc->sc_dev);
537 1.25 tsutsui
538 1.1 yamt return 0;
539 1.1 yamt }
540 1.1 yamt
541 1.25 tsutsui bool
542 1.25 tsutsui cs_shutdown(device_t self, int howto)
543 1.25 tsutsui {
544 1.25 tsutsui struct cs_softc *sc;
545 1.25 tsutsui
546 1.25 tsutsui sc = device_private(self);
547 1.25 tsutsui cs_reset(sc);
548 1.25 tsutsui
549 1.25 tsutsui return true;
550 1.25 tsutsui }
551 1.25 tsutsui
552 1.1 yamt void
553 1.5 augustss cs_get_default_media(struct cs_softc *sc)
554 1.1 yamt {
555 1.43 msaitoh uint16_t adp_cfg, xmit_ctl;
556 1.1 yamt
557 1.6 augustss if (cs_verify_eeprom(sc) == CS_ERROR) {
558 1.26 tsutsui aprint_error_dev(sc->sc_dev,
559 1.26 tsutsui "cs_get_default_media: EEPROM missing or bad\n");
560 1.1 yamt goto fakeit;
561 1.1 yamt }
562 1.1 yamt
563 1.6 augustss if (cs_read_eeprom(sc, EEPROM_ADPTR_CFG, &adp_cfg) == CS_ERROR) {
564 1.26 tsutsui aprint_error_dev(sc->sc_dev,
565 1.26 tsutsui "unable to read adapter config from EEPROM\n");
566 1.1 yamt goto fakeit;
567 1.1 yamt }
568 1.1 yamt
569 1.6 augustss if (cs_read_eeprom(sc, EEPROM_XMIT_CTL, &xmit_ctl) == CS_ERROR) {
570 1.26 tsutsui aprint_error_dev(sc->sc_dev,
571 1.26 tsutsui "unable to read transmit control from EEPROM\n");
572 1.1 yamt goto fakeit;
573 1.1 yamt }
574 1.1 yamt
575 1.1 yamt switch (adp_cfg & ADPTR_CFG_MEDIA) {
576 1.1 yamt case ADPTR_CFG_AUI:
577 1.45 msaitoh ifmedia_set(&sc->sc_media, IFM_ETHER | IFM_10_5);
578 1.1 yamt break;
579 1.1 yamt case ADPTR_CFG_10BASE2:
580 1.45 msaitoh ifmedia_set(&sc->sc_media, IFM_ETHER | IFM_10_2);
581 1.1 yamt break;
582 1.1 yamt case ADPTR_CFG_10BASET:
583 1.1 yamt default:
584 1.1 yamt if (xmit_ctl & XMIT_CTL_FDX)
585 1.45 msaitoh ifmedia_set(&sc->sc_media, IFM_ETHER | IFM_10_T
586 1.45 msaitoh | IFM_FDX);
587 1.1 yamt else
588 1.45 msaitoh ifmedia_set(&sc->sc_media, IFM_ETHER | IFM_10_T);
589 1.1 yamt break;
590 1.1 yamt }
591 1.1 yamt return;
592 1.1 yamt
593 1.1 yamt fakeit:
594 1.26 tsutsui aprint_error_dev(sc->sc_dev,
595 1.26 tsutsui "WARNING: default media setting may be inaccurate\n");
596 1.1 yamt /* XXX Arbitrary... */
597 1.45 msaitoh ifmedia_set(&sc->sc_media, IFM_ETHER | IFM_10_T);
598 1.1 yamt }
599 1.1 yamt
600 1.14 chris /*
601 1.14 chris * cs_scan_eeprom
602 1.14 chris *
603 1.14 chris * Attempt to take a complete copy of the eeprom into main memory.
604 1.14 chris * this will allow faster parsing of the eeprom data.
605 1.14 chris *
606 1.14 chris * Only tested against a 8920M's eeprom, but the data sheet for the
607 1.14 chris * 8920A indicates that is uses the same layout.
608 1.14 chris */
609 1.16 perry int
610 1.14 chris cs_scan_eeprom(struct cs_softc *sc)
611 1.14 chris {
612 1.43 msaitoh uint16_t result;
613 1.14 chris int i;
614 1.14 chris int eeprom_size;
615 1.43 msaitoh uint8_t checksum = 0;
616 1.14 chris
617 1.14 chris if (cs_verify_eeprom(sc) == CS_ERROR) {
618 1.26 tsutsui aprint_error_dev(sc->sc_dev,
619 1.26 tsutsui "cs_scan_params: EEPROM missing or bad\n");
620 1.43 msaitoh return CS_ERROR;
621 1.14 chris }
622 1.14 chris
623 1.16 perry /*
624 1.43 msaitoh * Read the 0th word from the eeprom, it will tell us the length
625 1.14 chris * and if the eeprom is valid
626 1.14 chris */
627 1.14 chris cs_read_eeprom(sc, 0, &result);
628 1.14 chris
629 1.43 msaitoh /* Check the eeprom signature */
630 1.14 chris if ((result & 0xE000) != 0xA000) {
631 1.43 msaitoh /* Empty eeprom */
632 1.43 msaitoh return CS_ERROR;
633 1.14 chris }
634 1.14 chris
635 1.16 perry /*
636 1.43 msaitoh * Take the eeprom size (note the read value doesn't include the header
637 1.14 chris * word)
638 1.14 chris */
639 1.14 chris eeprom_size = (result & 0xff) + 2;
640 1.14 chris
641 1.14 chris sc->eeprom_data = malloc(eeprom_size, M_DEVBUF, M_WAITOK);
642 1.14 chris if (sc->eeprom_data == NULL) {
643 1.43 msaitoh /* No memory, treat this as if there's no eeprom */
644 1.43 msaitoh return CS_ERROR;
645 1.14 chris }
646 1.16 perry
647 1.14 chris sc->eeprom_size = eeprom_size;
648 1.14 chris
649 1.43 msaitoh /* Read the eeprom into the buffer, also calculate the checksum */
650 1.14 chris for (i = 0; i < (eeprom_size >> 1); i++) {
651 1.14 chris cs_read_eeprom(sc, i, &(sc->eeprom_data[i]));
652 1.14 chris checksum += (sc->eeprom_data[i] & 0xff00) >> 8;
653 1.14 chris checksum += (sc->eeprom_data[i] & 0x00ff);
654 1.14 chris }
655 1.14 chris
656 1.16 perry /*
657 1.43 msaitoh * Validate checksum calculation, the sum of all the bytes should be 0,
658 1.14 chris * as the high byte of the last word is the 2's complement of the
659 1.14 chris * sum to that point.
660 1.14 chris */
661 1.14 chris if (checksum != 0) {
662 1.26 tsutsui aprint_error_dev(sc->sc_dev, "eeprom checksum failure\n");
663 1.43 msaitoh return CS_ERROR;
664 1.14 chris }
665 1.14 chris
666 1.43 msaitoh return CS_OK;
667 1.14 chris }
668 1.14 chris
669 1.16 perry static int
670 1.43 msaitoh cs_read_pktpg_from_eeprom(struct cs_softc *sc, int pktpg, uint16_t *pValue)
671 1.14 chris {
672 1.14 chris int x, maxword;
673 1.14 chris
674 1.14 chris /* Check that we have eeprom data */
675 1.19 chris if ((sc->eeprom_data == NULL) || (sc->eeprom_size < 2))
676 1.43 msaitoh return CS_ERROR;
677 1.14 chris
678 1.14 chris /*
679 1.14 chris * We only want to read the data words, the last word contains the
680 1.14 chris * checksum
681 1.14 chris */
682 1.14 chris maxword = (sc->eeprom_size - 2) >> 1;
683 1.14 chris
684 1.43 msaitoh /* Start 1 word in, as the first word is the length and signature */
685 1.14 chris x = 1;
686 1.14 chris
687 1.14 chris while ( x < (maxword)) {
688 1.43 msaitoh uint16_t header;
689 1.14 chris int group_size;
690 1.14 chris int offset;
691 1.14 chris int offset_max;
692 1.14 chris
693 1.43 msaitoh /* Read in the group header word */
694 1.14 chris header = sc->eeprom_data[x];
695 1.43 msaitoh x++; /* Skip group header */
696 1.14 chris
697 1.16 perry /*
698 1.43 msaitoh * Size of group in words is in the top 4 bits, note that it
699 1.14 chris * is one less than the number of words
700 1.14 chris */
701 1.14 chris group_size = header & 0xF000;
702 1.14 chris
703 1.16 perry /*
704 1.14 chris * CS8900 Data sheet says this should be 0x01ff,
705 1.16 perry * but my cs8920 eeprom has higher offsets,
706 1.16 perry * perhaps the 8920 allows higher offsets, otherwise
707 1.14 chris * it's writing to places that it shouldn't
708 1.14 chris */
709 1.43 msaitoh /* Work out the offsets this group covers */
710 1.14 chris offset = header & 0x0FFF;
711 1.14 chris offset_max = offset + (group_size << 1);
712 1.14 chris
713 1.43 msaitoh /* Check if the pkgpg we're after is in this group */
714 1.14 chris if ((offset <= pktpg) && (pktpg <= offset_max)) {
715 1.43 msaitoh /* The pkgpg value we want is in here */
716 1.14 chris int eeprom_location;
717 1.16 perry
718 1.14 chris eeprom_location = ((pktpg - offset) >> 1) ;
719 1.16 perry
720 1.16 perry *pValue = sc->eeprom_data[x + eeprom_location];
721 1.43 msaitoh return CS_OK;
722 1.14 chris } else {
723 1.43 msaitoh /* Skip this group (+ 1 for first entry) */
724 1.14 chris x += group_size + 1;
725 1.14 chris }
726 1.14 chris }
727 1.14 chris
728 1.14 chris /*
729 1.43 msaitoh * If we've fallen out here then we don't have a value in the EEPROM
730 1.16 perry * for this pktpg so return an error
731 1.14 chris */
732 1.43 msaitoh return CS_ERROR;
733 1.14 chris }
734 1.14 chris
735 1.16 perry int
736 1.5 augustss cs_get_params(struct cs_softc *sc)
737 1.1 yamt {
738 1.43 msaitoh uint16_t isaConfig;
739 1.43 msaitoh uint16_t adapterConfig;
740 1.1 yamt
741 1.6 augustss if (cs_verify_eeprom(sc) == CS_ERROR) {
742 1.26 tsutsui aprint_error_dev(sc->sc_dev,
743 1.26 tsutsui "cs_get_params: EEPROM missing or bad\n");
744 1.43 msaitoh return CS_ERROR;
745 1.1 yamt }
746 1.1 yamt
747 1.14 chris if (sc->sc_cfgflags & CFGFLG_PARSE_EEPROM) {
748 1.14 chris /* Get ISA configuration from the EEPROM */
749 1.14 chris if (cs_read_pktpg_from_eeprom(sc, PKTPG_BUS_CTL, &isaConfig)
750 1.43 msaitoh == CS_ERROR) {
751 1.43 msaitoh /*
752 1.43 msaitoh * Eeprom doesn't have this value, use data sheet
753 1.43 msaitoh * default
754 1.43 msaitoh */
755 1.14 chris isaConfig = 0x0017;
756 1.14 chris }
757 1.14 chris
758 1.14 chris /* Get adapter configuration from the EEPROM */
759 1.43 msaitoh if (cs_read_pktpg_from_eeprom(sc, PKTPG_SELF_CTL,
760 1.43 msaitoh &adapterConfig) == CS_ERROR) {
761 1.43 msaitoh /*
762 1.43 msaitoh * Eeprom doesn't have this value, use data sheet
763 1.43 msaitoh * default
764 1.43 msaitoh */
765 1.14 chris adapterConfig = 0x0015;
766 1.14 chris }
767 1.14 chris
768 1.14 chris /* Copy the USE_SA flag */
769 1.14 chris if (isaConfig & BUS_CTL_USE_SA)
770 1.14 chris sc->sc_cfgflags |= CFGFLG_USE_SA;
771 1.14 chris
772 1.14 chris /* Copy the IO Channel Ready flag */
773 1.14 chris if (isaConfig & BUS_CTL_IOCHRDY)
774 1.14 chris sc->sc_cfgflags |= CFGFLG_IOCHRDY;
775 1.14 chris
776 1.14 chris /* Copy the DC/DC Polarity flag */
777 1.14 chris if (adapterConfig & SELF_CTL_HCB1)
778 1.14 chris sc->sc_cfgflags |= CFGFLG_DCDC_POL;
779 1.14 chris } else {
780 1.14 chris /* Get ISA configuration from the EEPROM */
781 1.14 chris if (cs_read_eeprom(sc, EEPROM_ISA_CFG, &isaConfig) == CS_ERROR)
782 1.14 chris goto eeprom_bad;
783 1.14 chris
784 1.14 chris /* Get adapter configuration from the EEPROM */
785 1.43 msaitoh if (cs_read_eeprom(sc, EEPROM_ADPTR_CFG, &adapterConfig)
786 1.43 msaitoh == CS_ERROR)
787 1.14 chris goto eeprom_bad;
788 1.14 chris
789 1.14 chris /* Copy the USE_SA flag */
790 1.14 chris if (isaConfig & ISA_CFG_USE_SA)
791 1.14 chris sc->sc_cfgflags |= CFGFLG_USE_SA;
792 1.14 chris
793 1.14 chris /* Copy the IO Channel Ready flag */
794 1.14 chris if (isaConfig & ISA_CFG_IOCHRDY)
795 1.14 chris sc->sc_cfgflags |= CFGFLG_IOCHRDY;
796 1.14 chris
797 1.14 chris /* Copy the DC/DC Polarity flag */
798 1.14 chris if (adapterConfig & ADPTR_CFG_DCDC_POL)
799 1.14 chris sc->sc_cfgflags |= CFGFLG_DCDC_POL;
800 1.14 chris }
801 1.1 yamt
802 1.43 msaitoh return CS_OK;
803 1.14 chris eeprom_bad:
804 1.26 tsutsui aprint_error_dev(sc->sc_dev,
805 1.26 tsutsui "cs_get_params: unable to read from EEPROM\n");
806 1.43 msaitoh return CS_ERROR;
807 1.1 yamt }
808 1.1 yamt
809 1.16 perry int
810 1.5 augustss cs_get_enaddr(struct cs_softc *sc)
811 1.1 yamt {
812 1.27 tsutsui uint16_t myea[ETHER_ADDR_LEN / sizeof(uint16_t)];
813 1.27 tsutsui int i;
814 1.1 yamt
815 1.6 augustss if (cs_verify_eeprom(sc) == CS_ERROR) {
816 1.26 tsutsui aprint_error_dev(sc->sc_dev,
817 1.26 tsutsui "cs_get_enaddr: EEPROM missing or bad\n");
818 1.43 msaitoh return CS_ERROR;
819 1.1 yamt }
820 1.1 yamt
821 1.1 yamt /* Get Ethernet address from the EEPROM */
822 1.14 chris if (sc->sc_cfgflags & CFGFLG_PARSE_EEPROM) {
823 1.14 chris if (cs_read_pktpg_from_eeprom(sc, PKTPG_IND_ADDR, &myea[0])
824 1.14 chris == CS_ERROR)
825 1.14 chris goto eeprom_bad;
826 1.14 chris if (cs_read_pktpg_from_eeprom(sc, PKTPG_IND_ADDR + 2, &myea[1])
827 1.14 chris == CS_ERROR)
828 1.14 chris goto eeprom_bad;
829 1.14 chris if (cs_read_pktpg_from_eeprom(sc, PKTPG_IND_ADDR + 4, &myea[2])
830 1.14 chris == CS_ERROR)
831 1.14 chris goto eeprom_bad;
832 1.14 chris } else {
833 1.14 chris if (cs_read_eeprom(sc, EEPROM_IND_ADDR_H, &myea[0]) == CS_ERROR)
834 1.14 chris goto eeprom_bad;
835 1.14 chris if (cs_read_eeprom(sc, EEPROM_IND_ADDR_M, &myea[1]) == CS_ERROR)
836 1.14 chris goto eeprom_bad;
837 1.14 chris if (cs_read_eeprom(sc, EEPROM_IND_ADDR_L, &myea[2]) == CS_ERROR)
838 1.14 chris goto eeprom_bad;
839 1.14 chris }
840 1.1 yamt
841 1.27 tsutsui for (i = 0; i < __arraycount(myea); i++) {
842 1.27 tsutsui sc->sc_enaddr[i * 2 + 0] = myea[i];
843 1.27 tsutsui sc->sc_enaddr[i * 2 + 1] = myea[i] >> 8;
844 1.27 tsutsui }
845 1.27 tsutsui
846 1.43 msaitoh return CS_OK;
847 1.1 yamt
848 1.1 yamt eeprom_bad:
849 1.26 tsutsui aprint_error_dev(sc->sc_dev,
850 1.26 tsutsui "cs_get_enaddr: unable to read from EEPROM\n");
851 1.43 msaitoh return CS_ERROR;
852 1.1 yamt }
853 1.1 yamt
854 1.16 perry int
855 1.5 augustss cs_reset_chip(struct cs_softc *sc)
856 1.1 yamt {
857 1.1 yamt int intState;
858 1.1 yamt int x;
859 1.1 yamt
860 1.1 yamt /* Disable interrupts at the CPU so reset command is atomic */
861 1.1 yamt intState = splnet();
862 1.1 yamt
863 1.1 yamt /*
864 1.1 yamt * We are now resetting the chip
865 1.16 perry *
866 1.1 yamt * A spurious interrupt is generated by the chip when it is reset. This
867 1.1 yamt * variable informs the interrupt handler to ignore this interrupt.
868 1.1 yamt */
869 1.1 yamt sc->sc_resetting = TRUE;
870 1.1 yamt
871 1.1 yamt /* Issue a reset command to the chip */
872 1.1 yamt CS_WRITE_PACKET_PAGE(sc, PKTPG_SELF_CTL, SELF_CTL_RESET);
873 1.1 yamt
874 1.1 yamt /* Re-enable interrupts at the CPU */
875 1.1 yamt splx(intState);
876 1.1 yamt
877 1.1 yamt /* The chip is always in IO mode after a reset */
878 1.1 yamt sc->sc_memorymode = FALSE;
879 1.1 yamt
880 1.1 yamt /* If transmission was in progress, it is not now */
881 1.1 yamt sc->sc_txbusy = FALSE;
882 1.1 yamt
883 1.1 yamt /*
884 1.53 andvar * There was a delay(125); here, but it seems unnecessary 125 usec is
885 1.1 yamt * 1/8000 of a second, not 1/8 of a second. the data sheet advises
886 1.1 yamt * 1/10 of a second here, but the SI_BUSY and INIT_DONE loops below
887 1.1 yamt * should be sufficient.
888 1.1 yamt */
889 1.1 yamt
890 1.1 yamt /* Transition SBHE to switch chip from 8-bit to 16-bit */
891 1.6 augustss IO_READ_1(sc, PORT_PKTPG_PTR + 0);
892 1.6 augustss IO_READ_1(sc, PORT_PKTPG_PTR + 1);
893 1.6 augustss IO_READ_1(sc, PORT_PKTPG_PTR + 0);
894 1.6 augustss IO_READ_1(sc, PORT_PKTPG_PTR + 1);
895 1.1 yamt
896 1.1 yamt /* Wait until the EEPROM is not busy */
897 1.1 yamt for (x = 0; x < MAXLOOP; x++) {
898 1.1 yamt if (!(CS_READ_PACKET_PAGE(sc, PKTPG_SELF_ST) & SELF_ST_SI_BUSY))
899 1.1 yamt break;
900 1.1 yamt }
901 1.1 yamt
902 1.1 yamt if (x == MAXLOOP)
903 1.1 yamt return CS_ERROR;
904 1.1 yamt
905 1.1 yamt /* Wait until initialization is done */
906 1.1 yamt for (x = 0; x < MAXLOOP; x++) {
907 1.1 yamt if (CS_READ_PACKET_PAGE(sc, PKTPG_SELF_ST) & SELF_ST_INIT_DONE)
908 1.1 yamt break;
909 1.1 yamt }
910 1.1 yamt
911 1.1 yamt if (x == MAXLOOP)
912 1.1 yamt return CS_ERROR;
913 1.1 yamt
914 1.1 yamt /* Reset is no longer in progress */
915 1.1 yamt sc->sc_resetting = FALSE;
916 1.1 yamt
917 1.1 yamt return CS_OK;
918 1.1 yamt }
919 1.1 yamt
920 1.1 yamt int
921 1.6 augustss cs_verify_eeprom(struct cs_softc *sc)
922 1.1 yamt {
923 1.43 msaitoh uint16_t self_status;
924 1.1 yamt
925 1.1 yamt /* Verify that the EEPROM is present and OK */
926 1.6 augustss self_status = CS_READ_PACKET_PAGE_IO(sc, PKTPG_SELF_ST);
927 1.1 yamt if (((self_status & SELF_ST_EEP_PRES) &&
928 1.1 yamt (self_status & SELF_ST_EEP_OK)) == 0)
929 1.43 msaitoh return CS_ERROR;
930 1.1 yamt
931 1.43 msaitoh return CS_OK;
932 1.1 yamt }
933 1.1 yamt
934 1.16 perry int
935 1.43 msaitoh cs_read_eeprom(struct cs_softc *sc, int offset, uint16_t *pValue)
936 1.1 yamt {
937 1.1 yamt int x;
938 1.1 yamt
939 1.1 yamt /* Ensure that the EEPROM is not busy */
940 1.1 yamt for (x = 0; x < MAXLOOP; x++) {
941 1.6 augustss if (!(CS_READ_PACKET_PAGE_IO(sc, PKTPG_SELF_ST) &
942 1.1 yamt SELF_ST_SI_BUSY))
943 1.1 yamt break;
944 1.1 yamt }
945 1.1 yamt
946 1.1 yamt if (x == MAXLOOP)
947 1.43 msaitoh return CS_ERROR;
948 1.1 yamt
949 1.1 yamt /* Issue the command to read the offset within the EEPROM */
950 1.6 augustss CS_WRITE_PACKET_PAGE_IO(sc, PKTPG_EEPROM_CMD,
951 1.1 yamt offset | EEPROM_CMD_READ);
952 1.1 yamt
953 1.1 yamt /* Wait until the command is completed */
954 1.1 yamt for (x = 0; x < MAXLOOP; x++) {
955 1.6 augustss if (!(CS_READ_PACKET_PAGE_IO(sc, PKTPG_SELF_ST) &
956 1.1 yamt SELF_ST_SI_BUSY))
957 1.1 yamt break;
958 1.1 yamt }
959 1.1 yamt
960 1.1 yamt if (x == MAXLOOP)
961 1.43 msaitoh return CS_ERROR;
962 1.1 yamt
963 1.1 yamt /* Get the EEPROM data from the EEPROM Data register */
964 1.6 augustss *pValue = CS_READ_PACKET_PAGE_IO(sc, PKTPG_EEPROM_DATA);
965 1.1 yamt
966 1.43 msaitoh return CS_OK;
967 1.1 yamt }
968 1.1 yamt
969 1.16 perry void
970 1.5 augustss cs_initChip(struct cs_softc *sc)
971 1.1 yamt {
972 1.43 msaitoh uint16_t busCtl;
973 1.43 msaitoh uint16_t selfCtl;
974 1.43 msaitoh uint16_t v;
975 1.43 msaitoh uint16_t isaId;
976 1.6 augustss int i;
977 1.1 yamt int media = IFM_SUBTYPE(sc->sc_media.ifm_cur->ifm_media);
978 1.1 yamt
979 1.1 yamt /* Disable reception and transmission of frames */
980 1.1 yamt CS_WRITE_PACKET_PAGE(sc, PKTPG_LINE_CTL,
981 1.1 yamt CS_READ_PACKET_PAGE(sc, PKTPG_LINE_CTL) &
982 1.1 yamt ~LINE_CTL_RX_ON & ~LINE_CTL_TX_ON);
983 1.1 yamt
984 1.1 yamt /* Disable interrupt at the chip */
985 1.1 yamt CS_WRITE_PACKET_PAGE(sc, PKTPG_BUS_CTL,
986 1.1 yamt CS_READ_PACKET_PAGE(sc, PKTPG_BUS_CTL) & ~BUS_CTL_INT_ENBL);
987 1.1 yamt
988 1.1 yamt /* If IOCHRDY is enabled then clear the bit in the busCtl register */
989 1.1 yamt busCtl = CS_READ_PACKET_PAGE(sc, PKTPG_BUS_CTL);
990 1.1 yamt if (sc->sc_cfgflags & CFGFLG_IOCHRDY) {
991 1.1 yamt CS_WRITE_PACKET_PAGE(sc, PKTPG_BUS_CTL,
992 1.1 yamt busCtl & ~BUS_CTL_IOCHRDY);
993 1.1 yamt } else {
994 1.1 yamt CS_WRITE_PACKET_PAGE(sc, PKTPG_BUS_CTL,
995 1.1 yamt busCtl | BUS_CTL_IOCHRDY);
996 1.1 yamt }
997 1.1 yamt
998 1.1 yamt /* Set the Line Control register to match the media type */
999 1.1 yamt if (media == IFM_10_T)
1000 1.1 yamt CS_WRITE_PACKET_PAGE(sc, PKTPG_LINE_CTL, LINE_CTL_10BASET);
1001 1.1 yamt else
1002 1.1 yamt CS_WRITE_PACKET_PAGE(sc, PKTPG_LINE_CTL, LINE_CTL_AUI_ONLY);
1003 1.1 yamt
1004 1.1 yamt /*
1005 1.1 yamt * Set the BSTATUS/HC1 pin to be used as HC1. HC1 is used to
1006 1.1 yamt * enable the DC/DC converter
1007 1.1 yamt */
1008 1.1 yamt selfCtl = SELF_CTL_HC1E;
1009 1.1 yamt
1010 1.1 yamt /* If the media type is 10Base2 */
1011 1.1 yamt if (media == IFM_10_2) {
1012 1.43 msaitoh /* Enable the DC/DC converter if it has a low enable. */
1013 1.1 yamt if ((sc->sc_cfgflags & CFGFLG_DCDC_POL) == 0)
1014 1.1 yamt /*
1015 1.1 yamt * Set the HCB1 bit, which causes the HC1 pin to go
1016 1.1 yamt * low.
1017 1.1 yamt */
1018 1.1 yamt selfCtl |= SELF_CTL_HCB1;
1019 1.1 yamt } else { /* Media type is 10BaseT or AUI */
1020 1.43 msaitoh /* Disable the DC/DC converter if it has a high enable. */
1021 1.1 yamt if ((sc->sc_cfgflags & CFGFLG_DCDC_POL) != 0) {
1022 1.1 yamt /*
1023 1.1 yamt * Set the HCB1 bit, which causes the HC1 pin to go
1024 1.1 yamt * low.
1025 1.1 yamt */
1026 1.1 yamt selfCtl |= SELF_CTL_HCB1;
1027 1.1 yamt }
1028 1.1 yamt }
1029 1.1 yamt CS_WRITE_PACKET_PAGE(sc, PKTPG_SELF_CTL, selfCtl);
1030 1.16 perry
1031 1.43 msaitoh /* Enable normal link pulse */
1032 1.1 yamt if (sc->sc_prodid == PROD_ID_CS8920 || sc->sc_prodid == PROD_ID_CS8920M)
1033 1.1 yamt CS_WRITE_PACKET_PAGE(sc, PKTPG_AUTONEG_CTL, AUTOCTL_NLP_ENABLE);
1034 1.1 yamt
1035 1.1 yamt /* Enable full-duplex, if appropriate */
1036 1.1 yamt if (sc->sc_media.ifm_cur->ifm_media & IFM_FDX)
1037 1.1 yamt CS_WRITE_PACKET_PAGE(sc, PKTPG_TEST_CTL, TEST_CTL_FDX);
1038 1.1 yamt
1039 1.1 yamt /* RX_CTL set in cs_set_ladr_filt(), below */
1040 1.1 yamt
1041 1.43 msaitoh /* Enable all transmission interrupts */
1042 1.1 yamt CS_WRITE_PACKET_PAGE(sc, PKTPG_TX_CFG, TX_CFG_ALL_IE);
1043 1.1 yamt
1044 1.1 yamt /* Accept all receive interrupts */
1045 1.1 yamt CS_WRITE_PACKET_PAGE(sc, PKTPG_RX_CFG, RX_CFG_ALL_IE);
1046 1.1 yamt
1047 1.1 yamt /*
1048 1.1 yamt * Configure Operational Modes
1049 1.16 perry *
1050 1.43 msaitoh * I have turned off the BUF_CFG_RX_MISS_IE, to speed things up, this
1051 1.43 msaitoh * is a better way to do it because the card has a counter which can be
1052 1.7 wiz * read to update the RX_MISS counter. This saves many interrupts.
1053 1.16 perry *
1054 1.7 wiz * I have turned on the tx and rx overflow interrupts to counter using
1055 1.1 yamt * the receive miss interrupt. This is a better estimate of errors
1056 1.1 yamt * and requires lower system overhead.
1057 1.1 yamt */
1058 1.1 yamt CS_WRITE_PACKET_PAGE(sc, PKTPG_BUF_CFG, BUF_CFG_TX_UNDR_IE |
1059 1.1 yamt BUF_CFG_RX_DMA_IE);
1060 1.1 yamt
1061 1.1 yamt if (sc->sc_dma_chipinit)
1062 1.1 yamt (*sc->sc_dma_chipinit)(sc);
1063 1.1 yamt
1064 1.1 yamt /* If memory mode is enabled */
1065 1.1 yamt if (sc->sc_cfgflags & CFGFLG_MEM_MODE) {
1066 1.1 yamt /* If external logic is present for address decoding */
1067 1.1 yamt if (CS_READ_PACKET_PAGE(sc, PKTPG_SELF_ST) & SELF_ST_EL_PRES) {
1068 1.1 yamt /*
1069 1.1 yamt * Program the external logic to decode address bits
1070 1.1 yamt * SA20-SA23
1071 1.1 yamt */
1072 1.1 yamt CS_WRITE_PACKET_PAGE(sc, PKTPG_EEPROM_CMD,
1073 1.1 yamt ((sc->sc_pktpgaddr & 0xffffff) >> 20) |
1074 1.1 yamt EEPROM_CMD_ELSEL);
1075 1.1 yamt }
1076 1.1 yamt
1077 1.1 yamt /*
1078 1.1 yamt * Write the packet page base physical address to the memory
1079 1.1 yamt * base register.
1080 1.1 yamt */
1081 1.1 yamt CS_WRITE_PACKET_PAGE(sc, PKTPG_MEM_BASE + 0,
1082 1.1 yamt sc->sc_pktpgaddr & 0xFFFF);
1083 1.1 yamt CS_WRITE_PACKET_PAGE(sc, PKTPG_MEM_BASE + 2,
1084 1.1 yamt sc->sc_pktpgaddr >> 16);
1085 1.1 yamt busCtl = BUS_CTL_MEM_MODE;
1086 1.1 yamt
1087 1.43 msaitoh /* Tell the chip to read the addresses off the SA pins */
1088 1.1 yamt if (sc->sc_cfgflags & CFGFLG_USE_SA) {
1089 1.1 yamt busCtl |= BUS_CTL_USE_SA;
1090 1.1 yamt }
1091 1.1 yamt CS_WRITE_PACKET_PAGE(sc, PKTPG_BUS_CTL,
1092 1.1 yamt CS_READ_PACKET_PAGE(sc, PKTPG_BUS_CTL) | busCtl);
1093 1.1 yamt
1094 1.1 yamt /* We are in memory mode now! */
1095 1.1 yamt sc->sc_memorymode = TRUE;
1096 1.1 yamt
1097 1.1 yamt /*
1098 1.43 msaitoh * Wait here (10ms) for the chip to swap over. this is the
1099 1.1 yamt * maximum time that this could take.
1100 1.1 yamt */
1101 1.1 yamt delay(10000);
1102 1.1 yamt
1103 1.1 yamt /* Verify that we can read from the chip */
1104 1.1 yamt isaId = CS_READ_PACKET_PAGE(sc, PKTPG_EISA_NUM);
1105 1.1 yamt
1106 1.1 yamt /*
1107 1.1 yamt * As a last minute sanity check before actually using mapped
1108 1.1 yamt * memory we verify that we can read the isa number from the
1109 1.1 yamt * chip in memory mode.
1110 1.1 yamt */
1111 1.1 yamt if (isaId != EISA_NUM_CRYSTAL) {
1112 1.26 tsutsui aprint_error_dev(sc->sc_dev,
1113 1.26 tsutsui "failed to enable memory mode\n");
1114 1.1 yamt sc->sc_memorymode = FALSE;
1115 1.1 yamt } else {
1116 1.1 yamt /*
1117 1.43 msaitoh * We are in memory mode so if we aren't using DMA,
1118 1.1 yamt * then program the chip to interrupt early.
1119 1.1 yamt */
1120 1.1 yamt if ((sc->sc_cfgflags & CFGFLG_DMA_MODE) == 0) {
1121 1.1 yamt CS_WRITE_PACKET_PAGE(sc, PKTPG_BUF_CFG,
1122 1.1 yamt BUF_CFG_RX_DEST_IE |
1123 1.1 yamt BUF_CFG_RX_MISS_OVER_IE |
1124 1.1 yamt BUF_CFG_TX_COL_OVER_IE);
1125 1.1 yamt }
1126 1.1 yamt }
1127 1.1 yamt
1128 1.1 yamt }
1129 1.1 yamt
1130 1.1 yamt /* Put Ethernet address into the Individual Address register */
1131 1.6 augustss for (i = 0; i < 6; i += 2) {
1132 1.6 augustss v = sc->sc_enaddr[i + 0] | (sc->sc_enaddr[i + 1]) << 8;
1133 1.6 augustss CS_WRITE_PACKET_PAGE(sc, PKTPG_IND_ADDR + i, v);
1134 1.6 augustss }
1135 1.1 yamt
1136 1.1 yamt if (sc->sc_irq != -1) {
1137 1.1 yamt /* Set the interrupt level in the chip */
1138 1.1 yamt if (sc->sc_prodid == PROD_ID_CS8900) {
1139 1.43 msaitoh if (sc->sc_irq == 5)
1140 1.1 yamt CS_WRITE_PACKET_PAGE(sc, PKTPG_INT_NUM, 3);
1141 1.43 msaitoh else
1142 1.43 msaitoh CS_WRITE_PACKET_PAGE(sc, PKTPG_INT_NUM,
1143 1.43 msaitoh (sc->sc_irq) - 10);
1144 1.43 msaitoh } else { /* CS8920 */
1145 1.43 msaitoh CS_WRITE_PACKET_PAGE(sc, PKTPG_8920_INT_NUM,
1146 1.43 msaitoh sc->sc_irq);
1147 1.1 yamt }
1148 1.1 yamt }
1149 1.1 yamt
1150 1.43 msaitoh /* Write the multicast mask to the address filter register */
1151 1.1 yamt cs_set_ladr_filt(sc, &sc->sc_ethercom);
1152 1.1 yamt
1153 1.1 yamt /* Enable reception and transmission of frames */
1154 1.1 yamt CS_WRITE_PACKET_PAGE(sc, PKTPG_LINE_CTL,
1155 1.1 yamt CS_READ_PACKET_PAGE(sc, PKTPG_LINE_CTL) |
1156 1.1 yamt LINE_CTL_RX_ON | LINE_CTL_TX_ON);
1157 1.1 yamt
1158 1.1 yamt /* Enable interrupt at the chip */
1159 1.1 yamt CS_WRITE_PACKET_PAGE(sc, PKTPG_BUS_CTL,
1160 1.1 yamt CS_READ_PACKET_PAGE(sc, PKTPG_BUS_CTL) | BUS_CTL_INT_ENBL);
1161 1.1 yamt }
1162 1.1 yamt
1163 1.16 perry int
1164 1.5 augustss cs_init(struct ifnet *ifp)
1165 1.1 yamt {
1166 1.1 yamt int intState;
1167 1.1 yamt int error = CS_OK;
1168 1.1 yamt struct cs_softc *sc = ifp->if_softc;
1169 1.1 yamt
1170 1.1 yamt if (cs_enable(sc))
1171 1.1 yamt goto out;
1172 1.1 yamt
1173 1.1 yamt cs_stop(ifp, 0);
1174 1.1 yamt
1175 1.1 yamt intState = splnet();
1176 1.1 yamt
1177 1.1 yamt #if 0
1178 1.1 yamt /* Mark the interface as down */
1179 1.1 yamt sc->sc_ethercom.ec_if.if_flags &= ~(IFF_UP | IFF_RUNNING);
1180 1.1 yamt #endif
1181 1.1 yamt
1182 1.1 yamt #ifdef CS_DEBUG
1183 1.1 yamt /* Enable debugging */
1184 1.1 yamt sc->sc_ethercom.ec_if.if_flags |= IFF_DEBUG;
1185 1.1 yamt #endif
1186 1.1 yamt
1187 1.1 yamt /* Reset the chip */
1188 1.1 yamt if ((error = cs_reset_chip(sc)) == CS_OK) {
1189 1.1 yamt /* Initialize the chip */
1190 1.1 yamt cs_initChip(sc);
1191 1.1 yamt
1192 1.1 yamt /* Mark the interface as running */
1193 1.1 yamt sc->sc_ethercom.ec_if.if_flags |= IFF_RUNNING;
1194 1.1 yamt sc->sc_ethercom.ec_if.if_timer = 0;
1195 1.1 yamt
1196 1.1 yamt /* Assume we have carrier until we are told otherwise. */
1197 1.1 yamt sc->sc_carrier = 1;
1198 1.43 msaitoh } else
1199 1.26 tsutsui aprint_error_dev(sc->sc_dev, "unable to reset chip\n");
1200 1.1 yamt
1201 1.1 yamt splx(intState);
1202 1.1 yamt out:
1203 1.1 yamt if (error == CS_OK)
1204 1.1 yamt return 0;
1205 1.1 yamt return EIO;
1206 1.1 yamt }
1207 1.1 yamt
1208 1.16 perry void
1209 1.5 augustss cs_set_ladr_filt(struct cs_softc *sc, struct ethercom *ec)
1210 1.1 yamt {
1211 1.1 yamt struct ifnet *ifp = &ec->ec_if;
1212 1.1 yamt struct ether_multi *enm;
1213 1.1 yamt struct ether_multistep step;
1214 1.43 msaitoh uint16_t af[4];
1215 1.43 msaitoh uint16_t port, mask, index;
1216 1.1 yamt
1217 1.1 yamt /*
1218 1.43 msaitoh * Set up multicast address filter by passing all multicast addresses
1219 1.43 msaitoh * through a crc generator, and then using the high order 6 bits as an
1220 1.43 msaitoh * index into the 64 bit logical address filter. The high order bit
1221 1.43 msaitoh * selects the word, while the rest of the bits select the bit within
1222 1.43 msaitoh * the word.
1223 1.43 msaitoh */
1224 1.1 yamt if (ifp->if_flags & IFF_PROMISC) {
1225 1.43 msaitoh /* Accept all valid frames. */
1226 1.1 yamt CS_WRITE_PACKET_PAGE(sc, PKTPG_RX_CTL,
1227 1.1 yamt RX_CTL_PROMISC_A | RX_CTL_RX_OK_A |
1228 1.1 yamt RX_CTL_IND_A | RX_CTL_BCAST_A | RX_CTL_MCAST_A);
1229 1.1 yamt ifp->if_flags |= IFF_ALLMULTI;
1230 1.1 yamt return;
1231 1.1 yamt }
1232 1.1 yamt
1233 1.1 yamt /*
1234 1.43 msaitoh * Accept frames if a. crc valid, b. individual address match c.
1235 1.1 yamt * broadcast address,and d. multicast addresses matched in the hash
1236 1.1 yamt * filter
1237 1.1 yamt */
1238 1.1 yamt CS_WRITE_PACKET_PAGE(sc, PKTPG_RX_CTL,
1239 1.1 yamt RX_CTL_RX_OK_A | RX_CTL_IND_A | RX_CTL_BCAST_A | RX_CTL_MCAST_A);
1240 1.1 yamt
1241 1.1 yamt
1242 1.1 yamt /*
1243 1.43 msaitoh * Start off with all multicast flag clear, set it if we need to
1244 1.1 yamt * later, otherwise we will leave it.
1245 1.1 yamt */
1246 1.1 yamt ifp->if_flags &= ~IFF_ALLMULTI;
1247 1.1 yamt af[0] = af[1] = af[2] = af[3] = 0x0000;
1248 1.1 yamt
1249 1.1 yamt /*
1250 1.1 yamt * Loop through all the multicast addresses unless we get a range of
1251 1.1 yamt * addresses, in which case we will just accept all packets.
1252 1.1 yamt * Justification for this is given in the next comment.
1253 1.1 yamt */
1254 1.46 msaitoh ETHER_LOCK(ec);
1255 1.1 yamt ETHER_FIRST_MULTI(step, ec, enm);
1256 1.1 yamt while (enm != NULL) {
1257 1.1 yamt if (memcmp(enm->enm_addrlo, enm->enm_addrhi,
1258 1.1 yamt sizeof enm->enm_addrlo)) {
1259 1.1 yamt /*
1260 1.43 msaitoh * We must listen to a range of multicast addresses.
1261 1.43 msaitoh * For now, just accept all multicasts, rather than
1262 1.43 msaitoh * trying to set only those filter bits needed to match
1263 1.43 msaitoh * the range. (At this time, the only use of address
1264 1.43 msaitoh * ranges is for IP multicast routing, for which the
1265 1.43 msaitoh * range is big enough to require all bits set.)
1266 1.43 msaitoh */
1267 1.1 yamt ifp->if_flags |= IFF_ALLMULTI;
1268 1.1 yamt af[0] = af[1] = af[2] = af[3] = 0xffff;
1269 1.1 yamt break;
1270 1.1 yamt } else {
1271 1.1 yamt /*
1272 1.43 msaitoh * We have got an individual address so just set that
1273 1.43 msaitoh * bit.
1274 1.43 msaitoh */
1275 1.1 yamt index = cs_hash_index(enm->enm_addrlo);
1276 1.1 yamt
1277 1.1 yamt /* Set the bit the Logical address filter. */
1278 1.43 msaitoh port = (uint16_t) (index >> 4);
1279 1.43 msaitoh mask = (uint16_t) (1 << (index & 0xf));
1280 1.1 yamt af[port] |= mask;
1281 1.1 yamt
1282 1.1 yamt ETHER_NEXT_MULTI(step, enm);
1283 1.1 yamt }
1284 1.1 yamt }
1285 1.46 msaitoh ETHER_UNLOCK(ec);
1286 1.1 yamt
1287 1.43 msaitoh /* Now program the chip with the addresses */
1288 1.1 yamt CS_WRITE_PACKET_PAGE(sc, PKTPG_LOG_ADDR + 0, af[0]);
1289 1.1 yamt CS_WRITE_PACKET_PAGE(sc, PKTPG_LOG_ADDR + 2, af[1]);
1290 1.1 yamt CS_WRITE_PACKET_PAGE(sc, PKTPG_LOG_ADDR + 4, af[2]);
1291 1.1 yamt CS_WRITE_PACKET_PAGE(sc, PKTPG_LOG_ADDR + 6, af[3]);
1292 1.1 yamt return;
1293 1.1 yamt }
1294 1.1 yamt
1295 1.43 msaitoh uint16_t
1296 1.5 augustss cs_hash_index(char *addr)
1297 1.1 yamt {
1298 1.4 thorpej uint32_t crc;
1299 1.4 thorpej uint16_t hash_code;
1300 1.1 yamt
1301 1.4 thorpej crc = ether_crc32_le(addr, ETHER_ADDR_LEN);
1302 1.1 yamt
1303 1.4 thorpej hash_code = crc >> 26;
1304 1.43 msaitoh return hash_code;
1305 1.1 yamt }
1306 1.1 yamt
1307 1.16 perry void
1308 1.25 tsutsui cs_reset(struct cs_softc *sc)
1309 1.1 yamt {
1310 1.1 yamt
1311 1.1 yamt /* Mark the interface as down */
1312 1.1 yamt sc->sc_ethercom.ec_if.if_flags &= ~IFF_RUNNING;
1313 1.1 yamt
1314 1.1 yamt /* Reset the chip */
1315 1.1 yamt cs_reset_chip(sc);
1316 1.1 yamt }
1317 1.1 yamt
1318 1.16 perry int
1319 1.21 christos cs_ioctl(struct ifnet *ifp, u_long cmd, void *data)
1320 1.1 yamt {
1321 1.1 yamt struct cs_softc *sc = ifp->if_softc;
1322 1.1 yamt int state;
1323 1.1 yamt int result;
1324 1.1 yamt
1325 1.1 yamt state = splnet();
1326 1.1 yamt
1327 1.43 msaitoh result = 0; /* Only set if something goes wrong */
1328 1.1 yamt
1329 1.1 yamt switch (cmd) {
1330 1.1 yamt default:
1331 1.1 yamt result = ether_ioctl(ifp, cmd, data);
1332 1.1 yamt if (result == ENETRESET) {
1333 1.15 thorpej if (ifp->if_flags & IFF_RUNNING) {
1334 1.1 yamt /*
1335 1.1 yamt * Multicast list has changed. Set the
1336 1.1 yamt * hardware filter accordingly.
1337 1.1 yamt */
1338 1.1 yamt cs_set_ladr_filt(sc, &sc->sc_ethercom);
1339 1.1 yamt }
1340 1.1 yamt result = 0;
1341 1.1 yamt }
1342 1.1 yamt break;
1343 1.1 yamt }
1344 1.1 yamt
1345 1.1 yamt splx(state);
1346 1.1 yamt
1347 1.1 yamt return result;
1348 1.1 yamt }
1349 1.1 yamt
1350 1.1 yamt int
1351 1.5 augustss cs_mediachange(struct ifnet *ifp)
1352 1.1 yamt {
1353 1.1 yamt
1354 1.1 yamt /*
1355 1.1 yamt * Current media is already set up. Just reset the interface
1356 1.1 yamt * to let the new value take hold.
1357 1.1 yamt */
1358 1.1 yamt cs_init(ifp);
1359 1.43 msaitoh return 0;
1360 1.1 yamt }
1361 1.1 yamt
1362 1.1 yamt void
1363 1.5 augustss cs_mediastatus(struct ifnet *ifp, struct ifmediareq *ifmr)
1364 1.1 yamt {
1365 1.1 yamt struct cs_softc *sc = ifp->if_softc;
1366 1.1 yamt
1367 1.43 msaitoh /* The currently selected media is always the active media. */
1368 1.1 yamt ifmr->ifm_active = sc->sc_media.ifm_cur->ifm_media;
1369 1.1 yamt
1370 1.1 yamt if (ifp->if_flags & IFF_UP) {
1371 1.1 yamt /* Interface up, status is valid. */
1372 1.1 yamt ifmr->ifm_status = IFM_AVALID |
1373 1.1 yamt (sc->sc_carrier ? IFM_ACTIVE : 0);
1374 1.1 yamt }
1375 1.1 yamt else ifmr->ifm_status = 0;
1376 1.1 yamt }
1377 1.1 yamt
1378 1.16 perry int
1379 1.5 augustss cs_intr(void *arg)
1380 1.1 yamt {
1381 1.1 yamt struct cs_softc *sc = arg;
1382 1.43 msaitoh uint16_t Event;
1383 1.43 msaitoh uint16_t rndEvent;
1384 1.1 yamt
1385 1.6 augustss /*printf("cs_intr %p\n", sc);*/
1386 1.1 yamt /* Ignore any interrupts that happen while the chip is being reset */
1387 1.1 yamt if (sc->sc_resetting) {
1388 1.1 yamt printf("%s: cs_intr: reset in progress\n",
1389 1.26 tsutsui device_xname(sc->sc_dev));
1390 1.1 yamt return 1;
1391 1.1 yamt }
1392 1.1 yamt
1393 1.1 yamt /* Read an event from the Interrupt Status Queue */
1394 1.1 yamt if (sc->sc_memorymode)
1395 1.1 yamt Event = CS_READ_PACKET_PAGE(sc, PKTPG_ISQ);
1396 1.1 yamt else
1397 1.1 yamt Event = CS_READ_PORT(sc, PORT_ISQ);
1398 1.1 yamt
1399 1.1 yamt if ((Event & REG_NUM_MASK) == 0 || Event == 0xffff)
1400 1.43 msaitoh return 0; /* Not ours */
1401 1.1 yamt
1402 1.1 yamt rndEvent = Event;
1403 1.1 yamt
1404 1.1 yamt /* Process all the events in the Interrupt Status Queue */
1405 1.1 yamt while ((Event & REG_NUM_MASK) != 0 && Event != 0xffff) {
1406 1.1 yamt /* Dispatch to an event handler based on the register number */
1407 1.1 yamt switch (Event & REG_NUM_MASK) {
1408 1.1 yamt case REG_NUM_RX_EVENT:
1409 1.1 yamt cs_receive_event(sc, Event);
1410 1.1 yamt break;
1411 1.1 yamt case REG_NUM_TX_EVENT:
1412 1.1 yamt cs_transmit_event(sc, Event);
1413 1.1 yamt break;
1414 1.1 yamt case REG_NUM_BUF_EVENT:
1415 1.1 yamt cs_buffer_event(sc, Event);
1416 1.1 yamt break;
1417 1.1 yamt case REG_NUM_TX_COL:
1418 1.1 yamt case REG_NUM_RX_MISS:
1419 1.1 yamt cs_counter_event(sc, Event);
1420 1.1 yamt break;
1421 1.1 yamt default:
1422 1.1 yamt printf("%s: unknown interrupt event 0x%x\n",
1423 1.26 tsutsui device_xname(sc->sc_dev), Event);
1424 1.1 yamt break;
1425 1.1 yamt }
1426 1.1 yamt
1427 1.1 yamt /* Read another event from the Interrupt Status Queue */
1428 1.1 yamt if (sc->sc_memorymode)
1429 1.1 yamt Event = CS_READ_PACKET_PAGE(sc, PKTPG_ISQ);
1430 1.1 yamt else
1431 1.1 yamt Event = CS_READ_PORT(sc, PORT_ISQ);
1432 1.1 yamt }
1433 1.1 yamt
1434 1.7 wiz /* have handled the interrupt */
1435 1.1 yamt rnd_add_uint32(&sc->rnd_source, rndEvent);
1436 1.1 yamt return 1;
1437 1.1 yamt }
1438 1.1 yamt
1439 1.16 perry void
1440 1.43 msaitoh cs_counter_event(struct cs_softc *sc, uint16_t cntEvent)
1441 1.1 yamt {
1442 1.1 yamt struct ifnet *ifp;
1443 1.43 msaitoh uint16_t errorCount;
1444 1.1 yamt
1445 1.1 yamt ifp = &sc->sc_ethercom.ec_if;
1446 1.1 yamt
1447 1.1 yamt switch (cntEvent & REG_NUM_MASK) {
1448 1.1 yamt case REG_NUM_TX_COL:
1449 1.43 msaitoh /* The count should be read before an overflow occurs. */
1450 1.1 yamt errorCount = CS_READ_PACKET_PAGE(sc, PKTPG_TX_COL);
1451 1.1 yamt /*
1452 1.43 msaitoh * The tramsit event routine always checks the number of
1453 1.1 yamt * collisions for any packet so we don't increment any
1454 1.1 yamt * counters here, as they should already have been
1455 1.1 yamt * considered.
1456 1.1 yamt */
1457 1.1 yamt break;
1458 1.1 yamt case REG_NUM_RX_MISS:
1459 1.44 msaitoh /* The count should be read before an overflow occurs. */
1460 1.1 yamt errorCount = CS_READ_PACKET_PAGE(sc, PKTPG_RX_MISS);
1461 1.1 yamt /*
1462 1.1 yamt * Increment the input error count, the first 6bits are the
1463 1.1 yamt * register id.
1464 1.1 yamt */
1465 1.48 thorpej if_statadd(ifp, if_ierrors, (errorCount & 0xffC0) >> 6);
1466 1.1 yamt break;
1467 1.1 yamt default:
1468 1.44 msaitoh /* Do nothing */
1469 1.1 yamt break;
1470 1.1 yamt }
1471 1.1 yamt }
1472 1.1 yamt
1473 1.16 perry void
1474 1.43 msaitoh cs_buffer_event(struct cs_softc *sc, uint16_t bufEvent)
1475 1.1 yamt {
1476 1.1 yamt
1477 1.1 yamt /*
1478 1.43 msaitoh * Multiple events can be in the buffer event register at one time so
1479 1.1 yamt * a standard switch statement will not suffice, here every event
1480 1.1 yamt * must be checked.
1481 1.1 yamt */
1482 1.1 yamt
1483 1.1 yamt /*
1484 1.43 msaitoh * If 128 bits have been rxed by the time we get here, the dest event
1485 1.1 yamt * will be cleared and 128 event will be set.
1486 1.1 yamt */
1487 1.43 msaitoh if ((bufEvent & (BUF_EVENT_RX_DEST | BUF_EVENT_RX_128)) != 0)
1488 1.1 yamt cs_process_rx_early(sc);
1489 1.1 yamt
1490 1.1 yamt if (bufEvent & BUF_EVENT_RX_DMA) {
1491 1.43 msaitoh /* Process the receive data */
1492 1.1 yamt if (sc->sc_dma_process_rx)
1493 1.1 yamt (*sc->sc_dma_process_rx)(sc);
1494 1.1 yamt else
1495 1.43 msaitoh /* Should panic? */
1496 1.26 tsutsui aprint_error_dev(sc->sc_dev, "unexpected DMA event\n");
1497 1.1 yamt }
1498 1.1 yamt
1499 1.1 yamt if (bufEvent & BUF_EVENT_TX_UNDR) {
1500 1.1 yamt #if 0
1501 1.1 yamt /*
1502 1.1 yamt * This can happen occasionally, and it's not worth worrying
1503 1.1 yamt * about.
1504 1.1 yamt */
1505 1.1 yamt printf("%s: transmit underrun (%d -> %d)\n",
1506 1.26 tsutsui device_xname(sc->sc_dev), sc->sc_xe_ent,
1507 1.1 yamt cs_xmit_early_table[sc->sc_xe_ent].worse);
1508 1.1 yamt #endif
1509 1.1 yamt sc->sc_xe_ent = cs_xmit_early_table[sc->sc_xe_ent].worse;
1510 1.1 yamt sc->sc_xe_togo =
1511 1.1 yamt cs_xmit_early_table[sc->sc_xe_ent].better_count;
1512 1.1 yamt
1513 1.1 yamt /* had an underrun, transmit is finished */
1514 1.1 yamt sc->sc_txbusy = FALSE;
1515 1.1 yamt }
1516 1.1 yamt
1517 1.43 msaitoh if (bufEvent & BUF_EVENT_SW_INT)
1518 1.1 yamt printf("%s: software initiated interrupt\n",
1519 1.26 tsutsui device_xname(sc->sc_dev));
1520 1.1 yamt }
1521 1.1 yamt
1522 1.16 perry void
1523 1.43 msaitoh cs_transmit_event(struct cs_softc *sc, uint16_t txEvent)
1524 1.1 yamt {
1525 1.1 yamt struct ifnet *ifp = &sc->sc_ethercom.ec_if;
1526 1.1 yamt
1527 1.1 yamt /* If there were any errors transmitting this frame */
1528 1.43 msaitoh if (txEvent & (TX_EVENT_LOSS_CRS | TX_EVENT_SQE_ERR |
1529 1.43 msaitoh TX_EVENT_OUT_WIN | TX_EVENT_JABBER | TX_EVENT_16_COLL)) {
1530 1.1 yamt /* Increment the output error count */
1531 1.48 thorpej if_statinc(ifp, if_oerrors);
1532 1.1 yamt
1533 1.1 yamt /* Note carrier loss. */
1534 1.1 yamt if (txEvent & TX_EVENT_LOSS_CRS)
1535 1.1 yamt sc->sc_carrier = 0;
1536 1.1 yamt
1537 1.1 yamt /* If debugging is enabled then log error messages */
1538 1.1 yamt if (ifp->if_flags & IFF_DEBUG) {
1539 1.43 msaitoh if (txEvent & TX_EVENT_LOSS_CRS)
1540 1.26 tsutsui aprint_error_dev(sc->sc_dev, "lost carrier\n");
1541 1.43 msaitoh
1542 1.43 msaitoh if (txEvent & TX_EVENT_SQE_ERR)
1543 1.26 tsutsui aprint_error_dev(sc->sc_dev, "SQE error\n");
1544 1.43 msaitoh
1545 1.43 msaitoh if (txEvent & TX_EVENT_OUT_WIN)
1546 1.26 tsutsui aprint_error_dev(sc->sc_dev,
1547 1.26 tsutsui "out-of-window collision\n");
1548 1.43 msaitoh
1549 1.43 msaitoh if (txEvent & TX_EVENT_JABBER)
1550 1.26 tsutsui aprint_error_dev(sc->sc_dev, "jabber\n");
1551 1.43 msaitoh
1552 1.43 msaitoh if (txEvent & TX_EVENT_16_COLL)
1553 1.43 msaitoh aprint_error_dev(sc->sc_dev,
1554 1.43 msaitoh "16 collisions\n");
1555 1.1 yamt }
1556 1.43 msaitoh } else {
1557 1.1 yamt /* Transmission successful, carrier is up. */
1558 1.1 yamt sc->sc_carrier = 1;
1559 1.1 yamt #ifdef SHARK
1560 1.1 yamt ledNetActive();
1561 1.1 yamt #endif
1562 1.1 yamt }
1563 1.1 yamt
1564 1.1 yamt /* Add the number of collisions for this frame */
1565 1.48 thorpej net_stat_ref_t nsr = IF_STAT_GETREF(ifp);
1566 1.43 msaitoh if (txEvent & TX_EVENT_16_COLL)
1567 1.48 thorpej if_statadd_ref(nsr, if_collisions, 16);
1568 1.43 msaitoh else
1569 1.48 thorpej if_statadd_ref(nsr, if_collisions,
1570 1.48 thorpej ((txEvent & TX_EVENT_COLL_MASK) >> 11));
1571 1.1 yamt
1572 1.48 thorpej if_statinc_ref(nsr, if_opackets);
1573 1.48 thorpej IF_STAT_PUTREF(ifp);
1574 1.1 yamt
1575 1.1 yamt /* Transmission is no longer in progress */
1576 1.1 yamt sc->sc_txbusy = FALSE;
1577 1.1 yamt
1578 1.39 ozaki /* If there is more to transmit, start the next transmission */
1579 1.39 ozaki if_schedule_deferred_start(ifp);
1580 1.1 yamt }
1581 1.1 yamt
1582 1.1 yamt void
1583 1.43 msaitoh cs_print_rx_errors(struct cs_softc *sc, uint16_t rxEvent)
1584 1.1 yamt {
1585 1.1 yamt
1586 1.1 yamt if (rxEvent & RX_EVENT_RUNT)
1587 1.26 tsutsui aprint_error_dev(sc->sc_dev, "runt\n");
1588 1.1 yamt
1589 1.1 yamt if (rxEvent & RX_EVENT_X_DATA)
1590 1.26 tsutsui aprint_error_dev(sc->sc_dev, "extra data\n");
1591 1.1 yamt
1592 1.1 yamt if (rxEvent & RX_EVENT_CRC_ERR) {
1593 1.1 yamt if (rxEvent & RX_EVENT_DRIBBLE)
1594 1.26 tsutsui aprint_error_dev(sc->sc_dev, "alignment error\n");
1595 1.1 yamt else
1596 1.26 tsutsui aprint_error_dev(sc->sc_dev, "CRC error\n");
1597 1.1 yamt } else {
1598 1.1 yamt if (rxEvent & RX_EVENT_DRIBBLE)
1599 1.26 tsutsui aprint_error_dev(sc->sc_dev, "dribble bits\n");
1600 1.1 yamt }
1601 1.1 yamt }
1602 1.1 yamt
1603 1.16 perry void
1604 1.43 msaitoh cs_receive_event(struct cs_softc *sc, uint16_t rxEvent)
1605 1.1 yamt {
1606 1.1 yamt struct ifnet *ifp = &sc->sc_ethercom.ec_if;
1607 1.1 yamt
1608 1.1 yamt /* If the frame was not received OK */
1609 1.1 yamt if (!(rxEvent & RX_EVENT_RX_OK)) {
1610 1.1 yamt /* Increment the input error count */
1611 1.48 thorpej if_statinc(ifp, if_ierrors);
1612 1.1 yamt
1613 1.43 msaitoh /* If debugging is enabled then log error messages. */
1614 1.1 yamt if (ifp->if_flags & IFF_DEBUG) {
1615 1.1 yamt if (rxEvent != REG_NUM_RX_EVENT) {
1616 1.1 yamt cs_print_rx_errors(sc, rxEvent);
1617 1.1 yamt
1618 1.1 yamt /*
1619 1.1 yamt * Must read the length of all received
1620 1.1 yamt * frames
1621 1.1 yamt */
1622 1.1 yamt CS_READ_PACKET_PAGE(sc, PKTPG_RX_LENGTH);
1623 1.1 yamt
1624 1.1 yamt /* Skip the received frame */
1625 1.1 yamt CS_WRITE_PACKET_PAGE(sc, PKTPG_RX_CFG,
1626 1.1 yamt CS_READ_PACKET_PAGE(sc, PKTPG_RX_CFG) |
1627 1.1 yamt RX_CFG_SKIP);
1628 1.43 msaitoh } else
1629 1.26 tsutsui aprint_error_dev(sc->sc_dev, "implied skip\n");
1630 1.1 yamt }
1631 1.1 yamt } else {
1632 1.1 yamt /*
1633 1.44 msaitoh * Process the received frame and pass it up to the upper
1634 1.1 yamt * layers.
1635 1.1 yamt */
1636 1.1 yamt cs_process_receive(sc);
1637 1.1 yamt }
1638 1.1 yamt }
1639 1.1 yamt
1640 1.1 yamt void
1641 1.5 augustss cs_ether_input(struct cs_softc *sc, struct mbuf *m)
1642 1.1 yamt {
1643 1.1 yamt struct ifnet *ifp = &sc->sc_ethercom.ec_if;
1644 1.1 yamt
1645 1.1 yamt /* Pass the packet up. */
1646 1.36 ozaki if_percpuq_enqueue(ifp->if_percpuq, m);
1647 1.1 yamt }
1648 1.1 yamt
1649 1.16 perry void
1650 1.5 augustss cs_process_receive(struct cs_softc *sc)
1651 1.1 yamt {
1652 1.1 yamt struct ifnet *ifp;
1653 1.1 yamt struct mbuf *m;
1654 1.1 yamt int totlen;
1655 1.43 msaitoh uint16_t *pBuff, *pBuffLimit;
1656 1.1 yamt int pad;
1657 1.10 christos unsigned int frameOffset = 0; /* XXX: gcc */
1658 1.1 yamt
1659 1.1 yamt #ifdef SHARK
1660 1.1 yamt ledNetActive();
1661 1.1 yamt #endif
1662 1.1 yamt
1663 1.1 yamt ifp = &sc->sc_ethercom.ec_if;
1664 1.1 yamt
1665 1.1 yamt /* Received a packet; carrier is up. */
1666 1.1 yamt sc->sc_carrier = 1;
1667 1.1 yamt
1668 1.1 yamt if (sc->sc_memorymode) {
1669 1.1 yamt /* Initialize the frame offset */
1670 1.1 yamt frameOffset = PKTPG_RX_LENGTH;
1671 1.1 yamt
1672 1.1 yamt /* Get the length of the received frame */
1673 1.1 yamt totlen = CS_READ_PACKET_PAGE(sc, frameOffset);
1674 1.1 yamt frameOffset += 2;
1675 1.43 msaitoh } else {
1676 1.43 msaitoh /* Drop status */
1677 1.1 yamt CS_READ_PORT(sc, PORT_RXTX_DATA);
1678 1.1 yamt
1679 1.1 yamt /* Get the length of the received frame */
1680 1.1 yamt totlen = CS_READ_PORT(sc, PORT_RXTX_DATA);
1681 1.1 yamt }
1682 1.1 yamt
1683 1.2 yamt if (totlen > ETHER_MAX_LEN) {
1684 1.26 tsutsui aprint_error_dev(sc->sc_dev, "invalid packet length %d\n",
1685 1.23 cegger totlen);
1686 1.2 yamt
1687 1.43 msaitoh /* Skip the received frame */
1688 1.2 yamt CS_WRITE_PACKET_PAGE(sc, PKTPG_RX_CFG,
1689 1.2 yamt CS_READ_PACKET_PAGE(sc, PKTPG_RX_CFG) | RX_CFG_SKIP);
1690 1.2 yamt return;
1691 1.2 yamt }
1692 1.2 yamt
1693 1.1 yamt MGETHDR(m, M_DONTWAIT, MT_DATA);
1694 1.1 yamt if (m == 0) {
1695 1.26 tsutsui aprint_error_dev(sc->sc_dev,
1696 1.26 tsutsui "cs_process_receive: unable to allocate mbuf\n");
1697 1.48 thorpej if_statinc(ifp, if_ierrors);
1698 1.1 yamt /*
1699 1.43 msaitoh * Couldn't allocate an mbuf so things are not good, may as
1700 1.1 yamt * well drop the packet I think.
1701 1.16 perry *
1702 1.1 yamt * have already read the length so we should be right to skip
1703 1.1 yamt * the packet.
1704 1.1 yamt */
1705 1.1 yamt CS_WRITE_PACKET_PAGE(sc, PKTPG_RX_CFG,
1706 1.1 yamt CS_READ_PACKET_PAGE(sc, PKTPG_RX_CFG) | RX_CFG_SKIP);
1707 1.1 yamt return;
1708 1.1 yamt }
1709 1.37 ozaki m_set_rcvif(m, ifp);
1710 1.1 yamt m->m_pkthdr.len = totlen;
1711 1.1 yamt
1712 1.43 msaitoh /* Number of bytes to align ip header on word boundary for ipintr */
1713 1.2 yamt pad = ALIGN(sizeof(struct ether_header)) - sizeof(struct ether_header);
1714 1.2 yamt
1715 1.1 yamt /*
1716 1.43 msaitoh * Alloc mbuf cluster if we need.
1717 1.43 msaitoh * We need 1 byte spare because following packet read loop can overrun.
1718 1.1 yamt */
1719 1.2 yamt if (totlen + pad + 1 > MHLEN) {
1720 1.2 yamt MCLGET(m, M_DONTWAIT);
1721 1.2 yamt if ((m->m_flags & M_EXT) == 0) {
1722 1.43 msaitoh /* Couldn't allocate an mbuf cluster */
1723 1.26 tsutsui aprint_error_dev(sc->sc_dev,
1724 1.26 tsutsui "cs_process_receive: "
1725 1.26 tsutsui "unable to allocate a cluster\n");
1726 1.2 yamt m_freem(m);
1727 1.2 yamt
1728 1.43 msaitoh /* Skip the received frame */
1729 1.2 yamt CS_WRITE_PACKET_PAGE(sc, PKTPG_RX_CFG,
1730 1.43 msaitoh CS_READ_PACKET_PAGE(sc, PKTPG_RX_CFG)
1731 1.43 msaitoh | RX_CFG_SKIP);
1732 1.2 yamt return;
1733 1.2 yamt }
1734 1.1 yamt }
1735 1.1 yamt
1736 1.43 msaitoh /* Align ip header on word boundary for ipintr */
1737 1.1 yamt m->m_data += pad;
1738 1.1 yamt
1739 1.2 yamt m->m_len = totlen;
1740 1.43 msaitoh pBuff = mtod(m, uint16_t *);
1741 1.1 yamt
1742 1.43 msaitoh /* Now read the data from the chip */
1743 1.1 yamt if (sc->sc_memorymode) {
1744 1.44 msaitoh /* Don't want to go over */
1745 1.43 msaitoh pBuffLimit = pBuff + (totlen + 1) / 2;
1746 1.43 msaitoh
1747 1.1 yamt while (pBuff < pBuffLimit) {
1748 1.1 yamt *pBuff++ = CS_READ_PACKET_PAGE(sc, frameOffset);
1749 1.1 yamt frameOffset += 2;
1750 1.1 yamt }
1751 1.43 msaitoh } else
1752 1.6 augustss IO_READ_MULTI_2(sc, PORT_RXTX_DATA, pBuff, (totlen + 1)>>1);
1753 1.1 yamt
1754 1.1 yamt cs_ether_input(sc, m);
1755 1.1 yamt }
1756 1.1 yamt
1757 1.16 perry void
1758 1.5 augustss cs_process_rx_early(struct cs_softc *sc)
1759 1.1 yamt {
1760 1.1 yamt struct ifnet *ifp;
1761 1.1 yamt struct mbuf *m;
1762 1.43 msaitoh uint16_t frameCount, oldFrameCount;
1763 1.43 msaitoh uint16_t rxEvent;
1764 1.43 msaitoh uint16_t *pBuff;
1765 1.1 yamt int pad;
1766 1.1 yamt unsigned int frameOffset;
1767 1.1 yamt
1768 1.1 yamt
1769 1.1 yamt ifp = &sc->sc_ethercom.ec_if;
1770 1.1 yamt
1771 1.1 yamt /* Initialize the frame offset */
1772 1.1 yamt frameOffset = PKTPG_RX_FRAME;
1773 1.1 yamt frameCount = 0;
1774 1.1 yamt
1775 1.1 yamt MGETHDR(m, M_DONTWAIT, MT_DATA);
1776 1.1 yamt if (m == 0) {
1777 1.26 tsutsui aprint_error_dev(sc->sc_dev,
1778 1.26 tsutsui "cs_process_rx_early: unable to allocate mbuf\n");
1779 1.48 thorpej if_statinc(ifp, if_ierrors);
1780 1.1 yamt /*
1781 1.43 msaitoh * Couldn't allocate an mbuf so things are not good, may as
1782 1.1 yamt * well drop the packet I think.
1783 1.16 perry *
1784 1.1 yamt * have already read the length so we should be right to skip
1785 1.1 yamt * the packet.
1786 1.1 yamt */
1787 1.1 yamt CS_WRITE_PACKET_PAGE(sc, PKTPG_RX_CFG,
1788 1.1 yamt CS_READ_PACKET_PAGE(sc, PKTPG_RX_CFG) | RX_CFG_SKIP);
1789 1.1 yamt return;
1790 1.1 yamt }
1791 1.37 ozaki m_set_rcvif(m, ifp);
1792 1.1 yamt /*
1793 1.43 msaitoh * Save processing by always using a mbuf cluster, guaranteed to fit
1794 1.1 yamt * packet
1795 1.1 yamt */
1796 1.1 yamt MCLGET(m, M_DONTWAIT);
1797 1.1 yamt if ((m->m_flags & M_EXT) == 0) {
1798 1.43 msaitoh /* Couldn't allocate an mbuf cluster */
1799 1.26 tsutsui aprint_error_dev(sc->sc_dev,
1800 1.26 tsutsui "cs_process_rx_early: unable to allocate a cluster\n");
1801 1.1 yamt m_freem(m);
1802 1.43 msaitoh /* Skip the frame */
1803 1.1 yamt CS_WRITE_PACKET_PAGE(sc, PKTPG_RX_CFG,
1804 1.1 yamt CS_READ_PACKET_PAGE(sc, PKTPG_RX_CFG) | RX_CFG_SKIP);
1805 1.1 yamt return;
1806 1.1 yamt }
1807 1.1 yamt
1808 1.43 msaitoh /* Align ip header on word boundary for ipintr */
1809 1.1 yamt pad = ALIGN(sizeof(struct ether_header)) - sizeof(struct ether_header);
1810 1.1 yamt m->m_data += pad;
1811 1.1 yamt
1812 1.43 msaitoh /* Set up the buffer pointer to point to the data area */
1813 1.43 msaitoh pBuff = mtod(m, uint16_t *);
1814 1.1 yamt
1815 1.1 yamt /*
1816 1.43 msaitoh * Now read the frame byte counter until we have finished reading the
1817 1.1 yamt * frame
1818 1.1 yamt */
1819 1.1 yamt oldFrameCount = 0;
1820 1.1 yamt frameCount = CS_READ_PACKET_PAGE(sc, PKTPG_FRAME_BYTE_COUNT);
1821 1.1 yamt while ((frameCount != 0) && (frameCount < MCLBYTES)) {
1822 1.1 yamt for (; oldFrameCount < frameCount; oldFrameCount += 2) {
1823 1.1 yamt *pBuff++ = CS_READ_PACKET_PAGE(sc, frameOffset);
1824 1.1 yamt frameOffset += 2;
1825 1.1 yamt }
1826 1.1 yamt
1827 1.43 msaitoh /* Read the new count from the chip */
1828 1.1 yamt frameCount = CS_READ_PACKET_PAGE(sc, PKTPG_FRAME_BYTE_COUNT);
1829 1.1 yamt }
1830 1.1 yamt
1831 1.43 msaitoh /* Update the mbuf counts */
1832 1.1 yamt m->m_len = oldFrameCount;
1833 1.1 yamt m->m_pkthdr.len = oldFrameCount;
1834 1.1 yamt
1835 1.43 msaitoh /* Now check the Rx Event register */
1836 1.1 yamt rxEvent = CS_READ_PACKET_PAGE(sc, PKTPG_RX_EVENT);
1837 1.1 yamt
1838 1.1 yamt if ((rxEvent & RX_EVENT_RX_OK) != 0) {
1839 1.1 yamt /*
1840 1.43 msaitoh * Do an implied skip, it seems to be more reliable than a
1841 1.1 yamt * forced skip.
1842 1.1 yamt */
1843 1.1 yamt rxEvent = CS_READ_PACKET_PAGE(sc, PKTPG_RX_STATUS);
1844 1.1 yamt rxEvent = CS_READ_PACKET_PAGE(sc, PKTPG_RX_LENGTH);
1845 1.1 yamt
1846 1.1 yamt /*
1847 1.43 msaitoh * Now read the RX_EVENT register to perform an implied skip.
1848 1.1 yamt */
1849 1.1 yamt rxEvent = CS_READ_PACKET_PAGE(sc, PKTPG_RX_EVENT);
1850 1.1 yamt
1851 1.1 yamt cs_ether_input(sc, m);
1852 1.1 yamt } else {
1853 1.1 yamt m_freem(m);
1854 1.48 thorpej if_statinc(ifp, if_ierrors);
1855 1.1 yamt }
1856 1.1 yamt }
1857 1.1 yamt
1858 1.16 perry void
1859 1.5 augustss cs_start_output(struct ifnet *ifp)
1860 1.1 yamt {
1861 1.1 yamt struct cs_softc *sc;
1862 1.1 yamt struct mbuf *pMbuf;
1863 1.1 yamt struct mbuf *pMbufChain;
1864 1.43 msaitoh uint16_t BusStatus;
1865 1.43 msaitoh uint16_t Length;
1866 1.1 yamt int txLoop = 0;
1867 1.1 yamt int dropout = 0;
1868 1.1 yamt
1869 1.1 yamt sc = ifp->if_softc;
1870 1.1 yamt
1871 1.43 msaitoh /* Check that the interface is up and running */
1872 1.52 thorpej if ((ifp->if_flags & IFF_RUNNING) == 0)
1873 1.1 yamt return;
1874 1.1 yamt
1875 1.1 yamt /* Don't interrupt a transmission in progress */
1876 1.43 msaitoh if (sc->sc_txbusy)
1877 1.1 yamt return;
1878 1.1 yamt
1879 1.43 msaitoh /* This loop will only run through once if transmission is successful */
1880 1.1 yamt /*
1881 1.1 yamt * While there are packets to transmit and a transmit is not in
1882 1.1 yamt * progress
1883 1.1 yamt */
1884 1.1 yamt while (sc->sc_txbusy == 0 && dropout == 0) {
1885 1.1 yamt IFQ_DEQUEUE(&ifp->if_snd, pMbufChain);
1886 1.1 yamt if (pMbufChain == NULL)
1887 1.1 yamt break;
1888 1.1 yamt
1889 1.1 yamt /*
1890 1.43 msaitoh * If BPF is listening on this interface, let it see the packet
1891 1.43 msaitoh * before we commit it to the wire.
1892 1.43 msaitoh */
1893 1.41 msaitoh bpf_mtap(ifp, pMbufChain, BPF_D_OUT);
1894 1.1 yamt
1895 1.1 yamt /* Find the total length of the data to transmit */
1896 1.1 yamt Length = 0;
1897 1.1 yamt for (pMbuf = pMbufChain; pMbuf != NULL; pMbuf = pMbuf->m_next)
1898 1.1 yamt Length += pMbuf->m_len;
1899 1.1 yamt
1900 1.1 yamt do {
1901 1.1 yamt /*
1902 1.1 yamt * Request that the transmit be started after all
1903 1.1 yamt * data has been copied
1904 1.16 perry *
1905 1.1 yamt * In IO mode must write to the IO port not the packet
1906 1.1 yamt * page address
1907 1.16 perry *
1908 1.1 yamt * If this is changed to start transmission after a
1909 1.1 yamt * small amount of data has been copied you tend to
1910 1.1 yamt * get packet missed errors i think because the ISA
1911 1.1 yamt * bus is too slow. Or possibly the copy routine is
1912 1.1 yamt * not streamlined enough.
1913 1.1 yamt */
1914 1.1 yamt if (sc->sc_memorymode) {
1915 1.1 yamt CS_WRITE_PACKET_PAGE(sc, PKTPG_TX_CMD,
1916 1.43 msaitoh cs_xmit_early_table[sc->sc_xe_ent].txcmd);
1917 1.1 yamt CS_WRITE_PACKET_PAGE(sc, PKTPG_TX_LENGTH, Length);
1918 1.43 msaitoh } else {
1919 1.1 yamt CS_WRITE_PORT(sc, PORT_TX_CMD,
1920 1.43 msaitoh cs_xmit_early_table[sc->sc_xe_ent].txcmd);
1921 1.1 yamt CS_WRITE_PORT(sc, PORT_TX_LENGTH, Length);
1922 1.1 yamt }
1923 1.1 yamt
1924 1.43 msaitoh /* Adjust early-transmit machinery. */
1925 1.1 yamt if (--sc->sc_xe_togo == 0) {
1926 1.1 yamt sc->sc_xe_ent =
1927 1.1 yamt cs_xmit_early_table[sc->sc_xe_ent].better;
1928 1.1 yamt sc->sc_xe_togo =
1929 1.1 yamt cs_xmit_early_table[sc->sc_xe_ent].better_count;
1930 1.1 yamt }
1931 1.1 yamt /*
1932 1.1 yamt * Read the BusStatus register which indicates
1933 1.1 yamt * success of the request
1934 1.1 yamt */
1935 1.1 yamt BusStatus = CS_READ_PACKET_PAGE(sc, PKTPG_BUS_ST);
1936 1.1 yamt
1937 1.1 yamt /*
1938 1.1 yamt * If there was an error in the transmit bid free the
1939 1.1 yamt * mbuf and go on. This is presuming that mbuf is
1940 1.1 yamt * corrupt.
1941 1.1 yamt */
1942 1.1 yamt if (BusStatus & BUS_ST_TX_BID_ERR) {
1943 1.26 tsutsui aprint_error_dev(sc->sc_dev,
1944 1.26 tsutsui "transmit bid error (too big)");
1945 1.1 yamt
1946 1.1 yamt /* Discard the bad mbuf chain */
1947 1.1 yamt m_freem(pMbufChain);
1948 1.48 thorpej if_statinc(&sc->sc_ethercom.ec_if, if_oerrors);
1949 1.1 yamt
1950 1.1 yamt /* Loop up to transmit the next chain */
1951 1.1 yamt txLoop = 0;
1952 1.1 yamt } else {
1953 1.1 yamt if (BusStatus & BUS_ST_RDY4TXNOW) {
1954 1.1 yamt /*
1955 1.1 yamt * The chip is ready for transmission
1956 1.1 yamt * now
1957 1.1 yamt */
1958 1.1 yamt /*
1959 1.1 yamt * Copy the frame to the chip to
1960 1.1 yamt * start transmission
1961 1.1 yamt */
1962 1.1 yamt cs_copy_tx_frame(sc, pMbufChain);
1963 1.1 yamt
1964 1.1 yamt /* Free the mbuf chain */
1965 1.1 yamt m_freem(pMbufChain);
1966 1.1 yamt
1967 1.1 yamt /* Transmission is now in progress */
1968 1.1 yamt sc->sc_txbusy = TRUE;
1969 1.1 yamt txLoop = 0;
1970 1.1 yamt } else {
1971 1.1 yamt /*
1972 1.43 msaitoh * If we get here we want to try
1973 1.1 yamt * again with the same mbuf, until
1974 1.1 yamt * the chip lets us transmit.
1975 1.1 yamt */
1976 1.1 yamt txLoop++;
1977 1.1 yamt if (txLoop > CS_OUTPUT_LOOP_MAX) {
1978 1.1 yamt /* Free the mbuf chain */
1979 1.1 yamt m_freem(pMbufChain);
1980 1.1 yamt /*
1981 1.1 yamt * Transmission is not in
1982 1.1 yamt * progress
1983 1.1 yamt */
1984 1.1 yamt sc->sc_txbusy = FALSE;
1985 1.1 yamt /*
1986 1.1 yamt * Increment the output error
1987 1.1 yamt * count
1988 1.1 yamt */
1989 1.48 thorpej if_statinc(ifp, if_oerrors);
1990 1.1 yamt /*
1991 1.1 yamt * exit the routine and drop
1992 1.1 yamt * the packet.
1993 1.1 yamt */
1994 1.1 yamt txLoop = 0;
1995 1.1 yamt dropout = 1;
1996 1.1 yamt }
1997 1.1 yamt }
1998 1.1 yamt }
1999 1.1 yamt } while (txLoop);
2000 1.1 yamt }
2001 1.1 yamt }
2002 1.1 yamt
2003 1.16 perry void
2004 1.5 augustss cs_copy_tx_frame(struct cs_softc *sc, struct mbuf *m0)
2005 1.1 yamt {
2006 1.1 yamt struct mbuf *m;
2007 1.1 yamt int len, leftover, frameoff;
2008 1.43 msaitoh uint16_t dbuf;
2009 1.43 msaitoh uint8_t *p;
2010 1.1 yamt #ifdef DIAGNOSTIC
2011 1.43 msaitoh uint8_t *lim;
2012 1.1 yamt #endif
2013 1.1 yamt
2014 1.1 yamt /* Initialize frame pointer and data port address */
2015 1.1 yamt frameoff = PKTPG_TX_FRAME;
2016 1.1 yamt
2017 1.43 msaitoh /* Start out with no leftover data */
2018 1.1 yamt leftover = 0;
2019 1.1 yamt dbuf = 0;
2020 1.1 yamt
2021 1.1 yamt /* Process the chain of mbufs */
2022 1.1 yamt for (m = m0; m != NULL; m = m->m_next) {
2023 1.43 msaitoh /* Process all of the data in a single mbuf. */
2024 1.43 msaitoh p = mtod(m, uint8_t *);
2025 1.1 yamt len = m->m_len;
2026 1.1 yamt #ifdef DIAGNOSTIC
2027 1.1 yamt lim = p + len;
2028 1.1 yamt #endif
2029 1.1 yamt
2030 1.1 yamt while (len > 0) {
2031 1.1 yamt if (leftover) {
2032 1.1 yamt /*
2033 1.1 yamt * Data left over (from mbuf or realignment).
2034 1.1 yamt * Buffer the next byte, and write it and
2035 1.1 yamt * the leftover data out.
2036 1.1 yamt */
2037 1.1 yamt dbuf |= *p++ << 8;
2038 1.1 yamt len--;
2039 1.1 yamt if (sc->sc_memorymode) {
2040 1.1 yamt CS_WRITE_PACKET_PAGE(sc, frameoff, dbuf);
2041 1.1 yamt frameoff += 2;
2042 1.1 yamt }
2043 1.1 yamt else {
2044 1.1 yamt CS_WRITE_PORT(sc, PORT_RXTX_DATA, dbuf);
2045 1.1 yamt }
2046 1.1 yamt leftover = 0;
2047 1.1 yamt } else if ((long) p & 1) {
2048 1.43 msaitoh /* Misaligned data. Buffer the next byte. */
2049 1.1 yamt dbuf = *p++;
2050 1.1 yamt len--;
2051 1.1 yamt leftover = 1;
2052 1.1 yamt } else {
2053 1.1 yamt /*
2054 1.1 yamt * Aligned data. This is the case we like.
2055 1.1 yamt *
2056 1.1 yamt * Write-region out as much as we can, then
2057 1.1 yamt * buffer the remaining byte (if any).
2058 1.1 yamt */
2059 1.1 yamt leftover = len & 1;
2060 1.1 yamt len &= ~1;
2061 1.1 yamt if (sc->sc_memorymode) {
2062 1.6 augustss MEM_WRITE_REGION_2(sc, frameoff,
2063 1.43 msaitoh (uint16_t *) p, len >> 1);
2064 1.1 yamt frameoff += len;
2065 1.43 msaitoh } else
2066 1.43 msaitoh IO_WRITE_MULTI_2(sc, PORT_RXTX_DATA,
2067 1.43 msaitoh (uint16_t *)p, len >> 1);
2068 1.1 yamt p += len;
2069 1.1 yamt
2070 1.1 yamt if (leftover)
2071 1.1 yamt dbuf = *p++;
2072 1.1 yamt len = 0;
2073 1.1 yamt }
2074 1.1 yamt }
2075 1.1 yamt if (len < 0)
2076 1.1 yamt panic("cs_copy_tx_frame: negative len");
2077 1.1 yamt #ifdef DIAGNOSTIC
2078 1.1 yamt if (p != lim)
2079 1.1 yamt panic("cs_copy_tx_frame: p != lim");
2080 1.1 yamt #endif
2081 1.1 yamt }
2082 1.1 yamt if (leftover) {
2083 1.43 msaitoh if (sc->sc_memorymode)
2084 1.1 yamt CS_WRITE_PACKET_PAGE(sc, frameoff, dbuf);
2085 1.43 msaitoh else
2086 1.1 yamt CS_WRITE_PORT(sc, PORT_RXTX_DATA, dbuf);
2087 1.1 yamt }
2088 1.1 yamt }
2089 1.1 yamt
2090 1.1 yamt static int
2091 1.5 augustss cs_enable(struct cs_softc *sc)
2092 1.1 yamt {
2093 1.1 yamt
2094 1.4 thorpej if (CS_IS_ENABLED(sc) == 0) {
2095 1.4 thorpej if (sc->sc_enable != NULL) {
2096 1.4 thorpej int error;
2097 1.4 thorpej
2098 1.4 thorpej error = (*sc->sc_enable)(sc);
2099 1.4 thorpej if (error)
2100 1.43 msaitoh return error;
2101 1.4 thorpej }
2102 1.1 yamt sc->sc_cfgflags |= CFGFLG_ENABLED;
2103 1.1 yamt }
2104 1.1 yamt
2105 1.43 msaitoh return 0;
2106 1.1 yamt }
2107 1.1 yamt
2108 1.1 yamt static void
2109 1.5 augustss cs_disable(struct cs_softc *sc)
2110 1.1 yamt {
2111 1.4 thorpej
2112 1.4 thorpej if (CS_IS_ENABLED(sc)) {
2113 1.4 thorpej if (sc->sc_disable != NULL)
2114 1.4 thorpej (*sc->sc_disable)(sc);
2115 1.1 yamt
2116 1.1 yamt sc->sc_cfgflags &= ~CFGFLG_ENABLED;
2117 1.1 yamt }
2118 1.1 yamt }
2119 1.1 yamt
2120 1.1 yamt static void
2121 1.5 augustss cs_stop(struct ifnet *ifp, int disable)
2122 1.1 yamt {
2123 1.1 yamt struct cs_softc *sc = ifp->if_softc;
2124 1.1 yamt
2125 1.1 yamt CS_WRITE_PACKET_PAGE(sc, PKTPG_RX_CFG, 0);
2126 1.1 yamt CS_WRITE_PACKET_PAGE(sc, PKTPG_TX_CFG, 0);
2127 1.1 yamt CS_WRITE_PACKET_PAGE(sc, PKTPG_BUF_CFG, 0);
2128 1.1 yamt CS_WRITE_PACKET_PAGE(sc, PKTPG_BUS_CTL, 0);
2129 1.1 yamt
2130 1.43 msaitoh if (disable)
2131 1.1 yamt cs_disable(sc);
2132 1.1 yamt
2133 1.52 thorpej ifp->if_flags &= ~IFF_RUNNING;
2134 1.1 yamt }
2135 1.1 yamt
2136 1.1 yamt int
2137 1.24 cegger cs_activate(device_t self, enum devact act)
2138 1.1 yamt {
2139 1.26 tsutsui struct cs_softc *sc = device_private(self);
2140 1.1 yamt
2141 1.1 yamt switch (act) {
2142 1.1 yamt case DVACT_DEACTIVATE:
2143 1.1 yamt if_deactivate(&sc->sc_ethercom.ec_if);
2144 1.29 dyoung return 0;
2145 1.29 dyoung default:
2146 1.29 dyoung return EOPNOTSUPP;
2147 1.1 yamt }
2148 1.1 yamt }
2149