Bindings/APR/URI.hsc

   1 #include <bindings.dsl.h>
   2 #include <apr_uri.h>
   3
   4 module Bindings.APR.URI where
   5 #strict_import
   6 import Bindings.APR.ErrNo
   7 import Bindings.APR.Network.IO
   8 import Bindings.APR.Pools
   9
  10 #num APR_URI_FTP_DEFAULT_PORT
  11 #num APR_URI_SSH_DEFAULT_PORT
  12 #num APR_URI_TELNET_DEFAULT_PORT
  13 #num APR_URI_GOPHER_DEFAULT_PORT
  14 #num APR_URI_HTTP_DEFAULT_PORT
  15 #num APR_URI_POP_DEFAULT_PORT
  16 #num APR_URI_NNTP_DEFAULT_PORT
  17 #num APR_URI_IMAP_DEFAULT_PORT
  18 #num APR_URI_PROSPERO_DEFAULT_PORT
  19 #num APR_URI_WAIS_DEFAULT_PORT
  20 #num APR_URI_LDAP_DEFAULT_PORT
  21 #num APR_URI_HTTPS_DEFAULT_PORT
  22 #num APR_URI_RTSP_DEFAULT_PORT
  23 #num APR_URI_SNEWS_DEFAULT_PORT
  24 #num APR_URI_ACAP_DEFAULT_PORT
  25 #num APR_URI_NFS_DEFAULT_PORT
  26 #num APR_URI_TIP_DEFAULT_PORT
  27 #num APR_URI_SIP_DEFAULT_PORT
  28
  29 #num APR_URI_UNP_OMITSITEPART
  30 #num APR_URI_UNP_OMITUSER
  31 #num APR_URI_UNP_OMITPASSWORD
  32 #num APR_URI_UNP_OMITUSERINFO
  33 #num APR_URI_UNP_REVEALPASSWORD
  34 #num APR_URI_UNP_OMITPATHINFO
  35 #num APR_URI_UNP_OMITQUERY
  36
  37 #starttype struct apr_uri_t
  38 #  field scheme  , Ptr CChar
  39 #  field hostinfo, Ptr CChar
  40 #  field user    , Ptr CChar
  41 #  field password, Ptr CChar
  42 #  field hostname, Ptr CChar
  43 #  field port_str, Ptr CChar
  44 #  field path    , Ptr CChar
  45 #  field query   , Ptr CChar
  46 #  field fragment, Ptr CChar
  47 -- FIXME: struct hostent
  48 -- #  field hostent , Ptr <hostent>
  49 #  field port    , <apr_port_t>
  50 -- FIXME: bit fields
  51 -- #  field is_initialized, CUInt
  52 -- #  field dns_looked_up , CUInt
  53 -- #  field dns_resolved  , CUInt
  54 #stoptype
  55
  56 #ccall apr_uri_port_of_scheme, Ptr CChar -> IO <apr_port_t>
  57 #ccall apr_uri_unparse       , Ptr <apr_pool_t> -> Ptr <apr_uri_t> -> CUInt -> IO (Ptr CChar)
  58 #ccall apr_uri_parse         , Ptr <apr_pool_t> -> Ptr CChar -> Ptr <apr_uri_t> -> IO <apr_status_t>
  59 #ccall apr_uri_parse_hostinfo, Ptr <apr_pool_t> -> Ptr CChar -> Ptr <apr_uri_t> -> IO <apr_status_t>