fix: Avoid an error when a vm includes more than one dns config

glpi-project · Dec 5, 2024 · 88d464e · 88d464e
1 parent 640c232
commit 88d464e
Showing 1 changed file with 6 additions and 2 deletions.
diff --git a/lib/GLPI/Agent/SOAP/VMware/Host.pm b/lib/GLPI/Agent/SOAP/VMware/Host.pm
@@ -435,8 +435,12 @@ sub getVirtualMachines {
             unless (empty($machine->{guest}{hostName})) {
                 $vmInventory->{OPERATINGSYSTEM}->{FQDN} = $machine->{guest}{hostName};
             }
-            unless (empty($machine->{guest}{net}{dnsConfig}{domainName})) {
-                $vmInventory->{OPERATINGSYSTEM}->{DNS_DOMAIN} = $machine->{guest}{net}{dnsConfig}{domainName};
+            if (ref($machine->{guest}{net}{dnsConfig})) {
+                my $dnsConfig = ref($machine->{guest}{net}{dnsConfig}) eq 'HASH' ?
+                    $machine->{guest}{net}{dnsConfig} : $machine->{guest}{net}{dnsConfig}->[0];
+                if (ref($dnsConfig) eq 'HASH' && !empty($dnsConfig->{domainName})) {
+                    $vmInventory->{OPERATINGSYSTEM}->{DNS_DOMAIN} = $dnsConfig->{domainName};
+                }
             }
             unless (empty($machine->{summary}{runtime}{bootTime})) {
                 $vmInventory->{OPERATINGSYSTEM}->{BOOT_TIME} = $machine->{summary}{runtime}{bootTime};