payloads/libpayload/drivers/usb/ehci_rh.c

   1 /*
   2  * This file is part of the libpayload project.
   3  *
   4  * Copyright (C) 2010 coresystems GmbH
   5  *
   6  * Redistribution and use in source and binary forms, with or without
   7  * modification, are permitted provided that the following conditions
   8  * are met:
   9  * 1. Redistributions of source code must retain the above copyright
  10  *    notice, this list of conditions and the following disclaimer.
  11  * 2. Redistributions in binary form must reproduce the above copyright
  12  *    notice, this list of conditions and the following disclaimer in the
  13  *    documentation and/or other materials provided with the distribution.
  14  * 3. The name of the author may not be used to endorse or promote products
  15  *    derived from this software without specific prior written permission.
  16  *
  17  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
  18  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  19  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  20  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
  21  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  22  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
  23  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  24  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
  25  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
  26  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
  27  * SUCH DAMAGE.
  28  */
  29
  30 #include <libpayload.h>
  31 #include "ehci.h"
  32 #include "ehci_private.h"
  33
  34 typedef struct {
  35         int n_ports;
  36         /* typical C, n_ports is the number
  37          * of ports, while ports[] spans [0,n_ports-1],
  38          * even though the spec counts from 1.
  39          */
  40         volatile portsc_t *ports;
  41         int *devices;
  42 } rh_inst_t;
  43
  44 #define RH_INST(dev) ((rh_inst_t*)(dev)->data)
  45
  46 static void
  47 ehci_rh_destroy (usbdev_t *dev)
  48 {
  49         free (RH_INST(dev)->devices);
  50         free (RH_INST(dev));
  51 }
  52
  53 static void
  54 ehci_rh_hand_over_port (usbdev_t *dev, int port)
  55 {
  56         debug("giving up port %x, it's USB1\n", port+1);
  57
  58         /* Lowspeed device. Hand over to companion */
  59         RH_INST(dev)->ports[port] |= P_PORT_OWNER;
  60         do {} while (!(RH_INST(dev)->ports[port] & P_CONN_STATUS_CHANGE));
  61         /* RW/C register, so clear it by writing 1 */
  62         RH_INST(dev)->ports[port] |= P_CONN_STATUS_CHANGE;
  63         return;
  64 }
  65
  66 static void
  67 ehci_rh_scanport (usbdev_t *dev, int port)
  68 {
  69         if (RH_INST(dev)->devices[port]!=-1) {
  70                 debug("Unregister device at port %x\n", port+1);
  71                 usb_detach_device(dev->controller, RH_INST(dev)->devices[port]);
  72                 RH_INST(dev)->devices[port]=-1;
  73         }
  74         /* device connected, handle */
  75         if (RH_INST(dev)->ports[port] & P_CURR_CONN_STATUS) {
  76                 mdelay(100);
  77                 if ((RH_INST(dev)->ports[port] & P_LINE_STATUS) == P_LINE_STATUS_LOWSPEED) {
  78                         ehci_rh_hand_over_port(dev, port);
  79                         return;
  80                 }
  81
  82                 /* Deassert enable, assert reset.  These must change
  83                  * atomically.
  84                  */
  85                 RH_INST(dev)->ports[port] = (RH_INST(dev)->ports[port] & ~P_PORT_ENABLE) | P_PORT_RESET;
  86
  87                 /* Wait a bit while reset is active. */
  88                 mdelay(50);
  89
  90                 /* Deassert reset. */
  91                 RH_INST(dev)->ports[port] &= ~P_PORT_RESET;
  92
  93                 /* Wait for flag change to finish. The controller might take a while */
  94                 while (RH_INST(dev)->ports[port] & P_PORT_RESET) ;
  95                 if (!(RH_INST(dev)->ports[port] & P_PORT_ENABLE)) {
  96                         ehci_rh_hand_over_port(dev, port);
  97                         return;
  98                 }
  99                 debug("port %x hosts a USB2 device\n", port+1);
 100                 RH_INST(dev)->devices[port] = usb_attach_device(dev->controller, dev->address, port, 2);
 101         }
 102         /* RW/C register, so clear it by writing 1 */
 103         RH_INST(dev)->ports[port] |= P_CONN_STATUS_CHANGE;
 104 }
 105
 106 static int
 107 ehci_rh_report_port_changes (usbdev_t *dev)
 108 {
 109         int i;
 110         for (i=0; i<RH_INST(dev)->n_ports; i++) {
 111                 if (RH_INST(dev)->ports[i] & P_CONN_STATUS_CHANGE)
 112                         return i;
 113         }
 114         return -1;
 115 }
 116
 117 static void
 118 ehci_rh_poll (usbdev_t *dev)
 119 {
 120         int port;
 121         while ((port = ehci_rh_report_port_changes (dev)) != -1)
 122                 ehci_rh_scanport (dev, port);
 123 }
 124
 125
 126 void
 127 ehci_rh_init (usbdev_t *dev)
 128 {
 129         int i;
 130         dev->destroy = ehci_rh_destroy;
 131         dev->poll = ehci_rh_poll;
 132
 133         dev->data = malloc(sizeof(rh_inst_t));
 134
 135         RH_INST(dev)->n_ports = EHCI_INST(dev->controller)->capabilities->hcsparams & HCS_NPORTS_MASK;
 136         RH_INST(dev)->ports = EHCI_INST(dev->controller)->operation->portsc;
 137
 138         debug("root hub has %x ports\n", RH_INST(dev)->n_ports);
 139
 140         RH_INST(dev)->devices = malloc(RH_INST(dev)->n_ports * sizeof(int));
 141         for (i=0; i < RH_INST(dev)->n_ports; i++) {
 142                 RH_INST(dev)->devices[i] = -1;
 143                 RH_INST(dev)->ports[i] |= P_PP;
 144                 ehci_rh_scanport(dev, i);
 145         }
 146
 147         dev->address = 0;
 148         dev->hub = -1;
 149         dev->port = -1;
 150 }