v86 0.4.0 → 0.5.10

package/bios/seabios/src/hw/usb-xhci.h

@@ -1,133 +0,0 @@
-#ifndef __USB_XHCI_H
-#define __USB_XHCI_H
-
-struct usbdevice_s;
-struct usb_endpoint_descriptor;
-struct usb_pipe;
-
-// --------------------------------------------------------------
-
-// usb-xhci.c
-void xhci_setup(void);
-struct usb_pipe *xhci_realloc_pipe(struct usbdevice_s *usbdev
-                                   , struct usb_pipe *upipe
-                                   , struct usb_endpoint_descriptor *epdesc);
-int xhci_send_pipe(struct usb_pipe *p, int dir, const void *cmd
-                   , void *data, int datasize);
-int xhci_poll_intr(struct usb_pipe *p, void *data);
-
-// --------------------------------------------------------------
-// register interface
-
-// capabilities
-struct xhci_caps {
-    u8  caplength;
-    u8  reserved_01;
-    u16 hciversion;
-    u32 hcsparams1;
-    u32 hcsparams2;
-    u32 hcsparams3;
-    u32 hccparams;
-    u32 dboff;
-    u32 rtsoff;
-} PACKED;
-
-// extended capabilities
-struct xhci_xcap {
-    u32 cap;
-    u32 data[];
-} PACKED;
-
-// operational registers
-struct xhci_op {
-    u32 usbcmd;
-    u32 usbsts;
-    u32 pagesize;
-    u32 reserved_01[2];
-    u32 dnctl;
-    u32 crcr_low;
-    u32 crcr_high;
-    u32 reserved_02[4];
-    u32 dcbaap_low;
-    u32 dcbaap_high;
-    u32 config;
-} PACKED;
-
-// port registers
-struct xhci_pr {
-    u32 portsc;
-    u32 portpmsc;
-    u32 portli;
-    u32 reserved_01;
-} PACKED;
-
-// doorbell registers
-struct xhci_db {
-    u32 doorbell;
-} PACKED;
-
-// runtime registers
-struct xhci_rts {
-    u32 mfindex;
-} PACKED;
-
-// interrupter registers
-struct xhci_ir {
-    u32 iman;
-    u32 imod;
-    u32 erstsz;
-    u32 reserved_01;
-    u32 erstba_low;
-    u32 erstba_high;
-    u32 erdp_low;
-    u32 erdp_high;
-} PACKED;
-
-// --------------------------------------------------------------
-// memory data structs
-
-// slot context
-struct xhci_slotctx {
-    u32 ctx[4];
-    u32 reserved_01[4];
-} PACKED;
-
-// endpoint context
-struct xhci_epctx {
-    u32 ctx[2];
-    u32 deq_low;
-    u32 deq_high;
-    u32 length;
-    u32 reserved_01[3];
-} PACKED;
-
-// device context array element
-struct xhci_devlist {
-    u32 ptr_low;
-    u32 ptr_high;
-} PACKED;
-
-// input context
-struct xhci_inctx {
-    u32 del;
-    u32 add;
-    u32 reserved_01[6];
-} PACKED;
-
-// transfer block (ring element)
-struct xhci_trb {
-    u32 ptr_low;
-    u32 ptr_high;
-    u32 status;
-    u32 control;
-} PACKED;
-
-// event ring segment
-struct xhci_er_seg {
-    u32 ptr_low;
-    u32 ptr_high;
-    u32 size;
-    u32 reserved_01;
-} PACKED;
-
-#endif // usb-xhci.h

package/bios/seabios/src/hw/usb.c

