Get-SiteCodeCoverage.ps1

function Get-SiteCodeCoverage {

  [CmdletBinding()]
  param(
    [Parameter(Mandatory=$TRUE)][ValidateNotNullOrEmpty()][String]$SiteCode,
    [Parameter(Mandatory=$TRUE)][ValidateNotNullOrEmpty()][String]$ZoneName = $env:USERDNSDOMAIN,
    [Parameter(Mandatory=$TRUE)][ValidateNotNullOrEmpty()][String]$DNSServer
  )
  
  Get-DnsServerResourceRecord -ZoneName $ZoneName -ComputerName $DNSServer -RRType Srv |`
   ? {$_.HostName -eq "_kerberos.tcp.$SiteCode._sites.dc._msdcs" -or`
   $_.HostName -eq "_ldap._tcp.$SiteCode._sites.dc._msdcs"} |`
   Select HostName, RecordType -ExpandProperty RecordData
}