Logo Search packages:      
Sourcecode: u-boot-linaro version File versions  Download package

usb_uhci.c

/*
 * Part of this code has been derived from linux:
 * Universal Host Controller Interface driver for USB (take II).
 *
 * (c) 1999-2001 Georg Acher, acher@in.tum.de (executive slave) (base guitar)
 *               Deti Fliegl, deti@fliegl.de (executive slave) (lead voice)
 *               Thomas Sailer, sailer@ife.ee.ethz.ch (chief consultant) (cheer leader)
 *               Roman Weissgaerber, weissg@vienna.at (virt root hub) (studio porter)
 * (c) 2000      Yggdrasil Computing, Inc. (port of new PCI interface support
 *               from usb-ohci.c by Adam Richter, adam@yggdrasil.com).
 * (C) 2000      David Brownell, david-b@pacbell.net (usb-ohci.c)
 *
 * HW-initalization based on material of
 *
 * (C) Copyright 1999 Linus Torvalds
 * (C) Copyright 1999 Johannes Erdfelt
 * (C) Copyright 1999 Randy Dunlap
 * (C) Copyright 1999 Gregory P. Smith
 *
 *
 * Adapted for U-Boot:
 * (C) Copyright 2001 Denis Peter, MPL AG Switzerland
 * (C) Copyright 2008, Daniel Hellström, daniel@gaisler.com
 *     Added AMBA Plug&Play detection of GRUSB, modified interrupt handler.
 *     Added cache flushes where needed.
 *
 * See file CREDITS for list of people who contributed to this
 * project.
 *
 * This program is free software; you can redistribute it and/or
 * modify it under the terms of the GNU General Public License as
 * published by the Free Software Foundation; either version 2 of
 * the License, or (at your option) any later version.
 *
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License
 * along with this program; if not, write to the Free Software
 * Foundation, Inc., 59 Temple Place, Suite 330, Boston,
 * MA 02111-1307 USA
 *
 *
 */

/**********************************************************************
 * How it works:
 * -------------
 * The framelist / Transfer descriptor / Queue Heads are similar like
 * in the linux usb_uhci.c.
 *
 * During initialization, the following skeleton is allocated in init_skel:
 *
 *         framespecific           |           common chain
 *
 * framelist[]
 * [  0 ]-----> TD ---------\
 * [  1 ]-----> TD ----------> TD ------> QH -------> QH -------> QH ---> NULL
 *   ...        TD ---------/
 * [1023]-----> TD --------/
 *
 *              ^^             ^^         ^^          ^^          ^^
 *              7 TDs for      1 TD for   Start of    Start of    End Chain
 *              INT (2-128ms)  1ms-INT    CTRL Chain  BULK Chain
 *
 *
 * Since this is a bootloader, the isochronous transfer descriptor have been removed.
 *
 * Interrupt Transfers.
 * --------------------
 * For Interupt transfers USB_MAX_TEMP_INT_TD Transfer descriptor are available. They
 * will be inserted after the appropriate (depending the interval setting) skeleton TD.
 * If an interrupt has been detected the dev->irqhandler is called. The status and number
 * of transfered bytes is stored in dev->irq_status resp. dev->irq_act_len. If the
 * dev->irqhandler returns 0, the interrupt TD is removed and disabled. If an 1 is returned,
 * the interrupt TD will be reactivated.
 *
 * Control Transfers
 * -----------------
 * Control Transfers are issued by filling the tmp_td with the appropriate data and connect
 * them to the qh_cntrl queue header. Before other control/bulk transfers can be issued,
 * the programm has to wait for completion. This does not allows asynchronous data transfer.
 *
 * Bulk Transfers
 * --------------
 * Bulk Transfers are issued by filling the tmp_td with the appropriate data and connect
 * them to the qh_bulk queue header. Before other control/bulk transfers can be issued,
 * the programm has to wait for completion. This does not allows asynchronous data transfer.
 *
 *
 */

#include <common.h>
#include <ambapp.h>
#include <asm/leon.h>
#include <asm/leon3.h>
#include <asm/processor.h>

#ifdef CONFIG_USB_UHCI

#include <usb.h>
#include "usb_uhci.h"

#define USB_MAX_TEMP_TD      128    /* number of temporary TDs for bulk and control transfers */
#define USB_MAX_TEMP_INT_TD  32     /* number of temporary TDs for Interrupt transfers */

extern int leon3_snooping_avail;
/*
#define out16r(address,data) (*(unsigned short *)(address) = \
 (unsigned short)( \
 (((unsigned short)(data)&0xff)<<8) | \
 (((unsigned short)(data)&0xff00)>>8) \
 ))
 */
#define out16r(address,data) _out16r((unsigned int)(address), (unsigned short)(data))
void _out16r(unsigned int address, unsigned short data)
{
      unsigned short val = (unsigned short)((((unsigned short)(data) & 0xff)
                                     << 8) | (((unsigned short)(data)
                                           & 0xff00) >> 8));
#ifdef UHCI_DEBUG_REGS
      printf("out16r(0x%lx,0x%04x = 0x%04x)\n", address, val, data);
#endif
      *(unsigned short *)(address) = val;
}

#define out32r(address,data) _out32r((unsigned int)(address), (unsigned int)(data))
void _out32r(unsigned int address, unsigned int data)
{
      unsigned int val = (unsigned int)((((unsigned int)(data) & 0x000000ff)
                                 << 24) | (((unsigned int)(data) &
                                          0x0000ff00) << 8) |
                                (((unsigned int)(data) & 0x00ff0000)
                                 >> 8) | (((unsigned int)(data) &
                                         0xff000000) >> 24));
#ifdef UHCI_DEBUG_REGS
      printf("out32r(0x%lx,0x%lx = 0x%lx)\n", address, val, data);
#endif
      *(unsigned int *)address = val;
}

#define in16r(address) _in16r((unsigned int)(address))
unsigned short _in16r(unsigned int address)
{
      unsigned short val = sparc_load_reg_cachemiss_word(address);
      val = ((val << 8) & 0xff00) | ((val >> 8) & 0xff);
#ifdef UHCI_DEBUG_REGS
      printf("in16r(0x%lx): 0x%04x\n", address, val);
#endif
      return val;
}

#define in32r(address) _in32r((unsigned int)(address))
unsigned int _in32r(unsigned int address)
{
      unsigned int val = sparc_load_reg_cachemiss(address);
      val =
          ((val << 24) & 0xff000000) | ((val << 8) & 0xff0000) | ((val >> 8) &
                                                    0xff00) |
          ((val >> 24) & 0xff);
#ifdef UHCI_DEBUG_REGS
      printf("in32r(0x%lx): 0x%08x\n", address, val);
#endif
      return val;
}

