#!/usr/local/bin/miniscript

// String Split
// Splitting a string into a list of strings is an insanely useful thing to do.
// Alas, MiniScript doesn't have a standard intrinsic for that.  Perhaps it
// will one day.  Until then, here’s code that does the job.
split = function(s, delim=" ")
 result = []
 wordStart = 0
 sLen = s.len
 delimLen = delim.len
 i = 0
 while i < sLen
   if s[i:i+delimLen] == delim then
     result = result + [ s[wordStart:i] ]
     wordStart = i + delimLen
     i = wordStart
   else
     i = i + 1
   end if
 end while
return result + [ s[wordStart:i] ]
end function

hashes = split(File.open("/home/panda/Desktop/Miniscript/hashes").read, ",")
passwords = split(File.open("/home/panda/Desktop/Miniscript/passwords").read, " ")
uncracked = []
for hash in hashes
 i=0
 for password in passwords
   if password[password.indexOf(":")+1:] == hash[hash.indexOf(":")+1:] then
     print(hash[:hash.indexOf(":")]+":"+password[:password.indexOf(":")])
     i=1
     break
   end if
 end for
 if i == 0 then
   uncracked.push(hash)
 end if
end for
print(" ")
print("Uncracked hashes")
for uncrack in uncracked
 print(uncrack)
end for