#include #include module Bindings.APR.MD5 where #strict_import import Bindings.APR import Bindings.APR.ErrNo import Bindings.APR.XLate #num APR_MD5_DIGESTSIZE #starttype struct apr_md5_ctx_t # array_field state , # array_field count , # array_field buffer, CUChar # field xlate , Ptr #stoptype #ccall apr_md5_init , Ptr -> IO #ccall apr_md5_set_xlate, Ptr -> Ptr -> IO #ccall apr_md5_update , Ptr -> Ptr () -> -> IO #ccall apr_md5_final , Ptr CUChar -> Ptr -> IO #ccall apr_md5 , Ptr CUChar -> Ptr () -> -> IO #ccall apr_md5_encode , Ptr CChar -> Ptr CChar -> Ptr CChar -> -> IO #ccall apr_password_validate, Ptr CChar -> Ptr CChar -> IO