A simple screen locker written in haskell using SDL, SDL-ttf and PAM.