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
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
|
#!/usr/bin/perl
#
# Copyright 1998, 1999 Philip Edelbrock <phil@netroedge.com>
# and Mark Studebaker <mdsxyz123@yahoo.com>
#
# Version 0.1
#
#
# ID ROM data decoding for Xeon processors.
# Each Xeon processor contains two memories:
# - A scratch EEPROM at an even location 0x50, 52, 54, or 56;
# - An ID ROM at an odd location 0x51, 53, 55, or 57.
# This program decodes the ID ROM's only.
# The scratch EEPROMs have no prescribed format.
# If the output of this program makes no sense for a particular device,
# it is probably decoding a DIMM Serial Presence Detect (SPD) EEPROM.
# See decode-dimms to decode those devices.
#
#
# The eeprom driver must be loaded. For kernels older than 2.6.0, the
# eeprom driver can be found in the lm-sensors package.
#
# To do:
# Calculate and check checksums for each section
# Decode flags in byte 0x7B (cartridge feature flags)
#
# References:
# "Pentium II Xeon Processor at 400 and 450 MHz" Data Sheet
# Intel
#
#
#
print "Xeon Processor Information ROM Decoder\n";
print "Written by Philip Edelbrock and Mark Studebaker. Copyright 1998, 1999.\n";
print "Version 2.6.3\n\n";
$dimm_count=0;
$_=`ls /proc/sys/dev/sensors/`;
@dimm_list=split();
for $i ( 0 .. $#dimm_list ) {
$_=$dimm_list[$i];
if ((/^eeprom-/) && (/-51$/ || /-53$/ || /-55$/ || /-57$/)) {
$dimm_count=$dimm_count + 1;
print "\nDecoding Xeon ROM: /proc/sys/dev/sensors/$dimm_list[$i]\n";
if (/^[^-]+-[^-]+-[^-]+-([^-]+)$/) {
$dimm_num=($1 - 49) / 2;
print "Guessing Xeon is number $dimm_num\n";
}
# Decode first 16 bytes
print "\t\t----=== Xeon ROM Header Data ===----\n";
$_=`cat /proc/sys/dev/sensors/$dimm_list[$i]/00`;
@bytes=split(" ");
printf("\tData Format Revision: \t\t\t\t0x%.4X\n", $bytes[0]);
print "\tTotal number of bytes in EEPROM:\t\t";
print ($bytes[1] << 4) + $bytes[2];
print "\n";
printf("\tProcessor Data Address:\t\t\t\t0x%.2X\n", $bytes[3]);
printf("\tProcessor Core Data Address:\t\t\t0x%.2X\n", $bytes[4]);
printf("\tL2 Cache Data Address:\t\t\t\t0x%.2X\n", $bytes[5]);
printf("\tSEC Cartridge Data Address:\t\t\t0x%.2X\n", $bytes[6]);
printf("\tPart Number Data Address:\t\t\t0x%.2X\n", $bytes[7]);
printf("\tThermal Reference Data Address:\t\t\t0x%.2X\n", $bytes[8]);
printf("\tFeature Data Address:\t\t\t\t0x%.2X\n", $bytes[9]);
printf("\tOther Data Address:\t\t\t\t0x%.2X\n", $bytes[10]);
print "\t\t----=== Xeon ROM Processor Data ===----\n";
# Decode next 16 bytes
$_=`cat /proc/sys/dev/sensors/$dimm_list[$i]/10`;
@bbytes=split(" ");
print "\tS-spec/QDF Number:\t\t\t\t\"";
print pack("cccccc",$bytes[14],$bytes[15],$bbytes[0],
$bbytes[1],$bbytes[2],$bbytes[3]);
print "\"\n";
$tmp = $bbytes[4] & 0xC0 >> 6;
printf("\tSample / Production:\t\t\t\t0x%.2X", $tmp);
if($tmp) {
print " (Production)\n";
} else {
print " (Sample)\n";
}
print "\t\t----=== Xeon ROM Core Data ===----\n";
printf("\tProcessor Core Type:\t\t\t\t0x%.2X\n",
($bbytes[6] & 0xC0) >> 6);
printf("\tProcessor Core Family:\t\t\t\t0x%.2X\n",
($bbytes[6] & 0x3C) >> 2);
printf("\tProcessor Core Model:\t\t\t\t0x%.2X\n",
(($bbytes[6] & 0x03) << 2) + (($bbytes[7] & 0xC0) >> 6));
printf("\tProcessor Core Stepping:\t\t\t0x%.2X\n",
($bbytes[7] & 0x30) >> 4);
print "\tMaximum Core Frequency (Mhz):\t\t\t";
print ($bbytes[13] << 4) + $bbytes[14];
print "\n";
# Decode next 16 bytes (32-47)
$_=`cat /proc/sys/dev/sensors/$dimm_list[$i]/20`;
@bytes=split(" ");
print "\tCore Voltage ID (mV):\t\t\t\t";
print ($bbytes[15] << 4) + $bytes[0];
print "\n";
print "\tCore Voltage Tolerance, High (mV):\t\t";
print $bytes[1];
print "\n";
print "\tCore Voltage Tolerance, Low (mV):\t\t";
print $bytes[2];
print "\n";
print "\t\t----=== Xeon ROM L2 Cache Data ===----\n";
print "\tL2 Cache Size (KB):\t\t\t\t";
print ($bytes[9] << 4) + $bytes[10];
print "\n";
printf("\tNumber of SRAM Components:\t\t\t%d\n",
($bytes[11] & 0xF0) >> 4);
print "\tL2 Cache Voltage ID (mV):\t\t\t";
print ($bytes[12] << 4) + $bytes[13];
print "\n";
print "\tL2 Cache Voltage Tolerance, High (mV):\t\t";
print $bytes[14];
print "\n";
print "\tL2 Cache Voltage Tolerance, Low (mV):\t\t";
print $bytes[15];
print "\n";
# Decode next 16 bytes (48-63)
$_=`cat /proc/sys/dev/sensors/$dimm_list[$i]/30`;
@bytes=split(" ");
printf("\tCache/Tag Stepping ID:\t\t\t\t0x%.2X\n",
($bytes[0] & 0xF0) >> 4);
print "\t\t----=== Xeon ROM Cartridge Data ===----\n";
print "\tCartridge Revision:\t\t\t\t\"";
print pack("cccc",$bytes[2],$bytes[3],$bytes[4],$bytes[5]);
print "\"\n";
printf("\tSubstrate Rev. Software ID:\t\t\t0x%.2X\n",
($bbytes[6] & 0xC0) >> 6);
print "\t\t----=== Xeon ROM Part Number Data ===----\n";
print "\tProcessor Part Number:\t\t\t\t\"";
print pack("ccccccc",$bytes[8],$bytes[9],$bytes[10],
$bytes[11],$bytes[12],$bytes[13],$bytes[14]);
print "\"\n";
$byte15=$byte[15];
# Decode next 16 bytes (64-79)
$_=`cat /proc/sys/dev/sensors/$dimm_list[$i]/40`;
@bytes=split(" ");
print "\tProcessor BOM ID:\t\t\t\t\"";
print pack("cccccccccccccc",$byte15,$bytes[0],$bytes[1],
$bytes[2],$bytes[3],$bytes[4],$bytes[5],$bytes[6],
$bytes[7],$bytes[8],$bytes[9],$bytes[10],$bytes[11],
$bytes[12]);
print "\"\n";
# Decode next 16 bytes (80-95)
$_=`cat /proc/sys/dev/sensors/$dimm_list[$i]/50`;
@bbytes=split(" ");
printf("\tProcessor Electronic Signature: \t\t0x%.2X%.2X%.2X%.2X%.2X%.2X%.2X%.2X\n",
$bytes[13],$bytes[14],$bytes[15],$bbytes[0],
$bbytes[1],$bbytes[2],$bbytes[3],$bbytes[4]);
# Decode next 16 bytes (96-111)
# Not used...
# Decode next 16 bytes (112-127)
$_=`cat /proc/sys/dev/sensors/$dimm_list[$i]/70`;
@bytes=split(" ");
print "\t\t----=== Xeon Thermal Reference Data ===----\n";
printf("\tThermal Reference Byte: \t\t\t0x%.2X\n", $bytes[0]);
print "\t\t----=== Xeon ROM Feature Data ===----\n";
printf("\tProcessor Core Feature Flags: \t\t\t0x%.2X%.2X%.2X%.2X\n",
$bytes[4],$bytes[5],$bytes[6],$bytes[7]);
printf("\tCartridge Feature Flags: \t\t\t0x%.2X%.2X%.2X%.2X\n",
$bytes[8],$bytes[9],$bytes[10],$bytes[11]);
printf("\tNumber of Devices in TAP Chain:\t\t\t%d\n",
($bytes[12] & 0xF0) >> 4);
}
}
print "\n\nNumber of Xeon ROMs detected and decoded: $dimm_count\n";
|