#define READ32(address) sparc_load_reg_cachemiss((unsigned int)(address))

/*#define USB_UHCI_DEBUG*/
#undef USB_UHCI_DEBUG

void usb_show_td(int max);
#ifdef      USB_UHCI_DEBUG
void grusb_show_regs(void);
#define     USB_UHCI_PRINTF(fmt,args...)  printf (fmt ,##args)
#else
#define USB_UHCI_PRINTF(fmt,args...)
#endif

static int grusb_irq = -1;    /* irq vector, if -1 uhci is stopped / reseted */
unsigned int usb_base_addr;   /* base address */

static uhci_td_t td_int[8] __attribute__ ((aligned(16)));   /* Interrupt Transfer descriptors */
static uhci_qh_t qh_cntrl __attribute__ ((aligned(16)));    /* control Queue Head */
static uhci_qh_t qh_bulk __attribute__ ((aligned(16)));     /*  bulk Queue Head */
static uhci_qh_t qh_end __attribute__ ((aligned(16)));      /* end Queue Head */
static uhci_td_t td_last __attribute__ ((aligned(16)));     /* last TD (linked with end chain) */

/* temporary tds */
static uhci_td_t tmp_td[USB_MAX_TEMP_TD] __attribute__ ((aligned(16))); /* temporary bulk/control td's  */
static uhci_td_t tmp_int_td[USB_MAX_TEMP_INT_TD] __attribute__ ((aligned(16)));     /* temporary interrupt td's  */

static unsigned long framelist[1024] __attribute__ ((aligned(0x1000))); /* frame list */

static struct virt_root_hub rh;     /* struct for root hub */

/**********************************************************************
 * some forward decleration
 */
int uhci_submit_rh_msg(struct usb_device *dev, unsigned long pipe,
                   void *buffer, int transfer_len,
                   struct devrequest *setup);

/* fill a td with the approproiate data. Link, status, info and buffer
 * are used by the USB controller itselfes, dev is used to identify the
 * "connected" device
 */
void usb_fill_td(uhci_td_t * td, unsigned long link, unsigned long status,
             unsigned long info, unsigned long buffer, unsigned long dev)
{
      td->link = swap_32(link);
      td->status = swap_32(status);
      if ((info & UHCI_PID) == 0)
            info |= USB_PID_OUT;
      td->info = swap_32(info);
      td->buffer = swap_32(buffer);
      td->dev_ptr = dev;
}

/* fill a qh with the approproiate data. Head and element are used by the USB controller
 * itselfes. As soon as a valid dev_ptr is filled, a td chain is connected to the qh.
 * Please note, that after completion of the td chain, the entry element is removed /
 * marked invalid by the USB controller.
 */
void usb_fill_qh(uhci_qh_t * qh, unsigned long head, unsigned long element)
{
      qh->head = swap_32(head);
      qh->element = swap_32(element);
      qh->dev_ptr = 0L;
}

/* get the status of a td->status
 */
unsigned long usb_uhci_td_stat(unsigned long status)
{
      unsigned long result = 0;
      result |= (status & TD_CTRL_NAK) ? USB_ST_NAK_REC : 0;
      result |= (status & TD_CTRL_STALLED) ? USB_ST_STALLED : 0;
      result |= (status & TD_CTRL_DBUFERR) ? USB_ST_BUF_ERR : 0;
      result |= (status & TD_CTRL_BABBLE) ? USB_ST_BABBLE_DET : 0;
      result |= (status & TD_CTRL_CRCTIMEO) ? USB_ST_CRC_ERR : 0;
      result |= (status & TD_CTRL_BITSTUFF) ? USB_ST_BIT_ERR : 0;
      result |= (status & TD_CTRL_ACTIVE) ? USB_ST_NOT_PROC : 0;
      return result;
}

/* get the status and the transfered len of a td chain.
 * called from the completion handler
 */
int usb_get_td_status(uhci_td_t * td, struct usb_device *dev)
{
      unsigned long temp, info;
      unsigned long stat;
      uhci_td_t *mytd = td;

      if (dev->devnum == rh.devnum)
            return 0;
      dev->act_len = 0;
      stat = 0;
      do {
            temp = swap_32((unsigned long)READ32(&mytd->status));
            stat = usb_uhci_td_stat(temp);
            info = swap_32((unsigned long)READ32(&mytd->info));
            if (((info & 0xff) != USB_PID_SETUP) && (((info >> 21) & 0x7ff) != 0x7ff) && (temp & 0x7FF) != 0x7ff) {     /* if not setup and not null data pack */
                  dev->act_len += (temp & 0x7FF) + 1; /* the transfered len is act_len + 1 */
            }
            if (stat) { /* status no ok */
                  dev->status = stat;
                  return -1;
            }
            temp = swap_32((unsigned long)READ32(&mytd->link));
            mytd = (uhci_td_t *) (temp & 0xfffffff0);
      } while ((temp & 0x1) == 0);  /* process all TDs */
      dev->status = stat;
      return 0;         /* Ok */
}

/*-------------------------------------------------------------------
 *                         LOW LEVEL STUFF
 *          assembles QHs und TDs for control, bulk and iso
 *-------------------------------------------------------------------*/
int dummy(void)
{
      USB_UHCI_PRINTF("DUMMY\n");
      return 0;
}

/* Submits a control message. That is a Setup, Data and Status transfer.
 * Routine does not wait for completion.
 */
