{-# LANGUAGE ForeignFunctionInterface #-}

#include <bindings.dsl.h>
#include <nettle/blowfish.h>

module Bindings.Nettle.Cipher.Blowfish where
#strict_import

#num BLOWFISH_BLOCK_SIZE
#num BLOWFISH_MIN_KEY_SIZE
#num BLOWFISH_MAX_KEY_SIZE
#num BLOWFISH_KEY_SIZE

#starttype struct blowfish_ctx
#stoptype

#ccall blowfish_set_key , Ptr <struct blowfish_ctx> -> CUInt -> Ptr CUChar -> IO ()
#ccall blowfish_encrypt , Ptr <struct blowfish_ctx> -> CUInt -> Ptr CUChar -> Ptr CUChar -> IO ()
#ccall blowfish_decrypt , Ptr <struct blowfish_ctx> -> CUInt -> Ptr CUChar -> Ptr CUChar -> IO ()