/*************************************************************************** * __________ __ ___. * Open \______ \ ____ ____ | | _\_ |__ _______ ___ * Source | _// _ \_/ ___\| |/ /| __ \ / _ \ \/ / * Jukebox | | ( <_> ) \___| < | \_\ ( <_> > < < * Firmware |____|_ /\____/ \___ >__|_ \|___ /\____/__/\_ \ * \/ \/ \/ \/ \/ * $Id$ * * Driver for ARC USBOTG Device Controller * * Copyright (C) 2007 by Björn Stenberg * * 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 software is distributed on an "AS IS" basis, WITHOUT WARRANTY OF ANY * KIND, either express or implied. * ****************************************************************************/ #include "system.h" #include "config.h" #include "string.h" #include "usb_ch9.h" #include "usb_core.h" #include "kernel.h" #include "panic.h" #include "usb_drv.h" /*#define LOGF_ENABLE*/ #include "logf.h" /* USB device mode registers (Little Endian) */ #define REG_ID (*(volatile unsigned int *)(USB_BASE+0x000)) #define REG_HWGENERAL (*(volatile unsigned int *)(USB_BASE+0x004)) #define REG_HWHOST (*(volatile unsigned int *)(USB_BASE+0x008)) #define REG_HWDEVICE (*(volatile unsigned int *)(USB_BASE+0x00c)) #define REG_TXBUF (*(volatile unsigned int *)(USB_BASE+0x010)) #define REG_RXBUF (*(volatile unsigned int *)(USB_BASE+0x014)) #define REG_CAPLENGTH (*(volatile unsigned char*)(USB_BASE+0x100)) #define REG_DCIVERSION (*(volatile unsigned int *)(USB_BASE+0x120)) #define REG_DCCPARAMS (*(volatile unsigned int *)(USB_BASE+0x124)) #define REG_USBCMD (*(volatile unsigned int *)(USB_BASE+0x140)) #define REG_USBSTS (*(volatile unsigned int *)(USB_BASE+0x144)) #define REG_USBINTR (*(volatile unsigned int *)(USB_BASE+0x148)) #define REG_FRINDEX (*(volatile unsigned int *)(USB_BASE+0x14c)) #define REG_DEVICEADDR (*(volatile unsigned int *)(USB_BASE+0x154)) #define REG_ENDPOINTLISTADDR (*(volatile unsigned int *)(USB_BASE+0x158)) #define REG_BURSTSIZE (*(volatile unsigned int *)(USB_BASE+0x160)) #define REG_ULPI (*(volatile unsigned int *)(USB_BASE+0x170)) #define REG_CONFIGFLAG (*(volatile unsigned int *)(USB_BASE+0x180)) #define REG_PORTSC1 (*(volatile unsigned int *)(USB_BASE+0x184)) #define REG_OTGSC (*(volatile unsigned int *)(USB_BASE+0x1a4)) #define REG_USBMODE (*(volatile unsigned int *)(USB_BASE+0x1a8)) #define REG_ENDPTSETUPSTAT (*(volatile unsigned int *)(USB_BASE+0x1ac)) #define REG_ENDPTPRIME (*(volatile unsigned int *)(USB_BASE+0x1b0)) #define REG_ENDPTFLUSH (*(volatile unsigned int *)(USB_BASE+0x1b4)) #define REG_ENDPTSTATUS (*(volatile unsigned int *)(USB_BASE+0x1b8)) #define REG_ENDPTCOMPLETE (*(volatile unsigned int *)(USB_BASE+0x1bc)) #define REG_ENDPTCTRL0 (*(volatile unsigned int *)(USB_BASE+0x1c0)) #define REG_ENDPTCTRL1 (*(volatile unsigned int *)(USB_BASE+0x1c4)) #define REG_ENDPTCTRL2 (*(volatile unsigned int *)(USB_BASE+0x1c8)) #define REG_ENDPTCTRL(_x_) (*(volatile unsigned int *)(USB_BASE+0x1c0+4*(_x_))) /* Frame Index Register Bit Masks */ #define USB_FRINDEX_MASKS (0x3fff) /* USB CMD Register Bit Masks */ #define USBCMD_RUN (0x00000001) #define USBCMD_CTRL_RESET (0x00000002) #define USBCMD_PERIODIC_SCHEDULE_EN (0x00000010) #define USBCMD_ASYNC_SCHEDULE_EN (0x00000020) #define USBCMD_INT_AA_DOORBELL (0x00000040) #define USBCMD_ASP (0x00000300) #define USBCMD_ASYNC_SCH_PARK_EN (0x00000800) #define USBCMD_SUTW (0x00002000) #define USBCMD_ATDTW (0x00004000) #define USBCMD_ITC (0x00FF0000) /* bit 15,3,2 are frame list size */ #define USBCMD_FRAME_SIZE_1024 (0x00000000) #define USBCMD_FRAME_SIZE_512 (0x00000004) #define USBCMD_FRAME_SIZE_256 (0x00000008) #define USBCMD_FRAME_SIZE_128 (0x0000000C) #define USBCMD_FRAME_SIZE_64 (0x00008000) #define USBCMD_FRAME_SIZE_32 (0x00008004) #define USBCMD_FRAME_SIZE_16 (0x00008008) #define USBCMD_FRAME_SIZE_8 (0x0000800C) /* bit 9-8 are async schedule park mode count */ #define USBCMD_ASP_00 (0x00000000) #define USBCMD_ASP_01 (0x00000100) #define USBCMD_ASP_10 (0x00000200) #define USBCMD_ASP_11 (0x00000300) #define USBCMD_ASP_BIT_POS (8) /* bit 23-16 are interrupt threshold control */ #define USBCMD_ITC_NO_THRESHOLD (0x00000000) #define USBCMD_ITC_1_MICRO_FRM (0x00010000) #define USBCMD_ITC_2_MICRO_FRM (0x00020000) #define USBCMD_ITC_4_MICRO_FRM (0x00040000) #define USBCMD_ITC_8_MICRO_FRM (0x00080000) #define USBCMD_ITC_16_MICRO_FRM (0x00100000) #define USBCMD_ITC_32_MICRO_FRM (0x00200000) #define USBCMD_ITC_64_MICRO_FRM (0x00400000) #define USBCMD_ITC_BIT_POS (16) /* USB STS Register Bit Masks */ #define USBSTS_INT (0x00000001) #define USBSTS_ERR (0x00000002) #define USBSTS_PORT_CHANGE (0x00000004) #define USBSTS_FRM_LST_ROLL (0x00000008) #define USBSTS_SYS_ERR (0x00000010) /* not used */ #define USBSTS_IAA (0x00000020) #define USBSTS_RESET (0x00000040) #define USBSTS_SOF (0x00000080) #define USBSTS_SUSPEND (0x00000100) #define USBSTS_HC_HALTED (0x00001000) #define USBSTS_RCL (0x00002000) #define USBSTS_PERIODIC_SCHEDULE (0x00004000) #define USBSTS_ASYNC_SCHEDULE (0x00008000) /* USB INTR Register Bit Masks */ #define USBINTR_INT_EN (0x00000001) #define USBINTR_ERR_INT_EN (0x00000002) #define USBINTR_PTC_DETECT_EN (0x00000004) #define USBINTR_FRM_LST_ROLL_EN (0x00000008) #define USBINTR_SYS_ERR_EN (0x00000010) #define USBINTR_ASYN_ADV_EN (0x00000020) #define USBINTR_RESET_EN (0x00000040) #define USBINTR_SOF_EN (0x00000080) #define USBINTR_DEVICE_SUSPEND (0x00000100) /* ULPI Register Bit Masks */ #define ULPI_ULPIWU (0x80000000) #define ULPI_ULPIRUN (0x40000000) #define ULPI_ULPIRW (0x20000000) #define ULPI_ULPISS (0x08000000) #define ULPI_ULPIPORT (0x07000000) #define ULPI_ULPIADDR (0x00FF0000) #define ULPI_ULPIDATRD (0x0000FF00) #define ULPI_ULPIDATWR (0x000000FF) /* Device Address bit masks */ #define USBDEVICEADDRESS_MASK (0xFE000000) #define USBDEVICEADDRESS_BIT_POS (25) /* endpoint list address bit masks */ #define USB_EP_LIST_ADDRESS_MASK (0xfffff800) /* PORTSCX Register Bit Masks */ #define PORTSCX_CURRENT_CONNECT_STATUS (0x00000001) #define PORTSCX_CONNECT_STATUS_CHANGE (0x00000002) #define PORTSCX_PORT_ENABLE (0x00000004) #define PORTSCX_PORT_EN_DIS_CHANGE (0x00000008) #define PORTSCX_OVER_CURRENT_ACT (0x00000010) #define PORTSCX_OVER_CURRENT_CHG (0x00000020) #define PORTSCX_PORT_FORCE_RESUME (0x00000040) #define PORTSCX_PORT_SUSPEND (0x00000080) #define PORTSCX_PORT_RESET (0x00000100) #define PORTSCX_LINE_STATUS_BITS (0x00000C00) #define PORTSCX_PORT_POWER (0x00001000) #define PORTSCX_PORT_INDICTOR_CTRL (0x0000C000) #define PORTSCX_PORT_TEST_CTRL (0x000F0000) #define PORTSCX_WAKE_ON_CONNECT_EN (0x00100000) #define PORTSCX_WAKE_ON_CONNECT_DIS (0x00200000) #define PORTSCX_WAKE_ON_OVER_CURRENT (0x00400000) #define PORTSCX_PHY_LOW_POWER_SPD (0x00800000) #define PORTSCX_PORT_FORCE_FULL_SPEED (0x01000000) #define PORTSCX_PORT_SPEED_MASK (0x0C000000) #define PORTSCX_PORT_WIDTH (0x10000000) #define PORTSCX_PHY_TYPE_SEL (0xC0000000) /* bit 11-10 are line status */ #define PORTSCX_LINE_STATUS_SE0 (0x00000000) #define PORTSCX_LINE_STATUS_JSTATE (0x00000400) #define PORTSCX_LINE_STATUS_KSTATE (0x00000800) #define PORTSCX_LINE_STATUS_UNDEF (0x00000C00) #define PORTSCX_LINE_STATUS_BIT_POS (10) /* bit 15-14 are port indicator control */ #define PORTSCX_PIC_OFF (0x00000000) #define PORTSCX_PIC_AMBER (0x00004000) #define PORTSCX_PIC_GREEN (0x00008000) #define PORTSCX_PIC_UNDEF (0x0000C000) #define PORTSCX_PIC_BIT_POS (14) /* bit 19-16 are port test control */ #define PORTSCX_PTC_DISABLE (0x00000000) #define PORTSCX_PTC_JSTATE (0x00010000) #define PORTSCX_PTC_KSTATE (0x00020000) #define PORTSCX_PTC_SE0NAK (0x00030000) #define PORTSCX_PTC_PACKET (0x00040000) #define PORTSCX_PTC_FORCE_EN (0x00050000) #define PORTSCX_PTC_BIT_POS (16) /* bit 27-26 are port speed */ #define PORTSCX_PORT_SPEED_FULL (0x00000000) #define PORTSCX_PORT_SPEED_LOW (0x04000000) #define PORTSCX_PORT_SPEED_HIGH (0x08000000) #define PORTSCX_PORT_SPEED_UNDEF (0x0C000000) #define PORTSCX_SPEED_BIT_POS (26) /* bit 28 is parallel transceiver width for UTMI interface */ #define PORTSCX_PTW (0x10000000) #define PORTSCX_PTW_8BIT (0x00000000) #define PORTSCX_PTW_16BIT (0x10000000) /* bit 31-30 are port transceiver select */ #define PORTSCX_PTS_UTMI (0x00000000) #define PORTSCX_PTS_CLASSIC (0x40000000) #define PORTSCX_PTS_ULPI (0x80000000) #define PORTSCX_PTS_FSLS (0xC0000000) #define PORTSCX_PTS_BIT_POS (30) /* USB MODE Register Bit Masks */ #define USBMODE_CTRL_MODE_IDLE (0x00000000) #define USBMODE_CTRL_MODE_DEVICE (0x00000002) #define USBMODE_CTRL_MODE_HOST (0x00000003) #define USBMODE_CTRL_MODE_RSV (0x00000001) #define USBMODE_SETUP_LOCK_OFF (0x00000008) #define USBMODE_STREAM_DISABLE (0x00000010) /* Endpoint Flush Register */ #define EPFLUSH_TX_OFFSET (0x00010000) #define EPFLUSH_RX_OFFSET (0x00000000) /* Endpoint Setup Status bit masks */ #define EPSETUP_STATUS_MASK (0x0000003F) #define EPSETUP_STATUS_EP0 (0x00000001) /* ENDPOINTCTRLx Register Bit Masks */ #define EPCTRL_TX_ENABLE (0x00800000) #define EPCTRL_TX_DATA_TOGGLE_RST (0x00400000) /* Not EP0 */ #define EPCTRL_TX_DATA_TOGGLE_INH (0x00200000) /* Not EP0 */ #define EPCTRL_TX_TYPE (0x000C0000) #define EPCTRL_TX_DATA_SOURCE (0x00020000) /* Not EP0 */ #define EPCTRL_TX_EP_STALL (0x00010000) #define EPCTRL_RX_ENABLE (0x00000080) #define EPCTRL_RX_DATA_TOGGLE_RST (0x00000040) /* Not EP0 */ #define EPCTRL_RX_DATA_TOGGLE_INH (0x00000020) /* Not EP0 */ #define EPCTRL_RX_TYPE (0x0000000C) #define EPCTRL_RX_DATA_SINK (0x00000002) /* Not EP0 */ #define EPCTRL_RX_EP_STALL (0x00000001) /* bit 19-18 and 3-2 are endpoint type */ #define EPCTRL_TX_EP_TYPE_SHIFT (18) #define EPCTRL_RX_EP_TYPE_SHIFT (2) /* pri_ctrl Register Bit Masks */ #define PRI_CTRL_PRI_LVL1 (0x0000000C) #define PRI_CTRL_PRI_LVL0 (0x00000003) /* si_ctrl Register Bit Masks */ #define SI_CTRL_ERR_DISABLE (0x00000010) #define SI_CTRL_IDRC_DISABLE (0x00000008) #define SI_CTRL_RD_SAFE_EN (0x00000004) #define SI_CTRL_RD_PREFETCH_DISABLE (0x00000002) #define SI_CTRL_RD_PREFEFETCH_VAL (0x00000001) /* control Register Bit Masks */ #define USB_CTRL_IOENB (0x00000004) #define USB_CTRL_ULPI_INT0EN (0x00000001) /* OTGSC Register Bit Masks */ #define OTGSC_B_SESSION_VALID (0x00000800) #define OTGSC_A_VBUS_VALID (0x00000200) #define QH_MULT_POS (30) #define QH_ZLT_SEL (0x20000000) #define QH_MAX_PKT_LEN_POS (16) #define QH_IOS (0x00008000) #define QH_NEXT_TERMINATE (0x00000001) #define QH_IOC (0x00008000) #define QH_MULTO (0x00000C00) #define QH_STATUS_HALT (0x00000040) #define QH_STATUS_ACTIVE (0x00000080) #define EP_QUEUE_CURRENT_OFFSET_MASK (0x00000FFF) #define EP_QUEUE_HEAD_NEXT_POINTER_MASK (0xFFFFFFE0) #define EP_QUEUE_FRINDEX_MASK (0x000007FF) #define EP_MAX_LENGTH_TRANSFER (0x4000) #define DTD_NEXT_TERMINATE (0x00000001) #define DTD_IOC (0x00008000) #define DTD_STATUS_ACTIVE (0x00000080) #define DTD_STATUS_HALTED (0x00000040) #define DTD_STATUS_DATA_BUFF_ERR (0x00000020) #define DTD_STATUS_TRANSACTION_ERR (0x00000008) #define DTD_RESERVED_FIELDS (0x80007300) #define DTD_ADDR_MASK (0xFFFFFFE0) #define DTD_PACKET_SIZE (0x7FFF0000) #define DTD_LENGTH_BIT_POS (16) #define DTD_ERROR_MASK (DTD_STATUS_HALTED | \ DTD_STATUS_DATA_BUFF_ERR | \ DTD_STATUS_TRANSACTION_ERR) #define DTD_RESERVED_LENGTH_MASK 0x0001ffff #define DTD_RESERVED_IN_USE 0x80000000 #define DTD_RESERVED_PIPE_MASK 0x0ff00000 #define DTD_RESERVED_PIPE_OFFSET 20 /*-------------------------------------------------------------------------*/ /* 4 transfer descriptors per endpoint allow 64k transfers, which is the usual MSC transfer size, so it seems like a good size */ #define NUM_TDS_PER_EP 4 typedef struct usb_endpoint { bool allocated[2]; short type[2]; short max_pkt_size[2]; } usb_endpoint_t; static usb_endpoint_t endpoints[USB_NUM_ENDPOINTS]; /* manual: 32.13.2 Endpoint Transfer Descriptor (dTD) */ struct transfer_descriptor { unsigned int next_td_ptr; /* Next TD pointer(31-5), T(0) set indicate invalid */ unsigned int size_ioc_sts; /* Total bytes (30-16), IOC (15), MultO(11-10), STS (7-0) */ unsigned int buff_ptr0; /* Buffer pointer Page 0 */ unsigned int buff_ptr1; /* Buffer pointer Page 1 */ unsigned int buff_ptr2; /* Buffer pointer Page 2 */ unsigned int buff_ptr3; /* Buffer pointer Page 3 */ unsigned int buff_ptr4; /* Buffer pointer Page 4 */ unsigned int reserved; } __attribute__ ((packed)); static struct transfer_descriptor td_array[USB_NUM_ENDPOINTS*2*NUM_TDS_PER_EP] USB_DEVBSS_ATTR __attribute__((aligned(32))); /* manual: 32.13.1 Endpoint Queue Head (dQH) */ struct queue_head { unsigned int max_pkt_length; /* Mult(31-30) , Zlt(29) , Max Pkt len and IOS(15) */ unsigned int curr_dtd_ptr; /* Current dTD Pointer(31-5) */ struct transfer_descriptor dtd; /* dTD overlay */ unsigned int setup_buffer[2]; /* Setup data 8 bytes */ unsigned int reserved; /* for software use, pointer to the first TD */ unsigned int status; /* for software use, status of chain in progress */ unsigned int length; /* for software use, transfered bytes of chain in progress */ unsigned int wait; /* for softwate use, indicates if the transfer is blocking */ } __attribute__((packed)); static struct queue_head qh_array[USB_NUM_ENDPOINTS*2] USB_QHARRAY_ATTR; static struct semaphore transfer_completion_signal[USB_NUM_ENDPOINTS*2] SHAREDBSS_ATTR; static const unsigned int pipe2mask[] = { 0x01, 0x010000, 0x02, 0x020000, 0x04, 0x040000, 0x08, 0x080000, 0x10, 0x100000, }; /*-------------------------------------------------------------------------*/ static void transfer_completed(void); static void control_received(void); static int prime_transfer(int ep_num, void* ptr, int len, bool send, bool wait); static void prepare_td(struct transfer_descriptor* td, struct transfer_descriptor* previous_td, void *ptr, int len,int pipe); static void bus_reset(void); static void init_control_queue_heads(void); static void init_queue_heads(void); static void init_endpoints(void); /*-------------------------------------------------------------------------*/ static void usb_drv_stop(void) { /* disable interrupts */ REG_USBINTR = 0; /* stop usb controller (disconnect) */ REG_USBCMD &= ~USBCMD_RUN; } static void usb_drv_reset(void) { int oldlevel = disable_irq_save(); REG_USBCMD &= ~USBCMD_RUN; restore_irq(oldlevel); #ifdef USB_PORTSCX_PHY_TYPE /* If a PHY type is specified, set it now */ REG_PORTSC1 = (REG_PORTSC1 & ~PORTSCX_PHY_TYPE_SEL) | USB_PORTSCX_PHY_TYPE; #endif sleep(HZ/20); REG_USBCMD |= USBCMD_CTRL_RESET; while (REG_USBCMD & USBCMD_CTRL_RESET); #if CONFIG_CPU == PP5022 || CONFIG_CPU == PP5024 /* On a CPU which identifies as a PP5022, this initialization must be done after USB is reset. */ outl(inl(0x70000060) | 0xF, 0x70000060); outl(inl(0x70000028) | 0x10000, 0x70000028); outl(inl(0x70000028) & ~0x10000, 0x70000028); outl(inl(0x70000060) & ~0x20, 0x70000060); udelay(10); outl(inl(0x70000060) | 0x20, 0x70000060); udelay(10); outl((inl(0x70000060) & ~0xF) | 4, 0x70000060); udelay(10); outl(inl(0x70000060) & ~0x20, 0x70000060); udelay(10); outl(inl(0x70000060) & ~0xF, 0x70000060); udelay(10); outl(inl(0x70000060) | 0x20, 0x70000060); udelay(10); outl(inl(0x70000028) | 0x800, 0x70000028); outl(inl(0x70000028) & ~0x800, 0x70000028); while ((inl(0x70000028) & 0x80) == 0); #endif } /* One-time driver startup init */ void usb_drv_startup(void) { /* Initialize all the signal objects once */ int i; for(i=0;itype[ep_dir]), endpoint->max_pkt_size[ep_dir]); } #else #undef log_ep #define log_ep(...) #endif /* manual: 32.14.1 Device Controller Initialization */ void usb_drv_init(void) { /* USB core decides */ usb_drv_reset(); REG_USBMODE = USBMODE_CTRL_MODE_DEVICE; #ifdef USB_NO_HIGH_SPEED /* Force device to full speed */ /* See 32.9.5.9.2 */ REG_PORTSC1 |= PORTSCX_PORT_FORCE_FULL_SPEED; #endif init_control_queue_heads(); memset(td_array, 0, sizeof td_array); REG_ENDPOINTLISTADDR = (unsigned int)qh_array; REG_DEVICEADDR = 0; /* enable USB interrupts */ REG_USBINTR = USBINTR_INT_EN | USBINTR_ERR_INT_EN | USBINTR_PTC_DETECT_EN | USBINTR_RESET_EN; usb_drv_int_enable(true); /* go go go */ REG_USBCMD |= USBCMD_RUN; logf("usb_drv_init() finished"); logf("usb id %x", REG_ID); logf("usb dciversion %x", REG_DCIVERSION); logf("usb dccparams %x", REG_DCCPARAMS); /* now a bus reset will occur. see bus_reset() */ } void usb_drv_exit(void) { usb_drv_stop(); /* TODO : is one of these needed to save power ? REG_PORTSC1 |= PORTSCX_PHY_LOW_POWER_SPD; REG_USBCMD |= USBCMD_CTRL_RESET; */ usb_drv_int_enable(false); } void usb_drv_int(void) { unsigned int usbintr = REG_USBINTR; /* Only watch enabled ints */ unsigned int status = REG_USBSTS & usbintr; #if 0 if (status & USBSTS_INT) logf("int: usb ioc"); if (status & USBSTS_ERR) logf("int: usb err"); if (status & USBSTS_PORT_CHANGE) logf("int: portchange"); if (status & USBSTS_RESET) logf("int: reset"); #endif /* usb transaction interrupt */ if (status & USBSTS_INT) { REG_USBSTS = USBSTS_INT; /* a control packet? */ if (REG_ENDPTSETUPSTAT & EPSETUP_STATUS_EP0) { control_received(); } if (REG_ENDPTCOMPLETE) transfer_completed(); } /* error interrupt */ if (status & USBSTS_ERR) { REG_USBSTS = USBSTS_ERR; logf("usb error int"); } /* reset interrupt */ if (status & USBSTS_RESET) { REG_USBSTS = USBSTS_RESET; bus_reset(); usb_core_bus_reset(); /* tell mom */ } /* port change */ if (status & USBSTS_PORT_CHANGE) { REG_USBSTS = USBSTS_PORT_CHANGE; } } bool usb_drv_stalled(int endpoint,bool in) { if(in) { return ((REG_ENDPTCTRL(EP_NUM(endpoint)) & EPCTRL_TX_EP_STALL)!=0); } else { return ((REG_ENDPTCTRL(EP_NUM(endpoint)) & EPCTRL_RX_EP_STALL)!=0); } } void usb_drv_stall(int endpoint, bool stall, bool in) { int ep_num = EP_NUM(endpoint); logf("%sstall %d", stall ? "" : "un", ep_num); if(in) { if (stall) { REG_ENDPTCTRL(ep_num) |= EPCTRL_TX_EP_STALL; } else { REG_ENDPTCTRL(ep_num) &= ~EPCTRL_TX_EP_STALL; } } else { if (stall) { REG_ENDPTCTRL(ep_num) |= EPCTRL_RX_EP_STALL; } else { REG_ENDPTCTRL(ep_num) &= ~EPCTRL_RX_EP_STALL; } } } int usb_drv_send_nonblocking(int endpoint, void* ptr, int length) { return prime_transfer(EP_NUM(endpoint), ptr, length, true, false); } int usb_drv_send(int endpoint, void* ptr, int length) { return prime_transfer(EP_NUM(endpoint), ptr, length, true, true); } int usb_drv_recv(int endpoint, void* ptr, int length) { //logf("usbrecv(%x, %d)", ptr, length); return prime_transfer(EP_NUM(endpoint), ptr, length, false, false); } int usb_drv_port_speed(void) { return (REG_PORTSC1 & 0x08000000) ? 1 : 0; } bool usb_drv_connected(void) { return (REG_PORTSC1 & (PORTSCX_PORT_SUSPEND | PORTSCX_CURRENT_CONNECT_STATUS)) == PORTSCX_CURRENT_CONNECT_STATUS; } bool usb_drv_powered(void) { /* true = bus 4V4 ok */ return (REG_OTGSC & OTGSC_A_VBUS_VALID) ? true : false; } void usb_drv_set_address(int address) { REG_DEVICEADDR = address << USBDEVICEADDRESS_BIT_POS; init_queue_heads(); init_endpoints(); } void usb_drv_reset_endpoint(int endpoint, bool send) { int pipe = EP_NUM(endpoint) * 2 + (send ? 1 : 0); unsigned int mask = pipe2mask[pipe]; REG_ENDPTFLUSH = mask; while (REG_ENDPTFLUSH & mask); } void usb_drv_set_test_mode(int mode) { switch(mode){ case 0: REG_PORTSC1 &= ~PORTSCX_PORT_TEST_CTRL; break; case 1: REG_PORTSC1 |= PORTSCX_PTC_JSTATE; break; case 2: REG_PORTSC1 |= PORTSCX_PTC_KSTATE; break; case 3: REG_PORTSC1 |= PORTSCX_PTC_SE0NAK; break; case 4: REG_PORTSC1 |= PORTSCX_PTC_PACKET; break; case 5: REG_PORTSC1 |= PORTSCX_PTC_FORCE_EN; break; } usb_drv_reset(); REG_USBCMD |= USBCMD_RUN; } /*-------------------------------------------------------------------------*/ /* manual: 32.14.5.2 */ static int prime_transfer(int ep_num, void* ptr, int len, bool send, bool wait) { int rc = 0; int pipe = ep_num * 2 + (send ? 1 : 0); unsigned int mask = pipe2mask[pipe]; struct queue_head* qh = &qh_array[pipe]; static long last_tick; struct transfer_descriptor *new_td, *cur_td, *prev_td; int oldlevel = disable_irq_save(); /* if (send && ep_num > EP_CONTROL) { logf("usb: sent %d bytes", len); } */ qh->status = 0; qh->wait = wait; new_td=&td_array[pipe*NUM_TDS_PER_EP]; cur_td=new_td; prev_td=0; int tdlen; do { tdlen=MIN(len,16384); prepare_td(cur_td, prev_td, ptr, tdlen,pipe); ptr+=tdlen; prev_td=cur_td; cur_td++; len-=tdlen; } while(len>0); //logf("starting ep %d %s",ep_num,send?"send":"receive"); qh->dtd.next_td_ptr = (unsigned int)new_td; qh->dtd.size_ioc_sts &= ~(QH_STATUS_HALT | QH_STATUS_ACTIVE); REG_ENDPTPRIME |= mask; if(ep_num == EP_CONTROL && (REG_ENDPTSETUPSTAT & EPSETUP_STATUS_EP0)) { /* 32.14.3.2.2 */ logf("new setup arrived"); rc = -4; goto pt_error; } last_tick = current_tick; while ((REG_ENDPTPRIME & mask)) { if (REG_USBSTS & USBSTS_RESET) { rc = -1; goto pt_error; } if (TIME_AFTER(current_tick, last_tick + HZ/4)) { logf("prime timeout"); rc = -2; goto pt_error; } } if (!(REG_ENDPTSTATUS & mask)) { if(REG_ENDPTCOMPLETE & mask) { logf("endpoint completed fast! %d %d %x", ep_num, pipe, qh->dtd.size_ioc_sts & 0xff); } else { logf("no prime! %d %d %x", ep_num, pipe, qh->dtd.size_ioc_sts & 0xff); rc = -3; goto pt_error; } } if(ep_num == EP_CONTROL && (REG_ENDPTSETUPSTAT & EPSETUP_STATUS_EP0)) { /* 32.14.3.2.2 */ logf("new setup arrived"); rc = -4; goto pt_error; } restore_irq(oldlevel); if (wait) { /* wait for transfer to finish */ semaphore_wait(&transfer_completion_signal[pipe], TIMEOUT_BLOCK); if(qh->status!=0) { /* No need to cancel wait here since it was done and the signal * came. */ return -5; } //logf("all tds done"); } pt_error: if(rc<0) restore_irq(oldlevel); /* Error status must make sure an abandoned wakeup signal isn't left */ if (rc < 0 && wait) { /* Cancel wait */ qh->wait = 0; /* Make sure to remove any signal if interrupt fired before we zeroed * qh->wait. Could happen during a bus reset for example. */ semaphore_wait(&transfer_completion_signal[pipe], TIMEOUT_NOBLOCK); } return rc; } void usb_drv_cancel_all_transfers(void) { int i; REG_ENDPTFLUSH = ~0; while (REG_ENDPTFLUSH); memset(td_array, 0, sizeof td_array); for(i=0;iallocated[ep_dir]) continue; if (endpoint->allocated[other_dir] && endpoint->type[other_dir] != ep_type) { logf("ep of different type!"); continue; } endpoint->allocated[ep_dir] = 1; endpoint->type[ep_dir] = ep_type; log_ep(ep_num, ep_dir, "add"); return (ep_num | (dir & USB_ENDPOINT_DIR_MASK)); } return -1; } void usb_drv_release_endpoint(int ep) { int ep_num = EP_NUM(ep); int ep_dir = EP_DIR(ep); log_ep(ep_num, ep_dir, "rel"); endpoints[ep_num].allocated[ep_dir] = 0; } static void prepare_td(struct transfer_descriptor* td, struct transfer_descriptor* previous_td, void *ptr, int len,int pipe) { //logf("adding a td : %d",len); /* FIXME td allow iso packets per frame override but we don't use it here */ memset(td, 0, sizeof(struct transfer_descriptor)); td->next_td_ptr = DTD_NEXT_TERMINATE; td->size_ioc_sts = (len<< DTD_LENGTH_BIT_POS) | DTD_STATUS_ACTIVE | DTD_IOC; td->buff_ptr0 = (unsigned int)ptr; td->buff_ptr1 = ((unsigned int)ptr & 0xfffff000) + 0x1000; td->buff_ptr2 = ((unsigned int)ptr & 0xfffff000) + 0x2000; td->buff_ptr3 = ((unsigned int)ptr & 0xfffff000) + 0x3000; td->buff_ptr4 = ((unsigned int)ptr & 0xfffff000) + 0x4000; td->reserved |= DTD_RESERVED_LENGTH_MASK & len; td->reserved |= DTD_RESERVED_IN_USE; td->reserved |= (pipe << DTD_RESERVED_PIPE_OFFSET); if (previous_td != 0) { previous_td->next_td_ptr=(unsigned int)td; previous_td->size_ioc_sts&=~DTD_IOC; } } static void control_received(void) { int i; /* copy setup data from packet */ static unsigned int tmp[2]; tmp[0] = qh_array[0].setup_buffer[0]; tmp[1] = qh_array[0].setup_buffer[1]; /* acknowledge packet recieved */ REG_ENDPTSETUPSTAT = EPSETUP_STATUS_EP0; /* Stop pending control transfers */ for(i=0;i<2;i++) { if(qh_array[i].wait) { qh_array[i].wait=0; qh_array[i].status=DTD_STATUS_HALTED; semaphore_release(&transfer_completion_signal[i]); } } usb_core_control_request((struct usb_ctrlrequest*)tmp); } static void transfer_completed(void) { int ep; unsigned int mask = REG_ENDPTCOMPLETE; REG_ENDPTCOMPLETE = mask; for (ep=0; epsize_ioc_sts & DTD_STATUS_ACTIVE) { logf("skip half finished transfer"); goto Lskip; } length += ((td->reserved & DTD_RESERVED_LENGTH_MASK) - ((td->size_ioc_sts & DTD_PACKET_SIZE) >> DTD_LENGTH_BIT_POS)); td=(struct transfer_descriptor*) td->next_td_ptr; } if(qh->wait) { qh->wait=0; semaphore_release(&transfer_completion_signal[pipe]); } usb_core_transfer_complete(ep, dir?USB_DIR_IN:USB_DIR_OUT, qh->status, length); Lskip: continue; } } } } /* manual: 32.14.2.1 Bus Reset */ static void bus_reset(void) { int i; logf("usb bus_reset"); REG_DEVICEADDR = 0; REG_ENDPTSETUPSTAT = REG_ENDPTSETUPSTAT; REG_ENDPTCOMPLETE = REG_ENDPTCOMPLETE; for (i=0; i<100; i++) { if (!REG_ENDPTPRIME) break; if (REG_USBSTS & USBSTS_RESET) { logf("usb: double reset"); return; } udelay(100); } if (REG_ENDPTPRIME) { logf("usb: short reset timeout"); } usb_drv_cancel_all_transfers(); if (!(REG_PORTSC1 & PORTSCX_PORT_RESET)) { logf("usb: slow reset!"); } } /* manual: 32.14.4.1 Queue Head Initialization */ static void init_control_queue_heads(void) { memset(qh_array, 0, sizeof qh_array); /*** control ***/ qh_array[EP_CONTROL].max_pkt_length = 64 << QH_MAX_PKT_LEN_POS | QH_IOS; qh_array[EP_CONTROL].dtd.next_td_ptr = QH_NEXT_TERMINATE; qh_array[EP_CONTROL+1].max_pkt_length = 64 << QH_MAX_PKT_LEN_POS; qh_array[EP_CONTROL+1].dtd.next_td_ptr = QH_NEXT_TERMINATE; } /* manual: 32.14.4.1 Queue Head Initialization */ static void init_queue_heads(void) { /* FIXME the packetsize for isochronous transfers is 1023 : 1024 but * the current code only support one type of packet size so we restrict * isochronous packet size for now also */ int packetsize = (usb_drv_port_speed() ? 512 : 64); int i; /* TODO: this should take ep_allocation into account */ for (i=1;iallocated[DIR_OUT]) endpoint->type[DIR_OUT] = USB_ENDPOINT_XFER_BULK; if (!endpoint->allocated[DIR_IN]) endpoint->type[DIR_IN] = USB_ENDPOINT_XFER_BULK; REG_ENDPTCTRL(ep_num) = EPCTRL_RX_DATA_TOGGLE_RST | EPCTRL_RX_ENABLE | EPCTRL_TX_DATA_TOGGLE_RST | EPCTRL_TX_ENABLE | (endpoint->type[DIR_OUT] << EPCTRL_RX_EP_TYPE_SHIFT) | (endpoint->type[DIR_IN] << EPCTRL_TX_EP_TYPE_SHIFT); } }