openpcd/firmware/src/os/pcd_enumerate.c

818 lines
22 KiB
C

/* AT91SAM7 USB interface code for OpenPCD
* (C) 2006 by Harald Welte <laforge@gnumonks.org>
*
* 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
*
* based on existing AT91SAM7 UDP CDC ACM example code, licensed as followed:
*----------------------------------------------------------------------------
* ATMEL Microcontroller Software Support - ROUSSET -
*----------------------------------------------------------------------------
* The software is delivered "AS IS" without warranty or condition of any
* kind, either express, implied or statutory. This includes without
* limitation any warranty or condition with respect to merchantability or
* fitness for any particular purpose, or against the infringements of
* intellectual property rights of others.
*----------------------------------------------------------------------------
*/
#include <errno.h>
#include <usb_ch9.h>
#include <sys/types.h>
#include <asm/atomic.h>
#include <lib_AT91SAM7.h>
#include <openpcd.h>
#include <usb_strings_app.h>
#include <os/pcd_enumerate.h>
#include <os/req_ctx.h>
#include <dfu/dfu.h>
#include "../openpcd.h"
#include <os/dbgu.h>
#include "../config.h"
//#define DEBUG_UDP_IRQ
//#define DEBUG_UDP_IRQ_IN
//#define DEBUG_UDP_IRQ_OUT
//#define DEBUG_UDP_EP0
#ifdef DEBUG_UDP_IRQ
#define DEBUGI(x, args ...) DEBUGP(x, ## args)
#else
#define DEBUGI(x, args ...) do { } while (0)
#endif
#ifdef DEBUG_UDP_IRQ_IN
#define DEBUGII(x, args ...) DEBUGP(x, ## args)
#else
#define DEBUGII(x, args ...) do { } while (0)
#endif
#ifdef DEBUG_UDP_IRQ_OUT
#define DEBUGIO(x, args ...) DEBUGP(x, ## args)
#else
#define DEBUGIO(x, args ...) do { } while (0)
#endif
#ifdef DEBUG_UDP_EP0
#define DEBUGE(x, args ...) DEBUGP(x, ## args)
#else
#define DEBUGE(x, args ...) do { } while (0)
#endif
#define CONFIG_DFU
#ifdef CONFIG_DFU
static const struct dfuapi *dfu = DFU_API_LOCATION;
#define udp_init dfu->udp_init
#define udp_ep0_send_data dfu->ep0_send_data
#define udp_ep0_send_zlp dfu->ep0_send_zlp
#define udp_ep0_send_stall dfu->ep0_send_stall
#else
#error non-DFU builds currently not supported (yet) again
#endif
#ifdef CONFIG_USB_HID
#include "usb_descriptors_hid.h"
#else
#include "usb_descriptors_openpcd.h"
#endif
static struct udp_pcd upcd;
struct epstate {
u_int32_t state_busy;
u_int32_t state_pending;
};
static const struct epstate epstate[] = {
[0] = { .state_busy = RCTX_STATE_UDP_EP0_BUSY,
.state_pending = RCTX_STATE_UDP_EP0_PENDING },
[1] = { .state_busy = RCTX_STATE_UDP_EP1_BUSY,
.state_pending = RCTX_STATE_UDP_EP1_PENDING },
[2] = { .state_busy = RCTX_STATE_UDP_EP2_BUSY,
.state_pending = RCTX_STATE_UDP_EP2_PENDING },
[3] = { .state_busy = RCTX_STATE_UDP_EP3_BUSY,
.state_pending = RCTX_STATE_UDP_EP3_PENDING },
};
static void reset_ep(unsigned int ep)
{
AT91PS_UDP pUDP = upcd.pUdp;
struct req_ctx *rctx;
atomic_set(&upcd.ep[ep].pkts_in_transit, 0);
/* free all currently transmitting contexts */
while ((rctx = req_ctx_find_get(0, epstate[ep].state_busy,
RCTX_STATE_FREE))) {}
/* free all currently pending contexts */
while ((rctx = req_ctx_find_get(0, epstate[ep].state_pending,
RCTX_STATE_FREE))) {}
pUDP->UDP_RSTEP |= (1 << ep);
pUDP->UDP_RSTEP &= ~(1 << ep);
pUDP->UDP_CSR[ep] = AT91C_UDP_EPEDS;
upcd.ep[ep].incomplete.rctx = NULL;
}
static void udp_ep0_handler(void);
void udp_unthrottle(void)
{
AT91PS_UDP pUDP = upcd.pUdp;
pUDP->UDP_IER = AT91C_UDP_EPINT1;
}
int udp_refill_ep(int ep)
{
u_int16_t i;
AT91PS_UDP pUDP = upcd.pUdp;
struct req_ctx *rctx;
unsigned int start, end;
/* If we're not configured by the host yet, there is no point
* in trying to send data to it... */
if (!upcd.cur_config) {
return -ENXIO;
}
/* If there are already two packets in transit, the DPR of
* the SAM7 UDC doesn't have space for more data */
if (atomic_read(&upcd.ep[ep].pkts_in_transit) == 2)
return -EBUSY;
/* disable endpoint interrup */
pUDP->UDP_IDR |= 1 << ep;
/* If we have an incompletely-transmitted req_ctx (>EP size),
* we need to transmit the rest and finish the transaction */
if (upcd.ep[ep].incomplete.rctx) {
rctx = upcd.ep[ep].incomplete.rctx;
start = upcd.ep[ep].incomplete.bytes_sent;
} else {
/* get pending rctx and start transmitting from zero */
rctx = req_ctx_find_get(0, epstate[ep].state_pending,
epstate[ep].state_busy);
if (!rctx) {
/* re-enable endpoint interrupt */
pUDP->UDP_IER |= 1 << ep;
return 0;
}
if (rctx->tot_len == 0) {
/* re-enable endpoint interrupt */
pUDP->UDP_IER |= 1 << ep;
req_ctx_put(rctx);
return 0;
}
DEBUGPCR("USBT(D=%08X, L=%04u, P=$02u) H4/T4: %02X %02X %02X %02X / %02X %02X %02X %02X",
rctx->data, rctx->tot_len, req_ctx_count(epstate[ep].state_pending),
rctx->data[4], rctx->data[5], rctx->data[6], rctx->data[7],
rctx->data[rctx->tot_len - 4], rctx->data[rctx->tot_len - 3],
rctx->data[rctx->tot_len - 2], rctx->data[rctx->tot_len - 1]);
start = 0;
upcd.ep[ep].incomplete.bytes_sent = 0;
}
if (rctx->tot_len - start <= AT91C_EP_IN_SIZE)
end = rctx->tot_len;
else
end = start + AT91C_EP_IN_SIZE;
/* fill FIFO/DPR */
for (i = start; i < end; i++)
pUDP->UDP_FDR[ep] = rctx->data[i];
if (atomic_inc_return(&upcd.ep[ep].pkts_in_transit) == 1) {
/* not been transmitting before, start transmit */
pUDP->UDP_CSR[ep] |= AT91C_UDP_TXPKTRDY;
}
if (end == rctx->tot_len) {
/* CASE 1: return context to pool, if
* - packet transfer < AT91C_EP_OUT_SIZE
* - after ZLP of transfer == AT91C_EP_OUT_SIZE
* - after ZLP of transfer % AT91C_EP_OUT_SIZE == 0
* - after last packet of transfer % AT91C_EP_OUT_SIZE != 0
*/
upcd.ep[ep].incomplete.rctx = NULL;
req_ctx_put(rctx);
} else {
/* CASE 2: mark transfer as incomplete, if
* - after data of transfer == AT91C_EP_OUT_SIZE
* - after data of transfer > AT91C_EP_OUT_SIZE
* - after last packet of transfer % AT91C_EP_OUT_SIZE == 0
*/
upcd.ep[ep].incomplete.rctx = rctx;
upcd.ep[ep].incomplete.bytes_sent += end - start;
}
/* re-enable endpoint interrupt */
pUDP->UDP_IER |= 1 << ep;
return 1;
}
static void udp_irq(void)
{
u_int32_t csr;
AT91PS_UDP pUDP = upcd.pUdp;
AT91_REG isr = pUDP->UDP_ISR;
DEBUGI("udp_irq(imr=0x%04x, isr=0x%04x, state=%d): ",
pUDP->UDP_IMR, isr, upcd.state);
if (isr & AT91C_UDP_ENDBUSRES) {
DEBUGI("ENDBUSRES ");
pUDP->UDP_ICR = AT91C_UDP_ENDBUSRES;
pUDP->UDP_IER = AT91C_UDP_EPINT0;
reset_ep(0);
reset_ep(1);
reset_ep(2);
reset_ep(3);
/* Enable the function */
pUDP->UDP_FADDR = AT91C_UDP_FEN;
/* Configure endpoint 0 */
pUDP->UDP_CSR[0] = (AT91C_UDP_EPEDS | AT91C_UDP_EPTYPE_CTRL);
upcd.cur_config = 0;
upcd.state = USB_STATE_DEFAULT;
#ifdef CONFIG_DFU
if (*dfu->dfu_state == DFU_STATE_appDETACH) {
DEBUGI("DFU_SWITCH ");
/* now we need to switch to DFU mode */
dfu->dfu_switch();
goto out;
}
#endif
}
if (isr & AT91C_UDP_EPINT0) {
DEBUGI("EP0INT(Control) ");
udp_ep0_handler();
}
if (isr & AT91C_UDP_EPINT1) {
u_int32_t cur_rcv_bank = upcd.cur_rcv_bank;
u_int16_t i, pkt_size;
struct req_ctx *rctx;
csr = pUDP->UDP_CSR[1];
pkt_size = csr >> 16;
DEBUGI("EP1INT(Out, CSR=0x%08x) ", csr);
if (cur_rcv_bank == AT91C_UDP_RX_DATA_BK1)
DEBUGIO("cur_bank=1 ");
else if (cur_rcv_bank == AT91C_UDP_RX_DATA_BK0)
DEBUGIO("cur_bank=0 ");
else
DEBUGIO("cur_bank INVALID ");
if (csr & AT91C_UDP_RX_DATA_BK1)
DEBUGIO("BANK1 ");
if (csr & AT91C_UDP_RX_DATA_BK0)
DEBUGIO("BANK0 ");
if (!(csr & cur_rcv_bank))
goto cont_ep2;
if (upcd.ep[1].incomplete.rctx) {
DEBUGIO("continue_incompl_RCTX ");
rctx = upcd.ep[1].incomplete.rctx;
} else {
/* allocate new req_ctx */
DEBUGIO("alloc_new_RCTX ");
/* whether to get a big or a small req_ctx */
if (pkt_size >= AT91C_EP_IN_SIZE)
rctx = req_ctx_find_get(1, RCTX_STATE_FREE,
RCTX_STATE_UDP_RCV_BUSY);
else
rctx = req_ctx_find_get(0, RCTX_STATE_FREE,
RCTX_STATE_UDP_RCV_BUSY);
if (!rctx) {
/* disable interrupts for now */
pUDP->UDP_IDR = AT91C_UDP_EPINT1;
DEBUGP("NO_RCTX_AVAIL! ");
goto cont_ep2;
}
rctx->tot_len = 0;
}
DEBUGIO("RCTX=%u ", req_ctx_num(rctx));
if (rctx->size - rctx->tot_len < pkt_size) {
DEBUGIO("RCTX too small, truncating !!!\n");
pkt_size = rctx->size - rctx->tot_len;
}
for (i = 0; i < pkt_size; i++)
rctx->data[rctx->tot_len++] = pUDP->UDP_FDR[1];
pUDP->UDP_CSR[1] &= ~cur_rcv_bank;
/* toggle current receive bank */
if (cur_rcv_bank == AT91C_UDP_RX_DATA_BK0)
cur_rcv_bank = AT91C_UDP_RX_DATA_BK1;
else
cur_rcv_bank = AT91C_UDP_RX_DATA_BK0;
upcd.cur_rcv_bank = cur_rcv_bank;
DEBUGIO("rctxdump(%s) ", hexdump(rctx->data, rctx->tot_len));
/* if this is the last packet in transfer, hand rctx up the
* stack */
if (pkt_size < AT91C_EP_IN_SIZE) {
DEBUGIO("RCTX_rx_done ");
req_ctx_set_state(rctx, RCTX_STATE_UDP_RCV_DONE);
upcd.ep[1].incomplete.rctx = NULL;
} else {
DEBUGIO("RCTX_rx_cont ");
upcd.ep[1].incomplete.rctx = rctx;
}
}
cont_ep2:
if (isr & AT91C_UDP_EPINT2) {
csr = pUDP->UDP_CSR[2];
DEBUGI("EP2INT(In, CSR=0x%08x) ", csr);
if (csr & AT91C_UDP_TXCOMP) {
DEBUGII("ACK_TX_COMP ");
/* acknowledge TX completion */
pUDP->UDP_CSR[2] &= ~AT91C_UDP_TXCOMP;
while (pUDP->UDP_CSR[2] & AT91C_UDP_TXCOMP) ;
/* if we already have another packet in DPR, send it */
if (atomic_dec_return(&upcd.ep[2].pkts_in_transit) == 1)
pUDP->UDP_CSR[2] |= AT91C_UDP_TXPKTRDY;
udp_refill_ep(2);
}
}
if (isr & AT91C_UDP_EPINT3) {
csr = pUDP->UDP_CSR[3];
DEBUGII("EP3INT(Interrupt, CSR=0x%08x) ", csr);
/* Transmit has completed, re-fill from pending rcts for EP3 */
if (csr & AT91C_UDP_TXCOMP) {
pUDP->UDP_CSR[3] &= ~AT91C_UDP_TXCOMP;
while (pUDP->UDP_CSR[3] & AT91C_UDP_TXCOMP) ;
/* if we already have another packet in DPR, send it */
if (atomic_dec_return(&upcd.ep[3].pkts_in_transit) == 1)
pUDP->UDP_CSR[3] |= AT91C_UDP_TXPKTRDY;
udp_refill_ep(3);
}
}
if (isr & AT91C_UDP_RXSUSP) {
pUDP->UDP_ICR = AT91C_UDP_RXSUSP;
DEBUGI("RXSUSP ");
#ifdef CONFIG_USB_SUSPEND
upcd.state = USB_STATE_SUSPENDED;
/* FIXME: implement suspend/resume correctly. This
* involves saving the pre-suspend state, and calling back
* into the main application program to ask it to power down
* all peripherals, switching to slow clock, ... */
#endif
}
if (isr & AT91C_UDP_RXRSM) {
pUDP->UDP_ICR = AT91C_UDP_RXRSM;
DEBUGI("RXRSM ");
#ifdef CONFIG_USB_SUSPEND
if (upcd.state == USB_STATE_SUSPENDED)
upcd.state = USB_STATE_CONFIGURED;
/* FIXME: implement suspend/resume */
#endif
}
if (isr & AT91C_UDP_EXTRSM) {
pUDP->UDP_ICR = AT91C_UDP_EXTRSM;
DEBUGI("EXTRSM ");
/* FIXME: implement suspend/resume */
}
if (isr & AT91C_UDP_SOFINT) {
pUDP->UDP_ICR = AT91C_UDP_SOFINT;
DEBUGI("SOFINT ");
}
if (isr & AT91C_UDP_WAKEUP) {
pUDP->UDP_ICR = AT91C_UDP_WAKEUP;
DEBUGI("WAKEUP ");
}
out:
DEBUGI("END\r\n");
AT91F_AIC_ClearIt(AT91C_BASE_AIC, AT91C_ID_UDP);
}
void udp_pullup_on(void)
{
#ifdef PCD
AT91F_PIO_SetOutput(AT91C_BASE_PIOA, OPENPCD_PIO_UDP_PUP);
#endif
AT91F_PIO_ClearOutput(AT91C_BASE_PIOA, OPENPCD_PIO_UDP_PUPv4);
}
void udp_pullup_off(void)
{
#ifdef PCD
AT91F_PIO_ClearOutput(AT91C_BASE_PIOA, OPENPCD_PIO_UDP_PUP);
#endif
AT91F_PIO_SetOutput(AT91C_BASE_PIOA, OPENPCD_PIO_UDP_PUPv4);
}
/* Open USB Device Port */
void udp_open(void)
{
DEBUGPCRF("entering");
udp_init();
upcd.pUdp = AT91C_BASE_UDP;
upcd.cur_config = 0;
upcd.cur_rcv_bank = AT91C_UDP_RX_DATA_BK0;
/* This should start with USB_STATE_NOTATTACHED, but we're a pure
* bus powered device and thus start with powered */
upcd.state = USB_STATE_POWERED;
AT91F_AIC_ConfigureIt(AT91C_BASE_AIC, AT91C_ID_UDP,
OPENPCD_IRQ_PRIO_UDP,
AT91C_AIC_SRCTYPE_INT_HIGH_LEVEL, &udp_irq);
AT91F_AIC_EnableIt(AT91C_BASE_AIC, AT91C_ID_UDP);
/* End-of-Bus-Reset is always enabled */
/* Set the Pull up resistor */
udp_pullup_on();
}
void udp_reset(void)
{
volatile int i;
udp_pullup_off();
for (i = 0; i < 0xffff; i++)
;
udp_pullup_on();
}
/* Handle requests on the USB Control Endpoint */
static void udp_ep0_handler(void)
{
AT91PS_UDP pUDP = upcd.pUdp;
u_int8_t bmRequestType, bRequest;
u_int16_t wValue, wIndex, wLength, wStatus;
u_int32_t csr = pUDP->UDP_CSR[0];
DEBUGE("CSR=0x%04x ", csr);
if (csr & AT91C_UDP_STALLSENT) {
DEBUGE("ACK_STALLSENT ");
pUDP->UDP_CSR[0] = ~AT91C_UDP_STALLSENT;
}
if (csr & AT91C_UDP_RX_DATA_BK0) {
DEBUGE("ACK_BANK0 ");
pUDP->UDP_CSR[0] &= ~AT91C_UDP_RX_DATA_BK0;
}
if (!(csr & AT91C_UDP_RXSETUP)) {
DEBUGE("no setup packet ");
return;
}
DEBUGE("len=%d ", csr >> 16);
if (csr >> 16 == 0) {
DEBUGE("empty packet ");
return;
}
bmRequestType = pUDP->UDP_FDR[0];
bRequest = pUDP->UDP_FDR[0];
wValue = (pUDP->UDP_FDR[0] & 0xFF);
wValue |= (pUDP->UDP_FDR[0] << 8);
wIndex = (pUDP->UDP_FDR[0] & 0xFF);
wIndex |= (pUDP->UDP_FDR[0] << 8);
wLength = (pUDP->UDP_FDR[0] & 0xFF);
wLength |= (pUDP->UDP_FDR[0] << 8);
DEBUGE("bmRequestType=0x%2x ", bmRequestType);
if (bmRequestType & 0x80) {
DEBUGE("DATA_IN=1 ");
pUDP->UDP_CSR[0] |= AT91C_UDP_DIR;
while (!(pUDP->UDP_CSR[0] & AT91C_UDP_DIR)) ;
}
pUDP->UDP_CSR[0] &= ~AT91C_UDP_RXSETUP;
while ((pUDP->UDP_CSR[0] & AT91C_UDP_RXSETUP)) ;
DEBUGE("dfu_state = %u ", *dfu->dfu_state);
/* Handle supported standard device request Cf Table 9-3 in USB
* speciication Rev 1.1 */
switch ((bRequest << 8) | bmRequestType) {
u_int8_t desc_type, desc_index;
case STD_GET_DESCRIPTOR:
DEBUGE("GET_DESCRIPTOR(wValue=0x%04x, wIndex=0x%04x) ",
wValue, wIndex);
desc_type = wValue >> 8;
desc_index = wValue & 0xff;
switch (desc_type) {
case USB_DT_DEVICE:
/* Return Device Descriptor */
#ifdef CONFIG_DFU
if (*dfu->dfu_state != DFU_STATE_appIDLE)
udp_ep0_send_data((const char *)
dfu->dfu_dev_descriptor,
dfu->dfu_dev_descriptor->bLength,
wLength);
else
#endif
udp_ep0_send_data((const char *) &dev_descriptor,
sizeof(dev_descriptor), wLength);
break;
case USB_DT_CONFIG:
/* Return Configuration Descriptor */
#ifdef CONFIG_DFU
if (*dfu->dfu_state != DFU_STATE_appIDLE)
udp_ep0_send_data((const char *)
dfu->dfu_cfg_descriptor,
dfu->dfu_cfg_descriptor->ucfg.wTotalLength,
wLength);
else
#endif
udp_ep0_send_data((const char *) &cfg_descriptor,
sizeof(cfg_descriptor), wLength);
break;
case USB_DT_STRING:
#ifdef CONFIG_USB_STRING
/* Return String descriptor */
if (desc_index > ARRAY_SIZE(usb_strings))
goto out_stall;
DEBUGE("bLength=%u, wLength=%u\n",
usb_strings[desc_index]->bLength, wLength);
udp_ep0_send_data((const char *) usb_strings[desc_index],
usb_strings[desc_index]->bLength,
wLength);
#else
goto out_stall;
#endif
break;
case USB_DT_CS_DEVICE:
/* Return Function descriptor */
udp_ep0_send_data((const char *) &dfu->dfu_cfg_descriptor->func_dfu,
sizeof(dfu->dfu_cfg_descriptor->func_dfu), wLength);
break;
case USB_DT_INTERFACE:
/* Return Interface descriptor */
if (desc_index > cfg_descriptor.ucfg.bNumInterfaces)
goto out_stall;
switch (desc_index) {
case 0:
udp_ep0_send_data((const char *)
&cfg_descriptor.uif,
sizeof(cfg_descriptor.uif),
wLength);
break;
#ifdef CONFIG_DFU
case 1:
udp_ep0_send_data((const char *)
&cfg_descriptor.uif_dfu[0],
sizeof(cfg_descriptor.uif_dfu[0]),
wLength);
break;
case 2:
udp_ep0_send_data((const char *)
&cfg_descriptor.uif_dfu[1],
sizeof(cfg_descriptor.uif_dfu[1]),
wLength);
break;
case 3:
udp_ep0_send_data((const char *)
&cfg_descriptor.uif_dfu[2],
sizeof(cfg_descriptor.uif_dfu[2]),
wLength);
break;
#endif
default:
goto out_stall;
break;
}
break;
default:
goto out_stall;
break;
}
break;
case STD_SET_ADDRESS:
DEBUGE("SET_ADDRESS ");
if (wValue > 127)
goto out_stall;
switch (upcd.state) {
case USB_STATE_DEFAULT:
udp_ep0_send_zlp();
if (wValue == 0) {
/* do nothing */
} else {
pUDP->UDP_FADDR = (AT91C_UDP_FEN | wValue);
pUDP->UDP_GLBSTATE = AT91C_UDP_FADDEN;
upcd.state = USB_STATE_ADDRESS;
}
break;
case USB_STATE_ADDRESS:
udp_ep0_send_zlp();
if (wValue == 0) {
upcd.state = USB_STATE_DEFAULT;
} else {
pUDP->UDP_FADDR = (AT91C_UDP_FEN | wValue);
}
break;
default:
goto out_stall;
break;
}
break;
case STD_SET_CONFIGURATION:
DEBUGE("SET_CONFIG ");
if (upcd.state != USB_STATE_ADDRESS &&
upcd.state != USB_STATE_CONFIGURED) {
goto out_stall;
}
if ((wValue & 0xff) == 0) {
DEBUGE("VALUE==0 ");
upcd.state = USB_STATE_ADDRESS;
pUDP->UDP_GLBSTATE = AT91C_UDP_FADDEN;
pUDP->UDP_CSR[1] = 0;
pUDP->UDP_CSR[2] = 0;
pUDP->UDP_CSR[3] = 0;
} else if ((wValue & 0xff) <=
dev_descriptor.bNumConfigurations) {
DEBUGE("VALUE!=0 ");
upcd.state = USB_STATE_CONFIGURED;
pUDP->UDP_GLBSTATE = AT91C_UDP_CONFG;
pUDP->UDP_CSR[1] = AT91C_UDP_EPEDS |
AT91C_UDP_EPTYPE_BULK_OUT;
pUDP->UDP_CSR[2] = AT91C_UDP_EPEDS |
AT91C_UDP_EPTYPE_BULK_IN;
pUDP->UDP_CSR[3] = AT91C_UDP_EPEDS |
AT91C_UDP_EPTYPE_INT_IN;
} else {
/* invalid configuration */
goto out_stall;
break;
}
upcd.cur_config = wValue;
udp_ep0_send_zlp();
pUDP->UDP_IER = (AT91C_UDP_EPINT0 | AT91C_UDP_EPINT1 |
AT91C_UDP_EPINT2 | AT91C_UDP_EPINT3);
break;
case STD_GET_CONFIGURATION:
DEBUGE("GET_CONFIG ");
switch (upcd.state) {
case USB_STATE_ADDRESS:
case USB_STATE_CONFIGURED:
/* Table 9.4 wLength One */
udp_ep0_send_data((char *)&(upcd.cur_config),
sizeof(upcd.cur_config), 1);
break;
default:
goto out_stall;
break;
}
break;
case STD_GET_INTERFACE:
DEBUGE("GET_INTERFACE ");
if (upcd.state != USB_STATE_CONFIGURED)
goto out_stall;
/* Table 9.4 wLength One */
udp_ep0_send_data((char *)&(upcd.cur_altsett),
sizeof(upcd.cur_altsett), 1);
break;
case STD_GET_STATUS_ZERO:
DEBUGE("GET_STATUS_ZERO ");
wStatus = 0;
/* Table 9.4 wLength Two */
udp_ep0_send_data((char *)&wStatus, sizeof(wStatus), 2);
break;
case STD_GET_STATUS_INTERFACE:
DEBUGE("GET_STATUS_INTERFACE ");
if (upcd.state == USB_STATE_DEFAULT ||
(upcd.state == USB_STATE_ADDRESS && wIndex != 0))
goto out_stall;
wStatus = 0;
/* Table 9.4 wLength Two */
udp_ep0_send_data((char *)&wStatus, sizeof(wStatus), 2);
break;
case STD_GET_STATUS_ENDPOINT:
DEBUGE("GET_STATUS_ENDPOINT(EPidx=%u) ", wIndex&0x0f);
if (upcd.state == USB_STATE_DEFAULT ||
(upcd.state == USB_STATE_ADDRESS && wIndex != 0))
goto out_stall;
wStatus = 0;
wIndex &= 0x0F;
if ((pUDP->UDP_GLBSTATE & AT91C_UDP_CONFG) && (wIndex <= 3)) {
wStatus =
(pUDP->UDP_CSR[wIndex] & AT91C_UDP_EPEDS) ? 0 : 1;
/* Table 9.4 wLength Two */
udp_ep0_send_data((char *)&wStatus, sizeof(wStatus), 2);
} else if ((pUDP->UDP_GLBSTATE & AT91C_UDP_FADDEN)
&& (wIndex == 0)) {
wStatus =
(pUDP->UDP_CSR[wIndex] & AT91C_UDP_EPEDS) ? 0 : 1;
/* Table 9.4 wLength Two */
udp_ep0_send_data((char *)&wStatus, sizeof(wStatus), 2);
} else
goto out_stall;
break;
case STD_SET_FEATURE_ZERO:
DEBUGE("SET_FEATURE_ZERO ");
if (upcd.state == USB_STATE_ADDRESS &&
(wIndex & 0xff) != 0)
goto out_stall;
/* FIXME: implement this */
goto out_stall;
break;
case STD_SET_FEATURE_INTERFACE:
DEBUGE("SET_FEATURE_INTERFACE ");
if (upcd.state == USB_STATE_ADDRESS &&
(wIndex & 0xff) != 0)
goto out_stall;
udp_ep0_send_zlp();
break;
case STD_SET_FEATURE_ENDPOINT:
DEBUGE("SET_FEATURE_ENDPOINT ");
if (upcd.state == USB_STATE_ADDRESS &&
(wIndex & 0xff) != 0)
goto out_stall;
if (wValue != USB_ENDPOINT_HALT)
goto out_stall;
udp_ep0_send_zlp();
wIndex &= 0x0F;
if ((wValue == 0) && wIndex && (wIndex <= 3)) {
pUDP->UDP_CSR[wIndex] = 0;
udp_ep0_send_zlp();
} else
goto out_stall;
break;
case STD_CLEAR_FEATURE_ZERO:
DEBUGE("CLEAR_FEATURE_ZERO ");
goto out_stall;
break;
case STD_CLEAR_FEATURE_INTERFACE:
DEBUGP("CLEAR_FEATURE_INTERFACE ");
udp_ep0_send_zlp();
break;
case STD_CLEAR_FEATURE_ENDPOINT:
DEBUGE("CLEAR_FEATURE_ENDPOINT(EPidx=%u) ", wIndex & 0x0f);
if (wValue != USB_ENDPOINT_HALT)
goto out_stall;
wIndex &= 0x0F;
if ((wValue == 0) && wIndex && (wIndex <= 3)) {
reset_ep(wIndex);
udp_ep0_send_zlp();
} else
goto out_stall;
break;
case STD_SET_INTERFACE:
DEBUGE("SET INTERFACE ");
if (upcd.state != USB_STATE_CONFIGURED)
goto out_stall;
if (wIndex > cfg_descriptor.ucfg.bNumInterfaces)
goto out_stall;
upcd.cur_interface = wIndex;
upcd.cur_altsett = wValue;
/* USB spec mandates that if we only support one altsetting in
* the given interface, we shall respond with STALL in the
* status stage */
udp_ep0_send_stall();
break;
default:
DEBUGE("DEFAULT(req=0x%02x, type=0x%02x) ",
bRequest, bmRequestType);
#ifdef CONFIG_DFU
if ((bmRequestType & 0x3f) == USB_TYPE_DFU) {
dfu->dfu_ep0_handler(bmRequestType, bRequest, wValue,
wLength);
} else
#endif
goto out_stall;
break;
}
return;
out_stall:
DEBUGE("STALL!! ");
udp_ep0_send_stall();
}