int submit_control_msg(struct usb_device *dev, unsigned long pipe, void *buffer,
                   int transfer_len, struct devrequest *setup)
{
      unsigned long destination, status;
      int maxsze = usb_maxpacket(dev, pipe);
      unsigned long dataptr;
      int len;
      int pktsze;
      int i = 0;

      if (!maxsze) {
            USB_UHCI_PRINTF
                ("uhci_submit_control_urb: pipesize for pipe %lx is zero\n",
                 pipe);
            return -1;
      }
      if (((pipe >> 8) & 0x7f) == rh.devnum) {
            /* this is the root hub -> redirect it */
            return uhci_submit_rh_msg(dev, pipe, buffer, transfer_len,
                                setup);
      }
      USB_UHCI_PRINTF("uhci_submit_control start len %x, maxsize %x\n",
                  transfer_len, maxsze);
      /* The "pipe" thing contains the destination in bits 8--18 */
      destination = (pipe & PIPE_DEVEP_MASK) | USB_PID_SETUP;     /* Setup stage */
      /* 3 errors */
      status = (pipe & TD_CTRL_LS) | TD_CTRL_ACTIVE | (3 << 27);
      /* (urb->transfer_flags & USB_DISABLE_SPD ? 0 : TD_CTRL_SPD); */
      /*  Build the TD for the control request, try forever, 8 bytes of data */
      usb_fill_td(&tmp_td[i], UHCI_PTR_TERM, status, destination | (7 << 21),
                (unsigned long)setup, (unsigned long)dev);
#ifdef DEBUG_EXTRA
      {
            char *sp = (char *)setup;
            printf("SETUP to pipe %lx: %x %x %x %x %x %x %x %x\n", pipe,
                   sp[0], sp[1], sp[2], sp[3], sp[4], sp[5], sp[6], sp[7]);
      }
#endif
      dataptr = (unsigned long)buffer;
      len = transfer_len;

      /* If direction is "send", change the frame from SETUP (0x2D)
         to OUT (0xE1). Else change it from SETUP to IN (0x69). */
      destination =
          (pipe & PIPE_DEVEP_MASK) | ((pipe & USB_DIR_IN) ==
                              0 ? USB_PID_OUT : USB_PID_IN);
      while (len > 0) {
            /* data stage */
            pktsze = len;
            i++;
            if (pktsze > maxsze)
                  pktsze = maxsze;
            destination ^= 1 << TD_TOKEN_TOGGLE;      /* toggle DATA0/1 */
            usb_fill_td(&tmp_td[i], UHCI_PTR_TERM, status, destination | ((pktsze - 1) << 21), dataptr, (unsigned long)dev);  /* Status, pktsze bytes of data */
            tmp_td[i - 1].link = swap_32((unsigned long)&tmp_td[i]);

            dataptr += pktsze;
            len -= pktsze;
      }

      /*  Build the final TD for control status */
      /* It's only IN if the pipe is out AND we aren't expecting data */

      destination &= ~UHCI_PID;
      if (((pipe & USB_DIR_IN) == 0) || (transfer_len == 0))
            destination |= USB_PID_IN;
      else
            destination |= USB_PID_OUT;
      destination |= 1 << TD_TOKEN_TOGGLE;      /* End in Data1 */
      i++;
      status &= ~TD_CTRL_SPD;
      /* no limit on errors on final packet , 0 bytes of data */
      usb_fill_td(&tmp_td[i], UHCI_PTR_TERM, status | TD_CTRL_IOC,
                destination | (UHCI_NULL_DATA_SIZE << 21), 0,
                (unsigned long)dev);
      tmp_td[i - 1].link = swap_32((unsigned long)&tmp_td[i]);    /* queue status td */
      /* usb_show_td(i+1); */
      USB_UHCI_PRINTF("uhci_submit_control end (%d tmp_tds used)\n", i);
      /* first mark the control QH element terminated */
      qh_cntrl.element = 0xffffffffL;
      /* set qh active */
      qh_cntrl.dev_ptr = (unsigned long)dev;
      /* fill in tmp_td_chain */
      dummy();
      qh_cntrl.element = swap_32((unsigned long)&tmp_td[0]);
      return 0;
}

/*-------------------------------------------------------------------
 * Prepare TDs for bulk transfers.
 */
int submit_bulk_msg(struct usb_device *dev, unsigned long pipe, void *buffer,
                int transfer_len)
{
      unsigned long destination, status, info;
      unsigned long dataptr;
      int maxsze = usb_maxpacket(dev, pipe);
      int len;
      int i = 0;

      if (transfer_len < 0) {
            printf("Negative transfer length in submit_bulk\n");
            return -1;
      }
      if (!maxsze)
            return -1;
      /* The "pipe" thing contains the destination in bits 8--18. */
      destination = (pipe & PIPE_DEVEP_MASK) | usb_packetid(pipe);
      /* 3 errors */
      status = (pipe & TD_CTRL_LS) | TD_CTRL_ACTIVE | (3 << 27);
      /*      ((urb->transfer_flags & USB_DISABLE_SPD) ? 0 : TD_CTRL_SPD) | (3 << 27); */
      /* Build the TDs for the bulk request */
      len = transfer_len;
      dataptr = (unsigned long)buffer;
      do {
            int pktsze = len;
            if (pktsze > maxsze)
                  pktsze = maxsze;
            /* pktsze bytes of data  */
            info =
                destination | (((pktsze - 1) & UHCI_NULL_DATA_SIZE) << 21) |
                (usb_gettoggle
                 (dev, usb_pipeendpoint(pipe),
                  usb_pipeout(pipe)) << TD_TOKEN_TOGGLE);

            if ((len - pktsze) == 0)
                  status |= TD_CTRL_IOC;  /* last one generates INT */

            usb_fill_td(&tmp_td[i], UHCI_PTR_TERM, status, info, dataptr, (unsigned long)dev);  /* Status, pktsze bytes of data */
            if (i > 0)
                  tmp_td[i - 1].link = swap_32((unsigned long)&tmp_td[i]);
            i++;
            dataptr += pktsze;
            len -= pktsze;
            usb_dotoggle(dev, usb_pipeendpoint(pipe), usb_pipeout(pipe));
      } while (len > 0);
      /* first mark the bulk QH element terminated */
      qh_bulk.element = 0xffffffffL;
      /* set qh active */
      qh_bulk.dev_ptr = (unsigned long)dev;
      /* fill in tmp_td_chain */
      qh_bulk.element = swap_32((unsigned long)&tmp_td[0]);
      return 0;
}

/* search a free interrupt td
 */
uhci_td_t *uhci_alloc_int_td(void)
{
      int i;
      for (i = 0; i < USB_MAX_TEMP_INT_TD; i++) {
            if (tmp_int_td[i].dev_ptr == 0)     /* no device assigned -> free TD */
                  return &tmp_int_td[i];
      }
      return NULL;
}

/*-------------------------------------------------------------------
 * submits USB interrupt (ie. polling ;-)
 */
int submit_int_msg(struct usb_device *dev, unsigned long pipe, void *buffer,
               int transfer_len, int interval)
{
      int nint, n;
      unsigned long status, destination;
      unsigned long info, tmp;
      uhci_td_t *mytd;
      if (interval < 0 || interval >= 256)
            return -1;

      if (interval == 0)
            nint = 0;
      else {
            for (nint = 0, n = 1; nint <= 8; nint++, n += n) {    /* round interval down to 2^n */
                  if (interval < n) {
                        interval = n / 2;
                        break;
                  }
            }
            nint--;
      }

      USB_UHCI_PRINTF("Rounded interval to %i, chain  %i\n", interval, nint);
      mytd = uhci_alloc_int_td();
      if (mytd == NULL) {
            printf("No free INT TDs found\n");
            return -1;
      }
      status = (pipe & TD_CTRL_LS) | TD_CTRL_ACTIVE | TD_CTRL_IOC | (3 << 27);
/*          (urb->transfer_flags & USB_DISABLE_SPD ? 0 : TD_CTRL_SPD) | (3 << 27);
*/

      destination =
          (pipe & PIPE_DEVEP_MASK) | usb_packetid(pipe) |
          (((transfer_len - 1) & 0x7ff) << 21);

      info =
          destination |
          (usb_gettoggle(dev, usb_pipeendpoint(pipe), usb_pipeout(pipe)) <<
           TD_TOKEN_TOGGLE);
      tmp = swap_32(td_int[nint].link);
      usb_fill_td(mytd, tmp, status, info, (unsigned long)buffer,
                (unsigned long)dev);
      /* Link it */
      tmp = swap_32((unsigned long)mytd);
      td_int[nint].link = tmp;

      usb_dotoggle(dev, usb_pipeendpoint(pipe), usb_pipeout(pipe));

      return 0;
}

