-
-
Save stphnclysmth/6500300 to your computer and use it in GitHub Desktop.
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
#requires -version 3 | |
[CmdletBinding()] | |
param ( | |
[string] | |
$Path | |
) | |
function Get-MD5 { | |
param ( | |
[Parameter(Mandatory)] | |
[string] | |
$Path | |
) | |
# This Get-MD5 function sourced from: | |
# http://blogs.msdn.com/powershell/archive/2006/04/25/583225.aspx | |
$HashAlgorithm = New-Object -TypeName System.Security.Cryptography.MD5CryptoServiceProvider | |
$Stream = [System.IO.File]::OpenRead($Path) | |
try { | |
$HashByteArray = $HashAlgorithm.ComputeHash($Stream) | |
} finally { | |
$Stream.Dispose() | |
} | |
return [System.BitConverter]::ToString($HashByteArray).ToLowerInvariant() -replace '-','' | |
} | |
if (-not $Path) { | |
if ((Get-Location).Provider.Name -ne 'FileSystem') { | |
Write-Error 'Specify a file system path explcitly, or change the current location to a file system path.' | |
return | |
} | |
$Path = (Get-Location).ProviderPath | |
} | |
Get-ChildItem -Path $Path -Recurse -File | | |
Where-Object { $_.Length -gt 0 } | | |
Group-Object -Property Length | | |
Where-Object { $_.Count -gt 1 } | | |
ForEach-Object { | |
$_.Group | | |
ForEach-Object { | |
$_ | | |
Add-Member -MemberType NoteProperty -Name ContentHash -Value (Get-MD5 -Path $_.FullName) | |
} | |
$_.Group | | |
Group-Object -Property ContentHash | | |
Where-Object { $_.Count -gt 1 } | |
} |
Sign up for free
to join this conversation on GitHub.
Already have an account?
Sign in to comment