{-# LINE 1 "Bindings/APR/Lib.hsc" #-}

{-# LINE 2 "Bindings/APR/Lib.hsc" #-}

{-# LINE 3 "Bindings/APR/Lib.hsc" #-}

module Bindings.APR.Lib where
import Foreign.Ptr (Ptr,FunPtr,plusPtr)
import Foreign.Ptr (wordPtrToPtr,castPtrToFunPtr)
import Foreign.Storable
import Foreign.C.Types
import Foreign.C.String (CString,CStringLen,CWString,CWStringLen)
import Foreign.Marshal.Alloc (alloca)
import Foreign.Marshal.Array (peekArray,pokeArray)
import Data.Int
import Data.Word

{-# LINE 6 "Bindings/APR/Lib.hsc" #-}
import Bindings.APR
import Bindings.APR.ErrNo
import System.Posix.Types

c'HUGE_STRING_LEN = 8192
c'HUGE_STRING_LEN :: (Num a) => a

{-# LINE 11 "Bindings/APR/Lib.hsc" #-}

data C'apr_vformatter_buff_t = C'apr_vformatter_buff_t{
{-# LINE 13 "Bindings/APR/Lib.hsc" #-}

  c'apr_vformatter_buff_t'curpos :: Ptr CChar
{-# LINE 14 "Bindings/APR/Lib.hsc" #-}
,
  c'apr_vformatter_buff_t'endpos :: Ptr CChar
{-# LINE 15 "Bindings/APR/Lib.hsc" #-}

 } deriving (Eq,Show)
instance Storable C'apr_vformatter_buff_t where
  sizeOf _ = 8
  alignment = sizeOf
  peek p = do
    v0 <- peekByteOff p 0
    v1 <- peekByteOff p 4
    return $ C'apr_vformatter_buff_t v0 v1
  poke p (C'apr_vformatter_buff_t v0 v1) = do
    pokeByteOff p 0 v0
    pokeByteOff p 4 v1
    return ()

{-# LINE 16 "Bindings/APR/Lib.hsc" #-}

foreign import ccall "apr_filepath_name_get" c'apr_filepath_name_get
  :: Ptr CChar -> IO (Ptr CChar)
foreign import ccall "&apr_filepath_name_get" p'apr_filepath_name_get
  :: FunPtr (Ptr CChar -> IO (Ptr CChar))

{-# LINE 18 "Bindings/APR/Lib.hsc" #-}

foreign import ccall "inline_apr_killpg" c'apr_killpg
  :: CPid -> CInt -> IO CInt

{-# LINE 20 "Bindings/APR/Lib.hsc" #-}

-- apr_vformatter takes va_list...

foreign import ccall "apr_password_get" c'apr_password_get
  :: Ptr CChar -> Ptr CChar -> Ptr C'apr_size_t -> IO C'apr_status_t
foreign import ccall "&apr_password_get" p'apr_password_get
  :: FunPtr (Ptr CChar -> Ptr CChar -> Ptr C'apr_size_t -> IO C'apr_status_t)

{-# LINE 24 "Bindings/APR/Lib.hsc" #-}

foreign import ccall "inline_apr_isalnum" c'apr_isalnum
  :: CInt -> IO CInt

{-# LINE 26 "Bindings/APR/Lib.hsc" #-}
foreign import ccall "inline_apr_isalpha" c'apr_isalpha
  :: CInt -> IO CInt

{-# LINE 27 "Bindings/APR/Lib.hsc" #-}
foreign import ccall "inline_apr_isdigit" c'apr_isdigit
  :: CInt -> IO CInt

{-# LINE 28 "Bindings/APR/Lib.hsc" #-}
foreign import ccall "inline_apr_isgraph" c'apr_isgraph
  :: CInt -> IO CInt

{-# LINE 29 "Bindings/APR/Lib.hsc" #-}
foreign import ccall "inline_apr_islower" c'apr_islower
  :: CInt -> IO CInt

{-# LINE 30 "Bindings/APR/Lib.hsc" #-}
foreign import ccall "inline_apr_isascii" c'apr_isascii
  :: CInt -> IO CInt

{-# LINE 31 "Bindings/APR/Lib.hsc" #-}
foreign import ccall "inline_apr_isprint" c'apr_isprint
  :: CInt -> IO CInt

{-# LINE 32 "Bindings/APR/Lib.hsc" #-}
foreign import ccall "inline_apr_ispunct" c'apr_ispunct
  :: CInt -> IO CInt

{-# LINE 33 "Bindings/APR/Lib.hsc" #-}
foreign import ccall "inline_apr_isspace" c'apr_isspace
  :: CInt -> IO CInt

{-# LINE 34 "Bindings/APR/Lib.hsc" #-}
foreign import ccall "inline_apr_isupper" c'apr_isupper
  :: CInt -> IO CInt

{-# LINE 35 "Bindings/APR/Lib.hsc" #-}
foreign import ccall "inline_apr_isxdigit" c'apr_isxdigit
  :: CInt -> IO CInt

{-# LINE 36 "Bindings/APR/Lib.hsc" #-}
foreign import ccall "inline_apr_tolower" c'apr_tolower
  :: CInt -> IO CInt

{-# LINE 37 "Bindings/APR/Lib.hsc" #-}
foreign import ccall "inline_apr_toupper" c'apr_toupper
  :: CInt -> IO CInt

{-# LINE 38 "Bindings/APR/Lib.hsc" #-}