package krb
A library for using Kerberos for both Rpc and Tcp communication
Install
Dune Dependency
Authors
Maintainers
Sources
krb-v0.16.0.tar.gz
sha256=353675621e4c5a888f2483dc1bb7281bd17ce4ed7dfd2f40142257f98db7c77d
doc/krb.public/Krb_public/Private/Kerberized_rpc_over_protocol/index.html
Module Private.Kerberized_rpc_over_protocol
Source
The following functions are used to reduce code duplication between this implementation and lib/krb_for_low_latency_transport. They implement the guts of kerberized_rpc.ml abstractly over a Protocol.Connection
.
Source
val handle_client :
(module Krb_public__.Protocol_intf.Connection with type t = 'conn) ->
?heartbeat_config:Async.Rpc.Connection.Heartbeat_config.t ->
?handshake_timeout:Krb_public__.Import.Time.Span.t ->
(Client_identity.t ->
Async.Socket.Address.Inet.t ->
Async.Rpc.Connection.t ->
'a) ->
'a Async.Rpc.Implementations.t ->
(Async.Socket.Address.Inet.t ->
Async.Rpc.Transport.t ->
'conn ->
unit Async.Deferred.t)
Core.Staged.t
Source
val handle_client_with_anon :
(module Krb_public__.Protocol_intf.Connection with type t = 'conn) ->
?heartbeat_config:Async.Rpc.Connection.Heartbeat_config.t ->
?handshake_timeout:Krb_public__.Import.Time.Span.t ->
(Client_identity.t option ->
Async.Socket.Address.Inet.t ->
Async.Rpc.Connection.t ->
'a) ->
'a Async.Rpc.Implementations.t ->
(Async.Socket.Address.Inet.t ->
Async.Rpc.Transport.t ->
'conn option ->
unit Async.Deferred.t)
Core.Staged.t
Source
val client :
(module Krb_public__.Protocol_intf.Connection with type t = 'conn) ->
?heartbeat_config:Async.Rpc.Connection.Heartbeat_config.t ->
?implementations:
(Server_principal.t -> 'a Async.Rpc.Connection.Client_implementations.t) ->
?description:Core.Info.t ->
?on_credential_forwarding_request:
(Server_principal.t -> On_credential_forwarding_request.t) ->
finish_handshake_by:Krb_public__.Import.Time.t ->
Async.Tcp.Where_to_connect.inet ->
Async.Rpc.Transport.t ->
'conn ->
Async.Rpc.Connection.t Async.Deferred.Or_error.t
sectionYPositions = computeSectionYPositions($el), 10)"
x-init="setTimeout(() => sectionYPositions = computeSectionYPositions($el), 10)"
>