topic Can you access directly these in Intel® Business Client Software Development

CPU TDP

Julio_Cesar_S_ — Wed, 13 Mar 2013 16:50:04 GMT

Hi,

Is there any api that provides the TDP (watts) processor?

I can't find.

Ty.

We answer questions regarding

Gael_H_Intel — Wed, 13 Mar 2013 18:25:52 GMT

We answer questions regarding Intel Active Management Technology (vPro) on this forum. I do not know what SDK a TDP api would be a part of. (Sorry..)

ok sorry. =(

Julio_Cesar_S_ — Thu, 14 Mar 2013 00:18:14 GMT

ok sorry. =(

Maybe one of the MSR

Bernard — Thu, 14 Mar 2013 12:53:16 GMT

Maybe one of the MSR registers will be helpful.

procedure TForm2

Julio_Cesar_S_ — Thu, 14 Mar 2013 17:30:15 GMT

procedure TForm2.GetKernelPerfStateInfo;
const
WbemUser ='';
WbemPassword ='';
WbemComputer ='localhost';
wbemFlagForwardOnly = $00000020;
var
FSWbemLocator : OLEVariant;
FWMIService : OLEVariant;
FWbemObjectSet: OLEVariant;
FWbemObject : OLEVariant;
oEnum : IEnumvariant;
iValue : LongWord;
begin;
FSWbemLocator := CreateOleObject('WbemScripting.SWbemLocator');
FWMIService := FSWbemLocator.ConnectServer(WbemComputer, 'root\WMI', WbemUser, WbemPassword);
FWbemObjectSet:= FWMIService.ExecQuery('SELECT * FROM KernelPerfState','WQL',wbemFlagForwardOnly);
oEnum := IUnknown(FWbemObjectSet._NewEnum) as IEnumVariant;
while oEnum.Next(1, FWbemObject, iValue) = 0 do
begin
Label5.Caption := (Format('Power %d',[Integer(FWbemObject.Power)]));// Uint32
FWbemObject:=Unassigned;
end;
end;

Don't show tdp. Tips?

Can you access directly these

Bernard — Fri, 15 Mar 2013 06:49:06 GMT

Can you access directly these MSR registers( on Ivy Bridge) 0x648 ,0x649, 0x64A?

WMI.KernelPerfStates.Power

constm — Mon, 27 May 2013 14:05:55 GMT

WMI.KernelPerfStates.Power does not exist. Don't crosspost this bullshit anymore. Just check.

WMI.KernelPerfStates.vbs :

Const wbemCimtypeDatetime = 101    ' Date/time value

On Error Resume Next

Set d = CreateObject("WbemScripting.SWbemDateTime")
Set c = GetObject("winmgmts:\\.\root\WMI").InstancesOf("KernelPerfStates")

for each o in c

    WSH.Echo ""
    WSH.Echo "----"

for each p in o.Properties_

    if IsNull(p.Value) then
        WSH.Echo p.Name
    else
        if p.CIMType = wbemCimtypeDatetime then
            d.Value = p.Value
            WSH.Echo p.Name & " = " & d.GetVarDate()
        else
        if IsArray(p.Value) then
            WSH.Echo p.Name & " = " & Join(p.Value, ",")
        else
            WSH.Echo p.Name & " = " & p.Value
        end if
        end if
    end if

next

next

if Err <> 0 then
    WSH.Echo ""
    WSH.Echo "Error:", Hex(Err.Number), "-", Err.Description
    Err.Clear
end if