Source code for airregpscmd.ps

```
<#
```
```
.SYNOPSIS
```

Search the online Brasilian Ag�ncia Nacional De A��o Civil aircraft registration database for an Brasilian aircraft registation (PPxxx..PUxxx) and if found, return the aircraft manufacturer and model (tab-delimited)

```
 
```
```
.DESCRIPTION
```

Run this script with an aircraft registration as its only parameter (see examples section).

The script will try to find the registration in the online Brasilian Ag�ncia Nacional De A��o Civil aircraft registry.

If a match is found, the script will display a tab-delimited string with the registration, manufacturer and model (<registration><tab><manufacturer><tab><model>).

To use this script as an extension for AirRegGUI.ps1, it needs to be copied for each Brasilian registration prefix used, i.e. AiRegPPCmd.ps1 needs to be copied to AirRegPRCmd.ps1 and AirRegPSCmd.ps1 and AirRegPTCmd.ps1 and AirRegPUCmd.ps1, and the help text and examples need to reflect the actual file names of the copied scripts.

If the script was started by another PowerShell script, the calling PowerShell script may also read the manufacturer and model from the variables $Manufacturer and $Model, passed on by this script.

If the script was started by a batch file, the calling batch file can use 'FOR /F' on this PowerShell script's screen output to find the manufacturer and model.

Get-Help './AirRegPSCmd.ps1' -Examples will show 2 examples of this script being called by another script.

```
 
```
```
.PARAMETER Registration
```

A valid Brasilian aircraft registration, i.e. PPxxx or PRxxx .. PUxxx (where each x is a single letter, no dash)

```
 
```
```
.PARAMETER Quiet
```

Ignore all errors and do not display any error messages; in case of errors, just terminate with return code 1

```
 
```
```
.PARAMETER Help
```
```
Show the script's help screen
```
```
 
```
```
.PARAMETER Version
```

Show this script's version number; if combined with -Verbose show full script path, version number and last/modified/release date

```
 
```
```
.PARAMETER Debug
```
```
Show some progress messages
```
```
 
```
```
.OUTPUTS
```

A tab-delimited string with <registration><tab><manufacturer><tab><model>, and variable $Manufacturer and $Model set to manufacturer and model

```
 
```
```
.EXAMPLE
```
```
. ./AirRegPSCmd.ps1 "PRATX"
```

Will return tab-delimited string "PRATX<tab>CESSNA AIRCRAFT<tab>A188B" and set variables $Manufacturer to "CESSNA AIRCRAFT" and $Model to "A188B"

```
 
```
```
.EXAMPLE
```
```
"PRATX" | . ./AirRegPSCmd.ps1
```

Will also return tab-delimited string "PRATX<tab>CESSNA AIRCRAFT<tab>A188B" and set variables $Manufacturer to "CESSNA AIRCRAFT" and $Model to "A188B"

```
 
```
```
.EXAMPLE
```
```
. ./AirRegPSCmd.ps1 -Version -Verbose
```

Will return the full script path, version and last modified/release date

```
 
```
```
.EXAMPLE
```
```
. ./AirRegPSCmd.ps1 -Version
```
```
Will return the script version
```
```
 
```
```
.EXAMPLE
```

Create and run the following PowerShell script:

===============================================================

```
$Registration = 'PRATX' ; $Model = ''
```

[void] ( . "$PSScriptRoot\AirRegPSCmd.ps1" -Registration $Registration )

Write-Host ( "Registration : {0}`nManufacturer : {1}`nModel        : {2}" -f $Registration, $Manufacturer, $Model )

===============================================================

```
 
```

Besides setting variables $Manufacturer to "CESSNA AIRCRAFT" and $Model to "A188B", it will return:

```
 
```
```
Registration : PRATX
```
```
Manufacturer : CESSNA AIRCRAFT
```
```
Model        : A188B
```
```
 
```
```
.EXAMPLE
```

Create and run the following batch file:

===============================================================

REM Note that there should only be a TAB and nothing else between delims= and the doublequote

