262} 263 264/* 265 * Block waiting for a character. 266 */ 267static int 268at91_usart_getc(struct uart_bas *bas, struct mtx *mtx) 269{ 270 int c; 271 272 while (!(RD4(bas, USART_CSR) & USART_CSR_RXRDY)) 273 continue; 274 c = RD4(bas, USART_RHR); 275 c &= 0xff; 276 return (c); 277} 278 279static int at91_usart_bus_probe(struct uart_softc *sc); 280static int at91_usart_bus_attach(struct uart_softc *sc); 281static int at91_usart_bus_flush(struct uart_softc *, int); 282static int at91_usart_bus_getsig(struct uart_softc *); 283static int at91_usart_bus_ioctl(struct uart_softc *, int, intptr_t); 284static int at91_usart_bus_ipend(struct uart_softc *); 285static int at91_usart_bus_param(struct uart_softc *, int, int, int, int); 286static int at91_usart_bus_receive(struct uart_softc *); 287static int at91_usart_bus_setsig(struct uart_softc *, int); 288static int at91_usart_bus_transmit(struct uart_softc *); 289 290static kobj_method_t at91_usart_methods[] = { 291 KOBJMETHOD(uart_probe, at91_usart_bus_probe), 292 KOBJMETHOD(uart_attach, at91_usart_bus_attach), 293 KOBJMETHOD(uart_flush, at91_usart_bus_flush), 294 KOBJMETHOD(uart_getsig, at91_usart_bus_getsig), 295 KOBJMETHOD(uart_ioctl, at91_usart_bus_ioctl), 296 KOBJMETHOD(uart_ipend, at91_usart_bus_ipend), 297 KOBJMETHOD(uart_param, at91_usart_bus_param), 298 KOBJMETHOD(uart_receive, at91_usart_bus_receive), 299 KOBJMETHOD(uart_setsig, at91_usart_bus_setsig), 300 KOBJMETHOD(uart_transmit, at91_usart_bus_transmit), 301 302 { 0, 0 } 303}; 304 305int 306at91_usart_bus_probe(struct uart_softc *sc) 307{ 308 return (0); 309} 310 311#ifndef SKYEYE_WORKAROUNDS 312static void 313at91_getaddr(void *arg, bus_dma_segment_t *segs, int nsegs, int error) 314{ 315 if (error != 0) 316 return; 317 *(bus_addr_t *)arg = segs[0].ds_addr; 318} 319#endif 320 321static int 322at91_usart_bus_attach(struct uart_softc *sc) 323{ 324#ifndef SKYEYE_WORKAROUNDS 325 int err; 326 int i; 327#endif 328 uint32_t cr; 329 struct at91_usart_softc *atsc; 330 331 atsc = (struct at91_usart_softc *)sc; 332 333 /* 334 * See if we have a TIMEOUT bit. We disable all interrupts as 335 * a side effect. Boot loaders may have enabled them. Since 336 * a TIMEOUT interrupt can't happen without other setup, the 337 * apparent race here can't actually happen. 338 */ 339 WR4(&sc->sc_bas, USART_IDR, 0xffffffff); 340 WR4(&sc->sc_bas, USART_IER, USART_CSR_TIMEOUT); 341 if (RD4(&sc->sc_bas, USART_IMR) & USART_CSR_TIMEOUT) 342 atsc->flags |= HAS_TIMEOUT; 343 WR4(&sc->sc_bas, USART_IDR, 0xffffffff); 344 345 sc->sc_txfifosz = USART_BUFFER_SIZE; 346 sc->sc_rxfifosz = USART_BUFFER_SIZE; 347 sc->sc_hwiflow = 0; 348 349#ifndef SKYEYE_WORKAROUNDS 350 /* 351 * Allocate DMA tags and maps 352 */ 353 err = bus_dma_tag_create(NULL, 1, 0, BUS_SPACE_MAXADDR_32BIT, 354 BUS_SPACE_MAXADDR, NULL, NULL, USART_BUFFER_SIZE, 1, 355 USART_BUFFER_SIZE, BUS_DMA_ALLOCNOW, NULL, NULL, &atsc->dmatag); 356 if (err != 0) 357 goto errout; 358 err = bus_dmamap_create(atsc->dmatag, 0, &atsc->tx_map); 359 if (err != 0) 360 goto errout; 361 if (atsc->flags & HAS_TIMEOUT) { 362 for (i = 0; i < 2; i++) { 363 err = bus_dmamap_create(atsc->dmatag, 0, 364 &atsc->ping_pong[i].map); 365 if (err != 0) 366 goto errout; 367 err = bus_dmamap_load(atsc->dmatag, 368 atsc->ping_pong[i].map, 369 atsc->ping_pong[i].buffer, sc->sc_rxfifosz, 370 at91_getaddr, &atsc->ping_pong[i].pa, 0); 371 if (err != 0) 372 goto errout; 373 bus_dmamap_sync(atsc->dmatag, atsc->ping_pong[i].map, 374 BUS_DMASYNC_PREREAD); 375 } 376 atsc->ping = &atsc->ping_pong[0]; 377 atsc->pong = &atsc->ping_pong[1]; 378 } 379#endif 380 381 /* 382 * Prime the pump with the RX buffer. We use two 64 byte bounce 383 * buffers here to avoid data overflow. 384 */ 385 386 /* Turn on rx and tx */ 387 cr = USART_CR_RSTSTA | USART_CR_RSTRX | USART_CR_RSTTX; 388 WR4(&sc->sc_bas, USART_CR, cr); 389 WR4(&sc->sc_bas, USART_CR, USART_CR_RXEN | USART_CR_TXEN); 390 391 /* 392 * Setup the PDC to receive data. We use the ping-pong buffers 393 * so that we can more easily bounce between the two and so that 394 * we get an interrupt 1/2 way through the software 'fifo' we have 395 * to avoid overruns. 396 */ 397 if (atsc->flags & HAS_TIMEOUT) { 398 WR4(&sc->sc_bas, PDC_RPR, atsc->ping->pa); 399 WR4(&sc->sc_bas, PDC_RCR, sc->sc_rxfifosz); 400 WR4(&sc->sc_bas, PDC_RNPR, atsc->pong->pa); 401 WR4(&sc->sc_bas, PDC_RNCR, sc->sc_rxfifosz); 402 WR4(&sc->sc_bas, PDC_PTCR, PDC_PTCR_RXTEN); 403 404 /* Set the receive timeout to be 1.5 character times. */ 405 WR4(&sc->sc_bas, USART_RTOR, 12); 406 WR4(&sc->sc_bas, USART_CR, USART_CR_STTTO); 407 WR4(&sc->sc_bas, USART_IER, USART_CSR_TIMEOUT | 408 USART_CSR_RXBUFF | USART_CSR_ENDRX); 409 } else { 410 WR4(&sc->sc_bas, USART_IER, USART_CSR_RXRDY); 411 } 412 WR4(&sc->sc_bas, USART_IER, USART_CSR_RXBRK); 413#ifndef SKYEYE_WORKAROUNDS 414errout:; 415 // XXX bad 416 return (err); 417#else 418 return (0); 419#endif 420} 421 422static int 423at91_usart_bus_transmit(struct uart_softc *sc) 424{ 425#ifndef SKYEYE_WORKAROUNDS 426 bus_addr_t addr; 427#endif 428 struct at91_usart_softc *atsc; 429 430 atsc = (struct at91_usart_softc *)sc; 431#ifndef SKYEYE_WORKAROUNDS 432 if (bus_dmamap_load(atsc->dmatag, atsc->tx_map, sc->sc_txbuf, 433 sc->sc_txdatasz, at91_getaddr, &addr, 0) != 0) 434 return (EAGAIN); 435 bus_dmamap_sync(atsc->dmatag, atsc->tx_map, BUS_DMASYNC_PREWRITE); 436#endif 437 438 uart_lock(sc->sc_hwmtx); 439 sc->sc_txbusy = 1; 440#ifndef SKYEYE_WORKAROUNDS 441 /* 442 * Setup the PDC to transfer the data and interrupt us when it 443 * is done. We've already requested the interrupt. 444 */ 445 WR4(&sc->sc_bas, PDC_TPR, addr); 446 WR4(&sc->sc_bas, PDC_TCR, sc->sc_txdatasz); 447 WR4(&sc->sc_bas, PDC_PTCR, PDC_PTCR_TXTEN); 448 WR4(&sc->sc_bas, USART_IER, USART_CSR_ENDTX); 449 uart_unlock(sc->sc_hwmtx); 450#else 451 for (int i = 0; i < sc->sc_txdatasz; i++) 452 at91_usart_putc(&sc->sc_bas, sc->sc_txbuf[i]); 453 /* 454 * XXX: Gross hack : Skyeye doesn't raise an interrupt once the 455 * transfer is done, so simulate it. 456 */ 457 WR4(&sc->sc_bas, USART_IER, USART_CSR_TXRDY); 458#endif 459 return (0); 460} 461static int 462at91_usart_bus_setsig(struct uart_softc *sc, int sig) 463{ 464 uint32_t new, old, cr; 465 struct uart_bas *bas; 466 467 do { 468 old = sc->sc_hwsig; 469 new = old; 470 if (sig & SER_DDTR) 471 SIGCHG(sig & SER_DTR, new, SER_DTR, SER_DDTR); 472 if (sig & SER_DRTS) 473 SIGCHG(sig & SER_RTS, new, SER_RTS, SER_DRTS); 474 } while (!atomic_cmpset_32(&sc->sc_hwsig, old, new)); 475 bas = &sc->sc_bas; 476 uart_lock(sc->sc_hwmtx); 477 cr = 0; 478 if (new & SER_DTR) 479 cr |= USART_CR_DTREN; 480 else 481 cr |= USART_CR_DTRDIS; 482 if (new & SER_RTS) 483 cr |= USART_CR_RTSEN; 484 else 485 cr |= USART_CR_RTSDIS; 486 WR4(bas, USART_CR, cr); 487 uart_unlock(sc->sc_hwmtx); 488 return (0); 489} 490static int 491at91_usart_bus_receive(struct uart_softc *sc) 492{ 493 494 return (0); 495} 496static int 497at91_usart_bus_param(struct uart_softc *sc, int baudrate, int databits, 498 int stopbits, int parity) 499{ 500 501 return (at91_usart_param(&sc->sc_bas, baudrate, databits, stopbits, 502 parity)); 503} 504 505static __inline void 506at91_rx_put(struct uart_softc *sc, int key) 507{ 508#if defined(KDB) && defined(ALT_BREAK_TO_DEBUGGER) 509 if (sc->sc_sysdev != NULL && sc->sc_sysdev->type == UART_DEV_CONSOLE) { 510 if (kdb_alt_break(key, &sc->sc_altbrk)) 511 kdb_enter("Break sequence to console"); 512 } 513#endif 514 uart_rx_put(sc, key); 515} 516 517static int 518at91_usart_bus_ipend(struct uart_softc *sc) 519{ 520 int csr = RD4(&sc->sc_bas, USART_CSR); 521 int ipend = 0, i, len; 522 struct at91_usart_softc *atsc; 523 struct at91_usart_rx *p; 524 525 atsc = (struct at91_usart_softc *)sc; 526 if (csr & USART_CSR_ENDTX) { 527 bus_dmamap_sync(atsc->dmatag, atsc->tx_map, 528 BUS_DMASYNC_POSTWRITE); 529 bus_dmamap_unload(atsc->dmatag, atsc->tx_map); 530 } 531 uart_lock(sc->sc_hwmtx); 532 if (csr & USART_CSR_TXRDY) { 533 if (sc->sc_txbusy) 534 ipend |= SER_INT_TXIDLE; 535 WR4(&sc->sc_bas, USART_IDR, USART_CSR_TXRDY); 536 } 537 if (csr & USART_CSR_ENDTX) { 538 if (sc->sc_txbusy) 539 ipend |= SER_INT_TXIDLE; 540 WR4(&sc->sc_bas, USART_IDR, USART_CSR_ENDTX); 541 } 542 543 /* 544 * Due to the contraints of the DMA engine present in the 545 * atmel chip, I can't just say I have a rx interrupt pending 546 * and do all the work elsewhere. I need to look at the CSR 547 * bits right now and do things based on them to avoid races. 548 */ 549 if ((atsc->flags & HAS_TIMEOUT) && (csr & USART_CSR_RXBUFF)) { 550 // Have a buffer overflow. Copy all data from both 551 // ping and pong. Insert overflow character. Reset 552 // ping and pong and re-enable the PDC to receive 553 // characters again. 554 bus_dmamap_sync(atsc->dmatag, atsc->ping->map, 555 BUS_DMASYNC_POSTREAD); 556 bus_dmamap_sync(atsc->dmatag, atsc->pong->map, 557 BUS_DMASYNC_POSTREAD); 558 for (i = 0; i < sc->sc_rxfifosz; i++) 559 at91_rx_put(sc, atsc->ping->buffer[i]); 560 for (i = 0; i < sc->sc_rxfifosz; i++) 561 at91_rx_put(sc, atsc->pong->buffer[i]); 562 uart_rx_put(sc, UART_STAT_OVERRUN); 563 csr &= ~(USART_CSR_ENDRX | USART_CSR_TIMEOUT); 564 WR4(&sc->sc_bas, PDC_RPR, atsc->ping->pa); 565 WR4(&sc->sc_bas, PDC_RCR, sc->sc_rxfifosz); 566 WR4(&sc->sc_bas, PDC_RNPR, atsc->pong->pa); 567 WR4(&sc->sc_bas, PDC_RNCR, sc->sc_rxfifosz); 568 WR4(&sc->sc_bas, PDC_PTCR, PDC_PTCR_RXTEN); 569 ipend |= SER_INT_RXREADY; 570 } 571 if ((atsc->flags & HAS_TIMEOUT) && (csr & USART_CSR_ENDRX)) { 572 // Shuffle data from 'ping' of ping pong buffer, but 573 // leave current 'pong' in place, as it has become the 574 // new 'ping'. We need to copy data and setup the old 575 // 'ping' as the new 'pong' when we're done. 576 bus_dmamap_sync(atsc->dmatag, atsc->ping->map, 577 BUS_DMASYNC_POSTREAD); 578 for (i = 0; i < sc->sc_rxfifosz; i++) 579 at91_rx_put(sc, atsc->ping->buffer[i]); 580 p = atsc->ping; 581 atsc->ping = atsc->pong; 582 atsc->pong = p; 583 WR4(&sc->sc_bas, PDC_RNPR, atsc->pong->pa); 584 WR4(&sc->sc_bas, PDC_RNCR, sc->sc_rxfifosz); 585 ipend |= SER_INT_RXREADY; 586 } 587 if ((atsc->flags & HAS_TIMEOUT) && (csr & USART_CSR_TIMEOUT)) { 588 // We have one partial buffer. We need to stop the 589 // PDC, get the number of characters left and from 590 // that compute number of valid characters. We then 591 // need to reset ping and pong and reenable the PDC. 592 // Not sure if there's a race here at fast baud rates 593 // we need to worry about. 594 WR4(&sc->sc_bas, PDC_PTCR, PDC_PTCR_RXTDIS); 595 bus_dmamap_sync(atsc->dmatag, atsc->ping->map, 596 BUS_DMASYNC_POSTREAD); 597 len = sc->sc_rxfifosz - RD4(&sc->sc_bas, PDC_RCR); 598 for (i = 0; i < len; i++) 599 at91_rx_put(sc, atsc->ping->buffer[i]); 600 WR4(&sc->sc_bas, PDC_RPR, atsc->ping->pa); 601 WR4(&sc->sc_bas, PDC_RCR, sc->sc_rxfifosz); 602 WR4(&sc->sc_bas, USART_CR, USART_CR_STTTO); 603 WR4(&sc->sc_bas, PDC_PTCR, PDC_PTCR_RXTEN); 604 ipend |= SER_INT_RXREADY; 605 } 606 if (!(atsc->flags & HAS_TIMEOUT) && (csr & USART_CSR_RXRDY)) { 607 // We have another charater in a device that doesn't support 608 // timeouts, so we do it one character at a time. 609 at91_rx_put(sc, RD4(&sc->sc_bas, USART_RHR) & 0xff); 610 ipend |= SER_INT_RXREADY; 611 } 612 613 if (csr & USART_CSR_RXBRK) { 614 unsigned int cr = USART_CR_RSTSTA; 615 616 ipend |= SER_INT_BREAK; 617 WR4(&sc->sc_bas, USART_CR, cr); 618 } 619 uart_unlock(sc->sc_hwmtx); 620 return (ipend); 621} 622static int 623at91_usart_bus_flush(struct uart_softc *sc, int what) 624{ 625 return (0); 626} 627 628static int 629at91_usart_bus_getsig(struct uart_softc *sc) 630{ 631 uint32_t new, sig; 632 uint8_t csr; 633 634 uart_lock(sc->sc_hwmtx); 635 csr = RD4(&sc->sc_bas, USART_CSR); 636 sig = 0; 637 if (csr & USART_CSR_CTS) 638 sig |= SER_CTS; 639 if (csr & USART_CSR_DCD) 640 sig |= SER_DCD; 641 if (csr & USART_CSR_DSR) 642 sig |= SER_DSR; 643 if (csr & USART_CSR_RI) 644 sig |= SER_RI; 645 new = sig & ~SER_MASK_DELTA; 646 sc->sc_hwsig = new; 647 uart_unlock(sc->sc_hwmtx); 648 return (sig); 649} 650 651static int 652at91_usart_bus_ioctl(struct uart_softc *sc, int request, intptr_t data) 653{ 654 switch (request) { 655 case UART_IOCTL_BREAK: 656 case UART_IOCTL_IFLOW: 657 case UART_IOCTL_OFLOW: 658 break; 659 case UART_IOCTL_BAUD: 660 WR4(&sc->sc_bas, USART_BRGR, BAUD2DIVISOR(*(int *)data)); 661 return (0); 662 } 663 return (EINVAL); 664} 665struct uart_class at91_usart_class = { 666 "at91_usart class", 667 at91_usart_methods, 668 sizeof(struct at91_usart_softc), 669 .uc_range = 8, 670 .uc_rclk = DEFAULT_RCLK 671};
|