1 // SPDX-License-Identifier: GPL-2.0 2 /* 3 * Driver for Intel(R) 10nm server memory controller. 4 * Copyright (c) 2019, Intel Corporation. 5 * 6 */ 7 8 #include <linux/kernel.h> 9 #include <asm/cpu_device_id.h> 10 #include <asm/intel-family.h> 11 #include <asm/mce.h> 12 #include "edac_module.h" 13 #include "skx_common.h" 14 15 #define I10NM_REVISION "v0.0.3" 16 #define EDAC_MOD_STR "i10nm_edac" 17 18 /* Debug macros */ 19 #define i10nm_printk(level, fmt, arg...) \ 20 edac_printk(level, "i10nm", fmt, ##arg) 21 22 #define I10NM_GET_SCK_BAR(d, reg) \ 23 pci_read_config_dword((d)->uracu, 0xd0, &(reg)) 24 #define I10NM_GET_IMC_BAR(d, i, reg) \ 25 pci_read_config_dword((d)->uracu, 0xd8 + (i) * 4, &(reg)) 26 #define I10NM_GET_DIMMMTR(m, i, j) \ 27 (*(u32 *)((m)->mbase + 0x2080c + (i) * 0x4000 + (j) * 4)) 28 #define I10NM_GET_MCDDRTCFG(m, i, j) \ 29 (*(u32 *)((m)->mbase + 0x20970 + (i) * 0x4000 + (j) * 4)) 30 31 #define I10NM_GET_SCK_MMIO_BASE(reg) (GET_BITFIELD(reg, 0, 28) << 23) 32 #define I10NM_GET_IMC_MMIO_OFFSET(reg) (GET_BITFIELD(reg, 0, 10) << 12) 33 #define I10NM_GET_IMC_MMIO_SIZE(reg) ((GET_BITFIELD(reg, 13, 23) - \ 34 GET_BITFIELD(reg, 0, 10) + 1) << 12) 35 36 static struct list_head *i10nm_edac_list; 37 38 static struct pci_dev *pci_get_dev_wrapper(int dom, unsigned int bus, 39 unsigned int dev, unsigned int fun) 40 { 41 struct pci_dev *pdev; 42 43 pdev = pci_get_domain_bus_and_slot(dom, bus, PCI_DEVFN(dev, fun)); 44 if (!pdev) { 45 edac_dbg(2, "No device %02x:%02x.%x\n", 46 bus, dev, fun); 47 return NULL; 48 } 49 50 if (unlikely(pci_enable_device(pdev) < 0)) { 51 edac_dbg(2, "Failed to enable device %02x:%02x.%x\n", 52 bus, dev, fun); 53 return NULL; 54 } 55 56 pci_dev_get(pdev); 57 58 return pdev; 59 } 60 61 static int i10nm_get_all_munits(void) 62 { 63 struct pci_dev *mdev; 64 void __iomem *mbase; 65 unsigned long size; 66 struct skx_dev *d; 67 int i, j = 0; 68 u32 reg, off; 69 u64 base; 70 71 list_for_each_entry(d, i10nm_edac_list, list) { 72 d->util_all = pci_get_dev_wrapper(d->seg, d->bus[1], 29, 1); 73 if (!d->util_all) 74 return -ENODEV; 75 76 d->uracu = pci_get_dev_wrapper(d->seg, d->bus[0], 0, 1); 77 if (!d->uracu) 78 return -ENODEV; 79 80 if (I10NM_GET_SCK_BAR(d, reg)) { 81 i10nm_printk(KERN_ERR, "Failed to socket bar\n"); 82 return -ENODEV; 83 } 84 85 base = I10NM_GET_SCK_MMIO_BASE(reg); 86 edac_dbg(2, "socket%d mmio base 0x%llx (reg 0x%x)\n", 87 j++, base, reg); 88 89 for (i = 0; i < I10NM_NUM_IMC; i++) { 90 mdev = pci_get_dev_wrapper(d->seg, d->bus[0], 91 12 + i, 0); 92 if (i == 0 && !mdev) { 93 i10nm_printk(KERN_ERR, "No IMC found\n"); 94 return -ENODEV; 95 } 96 if (!mdev) 97 continue; 98 99 d->imc[i].mdev = mdev; 100 101 if (I10NM_GET_IMC_BAR(d, i, reg)) { 102 i10nm_printk(KERN_ERR, "Failed to get mc bar\n"); 103 return -ENODEV; 104 } 105 106 off = I10NM_GET_IMC_MMIO_OFFSET(reg); 107 size = I10NM_GET_IMC_MMIO_SIZE(reg); 108 edac_dbg(2, "mc%d mmio base 0x%llx size 0x%lx (reg 0x%x)\n", 109 i, base + off, size, reg); 110 111 mbase = ioremap(base + off, size); 112 if (!mbase) { 113 i10nm_printk(KERN_ERR, "Failed to ioremap 0x%llx\n", 114 base + off); 115 return -ENODEV; 116 } 117 118 d->imc[i].mbase = mbase; 119 } 120 } 121 122 return 0; 123 } 124 125 static struct res_config i10nm_cfg0 = { 126 .type = I10NM, 127 .decs_did = 0x3452, 128 .busno_cfg_offset = 0xcc, 129 }; 130 131 static struct res_config i10nm_cfg1 = { 132 .type = I10NM, 133 .decs_did = 0x3452, 134 .busno_cfg_offset = 0xd0, 135 }; 136 137 static const struct x86_cpu_id i10nm_cpuids[] = { 138 X86_MATCH_INTEL_FAM6_MODEL(ATOM_TREMONT_D, &i10nm_cfg0), 139 X86_MATCH_INTEL_FAM6_MODEL(ICELAKE_X, &i10nm_cfg0), 140 X86_MATCH_INTEL_FAM6_MODEL(ICELAKE_D, &i10nm_cfg1), 141 {} 142 }; 143 MODULE_DEVICE_TABLE(x86cpu, i10nm_cpuids); 144 145 static bool i10nm_check_ecc(struct skx_imc *imc, int chan) 146 { 147 u32 mcmtr; 148 149 mcmtr = *(u32 *)(imc->mbase + 0x20ef8 + chan * 0x4000); 150 edac_dbg(1, "ch%d mcmtr reg %x\n", chan, mcmtr); 151 152 return !!GET_BITFIELD(mcmtr, 2, 2); 153 } 154 155 static int i10nm_get_dimm_config(struct mem_ctl_info *mci) 156 { 157 struct skx_pvt *pvt = mci->pvt_info; 158 struct skx_imc *imc = pvt->imc; 159 struct dimm_info *dimm; 160 u32 mtr, mcddrtcfg; 161 int i, j, ndimms; 162 163 for (i = 0; i < I10NM_NUM_CHANNELS; i++) { 164 if (!imc->mbase) 165 continue; 166 167 ndimms = 0; 168 for (j = 0; j < I10NM_NUM_DIMMS; j++) { 169 dimm = edac_get_dimm(mci, i, j, 0); 170 mtr = I10NM_GET_DIMMMTR(imc, i, j); 171 mcddrtcfg = I10NM_GET_MCDDRTCFG(imc, i, j); 172 edac_dbg(1, "dimmmtr 0x%x mcddrtcfg 0x%x (mc%d ch%d dimm%d)\n", 173 mtr, mcddrtcfg, imc->mc, i, j); 174 175 if (IS_DIMM_PRESENT(mtr)) 176 ndimms += skx_get_dimm_info(mtr, 0, 0, dimm, 177 imc, i, j); 178 else if (IS_NVDIMM_PRESENT(mcddrtcfg, j)) 179 ndimms += skx_get_nvdimm_info(dimm, imc, i, j, 180 EDAC_MOD_STR); 181 } 182 if (ndimms && !i10nm_check_ecc(imc, i)) { 183 i10nm_printk(KERN_ERR, "ECC is disabled on imc %d channel %d\n", 184 imc->mc, i); 185 return -ENODEV; 186 } 187 } 188 189 return 0; 190 } 191 192 static struct notifier_block i10nm_mce_dec = { 193 .notifier_call = skx_mce_check_error, 194 .priority = MCE_PRIO_EDAC, 195 }; 196 197 #ifdef CONFIG_EDAC_DEBUG 198 /* 199 * Debug feature. 200 * Exercise the address decode logic by writing an address to 201 * /sys/kernel/debug/edac/i10nm_test/addr. 202 */ 203 static struct dentry *i10nm_test; 204 205 static int debugfs_u64_set(void *data, u64 val) 206 { 207 struct mce m; 208 209 pr_warn_once("Fake error to 0x%llx injected via debugfs\n", val); 210 211 memset(&m, 0, sizeof(m)); 212 /* ADDRV + MemRd + Unknown channel */ 213 m.status = MCI_STATUS_ADDRV + 0x90; 214 /* One corrected error */ 215 m.status |= BIT_ULL(MCI_STATUS_CEC_SHIFT); 216 m.addr = val; 217 skx_mce_check_error(NULL, 0, &m); 218 219 return 0; 220 } 221 DEFINE_SIMPLE_ATTRIBUTE(fops_u64_wo, NULL, debugfs_u64_set, "%llu\n"); 222 223 static void setup_i10nm_debug(void) 224 { 225 i10nm_test = edac_debugfs_create_dir("i10nm_test"); 226 if (!i10nm_test) 227 return; 228 229 if (!edac_debugfs_create_file("addr", 0200, i10nm_test, 230 NULL, &fops_u64_wo)) { 231 debugfs_remove(i10nm_test); 232 i10nm_test = NULL; 233 } 234 } 235 236 static void teardown_i10nm_debug(void) 237 { 238 debugfs_remove_recursive(i10nm_test); 239 } 240 #else 241 static inline void setup_i10nm_debug(void) {} 242 static inline void teardown_i10nm_debug(void) {} 243 #endif /*CONFIG_EDAC_DEBUG*/ 244 245 static int __init i10nm_init(void) 246 { 247 u8 mc = 0, src_id = 0, node_id = 0; 248 const struct x86_cpu_id *id; 249 struct res_config *cfg; 250 const char *owner; 251 struct skx_dev *d; 252 int rc, i, off[3] = {0xd0, 0xc8, 0xcc}; 253 u64 tolm, tohm; 254 255 edac_dbg(2, "\n"); 256 257 owner = edac_get_owner(); 258 if (owner && strncmp(owner, EDAC_MOD_STR, sizeof(EDAC_MOD_STR))) 259 return -EBUSY; 260 261 id = x86_match_cpu(i10nm_cpuids); 262 if (!id) 263 return -ENODEV; 264 265 cfg = (struct res_config *)id->driver_data; 266 267 /* Newer steppings have different offset for ATOM_TREMONT_D/ICELAKE_X */ 268 if (boot_cpu_data.x86_stepping >= 4) 269 cfg->busno_cfg_offset = 0xd0; 270 271 rc = skx_get_hi_lo(0x09a2, off, &tolm, &tohm); 272 if (rc) 273 return rc; 274 275 rc = skx_get_all_bus_mappings(cfg, &i10nm_edac_list); 276 if (rc < 0) 277 goto fail; 278 if (rc == 0) { 279 i10nm_printk(KERN_ERR, "No memory controllers found\n"); 280 return -ENODEV; 281 } 282 283 rc = i10nm_get_all_munits(); 284 if (rc < 0) 285 goto fail; 286 287 list_for_each_entry(d, i10nm_edac_list, list) { 288 rc = skx_get_src_id(d, 0xf8, &src_id); 289 if (rc < 0) 290 goto fail; 291 292 rc = skx_get_node_id(d, &node_id); 293 if (rc < 0) 294 goto fail; 295 296 edac_dbg(2, "src_id = %d node_id = %d\n", src_id, node_id); 297 for (i = 0; i < I10NM_NUM_IMC; i++) { 298 if (!d->imc[i].mdev) 299 continue; 300 301 d->imc[i].mc = mc++; 302 d->imc[i].lmc = i; 303 d->imc[i].src_id = src_id; 304 d->imc[i].node_id = node_id; 305 306 rc = skx_register_mci(&d->imc[i], d->imc[i].mdev, 307 "Intel_10nm Socket", EDAC_MOD_STR, 308 i10nm_get_dimm_config); 309 if (rc < 0) 310 goto fail; 311 } 312 } 313 314 rc = skx_adxl_get(); 315 if (rc) 316 goto fail; 317 318 opstate_init(); 319 mce_register_decode_chain(&i10nm_mce_dec); 320 setup_i10nm_debug(); 321 322 i10nm_printk(KERN_INFO, "%s\n", I10NM_REVISION); 323 324 return 0; 325 fail: 326 skx_remove(); 327 return rc; 328 } 329 330 static void __exit i10nm_exit(void) 331 { 332 edac_dbg(2, "\n"); 333 teardown_i10nm_debug(); 334 mce_unregister_decode_chain(&i10nm_mce_dec); 335 skx_adxl_put(); 336 skx_remove(); 337 } 338 339 module_init(i10nm_init); 340 module_exit(i10nm_exit); 341 342 MODULE_LICENSE("GPL v2"); 343 MODULE_DESCRIPTION("MC Driver for Intel 10nm server processors"); 344