Dns_client_lwt (dns-client-lwt.Dns_client

module Transport : 
  Dns_client.S
    with type io_addr =
           [ `Plaintext of Ipaddr.t * int
           | `Tls of Tls.Config.client * Ipaddr.t * int ]
     and type +'a io = 'a Lwt.t
     and type stack = Happy_eyeballs_lwt.t

A flow module based on non-blocking I/O on top of the Lwt_unix socket API.

include sig ... end

type t = Dns_client.Make(Transport).t

val transport : t -> Transport.t

val create : 
  ?cache_size:int ->
  ?edns:[ `Auto | `Manual of Dns.Edns.t | `None ] ->
  ?nameservers:(Dns.proto * Transport.io_addr list) ->
  ?timeout:int64 ->
  Transport.stack ->
  t

val nameservers : t -> Dns.proto * Transport.io_addr list

val getaddrinfo : 
  t ->
  'response Dns.Rr_map.key ->
  'a Domain_name.t ->
  ('response, [> `Msg of string ]) Stdlib.result Transport.io

val gethostbyname : 
  t ->
  [ `host ] Domain_name.t ->
  (Ipaddr.V4.t, [> `Msg of string ]) Stdlib.result Transport.io

val gethostbyname6 : 
  t ->
  [ `host ] Domain_name.t ->
  (Ipaddr.V6.t, [> `Msg of string ]) Stdlib.result Transport.io

val get_resource_record : 
  t ->
  'response Dns.Rr_map.key ->
  'a Domain_name.t ->
  ('response,
    [> `Msg of string
    | `No_data of [ `raw ] Domain_name.t * Dns.Soa.t
    | `No_domain of [ `raw ] Domain_name.t * Dns.Soa.t ])
    Stdlib.result
    Transport.io

val get_raw_reply : 
  t ->
  'response Dns.Rr_map.key ->
  'a Domain_name.t ->
  (Dns.Packet.reply, [> `Msg of string | `Partial ]) Stdlib.result Transport.io