On Thu, May 21, 2020 at 01:35:24PM +0200, Pino Toscano wrote:
 Use the default libvirt authentication handler as base for ours,
 overriding it with our callback only in case we have a password to
 supply.
 ---
  v2v/libvirt_utils.ml | 12 ++++++++----
  1 file changed, 8 insertions(+), 4 deletions(-)
 
 diff --git a/v2v/libvirt_utils.ml b/v2v/libvirt_utils.ml
 index 7df17b29..4d0b8639 100644
 --- a/v2v/libvirt_utils.ml
 +++ b/v2v/libvirt_utils.ml
 @@ -33,10 +33,14 @@ let auth_for_password_file ?password_file () =
      ) creds
    in
  
 -  {
 -    Libvirt.Connect.credtype = [ Libvirt.Connect.CredentialPassphrase ];
 -    cb = auth_fn;
 -  }
 +  let base_auth = Libvirt.Connect.get_auth_default () in
 +
 +  if password_file = None then
 +    base_auth
 +  else
 +    { base_auth with
 +      cb = auth_fn;
 +    }
  
  let get_domain conn name =
    let dom = 
ACK, thanks.
Rich.
-- 
Richard Jones, Virtualization Group, Red Hat 
http://people.redhat.com/~rjones
Read my programming and virtualization blog: 
http://rwmj.wordpress.com
virt-p2v converts physical machines to virtual machines.  Boot with a
live CD or over the network (PXE) and turn machines into KVM guests.
http://libguestfs.org/virt-v2v