/**********************************************************************
 * Low Level functions
 */

void reset_hc(void)
{

      /* Global reset for 100ms */
      out16r(usb_base_addr + USBPORTSC1, 0x0204);
      out16r(usb_base_addr + USBPORTSC2, 0x0204);
      out16r(usb_base_addr + USBCMD, USBCMD_GRESET | USBCMD_RS);
      /* Turn off all interrupts */
      out16r(usb_base_addr + USBINTR, 0);
      wait_ms(50);
      out16r(usb_base_addr + USBCMD, 0);
      wait_ms(10);
}

void start_hc(void)
{
      int timeout = 1000;

      while (in16r(usb_base_addr + USBCMD) & USBCMD_HCRESET) {
            if (!--timeout) {
                  printf("USBCMD_HCRESET timed out!\n");
                  break;
            }
      }
      /* Turn on all interrupts */
      out16r(usb_base_addr + USBINTR,
             USBINTR_TIMEOUT | USBINTR_RESUME | USBINTR_IOC | USBINTR_SP);
      /* Start at frame 0 */
      out16r(usb_base_addr + USBFRNUM, 0);
      /* set Framebuffer base address */
      out32r(usb_base_addr + USBFLBASEADD, (unsigned long)&framelist);
      /* Run and mark it configured with a 64-byte max packet */
      out16r(usb_base_addr + USBCMD, USBCMD_RS | USBCMD_CF | USBCMD_MAXP);
}

/* Initialize the skeleton
 */
void usb_init_skel(void)
{
      unsigned long temp;
      int n;

      for (n = 0; n < USB_MAX_TEMP_INT_TD; n++)
            tmp_int_td[n].dev_ptr = 0L;   /* no devices connected */
      /* last td */
      usb_fill_td(&td_last, UHCI_PTR_TERM, TD_CTRL_IOC, USB_PID_OUT, 0, 0L);
      /* usb_fill_td(&td_last,UHCI_PTR_TERM,0,0,0); */
      /* End Queue Header */
      usb_fill_qh(&qh_end, UHCI_PTR_TERM, (unsigned long)&td_last);
      /* Bulk Queue Header */
      temp = (unsigned long)&qh_end;
      usb_fill_qh(&qh_bulk, temp | UHCI_PTR_QH, UHCI_PTR_TERM);
      /* Control Queue Header */
      temp = (unsigned long)&qh_bulk;
      usb_fill_qh(&qh_cntrl, temp | UHCI_PTR_QH, UHCI_PTR_TERM);
      /* 1ms Interrupt td */
      temp = (unsigned long)&qh_cntrl;
      usb_fill_td(&td_int[0], temp | UHCI_PTR_QH, 0, USB_PID_OUT, 0, 0L);
      temp = (unsigned long)&td_int[0];
      for (n = 1; n < 8; n++)
            usb_fill_td(&td_int[n], temp, 0, USB_PID_OUT, 0, 0L);
      for (n = 0; n < 1024; n++) {
            /* link all framelist pointers to one of the interrupts */
            int m, o;
            if ((n & 127) == 127)
                  framelist[n] = swap_32((unsigned long)&td_int[0]);
            else
                  for (o = 1, m = 2; m <= 128; o++, m += m)
                        if ((n & (m - 1)) == ((m - 1) / 2))
                              framelist[n] =
                                  swap_32((unsigned long)&td_int[o]);

      }
}

/* check the common skeleton for completed transfers, and update the status
 * of the "connected" device. Called from the IRQ routine.
 */
void usb_check_skel(void)
{
      struct usb_device *dev;
      /* start with the control qh */
      if (qh_cntrl.dev_ptr != 0) {  /* it's a device assigned check if this caused IRQ */
            dev = (struct usb_device *)qh_cntrl.dev_ptr;
            /* Flush cache now that hardware updated DATA and TDs/QHs */
            if (!leon3_snooping_avail)
                  sparc_dcache_flush_all();
            usb_get_td_status(&tmp_td[0], dev); /* update status */
            if (!(dev->status & USB_ST_NOT_PROC)) {   /* is not active anymore, disconnect devices */
                  qh_cntrl.dev_ptr = 0;
            }
      }
      /* now process the bulk */
      if (qh_bulk.dev_ptr != 0) {   /* it's a device assigned check if this caused IRQ */
            dev = (struct usb_device *)qh_bulk.dev_ptr;
            /* Flush cache now that hardware updated DATA and TDs/QHs */
            if (!leon3_snooping_avail)
                  sparc_dcache_flush_all();
            usb_get_td_status(&tmp_td[0], dev); /* update status */
            if (!(dev->status & USB_ST_NOT_PROC)) {   /* is not active anymore, disconnect devices */
                  qh_bulk.dev_ptr = 0;
            }
      }
}

/* check the interrupt chain, ubdate the status of the appropriate device,
 * call the appropriate irqhandler and reactivate the TD if the irqhandler
 * returns with 1
 */
void usb_check_int_chain(void)
{
      int i, res;
      unsigned long link, status;
      struct usb_device *dev;
      uhci_td_t *td, *prevtd;

      for (i = 0; i < 8; i++) {
            prevtd = &td_int[i];    /* the first previous td is the skeleton td */
            link = swap_32(READ32(&td_int[i].link)) & 0xfffffff0; /* next in chain */
            td = (uhci_td_t *) link;      /* assign it */
            /* all interrupt TDs are finally linked to the td_int[0].
             * so we process all until we find the td_int[0].
             * if int0 chain points to a QH, we're also done
             */
            while (((i > 0) && (link != (unsigned long)&td_int[0])) ||
                   ((i == 0)
                  && !(swap_32(READ32(&td->link)) & UHCI_PTR_QH))) {
                  /* check if a device is assigned with this td */
                  status = swap_32(READ32(&td->status));
                  if ((td->dev_ptr != 0L) && !(status & TD_CTRL_ACTIVE)) {
                        /* td is not active and a device is assigned -> call irqhandler */
                        dev = (struct usb_device *)td->dev_ptr;
                        dev->irq_act_len = ((status & 0x7FF) == 0x7FF) ? 0 : (status & 0x7FF) + 1;    /* transfered length */
                        dev->irq_status = usb_uhci_td_stat(status);     /* get status */
                        res = dev->irq_handle(dev);   /* call irqhandler */
                        if (res == 1) {
                              /* reactivate */
                              status |= TD_CTRL_ACTIVE;
                              td->status = swap_32(status);
                              prevtd = td;      /* previous td = this td */
                        } else {
                              prevtd->link = READ32(&td->link);   /* link previous td directly to the nex td -> unlinked */
                              /* remove device pointer */
                              td->dev_ptr = 0L;
                        }
                  }     /* if we call the irq handler */
                  link = swap_32(READ32(&td->link)) & 0xfffffff0; /* next in chain */
                  td = (uhci_td_t *) link;      /* assign it */
            }           /* process all td in this int chain */
      }                 /* next interrupt chain */
}

