Up  Next

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