dp8390.c revision 1.1.2.2 1 1.1.2.2 yamt /* $NetBSD: dp8390.c,v 1.1.2.2 2012/10/30 17:20:31 yamt Exp $ */
2 1.1.2.2 yamt /* Id: dp8390.c,v 1.14 2011/10/05 13:16:20 isaki Exp */
3 1.1.2.2 yamt
4 1.1.2.2 yamt /*
5 1.1.2.2 yamt * This file is derived from sys/arch/i386/stand/lib/netif/dp8390.c
6 1.1.2.2 yamt * NetBSD: dp8390.c,v 1.6 2008/12/14 18:46:33 christos Exp
7 1.1.2.2 yamt */
8 1.1.2.2 yamt
9 1.1.2.2 yamt /*
10 1.1.2.2 yamt * Polling driver for National Semiconductor DS8390/WD83C690 based
11 1.1.2.2 yamt * ethernet adapters.
12 1.1.2.2 yamt *
13 1.1.2.2 yamt * Copyright (c) 1998 Matthias Drochner. All rights reserved.
14 1.1.2.2 yamt *
15 1.1.2.2 yamt * Copyright (c) 1994, 1995 Charles M. Hannum. All rights reserved.
16 1.1.2.2 yamt *
17 1.1.2.2 yamt * Copyright (C) 1993, David Greenman. This software may be used, modified,
18 1.1.2.2 yamt * copied, distributed, and sold, in both source and binary form provided that
19 1.1.2.2 yamt * the above copyright and these terms are retained. Under no circumstances is
20 1.1.2.2 yamt * the author responsible for the proper functioning of this software, nor does
21 1.1.2.2 yamt * the author assume any responsibility for damages incurred with its use.
22 1.1.2.2 yamt */
23 1.1.2.2 yamt
24 1.1.2.2 yamt
25 1.1.2.2 yamt #include <sys/types.h>
26 1.1.2.2 yamt
27 1.1.2.2 yamt #include <lib/libsa/stand.h>
28 1.1.2.2 yamt #include <libx68k.h>
29 1.1.2.2 yamt
30 1.1.2.2 yamt #include <dev/ic/dp8390reg.h>
31 1.1.2.2 yamt #include "dp8390.h"
32 1.1.2.2 yamt #include "ne.h"
33 1.1.2.2 yamt
34 1.1.2.2 yamt int dp8390_iobase, dp8390_membase, dp8390_memsize;
35 1.1.2.2 yamt #if defined(SUPPORT_WD80X3) && defined(SUPPORT_SMC_ULTRA)
36 1.1.2.2 yamt int dp8390_is790;
37 1.1.2.2 yamt #endif
38 1.1.2.2 yamt uint8_t dp8390_cr_proto;
39 1.1.2.2 yamt uint8_t dp8390_dcr_reg;
40 1.1.2.2 yamt
41 1.1.2.2 yamt #define WE_IOBASE dp8390_iobase
42 1.1.2.2 yamt
43 1.1.2.2 yamt static u_short rec_page_start;
44 1.1.2.2 yamt static u_short rec_page_stop;
45 1.1.2.2 yamt static u_short next_packet;
46 1.1.2.2 yamt
47 1.1.2.2 yamt extern u_char eth_myaddr[6];
48 1.1.2.2 yamt
49 1.1.2.2 yamt static void dp8390_read(int, char *, u_short);
50 1.1.2.2 yamt
51 1.1.2.2 yamt #define NIC_GET(reg) inb(WE_IOBASE + (reg) * 2)
52 1.1.2.2 yamt #define NIC_PUT(reg, val) outb(WE_IOBASE + (reg) * 2, val)
53 1.1.2.2 yamt
54 1.1.2.2 yamt static void
55 1.1.2.2 yamt dp8390_init(void)
56 1.1.2.2 yamt {
57 1.1.2.2 yamt int i;
58 1.1.2.2 yamt
59 1.1.2.2 yamt /*
60 1.1.2.2 yamt * Initialize the NIC in the exact order outlined in the NS manual.
61 1.1.2.2 yamt * This init procedure is "mandatory"...don't change what or when
62 1.1.2.2 yamt * things happen.
63 1.1.2.2 yamt */
64 1.1.2.2 yamt
65 1.1.2.2 yamt /* Set interface for page 0, remote DMA complete, stopped. */
66 1.1.2.2 yamt NIC_PUT(ED_P0_CR, dp8390_cr_proto | ED_CR_PAGE_0 | ED_CR_STP);
67 1.1.2.2 yamt
68 1.1.2.2 yamt if ((dp8390_dcr_reg & ED_DCR_LS)) {
69 1.1.2.2 yamt NIC_PUT(ED_P0_DCR, dp8390_dcr_reg);
70 1.1.2.2 yamt } else {
71 1.1.2.2 yamt /*
72 1.1.2.2 yamt * Set FIFO threshold to 8, No auto-init Remote DMA, byte
73 1.1.2.2 yamt * order=80x86, byte-wide DMA xfers,
74 1.1.2.2 yamt */
75 1.1.2.2 yamt NIC_PUT(ED_P0_DCR, ED_DCR_FT1 | ED_DCR_LS);
76 1.1.2.2 yamt }
77 1.1.2.2 yamt
78 1.1.2.2 yamt /* Clear remote byte count registers. */
79 1.1.2.2 yamt NIC_PUT(ED_P0_RBCR0, 0);
80 1.1.2.2 yamt NIC_PUT(ED_P0_RBCR1, 0);
81 1.1.2.2 yamt
82 1.1.2.2 yamt /* Tell RCR to do nothing for now. */
83 1.1.2.2 yamt NIC_PUT(ED_P0_RCR, ED_RCR_MON);
84 1.1.2.2 yamt
85 1.1.2.2 yamt /* Place NIC in internal loopback mode. */
86 1.1.2.2 yamt NIC_PUT(ED_P0_TCR, ED_TCR_LB0);
87 1.1.2.2 yamt
88 1.1.2.2 yamt /* Set lower bits of byte addressable framing to 0. */
89 1.1.2.2 yamt if (dp8390_is790)
90 1.1.2.2 yamt NIC_PUT(0x09, 0);
91 1.1.2.2 yamt
92 1.1.2.2 yamt /* Initialize receive buffer ring. */
93 1.1.2.2 yamt NIC_PUT(ED_P0_BNRY, rec_page_start);
94 1.1.2.2 yamt NIC_PUT(ED_P0_PSTART, rec_page_start);
95 1.1.2.2 yamt NIC_PUT(ED_P0_PSTOP, rec_page_stop);
96 1.1.2.2 yamt
97 1.1.2.2 yamt /*
98 1.1.2.2 yamt * Clear all interrupts. A '1' in each bit position clears the
99 1.1.2.2 yamt * corresponding flag.
100 1.1.2.2 yamt */
101 1.1.2.2 yamt NIC_PUT(ED_P0_ISR, 0xff);
102 1.1.2.2 yamt
103 1.1.2.2 yamt /*
104 1.1.2.2 yamt * Disable all interrupts.
105 1.1.2.2 yamt */
106 1.1.2.2 yamt NIC_PUT(ED_P0_IMR, 0);
107 1.1.2.2 yamt
108 1.1.2.2 yamt /* Program command register for page 1. */
109 1.1.2.2 yamt NIC_PUT(ED_P0_CR, dp8390_cr_proto | ED_CR_PAGE_1 | ED_CR_STP);
110 1.1.2.2 yamt
111 1.1.2.2 yamt /* Copy out our station address. */
112 1.1.2.2 yamt for (i = 0; i < 6; i++)
113 1.1.2.2 yamt NIC_PUT(ED_P1_PAR0 + i, eth_myaddr[i]);
114 1.1.2.2 yamt
115 1.1.2.2 yamt /*
116 1.1.2.2 yamt * Set current page pointer to one page after the boundary pointer, as
117 1.1.2.2 yamt * recommended in the National manual.
118 1.1.2.2 yamt */
119 1.1.2.2 yamt next_packet = rec_page_start + 1;
120 1.1.2.2 yamt NIC_PUT(ED_P1_CURR, next_packet);
121 1.1.2.2 yamt
122 1.1.2.2 yamt /* Program command register for page 0. */
123 1.1.2.2 yamt NIC_PUT(ED_P1_CR, dp8390_cr_proto | ED_CR_PAGE_0 | ED_CR_STP);
124 1.1.2.2 yamt
125 1.1.2.2 yamt /* directed and broadcast */
126 1.1.2.2 yamt NIC_PUT(ED_P0_RCR, ED_RCR_AB);
127 1.1.2.2 yamt
128 1.1.2.2 yamt /* Take interface out of loopback. */
129 1.1.2.2 yamt NIC_PUT(ED_P0_TCR, 0);
130 1.1.2.2 yamt
131 1.1.2.2 yamt /* Fire up the interface. */
132 1.1.2.2 yamt NIC_PUT(ED_P0_CR, dp8390_cr_proto | ED_CR_PAGE_0 | ED_CR_STA);
133 1.1.2.2 yamt }
134 1.1.2.2 yamt
135 1.1.2.2 yamt int
136 1.1.2.2 yamt dp8390_config(void)
137 1.1.2.2 yamt {
138 1.1.2.2 yamt
139 1.1.2.2 yamt rec_page_start = TX_PAGE_START + ED_TXBUF_SIZE;
140 1.1.2.2 yamt rec_page_stop = TX_PAGE_START + (dp8390_memsize >> ED_PAGE_SHIFT);
141 1.1.2.2 yamt
142 1.1.2.2 yamt dp8390_init();
143 1.1.2.2 yamt
144 1.1.2.2 yamt return 0;
145 1.1.2.2 yamt }
146 1.1.2.2 yamt
147 1.1.2.2 yamt void
148 1.1.2.2 yamt dp8390_stop(void)
149 1.1.2.2 yamt {
150 1.1.2.2 yamt int n = 5000;
151 1.1.2.2 yamt
152 1.1.2.2 yamt /* Stop everything on the interface, and select page 0 registers. */
153 1.1.2.2 yamt NIC_PUT(ED_P0_CR, dp8390_cr_proto | ED_CR_PAGE_0 | ED_CR_STP);
154 1.1.2.2 yamt
155 1.1.2.2 yamt /*
156 1.1.2.2 yamt * Wait for interface to enter stopped state, but limit # of checks to
157 1.1.2.2 yamt * 'n' (about 5ms). It shouldn't even take 5us on modern DS8390's, but
158 1.1.2.2 yamt * just in case it's an old one.
159 1.1.2.2 yamt */
160 1.1.2.2 yamt while (((NIC_GET(ED_P0_ISR) & ED_ISR_RST) == 0) && --n)
161 1.1.2.2 yamt continue;
162 1.1.2.2 yamt }
163 1.1.2.2 yamt
164 1.1.2.2 yamt int
165 1.1.2.2 yamt EtherSend(char *pkt, int len)
166 1.1.2.2 yamt {
167 1.1.2.2 yamt ne2000_writemem(pkt, dp8390_membase, len);
168 1.1.2.2 yamt
169 1.1.2.2 yamt /* Set TX buffer start page. */
170 1.1.2.2 yamt NIC_PUT(ED_P0_TPSR, TX_PAGE_START);
171 1.1.2.2 yamt
172 1.1.2.2 yamt /* Set TX length. */
173 1.1.2.2 yamt NIC_PUT(ED_P0_TBCR0, len < 60 ? 60 : len);
174 1.1.2.2 yamt NIC_PUT(ED_P0_TBCR1, len >> 8);
175 1.1.2.2 yamt
176 1.1.2.2 yamt /* Set page 0, remote DMA complete, transmit packet, and *start*. */
177 1.1.2.2 yamt NIC_PUT(ED_P0_CR, dp8390_cr_proto | ED_CR_PAGE_0 | ED_CR_TXP | ED_CR_STA);
178 1.1.2.2 yamt
179 1.1.2.2 yamt return len;
180 1.1.2.2 yamt }
181 1.1.2.2 yamt
182 1.1.2.2 yamt static void
183 1.1.2.2 yamt dp8390_read(int buf, char *dest, u_short len)
184 1.1.2.2 yamt {
185 1.1.2.2 yamt u_short tmp_amount;
186 1.1.2.2 yamt
187 1.1.2.2 yamt /* Does copy wrap to lower addr in ring buffer? */
188 1.1.2.2 yamt if (buf + len > dp8390_membase + dp8390_memsize) {
189 1.1.2.2 yamt tmp_amount = dp8390_membase + dp8390_memsize - buf;
190 1.1.2.2 yamt
191 1.1.2.2 yamt /* Copy amount up to end of NIC memory. */
192 1.1.2.2 yamt ne2000_readmem(buf, dest, tmp_amount);
193 1.1.2.2 yamt
194 1.1.2.2 yamt len -= tmp_amount;
195 1.1.2.2 yamt buf = RX_BUFBASE + (rec_page_start << ED_PAGE_SHIFT);
196 1.1.2.2 yamt dest += tmp_amount;
197 1.1.2.2 yamt }
198 1.1.2.2 yamt ne2000_readmem(buf, dest, len);
199 1.1.2.2 yamt }
200 1.1.2.2 yamt
201 1.1.2.2 yamt int
202 1.1.2.2 yamt EtherReceive(char *pkt, int maxlen)
203 1.1.2.2 yamt {
204 1.1.2.2 yamt struct dp8390_ring packet_hdr;
205 1.1.2.2 yamt int packet_ptr;
206 1.1.2.2 yamt u_short len;
207 1.1.2.2 yamt u_char boundary, current;
208 1.1.2.2 yamt #ifdef DP8390_OLDCHIPS
209 1.1.2.2 yamt u_char nlen;
210 1.1.2.2 yamt #endif
211 1.1.2.2 yamt
212 1.1.2.2 yamt if (!(NIC_GET(ED_P0_RSR) & ED_RSR_PRX))
213 1.1.2.2 yamt return 0; /* XXX error handling */
214 1.1.2.2 yamt
215 1.1.2.2 yamt /* Set NIC to page 1 registers to get 'current' pointer. */
216 1.1.2.2 yamt NIC_PUT(ED_P0_CR, dp8390_cr_proto | ED_CR_PAGE_1 | ED_CR_STA);
217 1.1.2.2 yamt
218 1.1.2.2 yamt /*
219 1.1.2.2 yamt * 'sc->next_packet' is the logical beginning of the ring-buffer - i.e.
220 1.1.2.2 yamt * it points to where new data has been buffered. The 'CURR' (current)
221 1.1.2.2 yamt * register points to the logical end of the ring-buffer - i.e. it
222 1.1.2.2 yamt * points to where additional new data will be added. We loop here
223 1.1.2.2 yamt * until the logical beginning equals the logical end (or in other
224 1.1.2.2 yamt * words, until the ring-buffer is empty).
225 1.1.2.2 yamt */
226 1.1.2.2 yamt current = NIC_GET(ED_P1_CURR);
227 1.1.2.2 yamt
228 1.1.2.2 yamt /* Set NIC to page 0 registers to update boundary register. */
229 1.1.2.2 yamt NIC_PUT(ED_P1_CR, dp8390_cr_proto | ED_CR_PAGE_0 | ED_CR_STA);
230 1.1.2.2 yamt
231 1.1.2.2 yamt if (next_packet == current)
232 1.1.2.2 yamt return 0;
233 1.1.2.2 yamt
234 1.1.2.2 yamt /* Get pointer to this buffer's header structure. */
235 1.1.2.2 yamt packet_ptr = RX_BUFBASE + (next_packet << ED_PAGE_SHIFT);
236 1.1.2.2 yamt
237 1.1.2.2 yamt /*
238 1.1.2.2 yamt * The byte count includes a 4 byte header that was added by
239 1.1.2.2 yamt * the NIC.
240 1.1.2.2 yamt */
241 1.1.2.2 yamt ne2000_readmem(packet_ptr, (void *)&packet_hdr, 4);
242 1.1.2.2 yamt
243 1.1.2.2 yamt len = le16toh(packet_hdr.count);
244 1.1.2.2 yamt
245 1.1.2.2 yamt #ifdef DP8390_OLDCHIPS
246 1.1.2.2 yamt /*
247 1.1.2.2 yamt * Try do deal with old, buggy chips that sometimes duplicate
248 1.1.2.2 yamt * the low byte of the length into the high byte. We do this
249 1.1.2.2 yamt * by simply ignoring the high byte of the length and always
250 1.1.2.2 yamt * recalculating it.
251 1.1.2.2 yamt *
252 1.1.2.2 yamt * NOTE: sc->next_packet is pointing at the current packet.
253 1.1.2.2 yamt */
254 1.1.2.2 yamt if (packet_hdr.next_packet >= next_packet)
255 1.1.2.2 yamt nlen = (packet_hdr.next_packet - next_packet);
256 1.1.2.2 yamt else
257 1.1.2.2 yamt nlen = ((packet_hdr.next_packet - rec_page_start) +
258 1.1.2.2 yamt (rec_page_stop - next_packet));
259 1.1.2.2 yamt --nlen;
260 1.1.2.2 yamt if ((len & ED_PAGE_MASK) + sizeof(packet_hdr) > ED_PAGE_SIZE)
261 1.1.2.2 yamt --nlen;
262 1.1.2.2 yamt len = (len & ED_PAGE_MASK) | (nlen << ED_PAGE_SHIFT);
263 1.1.2.2 yamt #ifdef DIAGNOSTIC
264 1.1.2.2 yamt if (len != packet_hdr.count) {
265 1.1.2.2 yamt printf(IFNAME ": length does not match next packet pointer\n");
266 1.1.2.2 yamt printf(IFNAME ": len %04x nlen %04x start %02x "
267 1.1.2.2 yamt "first %02x curr %02x next %02x stop %02x\n",
268 1.1.2.2 yamt packet_hdr.count, len,
269 1.1.2.2 yamt rec_page_start, next_packet, current,
270 1.1.2.2 yamt packet_hdr.next_packet, rec_page_stop);
271 1.1.2.2 yamt }
272 1.1.2.2 yamt #endif
273 1.1.2.2 yamt #endif
274 1.1.2.2 yamt
275 1.1.2.2 yamt if (packet_hdr.next_packet < rec_page_start ||
276 1.1.2.2 yamt packet_hdr.next_packet >= rec_page_stop)
277 1.1.2.2 yamt panic(IFNAME ": RAM corrupt");
278 1.1.2.2 yamt
279 1.1.2.2 yamt len -= sizeof(struct dp8390_ring);
280 1.1.2.2 yamt if (len <= maxlen) {
281 1.1.2.2 yamt /* Go get packet. */
282 1.1.2.2 yamt dp8390_read(packet_ptr + sizeof(struct dp8390_ring),
283 1.1.2.2 yamt pkt, len);
284 1.1.2.2 yamt } else
285 1.1.2.2 yamt len = 0;
286 1.1.2.2 yamt
287 1.1.2.2 yamt /* Update next packet pointer. */
288 1.1.2.2 yamt next_packet = packet_hdr.next_packet;
289 1.1.2.2 yamt
290 1.1.2.2 yamt /*
291 1.1.2.2 yamt * Update NIC boundary pointer - being careful to keep it one
292 1.1.2.2 yamt * buffer behind (as recommended by NS databook).
293 1.1.2.2 yamt */
294 1.1.2.2 yamt boundary = next_packet - 1;
295 1.1.2.2 yamt if (boundary < rec_page_start)
296 1.1.2.2 yamt boundary = rec_page_stop - 1;
297 1.1.2.2 yamt NIC_PUT(ED_P0_BNRY, boundary);
298 1.1.2.2 yamt
299 1.1.2.2 yamt return len;
300 1.1.2.2 yamt }
301