Stéphane Thirion
  • Home
  • Consulting – Raidho
  • homelab
3K
0
0
0
Stéphane Thirion
Stéphane Thirion
  • Home
  • Consulting – Raidho
  • homelab
  • Microsoft
  • PowerShell
  • Scripting
  • Windows 2012R2

Script to consolidate multiple reverse DNS zones into one principal zone

  • April 15, 2017
  • Rodolphe Herpeux
Total
0
Shares
0
0
0
0
0
0
0
Hello folks,
This week i wrote a script for reverse DNS consolidation. This script add entries reverse DNS from a zone to one principal zone. That is s a simple script but it is very effective.
Source code   
#Zone name to import records
$ImportZone = "10.in-addr.arpa"
#Create format date
$date = get-date -Format yMMdd
#$LogFile = '.'+$date+'-Migration_RDNS.csv'
#DNS Server from import records
$ServDNS = "contoso.local"
#Path to save reverse records
$PathSaveR =  "C:temp"
foreach ($IZ in $ImportZone) {
$zoneIZ = $IZ -replace ".in-addr.arpa",""
$FilterZoneName = $("""*."+$zoneIZ+"*""")
#Collect all reverse zones start with filter
foreach ($ZoneName in (Get-DnsServerZone -ComputerName $ServDNS | Where-Object {$_.ZoneName -like $FilterZoneName})) {
        Write-Host $ZoneName.ZoneName
        Start-Sleep 2
        $zone = $ZoneName.ZoneName -replace ".in-addr.arpa",""
        $zonea = ($zone).Remove(($zone.LastIndexOf('.')))
$zonea = "."+$zonea
#Collect all records
$Zoneb = Get-DnsServerResourceRecord -ZoneName $ZoneName.ZoneName -RRType Ptr -ComputerName $ServDNS | Select-Object Hostname, TimeToLive, TimeStamp, @{Name='RecordData';Expression={$_.RecordData.PtrDomainName}}
#Export to local file
$Zoneb | Export-Csv -Path $PathSaveR$date"-"$ServDNS"-"$($ZoneName.ZoneName)".csv" -NoTypeInformation -Encoding UTF8 -Delimiter ";"
#Import to unique zone records
$Zoneb | % {if ($_.TimeStamp -like "") {
#Add Static record$HN = $_.HostName+$zonea
                Write-Host "Add records" $_.RecordData "Static Address" -ForegroundColor Yellow
Add-DnsServerResourceRecordPtr -Name $HN -ZoneName $ImportZone -AllowUpdateAny -TimeToLive $_.TimeToLive -PtrDomainName $_.RecordData -Verbose
            } # End IF
Else {
#Add Timestamped record
                $HN = $_.HostName+$zonea
                Write-Host "Add records" $_.RecordData "TimeStamp Address" -ForegroundColor Yellow
Add-DnsServerResourceRecordPtr -Name $HN -ZoneName $ImportZone -AllowUpdateAny -TimeToLive $_.TimeToLive -AgeRecord -PtrDomainName $_.RecordData -Verbose} # End Else
                } # End Foreach
            } # End Foreach
}#End Foreach
Total
0
Shares
Tweet 0
Share 0
Share 0
Share 0
Share 0
Share 0
Share 0
Related Topics
  • Microsoft
  • Reverse DNS
Rodolphe Herpeux

Previous Article
  • ArchY.net Site
  • Citrix

FCUGC – French Citrix User Group Community #2

  • March 15, 2017
  • Stephane Thirion
View Post
Next Article
  • Microsoft
  • PowerShell
  • Scripting
  • Windows 2012R2
  • Windows 2016

Script to promote DC with constraints

  • April 15, 2017
  • Rodolphe Herpeux
View Post
You May Also Like
View Post
  • VMware
  • vSphere
  • Windows 2022

Migrating FSMO roles Windows 2022 Server

  • Stephane Thirion
  • January 3, 2022
