module MakeRegister:
Parameters: |
|
val register : ?scope:[< Eliom_common.scope ] ->
?options:Pages.options ->
?charset:string ->
?code:int ->
?content_type:string ->
?headers:Http_headers.t ->
?secure_session:bool ->
service:('get, 'post, [< Eliom_service.internal_service_kind ],
[< Eliom_service.suff ], 'gn, 'pn, [ `Registrable ], 'returnT)
Eliom_service.service ->
?error_handler:((string * exn) list -> Pages.page Lwt.t) ->
('get -> 'post -> Pages.page Lwt.t) -> unit
register service handler
will associate the
service
to the function handler
. The handler
function take
two parameters, the GET and POST parameters of the current HTTP
request, and should returns the corresponding page.
The optional parameter ~scope
is Eliom_common.global_scope
by
default, see the Eliom manual for detailled description .
The optional parameter ~options
is specific to each output
module, see the type description for more information.
The optional parameters ?charset
, ?code
, ?content_type
and
?headers
can be used to modify the HTTP answer sent by
Eliom. Use this with care.
The optional parameter ~secure_session
has no effect for scope
Eliom_common.global_scope
. With other scopes, the parameter is used
to force the session service table in which the handler
will be
registered. By default, the service is registred in the unsecure
session if the current request's protocol is http
, or in the
secure session if the protocol is https
. If set to false
(resp. true
) the handler
will be stored in the unsecure
(resp. secure) session. See the Eliom manual for an introduction
to .
The optional parameter ~error_handler
is used to specialize the
error page when actual parameters aren't compatible with the
expected type. The default error handler is
fun l -> raise (
Eliom_common.Eliom_Typing_Error
l)
.
val register_service : ?scope:[< Eliom_common.scope ] ->
?options:Pages.options ->
?charset:string ->
?code:int ->
?content_type:string ->
?headers:Http_headers.t ->
?secure_session:bool ->
?https:bool ->
?priority:int ->
path:Eliom_lib.Url.path ->
get_params:('get, [< Eliom_service.suff ] as 'a, 'gn)
Eliom_parameter.params_type ->
?error_handler:((string * exn) list -> Pages.page Lwt.t) ->
('get -> unit -> Pages.page Lwt.t) ->
('get, unit,
[> `Attached of
([> `Internal of [> `Service ] ], [> `Get ]) Eliom_service.a_s ],
'a, 'gn, unit, [< Eliom_service.registrable > `Registrable ], 'returnB)
Eliom_service.service
Eliom_service.Http.service
followed by register
.val register_coservice : ?scope:[< Eliom_common.scope ] ->
?options:Pages.options ->
?charset:string ->
?code:int ->
?content_type:string ->
?headers:Http_headers.t ->
?secure_session:bool ->
?name:string ->
?csrf_safe:bool ->
?csrf_scope:[< Eliom_common.user_scope ] ->
?csrf_secure:bool ->
?max_use:int ->
?timeout:float ->
?https:bool ->
fallback:(unit, unit,
[ `Attached of
([ `Internal of [ `Service ] ], [ `Get ]) Eliom_service.a_s ],
[ `WithoutSuffix ], unit, unit, [< Eliom_service.registrable ],
'returnT)
Eliom_service.service ->
get_params:('get, [ `WithoutSuffix ], 'gn) Eliom_parameter.params_type ->
?error_handler:((string * exn) list -> Pages.page Lwt.t) ->
('get -> unit -> Pages.page Lwt.t) ->
('get, unit,
[> `Attached of
([> `Internal of [> `Coservice ] ], [> `Get ]) Eliom_service.a_s ],
[ `WithoutSuffix ], 'gn, unit,
[< Eliom_service.registrable > `Registrable ], 'returnB)
Eliom_service.service
Eliom_service.Http.coservice
followed by register
.val register_coservice' : ?scope:[< Eliom_common.scope ] ->
?options:Pages.options ->
?charset:string ->
?code:int ->
?content_type:string ->
?headers:Http_headers.t ->
?secure_session:bool ->
?name:string ->
?csrf_safe:bool ->
?csrf_scope:[< Eliom_common.user_scope ] ->
?csrf_secure:bool ->
?max_use:int ->
?timeout:float ->
?https:bool ->
get_params:('get, [ `WithoutSuffix ], 'gn) Eliom_parameter.params_type ->
?error_handler:((string * exn) list -> Pages.page Lwt.t) ->
('get -> unit -> Pages.page Lwt.t) ->
('get, unit, [> `Nonattached of [> `Get ] Eliom_service.na_s ],
[ `WithoutSuffix ], 'gn, unit,
[< Eliom_service.registrable > `Registrable ], 'returnB)
Eliom_service.service
Eliom_service.Http.coservice'
followed by register
.val register_post_service : ?scope:[< Eliom_common.scope ] ->
?options:Pages.options ->
?charset:string ->
?code:int ->
?content_type:string ->
?headers:Http_headers.t ->
?secure_session:bool ->
?https:bool ->
?priority:int ->
fallback:('get, unit,
[ `Attached of
([ `Internal of [ `Coservice | `Service ] ], [ `Get ])
Eliom_service.a_s ],
[< Eliom_service.suff ] as 'a, 'gn, unit, [< `Registrable ],
'returnT)
Eliom_service.service ->
post_params:('post, [ `WithoutSuffix ], 'pn) Eliom_parameter.params_type ->
?error_handler:((string * exn) list -> Pages.page Lwt.t) ->
('get -> 'post -> Pages.page Lwt.t) ->
('get, 'post,
[> `Attached of
([> `Internal of [ `Coservice | `Service ] ], [> `Post ])
Eliom_service.a_s ],
'a, 'gn, 'pn, [< Eliom_service.registrable > `Registrable ], 'returnB)
Eliom_service.service
Eliom_service.Http.post_service
followed by register
.val register_post_coservice : ?scope:[< Eliom_common.scope ] ->
?options:Pages.options ->
?charset:string ->
?code:int ->
?content_type:string ->
?headers:Http_headers.t ->
?secure_session:bool ->
?name:string ->
?csrf_safe:bool ->
?csrf_scope:[< Eliom_common.user_scope ] ->
?csrf_secure:bool ->
?max_use:int ->
?timeout:float ->
?https:bool ->
fallback:('get, unit,
[ `Attached of
([ `Internal of [< `Coservice | `Service ] ], [ `Get ])
Eliom_service.a_s ],
[< Eliom_service.suff ] as 'a, 'gn, unit, [< `Registrable ],
'returnT)
Eliom_service.service ->
post_params:('post, [ `WithoutSuffix ], 'pn) Eliom_parameter.params_type ->
?error_handler:((string * exn) list -> Pages.page Lwt.t) ->
('get -> 'post -> Pages.page Lwt.t) ->
('get, 'post,
[> `Attached of
([> `Internal of [> `Coservice ] ], [> `Post ]) Eliom_service.a_s ],
'a, 'gn, 'pn, [< Eliom_service.registrable > `Registrable ], 'returnB)
Eliom_service.service
Eliom_service.Http.post_coservice
followed by register
.val register_post_coservice' : ?scope:[< Eliom_common.scope ] ->
?options:Pages.options ->
?charset:string ->
?code:int ->
?content_type:string ->
?headers:Http_headers.t ->
?secure_session:bool ->
?name:string ->
?csrf_safe:bool ->
?csrf_scope:[< Eliom_common.user_scope ] ->
?csrf_secure:bool ->
?max_use:int ->
?timeout:float ->
?keep_get_na_params:bool ->
?https:bool ->
post_params:('post, [ `WithoutSuffix ], 'pn) Eliom_parameter.params_type ->
?error_handler:((string * exn) list -> Pages.page Lwt.t) ->
(unit -> 'post -> Pages.page Lwt.t) ->
(unit, 'post, [> `Nonattached of [> `Post ] Eliom_service.na_s ],
[ `WithoutSuffix ], unit, 'pn,
[< Eliom_service.registrable > `Registrable ], 'returnB)
Eliom_service.service
Eliom_service.Http.post_coservice'
followed by register
.val register_put_service : ?scope:[< Eliom_common.scope ] ->
?options:Pages.options ->
?charset:string ->
?code:int ->
?content_type:string ->
?headers:Http_headers.t ->
?secure_session:bool ->
?https:bool ->
?priority:int ->
path:Eliom_lib.Url.path ->
get_params:('get, [< Eliom_service.suff ] as 'a, 'gn)
Eliom_parameter.params_type ->
?error_handler:((string * exn) list -> Pages.page Lwt.t) ->
('get -> Eliom_parameter.raw_post_data -> Pages.page Lwt.t) ->
('get, Eliom_parameter.raw_post_data,
[> `Attached of
([> `Internal of [> `Service ] ], [> `Put ]) Eliom_service.a_s ],
'a, 'gn, Eliom_parameter.no_param_name,
[< Eliom_service.registrable > `Registrable ], 'returnB)
Eliom_service.service
Eliom_service.Http.put_service
followed by register
.val register_put_coservice : ?scope:[< Eliom_common.scope ] ->
?options:Pages.options ->
?charset:string ->
?code:int ->
?content_type:string ->
?headers:Http_headers.t ->
?secure_session:bool ->
?name:string ->
?csrf_safe:bool ->
?csrf_scope:[< Eliom_common.user_scope ] ->
?csrf_secure:bool ->
?max_use:int ->
?timeout:float ->
?https:bool ->
fallback:(unit, Eliom_parameter.raw_post_data,
[ `Attached of
([ `Internal of [ `Service ] ], [ `Put ]) Eliom_service.a_s ],
[ `WithoutSuffix ], unit, Eliom_parameter.no_param_name,
[< Eliom_service.registrable ], 'returnT)
Eliom_service.service ->
get_params:('get, [ `WithoutSuffix ], 'gn) Eliom_parameter.params_type ->
?error_handler:((string * exn) list -> Pages.page Lwt.t) ->
('get -> Eliom_parameter.raw_post_data -> Pages.page Lwt.t) ->
('get, Eliom_parameter.raw_post_data,
[> `Attached of
([> `Internal of [> `Coservice ] ], [> `Put ]) Eliom_service.a_s ],
[ `WithoutSuffix ], 'gn, Eliom_parameter.no_param_name,
[< Eliom_service.registrable > `Registrable ], 'returnB)
Eliom_service.service
Eliom_service.Http.put_coservice
followed by register
.val register_put_coservice' : ?scope:[< Eliom_common.scope ] ->
?options:Pages.options ->
?charset:string ->
?code:int ->
?content_type:string ->
?headers:Http_headers.t ->
?secure_session:bool ->
?name:string ->
?csrf_safe:bool ->
?csrf_scope:[< Eliom_common.user_scope ] ->
?csrf_secure:bool ->
?max_use:int ->
?timeout:float ->
?https:bool ->
get_params:('get, [ `WithoutSuffix ], 'gn) Eliom_parameter.params_type ->
?error_handler:((string * exn) list -> Pages.page Lwt.t) ->
('get -> Eliom_parameter.raw_post_data -> Pages.page Lwt.t) ->
('get, Eliom_parameter.raw_post_data,
[> `Nonattached of [> `Put ] Eliom_service.na_s ], [ `WithoutSuffix ], 'gn,
Eliom_parameter.no_param_name,
[< Eliom_service.registrable > `Registrable ], 'returnB)
Eliom_service.service
Eliom_service.Http.put_coservice'
followed by register
.val register_delete_service : ?scope:[< Eliom_common.scope ] ->
?options:Pages.options ->
?charset:string ->
?code:int ->
?content_type:string ->
?headers:Http_headers.t ->
?secure_session:bool ->
?https:bool ->
?priority:int ->
path:Eliom_lib.Url.path ->
get_params:('get, [< Eliom_service.suff ] as 'a, 'gn)
Eliom_parameter.params_type ->
?error_handler:((string * exn) list -> Pages.page Lwt.t) ->
('get -> Eliom_parameter.raw_post_data -> Pages.page Lwt.t) ->
('get, Eliom_parameter.raw_post_data,
[> `Attached of
([> `Internal of [> `Service ] ], [> `Delete ]) Eliom_service.a_s ],
'a, 'gn, Eliom_parameter.no_param_name,
[< Eliom_service.registrable > `Registrable ], 'returnB)
Eliom_service.service
Eliom_service.Http.delete_service
followed by register
.val register_delete_coservice : ?scope:[< Eliom_common.scope ] ->
?options:Pages.options ->
?charset:string ->
?code:int ->
?content_type:string ->
?headers:Http_headers.t ->
?secure_session:bool ->
?name:string ->
?csrf_safe:bool ->
?csrf_scope:[< Eliom_common.user_scope ] ->
?csrf_secure:bool ->
?max_use:int ->
?timeout:float ->
?https:bool ->
fallback:(unit, Eliom_parameter.raw_post_data,
[ `Attached of
([ `Internal of [ `Service ] ], [ `Delete ]) Eliom_service.a_s ],
[ `WithoutSuffix ], unit, Eliom_parameter.no_param_name,
[< Eliom_service.registrable ], 'returnT)
Eliom_service.service ->
get_params:('get, [ `WithoutSuffix ], 'gn) Eliom_parameter.params_type ->
?error_handler:((string * exn) list -> Pages.page Lwt.t) ->
('get -> Eliom_parameter.raw_post_data -> Pages.page Lwt.t) ->
('get, Eliom_parameter.raw_post_data,
[> `Attached of
([> `Internal of [> `Coservice ] ], [> `Delete ]) Eliom_service.a_s ],
[ `WithoutSuffix ], 'gn, Eliom_parameter.no_param_name,
[< Eliom_service.registrable > `Registrable ], 'returnB)
Eliom_service.service
Eliom_service.Http.delete_coservice
followed by register
.val register_delete_coservice' : ?scope:[< Eliom_common.scope ] ->
?options:Pages.options ->
?charset:string ->
?code:int ->
?content_type:string ->
?headers:Http_headers.t ->
?secure_session:bool ->
?name:string ->
?csrf_safe:bool ->
?csrf_scope:[< Eliom_common.user_scope ] ->
?csrf_secure:bool ->
?max_use:int ->
?timeout:float ->
?https:bool ->
get_params:('get, [ `WithoutSuffix ], 'gn) Eliom_parameter.params_type ->
?error_handler:((string * exn) list -> Pages.page Lwt.t) ->
('get -> Eliom_parameter.raw_post_data -> Pages.page Lwt.t) ->
('get, Eliom_parameter.raw_post_data,
[> `Nonattached of [> `Delete ] Eliom_service.na_s ], [ `WithoutSuffix ],
'gn, Eliom_parameter.no_param_name,
[< Eliom_service.registrable > `Registrable ], 'returnB)
Eliom_service.service
Eliom_service.Http.delete_coservice'
followed by register
.val send : ?options:Pages.options ->
?charset:string ->
?code:int ->
?content_type:string ->
?headers:Http_headers.t -> Pages.page -> Pages.result Lwt.t
send page
build the HTTP frame corresponding to
page
. This may be used for example in an service handler
registered with Eliom_registration.Any.register
or when building a
custom output module.