Qcow_debugSourceval on_duplicate_reference :
Qcow_metadata.t ->
Qcow_cluster_map.t ->
cluster_bits:int ->
(int64 * int) ->
(int64 * int) ->
int64 ->
(unit, [> `Disconnected | `Is_read_only | `Msg of string ]) result Lwt.tval check_references :
Qcow_metadata.t ->
Qcow_cluster_map.t ->
cluster_bits:int ->
Qcow_types.Cluster.t ->
(unit, [> `Disconnected | `Is_read_only | `Msg of string ]) result Lwt.tcheck_references metadata map cluster_bits target follows the back references from physical offset target, verifying the references on disk as it goes