/* usb interrupt service routine.
 */
void handle_usb_interrupt(void)
{
      unsigned short status;
      static int error = 0;

      /*
       * Read the interrupt status, and write it back to clear the
       * interrupt cause
       */

      status = in16r(usb_base_addr + USBSTS);

      if (!status)            /* shared interrupt, not mine */
            return;
      if (status != 1) {
            /* remove host controller halted state */
            if ((status & (USBSTS_HCPE | USBSTS_HCH)) ==
                (USBSTS_HCPE | USBSTS_HCH)) {
                  /* Stop due to bug in driver, or hardware */
                  out16r(usb_base_addr + USBSTS, status);
                  out16r(usb_base_addr + USBCMD,
                         USBCMD_HCRESET | USBCMD_GRESET);
                  printf
                      ("GRUSB: HW detected error(s) in USB Descriptors (STS: 0x%x)\n",
                       status);
                  usb_show_td(8);
                  return;
            } else if ((status & 0x20)
                     && ((in16r(usb_base_addr + USBCMD) & USBCMD_RS) ==
                         0)) {
                  if (error < 10) {
                        out16r(usb_base_addr + USBCMD,
                               USBCMD_RS | in16r(usb_base_addr +
                                           USBCMD));
                        error++;
                  }
            } else
                  error = 0;
      }
      usb_check_int_chain();  /* call interrupt handlers for int tds */
      usb_check_skel(); /* call completion handler for common transfer routines */
      out16r(usb_base_addr + USBSTS, status);
}

/* init uhci
 */
int usb_lowlevel_init(void)
{
      unsigned char temp;
      ambapp_ahbdev ahbdev;

      /* Find GRUSB core using AMBA Plug&Play information */
      if (ambapp_ahbslv_first(VENDOR_GAISLER, GAISLER_UHCI, &ahbdev) != 1) {
            printf("USB UHCI: Failed to find GRUSB controller\n");
            return -1;
      }
      usb_base_addr = ahbdev.address[0];
      grusb_irq = ahbdev.irq;
      /*
         usb_base_addr = 0xfffa0000;
         grusb_irq = 10;
       */
#ifdef USB_UHCI_DEBUG
      grusb_show_regs();
#endif
      memset(td_int, 0, sizeof(td_int));
      memset(tmp_td, 0, sizeof(tmp_td));
      memset(tmp_int_td, 0, sizeof(tmp_int_td));
      memset(&qh_cntrl, 0, sizeof(qh_cntrl));
      memset(&qh_end, 0, sizeof(qh_end));
      memset(&td_last, 0, sizeof(td_last));

      irq_free_handler(grusb_irq);
      USB_UHCI_PRINTF("GRUSB: at 0x%lx irq %d\n", usb_base_addr, grusb_irq);
      rh.devnum = 0;
      usb_init_skel();
      reset_hc();
      start_hc();
      irq_install_handler(grusb_irq,
                      (interrupt_handler_t *) handle_usb_interrupt, NULL);
      return 0;
}

/* stop uhci
 */
int usb_lowlevel_stop(void)
{
      if (grusb_irq == -1)
            return 1;
      irq_free_handler(grusb_irq);
      reset_hc();
      grusb_irq = -1;
      return 0;
}

/*******************************************************************************************
 * Virtual Root Hub
 * Since the uhci does not have a real HUB, we simulate one ;-)
 */
#undef      USB_RH_DEBUG

#ifdef      USB_RH_DEBUG
#define     USB_RH_PRINTF(fmt,args...)    printf (fmt ,##args)
static void usb_display_wValue(unsigned short wValue, unsigned short wIndex);
static void usb_display_Req(unsigned short req);
#else
#define USB_RH_PRINTF(fmt,args...)
static void usb_display_wValue(unsigned short wValue, unsigned short wIndex)
{
}
static void usb_display_Req(unsigned short req)
{
}
#endif

static unsigned char root_hub_dev_des[] = {
      0x12,             /*  __u8  bLength; */
      0x01,             /*  __u8  bDescriptorType; Device */
      0x00,             /*  __u16 bcdUSB; v1.0 */
      0x01,
      0x09,             /*  __u8  bDeviceClass; HUB_CLASSCODE */
      0x00,             /*  __u8  bDeviceSubClass; */
      0x00,             /*  __u8  bDeviceProtocol; */
      0x08,             /*  __u8  bMaxPacketSize0; 8 Bytes */
      0x00,             /*  __u16 idVendor; */
      0x00,
      0x00,             /*  __u16 idProduct; */
      0x00,
      0x00,             /*  __u16 bcdDevice; */
      0x00,
      0x01,             /*  __u8  iManufacturer; */
      0x00,             /*  __u8  iProduct; */
      0x00,             /*  __u8  iSerialNumber; */
      0x01              /*  __u8  bNumConfigurations; */
};

/* Configuration descriptor */
static unsigned char root_hub_config_des[] = {
      0x09,             /*  __u8  bLength; */
      0x02,             /*  __u8  bDescriptorType; Configuration */
      0x19,             /*  __u16 wTotalLength; */
      0x00,
      0x01,             /*  __u8  bNumInterfaces; */
      0x01,             /*  __u8  bConfigurationValue; */
      0x00,             /*  __u8  iConfiguration; */
      0x40,             /*  __u8  bmAttributes;
                           Bit 7: Bus-powered, 6: Self-powered, 5 Remote-wakwup, 4..0: resvd */
      0x00,             /*  __u8  MaxPower; */

      /* interface */
      0x09,             /*  __u8  if_bLength; */
      0x04,             /*  __u8  if_bDescriptorType; Interface */
      0x00,             /*  __u8  if_bInterfaceNumber; */
      0x00,             /*  __u8  if_bAlternateSetting; */
      0x01,             /*  __u8  if_bNumEndpoints; */
      0x09,             /*  __u8  if_bInterfaceClass; HUB_CLASSCODE */
      0x00,             /*  __u8  if_bInterfaceSubClass; */
      0x00,             /*  __u8  if_bInterfaceProtocol; */
      0x00,             /*  __u8  if_iInterface; */

      /* endpoint */
      0x07,             /*  __u8  ep_bLength; */
      0x05,             /*  __u8  ep_bDescriptorType; Endpoint */
      0x81,             /*  __u8  ep_bEndpointAddress; IN Endpoint 1 */
      0x03,             /*  __u8  ep_bmAttributes; Interrupt */
      0x08,             /*  __u16 ep_wMaxPacketSize; 8 Bytes */
      0x00,
      0xff              /*  __u8  ep_bInterval; 255 ms */
};

