sihl-type 0.2.0 · OCaml Package

module Error : sig ... end

type t = {

id : string;
email : string;
username : string option;
password : string;
status : string;
admin : bool;
confirmed : bool;
created_at : Ptime.t;

}

val created_at : t -> Ptime.t

val confirmed : t -> bool

val admin : t -> bool

val status : t -> string

val password : t -> string

val username : t -> string option

val email : t -> string

val id : t -> string

module Fields : sig ... end

val to_yojson : t -> Yojson.Safe.t

val of_yojson : Yojson.Safe.t -> t Ppx_deriving_yojson_runtime.error_or

val _ : Yojson.Safe.t -> t Ppx_deriving_yojson_runtime.error_or

val pp : 
  Ppx_deriving_runtime.Format.formatter ->
  t ->
  Ppx_deriving_runtime.unit

val show : t -> Ppx_deriving_runtime.string

val make : 
  id:string ->
  email:string ->
  ?username:string ->
  password:string ->
  status:string ->
  admin:bool ->
  confirmed:bool ->
  created_at:Ptime.t ->
  unit ->
  t

val equal : t -> t -> bool

val confirm : t -> t

val sexp_of_t : t -> Sexplib0.Sexp.t

val set_user_password : t -> string -> (t, string) result

val set_user_details : t -> email:string -> username:string option -> t

val is_admin : t -> bool

val is_owner : t -> String.t -> bool

val is_confirmed : t -> bool

val matches_password : string -> t -> bool

val default_password_policy : string -> (unit, string) result

val validate_new_password : 
  password:String.t ->
  password_confirmation:String.t ->
  password_policy:(String.t -> (unit, string) result) ->
  (unit, string) result

val validate_change_password : 
  t ->
  old_password:string ->
  new_password:String.t ->
  new_password_confirmation:String.t ->
  password_policy:(String.t -> (unit, string) result) ->
  (unit, string) result

val create : 
  email:string ->
  password:string ->
  username:string option ->
  admin:bool ->
  confirmed:bool ->
  (t, string) result

val t : t Caqti_type.t

package sihl-type