moel@1: /*
moel@1:   
moel@1:   Version: MPL 1.1/GPL 2.0/LGPL 2.1
moel@1: 
moel@1:   The contents of this file are subject to the Mozilla Public License Version
moel@1:   1.1 (the "License"); you may not use this file except in compliance with
moel@1:   the License. You may obtain a copy of the License at
moel@1:  
moel@1:   http://www.mozilla.org/MPL/
moel@1: 
moel@1:   Software distributed under the License is distributed on an "AS IS" basis,
moel@1:   WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License
moel@1:   for the specific language governing rights and limitations under the License.
moel@1: 
moel@1:   The Original Code is the Open Hardware Monitor code.
moel@1: 
moel@1:   The Initial Developer of the Original Code is 
moel@1:   Michael Möller <m.moeller@gmx.ch>.
moel@1:   Portions created by the Initial Developer are Copyright (C) 2009-2010
moel@1:   the Initial Developer. All Rights Reserved.
moel@1: 
moel@1:   Contributor(s):
moel@1: 
moel@1:   Alternatively, the contents of this file may be used under the terms of
moel@1:   either the GNU General Public License Version 2 or later (the "GPL"), or
moel@1:   the GNU Lesser General Public License Version 2.1 or later (the "LGPL"),
moel@1:   in which case the provisions of the GPL or the LGPL are applicable instead
moel@1:   of those above. If you wish to allow use of your version of this file only
moel@1:   under the terms of either the GPL or the LGPL, and not to allow others to
moel@1:   use your version of this file under the terms of the MPL, indicate your
moel@1:   decision by deleting the provisions above and replace them with the notice
moel@1:   and other provisions required by the GPL or the LGPL. If you do not delete
moel@1:   the provisions above, a recipient may use your version of this file under
moel@1:   the terms of any one of the MPL, the GPL or the LGPL.
moel@1:  
moel@1: */
moel@1: 
moel@1: using System;
moel@1: using System.Collections.Generic;
moel@1: using System.Drawing;
moel@24: using System.Diagnostics;
moel@79: using System.Globalization;
moel@1: using System.Reflection;
moel@63: using System.Runtime.InteropServices;
moel@63: using System.Threading;
moel@1: using System.Text;
moel@1: 
moel@1: namespace OpenHardwareMonitor.Hardware.CPU {
moel@31:   public class IntelCPU : Hardware, IHardware {
moel@1: 
moel@90:     private CPUID[][] cpuid;
moel@90:     private int coreCount;
moel@90:     
moel@1:     private string name;
moel@1:     private Image icon;
moel@1: 
moel@46:     private uint family;
moel@46:     private uint model;
moel@46:     private uint stepping;
moel@46: 
moel@1:     private Sensor[] coreTemperatures;
moel@63: 
moel@24:     private Sensor totalLoad;
moel@24:     private Sensor[] coreLoads;
moel@44:     private Sensor[] coreClocks;
moel@90:     private Sensor busClock;    
moel@79:     private bool hasTSC;
moel@79:     private bool invariantTSC;    
moel@79:     private double estimatedMaxClock;
moel@79: 
moel@26:     private CPULoad cpuLoad;
moel@44: 
moel@79:     private ulong lastTimeStampCount;    
moel@44:     private long lastTime;
moel@79:     private uint maxNehalemMultiplier = 0;    
moel@26:     
moel@1:     private const uint IA32_THERM_STATUS_MSR = 0x019C;
moel@4:     private const uint IA32_TEMPERATURE_TARGET = 0x01A2;
moel@44:     private const uint IA32_PERF_STATUS = 0x0198;
moel@46:     private const uint MSR_PLATFORM_INFO = 0xCE;
moel@1: 
moel@49:     private string CoreString(int i) {
moel@49:       if (coreCount == 1)
moel@49:         return "CPU Core";
moel@49:       else
moel@49:         return "CPU Core #" + (i + 1);
moel@49:     }
moel@49: 
moel@69:     private float[] Floats(float f) {
moel@69:       float[] result = new float[coreCount];
moel@69:       for (int i = 0; i < coreCount; i++)
moel@69:         result[i] = f;
moel@69:       return result;
moel@69:     }
moel@69: 
moel@90:     public IntelCPU(CPUID[][] cpuid) {
moel@90: 
moel@90:       this.cpuid = cpuid;
moel@90:       this.coreCount = cpuid.Length;
moel@90:       this.name = cpuid[0][0].Name;
moel@1:       this.icon = Utilities.EmbeddedResources.GetImage("cpu.png");
moel@46: 
moel@90:       this.family = cpuid[0][0].Family;
moel@90:       this.model = cpuid[0][0].Model;
moel@90:       this.stepping = cpuid[0][0].Stepping;
moel@63: 
moel@69:       float[] tjMax;
moel@49:       switch (family) {
moel@49:         case 0x06: {
moel@49:             switch (model) {
moel@49:               case 0x0F: // Intel Core (65nm)
moel@49:                 switch (stepping) {
moel@49:                   case 0x06: // B2
moel@49:                     switch (coreCount) {
moel@49:                       case 2:
moel@69:                         tjMax = Floats(80 + 10); break;
moel@49:                       case 4:
moel@69:                         tjMax = Floats(90 + 10); break;
moel@49:                       default:
moel@69:                         tjMax = Floats(85 + 10); break;
moel@49:                     }
moel@69:                     tjMax = Floats(80 + 10); break;
moel@49:                   case 0x0B: // G0
moel@69:                     tjMax = Floats(90 + 10); break;
moel@49:                   case 0x0D: // M0
moel@69:                     tjMax = Floats(85 + 10); break;
moel@49:                   default:
moel@69:                     tjMax = Floats(85 + 10); break;
moel@49:                 } break;
moel@49:               case 0x17: // Intel Core (45nm)
moel@69:                 tjMax = Floats(100); break;
moel@49:               case 0x1C: // Intel Atom 
moel@69:                 tjMax = Floats(90); break;
moel@49:               case 0x1A: // Intel Core i7 LGA1366 (45nm)
moel@49:               case 0x1E: // Intel Core i5, i7 LGA1156 (45nm)
moel@49:               case 0x25: // Intel Core i3, i5, i7 LGA1156 (32nm)
moel@49:                 uint eax, edx;
moel@69:                 tjMax = new float[coreCount];
moel@69:                 for (int i = 0; i < coreCount; i++) {
moel@69:                   if (WinRing0.RdmsrTx(IA32_TEMPERATURE_TARGET, out eax,
moel@90:                     out edx, (UIntPtr)(1L << cpuid[i][0].Thread)))
moel@69:                   {
moel@69:                     tjMax[i] = (eax >> 16) & 0xFF;
moel@69:                   } else {
moel@69:                     tjMax[i] = 100;
moel@69:                   }
moel@49:                 }
moel@49:                 if (WinRing0.Rdmsr(MSR_PLATFORM_INFO, out eax, out edx)) {
moel@49:                   maxNehalemMultiplier = (eax >> 8) & 0xff;
moel@49:                 }
moel@49:                 break;
moel@49:               default:
moel@69:                 tjMax = Floats(100); break;
moel@49:             }
moel@49:           } break;
moel@69:         default: tjMax = Floats(100); break;
moel@49:       }
moel@1: 
moel@44:       // check if processor supports a digital thermal sensor
moel@90:       if (cpuid[0][0].Data.GetLength(0) > 6 && 
moel@90:         (cpuid[0][0].Data[6, 0] & 1) != 0) 
moel@90:       {
moel@44:         coreTemperatures = new Sensor[coreCount];
moel@44:         for (int i = 0; i < coreTemperatures.Length; i++) {
moel@69:           coreTemperatures[i] = new Sensor(CoreString(i), i, tjMax[i],
moel@63:             SensorType.Temperature, this, new ParameterDescription[] { 
moel@63:               new ParameterDescription(
moel@63:                 "TjMax", "TjMax temperature of the core.\n" + 
moel@69:                 "Temperature = TjMax - TSlope * Value.", tjMax[i]), 
moel@63:               new ParameterDescription(
moel@63:                 "TSlope", "Temperature slope of the digital thermal sensor.\n" + 
moel@63:                 "Temperature = TjMax - TSlope * Value.", 1)});
moel@44:         }
moel@44:       } else {
moel@44:         coreTemperatures = new Sensor[0];
moel@1:       }
moel@49: 
moel@49:       if (coreCount > 1)
moel@49:         totalLoad = new Sensor("CPU Total", 0, SensorType.Load, this);
moel@49:       else
moel@49:         totalLoad = null;
moel@24:       coreLoads = new Sensor[coreCount];
moel@49:       for (int i = 0; i < coreLoads.Length; i++)
moel@49:         coreLoads[i] = new Sensor(CoreString(i), i + 1,
moel@44:           SensorType.Load, this);     
moel@90:       cpuLoad = new CPULoad(cpuid);
moel@26:       if (cpuLoad.IsAvailable) {
moel@26:         foreach (Sensor sensor in coreLoads)
moel@26:           ActivateSensor(sensor);
moel@49:         if (totalLoad != null)
moel@49:           ActivateSensor(totalLoad);
moel@26:       }
moel@26: 
moel@79:       // check if processor has TSC
moel@90:       if (cpuid[0][0].Data.GetLength(0) > 1 
moel@90:         && (cpuid[0][0].Data[1, 3] & 0x10) != 0)
moel@79:         hasTSC = true;
moel@79:       else
moel@79:         hasTSC = false; 
moel@79: 
moel@79:       // check if processor supports invariant TSC 
moel@90:       if (cpuid[0][0].ExtData.GetLength(0) > 7 
moel@90:         && (cpuid[0][0].ExtData[7, 3] & 0x100) != 0)
moel@79:         invariantTSC = true;
moel@79:       else
moel@79:         invariantTSC = false;
moel@79: 
moel@79:       // preload the function
moel@79:       EstimateMaxClock(0); 
moel@79:       EstimateMaxClock(0); 
moel@79: 
moel@79:       // estimate the max clock in MHz      
moel@79:       estimatedMaxClock = 1e-6 * EstimateMaxClock(0.01);
moel@79: 
moel@79:       lastTimeStampCount = 0;
moel@44:       lastTime = 0;
moel@44:       busClock = new Sensor("Bus Speed", 0, SensorType.Clock, this);      
moel@44:       coreClocks = new Sensor[coreCount];
moel@44:       for (int i = 0; i < coreClocks.Length; i++) {
moel@49:         coreClocks[i] =
moel@49:           new Sensor(CoreString(i), i + 1, SensorType.Clock, this);
moel@79:         if (hasTSC)
moel@79:           ActivateSensor(coreClocks[i]);
moel@44:       }
moel@44:       
moel@1:       Update();                   
moel@1:     }
moel@1: 
moel@1:     public string Name {
moel@1:       get { return name; }
moel@1:     }
moel@1: 
moel@1:     public string Identifier {
moel@1:       get { return "/intelcpu/0"; }
moel@1:     }
moel@1: 
moel@1:     public Image Icon {
moel@1:       get { return icon; }
moel@1:     }
moel@1: 
moel@90:     private void AppendMSRData(StringBuilder r, uint msr, int thread) {
moel@49:       uint eax, edx;
moel@90:       if (WinRing0.RdmsrTx(msr, out eax, out edx, (UIntPtr)(1L << thread))) {
moel@49:         r.Append(" ");
moel@49:         r.Append((msr).ToString("X8"));
moel@49:         r.Append("  ");
moel@49:         r.Append((edx).ToString("X8"));
moel@49:         r.Append("  ");
moel@49:         r.Append((eax).ToString("X8"));
moel@49:         r.AppendLine();
moel@49:       }
moel@49:     }
moel@49: 
moel@1:     public string GetReport() {
moel@5:       StringBuilder r = new StringBuilder();
moel@5: 
moel@5:       r.AppendLine("Intel CPU");
moel@5:       r.AppendLine();
moel@5:       r.AppendFormat("Name: {0}{1}", name, Environment.NewLine);
moel@63:       r.AppendFormat("Number of Cores: {0}{1}", coreCount, 
moel@22:         Environment.NewLine);
moel@90:       r.AppendFormat("Threads per Core: {0}{1}", cpuid[0].Length,
moel@90:         Environment.NewLine);     
moel@79:       r.AppendLine("TSC: " + 
moel@79:         (hasTSC ? (invariantTSC ? "Invariant" : "Not Invariant") : "None"));
moel@79:       r.AppendLine(string.Format(CultureInfo.InvariantCulture, 
moel@79:         "Timer Frequency: {0} MHz", Stopwatch.Frequency * 1e-6));
moel@79:       r.AppendLine(string.Format(CultureInfo.InvariantCulture,
moel@79:         "Max Clock: {0} MHz", Math.Round(estimatedMaxClock * 100) * 0.01));
moel@5:       r.AppendLine();
moel@5: 
moel@90:       for (int i = 0; i < cpuid.Length; i++) {
moel@49:         r.AppendLine("MSR Core #" + (i + 1));
moel@49:         r.AppendLine();
moel@49:         r.AppendLine(" MSR       EDX       EAX");
moel@90:         AppendMSRData(r, MSR_PLATFORM_INFO, cpuid[i][0].Thread);
moel@90:         AppendMSRData(r, IA32_PERF_STATUS, cpuid[i][0].Thread);
moel@90:         AppendMSRData(r, IA32_THERM_STATUS_MSR, cpuid[i][0].Thread);
moel@90:         AppendMSRData(r, IA32_TEMPERATURE_TARGET, cpuid[i][0].Thread);
moel@49:         r.AppendLine();
moel@49:       }
moel@49: 
moel@5:       return r.ToString();
moel@1:     }
moel@1: 
moel@79:     private double EstimateMaxClock(double timeWindow) {
moel@79:       long ticks = (long)(timeWindow * Stopwatch.Frequency);
moel@79:       uint lsbBegin, msbBegin, lsbEnd, msbEnd; 
moel@79:       
moel@79:       Thread.BeginThreadAffinity();
moel@79:       long timeBegin = Stopwatch.GetTimestamp() + 2;
moel@79:       long timeEnd = timeBegin + ticks;      
moel@79:       while (Stopwatch.GetTimestamp() < timeBegin) { }
moel@79:       WinRing0.Rdtsc(out lsbBegin, out msbBegin);
moel@79:       while (Stopwatch.GetTimestamp() < timeEnd) { }
moel@79:       WinRing0.Rdtsc(out lsbEnd, out msbEnd);
moel@79:       Thread.EndThreadAffinity();
moel@79: 
moel@79:       ulong countBegin = ((ulong)msbBegin << 32) | lsbBegin;
moel@79:       ulong countEnd = ((ulong)msbEnd << 32) | lsbEnd;
moel@79: 
moel@79:       return (((double)(countEnd - countBegin)) * Stopwatch.Frequency) / 
moel@79:         (timeEnd - timeBegin);
moel@79:     }
moel@79: 
moel@86:     public void Update() {      
moel@1:       for (int i = 0; i < coreTemperatures.Length; i++) {
moel@46:         uint eax, edx;
moel@46:         if (WinRing0.RdmsrTx(
moel@90:           IA32_THERM_STATUS_MSR, out eax, out edx, 
moel@90:             (UIntPtr)(1L << cpuid[i][0].Thread))) {
moel@1:           // if reading is valid
moel@1:           if ((eax & 0x80000000) != 0) {
moel@1:             // get the dist from tjMax from bits 22:16
moel@63:             float deltaT = ((eax & 0x007F0000) >> 16);
moel@63:             float tjMax = coreTemperatures[i].Parameters[0].Value;
moel@63:             float tSlope = coreTemperatures[i].Parameters[1].Value;
moel@63:             coreTemperatures[i].Value = tjMax - tSlope * deltaT;
moel@24:             ActivateSensor(coreTemperatures[i]);
moel@24:           } else {
moel@24:             DeactivateSensor(coreTemperatures[i]);
moel@1:           }
moel@79:         }
moel@24:       }
moel@24: 
moel@26:       if (cpuLoad.IsAvailable) {
moel@26:         cpuLoad.Update();
moel@26:         for (int i = 0; i < coreLoads.Length; i++)
moel@26:           coreLoads[i].Value = cpuLoad.GetCoreLoad(i);
moel@49:         if (totalLoad != null)
moel@49:           totalLoad.Value = cpuLoad.GetTotalLoad();
moel@24:       }
moel@79: 
moel@79:       if (hasTSC) {
moel@79:         uint lsb, msb;
moel@79:         WinRing0.RdtscTx(out lsb, out msb, (UIntPtr)1);
moel@79:         long time = Stopwatch.GetTimestamp();
moel@79:         ulong timeStampCount = ((ulong)msb << 32) | lsb;
moel@79:         double delta = ((double)(time - lastTime)) / Stopwatch.Frequency;
moel@79:         if (delta > 0.5) {
moel@79:           double maxClock;
moel@79:           if (invariantTSC)
moel@79:             maxClock = (timeStampCount - lastTimeStampCount) / (1e6 * delta);
moel@79:           else
moel@79:             maxClock = estimatedMaxClock;
moel@79: 
moel@79:           double busClock = 0;
moel@79:           uint eax, edx;
moel@79:           for (int i = 0; i < coreClocks.Length; i++) {
moel@79:             System.Threading.Thread.Sleep(1);
moel@79:             if (WinRing0.RdmsrTx(IA32_PERF_STATUS, out eax, out edx,
moel@90:               (UIntPtr)(1L << cpuid[i][0].Thread))) {
moel@79:               if (maxNehalemMultiplier > 0) { // Core i3, i5, i7
moel@79:                 uint nehalemMultiplier = eax & 0xff;
moel@79:                 coreClocks[i].Value =
moel@79:                   (float)(nehalemMultiplier * maxClock / maxNehalemMultiplier);
moel@79:                 busClock = (float)(maxClock / maxNehalemMultiplier);
moel@79:               } else { // Core 2
moel@79:                 uint multiplier = (eax >> 8) & 0x1f;
moel@79:                 uint maxMultiplier = (edx >> 8) & 0x1f;
moel@79:                 // factor = multiplier * 2 to handle non integer multipliers 
moel@79:                 uint factor = (multiplier << 1) | ((eax >> 14) & 1);
moel@79:                 uint maxFactor = (maxMultiplier << 1) | ((edx >> 14) & 1);
moel@79:                 if (maxFactor > 0) {
moel@79:                   coreClocks[i].Value = (float)(factor * maxClock / maxFactor);
moel@79:                   busClock = (float)(2 * maxClock / maxFactor);
moel@79:                 }
moel@46:               }
moel@79:             } else { // Intel Pentium 4
moel@79:               // if IA32_PERF_STATUS is not available, assume maxClock
moel@79:               coreClocks[i].Value = (float)maxClock;
moel@79:             }
moel@79:           }
moel@79:           if (busClock > 0) {
moel@79:             this.busClock.Value = (float)busClock;
moel@79:             ActivateSensor(this.busClock);
moel@46:           }
moel@44:         }
moel@79:         lastTimeStampCount = timeStampCount;
moel@79:         lastTime = time;
moel@44:       }
moel@46:     }
moel@46:   }  
moel@1: }