sig
  type portmap = (string, int * string * string) Hashtbl.t
  val full_hostname : unit -> string
  val short_hostname : string -> string
  val populate_portmap :
    Galax_server_util.Sim.portmap -> string -> int option -> unit
  val lookup_host_port_in_portmap :
    Galax_server_util.Sim.portmap ->
    string -> Galax_server_util.server_location
  val check_network_up : (string -> unit) -> unit
end