# mrscounter
#
# Script to collect and merge Exchange MRS Performance Counters about migrations and  post them to PRTG
#
# Pending: Parallel execution to 
# Pending: Grab Exchange Servers automatically
#
param (
	$serverlist = @("EX01",
			"ex02",
			"ex03"),
	$prtgurl = "http://prtg.msxfaq.net:5050/mrsdatatoken?content="

)

Set-PSDebug -Strict

write-host "PRTG-MRSPerformance: Start"

$totalcpu=0
$totalread=0
$totalwrite=0
$totaltransmission=0


$prtgresult = '<?xml version="1.0" encoding="UTF-8" ?>
<prtg>'


foreach ($server in $serverlist) {
	write-host "PRTG-MRSPerformance: Server $server"
	$mrscpu		= [math]::round((Get-Counter "\\$($server)\processor(_total)\% processor time").countersamples[0].cookedvalue)
	$mrsread	= [math]::round((Get-Counter "\\$($server)\MSExchange Mailbox Replication Service\Transfer Rate: Read (KB/sec)").countersamples[0].cookedvalue)
	$mrstransmission= [math]::round((Get-Counter "\\$($server)\MSExchange Mailbox Replication Service\Transfer Rate: Transmission (KB/sec)").countersamples[0].cookedvalue)
	$mrswrite    	= [math]::round((Get-Counter "\\$($server)\MSExchange Mailbox Replication Service\Transfer Rate: Write (KB/sec)").countersamples[0].cookedvalue)
	write-host " CPU      = $($mrscpu)"
	write-host " Read     = $($mrsread)"
	write-host " Write    = $($mrswrite)"
	write-host " Transfer = $($mrstransmission)"
	$totalcpu+= $mrscpu
	$totalread+= $mrsread
	$totalwrite+= $mrswrite
	$totaltransmission+=$mrstransmission

	$prtgresult+= '
	   <result>
	      <channel>'+$server+'-CPU</channel>
	      <value>'+$mrscpu+'</value>
	      <float>1</float>
		  <customunit>Prozent</customunit>
	   </result>
	   <result>
	      <channel>'+$server+'-MRSRead</channel>
	      <value>'+$mrsread+'</value>
	      <float>1</float>
		  <customunit>KB</customunit>
	   </result>
	   <result>
	      <channel>'+$server+'-MRSWrite</channel>
	      <value>'+$mrswrite+'</value>
	      <float>1</float>
		  <customunit>KB</customunit>
  	  </result>
	   <result>
	      <channel>'+$server+'-MRSTransmission</channel>
	      <value>'+$mrstransmission+'</value>
	      <float>1</float>
		 <customunit>KB</customunit>
	   </result>'
}

write-host " Avg CPU      = $([math]::round($totalcpu / ($serverlist.count)))"
write-host " Avg Read     = $($totalread)"
write-host " Avg Write    = $($totalwrite)"
write-host " Avg Transfer = $($totaltransmission)"

$prtgresult+= '
   <result>
      <channel>Total MRSCPU Load</channel>
      <value>'+[math]::round($totalcpu/($serverlist.count))+'</value>
      <float>1</float>
   </result>
   <result>
      <channel>Total MRSRead KB</channel>
      <value>'+$totalread+'</value>
      <float>1</float>
	  <customunit>KB</customunit>
   </result>
   <result>
      <channel>Total MRSWrite KB</channel>
      <value>'+$totalwrite+'</value>
      <float>1</float>
	  <customunit>KB</customunit>
   </result>
   <result>
      <channel>Total MRSTransmission KB</channel>
      <value>'+$totaltransmission+'</value>
      <float>1</float>
	  <customunit>KB</customunit>
   </result>
</prtg>'


# <value>' + [math]::round($outsize/1024) + '</value>

# $prtgresult 

write-host "PRTG-MRSPerformance: Sending Data to $prtgurl"
$httprequest=[system.Net.HttpWebRequest]::Create($prtgurl+$prtgresult);
$data = $httprequest.getresponse();
$stat = $data.statuscode;
$data.Close();
# no errorhandling here

write-host "PRTG-MRSPerformance: End"