Data commit

Task/Parse-an-IP-Address/PowerShell/parse-an-ip-address-1.psh

@@ -0,0 +1,62 @@
+function Get-IpAddress
+{
+    [CmdletBinding()]
+    [OutputType([PSCustomObject])]
+    Param
+    (
+        [Parameter(Mandatory=$true,
+                   ValueFromPipeline=$true,
+                   ValueFromPipelineByPropertyName=$true,
+                   Position=0)]
+        $InputObject
+    )
+
+    Begin
+    {
+        function Get-Address ([string]$Address)
+        {
+            if ($Address.IndexOf(".") -ne -1)
+            {
+                $Address, $port = $Address.Split(":")
+
+                [PSCustomObject]@{
+                    IPAddress = [System.Net.IPAddress]$Address
+                    Port      = $port
+                }
+            }
+            else
+            {
+                if ($Address.IndexOf("[") -ne -1)
+                {
+                    [PSCustomObject]@{
+                        IPAddress = [System.Net.IPAddress]$Address
+                        Port      = ($Address.Split("]")[-1]).TrimStart(":")
+                    }
+                }
+                else
+                {
+                    [PSCustomObject]@{
+                        IPAddress = [System.Net.IPAddress]$Address
+                        Port      = $null
+                    }
+                }
+            }
+        }
+    }
+    Process
+    {
+        $InputObject | ForEach-Object {
+            $address = Get-Address $_
+            $bytes = ([System.Net.IPAddress]$address.IPAddress).GetAddressBytes()
+            [Array]::Reverse($bytes)
+            $i = 0
+            $bytes | ForEach-Object -Begin   {[bigint]$decimalIP = 0} `
+                                    -Process {$decimalIP += [bigint]$_ * [bigint]::Pow(256, $i); $i++} `
+                                    -End     {[PSCustomObject]@{
+                                                  Address = $address.IPAddress
+                                                  Port    = $address.Port
+                                                  Hex     = "0x$($decimalIP.ToString('x'))"}
+                                             }
+        }
+    }
+}

Task/Parse-an-IP-Address/PowerShell/parse-an-ip-address-2.psh

@@ -0,0 +1,2 @@
+$ipAddresses = "127.0.0.1","127.0.0.1:80","::1","[::1]:80","2605:2700:0:3::4713:93e3","[2605:2700:0:3::4713:93e3]:80" | Get-IpAddress
+$ipAddresses

Task/Parse-an-IP-Address/PowerShell/parse-an-ip-address-3.psh

@@ -0,0 +1 @@
+$ipAddresses[5].Address

Task/Parse-an-IP-Address/PowerShell/parse-an-ip-address-4.psh

@@ -0,0 +1 @@
+$ipAddresses | where {$_.Address.AddressFamily -eq "InterNetworkV6" -and $_.Port -ne $null}