2015-12-30 09:52:24 +00:00
|
|
|
(* Copyright (C) 2015, Thomas Leonard <thomas.leonard@unikernel.com>
|
|
|
|
|
See the README file for details. *)
|
|
|
|
|
|
2015-12-30 13:48:13 +00:00
|
|
|
(** Handling client VMs. *)
|
2015-12-30 09:52:24 +00:00
|
|
|
|
2020-04-29 16:06:48 +02:00
|
|
|
val listen : (unit -> int64) ->
|
2021-10-28 13:39:32 +02:00
|
|
|
([ `host ] Domain_name.t -> (int32 * Ipaddr.V4.Set.t, [> `Msg of string ]) result Lwt.t) ->
|
2022-09-07 16:53:45 +02:00
|
|
|
Ipaddr.V4.t list -> Qubes.DB.t -> Router.t -> 'a Lwt.t
|
|
|
|
|
(** [listen get_timestamp resolver dns_servers db router] is a thread that watches for clients being added to and
|
2020-04-29 15:58:01 +02:00
|
|
|
removed from XenStore. Clients are connected to the client network and
|
|
|
|
|
packets are sent via [router]. We ensure the source IP address is correct
|
|
|
|
|
before routing a packet. *)
|
