1/* $NetBSD: cs89x0isa.c,v 1.15 2009/09/22 15:34:22 tsutsui Exp $ */ 2 3/* 4 * Copyright 1997 5 * Digital Equipment Corporation. All rights reserved. 6 * 7 * This software is furnished under license and may be used and 8 * copied only in accordance with the following terms and conditions. 9 * Subject to these conditions, you may download, copy, install, 10 * use, modify and distribute this software in source and/or binary 11 * form. No title or ownership is transferred hereby. 12 * 13 * 1) Any source code used, modified or distributed must reproduce 14 * and retain this copyright notice and list of conditions as 15 * they appear in the source file. 16 * 17 * 2) No right is granted to use any trade name, trademark, or logo of 18 * Digital Equipment Corporation. Neither the "Digital Equipment 19 * Corporation" name nor any trademark or logo of Digital Equipment 20 * Corporation may be used to endorse or promote products derived 21 * from this software without the prior written permission of 22 * Digital Equipment Corporation. 23 * 24 * 3) This software is provided "AS-IS" and any express or implied 25 * warranties, including but not limited to, any implied warranties 26 * of merchantability, fitness for a particular purpose, or 27 * non-infringement are disclaimed. In no event shall DIGITAL be 28 * liable for any damages whatsoever, and in particular, DIGITAL 29 * shall not be liable for special, indirect, consequential, or 30 * incidental damages or damages for lost profits, loss of 31 * revenue or loss of use, whether such damages arise in contract, 32 * negligence, tort, under statute, in equity, at law or otherwise, 33 * even if advised of the possibility of such damage. 34 */ 35 36/* isa DMA routines for cs89x0 */ 37 38#include <sys/cdefs.h> 39__KERNEL_RCSID(0, "$NetBSD: cs89x0isa.c,v 1.15 2009/09/22 15:34:22 tsutsui Exp $"); 40 41#include <sys/param.h> 42#include <sys/systm.h> 43#include <sys/mbuf.h> 44#include <sys/socket.h> 45#include <sys/device.h> 46 47#include <sys/rnd.h> 48 49#include <net/if.h> 50#include <net/if_ether.h> 51#include <net/if_media.h> 52 53#include <sys/bus.h> 54 55#include <dev/isa/isareg.h> 56#include <dev/isa/isavar.h> 57#include <dev/isa/isadmavar.h> 58 59#include <dev/ic/cs89x0reg.h> 60#include <dev/ic/cs89x0var.h> 61#include <dev/isa/cs89x0isavar.h> 62 63#define DMA_STATUS_BITS 0x0007 /* bit masks for checking DMA status */ 64#define DMA_STATUS_OK 0x0004 65 66void 67cs_isa_dma_attach(struct cs_softc *sc) 68{ 69 struct cs_softc_isa *isc = (struct cs_softc_isa *)sc; 70 71 if (isc->sc_drq == ISA_UNKNOWN_DRQ) 72 printf("%s: DMA channel unspecified, not using DMA\n", 73 device_xname(sc->sc_dev)); 74 else if (isc->sc_drq < 5 || isc->sc_drq > 7) 75 printf("%s: invalid DMA channel, not using DMA\n", 76 device_xname(sc->sc_dev)); 77 else { 78 bus_size_t maxsize; 79 bus_addr_t dma_addr; 80 81 maxsize = isa_dmamaxsize(isc->sc_ic, isc->sc_drq); 82 if (maxsize < CS8900_DMASIZE) { 83 printf("%s: max DMA size %lu is" 84 " less than required %d\n", 85 device_xname(sc->sc_dev), (u_long)maxsize, 86 CS8900_DMASIZE); 87 goto after_dma_block; 88 } 89 90 if (isa_drq_alloc(isc->sc_ic, isc->sc_drq) != 0) { 91 aprint_error_dev(sc->sc_dev, 92 "unable to reserve drq %d\n", 93 isc->sc_drq); 94 goto after_dma_block; 95 } 96 97 if (isa_dmamap_create(isc->sc_ic, isc->sc_drq, 98 CS8900_DMASIZE, BUS_DMA_NOWAIT|BUS_DMA_ALLOCNOW) != 0) { 99 aprint_error_dev(sc->sc_dev, 100 "unable to create ISA DMA map\n"); 101 goto after_dma_block; 102 } 103 if (isa_dmamem_alloc(isc->sc_ic, isc->sc_drq, 104 CS8900_DMASIZE, &dma_addr, BUS_DMA_NOWAIT) != 0) { 105 aprint_error_dev(sc->sc_dev, 106 "unable to allocate DMA buffer\n"); 107 goto after_dma_block; 108 } 109 if (isa_dmamem_map(isc->sc_ic, isc->sc_drq, dma_addr, 110 CS8900_DMASIZE, (void **)&isc->sc_dmabase, 111 BUS_DMA_NOWAIT | BUS_DMA_COHERENT /* XXX */ ) != 0) { 112 aprint_error_dev(sc->sc_dev, 113 "unable to map DMA buffer\n"); 114 isa_dmamem_free(isc->sc_ic, isc->sc_drq, dma_addr, 115 CS8900_DMASIZE); 116 goto after_dma_block; 117 } 118 119 isc->sc_dmasize = CS8900_DMASIZE; 120 sc->sc_cfgflags |= CFGFLG_DMA_MODE; 121 isc->sc_dmaaddr = dma_addr; 122after_dma_block: 123 ; 124 } 125} 126 127void cs_isa_dma_chipinit(struct cs_softc *sc) 128{ 129 struct cs_softc_isa *isc = (struct cs_softc_isa *)sc; 130 131 if (sc->sc_cfgflags & CFGFLG_DMA_MODE) { 132 /* 133 * First we program the DMA controller and ensure the memory 134 * buffer is valid. If it isn't then we just go on without 135 * DMA. 136 */ 137 if (isa_dmastart(isc->sc_ic, isc->sc_drq, isc->sc_dmabase, 138 isc->sc_dmasize, NULL, DMAMODE_READ | DMAMODE_LOOPDEMAND, 139 BUS_DMA_NOWAIT)) { 140 /* XXX XXX XXX */ 141 panic("%s: unable to start DMA", 142 device_xname(sc->sc_dev)); 143 } 144 isc->sc_dmacur = isc->sc_dmabase; 145 146 /* interrupt when a DMA'd frame is received */ 147 CS_WRITE_PACKET_PAGE(sc, PKTPG_RX_CFG, 148 RX_CFG_ALL_IE | RX_CFG_RX_DMA_ONLY); 149 150 /* 151 * set the DMA burst bit so we don't tie up the bus for too 152 * long. 153 */ 154 if (isc->sc_dmasize == 16384) { 155 CS_WRITE_PACKET_PAGE(sc, PKTPG_BUS_CTL, 156 ((CS_READ_PACKET_PAGE(sc, PKTPG_BUS_CTL) & 157 ~BUS_CTL_DMA_SIZE) | BUS_CTL_DMA_BURST)); 158 } else { /* use 64K */ 159 CS_WRITE_PACKET_PAGE(sc, PKTPG_BUS_CTL, 160 CS_READ_PACKET_PAGE(sc, PKTPG_BUS_CTL) | 161 BUS_CTL_DMA_SIZE | BUS_CTL_DMA_BURST); 162 } 163 164 CS_WRITE_PACKET_PAGE(sc, PKTPG_DMA_CHANNEL, isc->sc_drq - 5); 165 } 166} 167 168void cs_process_rx_dma(struct cs_softc *sc) 169{ 170 struct cs_softc_isa *isc = (struct cs_softc_isa *)sc; 171 struct ifnet *ifp; 172 u_int16_t num_dma_frames; 173 u_int16_t pkt_length; 174 u_int16_t status; 175 u_int to_copy; 176 char *dma_mem_ptr; 177 struct mbuf *m; 178 u_char *pBuff; 179 int pad; 180 181 /* initialise the pointers */ 182 ifp = &sc->sc_ethercom.ec_if; 183 184 /* Read the number of frames DMAed. */ 185 num_dma_frames = CS_READ_PACKET_PAGE(sc, PKTPG_DMA_FRAME_COUNT); 186 num_dma_frames &= (u_int16_t) (0x0fff); 187 188 /* 189 * Loop till number of DMA frames ready to read is zero. After 190 * reading the frame out of memory we must check if any have been 191 * received while we were processing 192 */ 193 while (num_dma_frames != 0) { 194 dma_mem_ptr = isc->sc_dmacur; 195 196 /* 197 * process all of the DMA frames in memory 198 * 199 * This loop relies on the dma_mem_ptr variable being set to the 200 * next frames start address. 201 */ 202 for (; num_dma_frames > 0; num_dma_frames--) { 203 204 /* 205 * Get the length and status of the packet. Only the 206 * status is guaranteed to be at dma_mem_ptr, ie need 207 * to check for wraparound before reading the length 208 */ 209 status = *((u_int16_t *) dma_mem_ptr); 210 dma_mem_ptr += 2; 211 if (dma_mem_ptr > (isc->sc_dmabase + isc->sc_dmasize)) { 212 dma_mem_ptr = isc->sc_dmabase; 213 } 214 pkt_length = *((u_int16_t *) dma_mem_ptr); 215 dma_mem_ptr += 2; 216 217 /* Do some sanity checks on the length and status. */ 218 if ((pkt_length > ETHER_MAX_LEN) || 219 ((status & DMA_STATUS_BITS) != DMA_STATUS_OK)) { 220 /* 221 * the SCO driver kills the adapter in this 222 * situation 223 */ 224 /* 225 * should increment the error count and reset 226 * the DMA operation. 227 */ 228 printf("%s: cs_process_rx_dma: " 229 "DMA buffer out of sync about to reset\n", 230 device_xname(sc->sc_dev)); 231 ifp->if_ierrors++; 232 233 /* skip the rest of the DMA buffer */ 234 isa_dmaabort(isc->sc_ic, isc->sc_drq); 235 236 /* now reset the chip and reinitialise */ 237 cs_init(&sc->sc_ethercom.ec_if); 238 return; 239 } 240 /* Check the status of the received packet. */ 241 if (status & RX_EVENT_RX_OK) { 242 /* get a new mbuf */ 243 MGETHDR(m, M_DONTWAIT, MT_DATA); 244 if (m == 0) { 245 printf("%s: cs_process_rx_dma: " 246 "unable to allocate mbuf\n", 247 device_xname(sc->sc_dev)); 248 ifp->if_ierrors++; 249 /* 250 * couldn't allocate an mbuf so 251 * things are not good, may as well 252 * drop all the packets I think. 253 */ 254 CS_READ_PACKET_PAGE(sc, 255 PKTPG_DMA_FRAME_COUNT); 256 257 /* now reset DMA operation */ 258 isa_dmaabort(isc->sc_ic, isc->sc_drq); 259 260 /* 261 * now reset the chip and 262 * reinitialise 263 */ 264 cs_init(&sc->sc_ethercom.ec_if); 265 return; 266 } 267 /* 268 * save processing by always using a mbuf 269 * cluster, guaranteed to fit packet 270 */ 271 MCLGET(m, M_DONTWAIT); 272 if ((m->m_flags & M_EXT) == 0) { 273 /* couldn't allocate an mbuf cluster */ 274 printf("%s: cs_process_rx_dma: " 275 "unable to allocate a cluster\n", 276 device_xname(sc->sc_dev)); 277 m_freem(m); 278 279 /* skip the frame */ 280 CS_READ_PACKET_PAGE(sc, PKTPG_DMA_FRAME_COUNT); 281 isa_dmaabort(isc->sc_ic, isc->sc_drq); 282 283 /* 284 * now reset the chip and 285 * reinitialise 286 */ 287 cs_init(&sc->sc_ethercom.ec_if); 288 return; 289 } 290 m->m_pkthdr.rcvif = ifp; 291 m->m_pkthdr.len = pkt_length; 292 m->m_len = pkt_length; 293 294 /* 295 * align ip header on word boundary for 296 * ipintr 297 */ 298 pad = ALIGN(sizeof(struct ether_header)) - 299 sizeof(struct ether_header); 300 m->m_data += pad; 301 302 /* 303 * set up the buffer pointer to point to the 304 * data area 305 */ 306 pBuff = mtod(m, char *); 307 308 /* 309 * Read the frame into free_pktbuf 310 * The buffer is circular buffer, either 311 * 16K or 64K in length. 312 * 313 * need to check where the end of the buffer 314 * is and go back to the start. 315 */ 316 if ((dma_mem_ptr + pkt_length) < 317 (isc->sc_dmabase + isc->sc_dmasize)) { 318 /* 319 * No wrap around. Copy the frame 320 * header 321 */ 322 memcpy(pBuff, dma_mem_ptr, pkt_length); 323 dma_mem_ptr += pkt_length; 324 } else { 325 to_copy = (u_int) 326 ((isc->sc_dmabase + isc->sc_dmasize) - 327 dma_mem_ptr); 328 329 /* Copy the first half of the frame. */ 330 memcpy(pBuff, dma_mem_ptr, to_copy); 331 pBuff += to_copy; 332 333 /* 334 * Rest of the frame is to be read 335 * from the first byte of the DMA 336 * memory. 337 */ 338 /* 339 * Get the number of bytes leftout in 340 * the frame. 341 */ 342 to_copy = pkt_length - to_copy; 343 344 dma_mem_ptr = isc->sc_dmabase; 345 346 /* Copy rest of the frame. */ 347 memcpy(pBuff, dma_mem_ptr, to_copy); 348 dma_mem_ptr += to_copy; 349 } 350 351 cs_ether_input(sc, m); 352 } 353 /* (status & RX_OK) */ 354 else { 355 /* the frame was not received OK */ 356 /* Increment the input error count */ 357 ifp->if_ierrors++; 358 359 /* 360 * If debugging is enabled then log error 361 * messages if we got any. 362 */ 363 if ((ifp->if_flags & IFF_DEBUG) && 364 status != REG_NUM_RX_EVENT) 365 cs_print_rx_errors(sc, status); 366 } 367 /* 368 * now update the current frame pointer. the 369 * dma_mem_ptr should point to the next packet to be 370 * received, without the alignment considerations. 371 * 372 * The cs8900 pads all frames to start at the next 32bit 373 * aligned addres. hence we need to pad our offset 374 * pointer. 375 */ 376 dma_mem_ptr += 3; 377 dma_mem_ptr = (char *) 378 ((long) dma_mem_ptr & 0xfffffffc); 379 if (dma_mem_ptr < (isc->sc_dmabase + isc->sc_dmasize)) { 380 isc->sc_dmacur = dma_mem_ptr; 381 } else { 382 dma_mem_ptr = isc->sc_dmacur = isc->sc_dmabase; 383 } 384 } /* for all frames */ 385 /* Read the number of frames DMAed again. */ 386 num_dma_frames = CS_READ_PACKET_PAGE(sc, PKTPG_DMA_FRAME_COUNT); 387 num_dma_frames &= (u_int16_t) (0x0fff); 388 } /* while there are frames left */ 389} 390