2 * Intel 3000/3010 Memory Controller kernel module
3 * Copyright (C) 2007 Akamai Technologies, Inc.
4 * Shamelessly copied from:
5 * Intel D82875P Memory Controller kernel module
6 * (C) 2003 Linux Networx (http://lnxi.com)
8 * This file may be distributed under the terms of the
9 * GNU General Public License.
12 #include <linux/module.h>
13 #include <linux/init.h>
14 #include <linux/pci.h>
15 #include <linux/pci_ids.h>
16 #include <linux/slab.h>
17 #include <linux/edac.h>
18 #include "edac_core.h"
20 #define I3000_REVISION "1.1"
22 #define EDAC_MOD_STR "i3000_edac"
25 #define I3000_RANKS_PER_CHANNEL 4
26 #define I3000_CHANNELS 2
28 /* Intel 3000 register addresses - device 0 function 0 - DRAM Controller */
30 #define I3000_MCHBAR 0x44 /* MCH Memory Mapped Register BAR */
31 #define I3000_MCHBAR_MASK 0xffffc000
32 #define I3000_MMR_WINDOW_SIZE 16384
34 #define I3000_EDEAP 0x70 /* Extended DRAM Error Address Pointer (8b)
39 #define I3000_DEAP 0x58 /* DRAM Error Address Pointer (32b)
45 #define I3000_DEAP_GRAIN (1 << 7)
47 static inline unsigned long deap_pfn(u8 edeap
, u32 deap
)
50 deap
|= (edeap
& 1) << (32 - PAGE_SHIFT
);
54 static inline unsigned long deap_offset(u32 deap
)
56 return deap
& ~(I3000_DEAP_GRAIN
- 1) & ~PAGE_MASK
;
59 static inline int deap_channel(u32 deap
)
64 #define I3000_DERRSYN 0x5c /* DRAM Error Syndrome (8b)
66 * 7:0 DRAM ECC Syndrome
69 #define I3000_ERRSTS 0xc8 /* Error Status Register (16b)
72 * 11 MCH Thermal Sensor Event
75 * 9 LOCK to non-DRAM Memory Flag (LCKF)
76 * 8 Received Refresh Timeout Flag (RRTOF)
78 * 1 Multi-bit DRAM ECC Error Flag (DMERR)
79 * 0 Single-bit DRAM ECC Error Flag (DSERR)
81 #define I3000_ERRSTS_BITS 0x0b03 /* bits which indicate errors */
82 #define I3000_ERRSTS_UE 0x0002
83 #define I3000_ERRSTS_CE 0x0001
85 #define I3000_ERRCMD 0xca /* Error Command (16b)
88 * 11 SERR on MCH Thermal Sensor Event
91 * 9 SERR on LOCK to non-DRAM Memory
93 * 8 SERR on DRAM Refresh Timeout
96 * 1 SERR Multi-Bit DRAM ECC Error
98 * 0 SERR on Single-Bit ECC Error
102 /* Intel MMIO register space - device 0 function 0 - MMR space */
104 #define I3000_DRB_SHIFT 25 /* 32MiB grain */
106 #define I3000_C0DRB 0x100 /* Channel 0 DRAM Rank Boundary (8b x 4)
108 * 7:0 Channel 0 DRAM Rank Boundary Address
110 #define I3000_C1DRB 0x180 /* Channel 1 DRAM Rank Boundary (8b x 4)
112 * 7:0 Channel 1 DRAM Rank Boundary Address
115 #define I3000_C0DRA 0x108 /* Channel 0 DRAM Rank Attribute (8b x 2)
118 * 6:4 DRAM odd Rank Attribute
120 * 2:0 DRAM even Rank Attribute
122 * Each attribute defines the page
123 * size of the corresponding rank:
131 #define I3000_C1DRA 0x188 /* Channel 1 DRAM Rank Attribute (8b x 2) */
133 static inline unsigned char odd_rank_attrib(unsigned char dra
)
135 return (dra
& 0x70) >> 4;
138 static inline unsigned char even_rank_attrib(unsigned char dra
)
143 #define I3000_C0DRC0 0x120 /* DRAM Controller Mode 0 (32b)
146 * 29 Initialization Complete (IC)
148 * 10:8 Refresh Mode Select (RMS)
150 * 6:4 Mode Select (SMS)
155 #define I3000_C0DRC1 0x124 /* DRAM Controller Mode 1 (32b)
157 * 31 Enhanced Addressing Enable (ENHADE)
165 struct i3000_dev_info
{
166 const char *ctl_name
;
169 struct i3000_error_info
{
177 static const struct i3000_dev_info i3000_devs
[] = {
179 .ctl_name
= "i3000"},
182 static struct pci_dev
*mci_pdev
;
183 static int i3000_registered
= 1;
184 static struct edac_pci_ctl_info
*i3000_pci
;
186 static void i3000_get_error_info(struct mem_ctl_info
*mci
,
187 struct i3000_error_info
*info
)
189 struct pci_dev
*pdev
;
191 pdev
= to_pci_dev(mci
->dev
);
194 * This is a mess because there is no atomic way to read all the
195 * registers at once and the registers can transition from CE being
198 pci_read_config_word(pdev
, I3000_ERRSTS
, &info
->errsts
);
199 if (!(info
->errsts
& I3000_ERRSTS_BITS
))
201 pci_read_config_byte(pdev
, I3000_EDEAP
, &info
->edeap
);
202 pci_read_config_dword(pdev
, I3000_DEAP
, &info
->deap
);
203 pci_read_config_byte(pdev
, I3000_DERRSYN
, &info
->derrsyn
);
204 pci_read_config_word(pdev
, I3000_ERRSTS
, &info
->errsts2
);
207 * If the error is the same for both reads then the first set
208 * of reads is valid. If there is a change then there is a CE
209 * with no info and the second set of reads is valid and
212 if ((info
->errsts
^ info
->errsts2
) & I3000_ERRSTS_BITS
) {
213 pci_read_config_byte(pdev
, I3000_EDEAP
, &info
->edeap
);
214 pci_read_config_dword(pdev
, I3000_DEAP
, &info
->deap
);
215 pci_read_config_byte(pdev
, I3000_DERRSYN
, &info
->derrsyn
);
219 * Clear any error bits.
220 * (Yes, we really clear bits by writing 1 to them.)
222 pci_write_bits16(pdev
, I3000_ERRSTS
, I3000_ERRSTS_BITS
,
226 static int i3000_process_error_info(struct mem_ctl_info
*mci
,
227 struct i3000_error_info
*info
,
230 int row
, multi_chan
, channel
;
231 unsigned long pfn
, offset
;
233 multi_chan
= mci
->csrows
[0].nr_channels
- 1;
235 if (!(info
->errsts
& I3000_ERRSTS_BITS
))
241 if ((info
->errsts
^ info
->errsts2
) & I3000_ERRSTS_BITS
) {
242 edac_mc_handle_ce_no_info(mci
, "UE overwrote CE");
243 info
->errsts
= info
->errsts2
;
246 pfn
= deap_pfn(info
->edeap
, info
->deap
);
247 offset
= deap_offset(info
->deap
);
248 channel
= deap_channel(info
->deap
);
250 row
= edac_mc_find_csrow_by_page(mci
, pfn
);
252 if (info
->errsts
& I3000_ERRSTS_UE
)
253 edac_mc_handle_ue(mci
, pfn
, offset
, row
, "i3000 UE");
255 edac_mc_handle_ce(mci
, pfn
, offset
, info
->derrsyn
, row
,
256 multi_chan
? channel
: 0, "i3000 CE");
261 static void i3000_check(struct mem_ctl_info
*mci
)
263 struct i3000_error_info info
;
265 debugf1("MC%d: %s()\n", mci
->mc_idx
, __func__
);
266 i3000_get_error_info(mci
, &info
);
267 i3000_process_error_info(mci
, &info
, 1);
270 static int i3000_is_interleaved(const unsigned char *c0dra
,
271 const unsigned char *c1dra
,
272 const unsigned char *c0drb
,
273 const unsigned char *c1drb
)
278 * If the channels aren't populated identically then
279 * we're not interleaved.
281 for (i
= 0; i
< I3000_RANKS_PER_CHANNEL
/ 2; i
++)
282 if (odd_rank_attrib(c0dra
[i
]) != odd_rank_attrib(c1dra
[i
]) ||
283 even_rank_attrib(c0dra
[i
]) !=
284 even_rank_attrib(c1dra
[i
]))
288 * If the rank boundaries for the two channels are different
289 * then we're not interleaved.
291 for (i
= 0; i
< I3000_RANKS_PER_CHANNEL
; i
++)
292 if (c0drb
[i
] != c1drb
[i
])
298 static int i3000_probe1(struct pci_dev
*pdev
, int dev_idx
)
302 struct mem_ctl_info
*mci
= NULL
;
303 unsigned long last_cumul_size
;
304 int interleaved
, nr_channels
;
305 unsigned char dra
[I3000_RANKS
/ 2], drb
[I3000_RANKS
];
306 unsigned char *c0dra
= dra
, *c1dra
= &dra
[I3000_RANKS_PER_CHANNEL
/ 2];
307 unsigned char *c0drb
= drb
, *c1drb
= &drb
[I3000_RANKS_PER_CHANNEL
];
308 unsigned long mchbar
;
309 void __iomem
*window
;
311 debugf0("MC: %s()\n", __func__
);
313 pci_read_config_dword(pdev
, I3000_MCHBAR
, (u32
*) & mchbar
);
314 mchbar
&= I3000_MCHBAR_MASK
;
315 window
= ioremap_nocache(mchbar
, I3000_MMR_WINDOW_SIZE
);
317 printk(KERN_ERR
"i3000: cannot map mmio space at 0x%lx\n",
322 switch (edac_op_state
) {
323 case EDAC_OPSTATE_POLL
:
324 case EDAC_OPSTATE_NMI
:
327 edac_op_state
= EDAC_OPSTATE_POLL
;
331 c0dra
[0] = readb(window
+ I3000_C0DRA
+ 0); /* ranks 0,1 */
332 c0dra
[1] = readb(window
+ I3000_C0DRA
+ 1); /* ranks 2,3 */
333 c1dra
[0] = readb(window
+ I3000_C1DRA
+ 0); /* ranks 0,1 */
334 c1dra
[1] = readb(window
+ I3000_C1DRA
+ 1); /* ranks 2,3 */
336 for (i
= 0; i
< I3000_RANKS_PER_CHANNEL
; i
++) {
337 c0drb
[i
] = readb(window
+ I3000_C0DRB
+ i
);
338 c1drb
[i
] = readb(window
+ I3000_C1DRB
+ i
);
344 * Figure out how many channels we have.
346 * If we have what the datasheet calls "asymmetric channels"
347 * (essentially the same as what was called "virtual single
348 * channel mode" in the i82875) then it's a single channel as
349 * far as EDAC is concerned.
351 interleaved
= i3000_is_interleaved(c0dra
, c1dra
, c0drb
, c1drb
);
352 nr_channels
= interleaved
? 2 : 1;
353 mci
= edac_mc_alloc(0, I3000_RANKS
/ nr_channels
, nr_channels
, 0);
357 debugf3("MC: %s(): init mci\n", __func__
);
359 mci
->dev
= &pdev
->dev
;
360 mci
->mtype_cap
= MEM_FLAG_DDR2
;
362 mci
->edac_ctl_cap
= EDAC_FLAG_SECDED
;
363 mci
->edac_cap
= EDAC_FLAG_SECDED
;
365 mci
->mod_name
= EDAC_MOD_STR
;
366 mci
->mod_ver
= I3000_REVISION
;
367 mci
->ctl_name
= i3000_devs
[dev_idx
].ctl_name
;
368 mci
->dev_name
= pci_name(pdev
);
369 mci
->edac_check
= i3000_check
;
370 mci
->ctl_page_to_phys
= NULL
;
373 * The dram rank boundary (DRB) reg values are boundary addresses
374 * for each DRAM rank with a granularity of 32MB. DRB regs are
375 * cumulative; the last one will contain the total memory
376 * contained in all ranks.
378 * If we're in interleaved mode then we're only walking through
379 * the ranks of controller 0, so we double all the values we see.
381 for (last_cumul_size
= i
= 0; i
< mci
->nr_csrows
; i
++) {
384 struct csrow_info
*csrow
= &mci
->csrows
[i
];
387 cumul_size
= value
<< (I3000_DRB_SHIFT
- PAGE_SHIFT
);
390 debugf3("MC: %s(): (%d) cumul_size 0x%x\n",
391 __func__
, i
, cumul_size
);
392 if (cumul_size
== last_cumul_size
) {
393 csrow
->mtype
= MEM_EMPTY
;
397 csrow
->first_page
= last_cumul_size
;
398 csrow
->last_page
= cumul_size
- 1;
399 csrow
->nr_pages
= cumul_size
- last_cumul_size
;
400 last_cumul_size
= cumul_size
;
401 csrow
->grain
= I3000_DEAP_GRAIN
;
402 csrow
->mtype
= MEM_DDR2
;
403 csrow
->dtype
= DEV_UNKNOWN
;
404 csrow
->edac_mode
= EDAC_UNKNOWN
;
408 * Clear any error bits.
409 * (Yes, we really clear bits by writing 1 to them.)
411 pci_write_bits16(pdev
, I3000_ERRSTS
, I3000_ERRSTS_BITS
,
415 if (edac_mc_add_mc(mci
)) {
416 debugf3("MC: %s(): failed edac_mc_add_mc()\n", __func__
);
420 /* allocating generic PCI control info */
421 i3000_pci
= edac_pci_create_generic_ctl(&pdev
->dev
, EDAC_MOD_STR
);
424 "%s(): Unable to create PCI control\n",
427 "%s(): PCI error report via EDAC not setup\n",
431 /* get this far and it's successful */
432 debugf3("MC: %s(): success\n", __func__
);
442 /* returns count (>= 0), or negative on error */
443 static int __devinit
i3000_init_one(struct pci_dev
*pdev
,
444 const struct pci_device_id
*ent
)
448 debugf0("MC: %s()\n", __func__
);
450 if (pci_enable_device(pdev
) < 0)
453 rc
= i3000_probe1(pdev
, ent
->driver_data
);
455 mci_pdev
= pci_dev_get(pdev
);
460 static void __devexit
i3000_remove_one(struct pci_dev
*pdev
)
462 struct mem_ctl_info
*mci
;
464 debugf0("%s()\n", __func__
);
467 edac_pci_release_generic_ctl(i3000_pci
);
469 mci
= edac_mc_del_mc(&pdev
->dev
);
476 static const struct pci_device_id i3000_pci_tbl
[] __devinitdata
= {
478 PCI_VEND_DEV(INTEL
, 3000_HB
), PCI_ANY_ID
, PCI_ANY_ID
, 0, 0,
482 } /* 0 terminated list. */
485 MODULE_DEVICE_TABLE(pci
, i3000_pci_tbl
);
487 static struct pci_driver i3000_driver
= {
488 .name
= EDAC_MOD_STR
,
489 .probe
= i3000_init_one
,
490 .remove
= __devexit_p(i3000_remove_one
),
491 .id_table
= i3000_pci_tbl
,
494 static int __init
i3000_init(void)
498 debugf3("MC: %s()\n", __func__
);
499 pci_rc
= pci_register_driver(&i3000_driver
);
504 i3000_registered
= 0;
505 mci_pdev
= pci_get_device(PCI_VENDOR_ID_INTEL
,
506 PCI_DEVICE_ID_INTEL_3000_HB
, NULL
);
508 debugf0("i3000 pci_get_device fail\n");
513 pci_rc
= i3000_init_one(mci_pdev
, i3000_pci_tbl
);
515 debugf0("i3000 init fail\n");
524 pci_unregister_driver(&i3000_driver
);
528 pci_dev_put(mci_pdev
);
533 static void __exit
i3000_exit(void)
535 debugf3("MC: %s()\n", __func__
);
537 pci_unregister_driver(&i3000_driver
);
538 if (!i3000_registered
) {
539 i3000_remove_one(mci_pdev
);
540 pci_dev_put(mci_pdev
);
544 module_init(i3000_init
);
545 module_exit(i3000_exit
);
547 MODULE_LICENSE("GPL");
548 MODULE_AUTHOR("Akamai Technologies Arthur Ulfeldt/Jason Uhlenkott");
549 MODULE_DESCRIPTION("MC support for Intel 3000 memory hub controllers");
551 module_param(edac_op_state
, int, 0444);
552 MODULE_PARM_DESC(edac_op_state
, "EDAC Error Reporting state: 0=Poll,1=NMI");