Replace IP by DNS Name | Product Discussions

Dominique · 2020-07-30T05:31:58Z

Hello, I got from Eric and Josh a script which is having the basic code to do the task I need. I would like to replace the IP Address/DNS Name by the DNS Name for all our servers. <span class="pln">######################### API Function Script ######################### #------------------------------------------------------------------------------------------------------------ # Prerequisites: # # Requires -Version 3 #------------------------------------------------------------------------------------------------------------ # Initialize Variables <# account info #> $accessId = "1234567890-" $accessKey = '1234567890-' $company = "xxxxxxxx" #------------------------------------------------------------------------------------------------------------ # Functionize the reusable code that builds and executes the query function Send-Request() { Param( [Parameter(position = 0, Mandatory = $true)] [string]$path, [Parameter(position = 1, Mandatory = $false)] [string]$httpVerb = 'GET', [Parameter(position = 2, Mandatory = $false)] [string]$queryParams, [Parameter(position = 3, Mandatory = $false)] [PSObject]$data ) # Use TLS 1.2 [Net.ServicePointManager]::SecurityProtocol = [Net.SecurityProtocolType]::Tls12 <# Construct URL #> $url = "https://$company.logicmonitor.com/santaba/rest$path$queryParams" <# Get current time in milliseconds #> $epoch = [Math]::Round((New-TimeSpan -start (Get-Date -Date "1/1/1970") -end (Get-Date).ToUniversalTime()).TotalMilliseconds) <# Concatenate Request Details #> $requestVars = $httpVerb + $epoch + $data + $path <# Construct Signature #> $hmac = New-Object System.Security.Cryptography.HMACSHA256 $hmac.Key = [Text.Encoding]::UTF8.GetBytes($accessKey) $signatureBytes = $hmac.ComputeHash([Text.Encoding]::UTF8.GetBytes($requestVars)) $signatureHex = [System.BitConverter]::ToString($signatureBytes) -replace '-' $signature = [System.Convert]::ToBase64String([System.Text.Encoding]::UTF8.GetBytes($signatureHex.ToLower())) <# Construct Headers #> $auth = 'LMv1 ' + $accessId + ':' + $signature + ':' + $epoch $headers = New-Object "System.Collections.Generic.Dictionary[[String],[String]]" $headers.Add("Authorization", $auth) $headers.Add("Content-Type", 'application/json') $headers.Add("X-version", '2') <# Make request & retry if failed due to rate limiting #> $Stoploop = $false do { try { <# Make Request #> $response = Invoke-RestMethod -Uri $url -Method $httpVerb -Body $data -Header $headers $Stoploop = $true } catch { switch ($_) { { $_.Exception.Response.StatusCode.value__ -eq 429 } { Write-Host "Request exceeded rate limit, retrying in 60 seconds..." Start-Sleep -Seconds 60 $response = Invoke-RestMethod -Uri $url -Method $httpVerb -Body $data -Header $headers } { $_.Exception.Response.StatusCode.value__ } { Write-Host "Request failed, not as a result of rate limiting" # Dig into the exception to get the Response details. # Note that value__ is not a typo. Write-Host "StatusCode:" $_.Exception.Response.StatusCode.value__ Write-Host "StatusDescription:" $_.Exception.Response.StatusCode $_.ErrorDetails.Message -match '{"errorMessage":"([\d\S\s]+)","errorCode":(\d+),' Write-Host "LM ErrorMessage" $matches[1] Write-Host "LM ErrorCode" $matches[2] $response = $null $Stoploop = $true } default { Write-Host "An Unknown Exception occurred:" Write-Host $_ | Format-List -Force $response = $null $Stoploop = $true } } } } While ($Stoploop -eq $false) Return $response } # Get list of Resources $members = {VRPSCCMRS01} $httpVerb = 'GET' $resourcePath = "/device/devices/$member.id" $queryParams = $null $data = $null $results = Send-Request $resourcePath $httpVerb $queryParams $data foreach ($hostname in $results.items) { $sysname = (($hostname.systemProperties) | Where-Object -Property "Name" -eq "system.sysname").value if ($sysname -match "\.") { $newName = $sysname.split(".")[0] } else { $newName = $sysname } if ($hostname.Name -eq $newName) { Write-Host "Name `"$($hostname.displayName)`" matched no change needed" } else { $httpVerb = 'PATCH' $resourcePath = "/device/devices/$($deviceId)" $queryParams = "?patchFields=Name&opType=replace" $data = @{ Name = $newName } | ConvertTo-Json Send-Request $resourcePath $httpVerb $queryParams $data Write-Host "Changed host id $($hostname.id) Name from `"$($hostname.ips)`" to `"$newName`"." } }</span> but for now I am getting an error: <span class="pln">Request failed, not as a result of rate limiting StatusCode: 404 StatusDescription: NotFound LM ErrorMessage HTTP 404 Not Found LM ErrorCode 1400</span> Any idea of the issue? Test in progress Thanks, Dom

MoreDiscussions

Replace IP by DNS Name | Product Discussions | LogicMonitor Community