xref: /netbsd-src/sys/arch/mac68k/dev/if_ae.c (revision 10fe49d72c585c6bba03f275c71b179a5d67a209)
1 /*	$NetBSD: if_ae.c,v 1.80 2010/01/19 22:06:20 pooka Exp $	*/
2 
3 /*
4  * Device driver for National Semiconductor DS8390/WD83C690 based ethernet
5  * adapters.
6  *
7  * Copyright (c) 1994, 1995 Charles M. Hannum.  All rights reserved.
8  *
9  * Copyright (C) 1993, David Greenman.  This software may be used, modified,
10  * copied, distributed, and sold, in both source and binary form provided that
11  * the above copyright and these terms are retained.  Under no circumstances is
12  * the author responsible for the proper functioning of this software, nor does
13  * the author assume any responsibility for damages incurred with its use.
14  */
15 
16 #include <sys/cdefs.h>
17 __KERNEL_RCSID(0, "$NetBSD: if_ae.c,v 1.80 2010/01/19 22:06:20 pooka Exp $");
18 
19 
20 #include <sys/param.h>
21 #include <sys/systm.h>
22 #include <sys/device.h>
23 #include <sys/mbuf.h>
24 #include <sys/socket.h>
25 
26 #include <net/if.h>
27 #include <net/if_media.h>
28 #include <net/if_ether.h>
29 
30 #include <machine/bus.h>
31 
32 #include <dev/ic/dp8390reg.h>
33 #include <dev/ic/dp8390var.h>
34 #include <mac68k/dev/if_aevar.h>
35 
36 #define ETHER_PAD_LEN	(ETHER_MIN_LEN - ETHER_CRC_LEN)
37 
38 int
ae_size_card_memory(bus_space_tag_t bst,bus_space_handle_t bsh,int ofs)39 ae_size_card_memory(bus_space_tag_t bst, bus_space_handle_t bsh, int ofs)
40 {
41 	int i1, i2, i3, i4, i8;
42 
43 	/*
44 	 * banks; also assume it will generally mirror in upper banks
45 	 * if not installed.
46 	 */
47 	i1 = (8192 * 0);
48 	i2 = (8192 * 1);
49 	i3 = (8192 * 2);
50 	i4 = (8192 * 3);
51 
52 	i8 = (8192 * 4);
53 
54 	bus_space_write_2(bst, bsh, ofs + i8, 0x8888);
55 	bus_space_write_2(bst, bsh, ofs + i4, 0x4444);
56 	bus_space_write_2(bst, bsh, ofs + i3, 0x3333);
57 	bus_space_write_2(bst, bsh, ofs + i2, 0x2222);
58 	bus_space_write_2(bst, bsh, ofs + i1, 0x1111);
59 
60 	/*
61 	* 1) If the memory range is decoded completely, it does not
62 	*    matter what we write first: High tags written into
63 	*    the void are lost.
64 	* 2) If the memory range is not decoded completely (banks are
65 	*    mirrored), high tags are overwritten by lower ones.
66 	* 3) Lazy implementation of pathological cases - none found yet.
67 	*/
68 
69 	if (bus_space_read_2(bst, bsh, ofs + i1) == 0x1111 &&
70 	    bus_space_read_2(bst, bsh, ofs + i2) == 0x2222 &&
71 	    bus_space_read_2(bst, bsh, ofs + i3) == 0x3333 &&
72 	    bus_space_read_2(bst, bsh, ofs + i4) == 0x4444 &&
73 	    bus_space_read_2(bst, bsh, ofs + i8) == 0x8888)
74 		return 8192 * 8;
75 
76 	if (bus_space_read_2(bst, bsh, ofs + i1) == 0x1111 &&
77 	    bus_space_read_2(bst, bsh, ofs + i2) == 0x2222 &&
78 	    bus_space_read_2(bst, bsh, ofs + i3) == 0x3333 &&
79 	    bus_space_read_2(bst, bsh, ofs + i4) == 0x4444)
80 		return 8192 * 4;
81 
82 	if ((bus_space_read_2(bst, bsh, ofs + i1) == 0x1111 &&
83 	    bus_space_read_2(bst, bsh, ofs + i2) == 0x2222) ||
84 	    (bus_space_read_2(bst, bsh, ofs + i1) == 0x3333 &&
85 	    bus_space_read_2(bst, bsh, ofs + i2) == 0x4444))
86 		return 8192 * 2;
87 
88 	if (bus_space_read_2(bst, bsh, ofs + i1) == 0x1111 ||
89 	    bus_space_read_2(bst, bsh, ofs + i1) == 0x4444)
90 		return 8192;
91 
92 	return 0;
93 }
94 
95 /*
96  * Zero memory and verify that it is clear.  The only difference between
97  * this and the default test_mem function is that the DP8390-based NuBus
98  * cards * apparently require word-wide writes and byte-wide reads, an
99  * `interesting' combination.
100  */
101 int
ae_test_mem(struct dp8390_softc * sc)102 ae_test_mem(struct dp8390_softc *sc)
103 {
104 	bus_space_tag_t buft = sc->sc_buft;
105 	bus_space_handle_t bufh = sc->sc_bufh;
106 	int i;
107 
108 	bus_space_set_region_2(buft, bufh, sc->mem_start, 0,
109 	    sc->mem_size / 2);
110 
111 	for (i = 0; i < sc->mem_size; ++i) {
112 		if (bus_space_read_1(sc->sc_buft, sc->sc_bufh, i)) {
113 			printf(": failed to clear NIC buffer at offset %x - "
114 			    "check configuration\n", (sc->mem_start + i));
115 			return 1;
116 		}
117 	}
118 
119 	return 0;
120 }
121 
122 /*
123  * Copy packet from mbuf to the board memory Currently uses an extra
124  * buffer/extra memory copy, unless the whole packet fits in one mbuf.
125  *
126  * As in the test_mem function, we use word-wide writes.
127  */
128 int
ae_write_mbuf(struct dp8390_softc * sc,struct mbuf * m,int buf)129 ae_write_mbuf(struct dp8390_softc *sc, struct mbuf *m, int buf)
130 {
131 	u_char *data, savebyte[2];
132 	int len, wantbyte;
133 	u_short totlen = 0;
134 
135 	wantbyte = 0;
136 
137 	for (; m ; m = m->m_next) {
138 		data = mtod(m, u_char *);
139 		len = m->m_len;
140 		totlen += len;
141 		if (len > 0) {
142 			/* Finish the last word. */
143 			if (wantbyte) {
144 				savebyte[1] = *data;
145 				bus_space_write_region_2(sc->sc_buft,
146 				    sc->sc_bufh, buf, (u_int16_t *)savebyte, 1);
147 				buf += 2;
148 				data++;
149 				len--;
150 				wantbyte = 0;
151 			}
152 			/* Output contiguous words. */
153 			if (len > 1) {
154 				bus_space_write_region_2(
155 				    sc->sc_buft, sc->sc_bufh,
156 				    buf, (u_int16_t *)data, len >> 1);
157 				buf += len & ~1;
158 				data += len & ~1;
159 				len &= 1;
160 			}
161 			/* Save last byte, if necessary. */
162 			if (len == 1) {
163 				savebyte[0] = *data;
164 				wantbyte = 1;
165 			}
166 		}
167 	}
168 
169 	len = ETHER_PAD_LEN - totlen;
170 	if (wantbyte) {
171 		savebyte[1] = 0;
172 		bus_space_write_region_2(sc->sc_buft, sc->sc_bufh,
173 		    buf, (u_int16_t *)savebyte, 1);
174 		buf += 2;
175 		totlen++;
176 		len--;
177 	}
178 	/* if sent data is shorter than EHTER_PAD_LEN, put 0 to padding */
179 	if (len > 0) {
180 		bus_space_set_region_2(sc->sc_buft, sc->sc_bufh, buf, 0,
181 		    len >> 1);
182 		totlen = ETHER_PAD_LEN;
183 	}
184 	return (totlen);
185 }
186