The apache-md5 package

[Tags:benchmark, bsd3, library, test]

Haskell implementation of Apache HTTP server specific MD5 digest algorithm that uses OpenSSL MD5() function.

README and ChangeLog can be found in source code package and on GitHub:

[Skip to Readme]


Change log
Dependencies base (==4.*), bytestring (==0.10.*) [details]
License BSD3
Copyright (c) 2009, 2010, 2012, 2013 Peter Trško
Author Peter Trško <>
Stability Unknown
Category Data, Cryptography
Source repository head: git clone git://
this: git clone git:// v0.5.0.1)
Uploaded Sat Jul 27 08:56:31 UTC 2013 by PeterTrsko
Distributions NixOS:
Downloads 1313 total (23 in the last 30 days)
1 []
Status Docs uploaded by user
Build status unknown [no reports yet]




pedanticPass additional warning flags including -Werror to GHC during compilation.DisabledAutomatic

Use -f <flag> to enable a flag, or -f -<flag> to disable that flag. More info


Maintainer's Corner

For package maintainers and hackage trustees

Readme for apache-md5

Readme for apache-md5-

Apache MD5


Haskell implementation of Apache specific MD5 digest algorithm that uses OpenSSL MD5.


Stable releases with API documentation are available on Hackage.


Requires OpenSSL library with header files. On Debian and Ubuntu Linux it's provided by libssl-dev package that can be installed using apt-get:

$ apt-get install libssl-dev

For more see apt-get(8) manual page or e.g. Ubuntu Documentation: AptGet Howto.

After that just use cabal-install as you would normally do. For details see HaskellWiki: How to install a Cabal package.


Create htpasswd like entry and print it to stdout:

module Main (main)

import Control.Applicative ((<$>))
import System.Environment (getArgs, getProgName)
import System.Exit (exitFailure)
import System.IO (hPutStrLn, stderr)

import Control.Monad.Random (evalRandIO, getRandomRs)
    -- MonadRandom package
import Data.ByteString (ByteString)
import qualified Data.ByteString as BS (index, pack)
import qualified Data.ByteString.Char8 as C8 (concat, pack, putStrLn, singleton)
    -- bytestring package
import Data.Digest.ApacheMD5 (alpha64, apacheMD5)

htpasswdEntry :: String -> String -> ByteString -> ByteString
htpasswdEntry username password salt = C8.concat
    [ C8.pack username
    , C8.pack ":$apr1$"
    , salt
    , C8.singleton '$'
    , apacheMD5 (C8.pack password) salt

genSalt :: IO ByteString
genSalt = evalRandIO
    $ BS.pack . map (BS.index alpha64) . take 8 <$> getRandomRs (0, 63)

main :: IO ()
main = do
    args <- getArgs
    progName <- getProgName
    case args of
        [userName, password] ->
            genSalt >>= C8.putStrLn . htpasswdEntry userName password
        _ -> do
            hPutStrLn stderr $ "Usage: " ++ progName ++ " USER_NAME PASSWORD"

Compiling and running above example:

$ ghc -Wall example.hs
[1 of 1] Compiling Main             ( example.hs, example.o )
Linking example ...
$ ./example
$ ./example foo 123456

Unit Tests

Requires htpasswd command line utility installed. On Debian and Ubuntu Linux it is provided by apache2-utils package that can be installed using apt-get:

$ apt-get install apache2-utils

For more see apt-get(8) manual page or e.g. Ubuntu Documentation: AptGet Howto.

To run tests use command similar to this:

$ cabal configure --enable-tests && cabal build && cabal test


Contributions, pull requests and bug reports are welcome! Please don't be afraid to contact author using GitHub or by e-mail (see .cabal file for that).