type t type status = | Success | Fail | Invalid_path | Invalid_value | Commit_in_progress | Configuration_locked | Internal_error | Permission_denied | Path_already_exists type response = { status : status; output : string option; error : string option; warning : string option; } val create : string -> t Lwt.t val shutdown : t -> t Lwt.t val get_status : t -> response Lwt.t