sig exception Service_unavailable of string val select_endpoint : string list -> float -> string * Unix.inet_addr val webdav_client : ?pipeline:Http_client.pipeline -> string * Unix.inet_addr -> Webdav_client.webdav_client_t end