static unsigned char root_hub_hub_des[] = {
      0x09,             /*  __u8  bLength; */
      0x29,             /*  __u8  bDescriptorType; Hub-descriptor */
      0x02,             /*  __u8  bNbrPorts; */
      0x00,             /* __u16  wHubCharacteristics; */
      0x00,
      0x01,             /*  __u8  bPwrOn2pwrGood; 2ms */
      0x00,             /*  __u8  bHubContrCurrent; 0 mA */
      0x00,             /*  __u8  DeviceRemovable; *** 7 Ports max *** */
      0xff              /*  __u8  PortPwrCtrlMask; *** 7 ports max *** */
};

static unsigned char root_hub_str_index0[] = {
      0x04,             /*  __u8  bLength; */
      0x03,             /*  __u8  bDescriptorType; String-descriptor */
      0x09,             /*  __u8  lang ID */
      0x04,             /*  __u8  lang ID */
};

static unsigned char root_hub_str_index1[] = {
      28,               /*  __u8  bLength; */
      0x03,             /*  __u8  bDescriptorType; String-descriptor */
      'U',              /*  __u8  Unicode */
      0,                /*  __u8  Unicode */
      'H',              /*  __u8  Unicode */
      0,                /*  __u8  Unicode */
      'C',              /*  __u8  Unicode */
      0,                /*  __u8  Unicode */
      'I',              /*  __u8  Unicode */
      0,                /*  __u8  Unicode */
      ' ',              /*  __u8  Unicode */
      0,                /*  __u8  Unicode */
      'R',              /*  __u8  Unicode */
      0,                /*  __u8  Unicode */
      'o',              /*  __u8  Unicode */
      0,                /*  __u8  Unicode */
      'o',              /*  __u8  Unicode */
      0,                /*  __u8  Unicode */
      't',              /*  __u8  Unicode */
      0,                /*  __u8  Unicode */
      ' ',              /*  __u8  Unicode */
      0,                /*  __u8  Unicode */
      'H',              /*  __u8  Unicode */
      0,                /*  __u8  Unicode */
      'u',              /*  __u8  Unicode */
      0,                /*  __u8  Unicode */
      'b',              /*  __u8  Unicode */
      0,                /*  __u8  Unicode */
};

/*
 * Root Hub Control Pipe (interrupt Pipes are not supported)
 */

