NEC Express5800/R120d-1M User Manual download pdf (Page 124)

3. Accessing Data for Electric Power, Temperature, and Processor Utilization

Express5800/R120d-1M, R120d-2M Maintenance Guide

124

Chapter 3 Appendix

Accessing Data for Electric Power, Temperature,

and Processor Utilization

This section describes how to access data related to input power consumption in watts, intake temperature, and

all logical processor utilizations in the Express Server during usual operation in accordance with ENERGY

STAR

Program Requirements.

3.1

Windows

The sample program below is verified to be run normally on Windows Server

2008.

3.1.1

Power consumption

Execute the following commands to access power consumption readings on BMC (Baseboard Management

Controller) via IPMI (Intelligent Platform Management Interface).

Network Function Code: 3Eh (Controller-specific OEM)

Command Code: 0Bh (Get Current Sensor Data)

Below is the sample file created by using Visual Basic Script (e.g. Power.vbs).

' Start Script

Option Explicit

' Prepare for IPMI Driver

Dim osvc, oclass

Dim oinstance, oipmi

set osvc = getobject("winmgmts:root¥wmi")

set oclass = osvc.get("microsoft_ipmi")

for each oinstance in osvc.instancesof("microsoft_ipmi")

set oipmi = oinstance

'Format the IPMI command request

Dim oinparams

set oinparams = oclass.methods_("requestresponse").inparameters

oinparams.networkfunction = &h3e 'OEM NetworkFunction

oinparams.lun = 0

oinparams.responderaddress = &h20

oinparams.command = &h0b 'Get Current Sensor Data Command

oinparams.requestdatasize = 0

'call the driver

Dim outparams

set outparams = oipmi.execmethod_("requestresponse",oinparams)

WScript.Echo " Completion Code = 0x" & hex(outparams.Completioncode)

If outparams.Completioncode <> 0 Then

Wscript.Echo " Not supported"

Else

'WScript.Echo " Data LS Byte = 0x" & hex(outparams.ResponseData(1))

'WScript.Echo " Data MS Byte = 0x" & hex(outparams.ResponseData(2))

WScript.Echo " Power Consumption = " & outparams.ResponseData(2)*256 + _

outparams.ResponseData(1) & " watts"

End If

' End Script

• Execution example

C:¥VBS> cscript //nologo Power.vbs

• Execution result

Completion Code = 0x0

Power Consumption = 76 watts

1 2 ... 119 120 121 122 123 124 125 126 127 128 129 130 131

Comments to this Manuals

No comments

NEC Express5800/R120d-1M User Manual Page 124

Comments to this Manuals

Related products and manuals for Server/workstation motherboards NEC Express5800/R120d-1M