CPR.psm1
|
<#
.SYNOPSIS Converts an obfuscated CPR number back to its original form. .DESCRIPTION This function takes an obfuscated CPR number and reverses the obfuscation process to retrieve the original CPR number. .PARAMETER value The obfuscated CPR number to be converted back. .EXAMPLE ConvertFrom-ObfuscatedCPR -value "1234567890" Converts the obfuscated CPR number `1234567890` back to its original form. .NOTES Throws an error if the input is null, empty, or not a valid CPR number. .LINK ConvertTo-ObfuscatedCPR #> function ConvertFrom-ObfuscatedCPR { param ( [Parameter(Mandatory=$true, ValueFromPipeline=$true)] [string]$value ) process{ if ([string]::IsNullOrEmpty($value)) { throw "value cannot be null or empty" } $value = $value.Replace("-", "") if ($value.Length -ne 10) { throw "Not a valid length for a CPR-number" } $firstSix = $value.Substring(0, 6).ToCharArray() $lastFour = $value.Substring(6).ToCharArray() if ([int]::TryParse($lastFour -join '', [ref]$null)) { for ($i = 0; $i -lt 4; $i++) { $left = [int]::Parse($firstSix[$i]) $right = [int]::Parse($lastFour[$i]) $right -= $left while ($right -lt 0) { $right += 10 } $lastFour[$i] = $right.ToString()[0] } return -join ($firstSix + $lastFour) } return $value } } <# .SYNOPSIS Converts a CPR number into an obfuscated form. .DESCRIPTION This function obfuscates a CPR number by modifying its digits while maintaining its length and structure. .PARAMETER value The CPR number to be obfuscated. .EXAMPLE ConvertTo-ObfuscatedCPR -value "2201971915" Converts the CPR number `2201971915` into an obfuscated form. .NOTES Throws an error if the input is null, empty, or not a valid CPR number. .LINK ConvertFrom-ObfuscatedCPR #> function ConvertTo-ObfuscatedCPR { param ( [Parameter(Mandatory=$true, ValueFromPipeline=$true)] [string]$value ) process{ if ([string]::IsNullOrEmpty($value)) { throw "value cannot be null or empty" } $value = $value.Replace("-", "") if ($value.Length -ne 10) { throw "Not a valid length for a CPR-number" } $firstSix = $value.Substring(0, 6).ToCharArray() $lastFour = $value.Substring(6).ToCharArray() if ([int]::TryParse($lastFour -join '', [ref]$null)) { for ($i = 0; $i -lt 4; $i++) { $left = [int]::Parse($firstSix[$i]) $right = [int]::Parse($lastFour[$i]) $right += $left while ($right -gt 9) { $right -= 10 } $lastFour[$i] = $right.ToString()[0] } return -join ($firstSix + $lastFour) } return $value } } <# .SYNOPSIS Generates a random CPR number. .DESCRIPTION This function generates a random CPR number based on the specified parameters such as age, gender, and validation rules. .PARAMETER age Specifies the age for the generated CPR number. .PARAMETER gender Specifies the gender for the generated CPR number. .PARAMETER useModuloValidation Ensures the generated CPR number passes modulo 11 validation. .PARAMETER omitHyphen Omits the hyphen in the generated CPR number. .EXAMPLE Get-CPR Generates a random CPR number. .EXAMPLE Get-CPR -age 25 -gender Male -useModuloValidation Generates a CPR number for a 25-year-old male that passes modulo 11 validation. .NOTES The function ensures the CPR number is valid and optionally formatted with or without a hyphen. .LINK Test-CPR Get-CPRInfo #> function Get-CPR { param ( [Parameter(Mandatory=$false)] [int]$age, [Parameter(Mandatory=$false)] [ValidateSet("Male", "Female")] [string]$gender, [switch]$useModuloValidation, [switch]$omitHyphen ) # If no age is specified - get a random age: if(!$age){ $age = Get-Random -Minimum 0 -Maximum 100 } # Calculate a starting date by subtracting "age" years from the current date $currentDate = Get-Date $birthDate = $currentDate.AddYears(-$age) # Subtract a random number of days (0-364) from the birth date $randomDays = Get-Random -Minimum 0 -Maximum 365 $randomDate = $birthDate.AddDays(-$randomDays) # Format the date part of the CPR number $datePart = $randomDate.ToString("ddMMyy") if ($gender) { $parity = if ($gender -eq "Male") { 1 } else { 0 } } else { $parity = Get-Random -Minimum 0 -Maximum 2 } $controlSequence = Get-Random -Minimum 1000 -Maximum 9999 if ($controlSequence % 2 -ne $parity){ $controlSequence++ } $cpr = $datePart + $controlSequence.ToString("D4") # Adjust the control sequence until the CPR number passes the modulo 11 check if ($useModuloValidation) { while (!(Test-CPR -cpr $cpr)) { $controlSequence += 2 if ($controlSequence -gt 9999) { $controlSequence = $controlSequence - 10000; } $cpr = $datePart + $controlSequence.ToString("D4") } } # Format the CPR number with or without a hyphen if ($omitHyphen) { $cpr = $datePart + $controlSequence.ToString("D4") } else { $cpr = $datePart.Insert(6, '-') + $controlSequence.ToString("D4") } return $cpr } <# .SYNOPSIS Parses a CPR number and provides detailed information. .DESCRIPTION This function extracts information such as birthday, age, gender, and validity from a given CPR number. .PARAMETER cpr The CPR number to be parsed. .EXAMPLE Get-CPRInfo -cpr "220197-1915" Parses the CPR number `220197-1915` and returns detailed information. .NOTES The function validates the CPR number and calculates the age and gender based on its structure. .LINK Test-CPR Get-CPR #> function Get-CPRInfo { param ( [Parameter(Mandatory=$true,ValueFromPipeline=$true)] [string]$cpr ) process{ # Remove hyphen if present $cpr = $cpr -replace '-', '' # Extract date and control sequence parts $datePart = $cpr.Substring(0, 6) $controlSequence = $cpr.Substring(6) # Parse date part to a DateTime object $birthday = [DateTime]::ParseExact($datePart, "ddMMyy", $null) $currentDate = Get-Date if ($birthday -gt $currentDate){ $birthday = $birthday.AddYears(-100) } # Calculate age $age = $currentDate.Year - $birthday.Year if ($currentDate.DayOfYear -lt $birthday.DayOfYear) { $age-- } # Determine gender based on the last digit of the control sequence $gender = if ([int]$controlSequence[-1] % 2 -eq 0) { 'Female' } else { 'Male' } # Check if the CPR number is valid $valid = Test-CPR -cpr $cpr # Create and return a custom object with the requested properties $output = New-Object PSObject $output | Add-Member -Type NoteProperty -Name CPR -Value ($cpr.Insert(6, '-')) $output | Add-Member -Type NoteProperty -Name Valid -Value $valid $output | Add-Member -Type NoteProperty -Name Birthday -Value $birthday $output | Add-Member -Type NoteProperty -Name Age -Value $age $output | Add-Member -Type NoteProperty -Name Gender -Value $gender $output | Add-Member -Type NoteProperty -Name Control -Value $controlSequence return $output } } <# .SYNOPSIS Validates a CPR number. .DESCRIPTION This function checks if a CPR number is valid by verifying its structure, date, and modulo 11 checksum. .PARAMETER cpr The CPR number to be validated. .EXAMPLE Test-CPR -cpr "220197-1915" Validates the CPR number `220197-1915`. .NOTES Returns `True` if the CPR number is valid, otherwise `False`. .LINK Get-CPR Get-CPRInfo #> function Test-CPR { param ( [Parameter(Mandatory=$true,ValueFromPipeline=$true)] [string]$cpr ) process{ # Remove hyphen if present $cpr = $cpr -replace '-', '' if ($cpr.Length -ne 10) { Write-Output "Invalid CPR number. It should be a 10-digit number." return $false } # Extract date parts $day = [int]$cpr.Substring(0, 2) $month = [int]$cpr.Substring(2, 2) $year = [int]$cpr.Substring(4, 2) # Figure out century: if ($year -le [DateTime]::Now.Year - 2000) { $fullyear = 2000 + $year } else { $fullyear = 1900 + $year } # Check for valid date $isoDate = "$fullyear-$month-$day" If (-not (Test-Date $isoDate)){ Write-Output "Invalid date in CPR number." return $false } $weights = @(4, 3, 2, 7, 6, 5, 4, 3, 2, 1) $sum = 0 for ($i = 0; $i -lt $cpr.Length; $i++) { $digit = [int]::Parse($cpr[$i]) $sum += $digit * $weights[$i] } return ($sum % 11 -eq 0) } } Export-ModuleMember -Function ConvertFrom-ObfuscatedCPR, ConvertTo-ObfuscatedCPR, Get-CPR, Get-CPRInfo, Test-CPR |