Eliommod_cookies (p.eliom.12.1.0.doc.eliom.server.Eliommod

Sourceval cookieset_to_json : Ocsigen_cookie_map.t -> string

Sourceval make_new_session_id : unit -> string

val get_cookie_info : 
  float ->
  Eliom_common.sitedata ->
  string Eliom_common.Full_state_name_table.t ->
  string Eliom_common.Full_state_name_table.t ->
  string Eliom_common.Full_state_name_table.t ->
  (string Eliom_common.Full_state_name_table.t
   * string Eliom_common.Full_state_name_table.t
   * string Eliom_common.Full_state_name_table.t) ->
  (((string option
     * Eliom_common.tables Eliom_common.one_service_cookie_info
         Eliom_common.session_cookie
         ref)
      Eliom_common.Full_state_name_table.t
      ref
    * (string option
       * Eliom_common.one_data_cookie_info Eliom_common.session_cookie ref)
        Lazy.t
        Eliom_common.Full_state_name_table.t
        ref
    * ((string
        * Eliom_common.timeout
        * float option
        * Eliom_common.perssessgrp option)
         option
       * Eliom_common.one_persistent_cookie_info Eliom_common.session_cookie
           ref)
        Lwt.t
        Lazy.t
        Eliom_common.Full_state_name_table.t
        ref)
   * ((string option
       * Eliom_common.tables Eliom_common.one_service_cookie_info
           Eliom_common.session_cookie
           ref)
        Eliom_common.Full_state_name_table.t
        ref
      * (string option
         * Eliom_common.one_data_cookie_info Eliom_common.session_cookie ref)
          Lazy.t
          Eliom_common.Full_state_name_table.t
          ref
      * ((string
          * Eliom_common.timeout
          * float option
          * Eliom_common.perssessgrp option)
           option
         * Eliom_common.one_persistent_cookie_info Eliom_common.session_cookie
             ref)
          Lwt.t
          Lazy.t
          Eliom_common.Full_state_name_table.t
          ref))
  * Eliom_common.Full_state_name_table.key list

Source

val new_service_cookie_table : 
  unit ->
  Eliom_common.tables Eliom_common.Service_cookie.t
    Eliom_common.SessionCookies.t

Source

val new_data_cookie_table : 
  unit ->
  Eliom_common.Data_cookie.t Eliom_common.SessionCookies.t

Source

val compute_session_cookies_to_send : 
  Eliom_common.sitedata ->
  (((string option
     * Eliom_common.tables Eliom_common.one_service_cookie_info
         Eliom_common.session_cookie
         ref)
      Eliom_common.Full_state_name_table.t
      ref
    * (string option
       * Eliom_common.one_data_cookie_info Eliom_common.session_cookie ref)
        Lazy.t
        Eliom_common.Full_state_name_table.t
        ref
    * ((string
        * Eliom_common.timeout
        * float option
        * Eliom_common.perssessgrp option)
         option
       * Eliom_common.one_persistent_cookie_info Eliom_common.session_cookie
           ref)
        Lwt.t
        Lazy.t
        Eliom_common.Full_state_name_table.t
        ref)
   * ((string option
       * Eliom_common.tables Eliom_common.one_service_cookie_info
           Eliom_common.session_cookie
           ref)
        Eliom_common.Full_state_name_table.t
        ref
      * (string option
         * Eliom_common.one_data_cookie_info Eliom_common.session_cookie ref)
          Lazy.t
          Eliom_common.Full_state_name_table.t
          ref
      * ((string
          * Eliom_common.timeout
          * float option
          * Eliom_common.perssessgrp option)
           option
         * Eliom_common.one_persistent_cookie_info Eliom_common.session_cookie
             ref)
          Lwt.t
          Lazy.t
          Eliom_common.Full_state_name_table.t
          ref)) ->
  Ocsigen_cookie_map.t ->
  Ocsigen_cookie_map.t Lwt.t

Source

val compute_cookies_to_send : 
  Eliom_common.sitedata ->
  (((string option
     * Eliom_common.tables Eliom_common.one_service_cookie_info
         Eliom_common.session_cookie
         ref)
      Eliom_common.Full_state_name_table.t
      ref
    * (string option
       * Eliom_common.one_data_cookie_info Eliom_common.session_cookie ref)
        Lazy.t
        Eliom_common.Full_state_name_table.t
        ref
    * ((string
        * Eliom_common.timeout
        * float option
        * Eliom_common.perssessgrp option)
         option
       * Eliom_common.one_persistent_cookie_info Eliom_common.session_cookie
           ref)
        Lwt.t
        Lazy.t
        Eliom_common.Full_state_name_table.t
        ref)
   * ((string option
       * Eliom_common.tables Eliom_common.one_service_cookie_info
           Eliom_common.session_cookie
           ref)
        Eliom_common.Full_state_name_table.t
        ref
      * (string option
         * Eliom_common.one_data_cookie_info Eliom_common.session_cookie ref)
          Lazy.t
          Eliom_common.Full_state_name_table.t
          ref
      * ((string
          * Eliom_common.timeout
          * float option
          * Eliom_common.perssessgrp option)
           option
         * Eliom_common.one_persistent_cookie_info Eliom_common.session_cookie
             ref)
          Lwt.t
          Lazy.t
          Eliom_common.Full_state_name_table.t
          ref)) ->
  Ocsigen_cookie_map.t ->
  Ocsigen_cookie_map.t Lwt.t

Source

val compute_new_ri_cookies : 
  float ->
  string list ->
  string Ocsigen_cookie_map.Map_inner.t ->
  (((string option
     * Eliom_common.tables Eliom_common.one_service_cookie_info
         Eliom_common.session_cookie
         ref)
      Eliom_common.Full_state_name_table.t
      ref
    * (string option
       * Eliom_common.one_data_cookie_info Eliom_common.session_cookie ref)
        Lazy.t
        Eliom_common.Full_state_name_table.t
        ref
    * ((string
        * Eliom_common.timeout
        * float option
        * Eliom_common.perssessgrp option)
         option
       * Eliom_common.one_persistent_cookie_info Eliom_common.session_cookie
           ref)
        Lwt.t
        Lazy.t
        Eliom_common.Full_state_name_table.t
        ref)
   * ((string option
       * Eliom_common.tables Eliom_common.one_service_cookie_info
           Eliom_common.session_cookie
           ref)
        Eliom_common.Full_state_name_table.t
        ref
      * (string option
         * Eliom_common.one_data_cookie_info Eliom_common.session_cookie ref)
          Lazy.t
          Eliom_common.Full_state_name_table.t
          ref
      * ((string
          * Eliom_common.timeout
          * float option
          * Eliom_common.perssessgrp option)
           option
         * Eliom_common.one_persistent_cookie_info Eliom_common.session_cookie
             ref)
          Lwt.t
          Lazy.t
          Eliom_common.Full_state_name_table.t
          ref)) ->
  Ocsigen_cookie_map.t ->
  string Ocsigen_cookie_map.Map_inner.t Lwt.t

Sourcetype date = float

Sourcetype cookie = {

full_state_name : Eliom_common.full_state_name;
expiry : date option;
timeout : Eliom_common.timeout;
session_group : Eliom_common.perssessgrp option;

}

Sourcemodule Persistent_cookies : sig ... end