package sihl
The modular functional web framework
Install
Dune Dependency
Authors
Maintainers
Sources
sihl-0.1.1.tbz
sha256=eac58e5ee9c869aa3b0f0bcee936b01c53bf7fe1febb42edd607268dfb11f4e9
sha512=012b6cf1cf6af0966059761b4916ea8aa590aa8d5809a6f480cb17e23ee10c3b9245062c4f0cf9ad98ab950391c0827c9780999d39fa16a93f7aab4b12f9ab8c
doc/sihl.middleware/Middleware/Authn/Make/argument-2-UserService/index.html
Parameter Make.UserService
include Core.Container.SERVICE
val add_user : User__.User_core.User.t -> Core.Ctx.t -> Core.Ctx.t
val require_user_opt : Core.Ctx.t -> User__.User_core.User.t option
val require_user : Core.Ctx.t -> User__.User_core.User.t
val find_all :
Core.Ctx.t ->
query:Data.Ql.t ->
(User__.User_core.User.t list * Data.Repo.Meta.t) Lwt.t
val find_opt :
Core.Ctx.t ->
user_id:string ->
User__.User_core.User.t option Lwt.t
val find : Core.Ctx.t -> user_id:string -> User__.User_core.User.t Lwt.t
val find_by_email : Core.Ctx.t -> email:string -> User__.User_core.User.t Lwt.t
val find_by_email_opt :
Core.Ctx.t ->
email:string ->
User__.User_core.User.t option Lwt.t
val update_password :
Core.Ctx.t ->
?password_policy:(string -> (unit, string) Result.t) ->
user:User__.User_core.User.t ->
old_password:string ->
new_password:string ->
new_password_confirmation:string ->
unit ->
(User__.User_core.User.t, string) Result.t Lwt.t
val update_details :
Core.Ctx.t ->
user:User__.User_core.User.t ->
email:string ->
username:string option ->
User__.User_core.User.t Lwt.t
val set_password :
Core.Ctx.t ->
?password_policy:(string -> (unit, string) Result.t) ->
user:User__.User_core.User.t ->
password:string ->
password_confirmation:string ->
unit ->
(User__.User_core.User.t, string) Result.t Lwt.t
Set the password of a user without knowing the old password.
This feature is typically used by admins.
val create_user :
Core.Ctx.t ->
email:string ->
password:string ->
username:string option ->
User__.User_core.User.t Lwt.t
Create and store a user.
val create_admin :
Core.Ctx.t ->
email:string ->
password:string ->
username:string option ->
User__.User_core.User.t Lwt.t
Create and store a user that is also an admin.
val register :
Core.Ctx.t ->
?password_policy:(string -> (unit, string) result) ->
?username:string ->
email:string ->
password:string ->
password_confirmation:string ->
unit ->
(User__.User_core.User.t, string) Result.t Lwt.t
Create and store new user.
Provide password_policy
to check whether the password fulfills certain criteria.
val login :
Core.Ctx.t ->
email:string ->
password:string ->
(User__.User_core.User.t, string) Result.t Lwt.t
Find user by email if password matches.
sectionYPositions = computeSectionYPositions($el), 10)"
x-init="setTimeout(() => sectionYPositions = computeSectionYPositions($el), 10)"
>