int uhci_submit_rh_msg(struct usb_device *dev, unsigned long pipe, void *buffer,
                   int transfer_len, struct devrequest *cmd)
{
      void *data = buffer;
      int leni = transfer_len;
      int len = 0;
      int status = 0;
      int stat = 0;
      int i;

      unsigned short cstatus;

      unsigned short bmRType_bReq;
      unsigned short wValue;
      unsigned short wIndex;
      unsigned short wLength;

      if (usb_pipeint(pipe)) {
            printf("Root-Hub submit IRQ: NOT implemented\n");
            return 0;
      }
      bmRType_bReq = cmd->requesttype | cmd->request << 8;
      wValue = swap_16(cmd->value);
      wIndex = swap_16(cmd->index);
      wLength = swap_16(cmd->length);
      usb_display_Req(bmRType_bReq);
      for (i = 0; i < 8; i++)
            rh.c_p_r[i] = 0;
      USB_RH_PRINTF("Root-Hub: adr: %2x cmd(%1x): %02x%02x %04x %04x %04x\n",
                  dev->devnum, 8, cmd->requesttype, cmd->request, wValue,
                  wIndex, wLength);

      switch (bmRType_bReq) {
            /* Request Destination:
               without flags: Device,
               RH_INTERFACE: interface,
               RH_ENDPOINT: endpoint,
               RH_CLASS means HUB here,
               RH_OTHER | RH_CLASS  almost ever means HUB_PORT here
             */

      case RH_GET_STATUS:
            *(unsigned short *)data = swap_16(1);
            len = 2;
            break;
      case RH_GET_STATUS | RH_INTERFACE:
            *(unsigned short *)data = swap_16(0);
            len = 2;
            break;
      case RH_GET_STATUS | RH_ENDPOINT:
            *(unsigned short *)data = swap_16(0);
            len = 2;
            break;
      case RH_GET_STATUS | RH_CLASS:
            *(unsigned long *)data = swap_32(0);
            len = 4;
            break;            /* hub power ** */
      case RH_GET_STATUS | RH_OTHER | RH_CLASS:

            status = in16r(usb_base_addr + USBPORTSC1 + 2 * (wIndex - 1));
            cstatus = ((status & USBPORTSC_CSC) >> (1 - 0)) |
                ((status & USBPORTSC_PEC) >> (3 - 1)) |
                (rh.c_p_r[wIndex - 1] << (0 + 4));
            status = (status & USBPORTSC_CCS) | ((status & USBPORTSC_PE) >> (2 - 1)) | ((status & USBPORTSC_SUSP) >> (12 - 2)) | ((status & USBPORTSC_PR) >> (9 - 4)) | (1 << 8) |  /* power on ** */
                ((status & USBPORTSC_LSDA) << (-8 + 9));

            *(unsigned short *)data = swap_16(status);
            *(unsigned short *)(data + 2) = swap_16(cstatus);
            len = 4;
            break;
      case RH_CLEAR_FEATURE | RH_ENDPOINT:
            switch (wValue) {
            case (RH_ENDPOINT_STALL):
                  len = 0;
                  break;
            }
            break;

      case RH_CLEAR_FEATURE | RH_CLASS:
            switch (wValue) {
            case (RH_C_HUB_OVER_CURRENT):
                  len = 0;    /* hub power over current ** */
                  break;
            }
            break;

      case RH_CLEAR_FEATURE | RH_OTHER | RH_CLASS:
            usb_display_wValue(wValue, wIndex);
            switch (wValue) {
            case (RH_PORT_ENABLE):
                  status =
                      in16r(usb_base_addr + USBPORTSC1 +
                          2 * (wIndex - 1));
                  status = (status & 0xfff5) & ~USBPORTSC_PE;
                  out16r(usb_base_addr + USBPORTSC1 + 2 * (wIndex - 1),
                         status);
                  len = 0;
                  break;
            case (RH_PORT_SUSPEND):
                  status =
                      in16r(usb_base_addr + USBPORTSC1 +
                          2 * (wIndex - 1));
                  status = (status & 0xfff5) & ~USBPORTSC_SUSP;
                  out16r(usb_base_addr + USBPORTSC1 + 2 * (wIndex - 1),
                         status);
                  len = 0;
                  break;
            case (RH_PORT_POWER):
                  len = 0;    /* port power ** */
                  break;
            case (RH_C_PORT_CONNECTION):
                  status =
                      in16r(usb_base_addr + USBPORTSC1 +
                          2 * (wIndex - 1));
                  status = (status & 0xfff5) | USBPORTSC_CSC;
                  out16r(usb_base_addr + USBPORTSC1 + 2 * (wIndex - 1),
                         status);
                  len = 0;
                  break;
            case (RH_C_PORT_ENABLE):
                  status =
                      in16r(usb_base_addr + USBPORTSC1 +
                          2 * (wIndex - 1));
                  status = (status & 0xfff5) | USBPORTSC_PEC;
                  out16r(usb_base_addr + USBPORTSC1 + 2 * (wIndex - 1),
                         status);
                  len = 0;
                  break;
            case (RH_C_PORT_SUSPEND):
/*** WR_RH_PORTSTAT(RH_PS_PSSC); */
                  len = 0;
                  break;
            case (RH_C_PORT_OVER_CURRENT):
                  len = 0;
                  break;
            case (RH_C_PORT_RESET):
                  rh.c_p_r[wIndex - 1] = 0;
                  len = 0;
                  break;
            }
            break;
      case RH_SET_FEATURE | RH_OTHER | RH_CLASS:
            usb_display_wValue(wValue, wIndex);
            switch (wValue) {
            case (RH_PORT_SUSPEND):
                  status =
                      in16r(usb_base_addr + USBPORTSC1 +
                          2 * (wIndex - 1));
                  status = (status & 0xfff5) | USBPORTSC_SUSP;
                  out16r(usb_base_addr + USBPORTSC1 + 2 * (wIndex - 1),
                         status);
                  len = 0;
                  break;
            case (RH_PORT_RESET):
                  status =
                      in16r(usb_base_addr + USBPORTSC1 +
                          2 * (wIndex - 1));
                  status = (status & 0xfff5) | USBPORTSC_PR;
                  out16r(usb_base_addr + USBPORTSC1 + 2 * (wIndex - 1),
                         status);
                  wait_ms(10);
                  status = (status & 0xfff5) & ~USBPORTSC_PR;
                  out16r(usb_base_addr + USBPORTSC1 + 2 * (wIndex - 1),
                         status);
                  udelay(10);
                  status = (status & 0xfff5) | USBPORTSC_PE;
                  out16r(usb_base_addr + USBPORTSC1 + 2 * (wIndex - 1),
                         status);
                  wait_ms(10);
                  status = (status & 0xfff5) | 0xa;
                  out16r(usb_base_addr + USBPORTSC1 + 2 * (wIndex - 1),
                         status);
                  len = 0;
                  break;
            case (RH_PORT_POWER):
                  len = 0;    /* port power ** */
                  break;
            case (RH_PORT_ENABLE):
                  status =
                      in16r(usb_base_addr + USBPORTSC1 +
                          2 * (wIndex - 1));
                  status = (status & 0xfff5) | USBPORTSC_PE;
                  out16r(usb_base_addr + USBPORTSC1 + 2 * (wIndex - 1),
                         status);
                  len = 0;
                  break;
            }
            break;

      case RH_SET_ADDRESS:
            rh.devnum = wValue;
            len = 0;
            break;
      case RH_GET_DESCRIPTOR:
            switch ((wValue & 0xff00) >> 8) {
            case (0x01):      /* device descriptor */
                  i = sizeof(root_hub_config_des);
                  status = i > wLength ? wLength : i;
                  len = leni > status ? status : leni;
                  memcpy(data, root_hub_dev_des, len);
                  break;
            case (0x02):      /* configuration descriptor */
                  i = sizeof(root_hub_config_des);
                  status = i > wLength ? wLength : i;
                  len = leni > status ? status : leni;
                  memcpy(data, root_hub_config_des, len);
                  break;
            case (0x03):      /*string descriptors */
                  if (wValue == 0x0300) {
                        i = sizeof(root_hub_str_index0);
                        status = i > wLength ? wLength : i;
                        len = leni > status ? status : leni;
                        memcpy(data, root_hub_str_index0, len);
                        break;
                  }
                  if (wValue == 0x0301) {
                        i = sizeof(root_hub_str_index1);
                        status = i > wLength ? wLength : i;
                        len = leni > status ? status : leni;
                        memcpy(data, root_hub_str_index1, len);
                        break;
                  }
                  stat = USB_ST_STALLED;
            }
            break;

      case RH_GET_DESCRIPTOR | RH_CLASS:
            root_hub_hub_des[2] = 2;
            i = sizeof(root_hub_hub_des);
            status = i > wLength ? wLength : i;
            len = leni > status ? status : leni;
            memcpy(data, root_hub_hub_des, len);
            break;
      case RH_GET_CONFIGURATION:
            *(unsigned char *)data = 0x01;
            len = 1;
            break;
      case RH_SET_CONFIGURATION:
            len = 0;
            break;
      default:
            stat = USB_ST_STALLED;
      }
      USB_RH_PRINTF("Root-Hub stat %lx port1: %x port2: %x\n\n", stat,
                  in16r(usb_base_addr + USBPORTSC1),
                  in16r(usb_base_addr + USBPORTSC2));
      dev->act_len = len;
      dev->status = stat;
      return stat;

}

/********************************************************************************
 * Some Debug Routines
 */

#ifdef      USB_RH_DEBUG

