cliHelper.xconvert.psm1
|
using namespace System.Runtime.InteropServices using module Private/cliHelper.xconvert.Utils #region Classes enum Compression { Gzip Deflate ZLib # Zstd # Todo: Add Zstandard. (The one from facebook. or maybe zstd-sharp idk. I just can't find a way to make it work in powershell! no dll nothing!) } enum ProtectionScope { CurrentUser # The protected data is associated with the current user. Only threads running under the current user context can unprotect the data. LocalMachine # The protected data is associated with the machine context. Any process running on the computer can unprotect data. This enumeration value is usually used in server-specific applications that run on a server where untrusted users are not allowed access. } enum dateFormat { DMTF Unix FileTime ICSDateTime ISO8601 Excel UNKNOWN } # .SYNOPSIS # Convert data from one format to another # .DESCRIPTION # Extended version of built in [convert] class class xconvert : System.ComponentModel.TypeConverter { xconvert() {} static [string] Base32ToHex([string]$base32String) { return [System.BitConverter]::ToString([System.Text.Encoding]::UTF8.GetBytes($base32String)).Replace("-", "").ToLower() } static [string] Base32FromHex([string]$hexString) { return [System.Text.Encoding]::UTF8.GetString(([byte[]] -split ($hexString -replace '..', '0x$& '))) } static [string] ToString([byte[]]$Bytes) { # We could do: [xconvert]::Tostring([int[]]$bytes); but lots of data is lost when decoding back ... return [string][System.Convert]::ToBase64String($Bytes); } static [string[]] ToString([int[]]$CharCodes) { $String = @(); foreach ($n in $CharCodes) { $String += [string][char]$n } return $String } static [string] Tostring([Object]$Object) { if ($null -eq $Object) { return [string]::Empty }; [string]$ObjtN = $Object.GetType().Name if ($Object.GetType().Name -notin ('byte[]', 'Hashtable', 'OrderedDictionary', 'AXNodeConfiguration', 'PSBoundParametersDictionary')) { throw [System.InvalidOperationException]::new("Supported Object types are 'Hashtable' and 'OrderedDictionary'") } if ($ObjtN -eq 'byte[]') { return [System.Convert]::ToBase64String([xconvert]::BytesFromObject($Object)) } if ($ObjtN -eq "k3Y") { $NotNullProps = ('User', 'UID', 'Expiration'); $Object | Get-Member -MemberType Properties | ForEach-Object { $Prop = $_.Name; if ($null -eq $Object.$Prop -and $Prop -in $NotNullProps) { throw [System.ArgumentNullException]::new($Prop) } }; $CustomObject = [xconvert]::ToPSObject($Object); return [string][xconvert]::ToCompressed([System.Convert]::ToBase64String([xconvert]::BytesFromObject($CustomObject))); } $sb = [System.Text.StringBuilder]::New(); [void]$sb.AppendLine('@{'); foreach ($key in $Object.Keys) { if ($Object[$key]) { [string]$keytN = $Object[$key].GetType().Name switch ($true) { $($keytN -eq 'ScriptBlock') { [void]$sb.AppendLine("$key = `{$($Object[$key].ToString())`}") break } ### Strings and Enums $($keytN -in @('String', 'ActionPreference')) { [string]$itemText = "{0} = '{1}'" -f "$key", [xgen]::EscapeSpecialCharacters($Object[$key]) [void]$sb.AppendLine($itemText) break } $($keytN -eq 'String[]') { [string]$itemText = "{0} = @({1})" -f "$key", "$($($Object[$key] | ForEach-Object { "'$([xgen]::EscapeSpecialCharacters($_))'" }) -join ", ")" [void]$sb.AppendLine($itemText) break } $(($keytN -ilike '*int*') -or (@('single', 'double', 'decimal', 'SByte', 'Byte') -icontains $keytN)) { [string]$itemText = "{0} = {1}" -f "$key", $($Object[$key]).ToString() [void]$sb.AppendLine($itemText) break } $($keytN -in ('Hashtable', 'OrderedDictionary', 'PSBoundParametersDictionary')) { [string]$itemText = "{0} = {1}" -f "$key", $(ConvertTo-String -InputObject $Object[$key] -DoNotFormat) [void]$sb.AppendLine($itemText) break } $($keytN -in ('Hashtable[]', 'OrderedDictionary[]', 'PSBoundParametersDictionary[]')) { $NewLineStr = [Environment]::NewLine $JoinSeparator = ",$NewLineStr" [string]$itemText = "{0} = @($NewLineStr{1}$NewLineStr)" -f "$key", "$($($Object[$key] | ForEach-Object { ConvertTo-String -InputObject $_ -DoNotFormat }) -join $JoinSeparator)" [void]$sb.AppendLine($itemText) break } $($keytN -in ('Boolean', 'SwitchParameter')) { [string]$itemText = '{0} = ${1}' -f "$key", $($Object[$key].ToString()) [void]$sb.AppendLine($itemText) break } $($keytN -eq 'PSCustomObject') { # Convert to hashtable $propHash = @{}; foreach ($prop in $Object[$key].PSObject.Properties) { $propHash[$prop.Name] = $prop.Value } [string]$itemText = '{0} = $([PSCustomObject] {1})' -f "$key", $(ConvertTo-String -InputObject $propHash -DoNotFormat) [void]$sb.AppendLine($itemText) break } $($keytN -eq 'DateTime') { [string]$itemText = "{0} = '{1}'" -f "$key", $($Object[$key].ToUniversalTime().ToString("dd.MM.yyyy HH.mm:ss UTC", [CultureInfo]::InvariantCulture)) [void]$sb.AppendLine($itemText) break } Default { Write-Warning "Serializing not supported key: $key that contains: $_" [string]$itemText = '{0} = {1}' -f "$key", $($Object[$key].ToString()) [void]$sb.AppendLine($itemText) } } } else { [void]$sb.AppendLine('{0} = $null' -f "$key") } } [void]$sb.AppendLine('}') return $sb.ToString().Trim([environment]::NewLine) } static [string] ToString([System.Security.SecureString]$SecureString) { [string]$Pstr = [string]::Empty; [IntPtr]$zero = [IntPtr]::Zero; if ($null -eq $SecureString -or $SecureString.Length -eq 0) { return [string]::Empty; } try { Set-Variable -Name zero -Scope Local -Visibility Private -Option Private -Value ([System.Runtime.InteropServices.Marshal]::SecureToBSTR($SecureString)); Set-Variable -Name Pstr -Scope Local -Visibility Private -Option Private -Value ([System.Runtime.InteropServices.Marshal]::PtrToStringBSTR($zero)); } finally { if ($zero -ne [IntPtr]::Zero) { [System.Runtime.InteropServices.Marshal]::ZeroFreeBSTR($zero); } } return $Pstr; } static [string] ToString([int[]]$CharCodes, [string]$separator) { return [string]::Join($separator, [xconvert]::ToString($CharCodes)); } static [string] ToString([int]$value, [int]$toBase) { [char[]]$baseChars = switch ($toBase) { # Binary 2 { @('0', '1') } # Hexadecimal 16 { @('0', '1', '2', '3', '4', '5', '6', '7', '8', '9', 'a', 'b', 'c', 'd', 'e', 'f') } # Hexavigesimal 26 { @('0', '1', '2', '3', '4', '5', '6', '7', '8', '9', 'a', 'b', 'c', 'd', 'e', 'f', 'g', 'h', 'i', 'j', 'k', 'l', 'm', 'n', 'o', 'p') } # Sexagesimal 60 { @('0', '1', '2', '3', '4', '5', '6', '7', '8', '9', 'A', 'B', 'C', 'D', 'E', 'F', 'G', 'H', 'I', 'J', 'K', 'L', 'M', 'N', 'O', 'P', 'Q', 'R', 'S', 'T', 'U', 'V', 'W', 'X', 'Y', 'Z', 'a', 'b', 'c', 'd', 'e', 'f', 'g', 'h', 'i', 'j', 'k', 'l', 'm', 'n', 'o', 'p', 'q', 'r', 's', 't', 'u', 'v', 'w', 'x') } Default { throw [System.ArgumentException]::new("Invalid Base.") } } return [xconvert]::IntToString($value, $baseChars); } static [string] ToString([guid]$guid) { return [System.Text.Encoding]::UTF8.GetString([xconvert]::BytesFromHex($guid.ToString().Replace('-', ''))) # NOTE: This does not apply on real guids. This is just a way to reverse the ToGuid() method. } static [guid] ToGuid([string]$text) { # Creates a string that passes guid regex checks (ie: not a real guid) if ($text.Trim().Length -ne 16) { throw [System.InvalidOperationException]::new('$InputText.Trim().Length Should Be exactly 16. Ex: [xconvert]::ToGuid([xgen]::RandomName(16))') } $IsHexString = [regex]::IsMatch($text, '^#?([a-f0-9]{6}|[a-f0-9]{3})$') if ($IsHexString) { return [System.Guid]::new(([byte[]] -split ($text -replace '..', '0x$& '))) } return [guid]::new([System.BitConverter]::ToString([System.Text.Encoding]::UTF8.GetBytes($text)).Replace("-", "").ToLower().Insert(8, "-").Insert(13, "-").Insert(18, "-").Insert(23, "-")) } [string[]] ToRomanNumeral([int[]]$Numbers) { [ValidateRange(1, 3999)][int[]]$Numbers = $Numbers $res = @() $DecimalToRoman = @{ Thousands = "", "M", "MM", "MMM" Hundreds = "", "C", "CC", "CCC", "CD", "D", "DC", "DCC", "DCCC", "CM" Tens = "", "X", "XX", "XXX", "XL", "L", "LX", "LXX", "LXXX", "XC" Ones = "", "I", "II", "III", "IV", "V", "VI", "VII", "VIII", "IX" } $column = @{ Thousands = 0 Hundreds = 1 Tens = 2 Ones = 3 } foreach ($curNumber in $Numbers) { [int[]]$digits = ($curNumber.ToString().PadLeft(4, "0").ToCharArray()).ForEach({ [Char]::GetNumericValue($_) }) $RomanNumeral = [string]::Empty $RomanNumeral += $DecimalToRoman.Thousands[$digits[$column.Thousands]] $RomanNumeral += $DecimalToRoman.Hundreds[$digits[$column.Hundreds]] $RomanNumeral += $DecimalToRoman.Tens[$digits[$column.Tens]] $RomanNumeral += $DecimalToRoman.Ones[$digits[$column.Ones]] $res += $RomanNumeral } return $res } [void] ToPtrOrStr([Byte[]]$Buffer, [Type]$Type) { # TODO: [wip] return something! [ValidateNotNullOrEmpty()][Byte[]]$Buffer = $Buffer [ValidateNotNull()][Type]$Type = $Type; $gch = $null try { $gch = [System.Runtime.InteropServices.GCHandle]::Alloc($Buffer, [System.Runtime.InteropServices.GCHandleType]::Pinned) if ($Type) { $gch.AddrOfPinnedObject() -as $Type } else { $gch.AddrOfPinnedObject() } } catch { Write-Verbose $_ } finally { if ($gch) { $gch.Free() } } } static [SecureString] ToSecurestring([string]$String) { $SecureString = $null; Set-Variable -Name SecureString -Scope Local -Visibility Private -Option Private -Value ([System.Security.SecureString]::new()); if (![string]::IsNullOrEmpty($String)) { $Chars = $String.toCharArray() ForEach ($Char in $Chars) { $SecureString.AppendChar($Char) } } $SecureString.MakeReadOnly(); return $SecureString } static [int[]] ToCharCode([string[]]$string) { [bool]$encoderShouldEmitUTF8Identifier = $false; $Codes = @() $Encodr = [System.Text.UTF8Encoding]::new($encoderShouldEmitUTF8Identifier) for ($i = 0; $i -lt $string.Count; $i++) { $Codes += [int[]]$($Encodr.GetBytes($string[$i])) } return $Codes; } static [bool] ToBoolean([string]$Text) { $Text = switch -Wildcard ($Text) { "1*" { "true"; break } "0*" { "false"; break } "yes*" { "true"; break } "no*" { "false"; break } "true*" { "true"; break } "false*" { "false"; break } "*true*" { "true"; break } "*false*" { "false"; break } "yeah*" { "true"; break } "y*" { "true"; break } "n*" { "false"; break } Default { "false" } } return [convert]::ToBoolean($Text) } static [psobject] ToCaesarCipher([string]$Text) { return [PsObject][xconvert]::ToCaesarCipher($Text, $(Get-Random (1..25))) } static [psobject] ToCaesarCipher([string]$Text, [int]$Key) { $Text = $Text.ToLower(); $Cipher = [string]::Empty; $alphabet = [string]"abcdefghijklmnopqrstuvwxyz"; New-Variable -Name alphabet -Value $alphabet -Option Constant -Force; for ($i = 0; $i -lt $Text.Length; $i++) { if ($Text[$i] -eq " ") { $Cipher += " "; } else { [int]$index = $alphabet.IndexOf($text[$i]) + $Key if ($index -gt 26) { $index = $index - 26 } $Cipher += $alphabet[$index]; } } $Output = [PsObject]::new() $Output | Add-Member -Name 'Cipher' -Value $Cipher -Type NoteProperty $Output | Add-Member -Name 'key' -Value $Key -Type NoteProperty return $Output } static [string] FromCaesarCipher([string]$Cipher, [int]$Key) { $Cipher = $Cipher.ToLower(); $Output = [string]::Empty; $alphabet = [string]"abcdefghijklmnopqrstuvwxyz"; New-Variable -Name alphabet -Value $alphabet -Option Constant -Force; for ($i = 0; $i -lt $Cipher.Length; $i++) { if ($Cipher[$i] -eq " ") { $Output += " "; } else { $Output += $alphabet[($alphabet.IndexOf($Cipher[$i]) - $Key)]; } }; return $Output; } static [psobject] ToPolybiusCipher([String]$Text) { $Ciphrkey = Get-Random "abcdefghijklmnopqrstuvwxyz" -Count 25 return [PsObject][xconvert]::ToPolybiusCipher($Text, $Ciphrkey) } static [psobject] ToPolybiusCipher([string]$Text, [string]$Key) { $Text = $Text.ToLower(); $Key = $Key.ToLower(); [String]$Cipher = [string]::Empty [xconvert]::ValidatePolybiusCipher($Text, $Key, "Encrypt") [Array]$polybiusTable = New-Object 'string[,]' 5, 5; $letter = 0; for ($i = 0; $i -lt 5; $i++) { for ($j = 0; $j -lt 5; $j++) { $polybiusTable[$i, $j] = $Key[$letter]; $letter++; } }; $Text = $Text.Replace(" ", ""); for ($i = 0; $i -lt $Text.Length; $i++) { for ($j = 0; $j -lt 5; $j++) { for ($k = 0; $k -lt 5; $k++) { if ($polybiusTable[$j, $k] -eq $Text[$i]) { $Cipher += [string]$j + [string]$k + " "; } } } } $Output = [PsObject]::new() $Output | Add-Member -Name 'Cipher' -Value $Cipher -Type NoteProperty $Output | Add-Member -Name 'key' -Value $Key -Type NoteProperty return $Output } static [string] FromPolybiusCipher([string]$Cipher, [string]$Key) { $Cipher = $Cipher.ToLower(); $Key = $Key.ToLower(); [String]$Output = [string]::Empty [xconvert]::ValidatePolybiusCipher($Cipher, $Key, "Decrypt") [Array]$polybiusTable = New-Object 'string[,]' 5, 5; $letter = 0; for ($i = 0; $i -lt 5; $i++) { for ($j = 0; $j -lt 5; $j++) { $polybiusTable[$i, $j] = $Key[$letter]; $letter++; } }; $SplitInput = $Cipher.Split(" "); foreach ($pair in $SplitInput) { $Output += $polybiusTable[[convert]::ToInt32($pair[0], 10), [convert]::ToInt32($pair[1], 10)]; }; return $Output; } static [void] hidden ValidatePolybiusCipher([string]$Text, [string]$Key, [string]$Action) { if ($Text -notmatch "^[a-z ]*$" -and ($Action -ne 'Decrypt')) { throw('Text must only have alphabetical characters'); } if ($Key.Length -ne 25) { throw('Key must be 25 characters in length'); } if ($Key -notmatch "^[a-z]*$") { throw('Key must only have alphabetical characters'); } for ($i = 0; $i -lt 25; $i++) { for ($j = 0; $j -lt 25; $j++) { if (($Key[$i] -eq $Key[$j]) -and ($i -ne $j)) { throw('Key must have no repeating letters'); } } } } static [string] ToBinStR ([string]$string) { return [xconvert]::ToBinStR([xconvert]::FromString("$string"), $false) } static [string] ToBinStR ([string]$string, [bool]$Tidy) { return [xconvert]::ToBinStR([xconvert]::FromString("$string"), $Tidy) } static [string] BytesToRnStr([byte[]]$Inpbytes) { $rn = [System.Random]::new(); # Hides Byte Array in a random String $St = [System.string]::Join('', $($Inpbytes | ForEach-Object { [string][char]$rn.Next(97, 122) + $_ })); return $St } static [byte[]] BytesFromRnStr ([string]$rnString) { $az = [int[]](97..122) | ForEach-Object { [string][char]$_ }; $by = [byte[]][string]::Concat($(($rnString.ToCharArray() | ForEach-Object { if ($_ -in $az) { [string][char]32 } else { [string]$_ } }) | ForEach-Object { $_ })).Trim().split([string][char]32); return $by } static [string] ToObfuscated([string]$inputString) { $Inpbytes = [System.Text.Encoding]::UTF8.GetBytes($inputString); $rn = [System.Random]::new(); # Hides Byte Array in a random String return [string]::Join('', $($Inpbytes | ForEach-Object { [string][char]$rn.Next(97, 122) + $_ })); } static [string] ToDeObfuscated([string]$obfuscatedString) { $az = [int[]](97..122) | ForEach-Object { [string][char]$_ }; $outbytes = [byte[]][string]::Concat($(($obfuscatedString.ToCharArray() | ForEach-Object { if ($_ -in $az) { [string][char]32 } else { [string]$_ } }) | ForEach-Object { $_ })).Trim().split([string][char]32); return [System.Text.Encoding]::UTF8.GetString($outbytes) } [PSCustomObject[]]Static ToPSObject([xml]$XML) { $Out = @(); foreach ($Object in @($XML.Objects.Object)) { $PSObject = [PSCustomObject]::new() foreach ($Property in @($Object.Property)) { $PSObject | Add-Member NoteProperty $Property.Name $Property.InnerText } $Out += $PSObject } return $Out } static [string] ToCsv([System.Object]$Obj) { return [xconvert]::ToCsv($Obj, @('pstypenames', 'BaseType'), 2, 0) } static [string] ToCsv([System.Object]$Obj, [int]$depth) { return [xconvert]::ToCsv($Obj, @('pstypenames', 'BaseType'), $depth, 0) } static [string] ToCsv([System.Object]$Obj, [string[]]$excludedProps, [int]$depth, [int]$currentDepth = 0) { $get_Props = [scriptblock]::Create({ param([Object]$Objct, [string[]]$excluded) $Props = $Objct | Get-Member -Force -MemberType Properties; if ($excluded.Count -gt 0) { $Props = $Props | Where-Object { $_.Name -notin $excluded } } $Props = $Props | Select-Object -ExpandProperty Name return $Props } ) $Props = $get_Props.Invoke($Obj, $excludedProps) $csv = [string]::Empty $csv += '"' + ($Props -join '","') + '"' + "`n"; $vals = @() foreach ($name in $Props) { $_props = $get_Props.Invoke($Obj.$name, $excludedProps) if ($null -ne $_props) { if ($_props.count -gt 0 -and $currentDepth -lt $depth) { $currentDepth++ $vals += [xconvert]::ToCsv($Obj.$name, $excludedProps, $depth, $currentDepth) } elseif ($null -ne $Obj.$name) { $vals += $Obj.$name.Tostring() } else { $vals += $name.Tostring() } } } $fs = '"{' + ((0 .. ($vals.Count - 1)) -join '}","{') + '}"'; $csv += $fs -f $vals return $csv } static [PsObject] FromCsv([string]$text) { $obj = $null $lines = $text -split "\r?\n" if ($lines.Count -lt 2) { throw "CSV contains no data" } $header = $lines[0] -split ',' $objs = foreach ($line in $lines[1..($lines.Count - 1)]) { $values = $line -split ',' $obj = New-Object psobject for ($i = 0; $i -lt $header.Length; $i++) { $prop = $header[$i].Trim('"') if ($null -ne $values[$i]) { $val = $values[$i].Trim('"') if (![string]::IsNullOrEmpty($val)) { $obj | Add-Member -MemberType NoteProperty -Name $prop -Value $val } } } $obj } return $objs } [PSCustomObject]Static ToPSObject([System.Object]$Obj) { $PSObj = [PSCustomObject]::new(); $Obj | Get-Member -MemberType Properties | ForEach-Object { $Name = $_.Name; $PSObj | Add-Member -Name $Name -MemberType NoteProperty -Value $(if ($null -ne $Obj.$Name) { if ("Deserialized" -in (($Obj.$Name | Get-Member).TypeName.Split('.') | Sort-Object -Unique)) { $([xconvert]::ToPSObject($Obj.$Name)) } else { $Obj.$Name } } else { $null }) } return $PSObj } static [System.Object] FromPSObject([PSCustomObject]$PSObject) { return [xconvert]::FromPSObject($PSObject, $PSObject.PSObject.TypeNames[0]) } static [System.Object] FromPSObject([PSCustomObject]$PSObject, [string]$typeName) { # TODO: fix. /!\ not working as expected /!\ $Type = [Type]::GetType($typeName, $false) if ($Type) { $Obj = [Activator]::CreateInstance($Type) $PSObject.PSObject.Properties | ForEach-Object { $Name = $_.Name $Value = $_.Value if ($Value -is [PSCustomObject]) { $Value = [xconvert]::FromPSObject($Value) } $Obj.$Name = $Value } return $Obj } else { return $PSObject } } static [PSCustomObject] ToPSCustomObject($InputObject) { $OutputObject = [PSCustomObject]::new() $InputObject.PSObject.Properties | ForEach-Object { $PropertyName = $_.Name $PropertyValue = $_.Value if ($_.TypeNameOfValue -is 'Deserialized.System.Management.Automation.PSCustomObject') { $OutputObject | Add-Member -Name $PropertyName -MemberType NoteProperty -Value ([xgen]::ConvertToPSCustomObject($PropertyValue)) } else { $OutputObject | Add-Member -Name $PropertyName -MemberType NoteProperty -Value $PropertyValue } } return $OutputObject } static [byte[]] FromBase32String([string]$string) { [ValidateNotNullOrEmpty()][string]$string = $string; $string = $string.ToLower(); $B32CHARSET = "abcdefghijklmnopqrstuvwxyz234567" $B32CHARSET_Pattern = "^[A-Z2-7 ]+_*$"; [byte[]]$result = $null if (!($string -match $B32CHARSET_Pattern)) { Throw "Invalid Base32 data encountered in input stream." } $InputStream = [System.IO.MemoryStream]::new([System.Text.Encoding]::UTF8.GetBytes($string), 0, $string.Length) $BinaryReader = [System.IO.BinaryReader]::new($InputStream) $OutputStream = [System.IO.MemoryStream]::new() $BinaryWriter = [System.IO.BinaryWriter]::new($OutputStream) Try { While ([System.Char[]]$CharsRead = $BinaryReader.ReadChars(8)) { [System.Byte[]]$B32Bytes = , 0x00 * 5 [System.UInt16]$CharLen = 8 - ($CharsRead -Match "_").Count [System.UInt16]$ByteLen = [Math]::Floor(($CharLen * 5) / 8) [System.Byte[]]$BinChunk = , 0x00 * $ByteLen if ($CharLen -lt 8) { [System.Char[]]$WorkingChars = , "a" * 8 [Array]::Copy($CharsRead, $WorkingChars, $CharLen) [Array]::Resize([ref]$CharsRead, 8) [Array]::Copy($WorkingChars, $CharsRead, 8) } $B32Bytes[0] = (($B32CHARSET.IndexOf($CharsRead[0]) -band 0x1F) -shl 3) -bor (($B32CHARSET.IndexOf($CharsRead[1]) -band 0x1C) -shr 2) $B32Bytes[1] = (($B32CHARSET.IndexOf($CharsRead[1]) -band 0x03) -shl 6) -bor (($B32CHARSET.IndexOf($CharsRead[2]) -band 0x1F) -shl 1) -bor (($B32CHARSET.IndexOf($CharsRead[3]) -band 0x10) -shr 4) $B32Bytes[2] = (($B32CHARSET.IndexOf($CharsRead[3]) -band 0x0F) -shl 4) -bor (($B32CHARSET.IndexOf($CharsRead[4]) -band 0x1E) -shr 1) $B32Bytes[3] = (($B32CHARSET.IndexOf($CharsRead[4]) -band 0x01) -shl 7) -bor (($B32CHARSET.IndexOf($CharsRead[5]) -band 0x1F) -shl 2) -bor (($B32CHARSET.IndexOf($CharsRead[6]) -band 0x18) -shr 3) $B32Bytes[4] = (($B32CHARSET.IndexOf($CharsRead[6]) -band 0x07) -shl 5) -bor ($B32CHARSET.IndexOf($CharsRead[7]) -band 0x1F) [System.Buffer]::BlockCopy($B32Bytes, 0, $BinChunk, 0, $ByteLen) $BinaryWriter.Write($BinChunk) } $result = $OutputStream.ToArray() } catch { Write-Error "Exception: $($_.Exception.Message)" Break } finally { $BinaryReader.Close() $BinaryReader.Dispose() $BinaryWriter.Close() $BinaryWriter.Dispose() $InputStream.Close() $InputStream.Dispose() $OutputStream.Close() $OutputStream.Dispose() } return $result } static [string] ToBase32String([byte[]]$bytes) { return [xconvert]::ToBase32String($bytes, $false) } static [string] ToBase32String([string]$String) { return [xconvert]::ToBase32String($String, $false) } static [string] ToBase32String([byte[]]$bytes, [bool]$Formatt) { return [xconvert]::ToBase32String([System.IO.MemoryStream]::New($bytes), $Formatt) } static [string] ToBase32String([string]$String, [bool]$Formatt) { return [xconvert]::ToBase32String([System.Text.Encoding]::ASCII.GetBytes($String), $Formatt) } static [string] ToBase32String([System.IO.Stream]$Stream, [bool]$Formatt) { # .EXAMPLE # $b32 = [xconvert]::ToBase32String("hello world!") # $text = [String]::Join([string]::Empty, [xconvert]::ToString([int[]][xconvert]::FromBase32String($b32))) $BinaryReader = [System.IO.BinaryReader]::new($Stream); $Base32Output = [System.Text.StringBuilder]::new(); $result = [string]::Empty $B32CHARSET = "abcdefghijklmnopqrstuvwxyz234567" Try { While ([byte[]]$BytesRead = $BinaryReader.ReadBytes(5)) { [System.Boolean]$AtEnd = ($BinaryReader.BaseStream.Length -eq $BinaryReader.BaseStream.Position) [System.UInt16]$ByteLength = $BytesRead.Length if ($ByteLength -lt 5) { [byte[]]$WorkingBytes = , 0x00 * 5 [System.Buffer]::BlockCopy($BytesRead, 0, $WorkingBytes, 0, $ByteLength) [Array]::Resize([ref]$BytesRead, 5) [System.Buffer]::BlockCopy($WorkingBytes, 0, $BytesRead, 0, 5) } [System.Char[]]$B32Chars = , 0x00 * 8 [System.Char[]]$B32Chunk = , "_" * 8 $B32Chars[0] = ($B32CHARSET[($BytesRead[0] -band 0xF8) -shr 3]) $B32Chars[1] = ($B32CHARSET[(($BytesRead[0] -band 0x07) -shl 2) -bor (($BytesRead[1] -band 0xC0) -shr 6)]) $B32Chars[2] = ($B32CHARSET[($BytesRead[1] -band 0x3E) -shr 1]) $B32Chars[3] = ($B32CHARSET[(($BytesRead[1] -band 0x01) -shl 4) -bor (($BytesRead[2] -band 0xF0) -shr 4)]) $B32Chars[4] = ($B32CHARSET[(($BytesRead[2] -band 0x0F) -shl 1) -bor (($BytesRead[3] -band 0x80) -shr 7)]) $B32Chars[5] = ($B32CHARSET[($BytesRead[3] -band 0x7C) -shr 2]) $B32Chars[6] = ($B32CHARSET[(($BytesRead[3] -band 0x03) -shl 3) -bor (($BytesRead[4] -band 0xE0) -shr 5)]) $B32Chars[7] = ($B32CHARSET[$BytesRead[4] -band 0x1F]) [Array]::Copy($B32Chars, $B32Chunk, ([Math]::Ceiling(($ByteLength / 5) * 8))) if ($BinaryReader.BaseStream.Position % 8 -eq 0 -and $Formatt -and !$AtEnd) { [void]$Base32Output.Append($B32Chunk) [void]$Base32Output.Append("`r`n") } else { [void]$Base32Output.Append($B32Chunk) } } [string]$result = $Base32Output.ToString() } catch { Write-Error "Exception: $($_.Exception.Message)" Break } finally { $BinaryReader.Close() $BinaryReader.Dispose() $Stream.Close() $Stream.Dispose() } return $result } static [string] ToProtected([string]$string) { $Scope = [ProtectionScope]::CurrentUser $Entropy = [System.Text.Encoding]::UTF8.GetBytes([xgen]::UniqueMachineId())[0..15]; return [xconvert]::Tostring([xconvert]::ToProtected([xconvert]::BytesFromObject($string), $Entropy, $Scope)) } static [string] ToProtected([string]$string, [ProtectionScope]$Scope) { $Entropy = [System.Text.Encoding]::UTF8.GetBytes([xgen]::UniqueMachineId())[0..15]; return [xconvert]::Tostring([xconvert]::ToProtected([xconvert]::BytesFromObject($string), $Entropy, $Scope)) } static [string] ToProtected([string]$string, [byte[]]$Entropy, [ProtectionScope]$Scope) { return [xconvert]::Tostring([xconvert]::ToProtected([xconvert]::BytesFromObject($string), $Entropy, $Scope)) } static [byte[]] ToProtected([byte[]]$Bytes) { $Scope = [ProtectionScope]::CurrentUser $Entropy = [System.Text.Encoding]::UTF8.GetBytes([xgen]::UniqueMachineId())[0..15]; return [xconvert]::ToProtected($bytes, $Entropy, $Scope) } static [byte[]] ToProtected([byte[]]$Bytes, [ProtectionScope]$Scope) { $Entropy = [System.Text.Encoding]::UTF8.GetBytes([xgen]::UniqueMachineId())[0..15]; return [xconvert]::ToProtected($bytes, $Entropy, $Scope) } static [byte[]] ToProtected([byte[]]$Bytes, [byte[]]$Entropy, [ProtectionScope]$Scope) { $encryptedData = $null; # Uses the Windows Data Protection API (DPAPI) https://docs.microsoft.com/en-us/dotnet/api/System.Security.Cryptography.ProtectedData.Protect? try { if (!("System.Security.Cryptography.ProtectedData" -is 'Type')) { Add-Type -AssemblyName System.Security } $bytes64str = $null; Set-Variable -Name bytes64str -Scope Local -Visibility Private -Option Private -Value ([convert]::ToBase64String($Bytes)) $Entropy64str = $null; Set-Variable -Name Entropy64str -Scope Local -Visibility Private -Option Private -Value ([convert]::ToBase64String($Entropy)) Set-Variable -Name encryptedData -Scope Local -Visibility Private -Option Private -Value $(& ([scriptblock]::Create("[System.Security.Cryptography.ProtectedData]::Protect([convert]::FromBase64String('$bytes64str'), [convert]::FromBase64String('$Entropy64str'), [System.Security.Cryptography.DataProtectionScope]::$($Scope.ToString()))"))); } catch [System.Security.Cryptography.CryptographicException] { throw [System.Security.Cryptography.CryptographicException]::new("Data was not encrypted. An error occurred!`n $($_.Exception.Message)"); } catch { throw $_ } return $encryptedData } static [string] ToUnProtected([string]$string) { $Scope = [ProtectionScope]::CurrentUser $Entropy = [System.Text.Encoding]::UTF8.GetBytes([xgen]::UniqueMachineId())[0..15]; return [xconvert]::BytesToObject([xconvert]::ToUnProtected([xconvert]::BytesFromObject($string), $Entropy, $Scope)) } static [string] ToUnProtected([string]$string, [ProtectionScope]$Scope) { $Entropy = [System.Text.Encoding]::UTF8.GetBytes([xgen]::UniqueMachineId())[0..15]; return [xconvert]::BytesToObject([xconvert]::ToUnProtected([xconvert]::BytesFromObject($string), $Entropy, $Scope)) } static [string] ToUnProtected([string]$string, [byte[]]$Entropy, [ProtectionScope]$Scope) { return [xconvert]::BytesToObject([xconvert]::ToUnProtected([xconvert]::BytesFromObject($string), $Entropy, $Scope)) } static [byte[]] ToUnProtected([byte[]]$Bytes, [byte[]]$Entropy, [ProtectionScope]$Scope) { $decryptedData = $null; try { if (!("System.Security.Cryptography.ProtectedData" -is 'Type')) { Add-Type -AssemblyName System.Security } $bytes64str = $null; Set-Variable -Name bytes64str -Scope Local -Visibility Private -Option Private -Value ([convert]::ToBase64String($Bytes)) $Entropy64str = $null; Set-Variable -Name Entropy64str -Scope Local -Visibility Private -Option Private -Value ([convert]::ToBase64String($Entropy)) Set-Variable -Name decryptedData -Scope Local -Visibility Private -Option Private -Value $(& ([scriptblock]::Create("[System.Security.Cryptography.ProtectedData]::Unprotect([convert]::FromBase64String('$bytes64str'), [convert]::FromBase64String('$Entropy64str'), [System.Security.Cryptography.DataProtectionScope]::$($Scope.ToString()))"))); } catch [System.Security.Cryptography.CryptographicException] { throw [System.Security.Cryptography.CryptographicException]::new("Data was not decrypted. An error occurred!`n $($_.Exception.Message)"); } catch { throw $_ } return $decryptedData } static [byte[]] ToCompressed([byte[]]$Bytes) { return [xconvert]::ToCompressed($Bytes, 'Gzip'); } static [string] ToCompressed([string]$Plaintext) { return [convert]::ToBase64String([xconvert]::ToCompressed([System.Text.Encoding]::UTF8.GetBytes($Plaintext))); } static [byte[]] ToCompressed([byte[]]$Bytes, [string]$Compression) { if (("$Compression" -as 'Compression') -isnot 'Compression') { Throw [System.InvalidCastException]::new("Compression type '$Compression' is unknown! Valid values: $([Enum]::GetNames([compression]) -join ', ')"); } $outstream = [System.IO.MemoryStream]::new() $Comstream = switch ($Compression) { "Gzip" { New-Object System.IO.Compression.GzipStream($outstream, [System.IO.Compression.CompressionLevel]::Optimal) } "Deflate" { New-Object System.IO.Compression.DeflateStream($outstream, [System.IO.Compression.CompressionLevel]::Optimal) } "ZLib" { New-Object System.IO.Compression.ZLibStream($outstream, [System.IO.Compression.CompressionLevel]::Optimal) } Default { throw "Failed to Compress Bytes. Could Not resolve Compression!" } } [void]$Comstream.Write($Bytes, 0, $Bytes.Length); $Comstream.Close(); $Comstream.Dispose(); [byte[]]$OutPut = $outstream.ToArray(); $outStream.Close() return $OutPut; } static [byte[]] ToDeCompressed([byte[]]$Bytes) { return [xconvert]::ToDeCompressed($Bytes, 'Gzip'); } static [string] ToDecompressed([string]$Base64Text) { return [System.Text.Encoding]::UTF8.GetString([xconvert]::ToDecompressed([convert]::FromBase64String($Base64Text))); } static [byte[]] ToDeCompressed([byte[]]$Bytes, [string]$Compression) { if (("$Compression" -as 'Compression') -isnot 'Compression') { Throw [System.InvalidCastException]::new("Compression type '$Compression' is unknown! Valid values: $([Enum]::GetNames([compression]) -join ', ')"); } $inpStream = [System.IO.MemoryStream]::new($Bytes) $ComStream = switch ($Compression) { "Gzip" { New-Object System.IO.Compression.GzipStream($inpStream, [System.IO.Compression.CompressionMode]::Decompress); } "Deflate" { New-Object System.IO.Compression.DeflateStream($inpStream, [System.IO.Compression.CompressionMode]::Decompress); } "ZLib" { New-Object System.IO.Compression.ZLibStream($inpStream, [System.IO.Compression.CompressionMode]::Decompress); } Default { throw "Failed to DeCompress Bytes. Could Not resolve Compression!" } } $outStream = [System.IO.MemoryStream]::new(); [void]$Comstream.CopyTo($outStream); $Comstream.Close(); $Comstream.Dispose(); $inpStream.Close() [byte[]]$OutPut = $outstream.ToArray(); $outStream.Close() return $OutPut; } static [string] ToRegexEscapedString([string]$LiteralText) { if ([string]::IsNullOrEmpty($LiteralText)) { $LiteralText = [string]::Empty } return [regex]::Escape($LiteralText); } static [System.Collections.Hashtable] FromRegexCapture([System.Text.RegularExpressions.Match]$Match, [regex]$Regex) { if (!$Match.Groups[0].Success) { throw New-Object System.ArgumentException('Match does not contain any captures.', 'Match') } $h = @{} foreach ($name in $Regex.GetGroupNames()) { if ($name -eq 0) { continue } $h.$name = $Match.Groups[$name].Value } return $h } static [PSObject[]] ToFlatObject([PSObject[]]$InputObject) { $op = [xgen]::Options return [xconvert]::ToFlatObject($InputObject, $op.PropstoExclude, $op.SkipDefaults, $op.PropstoInclude, $op.Values, $op.MaxDepth) } static [PSObject[]] ToFlatObject([PSObject[]]$InputObject, [string[]]$PropstoExclude, [bool]$SkipDefaults, [string[]]$PropstoInclude, [string[]]$Values, [int]$MaxDepth) { # .DESCRIPTION # flatten an object to simplify discovery of data # .EXAMPLE # $qs = Invoke-RestMethod "https://api.stackexchange.com/2.0/questions/unanswered?order=desc&sort=activity&tagged=powershell&pagesize=10&site=stackoverflow" # [xgen]::Options.Include = ("Title", "Link", "View_Count") # $ql = [xconvert]::ToFlatObject($qs) $result = @(); [xgen]::Options = New-Object xObOptions -Property @{ PropstoExclude = $PropstoExclude PropstoInclude = $PropstoInclude SkipDefaults = $SkipDefaults MaxDepth = $MaxDepth Values = $Values } foreach ($Object in $InputObject) { $result += [xgen]::RecurseObject($Object, [PSObject]::new()) } return $result } static [System.Collections.Hashtable] ToHashTable($object) { # Converts an object to a hashtable # .DESCRIPTION # PowerShell v4 seems to have trouble casting some objects to Hashtable. $Properties = switch ($object.GetType().Fullname) { 'System.String' { try { $obj = ConvertFrom-Json -InputObject $object -ErrorAction Stop $obj.PsObject.Properties } catch { throw [System.IO.InvalidDataException]::new("Object is not a valid json string") } break } default { $object.PsObject.Properties } } return [xconvert]::ToHashTable($Properties, 0) } static [System.Collections.Hashtable] ToHashTable ([System.Management.Automation.PSPropertyInfo[]]$Properties, [int]$CurrentDepth) { $DepthThreshold = 32; $CurrentDepth++ if ($CurrentDepth -ge $DepthThreshold) { Write-Error -Message "Converting to Hashtable reached Depth Threshold of 32 on $($Properties.Name -join ',')" -ErrorAction Stop } $Ht = [hashtable]@{} foreach ($Prop in $Properties) { if ($Prop.Value -or $prop.TypeNameOfValue -eq 'System.Boolean') { switch ($Prop.TypeNameOfValue) { 'System.String' { $ht.Add($Prop.Name, $Prop.Value) break } 'System.Boolean' { $ht.Add($Prop.Name, $Prop.Value) break } 'System.DateTime' { $ht.Add($Prop.Name, $Prop.Value.ToString()) break } { $_ -ilike '*int*' } { $ht.Add($Prop.Name, $Prop.Value) break } default { $ht.Add($Prop.Name, [xconvert]::ToHashTable($Prop.Value.psobject.Properties, $CurrentDepth)) } } } else { $ht.Add($Prop.Name, $null) } } return $Ht } static hidden [string] IntToString([Int]$value, [char[]]$baseChars) { [int]$i = 32; [char[]]$buffer = [Char[]]::new($i); [int]$targetBase = $baseChars.Length; do { $buffer[--$i] = $baseChars[$value % $targetBase]; $value = $value / $targetBase; } while ($value -gt 0); [char[]]$result = [Char[]]::new(32 - $i); [Array]::Copy($buffer, $i, $result, 0, 32 - $i); return [string]::new($result) } static [string] ToHexString([byte[]]$Bytes) { return [string][System.BitConverter]::ToString($bytes).replace('-', [string]::Empty).Tolower(); } static [byte[]] FromHexString([string]$HexString) { $outputLength = $HexString.Length / 2; $output = [byte[]]::new($outputLength); $numeral = [char[]]::new(2); for ($i = 0; $i -lt $outputLength; $i++) { $HexString.CopyTo($i * 2, $numeral, 0, 2); $output[$i] = [Convert]::ToByte([string]::new($numeral), 16); } return $output; } static [string] BytesToHex([byte[]]$Bytes) { return [string][System.BitConverter]::ToString($bytes).replace('-', [string]::Empty).Tolower(); } static [string] IntToHex([uint64[]]$Numbers, [int]$MinWidth, [string]$Prefix) { [ValidateSet('#', '0x')][string]$Prefix = $Prefix [ValidateRange(1, 255)][int] $MinWidth = $MinWidth; $res = @() foreach ($Num in $Numbers) { if ($MinWidth) { $val = "{0:x$MinWidth}" -f $Num } else { $val = '{0:x}' -f $Num } if ($Prefix) { $val = $Prefix + $val } $res += $val } return $res } static [byte[]] BytesFromHex([string]$HexString) { $outputLength = $HexString.Length / 2; $output = [byte[]]::new($outputLength); $numeral = [char[]]::new(2); for ($i = 0; $i -lt $outputLength; $i++) { $HexString.CopyTo($i * 2, $numeral, 0, 2); $output[$i] = [Convert]::ToByte([string]::new($numeral), 16); } return $output; } static [byte[]] BytesFromObject([object]$obj) { return [xconvert]::BytesFromObject($obj, $false); } static [byte[]] BytesFromObject([object]$obj, [bool]$protect) { if ($null -eq $obj) { return $null }; $bytes = $null; if ($obj.GetType() -eq [string] -and $([regex]::IsMatch([string]$obj, '^(?:[A-Za-z0-9+/]{4})*(?:[A-Za-z0-9+/]{2}==|[A-Za-z0-9+/]{3}=)?$') -and ![string]::IsNullOrWhiteSpace([string]$obj) -and !$obj.Length % 4 -eq 0 -and !$obj.Contains(" ") -and !$obj.Contains(" ") -and !$obj.Contains("`t") -and !$obj.Contains("`n"))) { $bytes = [convert]::FromBase64String($obj); } elseif ($obj.GetType() -eq [byte[]]) { $bytes = [byte[]]$obj } else { # Serialize the Object: $bytes = [xconvert]::ToSerialized($obj) } if ($protect) { # Protecteddata: https://docs.microsoft.com/en-us/dotnet/api/system.security.cryptography.protecteddata.unprotect? $bytes = [byte[]][xconvert]::ToProtected($bytes); } return $bytes } [Object[]]static BytesToObject([byte[]]$Bytes) { if ($null -eq $Bytes) { return $null } # Deserialize the byte array return [xconvert]::ToDeserialized($Bytes) } [Object[]]static BytesToObject([byte[]]$Bytes, [bool]$Unprotect) { if ($Unprotect) { $Bytes = [byte[]][xconvert]::ToUnProtected($Bytes) } return [xconvert]::BytesToObject($Bytes); } static [byte[]] ToSerialized($Obj) { return [xconvert]::ToSerialized($Obj, $false) } static [byte[]] ToSerialized($Obj, [bool]$Force) { $bytes = $null # Todo: Run tests to see if [System.Management.Automation.PSSerializer]::Serialize() can do better. # When deseri~zr is using: [System.Management.Automation.PSSerializer]::Deserialize() or [System.Management.Automation.PSSerializer]::DeserializeAsList() try { # Serialize the object using binaryFormatter: https://docs.microsoft.com/en-us/dotnet/api/system.runtime.serialization.formatters.binary.binaryformatter? $formatter = New-Object -TypeName System.Runtime.Serialization.Formatters.Binary.BinaryFormatter $stream = New-Object -TypeName System.IO.MemoryStream $formatter.Serialize($stream, $Obj) # Serialise the graph $bytes = $stream.ToArray(); $stream.Close(); $stream.Dispose() } catch [System.Management.Automation.MethodInvocationException], [System.Runtime.Serialization.SerializationException] { #Object can't be serialized, Lets try Marshalling: https://docs.microsoft.com/en-us/dotnet/api/System.Runtime.InteropServices.Marshal? $TypeName = $obj.GetType().Name; $obj = $obj -as $TypeName if ($obj -isnot [System.Runtime.Serialization.ISerializable] -and $TypeName -in ("securestring", "Pscredential", "CredManaged")) { throw [System.Management.Automation.MethodInvocationException]::new("Cannot serialize an unmanaged structure") } if ($Force) { # Import the System.Runtime.InteropServices.Marshal namespace Add-Type -AssemblyName System.Runtime [int]$size = [System.Runtime.InteropServices.Marshal]::SizeOf($obj); $bytes = [byte[]]::new($size); [IntPtr]$ptr = [System.Runtime.InteropServices.Marshal]::AllocHGlobal($size); [void][System.Runtime.InteropServices.Marshal]::StructureToPtr($obj, $ptr, $false); [void][System.Runtime.InteropServices.Marshal]::Copy($ptr, $bytes, 0, $size); [void][System.Runtime.InteropServices.Marshal]::FreeHGlobal($ptr); # Free the memory allocated for the serialized object } else { throw [System.Runtime.Serialization.SerializationException]::new("Serialization error. Make sure the object is marked with the [System.SerializableAttribute] or is Serializable.") } } catch { throw $_.Exception } return $bytes } [Object[]]static ToDeserialized([byte[]]$data) { $bf = [System.Runtime.Serialization.Formatters.Binary.BinaryFormatter]::new() $ms = [System.IO.MemoryStream]::new(); $Obj = $null $ms.Write($data, 0, $data.Length); [void]$ms.Seek(0, [System.IO.SeekOrigin]::Begin); try { $Obj = [object]$bf.Deserialize($ms) } catch [System.Management.Automation.MethodInvocationException], [System.Runtime.Serialization.SerializationException] { $Obj = $ms.ToArray() } catch { throw $_.Exception } finally { $ms.Dispose(); $ms.Close() } # Output the deserialized object return $Obj } static [System.Collections.BitArray] FromString([string]$string) { [string]$BinStR = [string]::Empty; foreach ($ch In $string.ToCharArray()) { $BinStR += [Convert]::ToString([int]$ch, 2).PadLeft(8, '0'); } return [xconvert]::FromBinStR($BinStR) } static [string] BinaryToString([System.Collections.BitArray]$BitArray) { [string]$finalString = [string]::Empty; # Manually read the first 8 bits and while ($BitArray.Length -gt 0) { $ba_tempBitArray = [System.Collections.BitArray]::new($BitArray.Length - 8); $int_binaryValue = 0; if ($BitArray[0]) { $int_binaryValue += 1 }; if ($BitArray[1]) { $int_binaryValue += 2 }; if ($BitArray[2]) { $int_binaryValue += 4 }; if ($BitArray[3]) { $int_binaryValue += 8 }; if ($BitArray[4]) { $int_binaryValue += 16 }; if ($BitArray[5]) { $int_binaryValue += 32 }; if ($BitArray[6]) { $int_binaryValue += 64 }; if ($BitArray[7]) { $int_binaryValue += 128 }; $finalString += [Char]::ConvertFromUtf32($int_binaryValue); $int_counter = 0; for ($i = 8; $i -lt $BitArray.Length; $i++) { $ba_tempBitArray[$int_counter++] = $BitArray[$i]; } $BitArray = $ba_tempBitArray; } return $finalString; } static [string] BytesToBinStR([byte[]]$Bytes) { return [xconvert]::BytesToBinStR($Bytes, $true); } static [string] BytesToBinStR([byte[]]$Bytes, [bool]$Tidy) { $bitArray = [System.Collections.BitArray]::new($Bytes); return [xconvert]::ToBinStR($bitArray, $Tidy); } static [byte[]] BytesFromBinStR([string]$binary) { $binary = [string]::Join('', $binary.Split()) $length = $binary.Length; if ($length % 8 -ne 0) { Throw [System.IO.InvalidDataException]::new("Your string is invalid. Make sure it has no typos.") } $list = [System.Collections.Generic.List[Byte]]::new() for ($i = 0; $i -lt $length; $i += 8) { [string]$binStr = $binary.Substring($i, 8) [void]$list.Add([Convert]::ToByte($binStr, 2)); } return $list.ToArray(); } static [byte[]] BytesFromBinary([System.Collections.BitArray]$binary) { return [xconvert]::BytesFromBinStR([xconvert]::ToBinStR($binary)) } static [string] ToBinStR([System.Collections.BitArray]$binary) { $BinStR = [string]::Empty # (Binary String) for ($i = 0; $i -lt $binary.Length; $i++) { if ($binary[$i]) { $BinStR += "1 "; } else { $BinStR += "0 "; } } return $BinStR.Trim() } static [string] ToBinStR([System.Collections.BitArray]$binary, [bool]$Tidy) { [string]$binStr = [xconvert]::ToBinStR($binary) if ($Tidy) { $binStr = [string]::Join('', $binStr.Split()) } return $binStr } static [System.Collections.BitArray] FromBinStR([string]$binary) { # .EXAMPLE # [string][xconvert]::BinaryToString([xconvert]::FromBinStR($BinStR)) return [System.Collections.BitArray]::new([xconvert]::BytesFromBinStR($binary)) } static [void] ObjectToFile($Object, [string]$OutFile) { [xconvert]::ObjectToFile($Object, $OutFile, $false); } static [void] ObjectToFile($Object, [string]$OutFile, [bool]$encrypt) { try { $OutFile = [xgen]::UnResolvedPath($OutFile) try { $resolved = [xgen]::ResolvedPath($OutFile); if ($?) { $OutFile = $resolved } } catch [System.Management.Automation.ItemNotFoundException] { New-Item -Path $OutFile -ItemType File | Out-Null } catch { throw $_ } Export-Clixml -InputObject $Object -Path $OutFile if ($encrypt) { $(Get-Item $OutFile).Encrypt() } } catch { Write-Error $_ } } [Object[]]static ToOrdered($InputObject) { $obj = $InputObject $convert = [scriptBlock]::Create({ Param($obj) if ($obj -is [System.Management.Automation.PSCustomObject]) { # a custom object: recurse on its properties $oht = [ordered]@{} foreach ($prop in $obj.psobject.Properties) { $oht.Add($prop.Name, $(Invoke-Command -ScriptBlock $convert -ArgumentList $prop.Value)) } return $oht } elseif ($obj -isnot [string] -and $obj -is [System.Collections.IEnumerable] -and $obj -isnot [System.Collections.IDictionary]) { # A collection of sorts (other than a string or dictionary (hash table)), recurse on its elements. return @(foreach ($el in $obj) { Invoke-Command -ScriptBlock $convert -ArgumentList $el }) } else { # a non-custom object, including .NET primitives and strings: use as-is. return $obj } } ) return $(Invoke-Command -ScriptBlock $convert -ArgumentList $obj) } [object]static ObjectFromFile([string]$FilePath) { return [xconvert]::ObjectFromFile($FilePath, $false) } [object]static ObjectFromFile([string]$FilePath, [string]$Type) { return [xconvert]::ObjectFromFile($FilePath, $Type, $false); } [object]static ObjectFromFile([string]$FilePath, [bool]$Decrypt) { $FilePath = [xgen]::ResolvedPath($FilePath); $Object = $null try { if ($Decrypt) { $(Get-Item $FilePath).Decrypt() } $Object = Import-Clixml -Path $FilePath } catch { Write-Error $_ } return $Object } static [object] ObjectFromFile([string]$FilePath, [string]$Type, [bool]$Decrypt) { $FilePath = [xgen]::ResolvedPath($FilePath); $Object = $null try { if ($Decrypt) { $(Get-Item $FilePath).Decrypt() } $Object = (Import-Clixml -Path $FilePath) -as "$Type" } catch { Write-Error $_ } return $Object } static [string] HtmlToAnsi([string]$HtmlCode) { [ValidatePattern('^#\w{6}$')][string]$HtmlCode = $HtmlCode $code = [System.Drawing.ColorTranslator]::FromHtml($htmlCode) $ansi = '[38;2;{0};{1};{2}m' -f $code.R, $code.G, $code.B return $ansi } static [datetime] ToUTC([datetime]$Date) { return [xconvert]::ToUTC(@($Date))[0] } static [datetime[]] ToUTC([datetime[]]$Date) { $strCurrentTimeZone = (Get-CimInstance -ClassName win32_timezone).StandardName Write-Verbose "Your local timezone is '$((Get-CimInstance -ClassName win32_timezone).Description)'" $TZ = [TimeZoneInfo]::FindSystemTimeZoneById($strCurrentTimeZone); $result = @() foreach ($currentDate in $Date) { $newUTCTime = Get-Date -Date $currentDate Write-Verbose -Message "You entered a UTC Time of: [$currentDate]" $result += [TimeZoneInfo]::ConvertTimeFromUtc($newUTCTime, $TZ) } return $result } static [datetime] FromUTC([datetime]$Date) { return [xconvert]::FromUTC(@($Date))[0] } static [datetime[]] FromUTC([datetime[]]$Date) { # [xconvert]::FromUT("1/25/2018 1:34:31 PM") $strCurrentTimeZone = (Get-CimInstance -ClassName win32_timezone).StandardName Write-Verbose "Your local timezone is '$((Get-CimInstance -ClassName win32_timezone).Description)'" $TZ = [TimeZoneInfo]::FindSystemTimeZoneById($strCurrentTimeZone); $result = @() foreach ($currentDate in $Date) { $newUTCTime = Get-Date -Date $currentDate $result += [TimeZoneInfo]::ConvertTimeFromUtc($newUTCTime, $TZ) } return $result } static [datetime] ToDateTime([String]$DateString) { return [xconvert]::ToDateTime(@($DateString), $false)[0] } static [datetime[]] ToDateTime([String[]]$DateString, [bool]$UTC) { return [xconvert]::ToDateTime($DateString, [dateFormat]::UNKNOWN, $UTC) } static [datetime[]] ToDateTime([String[]]$DateString, [dateFormat]$Format, [bool]$UTC) { # .LINK # https://docs.microsoft.com/en-us/windows/desktop/wmisdk/cim-datetime $BeginUnixEpoch = New-Object -TypeName DateTime -ArgumentList 1970, 1, 1, 0, 0, 0, ([DateTimeKind]::Utc) #$DmtfRegex = '[0-9][0-9][0-9][0-9][0-9][0-9][0-9][0-9][0-9][0-9][0-9][0-9][0-9][0-9]\.[0-9][0-9][0-9][0-9][0-9][0-9][+-][0-9][0-9][0-9]' $DmtfRegex = '^(\d{14})\.(\d{6})[+-](\d{3})$' $MaxTicks = 2650467743999999999 $Never = 9223372036854775807 $ICSDateTimeregexp = '^(\d{8})(T)(\d{6})(Z)?$' $ISOregex = '^(\d{4}\.\d{2}\.\d{2})(T)(\d{2}:\d{2}:\d{2})(Z)?$' # Your local timezone is : $strCurrentTimeZone = (Get-CimInstance -ClassName win32_timezone -Verbose:$false).Description $result = @(); foreach ($DS in $DateString) { $ReturnVal = switch ($Format.ToString()) { 'DMTF' { if ($DS -match $DmtfRegex) { $ReturnVal = ([Management.ManagementDateTimeConverter]::ToDateTime("$DS")) } else { Out-Verbose "The DMTF date time should be of the form 'YYYYMMDDHHmmss.ffffff+###'" } break } 'Unix' { [xconvert]::FromUTC($BeginUnixEpoch.AddSeconds($DS)) break } 'FileTime' { if ([int64]$DS -gt $MaxTicks ) { if ([int64]$DS -eq $Never ) { [datetime]::MaxValue } else { 'Invalid' } } else { [datetime]::FromFileTime($DS) } break } 'ICSDateTime' { if ($DS -match $IcsDateTimeregexp) { if ( $matches[4]) { # the ICS datetime ends with 'Z' [datetime]::parseexact($DS, 'yyyyMMddTHHmmssZ', $null) } else { [datetime]::parseexact($DS, 'yyyyMMddTHHmmss', $null) } } else { Write-Verbose "The ICS date time should be of the form 'yyyymmddTHHMMSSZ'" 'Invalid' } break } 'ISO8601' { if ($DS -match $ISOregex) { if ( $matches[4]) { [datetime]::parseexact($DS, 'yyyy.MM.ddTHH:mm:ssZ', $null) } else { [datetime]::parseexact($DS, 'yyyy.MM.ddTHH:mm:ss', $null) } } else { 'Invalid' } break } 'Excel' { (Get-Date -Date 1/1/1900 ) + [timespan]::FromDays($DS) break } Default { $r = $DS -as [DateTime] if ($r -is [DateTime]) { $r } else { # Dynamically detect the system's date and time format and use it to parse the $dateString. [string[]]$dateFormats = [System.Threading.Thread]::CurrentThread.CurrentCulture.DateTimeFormat.GetAllDateTimePatterns() [System.IFormatProvider]$formatProvider = [System.Globalization.CultureInfo]::InvariantCulture $dateFormats.ForEach({ try { [datetime]::ParseExact($DS, $_, $formatProvider) } catch { $null } } ).where({ $null -ne $_ })[0] } } } if ($ReturnVal -ne 'Invalid' -and $UTC) { $ReturnVal = [xconvert]::ToUTC($ReturnVal) } $result += $ReturnVal } return $result } [string[]] ToUrlEncode([string[]]$URLs) { $Encoded = @(); foreach ($str in $URLs) { $Encoded += [System.Web.HttpUtility]::UrlEncode($str) } return $Encoded } [string[]] ToUncPath([string]$Path) { # Convert a local file path and a computer name to a network UNC path. [string[]] $CN = @(); $CN += $env:COMPUTERNAME; $UNC = @() foreach ($Computer in $CN) { $RemoteFilePathDrive = ($Path | Split-Path -Qualifier).TrimEnd(':') $UNC += "\\$Computer\$RemoteFilePathDrive`$$($Path | Split-Path -NoQualifier)" } return $UNC } [string] ToTitleCase([string]$Text) { $low = $text.toLower() return (Get-Culture).TextInfo.ToTitleCase($low) } [string] ToIndentedString([string]$ScriptText) { $CurrentLevel = 0 $ParseError = $null $Tokens = $null [void][System.Management.Automation.Language.Parser]::ParseInput($ScriptText, [ref]$Tokens, [ref]$ParseError) if ($ParseError) { $ParseError | Write-Error throw 'The parser will not work properly with errors in the script, please modify based on the above errors and retry.' } for ($t = $Tokens.Count - 2; $t -ge 1; $t--) { $Token = $Tokens[$t] $NextToken = $Tokens[$t - 1] if ($token.Kind -match '(L|At)Curly') { $CurrentLevel-- } if ($NextToken.Kind -eq 'NewLine' ) { # Grab Placeholders for the Space Between the New Line and the next token. $Rem_Start = $NextToken.Extent.EndOffset $RemoveEnd = $Token.Extent.StartOffset - $Rem_Start $_Indented = "`t" * $CurrentLevel $ScriptText = $ScriptText.Remove($Rem_Start, $RemoveEnd).Insert($Rem_Start, $_Indented) } if ($token.Kind -eq 'RCurly') { $CurrentLevel++ } } return $ScriptText } [System.TimeSpan[]] ToTimeSpan([string[]]$timespanStr) { return ($timespanStr | Select-Object *, @{name = 'Hour'; Expression = { $_.Split(":")[0] } }, @{name = 'Minute'; Expression = { $_.Split(":")[1] } }, @{name = 'Second'; Expression = { $_.Split(":")[2] } } | Select-Object @{n = 'timeSpan'; e = { New-TimeSpan -Hours $_.Hour -Minutes $_.Minute -Seconds $_.Second } }).timeSpan } static [byte[]] StreamToByteArray([System.IO.Stream]$Stream) { $ms = [System.IO.MemoryStream]::new(); $Stream.CopyTo($ms); $arr = $ms.ToArray(); if ($null -ne $ms) { $ms.Flush(); $ms.Close(); $ms.Dispose() } else { Write-Warning "[x] MemoryStream was Not closed!" }; return $arr; } [string]hidden static Reverse([string]$text) { [char[]]$array = $text.ToCharArray(); [array]::Reverse($array); return [String]::new($array); } } #endregion Classes $script:localizedData = if ($null -ne (Get-Command Get-LocalizedData -ErrorAction SilentlyContinue)) { Get-LocalizedData -DefaultUICulture 'en-US' } else { $dataFile = [System.IO.FileInfo]::new([IO.Path]::Combine((Get-Location), 'en-US', 'cliHelper.xconvert.strings.psd1')) if (!$dataFile.Exists) { throw [System.IO.FileNotFoundException]::new("Unable to find the LocalizedData file: $dataFile", 'cliHelper.xconvert.strings.psd1') } [scriptblock]::Create("$([IO.File]::ReadAllText($dataFile))").Invoke() } # Types that will be available to users when they import the module. $typestoExport = @( [xconvert], [xgen] ) $TypeAcceleratorsClass = [psobject].Assembly.GetType('System.Management.Automation.TypeAccelerators') foreach ($Type in $typestoExport) { if ($Type.FullName -in $TypeAcceleratorsClass::Get.Keys) { $Message = @( "Unable to register type accelerator '$($Type.FullName)'" 'Accelerator already exists.' ) -join ' - ' throw [System.Management.Automation.ErrorRecord]::new( [System.InvalidOperationException]::new($Message), 'TypeAcceleratorAlreadyExists', [System.Management.Automation.ErrorCategory]::InvalidOperation, $Type.FullName ) } } # Add type accelerators for every exportable type. foreach ($Type in $typestoExport) { $TypeAcceleratorsClass::Add($Type.FullName, $Type) } # Remove type accelerators when the module is removed. $MyInvocation.MyCommand.ScriptBlock.Module.OnRemove = { foreach ($Type in $typestoExport) { $TypeAcceleratorsClass::Remove($Type.FullName) } }.GetNewClosure(); $Private = @(); # $Private = Get-ChildItem ([IO.Path]::Combine($PSScriptRoot, 'Private')) -Filter "*.ps1" -ErrorAction SilentlyContinue $Public = Get-ChildItem ([IO.Path]::Combine($PSScriptRoot, 'Public')) -Filter "*.ps1" -ErrorAction SilentlyContinue foreach ($file in $($Public, $Private)) { Try { if ([string]::IsNullOrWhiteSpace($file.fullname)) { continue } . "$($file.fullname)" } Catch { Write-Warning "Failed to import function $($file.BaseName): $_" $host.UI.WriteErrorLine($_) } } Export-ModuleMember -Function $Public.BaseName -Variable 'localizedData' -Verbose |