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@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@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@44:     private Sensor busClock;
moel@22:     private uint logicalProcessors;
moel@7:     private uint logicalProcessorsPerCore;
moel@22:     private uint coreCount;
moel@63:     private ulong affinityMask;
moel@1: 
moel@26:     private CPULoad cpuLoad;
moel@44: 
moel@44:     private ulong lastCount;    
moel@44:     private long lastTime;
moel@46:     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@63:     [DllImport("kernel32.dll", CharSet = CharSet.Auto, SetLastError = true)]
moel@63:     private static extern bool GetProcessAffinityMask(IntPtr handle, 
moel@63:       out IntPtr processMask, out IntPtr systemMask);
moel@63: 
moel@1:     public IntelCPU(string name, uint family, uint model, uint stepping, 
moel@1:       uint[,] cpuidData, uint[,] cpuidExtData) {
moel@1:       
moel@1:       this.name = name;
moel@1:       this.icon = Utilities.EmbeddedResources.GetImage("cpu.png");
moel@46: 
moel@46:       this.family = family;
moel@46:       this.model = model;
moel@46:       this.stepping = stepping;
moel@46: 
moel@23:       logicalProcessors = 0;
moel@22:       if (cpuidData.GetLength(0) > 0x0B) {
moel@22:         uint eax, ebx, ecx, edx;
moel@22:         WinRing0.CpuidEx(0x0B, 0, out eax, out ebx, out ecx, out edx);
moel@23:         logicalProcessorsPerCore = ebx & 0xFF;
moel@23:         if (logicalProcessorsPerCore > 0) {
moel@23:           WinRing0.CpuidEx(0x0B, 1, out eax, out ebx, out ecx, out edx);
moel@23:           logicalProcessors = ebx & 0xFF;
moel@23:         }   
moel@23:       }
moel@23:       if (logicalProcessors <= 0 && cpuidData.GetLength(0) > 0x04) {
moel@49:         uint coresPerPackage = ((cpuidData[4, 0] >> 26) & 0x3F) + 1;
moel@49:         uint logicalPerPackage = (cpuidData[1, 1] >> 16) & 0xFF;        
moel@49:         logicalProcessorsPerCore = logicalPerPackage / coresPerPackage;
moel@49:         logicalProcessors = logicalPerPackage;
moel@49:       }
moel@49:       if (logicalProcessors <= 0 && cpuidData.GetLength(0) > 0x01) {
moel@49:         uint logicalPerPackage = (cpuidData[1, 1] >> 16) & 0xFF;
moel@49:         logicalProcessorsPerCore = logicalPerPackage;
moel@49:         logicalProcessors = logicalPerPackage;
moel@23:       }
moel@23:       if (logicalProcessors <= 0) {
moel@22:         logicalProcessors = 1;
moel@22:         logicalProcessorsPerCore = 1;
moel@22:       }
moel@4: 
moel@63:       IntPtr processMask, systemMask;
moel@63:       GetProcessAffinityMask(Process.GetCurrentProcess().Handle,
moel@63:         out processMask, out systemMask);
moel@63:       affinityMask = (ulong)systemMask;
moel@63: 
moel@63:       // correct values in case HypeThreading is disabled
moel@63:       if (logicalProcessorsPerCore > 1) {
moel@63:         ulong affinity = affinityMask;
moel@63:         int availableLogicalProcessors = 0;
moel@63:         while (affinity != 0) {
moel@63:           if ((affinity & 0x1) > 0)
moel@63:             availableLogicalProcessors++;
moel@63:           affinity >>= 1;
moel@63:         }
moel@63:         while (logicalProcessorsPerCore > 1 &&
moel@63:           availableLogicalProcessors < logicalProcessors) {
moel@63:           logicalProcessors >>= 1;
moel@63:           logicalProcessorsPerCore >>= 1;
moel@63:         }
moel@63:       }
moel@63: 
moel@22:       coreCount = logicalProcessors / logicalProcessorsPerCore;
moel@63: 
moel@63:       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@52:                         tjMax = 80 + 10; break;
moel@49:                       case 4:
moel@52:                         tjMax = 90 + 10; break;
moel@49:                       default:
moel@52:                         tjMax = 85 + 10; break;
moel@49:                     }
moel@52:                     tjMax = 80 + 10; break;
moel@49:                   case 0x0B: // G0
moel@52:                     tjMax = 90 + 10; break;
moel@49:                   case 0x0D: // M0
moel@52:                     tjMax = 85 + 10; break;
moel@49:                   default:
moel@52:                     tjMax = 85 + 10; break;
moel@49:                 } break;
moel@49:               case 0x17: // Intel Core (45nm)
moel@49:                 tjMax = 100; break;
moel@49:               case 0x1C: // Intel Atom 
moel@49:                 tjMax = 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@49:                 if (WinRing0.Rdmsr(IA32_TEMPERATURE_TARGET, out eax, out edx)) {
moel@49:                   tjMax = (eax >> 16) & 0xFF;
moel@49:                 } else {
moel@49:                   tjMax = 100;
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@49:                 tjMax = 100; break;
moel@49:             }
moel@49:           } break;
moel@49:         default: tjMax = 100; break;
moel@49:       }
moel@1: 
moel@44:       // check if processor supports a digital thermal sensor
moel@44:       if (cpuidData.GetLength(0) > 6 && (cpuidData[6, 0] & 1) != 0) {
moel@44:         coreTemperatures = new Sensor[coreCount];
moel@44:         for (int i = 0; i < coreTemperatures.Length; i++) {
moel@49:           coreTemperatures[i] = new Sensor(CoreString(i), i, tjMax,
moel@63:             SensorType.Temperature, this, new ParameterDescription[] { 
moel@63:               new ParameterDescription(
moel@63:                 "TjMax", "TjMax temperature of the core.\n" + 
moel@63:                 "Temperature = TjMax - TSlope * Value.", tjMax), 
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@26:       cpuLoad = new CPULoad(coreCount, logicalProcessorsPerCore);
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@44:       lastCount = 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@44:         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@49:     private void AppendMSRData(StringBuilder r, uint msr, int core) {
moel@49:       uint eax, edx;
moel@49:       if (WinRing0.RdmsrTx(msr, out eax, out edx,
moel@49:          (UIntPtr)(1 << (int)(logicalProcessorsPerCore * core)))) {
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@63:       r.AppendFormat("Threads per Core: {0}{1}", logicalProcessorsPerCore,
moel@5:         Environment.NewLine);
moel@63:       r.AppendFormat("Affinity Mask: 0x{0}{1}", affinityMask.ToString("X"),
moel@63:         Environment.NewLine);  
moel@5:       r.AppendLine();
moel@5: 
moel@49:       for (int i = 0; i < coreCount; i++) {
moel@49:         r.AppendLine("MSR Core #" + (i + 1));
moel@49:         r.AppendLine();
moel@49:         r.AppendLine(" MSR       EDX       EAX");
moel@49:         AppendMSRData(r, MSR_PLATFORM_INFO, i);
moel@49:         AppendMSRData(r, IA32_PERF_STATUS, i);
moel@49:         AppendMSRData(r, IA32_THERM_STATUS_MSR, i);
moel@49:         AppendMSRData(r, IA32_TEMPERATURE_TARGET, i);
moel@49:         r.AppendLine();
moel@49:       }
moel@49: 
moel@5:       return r.ToString();
moel@1:     }
moel@1: 
moel@1:     public void Update() {
moel@44:             
moel@1:       for (int i = 0; i < coreTemperatures.Length; i++) {
moel@46:         uint eax, edx;
moel@46:         if (WinRing0.RdmsrTx(
moel@46:           IA32_THERM_STATUS_MSR, out eax, out edx, 
moel@13:             (UIntPtr)(1 << (int)(logicalProcessorsPerCore * i)))) 
moel@1:         {
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@1:         }        
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@44:      
moel@46:       uint lsb, msb;
moel@46:       bool valid = WinRing0.RdtscTx(out lsb, out msb, (UIntPtr)1);
moel@44:       long time = Stopwatch.GetTimestamp();
moel@44:       ulong count = ((ulong)msb << 32) | lsb;
moel@44:       double delta = ((double)(time - lastTime)) / Stopwatch.Frequency;
moel@44:       if (valid && delta > 0.5) {
moel@46:         double maxClock = (count - lastCount) / (1e6 * delta);
moel@44:         double busClock = 0;
moel@46:         uint eax, edx;
moel@44:         for (int i = 0; i < coreClocks.Length; i++) {
moel@44:           System.Threading.Thread.Sleep(1);
moel@46:           if (WinRing0.RdmsrTx(IA32_PERF_STATUS, out eax, out edx,
moel@44:             (UIntPtr)(1 << (int)(logicalProcessorsPerCore * i)))) {
moel@49:             if (maxNehalemMultiplier > 0) { // Core i3, i5, i7
moel@49:               uint nehalemMultiplier = eax & 0xff;
moel@49:               coreClocks[i].Value =
moel@49:                 (float)(nehalemMultiplier * maxClock / maxNehalemMultiplier);
moel@49:               busClock = (float)(maxClock / maxNehalemMultiplier);
moel@49:             } else { // Core 2
moel@46:               uint multiplier = (eax >> 8) & 0x1f;
moel@46:               uint maxMultiplier = (edx >> 8) & 0x1f;
moel@46:               // factor = multiplier * 2 to handle non integer multipliers 
moel@46:               uint factor = (multiplier << 1) | ((eax >> 14) & 1);
moel@46:               uint maxFactor = (maxMultiplier << 1) | ((edx >> 14) & 1);
moel@46:               if (maxFactor > 0) {
moel@46:                 coreClocks[i].Value = (float)(factor * maxClock / maxFactor);
moel@46:                 busClock = (float)(2 * maxClock / maxFactor);
moel@46:               }
moel@49:             }  
moel@46:           } else { // Intel Pentium 4
moel@44:             // if IA32_PERF_STATUS is not available, assume maxClock
moel@44:             coreClocks[i].Value = (float)maxClock;
moel@46:           }
moel@44:         }
moel@44:         if (busClock > 0) {
moel@44:           this.busClock.Value = (float)busClock;
moel@44:           ActivateSensor(this.busClock);
moel@44:         }
moel@44:       }
moel@44:       lastCount = count;
moel@44:       lastTime = time;
moel@46:     }
moel@46:   }  
moel@1: }