Added cmdlets: Get-PrivateKey, Get-PublicKey for given csp

Author: alan-null

Crypto.RSA/Public/Get-PrivateKey.ps1

@@ -0,0 +1,23 @@
+function Get-PrivateKey {
+    [CmdletBinding()]
+    param (
+        [Parameter(Mandatory = $false, Position = 0 )]
+        [System.Security.Cryptography.RSACryptoServiceProvider]$cryptoServiceProvider
+    )
+
+    begin {
+        Write-Verbose "Cmdlet Get-PrivateKey - Begin"
+    }
+
+    process {
+        Write-Verbose "Cmdlet Get-PrivateKey - Process"
+        if ($cryptoServiceProvider -eq $null) {
+            $cryptoServiceProvider = [System.Security.Cryptography.RSACryptoServiceProvider]::new(2048)
+        }
+        Get-KeyString $cryptoServiceProvider.ExportParameters($true)
+    }
+
+    end {
+        Write-Verbose "Cmdlet Get-PrivateKey - End"
+    }
+}

Crypto.RSA/Public/Get-PublicKey.ps1

@@ -0,0 +1,23 @@
+function Get-PublicKey {
+    [CmdletBinding()]
+    param (
+        [Parameter(Mandatory = $false, Position = 0 )]
+        [System.Security.Cryptography.RSACryptoServiceProvider]$cryptoServiceProvider
+    )
+
+    begin {
+        Write-Verbose "Cmdlet Get-PublicKey - Begin"
+    }
+
+    process {
+        Write-Verbose "Cmdlet Get-PublicKey - Process"
+        if ($cryptoServiceProvider -eq $null) {
+            $cryptoServiceProvider = [System.Security.Cryptography.RSACryptoServiceProvider]::new(2048)
+        }
+        Get-KeyString $cryptoServiceProvider.ExportParameters($false)
+    }
+
+    end {
+        Write-Verbose "Cmdlet Get-PublicKey - End"
+    }
+}

Tests/Crypto.RSA.Tests.ps1

@@ -9,6 +9,28 @@ Describe 'Crypto.RSA.Tests' {
             $keys.public | Should -Not -BeNullOrEmpty
             $keys.private | Should -Not -BeNullOrEmpty
         }
+
+        It "Generates private key - using the same csp" {
+            $csp = [System.Security.Cryptography.RSACryptoServiceProvider]::new(2048)
+            $keys = New-KeyPair $csp
+            Get-PrivateKey $csp | Should Be $keys.private
+        }
+
+        It "Generates private key - using different csp" {
+            $keys = New-KeyPair
+            Get-PrivateKey | Should Not Be $keys.private
+        }
+
+        It "Generates public key - using the same csp" {
+            $csp = [System.Security.Cryptography.RSACryptoServiceProvider]::new(2048)
+            $keys = New-KeyPair $csp
+            Get-PublicKey $csp | Should Be $keys.public
+        }
+
+        It "Generates public key - using different csp" {
+            $keys = New-KeyPair
+            Get-PublicKey | Should Not Be $keys.public
+        }
     }
 
     Context "String encryption - happy path" {