/* $NetBSD: ahci.c,v 1.1.18.1 2008/01/09 01:47:12 matt Exp $ */
/*-
* Copyright (c) 2007 Ruslan Ermilov and Vsevolod Lobko.
* All rights reserved.
*
* Redistribution and use in source and binary forms, with or
* without modification, are permitted provided that the following
* conditions are met:
* 1. Redistributions of source code must retain the above copyright
* notice, this list of conditions and the following disclaimer.
* 2. Redistributions in binary form must reproduce the above
* copyright notice, this list of conditions and the following
* disclaimer in the documentation and/or other materials provided
* with the distribution.
* 3. The names of the authors may not be used to endorse or promote
* products derived from this software without specific prior
* written permission.
*
* THIS SOFTWARE IS PROVIDED BY THE AUTHORS ``AS IS'' AND ANY
* EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO,
* THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A
* PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHORS
* BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY,
* OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
* PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA,
* OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
* THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR
* TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT
* OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY
* OF SUCH DAMAGE.
*/
/*
* Copyright (c) 2001 The NetBSD Foundation, Inc.
* All rights reserved.
*
* This code is derived from software contributed to The NetBSD Foundation
* by Tetsuya Isaki.
*
* Redistribution and use in source and binary forms, with or without
* modification, are permitted provided that the following conditions
* are met:
* 1. Redistributions of source code must retain the above copyright
* notice, this list of conditions and the following disclaimer.
* 2. Redistributions in binary form must reproduce the above copyright
* notice, this list of conditions and the following disclaimer in the
* documentation and/or other materials provided with the distribution.
* 3. All advertising materials mentioning features or use of this software
* must display the following acknowledgement:
* This product includes software developed by the NetBSD
* Foundation, Inc. and its contributors.
* 4. Neither the name of The NetBSD Foundation nor the names of its
* contributors may be used to endorse or promote products derived
* from this software without specific prior written permission.
*
* THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
* ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
* TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
* PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
* BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
* CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
* SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
* INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
* CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
* ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
* POSSIBILITY OF SUCH DAMAGE.
*/
/*
* !! HIGHLY EXPERIMENTAL CODE !!
*/
#include <sys/cdefs.h>
__KERNEL_RCSID(0, "$NetBSD: ahci.c,v 1.1.18.1 2008/01/09 01:47:12 matt Exp $");
#include <sys/param.h>
#include <sys/systm.h>
#include <sys/kernel.h>
#include <sys/proc.h>
#include <sys/device.h>
#include <sys/malloc.h>
#include <machine/bus.h>
#include <machine/cpu.h>
#include <dev/usb/usb.h>
#include <dev/usb/usbdi.h>
#include <dev/usb/usbdivar.h>
#include <dev/usb/usb_mem.h>
#include <dev/usb/usbdevs.h>
#include <mips/adm5120/include/adm5120reg.h>
#include <mips/adm5120/include/adm5120var.h>
#include <mips/adm5120/include/adm5120_obiovar.h>
#include <mips/adm5120/dev/ahcireg.h>
#include <mips/adm5120/dev/ahcivar.h>
static usbd_status ahci_open(usbd_pipe_handle);
static void ahci_softintr(void *);
static void ahci_poll(struct usbd_bus *);
static void ahci_poll_hub(void *);
static void ahci_poll_device(void *arg);
static usbd_status ahci_allocm(struct usbd_bus *, usb_dma_t *, u_int32_t);
static void ahci_freem(struct usbd_bus *, usb_dma_t *);
static usbd_xfer_handle ahci_allocx(struct usbd_bus *);
static void ahci_freex(struct usbd_bus *, usbd_xfer_handle);
static int ahci_str(usb_string_descriptor_t *, int, const char *);
static usbd_status ahci_root_ctrl_transfer(usbd_xfer_handle);
static usbd_status ahci_root_ctrl_start(usbd_xfer_handle);
static void ahci_root_ctrl_abort(usbd_xfer_handle);
static void ahci_root_ctrl_close(usbd_pipe_handle);
static void ahci_root_ctrl_done(usbd_xfer_handle);
static usbd_status ahci_root_intr_transfer(usbd_xfer_handle);
static usbd_status ahci_root_intr_start(usbd_xfer_handle);
static void ahci_root_intr_abort(usbd_xfer_handle);
static void ahci_root_intr_close(usbd_pipe_handle);
static void ahci_root_intr_done(usbd_xfer_handle);
static usbd_status ahci_device_ctrl_transfer(usbd_xfer_handle);
static usbd_status ahci_device_ctrl_start(usbd_xfer_handle);
static void ahci_device_ctrl_abort(usbd_xfer_handle);
static void ahci_device_ctrl_close(usbd_pipe_handle);
static void ahci_device_ctrl_done(usbd_xfer_handle);
static usbd_status ahci_device_intr_transfer(usbd_xfer_handle);
static usbd_status ahci_device_intr_start(usbd_xfer_handle);
static void ahci_device_intr_abort(usbd_xfer_handle);
static void ahci_device_intr_close(usbd_pipe_handle);
static void ahci_device_intr_done(usbd_xfer_handle);
static usbd_status ahci_device_isoc_transfer(usbd_xfer_handle);
static usbd_status ahci_device_isoc_start(usbd_xfer_handle);
static void ahci_device_isoc_abort(usbd_xfer_handle);
static void ahci_device_isoc_close(usbd_pipe_handle);
static void ahci_device_isoc_done(usbd_xfer_handle);
static usbd_status ahci_device_bulk_transfer(usbd_xfer_handle);
static usbd_status ahci_device_bulk_start(usbd_xfer_handle);
static void ahci_device_bulk_abort(usbd_xfer_handle);
static void ahci_device_bulk_close(usbd_pipe_handle);
static void ahci_device_bulk_done(usbd_xfer_handle);
static int ahci_transaction(struct ahci_softc *,
usbd_pipe_handle, u_int8_t, int, u_char *, u_int8_t);
static void ahci_noop(usbd_pipe_handle);
static void ahci_abort_xfer(usbd_xfer_handle, usbd_status);
static void ahci_device_clear_toggle(usbd_pipe_handle);
extern int usbdebug;
extern int uhubdebug;
extern int umassdebug;
int ahci_dummy;
#define AHCI_DEBUG
/* For root hub */
#define AHCI_INTR_ENDPT (1)
#ifdef AHCI_DEBUG
#define D_TRACE (0x0001) /* function trace */
#define D_MSG (0x0002) /* debug messages */
#define D_XFER (0x0004) /* transfer messages (noisy!) */
#define D_MEM (0x0008) /* memory allocation */
int ahci_debug = 0;
#define DPRINTF(z,x) if((ahci_debug&(z))!=0)printf x
void print_req(usb_device_request_t *);
void print_req_hub(usb_device_request_t *);
void print_dumpreg(struct ahci_softc *);
void print_xfer(usbd_xfer_handle);
#else
#define DPRINTF(z,x)
#endif
struct usbd_bus_methods ahci_bus_methods = {
ahci_open,
ahci_softintr,
ahci_poll,
ahci_allocm,
ahci_freem,
ahci_allocx,
ahci_freex,
};
struct usbd_pipe_methods ahci_root_ctrl_methods = {
ahci_root_ctrl_transfer,
ahci_root_ctrl_start,
ahci_root_ctrl_abort,
ahci_root_ctrl_close,
ahci_noop,
ahci_root_ctrl_done,
};
struct usbd_pipe_methods ahci_root_intr_methods = {
ahci_root_intr_transfer,
ahci_root_intr_start,
ahci_root_intr_abort,
ahci_root_intr_close,
ahci_noop,
ahci_root_intr_done,
};
struct usbd_pipe_methods ahci_device_ctrl_methods = {
ahci_device_ctrl_transfer,
ahci_device_ctrl_start,
ahci_device_ctrl_abort,
ahci_device_ctrl_close,
ahci_noop,
ahci_device_ctrl_done,
};
struct usbd_pipe_methods ahci_device_intr_methods = {
ahci_device_intr_transfer,
ahci_device_intr_start,
ahci_device_intr_abort,
ahci_device_intr_close,
ahci_device_clear_toggle,
ahci_device_intr_done,
};
struct usbd_pipe_methods ahci_device_isoc_methods = {
ahci_device_isoc_transfer,
ahci_device_isoc_start,
ahci_device_isoc_abort,
ahci_device_isoc_close,
ahci_noop,
ahci_device_isoc_done,
};
struct usbd_pipe_methods ahci_device_bulk_methods = {
ahci_device_bulk_transfer,
ahci_device_bulk_start,
ahci_device_bulk_abort,
ahci_device_bulk_close,
ahci_device_clear_toggle,
ahci_device_bulk_done,
};
struct ahci_pipe {
struct usbd_pipe pipe;
u_int32_t toggle;
};
static int ahci_match(struct device *, struct cfdata *, void *);
static void ahci_attach(struct device *, struct device *, void *);
CFATTACH_DECL(ahci, sizeof(struct ahci_softc),
ahci_match, ahci_attach, NULL, NULL);
static int
ahci_match(struct device *parent, struct cfdata *cf, void *aux)
{
struct obio_attach_args *aa = aux;
if (strcmp(aa->oba_name, cf->cf_name) == 0)
return (1);
return (0);
}
#define REG_READ(o) bus_space_read_4(sc->sc_st, sc->sc_ioh, (o))
#define REG_WRITE(o,v) bus_space_write_4(sc->sc_st, sc->sc_ioh, (o),(v))
/*
* Attach SL11H/SL811HS. Return 0 if success.
*/
void
ahci_attach(struct device *parent, struct device *self, void *aux)
{
struct obio_attach_args *aa = aux;
struct ahci_softc *sc = (void *) self;
printf("\n");
sc->sc_dmat = aa->oba_dt;
sc->sc_st = aa->oba_st;
/* Initialize sc */
sc->sc_bus.usbrev = USBREV_1_1;
sc->sc_bus.methods = &ahci_bus_methods;
sc->sc_bus.pipe_size = sizeof(struct ahci_pipe);
sc->sc_bus.dmatag = sc->sc_dmat;
sc->busy = 0;
/* Map the device. */
if (bus_space_map(sc->sc_st, aa->oba_addr,
512, 0, &sc->sc_ioh) != 0) {
printf("%s: unable to map device\n",
USBDEVNAME(sc->sc_bus.bdev));
return;
}
/* Hook up the interrupt handler. */
sc->sc_ih = adm5120_intr_establish(aa->oba_irq, INTR_IRQ, ahci_intr, sc);
if (sc->sc_ih == NULL) {
printf("%s: unable to register interrupt handler\n",
USBDEVNAME(sc->sc_bus.bdev));
return;
}
SIMPLEQ_INIT(&sc->sc_free_xfers);
usb_callout_init(sc->sc_poll_handle);
REG_WRITE(ADMHCD_REG_INTENABLE, 0); /* disable interrupts */
REG_WRITE(ADMHCD_REG_CONTROL, ADMHCD_SW_RESET); /* reset */
delay_ms(10);
while (REG_READ(ADMHCD_REG_CONTROL) & ADMHCD_SW_RESET)
delay_ms(1);
REG_WRITE(ADMHCD_REG_CONTROL, ADMHCD_HOST_EN);
REG_WRITE(ADMHCD_REG_HOSTHEAD, 0x00000000);
REG_WRITE(ADMHCD_REG_FMINTERVAL, 0x20002edf);
REG_WRITE(ADMHCD_REG_LSTHRESH, 0x628);
REG_WRITE(ADMHCD_REG_RHDESCR, ADMHCD_NPS | ADMHCD_LPSC);
REG_WRITE(ADMHCD_REG_HOSTCONTROL, ADMHCD_STATE_OP);
REG_WRITE(ADMHCD_REG_INTENABLE, 0); /* XXX: enable interrupts */
#ifdef USB_DEBUG
/* usbdebug = 0x7f;
uhubdebug = 0x7f;
umassdebug = 0xffffffff; */
#endif
/* Attach USB devices */
sc->sc_child = config_found(self, &sc->sc_bus, usbctlprint);
}
int
ahci_intr(void *arg)
{
#if 0
struct ahci_softc *sc = arg;
u_int8_t r;
#ifdef AHCI_DEBUG
char bitbuf[256];
#endif
r = sl11read(sc, SL11_ISR);
sl11write(sc, SL11_ISR, SL11_ISR_DATA | SL11_ISR_SOFTIMER);
if ((r & SL11_ISR_RESET)) {
sc->sc_flags |= AHCDF_RESET;
sl11write(sc, SL11_ISR, SL11_ISR_RESET);
}
if ((r & SL11_ISR_INSERT)) {
sc->sc_flags |= AHCDF_INSERT;
sl11write(sc, SL11_ISR, SL11_ISR_INSERT);
}
#ifdef AHCI_DEBUG
bitmask_snprintf(r,
(sl11read(sc, SL11_CTRL) & SL11_CTRL_SUSPEND)
? "\20\x8""D+\7RESUME\6INSERT\5SOF\4res\3""BABBLE\2USBB\1USBA"
: "\20\x8""D+\7RESET\6INSERT\5SOF\4res\3""BABBLE\2USBB\1USBA",
bitbuf, sizeof(bitbuf));
DPRINTF(D_XFER, ("I=%s ", bitbuf));
#endif /* AHCI_DEBUG */
#endif
return 0;
}
usbd_status
ahci_open(usbd_pipe_handle pipe)
{
usbd_device_handle dev = pipe->device;
struct ahci_softc *sc = (struct ahci_softc *)dev->bus;
struct ahci_pipe *apipe = (struct ahci_pipe *)pipe;
usb_endpoint_descriptor_t *ed = pipe->endpoint->edesc;
DPRINTF(D_TRACE, ("ahci_open(addr=%d,ep=%d,scaddr=%d)",
dev->address, ed->bEndpointAddress, sc->sc_addr));
apipe->toggle=0;
if (dev->address == sc->sc_addr) {
switch (ed->bEndpointAddress) {
case USB_CONTROL_ENDPOINT:
pipe->methods = &ahci_root_ctrl_methods;
break;
case UE_DIR_IN | AHCI_INTR_ENDPT:
pipe->methods = &ahci_root_intr_methods;
break;
default:
printf("open:endpointErr!\n");
return USBD_INVAL;
}
} else {
switch (ed->bmAttributes & UE_XFERTYPE) {
case UE_CONTROL:
DPRINTF(D_MSG, ("control "));
pipe->methods = &ahci_device_ctrl_methods;
break;
case UE_INTERRUPT:
DPRINTF(D_MSG, ("interrupt "));
pipe->methods = &ahci_device_intr_methods;
break;
case UE_ISOCHRONOUS:
DPRINTF(D_MSG, ("isochronous "));
pipe->methods = &ahci_device_isoc_methods;
break;
case UE_BULK:
DPRINTF(D_MSG, ("bluk "));
pipe->methods = &ahci_device_bulk_methods;
break;
}
}
return USBD_NORMAL_COMPLETION;
}
void
ahci_softintr(void *arg)
{
DPRINTF(D_TRACE, ("%s()", __func__));
}
void
ahci_poll(struct usbd_bus *bus)
{
DPRINTF(D_TRACE, ("%s()", __func__));
}
/*
* Emulation of interrupt transfer for status change endpoint
* of root hub.
*/
void
ahci_poll_hub(void *arg)
{
usbd_xfer_handle xfer = arg;
usbd_pipe_handle pipe = xfer->pipe;
struct ahci_softc *sc = (struct ahci_softc *)pipe->device->bus;
int s;
u_char *p;
static int p0_state=0;
static int p1_state=0;
usb_callout(sc->sc_poll_handle, sc->sc_interval, ahci_poll_hub, xfer);
/* USB spec 11.13.3 (p.260) */
p = KERNADDR(&xfer->dmabuf, 0);
p[0] = 0;
if ((REG_READ(ADMHCD_REG_PORTSTATUS0) & ADMHCD_CCS) != p0_state) {
p[0] = 2;
DPRINTF(D_TRACE, ("!"));
p0_state=(REG_READ(ADMHCD_REG_PORTSTATUS0) & ADMHCD_CCS);
};
if ((REG_READ(ADMHCD_REG_PORTSTATUS1) & ADMHCD_CCS) != p1_state) {
p[0] = 2;
DPRINTF(D_TRACE, ("@"));
p1_state=(REG_READ(ADMHCD_REG_PORTSTATUS1) & ADMHCD_CCS);
};
/* no change, return NAK */
if (p[0] == 0)
return;
xfer->actlen = 1;
xfer->status = USBD_NORMAL_COMPLETION;
s = splusb();
xfer->device->bus->intr_context++;
usb_transfer_complete(xfer);
xfer->device->bus->intr_context--;
splx(s);
}
usbd_status
ahci_allocm(struct usbd_bus *bus, usb_dma_t *dma, u_int32_t size)
{
struct ahci_softc *sc = (struct ahci_softc *)bus;
DPRINTF(D_MEM, ("SLallocm"));
return usb_allocmem(&sc->sc_bus, size, 0, dma);
}
void
ahci_freem(struct usbd_bus *bus, usb_dma_t *dma)
{
struct ahci_softc *sc = (struct ahci_softc *)bus;
DPRINTF(D_MEM, ("SLfreem"));
usb_freemem(&sc->sc_bus, dma);
}
usbd_xfer_handle
ahci_allocx(struct usbd_bus *bus)
{
struct ahci_softc *sc = (struct ahci_softc *)bus;
usbd_xfer_handle xfer;
DPRINTF(D_MEM, ("SLallocx"));
xfer = SIMPLEQ_FIRST(&sc->sc_free_xfers);
if (xfer) {
SIMPLEQ_REMOVE_HEAD(&sc->sc_free_xfers, next);
#ifdef DIAGNOSTIC
if (xfer->busy_free != XFER_FREE) {
printf("ahci_allocx: xfer=%p not free, 0x%08x\n",
xfer, xfer->busy_free);
}
#endif
} else {
xfer = malloc(sizeof(*xfer), M_USB, M_NOWAIT);
}
if (xfer) {
memset(xfer, 0, sizeof(*xfer));
#ifdef DIAGNOSTIC
xfer->busy_free = XFER_BUSY;
#endif
}
return xfer;
}
void
ahci_freex(struct usbd_bus *bus, usbd_xfer_handle xfer)
{
struct ahci_softc *sc = (struct ahci_softc *)bus;
DPRINTF(D_MEM, ("SLfreex"));
#ifdef DIAGNOSTIC
if (xfer->busy_free != XFER_BUSY) {
printf("ahci_freex: xfer=%p not busy, 0x%08x\n",
xfer, xfer->busy_free);
return;
}
xfer->busy_free = XFER_FREE;
#endif
SIMPLEQ_INSERT_HEAD(&sc->sc_free_xfers, xfer, next);
}
void
ahci_noop(usbd_pipe_handle pipe)
{
DPRINTF(D_TRACE, ("%s()", __func__));
}
/*
* Data structures and routines to emulate the root hub.
*/
usb_device_descriptor_t ahci_devd = {
USB_DEVICE_DESCRIPTOR_SIZE,
UDESC_DEVICE, /* type */
{0x01, 0x01}, /* USB version */
UDCLASS_HUB, /* class */
UDSUBCLASS_HUB, /* subclass */
0, /* protocol */
64, /* max packet */
{USB_VENDOR_SCANLOGIC & 0xff, /* vendor ID (low) */
USB_VENDOR_SCANLOGIC >> 8 }, /* vendor ID (high) */
{0} /* ? */, /* product ID */
{0}, /* device */
1, /* index to manufacturer */
2, /* index to product */
0, /* index to serial number */
1 /* number of configurations */
};
usb_config_descriptor_t ahci_confd = {
USB_CONFIG_DESCRIPTOR_SIZE,
UDESC_CONFIG,
{USB_CONFIG_DESCRIPTOR_SIZE +
USB_INTERFACE_DESCRIPTOR_SIZE +
USB_ENDPOINT_DESCRIPTOR_SIZE},
1, /* number of interfaces */
1, /* configuration value */
0, /* index to configuration */
UC_SELF_POWERED, /* attributes */
250 /* max current is 500mA... */
};
usb_interface_descriptor_t ahci_ifcd = {
USB_INTERFACE_DESCRIPTOR_SIZE,
UDESC_INTERFACE,
0, /* interface number */
0, /* alternate setting */
1, /* number of endpoint */
UICLASS_HUB, /* class */
UISUBCLASS_HUB, /* subclass */
0, /* protocol */
0 /* index to interface */
};
usb_endpoint_descriptor_t ahci_endpd = {
USB_ENDPOINT_DESCRIPTOR_SIZE,
UDESC_ENDPOINT,
UE_DIR_IN | AHCI_INTR_ENDPT, /* endpoint address */
UE_INTERRUPT, /* attributes */
{8}, /* max packet size */
255 /* interval */
};
usb_hub_descriptor_t ahci_hubd = {
USB_HUB_DESCRIPTOR_SIZE,
UDESC_HUB,
2, /* number of ports */
{ 0, 0}, /* hub characteristics */
0, /* 5:power on to power good */
0, /* 6:maximum current */
{ 0x00 }, /* both ports are removable */
{ 0x00 } /* port power control mask */
};
static int
ahci_str(usb_string_descriptor_t *p, int l, const char *s)
{
int i;
if (l == 0)
return 0;
p->bLength = 2 * strlen(s) + 2;
if (l == 1)
return 1;
p->bDescriptorType = UDESC_STRING;
l -= 2;
for (i = 0; s[i] && l > 1; i++, l -= 2)
USETW2(p->bString[i], 0, s[i]);
return 2 * i + 2;
}
usbd_status
ahci_root_ctrl_transfer(usbd_xfer_handle xfer)
{
usbd_status error;
DPRINTF(D_TRACE, ("SLRCtrans "));
/* Insert last in queue */
error = usb_insert_transfer(xfer);
if (error) {
DPRINTF(D_MSG, ("usb_insert_transfer returns err! "));
return error;
}
/*
* Pipe isn't running (otherwise error would be USBD_INPROG),
* so start it first.
*/
return ahci_root_ctrl_start(SIMPLEQ_FIRST(&xfer->pipe->queue));
}
usbd_status
ahci_root_ctrl_start(usbd_xfer_handle xfer)
{
struct ahci_softc *sc = (struct ahci_softc *)xfer->pipe->device->bus;
usb_device_request_t *req;
int len, value, index, l, s, status;
int totlen = 0;
void *buf = NULL;
usb_port_status_t ps;
usbd_status error;
DPRINTF(D_TRACE, ("SLRCstart "));
req = &xfer->request;
len = UGETW(req->wLength);
value = UGETW(req->wValue);
index = UGETW(req->wIndex);
if (len)
buf = KERNADDR(&xfer->dmabuf, 0);
#ifdef AHCI_DEBUG
if ((ahci_debug & D_TRACE))
print_req_hub(req);
#endif
#define C(x,y) ((x) | ((y) << 8))
switch (C(req->bRequest, req->bmRequestType)) {
case C(UR_CLEAR_FEATURE, UT_WRITE_DEVICE):
DPRINTF(D_MSG, ("UR_CLEAR_FEATURE(DEVICE)XXX "));
break;
case C(UR_CLEAR_FEATURE, UT_WRITE_INTERFACE):
DPRINTF(D_MSG, ("UR_CLEAR_FEATURE(INTERFACE)XXX "));
break;
case C(UR_CLEAR_FEATURE, UT_WRITE_ENDPOINT):
DPRINTF(D_MSG, ("UR_CLEAR_FEATURE(ENDPOINT)XXX "));
break;
case C(UR_GET_CONFIG, UT_READ_DEVICE):
DPRINTF(D_MSG, ("UR_GET_CONFIG "));
if (len > 0) {
*(u_int8_t *)buf = sc->sc_conf;
totlen = 1;
}
break;
case C(UR_GET_DESCRIPTOR, UT_READ_DEVICE):
switch (value >> 8) {
case UDESC_DEVICE:
DPRINTF(D_MSG, ("UDESC_DEVICE "));
if ((value & 0xff) != 0) {
error = USBD_IOERROR;
goto ret;
}
totlen = l = min(len, USB_DEVICE_DESCRIPTOR_SIZE);
memcpy(buf, &ahci_devd, l);
break;
case UDESC_CONFIG:
DPRINTF(D_MSG, ("UDESC_CONFIG "));
if ((value & 0xff) != 0) {
error = USBD_IOERROR;
goto ret;
}
totlen = l = min(len, USB_CONFIG_DESCRIPTOR_SIZE);
memcpy(buf, &ahci_confd, l);
buf = (char *)buf + l;
len -= l;
l = min(len, USB_INTERFACE_DESCRIPTOR_SIZE);
totlen += l;
memcpy(buf, &ahci_ifcd, l);
buf = (char *)buf + l;
len -= l;
l = min(len, USB_ENDPOINT_DESCRIPTOR_SIZE);
totlen += l;
memcpy(buf, &ahci_endpd, l);
break;
case UDESC_STRING:
DPRINTF(D_MSG, ("UDESC_STR "));
if (len == 0)
break;
*(u_int8_t *)buf = 0;
totlen = 1;
switch (value & 0xff) {
case 0:
break;
case 1: /* Vendor */
totlen = ahci_str(buf, len, "ADMTek");
break;
case 2: /* Product */
totlen = ahci_str(buf, len, "ADM5120 root hub");
break;
default:
printf("strerr%d ", value & 0xff);
break;
}
break;
default:
printf("unknownGetDescriptor=%x", value);
error = USBD_IOERROR;
break;
}
break;
case C(UR_GET_INTERFACE, UT_READ_INTERFACE):
/* Get Interface, 9.4.4 */
if (len > 0) {
*(u_int8_t *)buf = 0;
totlen = 1;
}
break;
case C(UR_GET_STATUS, UT_READ_DEVICE):
/* Get Status from device, 9.4.5 */
if (len > 1) {
USETW(((usb_status_t *)buf)->wStatus, UDS_SELF_POWERED);
totlen = 2;
}
break;
case C(UR_GET_STATUS, UT_READ_INTERFACE):
case C(UR_GET_STATUS, UT_READ_ENDPOINT):
/* Get Status from interface, endpoint, 9.4.5 */
if (len > 1) {
USETW(((usb_status_t *)buf)->wStatus, 0);
totlen = 2;
}
break;
case C(UR_SET_ADDRESS, UT_WRITE_DEVICE):
/* Set Address, 9.4.6 */
DPRINTF(D_MSG, ("UR_SET_ADDRESS "));
if (value >= USB_MAX_DEVICES) {
error = USBD_IOERROR;
goto ret;
}
sc->sc_addr = value;
break;
case C(UR_SET_CONFIG, UT_WRITE_DEVICE):
/* Set Configuration, 9.4.7 */
DPRINTF(D_MSG, ("UR_SET_CONFIG "));
if (value != 0 && value != 1) {
error = USBD_IOERROR;
goto ret;
}
sc->sc_conf = value;
break;
case C(UR_SET_DESCRIPTOR, UT_WRITE_DEVICE):
/* Set Descriptor, 9.4.8, not supported */
DPRINTF(D_MSG, ("UR_SET_DESCRIPTOR,WRITE_DEVICE not supported\n"));
break;
case C(UR_SET_FEATURE, UT_WRITE_DEVICE):
case C(UR_SET_FEATURE, UT_WRITE_INTERFACE):
case C(UR_SET_FEATURE, UT_WRITE_ENDPOINT):
/* Set Feature, 9.4.9, not supported */
DPRINTF(D_MSG, ("UR_SET_FEATURE not supported\n"));
error = USBD_IOERROR;
break;
case C(UR_SET_INTERFACE, UT_WRITE_INTERFACE):
/* Set Interface, 9.4.10, not supported */
break;
case C(UR_SYNCH_FRAME, UT_WRITE_ENDPOINT):
/* Synch Frame, 9.4.11, not supported */
break;
/*
* Hub specific requests
*/
case C(UR_CLEAR_FEATURE, UT_WRITE_CLASS_DEVICE):
/* Clear Hub Feature, 11.16.2.1, not supported */
DPRINTF(D_MSG, ("ClearHubFeature not supported\n"));
break;
case C(UR_CLEAR_FEATURE, UT_WRITE_CLASS_OTHER):
#define WPS(x) REG_WRITE(ADMHCD_REG_PORTSTATUS0+(index-1)*4, (x))
/* Clear Port Feature, 11.16.2.2 */
if (index != 1 && index != 2 ) {
error = USBD_IOERROR;
goto ret;
}
switch (value) {
case UHF_PORT_POWER:
DPRINTF(D_MSG, ("POWER_OFF "));
WPS(ADMHCD_LSDA);
break;
case UHF_PORT_SUSPEND:
DPRINTF(D_MSG, ("SUSPEND "));
WPS(ADMHCD_POCI);
break;
case UHF_PORT_ENABLE:
DPRINTF(D_MSG, ("ENABLE "));
WPS(ADMHCD_CCS);
break;
case UHF_C_PORT_CONNECTION:
WPS(ADMHCD_CSC);
break;
case UHF_C_PORT_RESET:
WPS(ADMHCD_PRSC);
break;
case UHF_C_PORT_SUSPEND:
WPS(ADMHCD_PSSC);
break;
case UHF_C_PORT_ENABLE:
WPS(ADMHCD_PESC);
break;
case UHF_C_PORT_OVER_CURRENT:
WPS(ADMHCD_OCIC);
break;
default:
printf("ClrPortFeatERR:value=0x%x ", value);
error = USBD_IOERROR;
break;
}
//DPRINTF(D_XFER, ("CH=%04x ", sc->sc_change));
#undef WPS
break;
case C(UR_GET_BUS_STATE, UT_READ_CLASS_OTHER):
/* Get Bus State, 11.16.2.3, not supported */
/* shall return a STALL... */
break;
case C(UR_GET_DESCRIPTOR, UT_READ_CLASS_DEVICE):
/* Get Hub Descriptor, 11.16.2.4 */
DPRINTF(D_MSG, ("UR_GET_DESCRIPTOR RCD"));
if ((value&0xff) != 0) {
error = USBD_IOERROR;
goto ret;
}
l = min(len, USB_HUB_DESCRIPTOR_SIZE);
totlen = l;
memcpy(buf, &ahci_hubd, l);
break;
case C(UR_GET_STATUS, UT_READ_CLASS_DEVICE):
/* Get Hub Status, 11.16.2.5 */
DPRINTF(D_MSG, ("UR_GET_STATUS RCD"));
if (len != 4) {
error = USBD_IOERROR;
goto ret;
}
memset(buf, 0, len);
totlen = len;
break;
case C(UR_GET_STATUS, UT_READ_CLASS_OTHER):
/* Get Port Status, 11.16.2.6 */
if ((index != 1 && index != 2) || len != 4) {
printf("index=%d,len=%d ", index, len);
error = USBD_IOERROR;
goto ret;
}
status = REG_READ(ADMHCD_REG_PORTSTATUS0+(index-1)*4);
DPRINTF(D_MSG, ("UR_GET_STATUS RCO=%x ", status));
//DPRINTF(D_XFER, ("ST=%04x,CH=%04x ", status, sc->sc_change));
USETW(ps.wPortStatus, status & (UPS_CURRENT_CONNECT_STATUS|UPS_PORT_ENABLED|UPS_SUSPEND|UPS_OVERCURRENT_INDICATOR|UPS_RESET|UPS_PORT_POWER|UPS_LOW_SPEED));
USETW(ps.wPortChange, (status>>16) & (UPS_C_CONNECT_STATUS|UPS_C_PORT_ENABLED|UPS_C_SUSPEND|UPS_C_OVERCURRENT_INDICATOR|UPS_C_PORT_RESET));
l = min(len, sizeof(ps));
memcpy(buf, &ps, l);
totlen = l;
break;
case C(UR_SET_DESCRIPTOR, UT_WRITE_CLASS_DEVICE):
/* Set Hub Descriptor, 11.16.2.7, not supported */
/* STALL ? */
error = USBD_IOERROR;
break;
case C(UR_SET_FEATURE, UT_WRITE_CLASS_DEVICE):
/* Set Hub Feature, 11.16.2.8, not supported */
break;
case C(UR_SET_FEATURE, UT_WRITE_CLASS_OTHER):
#define WPS(x) REG_WRITE(ADMHCD_REG_PORTSTATUS0+(index-1)*4, (x))
/* Set Port Feature, 11.16.2.9 */
if ((index != 1) && (index !=2)) {
printf("index=%d ", index);
error = USBD_IOERROR;
goto ret;
}
switch (value) {
case UHF_PORT_RESET:
DPRINTF(D_MSG, ("PORT_RESET "));
WPS(ADMHCD_PRS);
break;
case UHF_PORT_POWER:
DPRINTF(D_MSG, ("PORT_POWER "));
WPS(ADMHCD_PPS);
break;
case UHF_PORT_ENABLE:
DPRINTF(D_MSG, ("PORT_ENABLE "));
WPS(ADMHCD_PES);
break;
default:
printf("SetPortFeatERR=0x%x ", value);
error = USBD_IOERROR;
break;
}
#undef WPS
break;
default:
DPRINTF(D_MSG, ("ioerr(UR=%02x,UT=%02x) ",
req->bRequest, req->bmRequestType));
error = USBD_IOERROR;
goto ret;
}
xfer->actlen = totlen;
error = USBD_NORMAL_COMPLETION;
ret:
xfer->status = error;
s = splusb();
usb_transfer_complete(xfer);
splx(s);
return USBD_IN_PROGRESS;
}
void
ahci_root_ctrl_abort(usbd_xfer_handle xfer)
{
DPRINTF(D_TRACE, ("SLRCabort "));
}
void
ahci_root_ctrl_close(usbd_pipe_handle pipe)
{
DPRINTF(D_TRACE, ("SLRCclose "));
}
void
ahci_root_ctrl_done(usbd_xfer_handle xfer)
{
DPRINTF(D_TRACE, ("SLRCdone\n"));
}
static usbd_status
ahci_root_intr_transfer(usbd_xfer_handle xfer)
{
usbd_status error;
DPRINTF(D_TRACE, ("SLRItransfer "));
/* Insert last in queue */
error = usb_insert_transfer(xfer);
if (error)
return error;
/*
* Pipe isn't running (otherwise error would be USBD_INPROG),
* start first.
*/
return ahci_root_intr_start(SIMPLEQ_FIRST(&xfer->pipe->queue));
}
static usbd_status
ahci_root_intr_start(usbd_xfer_handle xfer)
{
usbd_pipe_handle pipe = xfer->pipe;
struct ahci_softc *sc = (struct ahci_softc *)pipe->device->bus;
DPRINTF(D_TRACE, ("SLRIstart "));
sc->sc_interval = MS_TO_TICKS(xfer->pipe->endpoint->edesc->bInterval);
usb_callout(sc->sc_poll_handle, sc->sc_interval, ahci_poll_hub, xfer);
sc->sc_intr_xfer = xfer;
return USBD_IN_PROGRESS;
}
static void
ahci_root_intr_abort(usbd_xfer_handle xfer)
{
DPRINTF(D_TRACE, ("SLRIabort "));
}
static void
ahci_root_intr_close(usbd_pipe_handle pipe)
{
struct ahci_softc *sc = (struct ahci_softc *)pipe->device->bus;
DPRINTF(D_TRACE, ("SLRIclose "));
usb_uncallout(sc->sc_poll_handle, ahci_poll_hub, sc->sc_intr_xfer);
sc->sc_intr_xfer = NULL;
}
static void
ahci_root_intr_done(usbd_xfer_handle xfer)
{
//DPRINTF(D_XFER, ("RIdn "));
}
static usbd_status
ahci_device_ctrl_transfer(usbd_xfer_handle xfer)
{
usbd_status error;
DPRINTF(D_TRACE, ("C"));
error = usb_insert_transfer(xfer);
if (error)
return error;
return ahci_device_ctrl_start(SIMPLEQ_FIRST(&xfer->pipe->queue));
}
static usbd_status
ahci_device_ctrl_start(usbd_xfer_handle xfer)
{
usbd_status status = USBD_NORMAL_COMPLETION;
int s, err;
static struct admhcd_ed ep_v __attribute__((aligned(16))), *ep;
static struct admhcd_td td_v[4] __attribute__((aligned(16))), *td, *td1, *td2, *td3;
static usb_dma_t reqdma;
usbd_pipe_handle pipe = xfer->pipe;
usb_device_request_t *req = &xfer->request;
struct ahci_softc *sc = (struct ahci_softc *)pipe->device->bus;
int len, isread;
#if 0
struct ahci_pipe *apipe = (struct ahci_pipe *)xfer->pipe;
#endif
while (sc->busy) {
delay_ms(10);
};
sc->busy++;
/* printf("ctrl_start>>>\n"); */
#ifdef DIAGNOSTIC
if (!(xfer->rqflags & URQ_REQUEST)) {
/* XXX panic */
printf("ahci_device_ctrl_transfer: not a request\n");
return (USBD_INVAL);
}
#endif
#define KSEG1ADDR(x) (0xa0000000 | (((u_int32_t)x) & 0x1fffffff))
DPRINTF(D_TRACE, ("st "));
if (!ep) {
ep = (struct admhcd_ed *)KSEG1ADDR(&ep_v);
td = (struct admhcd_td *)KSEG1ADDR(&td_v[0]);
td1 = (struct admhcd_td *)KSEG1ADDR(&td_v[1]);
td2 = (struct admhcd_td *)KSEG1ADDR(&td_v[2]);
td3 = (struct admhcd_td *)KSEG1ADDR(&td_v[3]);
err = usb_allocmem(&sc->sc_bus,
sizeof(usb_device_request_t),
0, &reqdma);
if (err)
return (USBD_NOMEM);
/* printf("ep: %p\n",ep); */
};
ep->control = pipe->device->address | \
((pipe->device->speed==USB_SPEED_FULL)?ADMHCD_ED_SPEED:0) | \
((UGETW(pipe->endpoint->edesc->wMaxPacketSize))<<ADMHCD_ED_MAXSHIFT);
memcpy(KERNADDR(&reqdma, 0), req, sizeof *req);
/* printf("status: %x\n",REG_READ(ADMHCD_REG_PORTSTATUS0));
printf("ep_control: %x\n",ep->control);
printf("speed: %x\n",pipe->device->speed);
printf("req: %p\n",req);
printf("dmabuf: %p\n",xfer->dmabuf.block); */
isread = req->bmRequestType & UT_READ;
len = UGETW(req->wLength);
ep->next = ep;
td->buffer = DMAADDR(&reqdma,0) | 0xa0000000;
td->buflen=sizeof(*req);
td->control=ADMHCD_TD_SETUP | ADMHCD_TD_DATA0 | ADMHCD_TD_OWN;
if (len) {
td->next = td1;
td1->buffer = DMAADDR(&xfer->dmabuf,0) | 0xa0000000;
td1->buflen = len;
td1->next = td2;
td1->control= (isread?ADMHCD_TD_IN:ADMHCD_TD_OUT) | ADMHCD_TD_DATA1 | ADMHCD_TD_R | ADMHCD_TD_OWN;
} else {
td1->control = 0;
td->next = td2;
};
td2->buffer = 0;
td2->buflen= 0;
td2->next = td3;
td2->control = (isread?ADMHCD_TD_OUT:ADMHCD_TD_IN) | ADMHCD_TD_DATA1 | ADMHCD_TD_OWN;
td3->buffer = 0;
td3->buflen= 0;
td3->next = 0;
td3->control = 0;
ep->head = td;
ep->tail = td3;
/*
printf("ep: %p\n",ep);
printf("ep->next: %p\n",ep->next);
printf("ep->head: %p\n",ep->head);
printf("ep->tail: %p\n",ep->tail);
printf("td: %p\n",td);
printf("td->next: %p\n",td->next);
printf("td->buffer: %x\n",td->buffer);
printf("td->buflen: %x\n",td->buflen);
printf("td1: %p\n",td1);
printf("td1->next: %p\n",td1->next);
printf("td2: %p\n",td2);
printf("td2->next: %p\n",td2->next);
printf("td3: %p\n",td3);
printf("td3->next: %p\n",td3->next);
*/
REG_WRITE(ADMHCD_REG_HOSTHEAD, (u_int32_t)ep);
REG_WRITE(ADMHCD_REG_HOSTCONTROL, ADMHCD_STATE_OP | ADMHCD_DMA_EN);
/* printf("1: %x %x %x %x\n", ep->control, td->control, td1->control, td2->control); */
s=100;
while (s--) {
delay_ms(10);
/* printf("%x %x %x %x\n", ep->control, td->control, td1->control, td2->control);*/
status = USBD_TIMEOUT;
if (td->control & ADMHCD_TD_OWN) continue;
err = (td->control & ADMHCD_TD_ERRMASK)>>ADMHCD_TD_ERRSHIFT;
if (err) {
status = USBD_IOERROR;
break;
};
status = USBD_TIMEOUT;
if (td1->control & ADMHCD_TD_OWN) continue;
err = (td1->control & ADMHCD_TD_ERRMASK)>>ADMHCD_TD_ERRSHIFT;
if (err) {
status = USBD_IOERROR;
break;
};
status = USBD_TIMEOUT;
if (td2->control & ADMHCD_TD_OWN) continue;
err = (td2->control & ADMHCD_TD_ERRMASK)>>ADMHCD_TD_ERRSHIFT;
if (err) {
status = USBD_IOERROR;
};
status = USBD_NORMAL_COMPLETION;
break;
};
REG_WRITE(ADMHCD_REG_HOSTCONTROL, ADMHCD_STATE_OP);
xfer->actlen = len;
xfer->status = status;
sc->busy--;
/* printf("ctrl_start<<<\n"); */
s = splusb();
usb_transfer_complete(xfer);
splx(s);
return USBD_IN_PROGRESS;
}
static void
ahci_device_ctrl_abort(usbd_xfer_handle xfer)
{
DPRINTF(D_TRACE, ("Cab "));
ahci_abort_xfer(xfer, USBD_CANCELLED);
}
static void
ahci_device_ctrl_close(usbd_pipe_handle pipe)
{
DPRINTF(D_TRACE, ("Ccl "));
}
static void
ahci_device_ctrl_done(usbd_xfer_handle xfer)
{
DPRINTF(D_TRACE, ("Cdn "));
}
static usbd_status
ahci_device_intr_transfer(usbd_xfer_handle xfer)
{
usbd_status error;
DPRINTF(D_TRACE, ("INTRtrans "));
error = usb_insert_transfer(xfer);
if (error)
return error;
return ahci_device_intr_start(SIMPLEQ_FIRST(&xfer->pipe->queue));
}
static usbd_status
ahci_device_intr_start(usbd_xfer_handle xfer)
{
usbd_pipe_handle pipe = xfer->pipe;
struct ahci_xfer *sx;
DPRINTF(D_TRACE, ("INTRstart "));
sx = malloc(sizeof(*sx), M_USB, M_NOWAIT);
if (sx == NULL)
goto reterr;
memset(sx, 0, sizeof(*sx));
sx->sx_xfer = xfer;
xfer->hcpriv = sx;
/* initialize callout */
usb_callout_init(sx->sx_callout_t);
usb_callout(sx->sx_callout_t,
MS_TO_TICKS(pipe->endpoint->edesc->bInterval),
ahci_poll_device, sx);
/* ACK */
return USBD_IN_PROGRESS;
reterr:
return USBD_IOERROR;
}
static void
ahci_poll_device(void *arg)
{
struct ahci_xfer *sx = (struct ahci_xfer *)arg;
usbd_xfer_handle xfer = sx->sx_xfer;
usbd_pipe_handle pipe = xfer->pipe;
struct ahci_softc *sc = (struct ahci_softc *)pipe->device->bus;
void *buf;
int pid;
int r;
int s;
DPRINTF(D_TRACE, ("pldev"));
usb_callout(sx->sx_callout_t,
MS_TO_TICKS(pipe->endpoint->edesc->bInterval),
ahci_poll_device, sx);
/* interrupt transfer */
pid = (UE_GET_DIR(pipe->endpoint->edesc->bEndpointAddress) == UE_DIR_IN)
? ADMHCD_TD_IN : ADMHCD_TD_OUT;
buf = KERNADDR(&xfer->dmabuf, 0);
r = ahci_transaction(sc, pipe, pid, xfer->length, buf, 0/*toggle*/);
if (r < 0) {
DPRINTF(D_MSG, ("%s error", __func__));
return;
}
/* no change, return NAK */
if (r == 0)
return;
xfer->status = USBD_NORMAL_COMPLETION;
s = splusb();
xfer->device->bus->intr_context++;
usb_transfer_complete(xfer);
xfer->device->bus->intr_context--;
splx(s);
}
static void
ahci_device_intr_abort(usbd_xfer_handle xfer)
{
struct ahci_xfer *sx;
DPRINTF(D_TRACE, ("INTRabort "));
sx = xfer->hcpriv;
if (sx) {
usb_uncallout(sx->sx_callout_t, ahci_poll_device, sx);
free(sx, M_USB);
xfer->hcpriv = NULL;
} else {
printf("%s: sx == NULL!\n", __func__);
}
ahci_abort_xfer(xfer, USBD_CANCELLED);
}
static void
ahci_device_intr_close(usbd_pipe_handle pipe)
{
DPRINTF(D_TRACE, ("INTRclose "));
}
static void
ahci_device_intr_done(usbd_xfer_handle xfer)
{
DPRINTF(D_TRACE, ("INTRdone "));
}
static usbd_status
ahci_device_isoc_transfer(usbd_xfer_handle xfer)
{
DPRINTF(D_TRACE, ("S"));
return USBD_NORMAL_COMPLETION;
}
static usbd_status
ahci_device_isoc_start(usbd_xfer_handle xfer)
{
DPRINTF(D_TRACE, ("st "));
return USBD_NORMAL_COMPLETION;
}
static void
ahci_device_isoc_abort(usbd_xfer_handle xfer)
{
DPRINTF(D_TRACE, ("Sab "));
}
static void
ahci_device_isoc_close(usbd_pipe_handle pipe)
{
DPRINTF(D_TRACE, ("Scl "));
}
static void
ahci_device_isoc_done(usbd_xfer_handle xfer)
{
DPRINTF(D_TRACE, ("Sdn "));
}
static usbd_status
ahci_device_bulk_transfer(usbd_xfer_handle xfer)
{
usbd_status error;
DPRINTF(D_TRACE, ("B"));
error = usb_insert_transfer(xfer);
if (error)
return error;
return ahci_device_bulk_start(SIMPLEQ_FIRST(&xfer->pipe->queue));
}
static usbd_status
ahci_device_bulk_start(usbd_xfer_handle xfer)
{
#define NBULK_TDS 32
static volatile int level = 0;
usbd_status status = USBD_NORMAL_COMPLETION;
int s, err;
static struct admhcd_ed ep_v __attribute__((aligned(16))), *ep;
static struct admhcd_td td_v[NBULK_TDS] __attribute__((aligned(16))), *td[NBULK_TDS];
usbd_pipe_handle pipe = xfer->pipe;
struct ahci_softc *sc = (struct ahci_softc *)pipe->device->bus;
int endpt, i, len, tlen, segs, offset, isread, toggle, short_ok;
struct ahci_pipe *apipe = (struct ahci_pipe *)xfer->pipe;
#define KSEG1ADDR(x) (0xa0000000 | (((u_int32_t)x) & 0x1fffffff))
DPRINTF(D_TRACE, ("st "));
#ifdef DIAGNOSTIC
if (xfer->rqflags & URQ_REQUEST) {
/* XXX panic */
printf("ohci_device_bulk_start: a request\n");
return (USBD_INVAL);
}
#endif
while (sc->busy) {
delay_ms(10);
};
sc->busy++;
level++;
/* printf("bulk_start>>>\n"); */
if (!ep) {
ep = (struct admhcd_ed *)KSEG1ADDR(&ep_v);
for (i=0; i<NBULK_TDS; i++) {
td[i] = (struct admhcd_td *)KSEG1ADDR(&td_v[i]);
};
/* printf("ep: %p\n",ep);*/
};
if (apipe->toggle == 0) {
toggle = ADMHCD_TD_DATA0;
} else {
toggle = apipe->toggle;
};
endpt = pipe->endpoint->edesc->bEndpointAddress;
ep->control = pipe->device->address | ((endpt & 0xf) << ADMHCD_ED_EPSHIFT)|\
((pipe->device->speed==USB_SPEED_FULL)?ADMHCD_ED_SPEED:0) | \
((UGETW(pipe->endpoint->edesc->wMaxPacketSize))<<ADMHCD_ED_MAXSHIFT);
short_ok = xfer->flags & USBD_SHORT_XFER_OK?ADMHCD_TD_R:0;
/* printf("level: %d\n",level);
printf("short_xfer: %x\n",short_ok);
printf("ep_control: %x\n",ep->control);
printf("speed: %x\n",pipe->device->speed);
printf("dmabuf: %p\n",xfer->dmabuf.block); */
isread = UE_GET_DIR(endpt) == UE_DIR_IN;
len = xfer->length;
ep->next = ep;
i = 0;
offset = 0;
while ((len>0) || (i==0)) {
tlen = min(len,4096);
td[i]->buffer = DMAADDR(&xfer->dmabuf,offset) | 0xa0000000;
td[i]->buflen=tlen;
td[i]->control=(isread?ADMHCD_TD_IN:ADMHCD_TD_OUT) | toggle | ADMHCD_TD_OWN | short_ok;
td[i]->len=tlen;
toggle = ADMHCD_TD_TOGGLE;
len -= tlen;
offset += tlen;
td[i]->next = td[i+1];
i++;
};
td[i]->buffer = 0;
td[i]->buflen = 0;
td[i]->control = 0;
td[i]->next = 0;
ep->head = td[0];
ep->tail = td[i];
segs = i;
len = 0;
/* printf("segs: %d\n",segs);
printf("ep: %p\n",ep);
printf("ep->control: %x\n",ep->control);
printf("ep->next: %p\n",ep->next);
printf("ep->head: %p\n",ep->head);
printf("ep->tail: %p\n",ep->tail);
for (i=0; i<segs; i++) {
printf("td[%d]: %p\n",i,td[i]);
printf("td[%d]->control: %x\n",i,td[i]->control);
printf("td[%d]->next: %p\n",i,td[i]->next);
printf("td[%d]->buffer: %x\n",i,td[i]->buffer);
printf("td[%d]->buflen: %x\n",i,td[i]->buflen);
}; */
REG_WRITE(ADMHCD_REG_HOSTHEAD, (u_int32_t)ep);
REG_WRITE(ADMHCD_REG_HOSTCONTROL, ADMHCD_STATE_OP | ADMHCD_DMA_EN);
i = 0;
/* printf("1: %x %d %x %x\n", ep->control, i, td[i]->control, td[i]->buflen); */
s=100;
err = 0;
while (s--) {
/* printf("%x %d %x %x\n", ep->control, i, td[i]->control, td[i]->buflen); */
status = USBD_TIMEOUT;
if (td[i]->control & ADMHCD_TD_OWN) {
delay_ms(3);
continue;
};
len += td[i]->len - td[i]->buflen;
err = (td[i]->control & ADMHCD_TD_ERRMASK)>>ADMHCD_TD_ERRSHIFT;
if (err) {
status = USBD_IOERROR;
break;
};
i++;
if (i==segs) {
status = USBD_NORMAL_COMPLETION;
break;
};
};
REG_WRITE(ADMHCD_REG_HOSTCONTROL, ADMHCD_STATE_OP);
apipe->toggle = ((u_int32_t)ep->head & 2)?ADMHCD_TD_DATA1:ADMHCD_TD_DATA0;
/* printf("bulk_transfer_done: status: %x, err: %x, len: %x, toggle: %x\n", status,err,len,apipe->toggle); */
if (short_ok && (err == 0x9 || err == 0xd)) {
/* printf("bulk_transfer_done: short_transfer fix\n"); */
status = USBD_NORMAL_COMPLETION;
};
xfer->actlen = len;
xfer->status = status;
level--;
sc->busy--;
/* printf("bulk_start<<<\n"); */
s = splusb();
usb_transfer_complete(xfer);
splx(s);
return USBD_IN_PROGRESS;
}
static void
ahci_device_bulk_abort(usbd_xfer_handle xfer)
{
DPRINTF(D_TRACE, ("Bab "));
ahci_abort_xfer(xfer, USBD_CANCELLED);
}
static void
ahci_device_bulk_close(usbd_pipe_handle pipe)
{
DPRINTF(D_TRACE, ("Bcl "));
}
static void
ahci_device_bulk_done(usbd_xfer_handle xfer)
{
DPRINTF(D_TRACE, ("Bdn "));
}
#define DATA0_RD (0x03)
#define DATA0_WR (0x07)
#define AHCI_TIMEOUT (5000)
/*
* Do a transaction.
* return 1 if ACK, 0 if NAK, -1 if error.
*/
static int
ahci_transaction(struct ahci_softc *sc, usbd_pipe_handle pipe,
u_int8_t pid, int len, u_char *buf, u_int8_t toggle)
{
return -1;
#if 0
#ifdef AHCI_DEBUG
char str[64];
int i;
#endif
int timeout;
int ls_via_hub = 0;
int pl;
u_int8_t isr;
u_int8_t result = 0;
u_int8_t devaddr = pipe->device->address;
u_int8_t endpointaddr = pipe->endpoint->edesc->bEndpointAddress;
u_int8_t endpoint;
u_int8_t cmd = DATA0_RD;
endpoint = UE_GET_ADDR(endpointaddr);
DPRINTF(D_XFER, ("\n(%x,%d%s%d,%d) ",
pid, len, (pid == SL11_PID_IN) ? "<-" : "->", devaddr, endpoint));
/* Set registers */
sl11write(sc, SL11_E0ADDR, 0x40);
sl11write(sc, SL11_E0LEN, len);
sl11write(sc, SL11_E0PID, (pid << 4) + endpoint);
sl11write(sc, SL11_E0DEV, devaddr);
/* Set buffer unless PID_IN */
if (pid != SL11_PID_IN) {
if (len > 0)
sl11write_region(sc, 0x40, buf, len);
cmd = DATA0_WR;
}
/* timing ? */
pl = (len >> 3) + 3;
/* Low speed device via HUB */
/* XXX does not work... */
if ((sc->sc_fullspeed) && pipe->device->speed == USB_SPEED_LOW) {
pl = len + 16;
cmd |= SL11_EPCTRL_PREAMBLE;
/*
* SL811HS/T rev 1.2 has a bug, when it got PID_IN
* from LowSpeed device via HUB.
*/
if (sc->sc_sltype == SLTYPE_SL811HS_R12 && pid == SL11_PID_IN) {
ls_via_hub = 1;
DPRINTF(D_MSG, ("LSvH "));
}
}
/* timing ? */
if (sl11read(sc, SL811_CSOF) <= (u_int8_t)pl)
cmd |= SL11_EPCTRL_SOF;
/* Transfer */
sl11write(sc, SL11_ISR, 0xff);
sl11write(sc, SL11_E0CTRL, cmd | toggle);
/* Polling */
for (timeout = AHCI_TIMEOUT; timeout; timeout--) {
isr = sl11read(sc, SL11_ISR);
if ((isr & SL11_ISR_USBA))
break;
}
/* Check result status */
result = sl11read(sc, SL11_E0STAT);
if (!(result & SL11_EPSTAT_NAK) && ls_via_hub) {
/* Resend PID_IN within 20usec */
sl11write(sc, SL11_ISR, 0xff);
sl11write(sc, SL11_E0CTRL, SL11_EPCTRL_ARM);
}
sl11write(sc, SL11_ISR, 0xff);
DPRINTF(D_XFER, ("t=%d i=%x ", AHCI_TIMEOUT - timeout, isr));
#if AHCI_DEBUG
bitmask_snprintf(result,
"\20\x8STALL\7NAK\6OV\5SETUP\4DATA1\3TIMEOUT\2ERR\1ACK",
str, sizeof(str));
DPRINTF(D_XFER, ("STAT=%s ", str));
#endif
if ((result & SL11_EPSTAT_ERROR))
return -1;
if ((result & SL11_EPSTAT_NAK))
return 0;
/* Read buffer if PID_IN */
if (pid == SL11_PID_IN && len > 0) {
sl11read_region(sc, buf, 0x40, len);
#if AHCI_DEBUG
for (i = 0; i < len; i++)
DPRINTF(D_XFER, ("%02X ", buf[i]));
#endif
}
return 1;
#endif
}
void
ahci_abort_xfer(usbd_xfer_handle xfer, usbd_status status)
{
xfer->status = status;
usb_transfer_complete(xfer);
}
void
ahci_device_clear_toggle(usbd_pipe_handle pipe)
{
struct ahci_pipe *apipe = (struct ahci_pipe *)pipe;
apipe->toggle = 0;
}
#ifdef AHCI_DEBUG
void
print_req(usb_device_request_t *r)
{
const char *xmes[]={
"GETSTAT",
"CLRFEAT",
"res",
"SETFEAT",
"res",
"SETADDR",
"GETDESC",
"SETDESC",
"GETCONF",
"SETCONF",
"GETIN/F",
"SETIN/F",
"SYNC_FR"
};
int req, type, value, index, len;
req = r->bRequest;
type = r->bmRequestType;
value = UGETW(r->wValue);
index = UGETW(r->wIndex);
len = UGETW(r->wLength);
printf("%x,%s,v=%d,i=%d,l=%d ",
type, xmes[req], value, index, len);
}
void
print_req_hub(usb_device_request_t *r)
{
struct {
int req;
int type;
const char *str;
} conf[] = {
{ 1, 0x20, "ClrHubFeat" },
{ 1, 0x23, "ClrPortFeat" },
{ 2, 0xa3, "GetBusState" },
{ 6, 0xa0, "GetHubDesc" },
{ 0, 0xa0, "GetHubStat" },
{ 0, 0xa3, "GetPortStat" },
{ 7, 0x20, "SetHubDesc" },
{ 3, 0x20, "SetHubFeat" },
{ 3, 0x23, "SetPortFeat" },
{-1, 0, NULL},
};
int i;
int value, index, len;
value = UGETW(r->wValue);
index = UGETW(r->wIndex);
len = UGETW(r->wLength);
for (i = 0; ; i++) {
if (conf[i].req == -1 )
return print_req(r);
if (r->bmRequestType == conf[i].type && r->bRequest == conf[i].req) {
printf("%s", conf[i].str);
break;
}
}
printf(",v=%d,i=%d,l=%d ", value, index, len);
}
void
print_dumpreg(struct ahci_softc *sc)
{
#if 0
printf("00=%02x,01=%02x,02=%02x,03=%02x,04=%02x,"
"08=%02x,09=%02x,0A=%02x,0B=%02x,0C=%02x,",
sl11read(sc, 0), sl11read(sc, 1),
sl11read(sc, 2), sl11read(sc, 3),
sl11read(sc, 4), sl11read(sc, 8),
sl11read(sc, 9), sl11read(sc, 10),
sl11read(sc, 11), sl11read(sc, 12)
);
printf("CR1=%02x,IER=%02x,0D=%02x,0E=%02x,0F=%02x ",
sl11read(sc, 5), sl11read(sc, 6),
sl11read(sc, 13), sl11read(sc, 14), sl11read(sc, 15)
);
#endif
}
void
print_xfer(usbd_xfer_handle xfer)
{
printf("xfer: length=%d, actlen=%d, flags=%x, timeout=%d,",
xfer->length, xfer->actlen, xfer->flags, xfer->timeout);
printf("request{ ");
print_req_hub(&xfer->request);
printf("} ");
}
#endif /* AHCI_DEBUG */