Added new functions

Author: adbertram

ActiveDirectory/Get-Empty-Groups.ps1

@@ -0,0 +1,35 @@
+#Requires -Version 4 -Module ActiveDirectory
+
+function Get-EmptyGroup
+{
+	<#
+	.SYNOPSIS
+		This function queries the Active Directory domain the initiaing computer is in for all groups that have no members. 
+		This is common when attempting to find groups that can be removed.
+	
+		This does not include default AD groups like Domain Computers, Domain Users, etc.
+	
+	.EXAMPLE
+		PS> Get-EmptyGroup
+	
+		
+	#>
+	[OutputType([pscustomobject])]
+	[CmdletBinding()]
+	param ()
+	begin
+	{
+		$ErrorActionPreference = 'Stop'
+	}
+	process
+	{
+		try
+		{
+			@(Get-ADGroup -Filter * -Properties isCriticalSystemObject,Members).where({ (-not $_.isCriticalSystemObject) -and ($_.Members.Count -eq 0) })
+		}
+		catch
+		{
+			$PSCmdlet.ThrowTerminatingError($_)
+		}
+	}
+}

ActiveDirectory/Get-EmptyGroup.ps1

@@ -0,0 +1,40 @@
+function Get-FunctionDefaultParameter
+{
+	<#
+	.SYNOPSIS
+	This is a function that will find all of the default parameter names and values from a given function.
+	
+	.EXAMPLE
+	PS> Get-FunctionDefaultParameter -FunctionName Get-Something
+	
+	.PARAMETER FuntionName
+	A mandatory string parameter representing the name of the function to find default parameters to.
+	
+	#>
+	[CmdletBinding()]
+	[OutputType([hashtable])]
+	param
+	(
+		[Parameter(Mandatory)]
+		[ValidateNotNullOrEmpty()]
+		[string]$FunctionName	
+	)
+	try
+	{
+		$ast = (Get-Command $FunctionName).ScriptBlock.Ast
+		
+		$select = @{ n = 'Name'; e = { $_.Name.VariablePath.UserPath } },
+		@{ n = 'Value'; e = { $_.DefaultValue.Extent.Text -replace "`"|'" } }
+		
+		$ht = @{}
+		@($ast.FindAll({ $args[0] -is [System.Management.Automation.Language.ParameterAst] }, $true) | Where-Object { $_.DefaultValue } | Select-Object $select).foreach({
+			$ht[$_.Name] = $_.Value	
+			})
+		$ht
+		
+	}
+	catch
+	{
+		Write-Error -Message $_.Exception.Message
+	}
+}