Haskell implementation of SASL