1 /*
2  * This file is subject to the terms and conditions of the GNU General Public
3  * License.  See the file "COPYING" in the main directory of this archive
4  * for more details.
5  *
6  * Copyright (C) 2009 Wind River Systems,
7  *   written by Ralf Baechle <ralf@linux-mips.org>
8  *
9  * Copyright (c) 2013 by Cisco Systems, Inc.
10  * All rights reserved.
11  */
12 #include <linux/module.h>
13 #include <linux/init.h>
14 #include <linux/slab.h>
15 #include <linux/io.h>
16 #include <linux/edac.h>
17 #include <linux/ctype.h>
18 
19 #include <asm/octeon/octeon.h>
20 #include <asm/octeon/cvmx-lmcx-defs.h>
21 
22 #include "edac_core.h"
23 #include "edac_module.h"
24 
25 #define OCTEON_MAX_MC 4
26 
27 #define to_mci(k) container_of(k, struct mem_ctl_info, dev)
28 
29 struct octeon_lmc_pvt {
30 	unsigned long inject;
31 	unsigned long error_type;
32 	unsigned long dimm;
33 	unsigned long rank;
34 	unsigned long bank;
35 	unsigned long row;
36 	unsigned long col;
37 };
38 
39 static void octeon_lmc_edac_poll(struct mem_ctl_info *mci)
40 {
41 	union cvmx_lmcx_mem_cfg0 cfg0;
42 	bool do_clear = false;
43 	char msg[64];
44 
45 	cfg0.u64 = cvmx_read_csr(CVMX_LMCX_MEM_CFG0(mci->mc_idx));
46 	if (cfg0.s.sec_err || cfg0.s.ded_err) {
47 		union cvmx_lmcx_fadr fadr;
48 		fadr.u64 = cvmx_read_csr(CVMX_LMCX_FADR(mci->mc_idx));
49 		snprintf(msg, sizeof(msg),
50 			 "DIMM %d rank %d bank %d row %d col %d",
51 			 fadr.cn30xx.fdimm, fadr.cn30xx.fbunk,
52 			 fadr.cn30xx.fbank, fadr.cn30xx.frow, fadr.cn30xx.fcol);
53 	}
54 
55 	if (cfg0.s.sec_err) {
56 		edac_mc_handle_error(HW_EVENT_ERR_CORRECTED, mci, 1, 0, 0, 0,
57 				     -1, -1, -1, msg, "");
58 		cfg0.s.sec_err = -1;	/* Done, re-arm */
59 		do_clear = true;
60 	}
61 
62 	if (cfg0.s.ded_err) {
63 		edac_mc_handle_error(HW_EVENT_ERR_UNCORRECTED, mci, 1, 0, 0, 0,
64 				     -1, -1, -1, msg, "");
65 		cfg0.s.ded_err = -1;	/* Done, re-arm */
66 		do_clear = true;
67 	}
68 	if (do_clear)
69 		cvmx_write_csr(CVMX_LMCX_MEM_CFG0(mci->mc_idx), cfg0.u64);
70 }
71 
72 static void octeon_lmc_edac_poll_o2(struct mem_ctl_info *mci)
73 {
74 	struct octeon_lmc_pvt *pvt = mci->pvt_info;
75 	union cvmx_lmcx_int int_reg;
76 	bool do_clear = false;
77 	char msg[64];
78 
79 	if (!pvt->inject)
80 		int_reg.u64 = cvmx_read_csr(CVMX_LMCX_INT(mci->mc_idx));
81 	else {
82 		if (pvt->error_type == 1)
83 			int_reg.s.sec_err = 1;
84 		if (pvt->error_type == 2)
85 			int_reg.s.ded_err = 1;
86 	}
87 
88 	if (int_reg.s.sec_err || int_reg.s.ded_err) {
89 		union cvmx_lmcx_fadr fadr;
90 		if (likely(!pvt->inject))
91 			fadr.u64 = cvmx_read_csr(CVMX_LMCX_FADR(mci->mc_idx));
92 		else {
93 			fadr.cn61xx.fdimm = pvt->dimm;
94 			fadr.cn61xx.fbunk = pvt->rank;
95 			fadr.cn61xx.fbank = pvt->bank;
96 			fadr.cn61xx.frow = pvt->row;
97 			fadr.cn61xx.fcol = pvt->col;
98 		}
99 		snprintf(msg, sizeof(msg),
100 			 "DIMM %d rank %d bank %d row %d col %d",
101 			 fadr.cn61xx.fdimm, fadr.cn61xx.fbunk,
102 			 fadr.cn61xx.fbank, fadr.cn61xx.frow, fadr.cn61xx.fcol);
103 	}
104 
105 	if (int_reg.s.sec_err) {
106 		edac_mc_handle_error(HW_EVENT_ERR_CORRECTED, mci, 1, 0, 0, 0,
107 				     -1, -1, -1, msg, "");
108 		int_reg.s.sec_err = -1;	/* Done, re-arm */
109 		do_clear = true;
110 	}
111 
112 	if (int_reg.s.ded_err) {
113 		edac_mc_handle_error(HW_EVENT_ERR_UNCORRECTED, mci, 1, 0, 0, 0,
114 				     -1, -1, -1, msg, "");
115 		int_reg.s.ded_err = -1;	/* Done, re-arm */
116 		do_clear = true;
117 	}
118 
119 	if (do_clear) {
120 		if (likely(!pvt->inject))
121 			cvmx_write_csr(CVMX_LMCX_INT(mci->mc_idx), int_reg.u64);
122 		else
123 			pvt->inject = 0;
124 	}
125 }
126 
127 /************************ MC SYSFS parts ***********************************/
128 
129 /* Only a couple naming differences per template, so very similar */
130 #define TEMPLATE_SHOW(reg)						\
131 static ssize_t octeon_mc_inject_##reg##_show(struct device *dev,	\
132 			       struct device_attribute *attr,		\
133 			       char *data)				\
134 {									\
135 	struct mem_ctl_info *mci = to_mci(dev);				\
136 	struct octeon_lmc_pvt *pvt = mci->pvt_info;			\
137 	return sprintf(data, "%016llu\n", (u64)pvt->reg);		\
138 }
139 
140 #define TEMPLATE_STORE(reg)						\
141 static ssize_t octeon_mc_inject_##reg##_store(struct device *dev,	\
142 			       struct device_attribute *attr,		\
143 			       const char *data, size_t count)		\
144 {									\
145 	struct mem_ctl_info *mci = to_mci(dev);				\
146 	struct octeon_lmc_pvt *pvt = mci->pvt_info;			\
147 	if (isdigit(*data)) {						\
148 		if (!kstrtoul(data, 0, &pvt->reg))			\
149 			return count;					\
150 	}								\
151 	return 0;							\
152 }
153 
154 TEMPLATE_SHOW(inject);
155 TEMPLATE_STORE(inject);
156 TEMPLATE_SHOW(dimm);
157 TEMPLATE_STORE(dimm);
158 TEMPLATE_SHOW(bank);
159 TEMPLATE_STORE(bank);
160 TEMPLATE_SHOW(rank);
161 TEMPLATE_STORE(rank);
162 TEMPLATE_SHOW(row);
163 TEMPLATE_STORE(row);
164 TEMPLATE_SHOW(col);
165 TEMPLATE_STORE(col);
166 
167 static ssize_t octeon_mc_inject_error_type_store(struct device *dev,
168 					  struct device_attribute *attr,
169 					  const char *data,
170 					  size_t count)
171 {
172 	struct mem_ctl_info *mci = to_mci(dev);
173 	struct octeon_lmc_pvt *pvt = mci->pvt_info;
174 
175 	if (!strncmp(data, "single", 6))
176 		pvt->error_type = 1;
177 	else if (!strncmp(data, "double", 6))
178 		pvt->error_type = 2;
179 
180 	return count;
181 }
182 
183 static ssize_t octeon_mc_inject_error_type_show(struct device *dev,
184 					 struct device_attribute *attr,
185 					 char *data)
186 {
187 	struct mem_ctl_info *mci = to_mci(dev);
188 	struct octeon_lmc_pvt *pvt = mci->pvt_info;
189 	if (pvt->error_type == 1)
190 		return sprintf(data, "single");
191 	else if (pvt->error_type == 2)
192 		return sprintf(data, "double");
193 
194 	return 0;
195 }
196 
197 static DEVICE_ATTR(inject, S_IRUGO | S_IWUSR,
198 		   octeon_mc_inject_inject_show, octeon_mc_inject_inject_store);
199 static DEVICE_ATTR(error_type, S_IRUGO | S_IWUSR,
200 		   octeon_mc_inject_error_type_show, octeon_mc_inject_error_type_store);
201 static DEVICE_ATTR(dimm, S_IRUGO | S_IWUSR,
202 		   octeon_mc_inject_dimm_show, octeon_mc_inject_dimm_store);
203 static DEVICE_ATTR(rank, S_IRUGO | S_IWUSR,
204 		   octeon_mc_inject_rank_show, octeon_mc_inject_rank_store);
205 static DEVICE_ATTR(bank, S_IRUGO | S_IWUSR,
206 		   octeon_mc_inject_bank_show, octeon_mc_inject_bank_store);
207 static DEVICE_ATTR(row, S_IRUGO | S_IWUSR,
208 		   octeon_mc_inject_row_show, octeon_mc_inject_row_store);
209 static DEVICE_ATTR(col, S_IRUGO | S_IWUSR,
210 		   octeon_mc_inject_col_show, octeon_mc_inject_col_store);
211 
212 
213 static int octeon_set_mc_sysfs_attributes(struct mem_ctl_info *mci)
214 {
215 	int rc;
216 
217 	rc = device_create_file(&mci->dev, &dev_attr_inject);
218 	if (rc < 0)
219 		return rc;
220 	rc = device_create_file(&mci->dev, &dev_attr_error_type);
221 	if (rc < 0)
222 		return rc;
223 	rc = device_create_file(&mci->dev, &dev_attr_dimm);
224 	if (rc < 0)
225 		return rc;
226 	rc = device_create_file(&mci->dev, &dev_attr_rank);
227 	if (rc < 0)
228 		return rc;
229 	rc = device_create_file(&mci->dev, &dev_attr_bank);
230 	if (rc < 0)
231 		return rc;
232 	rc = device_create_file(&mci->dev, &dev_attr_row);
233 	if (rc < 0)
234 		return rc;
235 	rc = device_create_file(&mci->dev, &dev_attr_col);
236 	if (rc < 0)
237 		return rc;
238 
239 	return 0;
240 }
241 
242 static int octeon_lmc_edac_probe(struct platform_device *pdev)
243 {
244 	struct mem_ctl_info *mci;
245 	struct edac_mc_layer layers[1];
246 	int mc = pdev->id;
247 
248 	opstate_init();
249 
250 	layers[0].type = EDAC_MC_LAYER_CHANNEL;
251 	layers[0].size = 1;
252 	layers[0].is_virt_csrow = false;
253 
254 	if (OCTEON_IS_MODEL(OCTEON_FAM_1_PLUS)) {
255 		union cvmx_lmcx_mem_cfg0 cfg0;
256 
257 		cfg0.u64 = cvmx_read_csr(CVMX_LMCX_MEM_CFG0(0));
258 		if (!cfg0.s.ecc_ena) {
259 			dev_info(&pdev->dev, "Disabled (ECC not enabled)\n");
260 			return 0;
261 		}
262 
263 		mci = edac_mc_alloc(mc, ARRAY_SIZE(layers), layers, sizeof(struct octeon_lmc_pvt));
264 		if (!mci)
265 			return -ENXIO;
266 
267 		mci->pdev = &pdev->dev;
268 		mci->dev_name = dev_name(&pdev->dev);
269 
270 		mci->mod_name = "octeon-lmc";
271 		mci->ctl_name = "octeon-lmc-err";
272 		mci->edac_check = octeon_lmc_edac_poll;
273 
274 		if (edac_mc_add_mc(mci)) {
275 			dev_err(&pdev->dev, "edac_mc_add_mc() failed\n");
276 			edac_mc_free(mci);
277 			return -ENXIO;
278 		}
279 
280 		if (octeon_set_mc_sysfs_attributes(mci)) {
281 			dev_err(&pdev->dev, "octeon_set_mc_sysfs_attributes() failed\n");
282 			return -ENXIO;
283 		}
284 
285 
286 		cfg0.u64 = cvmx_read_csr(CVMX_LMCX_MEM_CFG0(mc));
287 		cfg0.s.intr_ded_ena = 0;	/* We poll */
288 		cfg0.s.intr_sec_ena = 0;
289 		cvmx_write_csr(CVMX_LMCX_MEM_CFG0(mc), cfg0.u64);
290 	} else {
291 		/* OCTEON II */
292 		union cvmx_lmcx_int_en en;
293 		union cvmx_lmcx_config config;
294 
295 		config.u64 = cvmx_read_csr(CVMX_LMCX_CONFIG(0));
296 		if (!config.s.ecc_ena) {
297 			dev_info(&pdev->dev, "Disabled (ECC not enabled)\n");
298 			return 0;
299 		}
300 
301 		mci = edac_mc_alloc(mc, ARRAY_SIZE(layers), layers, sizeof(struct octeon_lmc_pvt));
302 		if (!mci)
303 			return -ENXIO;
304 
305 		mci->pdev = &pdev->dev;
306 		mci->dev_name = dev_name(&pdev->dev);
307 
308 		mci->mod_name = "octeon-lmc";
309 		mci->ctl_name = "co_lmc_err";
310 		mci->edac_check = octeon_lmc_edac_poll_o2;
311 
312 		if (edac_mc_add_mc(mci)) {
313 			dev_err(&pdev->dev, "edac_mc_add_mc() failed\n");
314 			edac_mc_free(mci);
315 			return -ENXIO;
316 		}
317 
318 		if (octeon_set_mc_sysfs_attributes(mci)) {
319 			dev_err(&pdev->dev, "octeon_set_mc_sysfs_attributes() failed\n");
320 			return -ENXIO;
321 		}
322 
323 
324 		en.u64 = cvmx_read_csr(CVMX_LMCX_MEM_CFG0(mc));
325 		en.s.intr_ded_ena = 0;	/* We poll */
326 		en.s.intr_sec_ena = 0;
327 		cvmx_write_csr(CVMX_LMCX_MEM_CFG0(mc), en.u64);
328 	}
329 	platform_set_drvdata(pdev, mci);
330 
331 	return 0;
332 }
333 
334 static int octeon_lmc_edac_remove(struct platform_device *pdev)
335 {
336 	struct mem_ctl_info *mci = platform_get_drvdata(pdev);
337 
338 	edac_mc_del_mc(&pdev->dev);
339 	edac_mc_free(mci);
340 	return 0;
341 }
342 
343 static struct platform_driver octeon_lmc_edac_driver = {
344 	.probe = octeon_lmc_edac_probe,
345 	.remove = octeon_lmc_edac_remove,
346 	.driver = {
347 		   .name = "octeon_lmc_edac",
348 	}
349 };
350 module_platform_driver(octeon_lmc_edac_driver);
351 
352 MODULE_LICENSE("GPL");
353 MODULE_AUTHOR("Ralf Baechle <ralf@linux-mips.org>");
354