feat: Namespace.New ( Fixes #1135 )

Author: James Brundage

Types/Namespace/New.ps1

@@ -0,0 +1,72 @@
+<#
+.SYNOPSIS
+    Creates a new namespace object.
+.DESCRIPTION
+    Creates a new namespace object.  
+    
+    Namespaces can be created from anything.
+#>
+param()
+
+$myUnrolledArguments = @(@($args) | . { process { $_ }})
+
+$primitiveNamespaceTypes = [regex], [IO.FileInfo], [IO.DirectoryInfo], [uri], [Management.Automation.PSModuleInfo]
+
+
+if ($myUnrolledArguments.Length -eq 0) {
+    # Default behavior, returning nothing
+} else {
+    
+    # Make sure the namespace name is blank by default
+    $namespaceName = ''
+    for ($argumentIndex = 0; $argumentIndex -lt $myUnrolledArguments.Length; $argumentIndex++) {
+        $argument = $myUnrolledArguments[$argumentIndex]
+        $nextArgument = $myUnrolledArguments[$argumentIndex + 1]
+        
+        # If we have a string and the next argument is not a string, we have a namespace name
+        if ($argument -is [string] -and $nextArgument -and $nextArgument -isnot [string]) {
+            $namespaceName = $argument
+            $argumentIndex++
+            # and we can move to the next argument
+            $argument = $nextArgument
+        }
+
+        if ($null -eq $argument) { continue }   
+
+        # If the argument is a string (not followed by a non-string), treat it as a pattern
+        if ($argument -is [string]) {            
+            $newNamespace = [PSCustomObject]@{PSTypeName='Namespace'}
+            $newNamespace.Pattern = $argument            
+            $newNamespace
+        }         
+        elseif ($argument.GetType() -in $primitiveNamespaceTypes) {
+            $argumentShallowCopy = [PSObject]::new($argument)
+            $argumentShallowCopy.pstypenames.insert(0, 'Namespace')
+            if ($namespaceName) {
+                $newNamespace.psobject.Properties.Add([PSNoteProperty]::new('Name', $namespaceName),$true)
+            }
+            $argumentShallowCopy
+        }
+        else {
+            
+            $argumentDeepCopy = 
+                [Management.Automation.LanguagePrimitives]::ConvertPSObjectToType($argument, [PSObject], $true, $null, $true)
+            $argumentDeepCopy.pstypenames.insert(0, 'Namespace')
+
+            if ($argumentDeepCopy.Pattern -and $argumentDeepCopy.Pattern -isnot [regex]) {
+                $argumentDeepCopy.Pattern = [regex]::new($argumentDeepCopy.Pattern,'IgnoreCase,IgnorePatternWhitespace','00:00:00.01')
+            } elseif (-not $argumentDeepCopy.Pattern) {
+                # If we don't have a pattern, let's figure out a good default.                
+                if ($argumentDeepCopy.CommandPattern) {
+                    $argumentDeepCopy.Pattern = $argumentDeepCopy.CommandPattern
+                } elseif ($argumentDeepCopy.FilePattern) {
+                    $argumentDeepCopy.Pattern = $argumentDeepCopy.FilePattern
+                }
+            }
+            if ($namespaceName) {
+                $newNamespace.psobject.Properties.Add([PSNoteProperty]::new('Name', $namespaceName),$true)
+            }
+            $argumentDeepCopy            
+        }        
+    }        
+}