Cumulus PC Diskspace Status Script

[Synewave]

Knowing that a lot of members use a dedicated PC for Cumulus and rarely look at the Cumulus console and view their webpages instead, I wondered whether anyone would be interested in a Javascript I wrote this morning.

It results in the percentage of diskspace free, total bytes used and diskspace size for your Cumulus PC to be displayed somewhere on your Cumulus webpages.

It relies on the fairly latest Beta versions of Cumulus utilising the external command facility in the Internet Settings to calculate the diskspace.

Have a look here http://www.synewave.co.uk/gcsweather/status.php Let me know what you think, if anyone is interested in the code, I'll package it up.

[robynfali]

great idea buddy

[captzero]

Paul,

Looks good.

I'd be interested for sure.

[n9mfk]

Hi Paul,
like that page a lot
Beau

[Hillbilly]

Hi Paul, yes I'd be interested please . I'd also be interested in a bit more info that I saw in a log or diags file somewhere on the forum - Windows uptime and Cumulus uptime. I had started to think about how I could display this but got no further, so if the method you have found can get that too, great Otherwise, I guess it would be worth requesting an enhancement to create webtags as Cumulus obviously captures that into.

[Synewave]

I've just added system uptime to my status page. I'm going to work on it a bit more to show 'Number of days ago'.

Not sure how I can get the Cumulus 'started time', if Steve can provide a webtag for that at sometime it would be great.

[steve]

Not sure how I can get the Cumulus 'started time', if Steve can provide a webtag for that at sometime it would be great.

Yes, I can do that. It would be in fixed format, though, e.g. "10 hours 53 minutes" and I'm afraid I have no idea whether it will come out in English or the local language on non-English systems.

[Synewave]

I assume that would be the uptime? That would be great.

[steve]

I know I said I wasn't adding any more features to 1.9.1, but I need to do a build anyway shortly to fix an existing web tag bug, so I'll slip this in too as it's easy. I can do any of these, if any are useful:

function GetOsVersionString : string; // e.g. "Windows XP Service Pack 1 build 2600"
function GetOsLanguageString : string; // e.g. "English"
function GetSystemUpTime : string; // e.g. "9 hours 52 minutes"
function GetProgramUpTime : string; // e.g. "15 seconds"
function GetCpuName : string; // e.g. "Intel(R) Pentium(R) 4 CPU 2.80GHz"
function GetCpuCount : integer; // number of installed CPUs (HT-CPUs count as 2)
function GetMemoryStatus : string; // e.g. "327/511 MB (free/total)"
function GetDisplayModeString : string; // e.g. "1024x768, 32 bit"
function GetAllocatedMemory : string; // e.g. "3.52 MB"

[Hillbilly]

I've just added system uptime to my status page. I'm going to work on it a bit more to show 'Number of days ago'.

Perfect, well done Paul and thanks.

function GetOsVersionString : string; // e.g. "Windows XP Service Pack 1 build 2600"
function GetOsLanguageString : string; // e.g. "English"
function GetSystemUpTime : string; // e.g. "9 hours 52 minutes"
function GetProgramUpTime : string; // e.g. "15 seconds"
function GetCpuName : string; // e.g. "Intel(R) Pentium(R) 4 CPU 2.80GHz"
function GetCpuCount : integer; // number of installed CPUs (HT-CPUs count as 2)
function GetMemoryStatus : string; // e.g. "327/511 MB (free/total)"
function GetDisplayModeString : string; // e.g. "1024x768, 32 bit"
function GetAllocatedMemory : string; // e.g. "3.52 MB"

Well they all seem of interest - except I don't understand GetCpuCount, what does that tell me?

Thanks Paul and Steve. For those of us with the Cumulus PC in the next room and those who are a bit further away!

[steve]

Well they all seem of interest - except I don't understand GetCpuCount, what does that tell me?

It tells you how many processors your CPU has, e.g. mine has 4 (it's a Core 2 quad).

[Synewave]

I know I said I wasn't adding any more features to 1.9.1, but I need to do a build anyway shortly to fix an existing web tag bug, so I'll slip this in too as it's easy. I can do any of these, if any are useful:

function GetOsVersionString : string; // e.g. "Windows XP Service Pack 1 build 2600"
function GetOsLanguageString : string; // e.g. "English"
function GetSystemUpTime : string; // e.g. "9 hours 52 minutes"
function GetProgramUpTime : string; // e.g. "15 seconds"
function GetCpuName : string; // e.g. "Intel(R) Pentium(R) 4 CPU 2.80GHz"
function GetCpuCount : integer; // number of installed CPUs (HT-CPUs count as 2)
function GetMemoryStatus : string; // e.g. "327/511 MB (free/total)"
function GetDisplayModeString : string; // e.g. "1024x768, 32 bit"
function GetAllocatedMemory : string; // e.g. "3.52 MB"

Steve, I think all these would be useful. I've hit a slight problem with my diskspace method in that the command I use requires elevated privileges, and I don't really want to be messing with that. Could a tag for free diskspace be added if Cumulus already knows?

[steve]

Could a tag for free diskspace be added if Cumulus already knows?

It should be there somewhere; these are all functions provided by the exception handler, and it prints out the free disk space. I'll see if I can find it.

[mcrossley]

Paul

Are you using WMI to get the free disk space, most WMI get/read calls do not require elevated privileges?

Code: Select all

PowerShell
PS C:\Users\mcrossley> get-wmiobject win32_logicaldisk | where {$_.mediatype -eq 12} | format-table deviceid, size, freespace -auto

Code: Select all

UNTESTED VBScript
strComputer = "."

Set objWMIService = GetObject("winmgmts:{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")

Set colDisks = objWMIService.ExecQuery ("Select * from Win32_LogicalDisk where MediaType = '12'")

For Each device in colDisks
    WScript.Echo device.DeviceId + " " + device.FreeSpace
Next

[Synewave]

Hi Mark,

No it's not as elaborate as that. I'm simply using the fsutil command and pipe the results into a txt file.

EDIT: just looking at WMIC now to see what I can do. But as Steve is going to add some new tags which I will use, I'll just experiment for now.