@@ -1,499 +0,0 @@
-// Main code for handling USB controllers and devices.
-//
-// Copyright (C) 2009-2013  Kevin O'Connor <kevin@koconnor.net>
-//
-// This file may be distributed under the terms of the GNU LGPLv3 license.
-
-#include "biosvar.h" // GET_GLOBAL
-#include "config.h" // CONFIG_*
-#include "malloc.h" // free
-#include "output.h" // dprintf
-#include "romfile.h" // romfile_loadint
-#include "string.h" // memset
-#include "usb.h" // struct usb_s
-#include "usb-ehci.h" // ehci_setup
-#include "usb-xhci.h" // xhci_setup
-#include "usb-hid.h" // usb_keyboard_setup
-#include "usb-hub.h" // usb_hub_setup
-#include "usb-msc.h" // usb_msc_setup
-#include "usb-ohci.h" // ohci_setup
-#include "usb-uas.h" // usb_uas_setup
-#include "usb-uhci.h" // uhci_setup
-#include "util.h" // msleep
-#include "x86.h" // __fls
-
-
-/****************************************************************
- * Controller function wrappers
- ****************************************************************/
-
-// Allocate, update, or free a usb pipe.
-static struct usb_pipe *
-usb_realloc_pipe(struct usbdevice_s *usbdev, struct usb_pipe *pipe
-                 , struct usb_endpoint_descriptor *epdesc)
-{
-    switch (usbdev->hub->cntl->type) {
-    default:
-    case USB_TYPE_UHCI:
-        return uhci_realloc_pipe(usbdev, pipe, epdesc);
-    case USB_TYPE_OHCI:
-        return ohci_realloc_pipe(usbdev, pipe, epdesc);
-    case USB_TYPE_EHCI:
-        return ehci_realloc_pipe(usbdev, pipe, epdesc);
-    case USB_TYPE_XHCI:
-        return xhci_realloc_pipe(usbdev, pipe, epdesc);
-    }
-}
-
-// Send a message on a control pipe using the default control descriptor.
-static int
-usb_send_pipe(struct usb_pipe *pipe_fl, int dir, const void *cmd
-              , void *data, int datasize)
-{
-    switch (GET_LOWFLAT(pipe_fl->type)) {
-    default:
-    case USB_TYPE_UHCI:
-        return uhci_send_pipe(pipe_fl, dir, cmd, data, datasize);
-    case USB_TYPE_OHCI:
-        if (MODESEGMENT)
-            return -1;
-        return ohci_send_pipe(pipe_fl, dir, cmd, data, datasize);
-    case USB_TYPE_EHCI:
-        return ehci_send_pipe(pipe_fl, dir, cmd, data, datasize);
-    case USB_TYPE_XHCI:
-        if (MODESEGMENT)
-            return -1;
-        return xhci_send_pipe(pipe_fl, dir, cmd, data, datasize);
-    }
-}
-
-int
-usb_poll_intr(struct usb_pipe *pipe_fl, void *data)
-{
-    ASSERT16();
-    switch (GET_LOWFLAT(pipe_fl->type)) {
-    default:
-    case USB_TYPE_UHCI:
-        return uhci_poll_intr(pipe_fl, data);
-    case USB_TYPE_OHCI:
-        return ohci_poll_intr(pipe_fl, data);
-    case USB_TYPE_EHCI:
-        return ehci_poll_intr(pipe_fl, data);
-    case USB_TYPE_XHCI: ;
-        return call32_params(xhci_poll_intr, pipe_fl
-                             , MAKE_FLATPTR(GET_SEG(SS), data), 0, -1);
-    }
-}
-
-int usb_32bit_pipe(struct usb_pipe *pipe_fl)
-{
-    return (CONFIG_USB_XHCI && GET_LOWFLAT(pipe_fl->type) == USB_TYPE_XHCI)
-        || (CONFIG_USB_OHCI && GET_LOWFLAT(pipe_fl->type) == USB_TYPE_OHCI);
-}
-
-
-/****************************************************************
- * Helper functions
- ****************************************************************/
-
-// Allocate a usb pipe.
-struct usb_pipe *
-usb_alloc_pipe(struct usbdevice_s *usbdev
-               , struct usb_endpoint_descriptor *epdesc)
-{
-    return usb_realloc_pipe(usbdev, NULL, epdesc);
-}
-
-// Free an allocated control or bulk pipe.
-void
-usb_free_pipe(struct usbdevice_s *usbdev, struct usb_pipe *pipe)
-{
-    if (!pipe)
-        return;
-    usb_realloc_pipe(usbdev, pipe, NULL);
-}
-
-// Send a message to the default control pipe of a device.
-int
-usb_send_default_control(struct usb_pipe *pipe, const struct usb_ctrlrequest *req
-                         , void *data)
-{
-    return usb_send_pipe(pipe, req->bRequestType & USB_DIR_IN, req
-                         , data, req->wLength);
-}
-
-// Send a message to a bulk endpoint
-int
-usb_send_bulk(struct usb_pipe *pipe_fl, int dir, void *data, int datasize)
-{
-    return usb_send_pipe(pipe_fl, dir, NULL, data, datasize);
-}
-
-// Check if a pipe for a given controller is on the freelist
-int
-usb_is_freelist(struct usb_s *cntl, struct usb_pipe *pipe)
-{
-    return pipe->cntl != cntl;
-}
-
-// Add a pipe to the controller's freelist
-void
-usb_add_freelist(struct usb_pipe *pipe)
-{
-    if (!pipe)
-        return;
-    struct usb_s *cntl = pipe->cntl;
-    pipe->freenext = cntl->freelist;
-    cntl->freelist = pipe;
-}
-
-// Check for an available pipe on the freelist.
-struct usb_pipe *
-usb_get_freelist(struct usb_s *cntl, u8 eptype)
-{
-    struct usb_pipe **pfree = &cntl->freelist;
-    for (;;) {
-        struct usb_pipe *pipe = *pfree;
-        if (!pipe)
-            return NULL;
-        if (pipe->eptype == eptype) {
-            *pfree = pipe->freenext;
-            return pipe;
-        }
-        pfree = &pipe->freenext;
-    }
-}
-
-// Fill "pipe" endpoint info from an endpoint descriptor.
-void
-usb_desc2pipe(struct usb_pipe *pipe, struct usbdevice_s *usbdev
-              , struct usb_endpoint_descriptor *epdesc)
-{
-    pipe->cntl = usbdev->hub->cntl;
-    pipe->type = usbdev->hub->cntl->type;
-    pipe->ep = epdesc->bEndpointAddress & USB_ENDPOINT_NUMBER_MASK;
-    pipe->devaddr = usbdev->devaddr;
-    pipe->speed = usbdev->speed;
-    pipe->maxpacket = epdesc->wMaxPacketSize;
-    pipe->eptype = epdesc->bmAttributes & USB_ENDPOINT_XFERTYPE_MASK;
-}
-
-// Find the exponential period of the requested interrupt end point.
-int
-usb_get_period(struct usbdevice_s *usbdev
-               , struct usb_endpoint_descriptor *epdesc)
-{
-    int period = epdesc->bInterval;
-    if (usbdev->speed != USB_HIGHSPEED)
-        return (period <= 0) ? 0 : __fls(period);
-    return (period <= 4) ? 0 : period - 4;
-}
-
-// Maximum time (in ms) a data transfer should take
-int
-usb_xfer_time(struct usb_pipe *pipe, int datalen)
-{
-    // Use the maximum command time (5 seconds), except for
-    // set_address commands where we don't want to stall the boot if
-    // the device doesn't actually exist.  Add 100ms to account for
-    // any controller delays.
-    if (!GET_LOWFLAT(pipe->devaddr))
-        return USB_TIME_STATUS + 100;
-    return USB_TIME_COMMAND + 100;
-}
-
-// Find the first endpoint of a given type in an interface description.
-struct usb_endpoint_descriptor *
-usb_find_desc(struct usbdevice_s *usbdev, int type, int dir)
-{
-    struct usb_endpoint_descriptor *epdesc = (void*)&usbdev->iface[1];
-    for (;;) {
-        if ((void*)epdesc >= (void*)usbdev->iface + usbdev->imax
-            || epdesc->bDescriptorType == USB_DT_INTERFACE) {
-            return NULL;
-        }
-        if (epdesc->bDescriptorType == USB_DT_ENDPOINT
-            && (epdesc->bEndpointAddress & USB_ENDPOINT_DIR_MASK) == dir
-            && (epdesc->bmAttributes & USB_ENDPOINT_XFERTYPE_MASK) == type)
-            return epdesc;
-        epdesc = (void*)epdesc + epdesc->bLength;
-    }
-}
-
-// Get the first 8 bytes of the device descriptor.
-static int
-get_device_info8(struct usb_pipe *pipe, struct usb_device_descriptor *dinfo)
-{
-    struct usb_ctrlrequest req;
-    req.bRequestType = USB_DIR_IN | USB_TYPE_STANDARD | USB_RECIP_DEVICE;
-    req.bRequest = USB_REQ_GET_DESCRIPTOR;
-    req.wValue = USB_DT_DEVICE<<8;
-    req.wIndex = 0;
-    req.wLength = 8;
-    return usb_send_default_control(pipe, &req, dinfo);
-}
-
-static struct usb_config_descriptor *
-get_device_config(struct usb_pipe *pipe)
-{
-    struct usb_config_descriptor cfg;
-
-    struct usb_ctrlrequest req;
-    req.bRequestType = USB_DIR_IN | USB_TYPE_STANDARD | USB_RECIP_DEVICE;
-    req.bRequest = USB_REQ_GET_DESCRIPTOR;
-    req.wValue = USB_DT_CONFIG<<8;
-    req.wIndex = 0;
-    req.wLength = sizeof(cfg);
-    int ret = usb_send_default_control(pipe, &req, &cfg);
-    if (ret)
-        return NULL;
-
-    void *config = malloc_tmphigh(cfg.wTotalLength);
-    if (!config) {
-        warn_noalloc();
-        return NULL;
-    }
-    req.wLength = cfg.wTotalLength;
-    ret = usb_send_default_control(pipe, &req, config);
-    if (ret) {
-        free(config);
-        return NULL;
-    }
-    //hexdump(config, cfg.wTotalLength);
-    return config;
-}
-
-static int
-set_configuration(struct usb_pipe *pipe, u16 val)
-{
-    struct usb_ctrlrequest req;
-    req.bRequestType = USB_DIR_OUT | USB_TYPE_STANDARD | USB_RECIP_DEVICE;
-    req.bRequest = USB_REQ_SET_CONFIGURATION;
-    req.wValue = val;
-    req.wIndex = 0;
-    req.wLength = 0;
-    return usb_send_default_control(pipe, &req, NULL);
-}
-
-
-/****************************************************************
- * Initialization and enumeration
- ****************************************************************/
-
-static const int speed_to_ctlsize[] = {
-    [ USB_FULLSPEED  ] = 8,
-    [ USB_LOWSPEED   ] = 8,
-    [ USB_HIGHSPEED  ] = 64,
-    [ USB_SUPERSPEED ] = 512,
-};
-
-// Assign an address to a device in the default state on the given
-// controller.
-static int
-usb_set_address(struct usbdevice_s *usbdev)
-{
-    ASSERT32FLAT();
-    struct usb_s *cntl = usbdev->hub->cntl;
-    dprintf(3, "set_address %p\n", cntl);
-    if (cntl->maxaddr >= USB_MAXADDR)
-        return -1;
-
-    msleep(USB_TIME_RSTRCY);
-
-    // Create a pipe for the default address.
-    struct usb_endpoint_descriptor epdesc = {
-        .wMaxPacketSize = speed_to_ctlsize[usbdev->speed],
-        .bmAttributes = USB_ENDPOINT_XFER_CONTROL,
-    };
-    usbdev->defpipe = usb_alloc_pipe(usbdev, &epdesc);
-    if (!usbdev->defpipe)
-        return -1;
-
-    // Send set_address command.
-    struct usb_ctrlrequest req;
-    req.bRequestType = USB_DIR_OUT | USB_TYPE_STANDARD | USB_RECIP_DEVICE;
-    req.bRequest = USB_REQ_SET_ADDRESS;
-    req.wValue = cntl->maxaddr + 1;
-    req.wIndex = 0;
-    req.wLength = 0;
-    int ret = usb_send_default_control(usbdev->defpipe, &req, NULL);
-    if (ret) {
-        usb_free_pipe(usbdev, usbdev->defpipe);
-        return -1;
-    }
-
-    msleep(USB_TIME_SETADDR_RECOVERY);
-
-    cntl->maxaddr++;
-    usbdev->devaddr = cntl->maxaddr;
-    usbdev->defpipe = usb_realloc_pipe(usbdev, usbdev->defpipe, &epdesc);
-    if (!usbdev->defpipe)
-        return -1;
-    return 0;
-}
-
-// Called for every found device - see if a driver is available for
-// this device and do setup if so.
-static int
-configure_usb_device(struct usbdevice_s *usbdev)
-{
-    ASSERT32FLAT();
-    dprintf(3, "config_usb: %p\n", usbdev->defpipe);
-
-    // Set the max packet size for endpoint 0 of this device.
-    struct usb_device_descriptor dinfo;
-    int ret = get_device_info8(usbdev->defpipe, &dinfo);
-    if (ret)
-        return 0;
-    u16 maxpacket = dinfo.bMaxPacketSize0;
-    if (dinfo.bcdUSB >= 0x0300)
-        maxpacket = 1 << dinfo.bMaxPacketSize0;
-    dprintf(3, "device rev=%04x cls=%02x sub=%02x proto=%02x size=%d\n"
-            , dinfo.bcdUSB, dinfo.bDeviceClass, dinfo.bDeviceSubClass
-            , dinfo.bDeviceProtocol, maxpacket);
-    if (maxpacket < 8)
-        return 0;
-    struct usb_endpoint_descriptor epdesc = {
-        .wMaxPacketSize = maxpacket,
-        .bmAttributes = USB_ENDPOINT_XFER_CONTROL,
-    };
-    usbdev->defpipe = usb_realloc_pipe(usbdev, usbdev->defpipe, &epdesc);
-    if (!usbdev->defpipe)
-        return -1;
-
-    // Get configuration
-    struct usb_config_descriptor *config = get_device_config(usbdev->defpipe);
-    if (!config)
-        return 0;
-
-    // Determine if a driver exists for this device - only look at the
-    // first interface of the first configuration.
-    struct usb_interface_descriptor *iface = (void*)(&config[1]);
-    if (iface->bInterfaceClass != USB_CLASS_HID
-        && iface->bInterfaceClass != USB_CLASS_MASS_STORAGE
-        && iface->bInterfaceClass != USB_CLASS_HUB)
-        // Not a supported device.
-        goto fail;
-
-    // Set the configuration.
-    ret = set_configuration(usbdev->defpipe, config->bConfigurationValue);
-    if (ret)
-        goto fail;
-
-    // Configure driver.
-    usbdev->config = config;
-    usbdev->iface = iface;
-    usbdev->imax = (void*)config + config->wTotalLength - (void*)iface;
-    if (iface->bInterfaceClass == USB_CLASS_HUB)
-        ret = usb_hub_setup(usbdev);
-    else if (iface->bInterfaceClass == USB_CLASS_MASS_STORAGE) {
-        if (iface->bInterfaceProtocol == US_PR_BULK)
-            ret = usb_msc_setup(usbdev);
-        if (iface->bInterfaceProtocol == US_PR_UAS)
-            ret = usb_uas_setup(usbdev);
-    } else
-        ret = usb_hid_setup(usbdev);
-    if (ret)
-        goto fail;
-
-    free(config);
-    return 1;
-fail:
-    free(config);
-    return 0;
-}
-
-static void
-usb_hub_port_setup(void *data)
-{
-    struct usbdevice_s *usbdev = data;
-    struct usbhub_s *hub = usbdev->hub;
-    u32 port = usbdev->port;
-
-    for (;;) {
-        // Detect if device present (and possibly start reset)
-        int ret = hub->op->detect(hub, port);
-        if (ret > 0)
-            // Device connected.
-            break;
-        if (ret < 0 || timer_check(hub->detectend))
-            // No device found.
-            goto done;
-        msleep(5);
-    }
-
-    // XXX - wait USB_TIME_ATTDB time?
-
-    // Reset port and determine device speed
-    mutex_lock(&hub->cntl->resetlock);
-    int ret = hub->op->reset(hub, port);
-    if (ret < 0)
-        // Reset failed
-        goto resetfail;
-    usbdev->speed = ret;
-
-    // Set address of port
-    ret = usb_set_address(usbdev);
-    if (ret) {
-        hub->op->disconnect(hub, port);
-        goto resetfail;
-    }
-    mutex_unlock(&hub->cntl->resetlock);
-
-    // Configure the device
-    int count = configure_usb_device(usbdev);
-    usb_free_pipe(usbdev, usbdev->defpipe);
-    if (!count)
-        hub->op->disconnect(hub, port);
-    hub->devcount += count;
-done:
-    hub->threads--;
-    free(usbdev);
-    return;
-
-resetfail:
-    mutex_unlock(&hub->cntl->resetlock);
-    goto done;
-}
-
-static u32 usb_time_sigatt;
-
-void
-usb_enumerate(struct usbhub_s *hub)
-{
-    u32 portcount = hub->portcount;
-    hub->threads = portcount;
-    hub->detectend = timer_calc(usb_time_sigatt);
-
-    // Launch a thread for every port.
-    int i;
-    for (i=0; i<portcount; i++) {
-        struct usbdevice_s *usbdev = malloc_tmphigh(sizeof(*usbdev));
-        if (!usbdev) {
-            warn_noalloc();
-            continue;
-        }
-        memset(usbdev, 0, sizeof(*usbdev));
-        usbdev->hub = hub;
-        usbdev->port = i;
-        run_thread(usb_hub_port_setup, usbdev);
-    }
-
-    // Wait for threads to complete.
-    while (hub->threads)
-        yield();
-}
-
-void
-usb_setup(void)
-{
-    ASSERT32FLAT();
-    if (! CONFIG_USB)
-        return;
-    dprintf(3, "init usb\n");
-    usb_time_sigatt = romfile_loadint("etc/usb-time-sigatt", USB_TIME_SIGATT);
-    xhci_setup();
-    ehci_setup();
-    uhci_setup();
-    ohci_setup();
-}