MRTG windows cpu werkt niet

[richard_kraal]

wil al een tijdje wat met mrtg vandaag was het zover

wil mijn cpu usage in een grafiekje hebben,

heb ik een script gedownload

namelijk

code:

### CPU Usage
Target[cpu]: .1.3.6.1.2.1.25.3.3.1.2.4&.1.3.6.1.2.1.25.3.3.1.2.4:public@127.0.0.1:
MaxBytes[cpu]: 100
WithPeak[cpu]: wmy 
YLegend[cpu]: % Utilization 
ShortLegend[cpu]: % 
Legend1[cpu]: Proc Load in next minute 
Legend2[cpu]: .
Legend3[cpu]: Maximal 5 Minute Proc Load 
Legend4[cpu]: .
LegendI[cpu]: Load: 
LegendO[cpu]: . 
Colours[cpu]: GREEN#89A1BD,BLUE#0A396F,GRAY#AAAAAA,VIOLET#ff00ff
Title[cpu]: testpc
Options[cpu]:  gauge, unknaszero

WorkDir: c:\inetpub\wwwroot\mrtg
#RunAsDaemon: yes

.1.3.6.1.2.1.25.3.3.1.2.4 -> dat is volgens GetIF mijn cpu, en dat klopt ook, de cpu precentages kloppen.

allemaal leuk en aardig, maar ik krijg geen foutmeldingen bij het uitvoeren van het script, hij maakt de files aan in m'n mrtg web directory, maar de waardes blijven 0

toen voor de test even een cisco pix 501 gepakt, en dat werkte... ik heb geen idee wat er fout gaat.

iemand nog dingen die ik kan testen?

[ Voor 12% gewijzigd door richard_kraal op 05-07-2004 16:04 ]

[collin]

Je hebt wel SNMP op die (Windows??)machine draaien neem ik aan? (Ik ken getIF niet)

[SSH]

maar ik krijg geen foutmeldingen bij het uitvoeren van het script

Welke dan?

[collin]

SSH schreef op 05 juli 2004 @ 16:18:
maar ik krijg geen foutmeldingen bij het uitvoeren van het script

Welke dan?

Ehrr.. * SSH check your glasses

[richard_kraal]

inmiddels werkt het, geen idee wat het was, gewoon geduld dek ik

iemand nog leuke voorbeeld scripts voor windows 2000/2003 voor mrtg?

of eventueel andere statestiek pagina's?

ik zoek nog steeds de snmp sleutel voor used diskspace, kan hem nergens vinden
somebody?

[collin]

Ik gebruik voor disk space een VBScript (wmi_freedisk.vbs) die het via WMI uitleest:

code:

' **************************************************
' VBScript using Windows Management Instrumentation
' (WMI) and the High Performance (HiPerf) Performance
' Counters (RAW) Provider.
' **************************************************
' Collects Statistics from WMI enabled Windows 2000
' (NOT WinNT 4) systems, and formats the output for
' use in an MRTG environment
' **************************************************
' Copyright(c) 2001, 2002 - Garth K. Williams
' http://www.wtcs.org   http://snmp4tpc.com
' Please respect my work, and don't claim this as yours!
' **************************************************


'Option Explicit
Dim oArgs, Zippo, FileName, VerNo, RelDate, CopyRight, ScrDesc, ScrDesc2, ScrDesc3, LogoSwitch, DriveLetter1, DriveLetter2, DriveSpace1, DriveSpace2, HostName, Value1, Value2, UpTime
Set sh = WScript.CreateObject("WScript.Shell")
Set fso = CreateObject("Scripting.FileSystemObject")
Zippo = "0"

' ----------------------------------
' Script Constants
' ----------------------------------
FileName = "wmi_freedisk.vbs"
VerNo = "3.0"
RelDate = "25Mar2003"
CopyRight = "Copyright (c) 2003 - Garth K. Williams (WWW.WTCS.ORG)"
ScrDesc = "Collects Logical Disk Free Space (in MBytes) using"
ScrDesc2 = "Windows Management Instrumentation (WMI) calls."
ScrDesc3 = "This script will not run on Windows NT 4.0!"

' ----------------------------------

' ----------------------------------
' Debugging and Logging Options
' ----------------------------------
LogEvents = "0" ' Log to Application Event log (1=Yes, 0=No)
Debug2Console = "0" ' Write debug information to console (1=Yes, 0=No)
' ----------------------------------

' ----------------------------------
' User should be running CSCRIPT.EXE
' If not,  FAIL SCRIPT, display usage
' ----------------------------------
If ScrEngine="wscript.exe" Then
   msgbox "This program is designed to run using CSCRIPT.EXE.  You are trying to run it using WSCRIPT.EXE." & vbCrlf & vbCrlf & "Usage: cscript //nologo " & FileName & " [HostName] [Drive1:] [Drive2:]" & vbCrlf & vbCrlf & "Version: " & VerNo & "   " & "Date: " & RelDate & "   " & CopyRight, 0, ""& FileName & " (MRTG Helper by WTCS.ORG) - Incorrect Script Engine"
   wscript.quit
