u8
uhci_reactivate_urb(struct uhci_host *host,
struct usb_request_block *urb, struct uhci_td_meta *tdm)
{
struct uhci_td_meta *nexttdm, *comptdm;
/* update the frame number that indicates issued time */
URB_UHCI(urb)->frnum_issued = uhci_current_frame_number(host);
spinlock_lock(&host->lock_hfl);
/* update tdm chain */
comptdm = URB_UHCI(urb)->tdm_head;
URB_UHCI(urb)->tdm_head = tdm;
/* update qh->element */
URB_UHCI(urb)->qh->element =(phys32_t)tdm->td_phys;
/* reactivate the urb */
urb->status = URB_STATUS_RUN;
spinlock_unlock(&host->lock_hfl);
/* clean up completed TDs */
while (comptdm != tdm) {
comptdm->td->link = UHCI_TD_LINK_TE;
free(comptdm->td);
nexttdm = comptdm->next;
free(comptdm);
comptdm = nexttdm;
}
return urb->status;
}
/**
* @brief check urb advance
* @param host struct uhci_host
* @param urb struct usb_request_block
* @param usbsts u16
*/
static u8
check_urb_advance(struct uhci_host *host,
struct usb_request_block *urb, u16 usbsts)
{
struct uhci_td_meta *tdm;
phys32_t qh_element;
int elapse, len;
elapse = (uhci_current_frame_number(host) +
UHCI_NUM_FRAMES - URB_UHCI(urb)->frnum_issued) &
(UHCI_NUM_FRAMES - 1);
if (!elapse)
return urb->status;
spinlock_lock(&host->lock_hfl);
recheck:
urb->actlen = 0;
qh_element = URB_UHCI(urb)->qh->element; /* atomic */
/* count up actual length of input/output data */
for (tdm = URB_UHCI(urb)->tdm_head; tdm; tdm = tdm->next) {
if (!is_active_td(tdm->td)) {
len = UHCI_TD_STAT_ACTLEN(tdm->td);
if (!is_setup_td(tdm->td))
urb->actlen += len;
}
if ((phys32_t)tdm->td_phys == qh_element) {
urb->status = UHCI_TD_STAT_STATUS(tdm->td);
break;
}
}
if (is_terminate(qh_element)) {
urb->status = URB_STATUS_ADVANCED;
} else {
/* double check */
if (qh_element != URB_UHCI(urb)->qh->element)
goto recheck;
if (!(urb->status & URB_STATUS_RUN) &&
!(urb->status & URB_STATUS_ERRORS) &&
(uhci_td_actlen(tdm->td) == uhci_td_maxlen(tdm->td)) &&
tdm->next && is_active(tdm->next->status_copy))
urb->status = URB_STATUS_RUN;
}
URB_UHCI(urb)->qh_element_copy = qh_element;
spinlock_unlock(&host->lock_hfl);
return urb->status;
}
/**
* @brief check urb advance
* @param host struct uhci_host
* @param urb struct usb_request_block
* @param usbsts u16
*/
static u8
uhci_check_urb_advance_sub (struct uhci_host *host, u16 ucfn,
struct usb_host *usbhc,
struct usb_request_block *urb)
{
struct uhci_td_meta *tdm;
phys32_t qh_element, td_stat;
int elapse;
u8 new_status;
size_t len, actlen;
elapse = (ucfn + UHCI_NUM_FRAMES - URB_UHCI(urb)->frnum_issued) &
(UHCI_NUM_FRAMES - 1);
if (!elapse)
return urb->status;
actlen = 0;
qh_element = URB_UHCI(urb)->qh->element; /* atomic */
/* check status and count up actual length of input/output
* data */
new_status = URB_STATUS_ADVANCED;
for (tdm = URB_UHCI(urb)->tdm_head; tdm; tdm = tdm->next) {
td_stat = tdm->td->status;
new_status = UHCI_TD_STATUS(td_stat);
if (is_active(td_stat))
break;
len = uhci_td_actlen(tdm->td);
if (!is_setup_td(tdm->td))
actlen += len;
if (is_error(td_stat))
break;
if (tdm == URB_UHCI(urb)->tdm_acttail)
break;
if (len < uhci_td_maxlen(tdm->td)) /* short packet */
break;
}
urb->actlen = actlen;
urb->status = new_status;
URB_UHCI(urb)->qh_element_copy = qh_element;
return new_status;
}
/**
* @brief distroy urb
* @param host struct uhci_host
* @param urb struct usb_request_block
*/
void
uhci_destroy_urb(struct uhci_host *host, struct usb_request_block *urb)
{
struct uhci_td_meta *tdm, *nexttdm;
struct usb_buffer_list *b;
if (urb->status != URB_STATUS_UNLINKED) {
dprintft(2, "%s: the target urb(%p) is still linked(%02x)?\n",
__FUNCTION__, urb, urb->status);
return;
}
if (URB_UHCI(urb)->qh) {
URB_UHCI(urb)->qh->link =
URB_UHCI(urb)->qh->element = UHCI_QH_LINK_TE;
free(URB_UHCI(urb)->qh);
}
tdm = URB_UHCI(urb)->tdm_head;
while (tdm) {
if (tdm->td) {
tdm->td->link = UHCI_TD_LINK_TE;
tdm->td->buffer = 0U;
free(tdm->td);
}
nexttdm = tdm->next;
free(tdm);
tdm = nexttdm;
}
while (urb->buffers) {
b = urb->buffers;
if (b->vadr)
free((void *)b->vadr);
urb->buffers = b->next;
free(b);
}
dprintft(3, "%04x: %s: urb(%p) destroyed.\n",
host->iobase, __FUNCTION__, urb);
free(urb->hcpriv);
free(urb);
return;
}
/**
* @brief submit asynchronous urb
* @param host struct uhci_host
* @param device struct usb_device
* @param epdesc struct usb_endpoint_descriptor
* @param data void *
* @param size u16
* @param callback int *
* @param arg void*
* @param ioc int
*/
static struct usb_request_block *
uhci_submit_async(struct uhci_host *host, struct usb_device *device,
struct usb_endpoint_descriptor *epdesc,
void *data, u16 size,
int (*callback)(struct usb_host *,
struct usb_request_block *, void *),
void *arg, int ioc)
{
struct usb_request_block *urb;
size_t pktsize;
u32 lospeed = 0;
urb = uhci_create_urb(host);
if (!urb)
return (struct usb_request_block *)NULL;
if (device) {
spinlock_lock(&device->lock_dev);
init_urb(urb, device->devnum, epdesc, callback, arg);
spinlock_unlock(&device->lock_dev);
}
/* determine if we are dealing with a low speed device or not */
if (device) {
if (device->speed == UD_SPEED_UNDEF) {
u16 portsc;
ASSERT (device->portno <= UHCI_NUM_PORTS_HC);
portsc = host->portsc[(device->portno-1)];
device->speed = (portsc & UHCI_PORTSC_LOSPEED) ?
UD_SPEED_LOW : UD_SPEED_FULL;
}
lospeed = (device->speed == UD_SPEED_LOW) ? UHCI_TD_STAT_LS : 0;
}
/* create a QH */
URB_UHCI(urb)->qh = uhci_alloc_qh(host, &URB_UHCI(urb)->qh_phys);
if (!URB_UHCI(urb)->qh)
goto fail_submit_async;
URB_UHCI(urb)->qh->link = UHCI_QH_LINK_TE;
pktsize = epdesc->wMaxPacketSize;
/* buffer and TD */
if (size > 0) {
struct usb_buffer_list *b;
b = zalloc_usb_buffer_list();
b->pid = USB_PID_IN;
b->len = size;
b->vadr = (virt_t)alloc2_aligned(b->len, &b->padr);
if (!b->vadr) {
free(b);
goto fail_submit_async;
}
/* copy data if OUT direction */
if (!USB_EP_DIRECT(epdesc)) {
b->pid = USB_PID_OUT;
memcpy((void *)b->vadr, data, b->len);
}
urb->buffers = b;
}
if (device) {
spinlock_lock(&device->lock_dev);
URB_UHCI(urb)->tdm_head =
prepare_buffer_tds(host, (urb->buffers) ?
(phys32_t)urb->buffers->padr : 0U,
size, device->devnum, epdesc,
(size_t)pktsize,
UHCI_TD_STAT_AC |
UHCI_TD_STAT_SP |
lospeed |
uhci_td_maxerr(3));
spinlock_unlock(&device->lock_dev);
}
if (!URB_UHCI(urb)->tdm_head)
goto fail_submit_async;
/* link the TDs into the QH */
URB_UHCI(urb)->qh->element = URB_UHCI(urb)->tdm_head->td_phys;
/* set IOC */
if (ioc)
URB_UHCI(urb)->tdm_head->td->status |= UHCI_TD_STAT_IC;
/* set up toggles in TDs */
epdesc->toggle = uhci_fixup_toggles(URB_UHCI(urb)->tdm_head,
epdesc->toggle);
/* link the QH into the frame list */
if (uhci_activate_urb(host, urb) != URB_STATUS_RUN)
goto fail_submit_async;
URB_UHCI(urb)->tdm_acttail = NULL;
return urb;
fail_submit_async:
uhci_destroy_urb(host, urb);
return (struct usb_request_block *)NULL;
}
/**
* @brief submit the control messagie
* @param host struct uhci_host
* @param device struct usb_device
* @param endpoint u8
* @param csetup struct usb_device
* @param callback int *
* @param arg void*
* @param ioc int
*/
struct usb_request_block *
uhci_submit_control(struct usb_host *usbhc, struct usb_device *device,
u8 endpoint, u16 pktsz, struct usb_ctrl_setup *csetup,
int (*callback)(struct usb_host *,
struct usb_request_block *, void *),
void *arg, int ioc)
{
struct uhci_host *host = (struct uhci_host *)usbhc->private;
struct usb_request_block *urb;
struct usb_endpoint_descriptor *epdesc;
struct uhci_td_meta *tdm;
struct usb_buffer_list *b;
u32 lospeed = 0;
epdesc = get_edesc_by_address(device, endpoint);
if (!epdesc) {
if (endpoint != 0) {
dprintft(2, "%04x: %s: no endpoint(%d) found.\n",
host->iobase, __FUNCTION__, endpoint);
return (struct usb_request_block *)NULL;
}
/* use the default endpoint */
epdesc = &default_ep0;
}
/* determine if we are dealing with a low speed device or not */
if (device) {
if (device->speed == UD_SPEED_UNDEF) {
u16 portsc;
ASSERT (device->portno <= UHCI_NUM_PORTS_HC);
portsc = host->portsc[(device->portno-1)];
device->speed = (portsc & UHCI_PORTSC_LOSPEED) ?
UD_SPEED_LOW : UD_SPEED_FULL;
}
lospeed = (device->speed == UD_SPEED_LOW) ? UHCI_TD_STAT_LS : 0;
}
dprintft(5, "%s: epdesc->wMaxPacketSize = %d\n",
__FUNCTION__, epdesc->wMaxPacketSize);
urb = uhci_create_urb(host);
if (!urb)
return (struct usb_request_block *)NULL;
if (device) {
spinlock_lock(&device->lock_dev);
init_urb(urb, device->devnum, epdesc, callback, arg);
spinlock_unlock(&device->lock_dev);
}
/* create a QH */
URB_UHCI(urb)->qh = uhci_alloc_qh(host, &URB_UHCI(urb)->qh_phys);
if (!URB_UHCI(urb)->qh)
goto fail_submit_control;
URB_UHCI(urb)->qh->link = UHCI_QH_LINK_TE;
if (pktsz == 0)
pktsz = epdesc->wMaxPacketSize;
/* SETUP TD */
URB_UHCI(urb)->tdm_head = tdm = uhci_new_td_meta(host, NULL);
if (!tdm)
goto fail_submit_control;
URB_UHCI(urb)->qh->element =
URB_UHCI(urb)->qh_element_copy = tdm->td_phys;
b = zalloc_usb_buffer_list();
b->pid = USB_PID_SETUP;
b->len = sizeof(*csetup);
b->vadr = (virt_t)alloc2_aligned(b->len, &b->padr);
if (!b->vadr) {
free(b);
goto fail_submit_control;
}
urb->buffers = b;
memcpy((void *)b->vadr, (void *)csetup, b->len);
tdm->td->status = tdm->status_copy =
UHCI_TD_STAT_AC | lospeed | uhci_td_maxerr(3);
if (device) {
spinlock_lock(&device->lock_dev);
tdm->td->token = tdm->token_copy =
uhci_td_explen(sizeof(*csetup)) |
UHCI_TD_TOKEN_ENDPOINT(epdesc->bEndpointAddress) |
UHCI_TD_TOKEN_DEVADDRESS(device->devnum) |
UHCI_TD_TOKEN_PID_SETUP;
spinlock_unlock(&device->lock_dev);
}
tdm->td->buffer = (phys32_t)b->padr;
if (csetup->wLength > 0) {
b = zalloc_usb_buffer_list();
b->pid = USB_PID_IN;
b->len = csetup->wLength;
b->vadr = (virt_t)alloc2_aligned(b->len, &b->padr);
if (!b->vadr) {
free(b);
goto fail_submit_control;
}
b->next = urb->buffers;
urb->buffers = b;
if (device) {
spinlock_lock(&device->lock_dev);
tdm = prepare_buffer_tds(host, (phys32_t)b->padr,
b->len,
device->devnum, epdesc,
(size_t)pktsz,
UHCI_TD_STAT_AC |
UHCI_TD_STAT_SP |
lospeed |
uhci_td_maxerr(3));
spinlock_unlock(&device->lock_dev);
}
if (!tdm)
goto fail_submit_control;
dprintft(5, "%s: tdm->td_phys = %llx\n",
__FUNCTION__, tdm->td_phys);
URB_UHCI(urb)->tdm_head->next = tdm;
URB_UHCI(urb)->tdm_head->td->link = tdm->td_phys;
}
/* The 1st toggle for SETUP must be 0. */
uhci_fixup_toggles(URB_UHCI(urb)->tdm_head, epdesc->toggle);
/* append one more TD for the status stage */
for (tdm = URB_UHCI(urb)->tdm_head; tdm->next; tdm = tdm->next);
tdm->next = uhci_new_td_meta(host, NULL);
if (!tdm->next)
goto fail_submit_control;
tdm->next->td->link = UHCI_TD_LINK_TE;
tdm->next->td->status = UHCI_TD_STAT_AC | lospeed | uhci_td_maxerr(3);
if (ioc)
tdm->next->td->status |= UHCI_TD_STAT_IC;
if (device) {
spinlock_lock(&device->lock_dev);
tdm->next->td->token = uhci_td_explen(0) |
UHCI_TD_TOKEN_ENDPOINT(epdesc->bEndpointAddress) |
UHCI_TD_TOKEN_DEVADDRESS(device->devnum) |
UHCI_TD_TOKEN_DT1_TOGGLE;
spinlock_unlock(&device->lock_dev);
}
tdm->next->td->token |= (csetup->wLength > 0) ?
UHCI_TD_TOKEN_PID_OUT : UHCI_TD_TOKEN_PID_IN;
tdm->next->td->buffer = 0U;
tdm->td->link = (phys32_t)tdm->next->td_phys;
/* link the QH into the frame list */
if (uhci_activate_urb(host, urb) != URB_STATUS_RUN)
goto fail_submit_control;
URB_UHCI(urb)->tdm_acttail = NULL;
return urb;
fail_submit_control:
uhci_destroy_urb(host, urb);
return (struct usb_request_block *)NULL;
}
/**
* @brief activate urb
* @param host struct uhci_host *host
* @param urb struct usb_request_block
*/
u8
uhci_activate_urb(struct uhci_host *host, struct usb_request_block *urb)
{
u8 status, type;
int n;
type = (urb->endpoint) ?
USB_EP_TRANSTYPE(urb->endpoint) : USB_ENDPOINT_TYPE_CONTROL;
spinlock_lock(&host->lock_hfl);
switch (type) {
case USB_ENDPOINT_TYPE_INTERRUPT:
n = __ffs(urb->endpoint->bInterval |
(1 << (UHCI_NUM_SKELTYPES - 1)));
/* MEMO: a new interrupt urb must be
inserted just after a skelton anytime. */
urb->link_prev = host->host_skelton[n];
if (host->host_skelton[n] ==
host->tailurb[URB_TAIL_CONTROL])
host->tailurb[URB_TAIL_CONTROL] = urb;
if (host->host_skelton[n] ==
host->tailurb[URB_TAIL_BULK])
host->tailurb[URB_TAIL_BULK] = urb;
break;
case USB_ENDPOINT_TYPE_CONTROL:
urb->link_prev = host->tailurb[URB_TAIL_CONTROL];
if (host->tailurb[URB_TAIL_CONTROL] ==
host->tailurb[URB_TAIL_BULK])
host->tailurb[URB_TAIL_BULK] = urb;
host->tailurb[URB_TAIL_CONTROL] = urb;
break;
case USB_ENDPOINT_TYPE_BULK:
urb->link_prev = host->tailurb[URB_TAIL_BULK];
host->tailurb[URB_TAIL_BULK] = urb;
break;
case USB_ENDPOINT_TYPE_ISOCHRONOUS:
default:
printf("%s: transfer type(%02x) unsupported.\n",
__FUNCTION__, type);
status = urb->status;
return status;
}
/* initialize qh_element_copy for detecting advance after NAK */
URB_UHCI(urb)->qh_element_copy = URB_UHCI(urb)->qh->element;
/* urb link */
urb->link_next = urb->link_prev->link_next;
urb->link_prev->link_next = urb;
if (urb->link_next) {
/* make a backward pointer */
urb->link_next->link_prev = urb;
} else if (type == USB_ENDPOINT_TYPE_BULK) {
if (host->fsbr) {
dprintft(2, "%04x: %s: append it to the "
"FSBR loopback.\n",
host->iobase, __FUNCTION__);
host->fsbr_loop_tail = urb;
} else {
dprintft(2, "%04x: %s: make a FSBR loopback.\n",
host->iobase, __FUNCTION__);
host->fsbr = 1;
host->fsbr_loop_head = urb;
host->fsbr_loop_tail = urb;
}
}
/* record the current frame number */
URB_UHCI(urb)->frnum_issued = uhci_current_frame_number(host);
/* qh link */
URB_UHCI(urb)->qh->link = URB_UHCI(urb->link_prev)->qh->link;
if (host->fsbr_loop_tail)
URB_UHCI(host->fsbr_loop_tail)->qh->link = (phys32_t)
URB_UHCI(host->fsbr_loop_head)->qh_phys |
UHCI_QH_LINK_QH;
URB_UHCI(urb->link_prev)->qh->link =
URB_UHCI(urb)->qh_phys | UHCI_QH_LINK_QH;
urb->status = URB_STATUS_RUN;
dprintft(3, "%s: The urb link is %p <- %p -> %p.\n",
__FUNCTION__, urb->link_prev, urb, urb->link_next);
status = urb->status;
LIST4_PUSH (host->inproc_urbs, list, urb);
spinlock_unlock(&host->lock_hfl);
return status;
}
/**
* @brief deactivates the urb
* @param host struct uhci_host
* @param urb struct usb_request_block
*/
u8
uhci_deactivate_urb(struct usb_host *usbhc, struct usb_request_block *urb)
{
struct uhci_host *host = (struct uhci_host *)usbhc->private;
u8 status, type;
/* nothing to do if already unlinked */
if (urb->status == URB_STATUS_UNLINKED)
return urb->status;
dprintft(5, "%s: The urb link is %p <- %p -> %p.\n",
__FUNCTION__, urb->link_prev, urb, urb->link_next);
spinlock_lock(&host->lock_hfl);
if (urb->prevent_del) {
urb->deferred_del = true;
spinlock_unlock(&host->lock_hfl);
return 0U;
}
/* urb link */
if ((urb == host->fsbr_loop_head) &&
(urb == host->fsbr_loop_tail)) {
dprintft(2, "%04x: %s: FSBR unlooped \n",
host->iobase, __FUNCTION__);
host->fsbr = 0;
host->fsbr_loop_head = host->fsbr_loop_tail =
(struct usb_request_block *)NULL;
/* qh */
URB_UHCI(urb->link_prev)->qh->link = UHCI_QH_LINK_TE;
} else if (urb == host->fsbr_loop_tail) {
/* tail of a FSBR loopback */
dprintft(2, "%04x: %s: the tail of a FSBR loopback\n",
host->iobase, __FUNCTION__);
host->fsbr_loop_tail = urb->link_prev;
/* qh */
URB_UHCI(host->fsbr_loop_tail)->qh->link =
(phys32_t)URB_UHCI(host->fsbr_loop_head)->qh_phys |
UHCI_QH_LINK_QH;
} else if (host->fsbr_loop_head == urb) {
/* head of a FSBR loopback */
dprintft(2, "%04x: %s: the head of a FSBR loopback\n",
host->iobase, __FUNCTION__);
host->fsbr_loop_head = urb->link_next;
/* qh */
URB_UHCI(host->fsbr_loop_tail)->qh->link =
(phys32_t)URB_UHCI(host->fsbr_loop_head)->qh_phys |
UHCI_QH_LINK_QH;
URB_UHCI(urb->link_prev)->qh->link = URB_UHCI(urb)->qh->link;
} else {
/* qh */
URB_UHCI(urb->link_prev)->qh->link = URB_UHCI(urb)->qh->link;
}
URB_UHCI(urb)->qh->link = UHCI_QH_LINK_TE;
/* MEMO: There must exist urb->link_prev
because of the skelton. */
urb->link_prev->link_next = urb->link_next;
if (urb->link_next)
urb->link_next->link_prev = urb->link_prev;
urb->status = URB_STATUS_UNLINKED;
type = (urb->endpoint) ?
USB_EP_TRANSTYPE(urb->endpoint) : USB_ENDPOINT_TYPE_CONTROL;
switch (type) {
case USB_ENDPOINT_TYPE_INTERRUPT:
/* through */
case USB_ENDPOINT_TYPE_CONTROL:
if (host->tailurb[URB_TAIL_CONTROL] == urb)
host->tailurb[URB_TAIL_CONTROL] = urb->link_prev;
/* through */
case USB_ENDPOINT_TYPE_BULK:
if (host->tailurb[URB_TAIL_BULK] == urb)
host->tailurb[URB_TAIL_BULK] = urb->link_prev;
break;
case USB_ENDPOINT_TYPE_ISOCHRONOUS:
default:
printf("%s: transfer type(%02x) unsupported.\n",
__FUNCTION__, type);
}
status = urb->status;
LIST4_DEL (host->inproc_urbs, list, urb);
LIST4_ADD (host->unlinked_urbs[host->unlinked_urbs_index], list, urb);
spinlock_unlock(&host->lock_hfl);
return status;
}
/**
* @brief initialize host fram list
* @param host struct uhci_host
*/
int
init_hframelist(struct uhci_host *host)
{
struct usb_request_block *urb;
u32 frid;
phys32_t *frame_p;
virt_t framelist_virt;
phys_t framelist_phys;
int n_skels;
/* allocate a page for frame list */
alloc_page((void *)&framelist_virt, &framelist_phys);
if (!framelist_phys)
return -1;
host->hframelist = framelist_phys;
host->hframelist_virt = (phys32_t *)framelist_virt;
spinlock_lock(&host->lock_hfl);
/* create a TD for termination */
host->term_tdm = uhci_new_td_meta(host, NULL);
if (!host->term_tdm)
return -1;
host->term_tdm->td->link = UHCI_TD_LINK_TE;
host->term_tdm->td->status = 0U;
host->term_tdm->td->token =
UHCI_TD_TOKEN_DEVADDRESS(0x7f) | UHCI_TD_TOKEN_ENDPOINT(0) |
UHCI_TD_TOKEN_PID_IN | uhci_td_explen(0);
host->term_tdm->td->buffer = 0U;
/* create skelton QHs */
for (n_skels = 0; n_skels<UHCI_NUM_SKELTYPES; n_skels++) {
urb = uhci_create_urb(host);
if (!urb)
break;
urb->address = URB_ADDRESS_SKELTON;
URB_UHCI(urb)->qh =
uhci_alloc_qh(host, &URB_UHCI(urb)->qh_phys);
if (!URB_UHCI(urb)->qh)
break;
if (n_skels == 0) {
URB_UHCI(urb)->tdm_head = host->term_tdm;
URB_UHCI(urb)->qh->element = (phys32_t)
URB_UHCI(urb)->tdm_head->td_phys;
URB_UHCI(urb)->qh->link = UHCI_QH_LINK_TE;
} else {
URB_UHCI(urb)->qh->element = UHCI_QH_LINK_TE;
URB_UHCI(urb)->qh->link = (phys32_t)
URB_UHCI(host->host_skelton
[n_skels - 1])->qh_phys |
UHCI_QH_LINK_QH;
urb->link_next = host->host_skelton[n_skels - 1];
}
host->host_skelton[n_skels] = urb;
}
/* make link to a QH in each frame list entry
according to intervals */
for (frid = 0U; frid < UHCI_NUM_FRAMES; frid++) {
frame_p = (phys32_t *)
(framelist_virt + frid * sizeof(phys32_t));
n_skels = __ffs((frid + 1) |
(1 << (UHCI_NUM_SKELTYPES - 1)));
*frame_p = (phys32_t)
URB_UHCI(host->host_skelton[n_skels])->qh_phys |
UHCI_FRAME_LINK_QH;
}
for (n_skels = 0; n_skels < 2; n_skels++)
host->tailurb[n_skels] = host->host_skelton[0];
spinlock_unlock(&host->lock_hfl);
return 0;
}
/**
* @brief submit asynchronous urb
* @param host struct uhci_host
* @param device struct usb_device
* @param epdesc struct usb_endpoint_descriptor
* @param data void *
* @param size u16
* @param callback int *
* @param arg void*
* @param ioc int
*/
static struct usb_request_block *
uhci_submit_async(struct uhci_host *host, struct usb_device *device,
struct usb_endpoint_descriptor *epdesc,
void *data, u16 size,
int (*callback)(struct usb_host *,
struct usb_request_block *, void *),
void *arg, int ioc)
{
struct usb_request_block *urb;
size_t pktsize;
urb = create_urb(host);
if (!urb)
return (struct usb_request_block *)NULL;
if (device){
spinlock_lock(&device->lock_dev);
init_urb(urb, device->devnum, epdesc, callback, arg);
spinlock_unlock(&device->lock_dev);
}
/* create a QH */
URB_UHCI(urb)->qh = uhci_alloc_qh(host, &URB_UHCI(urb)->qh_phys);
if (!URB_UHCI(urb)->qh)
goto fail_submit_async;
URB_UHCI(urb)->qh->link = UHCI_QH_LINK_TE;
pktsize = epdesc->wMaxPacketSize;
/* buffer and TD */
if (size > 0) {
struct usb_buffer_list *b;
b = zalloc_usb_buffer_list();
b->len = size;
b->vadr = malloc_from_pool(host->pool, b->len, &b->padr);
if (!b->vadr) {
free(b);
goto fail_submit_async;
}
/* copy data if OUT direction */
if (!USB_EP_DIRECT(epdesc))
memcpy((void *)b->vadr, data, b->len);
urb->buffers = b;
}
if (device){
spinlock_lock(&device->lock_dev);
URB_UHCI(urb)->tdm_head =
prepare_buffer_tds(host, (urb->buffers) ?
(phys32_t)urb->buffers->padr : 0U,
size, device->devnum, epdesc,
UHCI_TD_STAT_AC |
UHCI_TD_STAT_SP |
uhci_td_maxerr(3));
spinlock_unlock(&device->lock_dev);
}
if (!URB_UHCI(urb)->tdm_head)
goto fail_submit_async;
/* link the TDs into the QH */
URB_UHCI(urb)->qh->element = URB_UHCI(urb)->tdm_head->td_phys;
/* set IOC */
if (ioc)
URB_UHCI(urb)->tdm_head->td->status |= UHCI_TD_STAT_IC;
/* set up toggles in TDs */
epdesc->toggle = uhci_fixup_toggles(URB_UHCI(urb)->tdm_head,
epdesc->toggle);
/* link the QH into the frame list */
if (uhci_activate_urb(host, urb) != URB_STATUS_RUN)
goto fail_submit_async;
link_urb(&host->inproc_urbs, urb);
return urb;
fail_submit_async:
destroy_urb(host, urb);
return (struct usb_request_block *)NULL;
}
/**
* @brief submit the control messagie
* @param host struct uhci_host
* @param device struct usb_device
* @param endpoint u8
* @param csetup struct usb_device
* @param callback int *
* @param arg void*
* @param ioc int
*/
struct usb_request_block *
uhci_submit_control(struct uhci_host *host, struct usb_device *device,
u8 endpoint, struct usb_ctrl_setup *csetup,
int (*callback)(struct usb_host *,
struct usb_request_block *, void *),
void *arg, int ioc)
{
struct usb_request_block *urb;
struct usb_endpoint_descriptor *epdesc;
struct uhci_td_meta *tdm;
struct usb_buffer_list *b;
size_t pktsize;
epdesc = usb_epdesc(device, endpoint);
if (!epdesc) {
dprintft(2, "%04x: %s: no endpoint(%d) found.\n",
host->iobase, __FUNCTION__, endpoint);
return (struct usb_request_block *)NULL;
}
dprintft(5, "%s: epdesc->wMaxPacketSize = %d\n",
__FUNCTION__, epdesc->wMaxPacketSize);
urb = create_urb(host);
if (!urb)
return (struct usb_request_block *)NULL;
if (device){
spinlock_lock(&device->lock_dev);
init_urb(urb, device->devnum, epdesc, callback, arg);
spinlock_unlock(&device->lock_dev);
}
/* create a QH */
URB_UHCI(urb)->qh = uhci_alloc_qh(host, &URB_UHCI(urb)->qh_phys);
if (!URB_UHCI(urb)->qh)
goto fail_submit_control;
URB_UHCI(urb)->qh->link = UHCI_QH_LINK_TE;
pktsize = epdesc->wMaxPacketSize;
/* SETUP TD */
URB_UHCI(urb)->tdm_head = tdm = uhci_new_td_meta(host, NULL);
if (!tdm)
goto fail_submit_control;
URB_UHCI(urb)->qh->element =
URB_UHCI(urb)->qh_element_copy = tdm->td_phys;
b = zalloc_usb_buffer_list();
b->len = sizeof(*csetup);
b->vadr = malloc_from_pool(host->pool, b->len, &b->padr);
if (!b->vadr) {
free(b);
goto fail_submit_control;
}
urb->buffers = b;
memcpy((void *)b->vadr, (void *)csetup, b->len);
tdm->td->status = tdm->status_copy =
UHCI_TD_STAT_AC | uhci_td_maxerr(3);
if (device){
spinlock_lock(&device->lock_dev);
tdm->td->token = tdm->token_copy =
uhci_td_explen(sizeof(*csetup)) |
UHCI_TD_TOKEN_ENDPOINT(epdesc->bEndpointAddress) |
UHCI_TD_TOKEN_DEVADDRESS(device->devnum) |
UHCI_TD_TOKEN_PID_SETUP;
spinlock_unlock(&device->lock_dev);
}
tdm->td->buffer = (phys32_t)b->padr;
if (csetup->wLength > 0) {
b = zalloc_usb_buffer_list();
b->len = csetup->wLength;
b->vadr = malloc_from_pool(host->pool, b->len, &b->padr);
if (!b->vadr) {
free(b);
goto fail_submit_control;
}
b->next = urb->buffers;
urb->buffers = b;
if(device){
spinlock_lock(&device->lock_dev);
tdm = prepare_buffer_tds(host, (phys32_t)b->padr,
b->len,
device->devnum, epdesc,
UHCI_TD_STAT_AC |
UHCI_TD_STAT_SP |
uhci_td_maxerr(3));
spinlock_unlock(&device->lock_dev);
}
if (!tdm)
goto fail_submit_control;
dprintft(5, "%s: tdm->td_phys = %llx\n",
__FUNCTION__, tdm->td_phys);
URB_UHCI(urb)->tdm_head->next = tdm;
URB_UHCI(urb)->tdm_head->td->link = tdm->td_phys;
}
/* The 1st toggle for SETUP must be 0. */
uhci_fixup_toggles(URB_UHCI(urb)->tdm_head, epdesc->toggle);
/* append one more TD for the status stage */
for (tdm = URB_UHCI(urb)->tdm_head; tdm->next; tdm = tdm->next);
tdm->next = uhci_new_td_meta(host, NULL);
if (!tdm->next)
goto fail_submit_control;
tdm->next->td->link = UHCI_TD_LINK_TE;
tdm->next->td->status = UHCI_TD_STAT_AC | uhci_td_maxerr(3);
if (ioc)
tdm->next->td->status |= UHCI_TD_STAT_IC;
if (device){
spinlock_lock(&device->lock_dev);
tdm->next->td->token = uhci_td_explen(0) |
UHCI_TD_TOKEN_ENDPOINT(epdesc->bEndpointAddress) |
UHCI_TD_TOKEN_DEVADDRESS(device->devnum) |
UHCI_TD_TOKEN_DT1_TOGGLE;
spinlock_unlock(&device->lock_dev);
}
tdm->next->td->token |= (csetup->wLength > 0) ?
UHCI_TD_TOKEN_PID_OUT : UHCI_TD_TOKEN_PID_IN;
tdm->next->td->buffer = 0U;
tdm->td->link = (phys32_t)tdm->next->td_phys;
/* link the QH into the frame list */
if (uhci_activate_urb(host, urb) != URB_STATUS_RUN)
goto fail_submit_control;
link_urb(&host->inproc_urbs, urb);
return urb;
fail_submit_control:
destroy_urb(host, urb);
return (struct usb_request_block *)NULL;
}