View Post
  • Azure
  • Azure
  • PowerShell
  • Scripting
  • Security

Export all Admin Roles and members from Azure AD

  • Rodolphe Herpeux
  • March 25, 2021
View Post
  • RDS
  • Security
  • Windows 2016

RDS access to applications with second authentication factor by smartcard

  • Rodolphe Herpeux
  • January 7, 2021
View Post
  • Windows 2016
  • Windows 2019

Migration farm ADFS operating system Windows server 2016 to Windows server 2019

  • Rodolphe Herpeux
  • January 6, 2021
View Post
  • Windows 2016

Migrate ADFS configuration Database from WID to MS-SQL

  • Rodolphe Herpeux
  • January 5, 2021
View Post
  • ArchY.net Site
  • Azure
  • Citrix
  • Cloud
  • Experience
  • Microsoft
  • News
  • Office365
  • Raidho
  • VMware

Mettre en place une solution de travail à distance (RemoteOffice / Remoteworking) 2/2

  • Stephane Thirion
  • March 24, 2020
View Post
  • Amazon
  • Citrix
  • Cloud
  • Experience
  • Microsoft
  • News
  • Office365
  • Raidho
  • Security
  • VMware

Mettre en place une solution de travail à distance (RemoteOffice / Remoteworking) 1/2

  • Stephane Thirion
  • March 22, 2020
View Post
  • Citrix
  • Citrix Virtual Apps and Desktops
  • Microsoft
  • PowerShell
  • Scripting
  • Windows 2016
  • Windows 2019
  • XenApp
  • XenDesktop

Enable SSL on Citrix Virtual Apps and Desktops 1912(+) XML Service

  • Stephane Thirion
  • February 13, 2020
vmware
Coinbase – Affiliated link
Blog Stats
  • 1,237,089 hits
Categories
  • Amazon (1)
  • Apple (20)
    • iOS (5)
    • Mac OSx (11)
  • ArchY.net Site (30)
  • Azure (8)
  • Certifications (3)
  • Citrix (207)
    • ADC (1)
    • Citrix Virtual Apps and Desktops (3)
    • NetScaler (12)
    • Password Manager (3)
    • Personal vDisk (5)
    • Power and Capacity Management (3)
    • Provisioning Services (22)
    • Receiver (29)
    • ShareFile (8)
    • Single Sign On (3)
    • SmartAuditor (2)
    • Storefront (12)
    • Synergy (25)
    • User Profile Management (2)
    • VDI (7)
    • WebInterface (21)
    • XenApp (84)
    • XenApp Plugin (3)
    • XenClient (10)
    • XenDesktop (55)
    • XenServer (42)
  • Cloud (12)
  • Crystal Ball (2)
  • CTP (13)
  • Docker (2)
  • Events (35)
    • E2E – PubForum (9)
    • Geek Speak (3)
  • Experience (53)
  • Kubernetes (2)
  • Licensing (3)
  • Linux (12)
  • Microsoft (145)
    • Azure (8)
    • Office365 (4)
    • PowerShell (18)
    • RDS (5)
    • Windows 10 (6)
    • Windows 2003 (21)
    • Windows 2008 (20)
    • Windows 2008 R2 (54)
    • Windows 2012 (13)
    • Windows 2012R2 (13)
    • Windows 2016 (18)
    • Windows 2019 (4)
    • Windows 2022 (1)
    • Windows 7 (27)
    • Windows 8 (19)
    • Windows Virtual Desktop (1)
    • Windows XP (11)
  • News (5)
  • Raidho (2)
  • Raspberry (3)
  • Scripting (13)
  • Security (4)
  • Slide Deck (1)
  • Thin Clients (3)
  • Twitter (1)
  • Ubiquiti (1)
  • Uncategorized (12)
  • VMware (27)
    • VMWare WorkStation (2)
    • vSphere (15)
Stéphane Thirion
Don't Follow the Trend

Input your search keywords and press Enter.