arch/x86/kernel/mmconf-fam10h_64.c

   1 // SPDX-License-Identifier: GPL-2.0
   2 /*
   3  * AMD Family 10h mmconfig enablement
   4  */
   5
   6 #include <linux/types.h>
   7 #include <linux/mm.h>
   8 #include <linux/string.h>
   9 #include <linux/pci.h>
  10 #include <linux/dmi.h>
  11 #include <linux/range.h>
  12
  13 #include <asm/pci-direct.h>
  14 #include <linux/sort.h>
  15 #include <asm/io.h>
  16 #include <asm/msr.h>
  17 #include <asm/acpi.h>
  18 #include <asm/mmconfig.h>
  19 #include <asm/pci_x86.h>
  20
  21 struct pci_hostbridge_probe {
  22         u32 bus;
  23         u32 slot;
  24         u32 vendor;
  25         u32 device;
  26 };
  27
  28 static u64 fam10h_pci_mmconf_base;
  29
  30 static struct pci_hostbridge_probe pci_probes[] = {
  31         { 0, 0x18, PCI_VENDOR_ID_AMD, 0x1200 },
  32         { 0xff, 0, PCI_VENDOR_ID_AMD, 0x1200 },
  33 };
  34
  35 static int cmp_range(const void *x1, const void *x2)
  36 {
  37         const struct range *r1 = x1;
  38         const struct range *r2 = x2;
  39         int start1, start2;
  40
  41         start1 = r1->start >> 32;
  42         start2 = r2->start >> 32;
  43
  44         return start1 - start2;
  45 }
  46
  47 #define MMCONF_UNIT (1ULL << FAM10H_MMIO_CONF_BASE_SHIFT)
  48 #define MMCONF_MASK (~(MMCONF_UNIT - 1))
  49 #define MMCONF_SIZE (MMCONF_UNIT << 8)
  50 /* need to avoid (0xfd<<32), (0xfe<<32), and (0xff<<32), ht used space */
  51 #define FAM10H_PCI_MMCONF_BASE (0xfcULL<<32)
  52 #define BASE_VALID(b) ((b) + MMCONF_SIZE <= (0xfdULL<<32) || (b) >= (1ULL<<40))
  53 static void get_fam10h_pci_mmconf_base(void)
  54 {
  55         int i;
  56         unsigned bus;
  57         unsigned slot;
  58         int found;
  59
  60         u64 val;
  61         u32 address;
  62         u64 tom2;
  63         u64 base = FAM10H_PCI_MMCONF_BASE;
  64
  65         int hi_mmio_num;
  66         struct range range[8];
  67
  68         /* only try to get setting from BSP */
  69         if (fam10h_pci_mmconf_base)
  70                 return;
  71
  72         if (!early_pci_allowed())
  73                 return;
  74
  75         found = 0;
  76         for (i = 0; i < ARRAY_SIZE(pci_probes); i++) {
  77                 u32 id;
  78                 u16 device;
  79                 u16 vendor;
  80
  81                 bus = pci_probes[i].bus;
  82                 slot = pci_probes[i].slot;
  83                 id = read_pci_config(bus, slot, 0, PCI_VENDOR_ID);
  84
  85                 vendor = id & 0xffff;
  86                 device = (id>>16) & 0xffff;
  87                 if (pci_probes[i].vendor == vendor &&
  88                     pci_probes[i].device == device) {
  89                         found = 1;
  90                         break;
  91                 }
  92         }
  93
  94         if (!found)
  95                 return;
  96
  97         /* SYS_CFG */
  98         address = MSR_K8_SYSCFG;
  99         rdmsrl(address, val);
 100
 101         /* TOP_MEM2 is not enabled? */
 102         if (!(val & (1<<21))) {
 103                 tom2 = 1ULL << 32;
 104         } else {
 105                 /* TOP_MEM2 */
 106                 address = MSR_K8_TOP_MEM2;
 107                 rdmsrl(address, val);
 108                 tom2 = max(val & 0xffffff800000ULL, 1ULL << 32);
 109         }
 110
 111         if (base <= tom2)
 112                 base = (tom2 + 2 * MMCONF_UNIT - 1) & MMCONF_MASK;
 113
 114         /*
 115          * need to check if the range is in the high mmio range that is
 116          * above 4G
 117          */
 118         hi_mmio_num = 0;
 119         for (i = 0; i < 8; i++) {
 120                 u32 reg;
 121                 u64 start;
 122                 u64 end;
 123                 reg = read_pci_config(bus, slot, 1, 0x80 + (i << 3));
 124                 if (!(reg & 3))
 125                         continue;
 126
 127                 start = (u64)(reg & 0xffffff00) << 8; /* 39:16 on 31:8*/
 128                 reg = read_pci_config(bus, slot, 1, 0x84 + (i << 3));
 129                 end = ((u64)(reg & 0xffffff00) << 8) | 0xffff; /* 39:16 on 31:8*/
 130
 131                 if (end < tom2)
 132                         continue;
 133
 134                 range[hi_mmio_num].start = start;
 135                 range[hi_mmio_num].end = end;
 136                 hi_mmio_num++;
 137         }
 138
 139         if (!hi_mmio_num)
 140                 goto out;
 141
 142         /* sort the range */
 143         sort(range, hi_mmio_num, sizeof(struct range), cmp_range, NULL);
 144
 145         if (range[hi_mmio_num - 1].end < base)
 146                 goto out;
 147         if (range[0].start > base + MMCONF_SIZE)
 148                 goto out;
 149
 150         /* need to find one window */
 151         base = (range[0].start & MMCONF_MASK) - MMCONF_UNIT;
 152         if ((base > tom2) && BASE_VALID(base))
 153                 goto out;
 154         base = (range[hi_mmio_num - 1].end + MMCONF_UNIT) & MMCONF_MASK;
 155         if (BASE_VALID(base))
 156                 goto out;
 157         /* need to find window between ranges */
 158         for (i = 1; i < hi_mmio_num; i++) {
 159                 base = (range[i - 1].end + MMCONF_UNIT) & MMCONF_MASK;
 160                 val = range[i].start & MMCONF_MASK;
 161                 if (val >= base + MMCONF_SIZE && BASE_VALID(base))
 162                         goto out;
 163         }
 164         return;
 165
 166 out:
 167         fam10h_pci_mmconf_base = base;
 168 }
 169
 170 void fam10h_check_enable_mmcfg(void)
 171 {
 172         u64 val;
 173         u32 address;
 174
 175         if (!(pci_probe & PCI_CHECK_ENABLE_AMD_MMCONF))
 176                 return;
 177
 178         address = MSR_FAM10H_MMIO_CONF_BASE;
 179         rdmsrl(address, val);
 180
 181         /* try to make sure that AP's setting is identical to BSP setting */
 182         if (val & FAM10H_MMIO_CONF_ENABLE) {
 183                 unsigned busnbits;
 184                 busnbits = (val >> FAM10H_MMIO_CONF_BUSRANGE_SHIFT) &
 185                         FAM10H_MMIO_CONF_BUSRANGE_MASK;
 186
 187                 /* only trust the one handle 256 buses, if acpi=off */
 188                 if (!acpi_pci_disabled || busnbits >= 8) {
 189                         u64 base = val & MMCONF_MASK;
 190
 191                         if (!fam10h_pci_mmconf_base) {
 192                                 fam10h_pci_mmconf_base = base;
 193                                 return;
 194                         } else if (fam10h_pci_mmconf_base ==  base)
 195                                 return;
 196                 }
 197         }
 198
 199         /*
 200          * if it is not enabled, try to enable it and assume only one segment
 201          * with 256 buses
 202          */
 203         get_fam10h_pci_mmconf_base();
 204         if (!fam10h_pci_mmconf_base) {
 205                 pci_probe &= ~PCI_CHECK_ENABLE_AMD_MMCONF;
 206                 return;
 207         }
 208
 209         printk(KERN_INFO "Enable MMCONFIG on AMD Family 10h\n");
 210         val &= ~((FAM10H_MMIO_CONF_BASE_MASK<<FAM10H_MMIO_CONF_BASE_SHIFT) |
 211              (FAM10H_MMIO_CONF_BUSRANGE_MASK<<FAM10H_MMIO_CONF_BUSRANGE_SHIFT));
 212         val |= fam10h_pci_mmconf_base | (8 << FAM10H_MMIO_CONF_BUSRANGE_SHIFT) |
 213                FAM10H_MMIO_CONF_ENABLE;
 214         wrmsrl(address, val);
 215 }
 216
 217 static int __init set_check_enable_amd_mmconf(const struct dmi_system_id *d)
 218 {
 219         pci_probe |= PCI_CHECK_ENABLE_AMD_MMCONF;
 220         return 0;
 221 }
 222
 223 static const struct dmi_system_id __initconst mmconf_dmi_table[] = {
 224         {
 225                 .callback = set_check_enable_amd_mmconf,
 226                 .ident = "Sun Microsystems Machine",
 227                 .matches = {
 228                         DMI_MATCH(DMI_SYS_VENDOR, "Sun Microsystems"),
 229                 },
 230         },
 231         {}
 232 };
 233
 234 /* Called from a non __init function, but only on the BSP. */
 235 void __ref check_enable_amd_mmconf_dmi(void)
 236 {
 237         dmi_check_system(mmconf_dmi_table);
 238 }