#44 refactoring tls.hs: make saslP, bindP