Initial commit

Author: alan-null

Crypto.AES/Crypto.AES.psd1

@@ -0,0 +1,17 @@
+
+@{
+    RootModule        = 'Crypto.AES.psm1'
+    ModuleVersion     = '1.0.0'
+    GUID              = '11dfc05f-b1e6-4ff9-87fc-7ff4dca7457e'
+    Author            = 'Alan Plocieniak'
+    CompanyName       = 'Alan Plocieniak'
+    Copyright         = '(c) 2022 Alan Plocieniak. All rights reserved.'
+    Description       = 'PowerShell module for cryptography (AES)'
+    PowerShellVersion = '5.0'
+    FunctionsToExport = '*'
+    ScriptsToProcess  = @('Public\Classes\IVGenerator.ps1')
+    PrivateData       = @{
+        PSData = @{
+        }
+    }
+}

Crypto.AES/Crypto.AES.psm1

@@ -0,0 +1,14 @@
+#Get public and private function definition files.
+$Public = @( Get-ChildItem -Path $PSScriptRoot\Public -Recurse -Filter *.ps1 -ErrorAction SilentlyContinue )
+$Private = @( Get-ChildItem -Path $PSScriptRoot\Private -Recurse -Filter *.ps1 -ErrorAction SilentlyContinue )
+
+#Dot source the files
+Foreach ($import in @($Public + $Private)) {
+    try {
+        . $import.fullname
+    }
+    catch {
+        Write-Error -Message "Failed to import function $($import.fullname): $_"
+    }
+}
+Export-ModuleMember -Function $Public.Basename

Crypto.AES/Public/Classes/IVGenerator.ps1

@@ -0,0 +1,11 @@
+class IVGenerator {
+    [System.Security.Cryptography.AesManaged]$AesManaged
+    IVGenerator() {
+        $this.AesManaged = New-AesManagedObject
+    }
+
+    [byte[]] GenerateIV () {
+        $this.AesManaged.GenerateIV()
+        return $this.AesManaged.IV
+    }
+}

Crypto.AES/Public/New-AesKey.ps1

@@ -0,0 +1,34 @@
+enum AesKeyFormat {
+    String
+    ByteArray
+}
+
+function New-AesKey {
+    [CmdletBinding()]
+    param (
+        [Parameter(Mandatory = $false, Position = 0 )]
+        [AesKeyFormat]$Format = [AesKeyFormat]::String
+    )
+
+    begin {
+        Write-Verbose "Cmdlet New-AesKey - Begin"
+    }
+
+    process {
+        Write-Verbose "Cmdlet New-AesKey - Process"
+        $aes = New-AesManagedObject
+        $aes.GenerateKey()
+
+
+        if ($Format -eq [AesKeyFormat]::String) {
+            [System.Convert]::ToBase64String($aes.Key)
+        }
+        elseif ($Format -eq [AesKeyFormat]::ByteArray) {
+            $aes.Key
+        }
+    }
+
+    end {
+        Write-Verbose "Cmdlet New-AesKey - End"
+    }
+}

Crypto.AES/Public/New-AesManagedObject.ps1

@@ -0,0 +1,51 @@
+function New-AesManagedObject {
+    [CmdletBinding()]
+    param (
+        [Parameter(Mandatory = $false, Position = 0 )]
+        $Key,
+        [Parameter(Mandatory = $false, Position = 1 )]
+        $InitializationVector,
+        [Parameter(Mandatory = $false, Position = 2 )]
+        [System.Security.Cryptography.CipherMode]$Mode = [System.Security.Cryptography.CipherMode]::CBC,
+        [Parameter(Mandatory = $false, Position = 3 )]
+        [System.Security.Cryptography.PaddingMode]$Padding = [System.Security.Cryptography.PaddingMode]::Zeros,
+        [Parameter(Mandatory = $false, Position = 4 )]
+        [int]$BlockSize = 128,
+        [Parameter(Mandatory = $false, Position = 5 )]
+        [int]$KeySize = 256
+    )
+
+    begin {
+        Write-Verbose "Cmdlet New-AesManagedObject - Begin"
+    }
+
+    process {
+        Write-Verbose "Cmdlet New-AesManagedObject - Process"
+        $aesManaged = New-Object "System.Security.Cryptography.AesManaged"
+        $aesManaged.Mode = $Mode
+        $aesManaged.Padding = $Padding
+        $aesManaged.BlockSize = $BlockSize
+        $aesManaged.KeySize = $KeySize
+        if ($InitializationVector) {
+            if ($InitializationVector.getType().Name -eq "String") {
+                $aesManaged.IV = [System.Convert]::FromBase64String($InitializationVector)
+            }
+            else {
+                $aesManaged.IV = $InitializationVector
+            }
+        }
+        if ($Key) {
+            if ($Key.getType().Name -eq "String") {
+                $aesManaged.Key = [System.Convert]::FromBase64String($Key)
+            }
+            else {
+                $aesManaged.Key = $Key
+            }
+        }
+        $aesManaged
+    }
+
+    end {
+        Write-Verbose "Cmdlet New-AesManagedObject - End"
+    }
+}

README.md

@@ -0,0 +1,3 @@
+# Crypto.AES
+
+This is a PowerShell module for cryptography (RSA).

Tests/Crypto.AES.Tests.ps1

@@ -0,0 +1,30 @@
+Clear-Host
+Import-Module -Name Pester -Force
+Import-Module .\Crypto.AES\Crypto.AES.psm1 -Force
+
+Describe 'Crypto.AES.Tests' {
+    Context "AES key generation" {
+        It "Should return key as string - default" {
+            New-AesKey | Should -BeOfType [String]
+        }
+        It "Should return key as string - explicit" {
+            New-AesKey -Format String | Should -BeOfType [String]
+        }
+        It "Should return key as Object[]- explicit" {
+            (New-AesKey -Format ByteArray) -is [System.Object[]] | Should -BeTrue
+        }
+    }
+
+    Context "IVGenerator" {
+        $obj = [IVGenerator]::new()
+        $v1 = $obj.GenerateIV()
+        $v2 = $obj.GenerateIV()
+
+        It "Should return valid type" {
+            $v1 -is [System.Byte[]] | Should -BeTrue
+        }
+        It "Should generate unique keys" {
+            $v1 | Should -Not -Be $v2
+        }
+    }
+}