FOR /F "tokens=1-3 delims=	" %%A IN ('powershell . ./AirRegPSCmd.ps1 PRATX') DO (

```
	ECHO Registration : %%A
```
```
	ECHO Manufacturer : %%B
```
```
	ECHO Model        : %%C
```
```
)
```

===============================================================

```
 
```
```
It will return:
```
```
 
```
```
Registration : PRATX
```
```
Manufacturer : CESSNA AIRCRAFT
```
```
Model        : A188B
```
```
 
```
```
.LINK
```
```
Script written by Rob van der Woude:
```
```
https://www.robvanderwoude.com/
```
```
 
```
```
.LINK
```

Brasilian Ag�ncia Nacional De A��o Civil online aircraft registration database:

https://sistemas.anac.gov.br/aeronaves/cons_rab_en.asp

```
 
```
```
.LINK
```

Capture -Debug and -Verbose parameter by mklement0 on StackOverflow.com:

```
https://stackoverflow.com/a/48643616
```
```
#>
```
```
 
```
```
param (
```
```
	[parameter( ValueFromPipeline )]
```

	[ValidatePattern("(^\s*$|[\?/]|^P[PRSTU][A-Z]{3}$)")]

```
	[string]$Registration,
```
```
	[switch]$Quiet,
```
```
	[switch]$Help,
```
```
	[switch]$Version
```
```
)
```
```
 
```
```
$progver = "1.01"
```
```
 
```

$Registration = $Registration.ToUpper( )

```
$Manufacturer = ''
```
```
$Model = ''
```

[bool]$Debug = $Debug -or ( $PSBoundParameters.ContainsKey( 'Debug' ) )

[bool]$Verbose = ( $PSBoundParameters.ContainsKey( 'Verbose' ) )

```
 
```
```
if ( $Version ) {
```
```
	if ( $Verbose ) {
```

		$lastmod = ( [System.IO.File]::GetLastWriteTime( $PSCommandPath ) )

		if ( $lastmod.ToString( "h.mm" ) -eq $progver ) {

			"`"{0}`", Version {1}, release date {2}" -f $PSCommandPath, $progver, $lastmod.ToString( "yyyy-MM-dd" )

```
		} else {
```

			# if last modified time is not equal to program version, the script has been tampered with

			"`"{0}`", Version {1}, last modified date {2}" -f $PSCommandPath, $progver, $lastmod.ToString( "yyyy-MM-dd" )

```
		}
```
```
	} else {
```
```
		$progver
```
```
	}
```
```
	exit 0
```
```
}
```
```
 
```
```
function ShowHelp( $message = '' ) {
```
```
	if ( !$Quiet ) {
```
```
		if ( $errormessage ) {
```
```
			Write-Host
```

			Write-Host "Error: " -ForegroundColor Red -NoNewline

```
			Write-Host $errormessage
```
```
		}
```
```
		Write-Host
```

		Write-Host ( "AirRegPSCmd.ps1,  Version {0}" -f $progver )

		Write-Host "Search online Brasilian aircraft registration database for a registation"

```
		Write-Host
```
```
		Write-Host "Usage:  " -NoNewline
```

		Write-Host ". ./AirRegPSCmd.ps1 [-Registration] PS*** [-Quiet] [-Debug] [-Help]" -ForegroundColor White

```
		Write-Host
```
```
		Write-Host "Where:  " -NoNewline
```

		Write-Host "PS***           " -NoNewline -ForegroundColor White

		Write-Host "is a valid Brasilian aircraft registration, e.g. PSAAZ"

		Write-Host "        -Quiet          " -NoNewline -ForegroundColor White

		Write-Host "all errors are ignored and no error messages displayed"

		Write-Host "        -Debug          " -NoNewline -ForegroundColor White

		Write-Host "shows some progress messages"

		Write-Host "        -Help           " -NoNewline -ForegroundColor White

```
		Write-Host "shows this help screen"
```
```
		Write-Host
```

		Write-Host "Notes:  This script uses the Brasilian Ag�ncia Nacional De A��o Civil aircraft"

		Write-Host "        registration database at:"

		Write-Host "        https://sistemas.anac.gov.br/aeronaves/cons_rab_en.asp" -ForegroundColor DarkGray

		Write-Host "        The result, if any, of the search is displayed as tab-delimited text:"

		Write-Host "        <registration><tab><manufacturer><tab><model>"

		Write-Host "        Besides its screen output, this script will also set the `SManufacturer"

		Write-Host "        and `$Model variables with the database search result."

```
		Write-Host "        Run " -NoNewline
```

		Write-Host "Get-Help `"./AirRegPSCmd.ps1`" -Examples " -NoNewline -ForegroundColor White

```
		Write-Host "for some examples of"
```

		Write-Host "        `"nesting`" this script in other PowerShell or batch scripts."

		Write-Host "        Return code (`"ErrorLevel`") 1 in case of errors, otherwise 0."

```
		Write-Host
```

		Write-Host "Written by Rob van der Woude"

		Write-Host "https://www.robvanderwoude.com"

```
	}
```
```
	exit 1
```
```
}
```
```
 
```

if ( $Help -or $Registration -match "(^\s*$|^-|\?|/)" ) {

```
	ShowHelp
```
```
	exit 1
```
```
}
```
```
 
```

$dburl = "https://sistemas.anac.gov.br/aeronaves/cons_rab_resposta_en.asp?textMarca=$Registration"

$pattern = ( 'Registration Marks\s+({0})\s*</h2>.*Manufacturer:\s*</th>\s*<td>\s*([^\n<]+?)\s*</td>\s*</tr>\s*<tr.*?<tr>\s*<th[^<]*>\s*Model:\s*</th>\s*<td>\s*([^\n<]+?)\s*</td>' -f $Registration )

```
 
```
```
if ( $Debug ) {
```

	$StopWatch = [System.Diagnostics.Stopwatch]::StartNew( )

	Write-Host ( "Starting online search for {0} at {1}" -f $Registration, ( Get-Date ) )

```
}
```

$ProgressPreference = 'SilentlyContinue'

$html = ( Invoke-WebRequest -Uri $dburl -Method 'Get' ).Content

```
$ProgressPreference = 'Continue'
```
```
 
```

$html = ( $html -replace "\n"," " ) -replace "\r"," "

$regex = New-Object System.Text.RegularExpressions.Regex ( $pattern, [System.Text.RegularExpressions.RegexOptions]::MultiLine )

```
$Matches = $regex.Matches( $html )
```
```
 
```
```
if ( $Debug ) {
```

	$StopWatch = [System.Diagnostics.Stopwatch]::StartNew( )

	Write-Host ( "Ended online search for {0} at {1} with {2} matches found (elapsed time {3})" -f $Registration, ( Get-Date ), $Matches.Count, $StopWatch.Elapsed )

```
	$StopWatch.Stop( )
```
```
}
```
```
if ( $Matches.Count -eq 0 ) {
```
```
	if ( !$Quiet ) {
```

		Write-Host "Aircraft registration for $Registration not found"

```
	}
```
```
	exit 1
```
```
} else {
```
```
	$Manufacturer = $Matches[0].Groups[2]
```
```
	$Model = $Matches[0].Groups[3]
```

	"{0}`t{1}`t{2}" -f $Registration, $Manufacturer, $Model

```
	exit 0
```
```
}
```
```
 
```