drivers/acpi/pci_slot.c

   1 /*
   2  *  pci_slot.c - ACPI PCI Slot Driver
   3  *
   4  *  The code here is heavily leveraged from the acpiphp module.
   5  *  Thanks to Matthew Wilcox <matthew@wil.cx> for much guidance.
   6  *  Thanks to Kenji Kaneshige <kaneshige.kenji@jp.fujitsu.com> for code
   7  *  review and fixes.
   8  *
   9  *  Copyright (C) 2007-2008 Hewlett-Packard Development Company, L.P.
  10  *      Alex Chiang <achiang@hp.com>
  11  *
  12  *  Copyright (C) 2013 Huawei Tech. Co., Ltd.
  13  *      Jiang Liu <jiang.liu@huawei.com>
  14  *
  15  *  This program is free software; you can redistribute it and/or modify it
  16  *  under the terms and conditions of the GNU General Public License,
  17  *  version 2, as published by the Free Software Foundation.
  18  *
  19  *  This program is distributed in the hope that it will be useful, but
  20  *  WITHOUT ANY WARRANTY; without even the implied warranty of
  21  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  22  *  General Public License for more details.
  23  */
  24
  25 #define pr_fmt(fmt) KBUILD_MODNAME ": " fmt
  26
  27 #include <linux/kernel.h>
  28 #include <linux/module.h>
  29 #include <linux/init.h>
  30 #include <linux/slab.h>
  31 #include <linux/types.h>
  32 #include <linux/list.h>
  33 #include <linux/pci.h>
  34 #include <linux/acpi.h>
  35 #include <linux/dmi.h>
  36 #include <linux/pci-acpi.h>
  37
  38 static bool debug;
  39 static int check_sta_before_sun;
  40
  41 #define DRIVER_VERSION  "0.1"
  42 #define DRIVER_AUTHOR   "Alex Chiang <achiang@hp.com>"
  43 #define DRIVER_DESC     "ACPI PCI Slot Detection Driver"
  44 MODULE_AUTHOR(DRIVER_AUTHOR);
  45 MODULE_DESCRIPTION(DRIVER_DESC);
  46 MODULE_LICENSE("GPL");
  47 MODULE_PARM_DESC(debug, "Debugging mode enabled or not");
  48 module_param(debug, bool, 0644);
  49
  50 #define _COMPONENT              ACPI_PCI_COMPONENT
  51 ACPI_MODULE_NAME("pci_slot");
  52
  53 #define dbg(fmt, ...)                                           \
  54 do {                                                            \
  55         if (debug)                                              \
  56                 pr_debug(fmt, ##__VA_ARGS__);                   \
  57 } while (0)
  58
  59 #define SLOT_NAME_SIZE 21               /* Inspired by #define in acpiphp.h */
  60
  61 struct acpi_pci_slot {
  62         struct pci_slot *pci_slot;      /* corresponding pci_slot */
  63         struct list_head list;          /* node in the list of slots */
  64 };
  65
  66 static LIST_HEAD(slot_list);
  67 static DEFINE_MUTEX(slot_list_lock);
  68
  69 static int
  70 check_slot(acpi_handle handle, unsigned long long *sun)
  71 {
  72         int device = -1;
  73         unsigned long long adr, sta;
  74         acpi_status status;
  75         struct acpi_buffer buffer = { ACPI_ALLOCATE_BUFFER, NULL };
  76
  77         acpi_get_name(handle, ACPI_FULL_PATHNAME, &buffer);
  78         dbg("Checking slot on path: %s\n", (char *)buffer.pointer);
  79
  80         if (check_sta_before_sun) {
  81                 /* If SxFy doesn't have _STA, we just assume it's there */
  82                 status = acpi_evaluate_integer(handle, "_STA", NULL, &sta);
  83                 if (ACPI_SUCCESS(status) && !(sta & ACPI_STA_DEVICE_PRESENT))
  84                         goto out;
  85         }
  86
  87         status = acpi_evaluate_integer(handle, "_ADR", NULL, &adr);
  88         if (ACPI_FAILURE(status)) {
  89                 dbg("_ADR returned %d on %s\n", status, (char *)buffer.pointer);
  90                 goto out;
  91         }
  92
  93         /* No _SUN == not a slot == bail */
  94         status = acpi_evaluate_integer(handle, "_SUN", NULL, sun);
  95         if (ACPI_FAILURE(status)) {
  96                 dbg("_SUN returned %d on %s\n", status, (char *)buffer.pointer);
  97                 goto out;
  98         }
  99
 100         device = (adr >> 16) & 0xffff;
 101 out:
 102         kfree(buffer.pointer);
 103         return device;
 104 }
 105
 106 /*
 107  * Check whether handle has an associated slot and create PCI slot if it has.
 108  */
 109 static acpi_status
 110 register_slot(acpi_handle handle, u32 lvl, void *context, void **rv)
 111 {
 112         int device;
 113         unsigned long long sun;
 114         char name[SLOT_NAME_SIZE];
 115         struct acpi_pci_slot *slot;
 116         struct pci_slot *pci_slot;
 117         struct pci_bus *pci_bus = context;
 118
 119         device = check_slot(handle, &sun);
 120         if (device < 0)
 121                 return AE_OK;
 122
 123         /*
 124          * There may be multiple PCI functions associated with the same slot.
 125          * Check whether PCI slot has already been created for this PCI device.
 126          */
 127         list_for_each_entry(slot, &slot_list, list) {
 128                 pci_slot = slot->pci_slot;
 129                 if (pci_slot->bus == pci_bus && pci_slot->number == device)
 130                         return AE_OK;
 131         }
 132
 133         slot = kmalloc(sizeof(*slot), GFP_KERNEL);
 134         if (!slot)
 135                 return AE_OK;
 136
 137         snprintf(name, sizeof(name), "%llu", sun);
 138         pci_slot = pci_create_slot(pci_bus, device, name, NULL);
 139         if (IS_ERR(pci_slot)) {
 140                 pr_err("pci_create_slot returned %ld\n", PTR_ERR(pci_slot));
 141                 kfree(slot);
 142                 return AE_OK;
 143         }
 144
 145         slot->pci_slot = pci_slot;
 146         list_add(&slot->list, &slot_list);
 147
 148         get_device(&pci_bus->dev);
 149
 150         dbg("%p, pci_bus: %x, device: %d, name: %s\n",
 151             pci_slot, pci_bus->number, device, name);
 152
 153         return AE_OK;
 154 }
 155
 156 void acpi_pci_slot_enumerate(struct pci_bus *bus)
 157 {
 158         acpi_handle handle = ACPI_HANDLE(bus->bridge);
 159
 160         if (handle) {
 161                 mutex_lock(&slot_list_lock);
 162                 acpi_walk_namespace(ACPI_TYPE_DEVICE, handle, 1,
 163                                     register_slot, NULL, bus, NULL);
 164                 mutex_unlock(&slot_list_lock);
 165         }
 166 }
 167
 168 void acpi_pci_slot_remove(struct pci_bus *bus)
 169 {
 170         struct acpi_pci_slot *slot, *tmp;
 171
 172         mutex_lock(&slot_list_lock);
 173         list_for_each_entry_safe(slot, tmp, &slot_list, list) {
 174                 if (slot->pci_slot->bus == bus) {
 175                         list_del(&slot->list);
 176                         pci_destroy_slot(slot->pci_slot);
 177                         put_device(&bus->dev);
 178                         kfree(slot);
 179                 }
 180         }
 181         mutex_unlock(&slot_list_lock);
 182 }
 183
 184 static int do_sta_before_sun(const struct dmi_system_id *d)
 185 {
 186         pr_info("%s detected: will evaluate _STA before calling _SUN\n",
 187                 d->ident);
 188         check_sta_before_sun = 1;
 189         return 0;
 190 }
 191
 192 static struct dmi_system_id acpi_pci_slot_dmi_table[] __initdata = {
 193         /*
 194          * Fujitsu Primequest machines will return 1023 to indicate an
 195          * error if the _SUN method is evaluated on SxFy objects that
 196          * are not present (as indicated by _STA), so for those machines,
 197          * we want to check _STA before evaluating _SUN.
 198          */
 199         {
 200          .callback = do_sta_before_sun,
 201          .ident = "Fujitsu PRIMEQUEST",
 202          .matches = {
 203                 DMI_MATCH(DMI_BIOS_VENDOR, "FUJITSU LIMITED"),
 204                 DMI_MATCH(DMI_BIOS_VERSION, "PRIMEQUEST"),
 205                 },
 206         },
 207         {}
 208 };
 209
 210 void __init acpi_pci_slot_init(void)
 211 {
 212         dmi_check_system(acpi_pci_slot_dmi_table);
 213 }