FileMaker Pro Custom Functions

// 06/05/09 - JH: Wrote this function. // This function tests a password that has been entered and returns it's Effective Bit Strength. Let ( [ passSize = Length ( value ) ; containsNumbers = Case ( IsEmpty ( Filter ( value ; "1234567890" ) ) = 0 ; 10 ) ; containsLowerCaseChars = Case ( IsEmpty ( Filter ( value ; "abcdefghijklmnopqrstuvwxyz" ) ) = 0 ; 26 ) ; containsUpperCaseChars = Case ( IsEmpty ( Filter ( value ; "ABCDEFGHIJKLMNOPQRSTUVWXYZ" ) ) = 0 ; 26 ) ; containsPunctuation = Case ( IsEmpty ( Filter ( value ; "`~!@#$%^&*()_+-={}|[]\:;'<>?,./" ) ) = 0 ; 31 ) ; charSet = ( containsNumbers + containsLowerCaseChars + containsUpperCaseChars + containsPunctuation ) ; bitLength = Log ( charSet ^ passSize ) / Log ( 2 ) ] ; Round ( bitLength ; 0 ) )
 Then copy & paste into FileMaker Advanced's Edit Custom Function window.