PBS fucked around with this message at 03:33 on Aug 16, 2018

# File Browser Dialog
Add-Type -AssemblyName System.Windows.Forms
$FileBrowser = New-Object System.Windows.Forms.OpenFileDialog -Property @{ InitialDirectory = [Environment]::GetFolderPath('Desktop') }
$null = $FileBrowser.ShowDialog()

# Create output file name, and remove existing file with that name
$filename,$ext1 = $FileBrowser.FileName.split('.')
$hashfile = $filename+'.hash'

Remove-Item -Path $hashfile

foreach($line in [System.IO.File]::ReadLines($FileBrowser.FileName))
{
       $line=$line.ToUpper()
       $hasher = New-Object -TypeName "System.Security.Cryptography.SHA256CryptoServiceProvider"
       $encoding = [System.Text.Encoding]::UTF8
       $hash = ($hasher.ComputeHash($encoding.GetBytes($line)) | % {
            "{0:X2}" -f $_
        }) -join ""
       echo $hash | Out-File -FilePath $hashfile -Append
}

<#
    Powershell to hash email strings to SHA256
    This Will accept any file as input 
    *** format must be single email address per line ***
    Email addresses are converted to uppercase before hashing
#>

# File Browser Dialog
Add-Type -AssemblyName System.Windows.Forms
$FileBrowser = New-Object System.Windows.Forms.OpenFileDialog -Property @{ InitialDirectory = [Environment]::GetFolderPath('Desktop') }
$null = $FileBrowser.ShowDialog()
# Create output file name, and remove existing file with that name
$filename,$ext1 = $FileBrowser.FileName.split('.')
$hashfile = $filename+'.hash'

if (Test-Path -Path $hashfile) {
    Remove-Item -Path $hashfile
}

$hashList = New-Object System.Collections.Generic.List[System.String]
$hasher = [System.Security.Cryptography.HashAlgorithm]::Create('sha256')
$encoding = [System.Text.Encoding]::UTF8
$count = 0

#Hash each line, and add to hashList array
foreach($line in [System.IO.File]::ReadLines($FileBrowser.FileName))
{
       $line=$line.ToUpper()
       $hash = ($hasher.ComputeHash($encoding.GetBytes($line)))
       $hashString = [System.BitConverter]::ToString($hash).Replace('-','')
       $hashList.Add($hashString)
}


$hashList | Out-File -FilePath $hashfile -Append

####
#Cut out the GPG stuff, no comments there
###

PBS fucked around with this message at 17:28 on Apr 27, 2019

from tkinter.filedialog import askopenfilename
import time
import hashlib
import os.path

filename = askopenfilename()
starttime = time.time()

split_filename = filename.split('.')
hash_filename = split_filename[0] + '.hash'

if os.path.isfile(hash_filename):
    os.remove(hash_filename)

with open(filename, 'r', encoding='utf-8') as email_list:

    with open(hash_filename, 'w', encoding='utf-8') as hash_list:

        for line in email_list:
            line = line.strip().upper().encode('utf-8')
            hash = hashlib.sha256(line).hexdigest()
            hash_list.write(hash + '\n')

endtime = time.time()
totaltime = endtime - starttime
print(f'Total Time: {totaltime} Seconds')

PBS fucked around with this message at 18:19 on Apr 27, 2019