obus

Pure Ocaml implementation of the D-Bus protocol
Library obus.hal
val interface : OBus_name.interface
val m_AcquireGlobalInterfaceLock : ( string * bool, unit ) OBus_member.Method.t
val m_CommitToGdl : ( string * string, unit ) OBus_member.Method.t
val m_DeviceExists : ( string, bool ) OBus_member.Method.t
val m_FindDeviceByCapability : ( string, string list ) OBus_member.Method.t
val m_FindDeviceStringMatch : ( string * string, string list ) OBus_member.Method.t
val m_GetAllDevices : ( unit, string list ) OBus_member.Method.t
val m_GetAllDevicesWithProperties : ( unit, (string * (string * OBus_value.V.single) list) list ) OBus_member.Method.t
val m_NewDevice : ( unit, string ) OBus_member.Method.t
val m_ReleaseGlobalInterfaceLock : ( string, unit ) OBus_member.Method.t
val m_Remove : ( string, unit ) OBus_member.Method.t
val m_SingletonAddonIsReady : ( string, unit ) OBus_member.Method.t
val s_DeviceAdded : string OBus_member.Signal.t
val s_DeviceRemoved : string OBus_member.Signal.t
val s_GlobalInterfaceLockAcquired : (string * string * int32) OBus_member.Signal.t
val s_GlobalInterfaceLockReleased : (string * string * int32) OBus_member.Signal.t
val s_NewCapability : (string * string) OBus_member.Signal.t
type 'a members = {
m_AcquireGlobalInterfaceLock : 'a OBus_object.t -> (string * bool) -> unit Lwt.t;
m_CommitToGdl : 'a OBus_object.t -> (string * string) -> unit Lwt.t;
m_DeviceExists : 'a OBus_object.t -> string -> bool Lwt.t;
m_FindDeviceByCapability : 'a OBus_object.t -> string -> string list Lwt.t;
m_FindDeviceStringMatch : 'a OBus_object.t -> (string * string) -> string list Lwt.t;
m_GetAllDevices : 'a OBus_object.t -> unit -> string list Lwt.t;
m_GetAllDevicesWithProperties : 'a OBus_object.t -> unit -> (string * (string * OBus_value.V.single) list) list Lwt.t;
m_NewDevice : 'a OBus_object.t -> unit -> string Lwt.t;
m_ReleaseGlobalInterfaceLock : 'a OBus_object.t -> string -> unit Lwt.t;
m_Remove : 'a OBus_object.t -> string -> unit Lwt.t;
m_SingletonAddonIsReady : 'a OBus_object.t -> string -> unit Lwt.t;
}
val make : 'a members -> 'a OBus_object.interface