# Module OBus_interfaces.Org_freedesktop_DBus

    module Org_freedesktop_DBus: sig .. end

    val interface : OBus_name.interface

    type type_request_name_flags = [ `Allow_replacement | `Do_not_queue | `Replace_existing ]

    val make_request_name_flags : int32 -> type_request_name_flags list

    val cast_request_name_flags : type_request_name_flags list -> int32

    type type_request_name_result = [ `Already_owner | `Exists | `In_queue | `Primary_owner ]

    val make_request_name_result : int32 -> type_request_name_result

    val cast_request_name_result : type_request_name_result -> int32

    type type_release_name_result = [ `Non_existent | `Not_owner | `Released ]

    val make_release_name_result : int32 -> type_release_name_result

    val cast_release_name_result : type_release_name_result -> int32

    type type_start_service_by_name_result = [ `Already_running | `Success ]

    val make_start_service_by_name_result : int32 ->
           type_start_service_by_name_result

    val cast_start_service_by_name_result : type_start_service_by_name_result ->
           int32

    val m_AddMatch : (string, unit) OBus_member.Method.t

    val m_GetAdtAuditSessionData : (string, string) OBus_member.Method.t

    val m_GetConnectionSELinuxSecurityContext : (string, string) OBus_member.Method.t

    val m_GetConnectionUnixProcessID : (string, int32) OBus_member.Method.t

    val m_GetConnectionUnixUser : (string, int32) OBus_member.Method.t

    val m_GetId : (unit, string) OBus_member.Method.t

    val m_GetNameOwner : (string, string) OBus_member.Method.t

    val m_Hello : (unit, string) OBus_member.Method.t

    val m_ListActivatableNames : (unit, string list) OBus_member.Method.t

    val m_ListNames : (unit, string list) OBus_member.Method.t

    val m_ListQueuedOwners : (string, string list) OBus_member.Method.t

    val m_NameHasOwner : (string, bool) OBus_member.Method.t

    val m_ReleaseName : (string, int32) OBus_member.Method.t

    val m_ReloadConfig : (unit, unit) OBus_member.Method.t

    val m_RemoveMatch : (string, unit) OBus_member.Method.t

    val m_RequestName : (string * int32, int32) OBus_member.Method.t

    val m_StartServiceByName : (string * int32, int32) OBus_member.Method.t

    val m_UpdateActivationEnvironment : ((string * string) list, unit) OBus_member.Method.t

    val s_NameAcquired : string OBus_member.Signal.t

    val s_NameLost : string OBus_member.Signal.t

    val s_NameOwnerChanged : (string * string * string) OBus_member.Signal.t

    type 'a members = {

`` | `m_AddMatch : `'a OBus_object.t -> string -> unit Lwt.t`;`
`` | `m_GetAdtAuditSessionData : `'a OBus_object.t -> string -> string Lwt.t`;`
`` | `m_GetConnectionSELinuxSecurityContext : `'a OBus_object.t -> string -> string Lwt.t`;`
`` | `m_GetConnectionUnixProcessID : `'a OBus_object.t -> string -> int32 Lwt.t`;`
`` | `m_GetConnectionUnixUser : `'a OBus_object.t -> string -> int32 Lwt.t`;`
`` | `m_GetId : `'a OBus_object.t -> unit -> string Lwt.t`;`
`` | `m_GetNameOwner : `'a OBus_object.t -> string -> string Lwt.t`;`
`` | `m_Hello : `'a OBus_object.t -> unit -> string Lwt.t`;`
`` | `m_ListActivatableNames : `'a OBus_object.t -> unit -> string list Lwt.t`;`
`` | `m_ListNames : `'a OBus_object.t -> unit -> string list Lwt.t`;`
`` | `m_ListQueuedOwners : `'a OBus_object.t -> string -> string list Lwt.t`;`
`` | `m_NameHasOwner : `'a OBus_object.t -> string -> bool Lwt.t`;`
`` | `m_ReleaseName : `'a OBus_object.t -> string -> int32 Lwt.t`;`
`` | `m_ReloadConfig : `'a OBus_object.t -> unit -> unit Lwt.t`;`
`` | `m_RemoveMatch : `'a OBus_object.t -> string -> unit Lwt.t`;`
`` | `m_RequestName : `'a OBus_object.t -> string * int32 -> int32 Lwt.t`;`
`` | `m_StartServiceByName : `'a OBus_object.t -> string * int32 -> int32 Lwt.t`;`
`` | `m_UpdateActivationEnvironment : `'a OBus_object.t -> (string * string) list -> unit Lwt.t`;`

}

    val make : 'a members -> 'a OBus_object.interface