End If

' ----------------------------------
' User should pass valid HostName on command line
' Check for it.  If no argument, FAIL SCRIPT, display usage
' ----------------------------------
Set oArgs=wscript.arguments
If wscript.arguments.Count < 3 Then ' User didn't specify arguments, so quit and display usage
   wscript.echo "-------------------------------------------------------------------------"
   wscript.echo FileName & " - " & "MRTG [Target]: Plug-in script"
   wscript.echo "Version: " & VerNo & " - " & "Date: " & RelDate
   wscript.echo CopyRight
   wscript.echo "-------------------------------------------------------------------------"
   wscript.echo ScrDesc
   wscript.echo ScrDesc2
   wscript.echo ScrDesc3
   wscript.echo "-------------------------------------------------------------------------"
   wscript.echo "Error: Incorrect syntax!"
   wscript.echo "Usage: cscript //nologo " & FileName & " [HostName] [Drive1:] [Drive2:]"
   wscript.echo "Ex. Target[xyz]: `cscript //nologo " & FileName & " 192.168.200.10 C: D:`"
   wscript.echo "HostName: IP Address or NetBIOS host name of target system"
   wscript.echo "Note 1: To monitor one disk, you MUST enter the SAME drive letter TWICE!"
   wscript.echo "Note 2: You MUST have admin privileges on the target system"
   wscript.echo "Note 3: You MUST use BACKTICKS (`) to surround the Target[xyz]: line"
   wscript.echo "-------------------------------------------------------------------------"
   wscript.echo "Return Value1        Return Value2   Return Value3   Return Value 4"
   wscript.echo "Free MB (Disk1)       Free MB (Disk2)     Uptime     Host Name"
   wscript.echo "-------------------------------------------------------------------------"
wscript.quit (5)     ' Terminate with "Invalid procedure call or argument" error
   Else
      HostName = oArgs.item(0)
      DriveLetter1 = oArgs.item(1)
      DriveLetter2 = oArgs.item(2)
      ' debug
   If Debug2Console = 1 Then
      wscript.echo "Debug: Detected HostName: " & HostName & " and Drive Letters: " & DriveLetter1 & ", " & DriveLetter2
   End If
  ' wscript.quit 0
End If


strComputer = HostName
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")


