Bindings/APR/SHA1.hsc

   1 #include <bindings.dsl.h>
   2 #include <apr_sha1.h>
   3
   4 module Bindings.APR.SHA1 where
   5 #strict_import
   6 import Bindings.APR
   7
   8 #num APR_SHA1_DIGESTSIZE
   9
  10 #globalarray APR_SHA1_ID, CChar
  11
  12 #num APR_SHA1PW_IDLEN
  13
  14 #starttype struct apr_sha1_ctx_t
  15 #  array_field digest  , <apr_uint32_t>
  16 #  field       count_lo, <apr_uint32_t>
  17 #  field       count_hi, <apr_uint32_t>
  18 #  array_field data    , <apr_uint32_t>
  19 #  field       local   , CInt
  20 #stoptype
  21
  22 #ccall apr_sha1_base64       , Ptr CChar -> CInt -> Ptr CChar -> IO ()
  23 #ccall apr_sha1_init         , Ptr <apr_sha1_ctx_t> -> IO ()
  24 #ccall apr_sha1_update       , Ptr <apr_sha1_ctx_t> -> Ptr CChar -> CUInt -> IO ()
  25 #ccall apr_sha1_update_binary, Ptr <apr_sha1_ctx_t> -> Ptr CUInt -> CUInt -> IO ()
  26 #ccall apr_sha1_final        , Ptr CUChar -> Ptr <apr_sha1_ctx_t> -> IO ()