package corosync
Module Corosync_lib.VotequorumSource
Source
val votequorum_quorum_notification_fn_t :
(Unsigned.uint64 ->
Unsigned.uint64 ->
Unsigned.uint32 ->
Unsigned.uint32 ->
votequorum_node_t Ctypes.structure Ctypes_static.ptr ->
unit Ctypes_static.ptr)
Ctypes.fnSource
val votequorum_nodelist_notification_fn_t :
(Unsigned.uint64 ->
Unsigned.uint64 ->
votequorum_ring_id_t Ctypes.structure ->
Unsigned.uint32 ->
unit Ctypes_static.ptr)
Ctypes.fnSource
val votequorum_expectedvotes_notification_fn_t :
(Unsigned.uint64 ->
Unsigned.uint64 ->
Unsigned.uint32 ->
unit Ctypes_static.ptr)
Ctypes.fnSource
val votequorum_quorum_notify_fn :
(Unsigned.uint64 ->
Unsigned.uint64 ->
Unsigned.uint32 ->
Unsigned.uint32 ->
votequorum_node_t Ctypes.structure Ctypes_static.ptr ->
unit Ctypes_static.ptr,
votequorum_callbacks_t Ctypes.structure)
Ctypes.fieldSource
val votequorum_expectedvotes_notify_fn :
(Unsigned.uint64 ->
Unsigned.uint64 ->
votequorum_ring_id_t Ctypes.structure ->
Unsigned.uint32 ->
unit Ctypes_static.ptr,
votequorum_callbacks_t Ctypes.structure)
Ctypes.fieldSource
val votequorum_nodelist_notify_fn :
(Unsigned.uint64 ->
Unsigned.uint64 ->
votequorum_ring_id_t Ctypes.structure ->
Unsigned.uint32 ->
unit Ctypes_static.ptr,
votequorum_callbacks_t Ctypes.structure)
Ctypes.fieldSource
val votequorum_initialize :
Unsigned.uint64 Ctypes_static.ptr ->
votequorum_callbacks_t Ctypes.structure Ctypes_static.ptr ->
Corotypes.CsError.tSource
val votequorum_getinfo :
Unsigned.uint64 ->
Unsigned.uint ->
votequorum_info Ctypes.structure Ctypes_static.ptr ->
Corotypes.CsError.tSource
type vinfo = {node_id : Unsigned.uint;node_state : Unsigned.uint;node_votes : Unsigned.uint;node_expected_votes : Unsigned.uint;highest_votes : Unsigned.uint;total_votes : Unsigned.uint;quorum : Unsigned.uint;flags : Unsigned.uint;qdevice_votes : Unsigned.uint;qdevice_name : string;
}Source
val with_handle :
(Unsigned.uint64 -> ('a, Corotypes.CsError.t) result) ->
('a, Corotypes.CsError.t) result