' -------------------------------------
' Set the instantiation for LogicalDisk
' -------------------------------------
Set Win32Dsk1 = GetObject("winmgmts:{impersonationLevel=impersonate}!//"& HostName & "/root/cimv2:Win32_LogicalDisk.DeviceID=""" & DriveLetter1 & """")
Set Win32Dsk2 = GetObject("winmgmts:{impersonationLevel=impersonate}!//"& HostName & "/root/cimv2:Win32_LogicalDisk.DeviceID=""" & DriveLetter2 & """")


If Debug2Console = 1 Then
   wscript.echo "Debug: Calling GetStat subroutine, passing Drive Letter: " & DriveLetter
End If

Call GetStat(DriveLetter)

If Debug2Console = 1 Then
   wscript.echo "Debug: Returned successfully from GetStat subroutine."
End If


'
Uptime = "unknown"


' **************************************
' Output in MRTG format
' **************************************
If Debug2Console = 1 Then
   wscript.echo "Debug: Output Data."
End If
DriveSpace1 = DriveSpace1/1024
DriveSpace2 = DriveSpace2/1024
DriveSpace1 = CLng (DriveSpace1)
DriveSpace2 = Clng (DriveSpace2)

wscript.echo DriveSpace1
wscript.echo DriveSpace2
wscript.echo UpTime
wscript.echo HostName
If LogEvents = 1 Then
   sh.LogEvent 4, "wmi_dskstats.vbs processing complete.  Host: " & HostName & ", StatID: " & StatID    ' Log INFORMATION to App Event Log
End If
wscript.quit


' **************************************
' SubRoutine to collect the stats
' **************************************
Private Sub GetStat(DriveLetter)
   If Debug2Console = 1 Then
      wscript.echo "Debug: In GetStat subroutine, getting Disk stats for: " & DriveLetter
   End If
       DriveSpace1 = Win32Dsk1.FreeSpace
       DriveSpace2 = Win32Dsk2.FreeSpace
 End Sub


' **************************************
Sub OnError()
' **************************************
' Error processing Subroutine
If Debug2Console = 1 Then
   wscript.echo "Debug: In Error Processing Subroutine."
End If
Wscript.echo "Error Number: " & Cstr(Err.Number) & vbCrlf & "Description: " & Err.Description

If LogEvents = 1 Then
   sh.LogEvent 1, "wmi_dskstats.vbs processing failed!.  Host: " & HostName & ", Drive Letter: " & DriveLetter & vbCrlf & "Error Number: " & Cstr(Err.Number) & ", Description: " & Err.Description & vbCrlf & "Error Code: " & Cstr(Err.Number) & ", Description: " & Err.Description     ' Log INFORMATION to App Event Log
End If
   wscript.quit
End Sub


' **************************************
Function ScrEngine()
' **************************************
' Check Script Engine Type Function
If Debug2Console = 1 Then
   wscript.echo "Debug: In Script Engine Check Routine."
End If

On Error Resume Next

EngineName=Wscript.FullName

If Err.Number <>0 Then
 wscript.echo "Error!"
  wscript.echo "Error (" & Err.Number & ") Description: " & Err.Description
  wscript.quit
End If

PosX=InStrRev(EngineName,"\",-1,vbTextCompare)
ScrEngine=LCase(Mid(EngineName,PosX+1))

End Function


' **************************************
Function MakeNiceTime (LastBootUpTime)
' **************************************
' Now, call function to parse WMILastBootUpTime
' to recreate a "friendly" Date variable
' (i.e. 5/3/2001 10:36:15 PM) - returns MakeNiceTime
' **************************************
If Debug2Console = 1 Then
   wscript.echo "Debug: In 'MakeNiceTime' function."
End If
Strip1 = Left(LastBoot,14)
 YearIs = Left(Strip1,4)
Strip2 = Right(Strip1,10)
 MonthIs = Left(Strip2,2)
Strip3 = Right(Strip2,8)
 DayIs = Left(Strip3,2)
Strip4 = Right(Strip3,6)
 HourIs = Left(Strip4,2)
Strip5 = Right(Strip4,4)
 MinIs = Left(Strip5,2)
Strip6 = Right(Strip5,2)
 SecIs = Left(Strip6,2)

' Accomodate for LastBootUpTime (GMT) showing 10:52:XX AM when
' REAL time (PST) was was 17:52:XX PM, a 7 hour difference
' Depending on the Time Zone, this number will need to be changed
HourIs = HourIs + 7
If Houris > 24 Then
 HourIs = HourIs - 24
 DayIs = DayIs + 1
End If

' Determine AM or PM
If HourIs < 12 Then
 AmPm = "AM"
End If
If HourIs > 12 Then
 AmPm = "PM"
End If

' Create format like now()
MakeNiceTime = MonthIs & "/" & DayIs & "/" & YearIs & " " & HourIs & ":" & MinIs & ":" & SecIs & " " & AmPm
End Function


' **************************************
Function GetTime (Seconds)
' **************************************
' Based on a script from Mergatroid
' from www.cool.co.za
' Modified to calculate number of days
' and hours from total hours, and
' format different message return types
' Returns GetTime
' **************************************
If Debug2Console = 1 Then
   wscript.echo "Debug: In 'GetTime' Function."
End If

' Need to create a temporary variable for calcs
intSec = Seconds

' Extract the different time parts from the seconds
   HOURS = intSec\3600
   MINUTES = (intSec Mod 3600)\60
   SECONDS = (intSec Mod 3600) Mod 60

' Calc number of days and hours from total hours
   DAYS = HOURS\24
      HOURCALC = DAYS * 24
   HOURDIFF = HOURS - HOURCALC

' Prefix a "0" to each if less than 10 (i.e. 05)
  If DAYS  < 10  Then
     DAYS = "0" & DAYS
  End If

  If HOURDIFF < 10 Then
     HOURDIFF = "0" & HOURDIFF
  End If

  If MINUTES < 10 Then
     MINUTES = "0" & MINUTES
  End If

  If SECONDS < 10 Then
     SECONDS = "0" & SECONDS
  End If

' Finally, select your return format below
'  GetTime = DAYS & ":" & HOURDIFF & ":" & MINUTES & ":" & SECONDS
  GetTime = DAYS & " Day(s), " & HOURDIFF & " Hour(s), " & MINUTES & " Minute(s) and " & SECONDS & " Second(s)"

End Function

En dit staat dan in m'n mrtg.cfg:

code:

######################################################################
# YAHOO - Check disk space
######################################################################
YLegend[Yahoo_disk]: Yahoo disk
Options[Yahoo_disk]: gauge, nopercent, pngdate
Target[Yahoo_disk]: `cscript //nologo C:\mrtg-2.10.13\bin\scripts\wmi_freedisk.vbs hostnaam.vande.server c: c:`
MaxBytes[Yahoo_disk]: 6000000
XSize[Yahoo_disk]: 380
Title[Yahoo_disk]: Yahoo disk space
ShortLegend[Yahoo_disk]:B Free
Unscaled[Yahoo_disk]: dwmy
kMG[Yahoo_disk]: ,M,G,T,P,X
Legend1[Yahoo_disk]: C: in next minute
Legend2[Yahoo_disk]:
Legend3[Yahoo_disk]: Maximal 5 Minute C:
Legend4[Yahoo_disk]:
LegendI[Yahoo_disk]:  C:
LegendO[Yahoo_disk]: 
PageTop[Yahoo_disk]: <H1>Yahoo Disk Utilization</H1>

Ik heb in die VBS alleen de uptime gesaboteerd, want die zorgde er bij mij voor dat het scriptje hing. Ik wil alleen maar de disk space counters hebben en geen uptime onder in me plaatje.

[ Voor 15% gewijzigd door collin op 07-07-2004 11:39 ]