1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
|
/*
* (C) 2001 Dave Jones.
*
* Licensed under the terms of the GNU GPL License version 2.
*
* Dump machine check registers.
*/
#include <stdio.h>
#include <unistd.h>
#include <sys/types.h>
#include "../x86info.h"
#include "Intel.h"
#define MCG_CAP 0x0179
#define MCG_CTL_PBIT 8
#define MCG_EXT_PBIT 9
#define MCG_STATUS 0x17a
#define MCG_CTL 0x17b
#define MCG_EXT 0x180
#define MC_CTL 0x0400
#define MC_STATUS 0x0401
#define MC_ADDR 0x402
static int nr_msr_banks;
static void decode_mcg_ctl(int cpunum)
{
unsigned long long val, val2;
if (read_msr(cpunum, MCG_CTL, &val) == 1) {
printf("MCG_CTL:\n");
printf(" Data cache check %sabled\n", val & (1<<0) ? "en" : "dis");
if ((val & (1<<0)) == 1) {
if (read_msr(cpunum, MC_CTL, &val2) == 1) {
printf(" ECC 1 bit error reporting %sabled\n", val2 & (1<<0) ? "en" : "dis");
printf(" ECC multi bit error reporting %sabled\n", val2 & (1<<1) ? "en" : "dis");
printf(" Data cache data parity %sabled\n", val2 & (1<<2) ? "en" : "dis");
printf(" Data cache main tag parity %sabled\n", val2 & (1<<3) ? "en" : "dis");
printf(" Data cache snoop tag parity %sabled\n", val2 & (1<<4) ? "en" : "dis");
printf(" L1 TLB parity %sabled\n", val2 & (1<<5) ? "en" : "dis");
printf(" L2 TLB parity %sabled\n", val2 & (1<<6) ? "en" : "dis");
}
}
printf(" Instruction cache check %sabled\n", val & (1<<1) ? "en" : "dis");
if (((val & (1<<1)) == 2) && (nr_msr_banks>1)) {
if (read_msr(cpunum, MC_CTL+4, &val2) == 1) {
printf(" ECC 1 bit error reporting %sabled\n", val2 & (1<<0) ? "en" : "dis");
printf(" ECC multi bit error reporting %sabled\n", val2 & (1<<1) ? "en" : "dis");
printf(" Instruction cache data parity %sabled\n", val2 & (1<<2) ? "en" : "dis");
printf(" IC main tag parity %sabled\n", val2 & (1<<3) ? "en" : "dis");
printf(" IC snoop tag parity %sabled\n", val2 & (1<<4) ? "en" : "dis");
printf(" L1 TLB parity %sabled\n", val2 & (1<<5) ? "en" : "dis");
printf(" L2 TLB parity %sabled\n", val2 & (1<<6) ? "en" : "dis");
printf(" Predecode array parity %sabled\n", val2 & (1<<7) ? "en" : "dis");
printf(" Target selector parity %sabled\n", val2 & (1<<8) ? "en" : "dis");
printf(" Read data error %sabled\n", val2 & (1<<9) ? "en" : "dis");
}
}
printf(" Bus unit check %sabled\n", val & (1<<2) ? "en" : "dis");
if ((val & (1<<2)) == 4 && (nr_msr_banks>2)) {
if (read_msr(cpunum, MC_CTL+8, &val2) == 1) {
printf(" External L2 tag parity error %sabled\n", val2 & (1<<0) ? "en" : "dis");
printf(" L2 partial tag parity error %sabled\n", val2 & (1<<1) ? "en" : "dis");
printf(" System ECC TLB reload error %sabled\n", val2 & (1<<2) ? "en" : "dis");
printf(" L2 ECC TLB reload error %sabled\n", val2 & (1<<3) ? "en" : "dis");
printf(" L2 ECC K7 deallocate %sabled\n", val2 & (1<<4) ? "en" : "dis");
printf(" L2 ECC probe deallocate %sabled\n", val2 & (1<<5) ? "en" : "dis");
printf(" System datareaderror reporting %sabled\n", val2 & (1<<6) ? "en" : "dis");
}
}
printf(" Load/Store unit check %sabled\n", val & (1<<3) ? "en" : "dis");
if ((val & (1<<3)) == 8 && (nr_msr_banks>3)) {
if (read_msr(cpunum, MC_CTL+12, &val2) == 1) {
printf(" Read data error enable (loads) %sabled\n", val2 & (1<<0) ? "en" : "dis");
printf(" Read data error enable (stores) %sabled\n", val2 & (1<<1) ? "en" : "dis");
}
}
}
printf("\n");
}
void decode_Intel_bluesmoke(int cpunum, int family)
{
unsigned long long val;
int i, extcount = 0;
if (!user_is_root)
return;
if (read_msr(cpunum, MCG_CAP, &val) != 1)
return;
nr_msr_banks = val & 0xff;
printf("Machine check MSRs:\n");
printf("Number of reporting banks : %d\n\n", nr_msr_banks);
if (family == 0xf) {
if ((val & (1<<MCG_EXT_PBIT))) {
extcount = (val >> 16) & 0xff;
printf("Number of extended MC registers : %d\n\n", extcount);
}
else
printf("Erk, MCG_EXT not present! :%016llx:\n", val);
}
else
if (val & (1<<MCG_CTL_PBIT))
decode_mcg_ctl(cpunum);
for (i=0; i < nr_msr_banks; i++) {
printf("Bank: %d (0x%x)\n", i, (unsigned int)MC_CTL+i*4);
printf("MC%dCTL: ", i);
dumpmsr_bin (cpunum, MC_CTL+i*4, 64);
printf("MC%dSTATUS: ", i);
dumpmsr_bin (cpunum, MC_STATUS+i*4, 64);
printf("MC%dADDR: ", i);
dumpmsr_bin (cpunum, MC_ADDR+i*4, 64);
printf("\n");
}
}
|
