usr/src/uts/i86pc/os/pci_bios.c

   1 /*
   2  * CDDL HEADER START
   3  *
   4  * The contents of this file are subject to the terms of the
   5  * Common Development and Distribution License (the "License").
   6  * You may not use this file except in compliance with the License.
   7  *
   8  * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
   9  * or http://www.opensolaris.org/os/licensing.
  10  * See the License for the specific language governing permissions
  11  * and limitations under the License.
  12  *
  13  * When distributing Covered Code, include this CDDL HEADER in each
  14  * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
  15  * If applicable, add the following below this CDDL HEADER, with the
  16  * fields enclosed by brackets "[]" replaced with your own identifying
  17  * information: Portions Copyright [yyyy] [name of copyright owner]
  18  *
  19  * CDDL HEADER END
  20  */
  21 /*
  22  * Copyright (c) 2006, 2010, Oracle and/or its affiliates. All rights reserved.
  23  */
  24
  25 #include <sys/types.h>
  26 #include <sys/stat.h>
  27 #include <sys/sunndi.h>
  28 #include <sys/pci.h>
  29 #include <sys/pci_impl.h>
  30 #include <sys/pci_cfgspace.h>
  31 #include <sys/pci_cfgspace_impl.h>
  32 #include <sys/memlist.h>
  33 #include <sys/bootconf.h>
  34 #include <sys/psw.h>
  35
  36 /*
  37  * pci irq routing information table
  38  */
  39 int                             pci_irq_nroutes;
  40 static pci_irq_route_t          *pci_irq_routes;
  41
  42
  43 static int pci_bios_get_irq_routing(pci_irq_route_t *, int, int *);
  44 static void pci_get_irq_routing_table(void);
  45
  46
  47 /*
  48  * Retrieve information from the bios needed for system
  49  * configuration early during startup.
  50  */
  51 void
  52 startup_pci_bios(void)
  53 {
  54         pci_get_irq_routing_table();
  55 }
  56
  57
  58 /*
  59  * Issue the bios get irq routing information table interrupt
  60  *
  61  * Despite the name, the information in the table is only
  62  * used to derive slot names for some named pci hot-plug slots.
  63  *
  64  * Returns the number of irq routing table entries returned
  65  * by the bios, or 0 and optionally, the number of entries required.
  66  */
  67 static int
  68 pci_bios_get_irq_routing(pci_irq_route_t *routes, int nroutes, int *nneededp)
  69 {
  70         struct bop_regs regs;
  71         uchar_t         *hdrp;
  72         uchar_t         *bufp;
  73         int             i, n;
  74         int             rval = 0;
  75
  76         if (nneededp)
  77                 *nneededp = 0;
  78
  79         /* in UEFI system, there is no BIOS data */
  80         if (BOP_GETPROPLEN(bootops, "efi-systab") > 0)
  81                 return (0);
  82
  83         /*
  84          * Set up irq routing header with the size and address
  85          * of some useable low-memory data addresses.  Initalize
  86          * data area to zero, avoiding memcpy/bzero.
  87          */
  88         hdrp = (uchar_t *)BIOS_IRQ_ROUTING_HDR;
  89         bufp = (uchar_t *)BIOS_IRQ_ROUTING_DATA;
  90
  91         n = nroutes * sizeof (pci_irq_route_t);
  92         for (i = 0; i < n; i++)
  93                 bufp[i] = 0;
  94         ((pci_irq_route_hdr_t *)hdrp)->pir_size = n;
  95         ((pci_irq_route_hdr_t *)hdrp)->pir_addr = (uint32_t)(uintptr_t)bufp;
  96
  97         bzero(&regs, sizeof (regs));
  98         regs.eax.word.ax = (PCI_FUNCTION_ID << 8) | PCI_GET_IRQ_ROUTING;
  99
 100         regs.ds = 0xf000;
 101         regs.es = FP_SEG((uint_t)(uintptr_t)hdrp);
 102         regs.edi.word.di = FP_OFF((uint_t)(uintptr_t)hdrp);
 103
 104         BOP_DOINT(bootops, 0x1a, &regs);
 105
 106         n = (int)(((pci_irq_route_hdr_t *)hdrp)->pir_size /
 107             sizeof (pci_irq_route_t));
 108
 109         if ((regs.eflags & PS_C) != 0) {
 110                 if (nneededp)
 111                         *nneededp = n;
 112         } else {
 113                 /*
 114                  * Copy resulting irq routing data from low memory up to
 115                  * the kernel address space, avoiding memcpy as usual.
 116                  */
 117                 if (n <= nroutes) {
 118                         for (i = 0; i < n * sizeof (pci_irq_route_t); i++)
 119                                 ((uchar_t *)routes)[i] = bufp[i];
 120                         rval = n;
 121                 }
 122         }
 123         return (rval);
 124 }
 125
 126 static void
 127 pci_get_irq_routing_table(void)
 128 {
 129         pci_irq_route_t *routes;
 130         int             n = N_PCI_IRQ_ROUTES;
 131         int             nneeded = 0;
 132         int             nroutes;
 133
 134         /*
 135          * Get irq routing table information.
 136          * Allocate a buffer for an initial default number of entries.
 137          * If the bios indicates it needs a larger buffer, try it again.
 138          * Drive on if it still won't cooperate and play nice after that.
 139          */
 140         routes = kmem_zalloc(n * sizeof (pci_irq_route_t), KM_SLEEP);
 141         nroutes = pci_bios_get_irq_routing(routes, n, &nneeded);
 142         if (nroutes == 0 && nneeded > n) {
 143                 kmem_free(routes, n * sizeof (pci_irq_route_t));
 144                 if (nneeded > N_PCI_IRQ_ROUTES_MAX) {
 145                         cmn_err(CE_CONT,
 146                             "pci: unable to get IRQ routing information, "
 147                             "required buffer space of %d entries exceeds max\n",
 148                             nneeded);
 149                         return;
 150                 }
 151                 n = nneeded;
 152                 routes = kmem_zalloc(n * sizeof (pci_irq_route_t), KM_SLEEP);
 153                 nroutes = pci_bios_get_irq_routing(routes, n, NULL);
 154                 if (nroutes == 0) {
 155                         cmn_err(CE_CONT,
 156                             "pci: unable to get IRQ routing information, "
 157                             "required buffer space for %d entries\n", n);
 158                         kmem_free(routes, n * sizeof (pci_irq_route_t));
 159                 }
 160         }
 161
 162         if (nroutes > 0) {
 163                 pci_irq_routes = routes;
 164                 pci_irq_nroutes = nroutes;
 165         }
 166 }
 167
 168 /*
 169  * Use the results of the PCI BIOS call that returned the routing tables
 170  * to build the 1275 slot-names property for the indicated bus.
 171  * Results are returned in buf.  Length is return value, -1 is returned on
 172  * overflow and zero is returned if no data exists to build a property.
 173  */
 174 int
 175 pci_slot_names_prop(int bus, char *buf, int len)
 176 {
 177         uchar_t         dev;
 178         uchar_t         slot[N_PCI_IRQ_ROUTES_MAX+1];
 179         uint32_t         mask;
 180         int             i, nnames, plen;
 181
 182         ASSERT(pci_irq_nroutes <= N_PCI_IRQ_ROUTES_MAX);
 183
 184         if (pci_irq_nroutes == 0)
 185                 return (0);
 186         nnames = 0;
 187         mask = 0;
 188         for (i = 0; i < pci_irq_nroutes; i++)
 189                 slot[i] = 0xff;
 190         for (i = 0; i < pci_irq_nroutes; i++) {
 191                 if (pci_irq_routes[i].pir_bus != bus)
 192                         continue;
 193                 if (pci_irq_routes[i].pir_slot != 0) {
 194                         dev = (pci_irq_routes[i].pir_dev & 0xf8) >> 3;
 195                         slot[dev] = pci_irq_routes[i].pir_slot;
 196                         mask |= (1 << dev);
 197                         nnames++;
 198                 }
 199         }
 200
 201         if (nnames == 0)
 202                 return (0);
 203
 204         if (len < (4 + nnames * 8))
 205                 return (-1);
 206         *(uint32_t *)buf = mask;
 207         plen = 4;
 208         for (i = 0; i < pci_irq_nroutes; i++) {
 209                 if (slot[i] == 0xff)
 210                         continue;
 211                 (void) sprintf(buf + plen, "Slot%d", slot[i]);
 212                 plen += strlen(buf+plen) + 1;
 213                 *(buf + plen) = 0;
 214         }
 215         for (; plen % 4; plen++)
 216                 *(buf + plen) = 0;
 217         return (plen);
 218 }