static void usb_display_Req(unsigned short req)
{
      USB_RH_PRINTF("- Root-Hub Request: ");
      switch (req) {
      case RH_GET_STATUS:
            USB_RH_PRINTF("Get Status ");
            break;
      case RH_GET_STATUS | RH_INTERFACE:
            USB_RH_PRINTF("Get Status Interface ");
            break;
      case RH_GET_STATUS | RH_ENDPOINT:
            USB_RH_PRINTF("Get Status Endpoint ");
            break;
      case RH_GET_STATUS | RH_CLASS:
            USB_RH_PRINTF("Get Status Class");
            break;            /* hub power ** */
      case RH_GET_STATUS | RH_OTHER | RH_CLASS:
            USB_RH_PRINTF("Get Status Class Others");
            break;
      case RH_CLEAR_FEATURE | RH_ENDPOINT:
            USB_RH_PRINTF("Clear Feature Endpoint ");
            break;
      case RH_CLEAR_FEATURE | RH_CLASS:
            USB_RH_PRINTF("Clear Feature Class ");
            break;
      case RH_CLEAR_FEATURE | RH_OTHER | RH_CLASS:
            USB_RH_PRINTF("Clear Feature Other Class ");
            break;
      case RH_SET_FEATURE | RH_OTHER | RH_CLASS:
            USB_RH_PRINTF("Set Feature Other Class ");
            break;
      case RH_SET_ADDRESS:
            USB_RH_PRINTF("Set Address ");
            break;
      case RH_GET_DESCRIPTOR:
            USB_RH_PRINTF("Get Descriptor ");
            break;
      case RH_GET_DESCRIPTOR | RH_CLASS:
            USB_RH_PRINTF("Get Descriptor Class ");
            break;
      case RH_GET_CONFIGURATION:
            USB_RH_PRINTF("Get Configuration ");
            break;
      case RH_SET_CONFIGURATION:
            USB_RH_PRINTF("Get Configuration ");
            break;
      default:
            USB_RH_PRINTF("****UNKNOWN**** 0x%04X ", req);
      }
      USB_RH_PRINTF("\n");

}

static void usb_display_wValue(unsigned short wValue, unsigned short wIndex)
{
      switch (wValue) {
      case (RH_PORT_ENABLE):
            USB_RH_PRINTF("Root-Hub: Enable Port %d\n", wIndex);
            break;
      case (RH_PORT_SUSPEND):
            USB_RH_PRINTF("Root-Hub: Suspend Port %d\n", wIndex);
            break;
      case (RH_PORT_POWER):
            USB_RH_PRINTF("Root-Hub: Port Power %d\n", wIndex);
            break;
      case (RH_C_PORT_CONNECTION):
            USB_RH_PRINTF("Root-Hub: C Port Connection Port %d\n", wIndex);
            break;
      case (RH_C_PORT_ENABLE):
            USB_RH_PRINTF("Root-Hub: C Port Enable Port %d\n", wIndex);
            break;
      case (RH_C_PORT_SUSPEND):
            USB_RH_PRINTF("Root-Hub: C Port Suspend Port %d\n", wIndex);
            break;
      case (RH_C_PORT_OVER_CURRENT):
            USB_RH_PRINTF("Root-Hub: C Port Over Current Port %d\n",
                        wIndex);
            break;
      case (RH_C_PORT_RESET):
            USB_RH_PRINTF("Root-Hub: C Port reset Port %d\n", wIndex);
            break;
      default:
            USB_RH_PRINTF("Root-Hub: unknown %x %x\n", wValue, wIndex);
            break;
      }
}

#endif

/*#ifdef    USB_UHCI_DEBUG*/

static int usb_display_td(uhci_td_t * td)
{
      unsigned long tmp;
      int valid;

      printf("TD at %p:\n", td);

      tmp = swap_32(READ32(&td->link));
      printf("Link points to 0x%08lX, %s first, %s, %s\n", tmp & 0xfffffff0,
             ((tmp & 0x4) == 0x4) ? "Depth" : "Breath",
             ((tmp & 0x2) == 0x2) ? "QH" : "TD",
             ((tmp & 0x1) == 0x1) ? "invalid" : "valid");
      valid = ((tmp & 0x1) == 0x0);
      tmp = swap_32(READ32(&td->status));
      printf
          ("     %s %ld Errors %s %s %s \n     %s %s %s %s %s %s\n     Len 0x%lX\n",
           (((tmp >> 29) & 0x1) == 0x1) ? "SPD Enable" : "SPD Disable",
           ((tmp >> 28) & 0x3),
           (((tmp >> 26) & 0x1) == 0x1) ? "Low Speed" : "Full Speed",
           (((tmp >> 25) & 0x1) == 0x1) ? "ISO " : "",
           (((tmp >> 24) & 0x1) == 0x1) ? "IOC " : "",
           (((tmp >> 23) & 0x1) == 0x1) ? "Active " : "Inactive ",
           (((tmp >> 22) & 0x1) == 0x1) ? "Stalled" : "",
           (((tmp >> 21) & 0x1) == 0x1) ? "Data Buffer Error" : "",
           (((tmp >> 20) & 0x1) == 0x1) ? "Babble" : "",
           (((tmp >> 19) & 0x1) == 0x1) ? "NAK" : "",
           (((tmp >> 18) & 0x1) == 0x1) ? "Bitstuff Error" : "",
           (tmp & 0x7ff));
      tmp = swap_32(READ32(&td->info));
      printf("     MaxLen 0x%lX\n", ((tmp >> 21) & 0x7FF));
      printf("     %sEndpoint 0x%lX Dev Addr 0x%lX PID 0x%lX\n",
             ((tmp >> 19) & 0x1) == 0x1 ? "TOGGLE " : "", ((tmp >> 15) & 0xF),
             ((tmp >> 8) & 0x7F), tmp & 0xFF);
      tmp = swap_32(READ32(&td->buffer));
      printf("     Buffer 0x%08lX\n", tmp);
      printf("     DEV %08lX\n", td->dev_ptr);
      return valid;
}

void usb_show_td(int max)
{
      int i;
      if (max > 0) {
            for (i = 0; i < max; i++) {
                  usb_display_td(&tmp_td[i]);
            }
      } else {
            i = 0;
            do {
                  printf("tmp_td[%d]\n", i);
            } while (usb_display_td(&tmp_td[i++]));
      }
}

void grusb_show_regs(void)
{
      unsigned int tmp;

      tmp = in16r(usb_base_addr + USBCMD);
      printf(" USBCMD:   0x%04x\n", tmp);
      tmp = in16r(usb_base_addr + USBSTS);
      printf(" USBSTS:   0x%04x\n", tmp);
      tmp = in16r(usb_base_addr + USBINTR);
      printf(" USBINTR:   0x%04x\n", tmp);
      tmp = in16r(usb_base_addr + USBFRNUM);
      printf(" FRNUM:   0x%04x\n", tmp);
      tmp = in32r(usb_base_addr + USBFLBASEADD);
      printf(" FLBASEADD:   0x%08x\n", tmp);
      tmp = in16r(usb_base_addr + USBSOF);
      printf(" SOFMOD:   0x%04x\n", tmp);
      tmp = in16r(usb_base_addr + USBPORTSC1);
      printf(" PORTSC1:   0x%04x\n", tmp);
}

/*#endif*/
#endif                        /* CONFIG_USB_UHCI */

/* EOF */

Generated by  Doxygen 1.6.0   Back to index