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_tcp_over_protocol/Client/index.html
Module Kerberized_tcp_over_protocol.Client
Source
Source
val connect_and_handshake :
(module Krb_public__.Protocol_with_test_mode_intf.S
with type protocol_backend = 'backend
and type Connection.t = 'conn) ->
create_backend:
(socket:([ `Active ], Async.Socket.Address.Inet.t) Async.Socket.t ->
tcp_reader:Async.Reader.t ->
tcp_writer:Async.Writer.t ->
'backend Core.Or_error.t) ->
?buffer_age_limit:
[ `At_most of Krb_public__.Import.Time.Span.t | `Unlimited ] ->
?interrupt:unit Async.Deferred.t ->
?reader_buffer_size:int ->
?writer_buffer_size:int ->
?timeout:Krb_public__.Import.Time.Span.t ->
?time_source:Async.Time_source.t ->
?override_supported_versions:int list ->
?cred_cache:Cred_cache.t ->
authorize:Authorize.t ->
krb_mode:Mode.Client.t ->
Async.Socket.Address.Inet.t Async.Tcp.Where_to_connect.t ->
'conn Async.Deferred.Or_error.t
Source
val connect_sock_and_handshake :
(module Krb_public__.Protocol_with_test_mode_intf.S
with type protocol_backend = 'backend
and type Connection.t = 'conn) ->
create_backend:
(socket:([ `Active ], Async.Socket.Address.Inet.t) Async.Socket.t ->
'backend Core.Or_error.t) ->
?interrupt:unit Async.Deferred.t ->
?timeout:Krb_public__.Import.Time.Span.t ->
?override_supported_versions:int list ->
?cred_cache:Cred_cache.t ->
authorize:Authorize.t ->
krb_mode:Mode.Client.t ->
Async.Socket.Address.Inet.t Async.Tcp.Where_to_connect.t ->
('conn * ([ `Active ], Async.Socket.Address.Inet.t) Async.Socket.t)
Async.Deferred.Or_error.t
The clients should be very careful about doing any read/write operation directly on the returned socket. For one, reading from the socket in Priv
or Safe
mode would return encrypted data.
There are very rare cases when one might want to use the socket instead of the connection.
sectionYPositions = computeSectionYPositions($el), 10)"
x-init="setTimeout(() => sectionYPositions = computeSectionYPositions($el), 10)"
>