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 <linux/io.h>
10 #include <asm/cpu_device_id.h>
11 #include <asm/intel-family.h>
12 #include <asm/mce.h>
13 #include "edac_module.h"
14 #include "skx_common.h"
15 
16 #define I10NM_REVISION	"v0.0.5"
17 #define EDAC_MOD_STR	"i10nm_edac"
18 
19 /* Debug macros */
20 #define i10nm_printk(level, fmt, arg...)	\
21 	edac_printk(level, "i10nm", fmt, ##arg)
22 
23 #define I10NM_GET_SCK_BAR(d, reg)	\
24 	pci_read_config_dword((d)->uracu, 0xd0, &(reg))
25 #define I10NM_GET_IMC_BAR(d, i, reg)	\
26 	pci_read_config_dword((d)->uracu, 0xd8 + (i) * 4, &(reg))
27 #define I10NM_GET_SAD(d, offset, i, reg)\
28 	pci_read_config_dword((d)->sad_all, (offset) + (i) * 8, &(reg))
29 #define I10NM_GET_HBM_IMC_BAR(d, reg)	\
30 	pci_read_config_dword((d)->uracu, 0xd4, &(reg))
31 #define I10NM_GET_CAPID3_CFG(d, reg)	\
32 	pci_read_config_dword((d)->pcu_cr3, 0x90, &(reg))
33 #define I10NM_GET_DIMMMTR(m, i, j)	\
34 	readl((m)->mbase + ((m)->hbm_mc ? 0x80c : 0x2080c) + \
35 	(i) * (m)->chan_mmio_sz + (j) * 4)
36 #define I10NM_GET_MCDDRTCFG(m, i)	\
37 	readl((m)->mbase + ((m)->hbm_mc ? 0x970 : 0x20970) + \
38 	(i) * (m)->chan_mmio_sz)
39 #define I10NM_GET_MCMTR(m, i)		\
40 	readl((m)->mbase + ((m)->hbm_mc ? 0xef8 : 0x20ef8) + \
41 	(i) * (m)->chan_mmio_sz)
42 #define I10NM_GET_AMAP(m, i)		\
43 	readl((m)->mbase + ((m)->hbm_mc ? 0x814 : 0x20814) + \
44 	(i) * (m)->chan_mmio_sz)
45 #define I10NM_GET_REG32(m, i, offset)	\
46 	readl((m)->mbase + (i) * (m)->chan_mmio_sz + (offset))
47 #define I10NM_GET_REG64(m, i, offset)	\
48 	readq((m)->mbase + (i) * (m)->chan_mmio_sz + (offset))
49 #define I10NM_SET_REG32(m, i, offset, v)	\
50 	writel(v, (m)->mbase + (i) * (m)->chan_mmio_sz + (offset))
51 
52 #define I10NM_GET_SCK_MMIO_BASE(reg)	(GET_BITFIELD(reg, 0, 28) << 23)
53 #define I10NM_GET_IMC_MMIO_OFFSET(reg)	(GET_BITFIELD(reg, 0, 10) << 12)
54 #define I10NM_GET_IMC_MMIO_SIZE(reg)	((GET_BITFIELD(reg, 13, 23) - \
55 					 GET_BITFIELD(reg, 0, 10) + 1) << 12)
56 #define I10NM_GET_HBM_IMC_MMIO_OFFSET(reg)	\
57 	((GET_BITFIELD(reg, 0, 10) << 12) + 0x140000)
58 
59 #define I10NM_HBM_IMC_MMIO_SIZE		0x9000
60 #define I10NM_IS_HBM_PRESENT(reg)	GET_BITFIELD(reg, 27, 30)
61 #define I10NM_IS_HBM_IMC(reg)		GET_BITFIELD(reg, 29, 29)
62 
63 #define I10NM_MAX_SAD			16
64 #define I10NM_SAD_ENABLE(reg)		GET_BITFIELD(reg, 0, 0)
65 #define I10NM_SAD_NM_CACHEABLE(reg)	GET_BITFIELD(reg, 5, 5)
66 
67 #define RETRY_RD_ERR_LOG_UC		BIT(1)
68 #define RETRY_RD_ERR_LOG_NOOVER		BIT(14)
69 #define RETRY_RD_ERR_LOG_EN		BIT(15)
70 #define RETRY_RD_ERR_LOG_NOOVER_UC	(BIT(14) | BIT(1))
71 #define RETRY_RD_ERR_LOG_OVER_UC_V	(BIT(2) | BIT(1) | BIT(0))
72 
73 static struct list_head *i10nm_edac_list;
74 
75 static struct res_config *res_cfg;
76 static int retry_rd_err_log;
77 
78 static u32 offsets_scrub_icx[]  = {0x22c60, 0x22c54, 0x22c5c, 0x22c58, 0x22c28, 0x20ed8};
79 static u32 offsets_scrub_spr[]  = {0x22c60, 0x22c54, 0x22f08, 0x22c58, 0x22c28, 0x20ed8};
80 static u32 offsets_demand_icx[] = {0x22e54, 0x22e60, 0x22e64, 0x22e58, 0x22e5c, 0x20ee0};
81 static u32 offsets_demand_spr[] = {0x22e54, 0x22e60, 0x22f10, 0x22e58, 0x22e5c, 0x20ee0};
82 
__enable_retry_rd_err_log(struct skx_imc * imc,int chan,bool enable)83 static void __enable_retry_rd_err_log(struct skx_imc *imc, int chan, bool enable)
84 {
85 	u32 s, d;
86 
87 	if (!imc->mbase)
88 		return;
89 
90 	s = I10NM_GET_REG32(imc, chan, res_cfg->offsets_scrub[0]);
91 	d = I10NM_GET_REG32(imc, chan, res_cfg->offsets_demand[0]);
92 
93 	if (enable) {
94 		/* Save default configurations */
95 		imc->chan[chan].retry_rd_err_log_s = s;
96 		imc->chan[chan].retry_rd_err_log_d = d;
97 
98 		s &= ~RETRY_RD_ERR_LOG_NOOVER_UC;
99 		s |=  RETRY_RD_ERR_LOG_EN;
100 		d &= ~RETRY_RD_ERR_LOG_NOOVER_UC;
101 		d |=  RETRY_RD_ERR_LOG_EN;
102 	} else {
103 		/* Restore default configurations */
104 		if (imc->chan[chan].retry_rd_err_log_s & RETRY_RD_ERR_LOG_UC)
105 			s |=  RETRY_RD_ERR_LOG_UC;
106 		if (imc->chan[chan].retry_rd_err_log_s & RETRY_RD_ERR_LOG_NOOVER)
107 			s |=  RETRY_RD_ERR_LOG_NOOVER;
108 		if (!(imc->chan[chan].retry_rd_err_log_s & RETRY_RD_ERR_LOG_EN))
109 			s &= ~RETRY_RD_ERR_LOG_EN;
110 		if (imc->chan[chan].retry_rd_err_log_d & RETRY_RD_ERR_LOG_UC)
111 			d |=  RETRY_RD_ERR_LOG_UC;
112 		if (imc->chan[chan].retry_rd_err_log_d & RETRY_RD_ERR_LOG_NOOVER)
113 			d |=  RETRY_RD_ERR_LOG_NOOVER;
114 		if (!(imc->chan[chan].retry_rd_err_log_d & RETRY_RD_ERR_LOG_EN))
115 			d &= ~RETRY_RD_ERR_LOG_EN;
116 	}
117 
118 	I10NM_SET_REG32(imc, chan, res_cfg->offsets_scrub[0], s);
119 	I10NM_SET_REG32(imc, chan, res_cfg->offsets_demand[0], d);
120 }
121 
enable_retry_rd_err_log(bool enable)122 static void enable_retry_rd_err_log(bool enable)
123 {
124 	struct skx_dev *d;
125 	int i, j;
126 
127 	edac_dbg(2, "\n");
128 
129 	list_for_each_entry(d, i10nm_edac_list, list)
130 		for (i = 0; i < I10NM_NUM_IMC; i++)
131 			for (j = 0; j < I10NM_NUM_CHANNELS; j++)
132 				__enable_retry_rd_err_log(&d->imc[i], j, enable);
133 }
134 
show_retry_rd_err_log(struct decoded_addr * res,char * msg,int len,bool scrub_err)135 static void show_retry_rd_err_log(struct decoded_addr *res, char *msg,
136 				  int len, bool scrub_err)
137 {
138 	struct skx_imc *imc = &res->dev->imc[res->imc];
139 	u32 log0, log1, log2, log3, log4;
140 	u32 corr0, corr1, corr2, corr3;
141 	u64 log2a, log5;
142 	u32 *offsets;
143 	int n;
144 
145 	if (!imc->mbase)
146 		return;
147 
148 	offsets = scrub_err ? res_cfg->offsets_scrub : res_cfg->offsets_demand;
149 
150 	log0 = I10NM_GET_REG32(imc, res->channel, offsets[0]);
151 	log1 = I10NM_GET_REG32(imc, res->channel, offsets[1]);
152 	log3 = I10NM_GET_REG32(imc, res->channel, offsets[3]);
153 	log4 = I10NM_GET_REG32(imc, res->channel, offsets[4]);
154 	log5 = I10NM_GET_REG64(imc, res->channel, offsets[5]);
155 
156 	if (res_cfg->type == SPR) {
157 		log2a = I10NM_GET_REG64(imc, res->channel, offsets[2]);
158 		n = snprintf(msg, len, " retry_rd_err_log[%.8x %.8x %.16llx %.8x %.8x %.16llx]",
159 			     log0, log1, log2a, log3, log4, log5);
160 	} else {
161 		log2 = I10NM_GET_REG32(imc, res->channel, offsets[2]);
162 		n = snprintf(msg, len, " retry_rd_err_log[%.8x %.8x %.8x %.8x %.8x %.16llx]",
163 			     log0, log1, log2, log3, log4, log5);
164 	}
165 
166 	corr0 = I10NM_GET_REG32(imc, res->channel, 0x22c18);
167 	corr1 = I10NM_GET_REG32(imc, res->channel, 0x22c1c);
168 	corr2 = I10NM_GET_REG32(imc, res->channel, 0x22c20);
169 	corr3 = I10NM_GET_REG32(imc, res->channel, 0x22c24);
170 
171 	if (len - n > 0)
172 		snprintf(msg + n, len - n,
173 			 " correrrcnt[%.4x %.4x %.4x %.4x %.4x %.4x %.4x %.4x]",
174 			 corr0 & 0xffff, corr0 >> 16,
175 			 corr1 & 0xffff, corr1 >> 16,
176 			 corr2 & 0xffff, corr2 >> 16,
177 			 corr3 & 0xffff, corr3 >> 16);
178 
179 	/* Clear status bits */
180 	if (retry_rd_err_log == 2 && (log0 & RETRY_RD_ERR_LOG_OVER_UC_V)) {
181 		log0 &= ~RETRY_RD_ERR_LOG_OVER_UC_V;
182 		I10NM_SET_REG32(imc, res->channel, offsets[0], log0);
183 	}
184 }
185 
pci_get_dev_wrapper(int dom,unsigned int bus,unsigned int dev,unsigned int fun)186 static struct pci_dev *pci_get_dev_wrapper(int dom, unsigned int bus,
187 					   unsigned int dev, unsigned int fun)
188 {
189 	struct pci_dev *pdev;
190 
191 	pdev = pci_get_domain_bus_and_slot(dom, bus, PCI_DEVFN(dev, fun));
192 	if (!pdev) {
193 		edac_dbg(2, "No device %02x:%02x.%x\n",
194 			 bus, dev, fun);
195 		return NULL;
196 	}
197 
198 	if (unlikely(pci_enable_device(pdev) < 0)) {
199 		edac_dbg(2, "Failed to enable device %02x:%02x.%x\n",
200 			 bus, dev, fun);
201 		return NULL;
202 	}
203 
204 	pci_dev_get(pdev);
205 
206 	return pdev;
207 }
208 
i10nm_check_2lm(struct res_config * cfg)209 static bool i10nm_check_2lm(struct res_config *cfg)
210 {
211 	struct skx_dev *d;
212 	u32 reg;
213 	int i;
214 
215 	list_for_each_entry(d, i10nm_edac_list, list) {
216 		d->sad_all = pci_get_dev_wrapper(d->seg, d->bus[1],
217 						 PCI_SLOT(cfg->sad_all_devfn),
218 						 PCI_FUNC(cfg->sad_all_devfn));
219 		if (!d->sad_all)
220 			continue;
221 
222 		for (i = 0; i < I10NM_MAX_SAD; i++) {
223 			I10NM_GET_SAD(d, cfg->sad_all_offset, i, reg);
224 			if (I10NM_SAD_ENABLE(reg) && I10NM_SAD_NM_CACHEABLE(reg)) {
225 				edac_dbg(2, "2-level memory configuration.\n");
226 				return true;
227 			}
228 		}
229 	}
230 
231 	return false;
232 }
233 
i10nm_get_ddr_munits(void)234 static int i10nm_get_ddr_munits(void)
235 {
236 	struct pci_dev *mdev;
237 	void __iomem *mbase;
238 	unsigned long size;
239 	struct skx_dev *d;
240 	int i, j = 0;
241 	u32 reg, off;
242 	u64 base;
243 
244 	list_for_each_entry(d, i10nm_edac_list, list) {
245 		d->util_all = pci_get_dev_wrapper(d->seg, d->bus[1], 29, 1);
246 		if (!d->util_all)
247 			return -ENODEV;
248 
249 		d->uracu = pci_get_dev_wrapper(d->seg, d->bus[0], 0, 1);
250 		if (!d->uracu)
251 			return -ENODEV;
252 
253 		if (I10NM_GET_SCK_BAR(d, reg)) {
254 			i10nm_printk(KERN_ERR, "Failed to socket bar\n");
255 			return -ENODEV;
256 		}
257 
258 		base = I10NM_GET_SCK_MMIO_BASE(reg);
259 		edac_dbg(2, "socket%d mmio base 0x%llx (reg 0x%x)\n",
260 			 j++, base, reg);
261 
262 		for (i = 0; i < I10NM_NUM_DDR_IMC; i++) {
263 			mdev = pci_get_dev_wrapper(d->seg, d->bus[0],
264 						   12 + i, 0);
265 			if (i == 0 && !mdev) {
266 				i10nm_printk(KERN_ERR, "No IMC found\n");
267 				return -ENODEV;
268 			}
269 			if (!mdev)
270 				continue;
271 
272 			d->imc[i].mdev = mdev;
273 
274 			if (I10NM_GET_IMC_BAR(d, i, reg)) {
275 				i10nm_printk(KERN_ERR, "Failed to get mc bar\n");
276 				return -ENODEV;
277 			}
278 
279 			off  = I10NM_GET_IMC_MMIO_OFFSET(reg);
280 			size = I10NM_GET_IMC_MMIO_SIZE(reg);
281 			edac_dbg(2, "mc%d mmio base 0x%llx size 0x%lx (reg 0x%x)\n",
282 				 i, base + off, size, reg);
283 
284 			mbase = ioremap(base + off, size);
285 			if (!mbase) {
286 				i10nm_printk(KERN_ERR, "Failed to ioremap 0x%llx\n",
287 					     base + off);
288 				return -ENODEV;
289 			}
290 
291 			d->imc[i].mbase = mbase;
292 		}
293 	}
294 
295 	return 0;
296 }
297 
i10nm_check_hbm_imc(struct skx_dev * d)298 static bool i10nm_check_hbm_imc(struct skx_dev *d)
299 {
300 	u32 reg;
301 
302 	if (I10NM_GET_CAPID3_CFG(d, reg)) {
303 		i10nm_printk(KERN_ERR, "Failed to get capid3_cfg\n");
304 		return false;
305 	}
306 
307 	return I10NM_IS_HBM_PRESENT(reg) != 0;
308 }
309 
i10nm_get_hbm_munits(void)310 static int i10nm_get_hbm_munits(void)
311 {
312 	struct pci_dev *mdev;
313 	void __iomem *mbase;
314 	u32 reg, off, mcmtr;
315 	struct skx_dev *d;
316 	int i, lmc;
317 	u64 base;
318 
319 	list_for_each_entry(d, i10nm_edac_list, list) {
320 		d->pcu_cr3 = pci_get_dev_wrapper(d->seg, d->bus[1], 30, 3);
321 		if (!d->pcu_cr3)
322 			return -ENODEV;
323 
324 		if (!i10nm_check_hbm_imc(d)) {
325 			i10nm_printk(KERN_DEBUG, "No hbm memory\n");
326 			return -ENODEV;
327 		}
328 
329 		if (I10NM_GET_SCK_BAR(d, reg)) {
330 			i10nm_printk(KERN_ERR, "Failed to get socket bar\n");
331 			return -ENODEV;
332 		}
333 		base = I10NM_GET_SCK_MMIO_BASE(reg);
334 
335 		if (I10NM_GET_HBM_IMC_BAR(d, reg)) {
336 			i10nm_printk(KERN_ERR, "Failed to get hbm mc bar\n");
337 			return -ENODEV;
338 		}
339 		base += I10NM_GET_HBM_IMC_MMIO_OFFSET(reg);
340 
341 		lmc = I10NM_NUM_DDR_IMC;
342 
343 		for (i = 0; i < I10NM_NUM_HBM_IMC; i++) {
344 			mdev = pci_get_dev_wrapper(d->seg, d->bus[0],
345 						   12 + i / 4, 1 + i % 4);
346 			if (i == 0 && !mdev) {
347 				i10nm_printk(KERN_ERR, "No hbm mc found\n");
348 				return -ENODEV;
349 			}
350 			if (!mdev)
351 				continue;
352 
353 			d->imc[lmc].mdev = mdev;
354 			off = i * I10NM_HBM_IMC_MMIO_SIZE;
355 
356 			edac_dbg(2, "hbm mc%d mmio base 0x%llx size 0x%x\n",
357 				 lmc, base + off, I10NM_HBM_IMC_MMIO_SIZE);
358 
359 			mbase = ioremap(base + off, I10NM_HBM_IMC_MMIO_SIZE);
360 			if (!mbase) {
361 				pci_dev_put(d->imc[lmc].mdev);
362 				d->imc[lmc].mdev = NULL;
363 
364 				i10nm_printk(KERN_ERR, "Failed to ioremap for hbm mc 0x%llx\n",
365 					     base + off);
366 				return -ENOMEM;
367 			}
368 
369 			d->imc[lmc].mbase = mbase;
370 			d->imc[lmc].hbm_mc = true;
371 
372 			mcmtr = I10NM_GET_MCMTR(&d->imc[lmc], 0);
373 			if (!I10NM_IS_HBM_IMC(mcmtr)) {
374 				iounmap(d->imc[lmc].mbase);
375 				d->imc[lmc].mbase = NULL;
376 				d->imc[lmc].hbm_mc = false;
377 				pci_dev_put(d->imc[lmc].mdev);
378 				d->imc[lmc].mdev = NULL;
379 
380 				i10nm_printk(KERN_ERR, "This isn't an hbm mc!\n");
381 				return -ENODEV;
382 			}
383 
384 			lmc++;
385 		}
386 	}
387 
388 	return 0;
389 }
390 
391 static struct res_config i10nm_cfg0 = {
392 	.type			= I10NM,
393 	.decs_did		= 0x3452,
394 	.busno_cfg_offset	= 0xcc,
395 	.ddr_chan_mmio_sz	= 0x4000,
396 	.sad_all_devfn		= PCI_DEVFN(29, 0),
397 	.sad_all_offset		= 0x108,
398 	.offsets_scrub		= offsets_scrub_icx,
399 	.offsets_demand		= offsets_demand_icx,
400 };
401 
402 static struct res_config i10nm_cfg1 = {
403 	.type			= I10NM,
404 	.decs_did		= 0x3452,
405 	.busno_cfg_offset	= 0xd0,
406 	.ddr_chan_mmio_sz	= 0x4000,
407 	.sad_all_devfn		= PCI_DEVFN(29, 0),
408 	.sad_all_offset		= 0x108,
409 	.offsets_scrub		= offsets_scrub_icx,
410 	.offsets_demand		= offsets_demand_icx,
411 };
412 
413 static struct res_config spr_cfg = {
414 	.type			= SPR,
415 	.decs_did		= 0x3252,
416 	.busno_cfg_offset	= 0xd0,
417 	.ddr_chan_mmio_sz	= 0x8000,
418 	.hbm_chan_mmio_sz	= 0x4000,
419 	.support_ddr5		= true,
420 	.sad_all_devfn		= PCI_DEVFN(10, 0),
421 	.sad_all_offset		= 0x300,
422 	.offsets_scrub		= offsets_scrub_spr,
423 	.offsets_demand		= offsets_demand_spr,
424 };
425 
426 static const struct x86_cpu_id i10nm_cpuids[] = {
427 	X86_MATCH_INTEL_FAM6_MODEL_STEPPINGS(ATOM_TREMONT_D,	X86_STEPPINGS(0x0, 0x3), &i10nm_cfg0),
428 	X86_MATCH_INTEL_FAM6_MODEL_STEPPINGS(ATOM_TREMONT_D,	X86_STEPPINGS(0x4, 0xf), &i10nm_cfg1),
429 	X86_MATCH_INTEL_FAM6_MODEL_STEPPINGS(ICELAKE_X,		X86_STEPPINGS(0x0, 0x3), &i10nm_cfg0),
430 	X86_MATCH_INTEL_FAM6_MODEL_STEPPINGS(ICELAKE_X,		X86_STEPPINGS(0x4, 0xf), &i10nm_cfg1),
431 	X86_MATCH_INTEL_FAM6_MODEL_STEPPINGS(ICELAKE_D,		X86_STEPPINGS(0x0, 0xf), &i10nm_cfg1),
432 	X86_MATCH_INTEL_FAM6_MODEL_STEPPINGS(SAPPHIRERAPIDS_X,	X86_STEPPINGS(0x0, 0xf), &spr_cfg),
433 	{}
434 };
435 MODULE_DEVICE_TABLE(x86cpu, i10nm_cpuids);
436 
i10nm_check_ecc(struct skx_imc * imc,int chan)437 static bool i10nm_check_ecc(struct skx_imc *imc, int chan)
438 {
439 	u32 mcmtr;
440 
441 	mcmtr = I10NM_GET_MCMTR(imc, chan);
442 	edac_dbg(1, "ch%d mcmtr reg %x\n", chan, mcmtr);
443 
444 	return !!GET_BITFIELD(mcmtr, 2, 2);
445 }
446 
i10nm_get_dimm_config(struct mem_ctl_info * mci,struct res_config * cfg)447 static int i10nm_get_dimm_config(struct mem_ctl_info *mci,
448 				 struct res_config *cfg)
449 {
450 	struct skx_pvt *pvt = mci->pvt_info;
451 	struct skx_imc *imc = pvt->imc;
452 	u32 mtr, amap, mcddrtcfg;
453 	struct dimm_info *dimm;
454 	int i, j, ndimms;
455 
456 	for (i = 0; i < imc->num_channels; i++) {
457 		if (!imc->mbase)
458 			continue;
459 
460 		ndimms = 0;
461 		amap = I10NM_GET_AMAP(imc, i);
462 		mcddrtcfg = I10NM_GET_MCDDRTCFG(imc, i);
463 		for (j = 0; j < imc->num_dimms; j++) {
464 			dimm = edac_get_dimm(mci, i, j, 0);
465 			mtr = I10NM_GET_DIMMMTR(imc, i, j);
466 			edac_dbg(1, "dimmmtr 0x%x mcddrtcfg 0x%x (mc%d ch%d dimm%d)\n",
467 				 mtr, mcddrtcfg, imc->mc, i, j);
468 
469 			if (IS_DIMM_PRESENT(mtr))
470 				ndimms += skx_get_dimm_info(mtr, 0, amap, dimm,
471 							    imc, i, j, cfg);
472 			else if (IS_NVDIMM_PRESENT(mcddrtcfg, j))
473 				ndimms += skx_get_nvdimm_info(dimm, imc, i, j,
474 							      EDAC_MOD_STR);
475 		}
476 		if (ndimms && !i10nm_check_ecc(imc, i)) {
477 			i10nm_printk(KERN_ERR, "ECC is disabled on imc %d channel %d\n",
478 				     imc->mc, i);
479 			return -ENODEV;
480 		}
481 	}
482 
483 	return 0;
484 }
485 
486 static struct notifier_block i10nm_mce_dec = {
487 	.notifier_call	= skx_mce_check_error,
488 	.priority	= MCE_PRIO_EDAC,
489 };
490 
491 #ifdef CONFIG_EDAC_DEBUG
492 /*
493  * Debug feature.
494  * Exercise the address decode logic by writing an address to
495  * /sys/kernel/debug/edac/i10nm_test/addr.
496  */
497 static struct dentry *i10nm_test;
498 
debugfs_u64_set(void * data,u64 val)499 static int debugfs_u64_set(void *data, u64 val)
500 {
501 	struct mce m;
502 
503 	pr_warn_once("Fake error to 0x%llx injected via debugfs\n", val);
504 
505 	memset(&m, 0, sizeof(m));
506 	/* ADDRV + MemRd + Unknown channel */
507 	m.status = MCI_STATUS_ADDRV + 0x90;
508 	/* One corrected error */
509 	m.status |= BIT_ULL(MCI_STATUS_CEC_SHIFT);
510 	m.addr = val;
511 	skx_mce_check_error(NULL, 0, &m);
512 
513 	return 0;
514 }
515 DEFINE_SIMPLE_ATTRIBUTE(fops_u64_wo, NULL, debugfs_u64_set, "%llu\n");
516 
setup_i10nm_debug(void)517 static void setup_i10nm_debug(void)
518 {
519 	i10nm_test = edac_debugfs_create_dir("i10nm_test");
520 	if (!i10nm_test)
521 		return;
522 
523 	if (!edac_debugfs_create_file("addr", 0200, i10nm_test,
524 				      NULL, &fops_u64_wo)) {
525 		debugfs_remove(i10nm_test);
526 		i10nm_test = NULL;
527 	}
528 }
529 
teardown_i10nm_debug(void)530 static void teardown_i10nm_debug(void)
531 {
532 	debugfs_remove_recursive(i10nm_test);
533 }
534 #else
setup_i10nm_debug(void)535 static inline void setup_i10nm_debug(void) {}
teardown_i10nm_debug(void)536 static inline void teardown_i10nm_debug(void) {}
537 #endif /*CONFIG_EDAC_DEBUG*/
538 
i10nm_init(void)539 static int __init i10nm_init(void)
540 {
541 	u8 mc = 0, src_id = 0, node_id = 0;
542 	const struct x86_cpu_id *id;
543 	struct res_config *cfg;
544 	const char *owner;
545 	struct skx_dev *d;
546 	int rc, i, off[3] = {0xd0, 0xc8, 0xcc};
547 	u64 tolm, tohm;
548 
549 	edac_dbg(2, "\n");
550 
551 	owner = edac_get_owner();
552 	if (owner && strncmp(owner, EDAC_MOD_STR, sizeof(EDAC_MOD_STR)))
553 		return -EBUSY;
554 
555 	if (cpu_feature_enabled(X86_FEATURE_HYPERVISOR))
556 		return -ENODEV;
557 
558 	id = x86_match_cpu(i10nm_cpuids);
559 	if (!id)
560 		return -ENODEV;
561 
562 	cfg = (struct res_config *)id->driver_data;
563 	res_cfg = cfg;
564 
565 	rc = skx_get_hi_lo(0x09a2, off, &tolm, &tohm);
566 	if (rc)
567 		return rc;
568 
569 	rc = skx_get_all_bus_mappings(cfg, &i10nm_edac_list);
570 	if (rc < 0)
571 		goto fail;
572 	if (rc == 0) {
573 		i10nm_printk(KERN_ERR, "No memory controllers found\n");
574 		return -ENODEV;
575 	}
576 
577 	skx_set_mem_cfg(i10nm_check_2lm(cfg));
578 
579 	rc = i10nm_get_ddr_munits();
580 
581 	if (i10nm_get_hbm_munits() && rc)
582 		goto fail;
583 
584 	list_for_each_entry(d, i10nm_edac_list, list) {
585 		rc = skx_get_src_id(d, 0xf8, &src_id);
586 		if (rc < 0)
587 			goto fail;
588 
589 		rc = skx_get_node_id(d, &node_id);
590 		if (rc < 0)
591 			goto fail;
592 
593 		edac_dbg(2, "src_id = %d node_id = %d\n", src_id, node_id);
594 		for (i = 0; i < I10NM_NUM_IMC; i++) {
595 			if (!d->imc[i].mdev)
596 				continue;
597 
598 			d->imc[i].mc  = mc++;
599 			d->imc[i].lmc = i;
600 			d->imc[i].src_id  = src_id;
601 			d->imc[i].node_id = node_id;
602 			if (d->imc[i].hbm_mc) {
603 				d->imc[i].chan_mmio_sz = cfg->hbm_chan_mmio_sz;
604 				d->imc[i].num_channels = I10NM_NUM_HBM_CHANNELS;
605 				d->imc[i].num_dimms    = I10NM_NUM_HBM_DIMMS;
606 			} else {
607 				d->imc[i].chan_mmio_sz = cfg->ddr_chan_mmio_sz;
608 				d->imc[i].num_channels = I10NM_NUM_DDR_CHANNELS;
609 				d->imc[i].num_dimms    = I10NM_NUM_DDR_DIMMS;
610 			}
611 
612 			rc = skx_register_mci(&d->imc[i], d->imc[i].mdev,
613 					      "Intel_10nm Socket", EDAC_MOD_STR,
614 					      i10nm_get_dimm_config, cfg);
615 			if (rc < 0)
616 				goto fail;
617 		}
618 	}
619 
620 	rc = skx_adxl_get();
621 	if (rc)
622 		goto fail;
623 
624 	opstate_init();
625 	mce_register_decode_chain(&i10nm_mce_dec);
626 	setup_i10nm_debug();
627 
628 	if (retry_rd_err_log && res_cfg->offsets_scrub && res_cfg->offsets_demand) {
629 		skx_set_decode(NULL, show_retry_rd_err_log);
630 		if (retry_rd_err_log == 2)
631 			enable_retry_rd_err_log(true);
632 	}
633 
634 	i10nm_printk(KERN_INFO, "%s\n", I10NM_REVISION);
635 
636 	return 0;
637 fail:
638 	skx_remove();
639 	return rc;
640 }
641 
i10nm_exit(void)642 static void __exit i10nm_exit(void)
643 {
644 	edac_dbg(2, "\n");
645 
646 	if (retry_rd_err_log && res_cfg->offsets_scrub && res_cfg->offsets_demand) {
647 		skx_set_decode(NULL, NULL);
648 		if (retry_rd_err_log == 2)
649 			enable_retry_rd_err_log(false);
650 	}
651 
652 	teardown_i10nm_debug();
653 	mce_unregister_decode_chain(&i10nm_mce_dec);
654 	skx_adxl_put();
655 	skx_remove();
656 }
657 
658 module_init(i10nm_init);
659 module_exit(i10nm_exit);
660 
661 module_param(retry_rd_err_log, int, 0444);
662 MODULE_PARM_DESC(retry_rd_err_log, "retry_rd_err_log: 0=off(default), 1=bios(Linux doesn't reset any control bits, but just reports values.), 2=linux(Linux tries to take control and resets mode bits, clear valid/UC bits after reading.)");
663 
664 MODULE_LICENSE("GPL v2");
665 MODULE_DESCRIPTION("MC Driver for Intel 10nm server processors");
666