get_domains(); if (empty($vms)) { echo ''._('No Virtual Machines installed').''; return; } if (file_exists($user_prefs)) { $prefs = parse_ini_file($user_prefs); $sort = []; foreach ($vms as $vm) $sort[] = array_search($vm,$prefs) ?? 999; array_multisort($sort,SORT_NUMERIC,$vms); } else { natcasesort($vms); } $i = 0; $kvm = ['var kvm=[];']; $show = explode(',',unscript($_GET['show']??'')); $path = $domain_cfg['MEDIADIR'] ; foreach ($vms as $vm) { $res = $lv->get_domain_by_name($vm); $desc = $lv->domain_get_description($res); $uuid = $lv->domain_get_uuid($res); $dom = $lv->domain_get_info($res); $id = $lv->domain_get_id($res) ?: '-'; $is_autostart = $lv->domain_get_autostart($res); $state = $lv->domain_state_translate($dom['state']); $icon = $lv->domain_get_icon_url($res); $image = substr($icon,-4)=='.png' ? "" : (substr($icon,0,5)=='icon-' ? "" : ""); $arrConfig = domain_to_config($uuid); if ($state == 'running') { $mem = $dom['memory'] / 1024; } else { $mem = $lv->domain_get_memory($res) / 1024; } $mem = round($mem).'M'; $vcpu = $dom['nrVirtCpu']; $auto = $is_autostart ? 'checked':''; $template = $lv->_get_single_xpath_result($res, '//domain/metadata/*[local-name()=\'vmtemplate\']/@name'); if (empty($template)) $template = 'Custom'; $log = (is_file("/var/log/libvirt/qemu/$vm.log") ? "libvirt/qemu/$vm.log" : ''); $disks = '-'; $diskdesc = ''; if (($diskcnt = $lv->get_disk_count($res)) > 0) { $disks = $diskcnt.' / '.$lv->get_disk_capacity($res); $diskdesc = 'Current physical size: '.$lv->get_disk_capacity($res, true); } $arrValidDiskBuses = getValidDiskBuses(); $vmrcport = $lv->domain_get_vnc_port($res); $autoport = $lv->domain_get_vmrc_autoport($res); $vmrcurl = ''; $graphics = ''; if ($vmrcport > 0) { $wsport = $lv->domain_get_ws_port($res); $vmrcprotocol = $lv->domain_get_vmrc_protocol($res) ; $vmrcurl = autov('/plugins/dynamix.vm.manager/'.$vmrcprotocol.'.html',true).'&autoconnect=true&host=' . $_SERVER['HTTP_HOST'] ; if ($vmrcprotocol == "spice") $vmrcurl .= '&vmname='. urlencode($vm) .'&port=/wsproxy/' . $vmrcport . '/' ; else $vmrcurl .= '&port=&path=/wsproxy/' . $wsport . '/'; $graphics = strtoupper($vmrcprotocol).":".$vmrcport; } elseif ($vmrcport == -1 || $autoport) { $vmrcprotocol = $lv->domain_get_vmrc_protocol($res) ; if ($autoport == "yes") $auto = "auto" ; else $auto="manual" ; $graphics = strtoupper($vmrcprotocol).':'._($auto); } elseif (!empty($arrConfig['gpu'])) { $arrValidGPUDevices = getValidGPUDevices(); foreach ($arrConfig['gpu'] as $arrGPU) { foreach ($arrValidGPUDevices as $arrDev) { if ($arrGPU['id'] == $arrDev['id']) { if (count(array_filter($arrValidGPUDevices, function($v) use ($arrDev) { return $v['name'] == $arrDev['name']; })) > 1) { $graphics .= $arrDev['name'].' ('.$arrDev['id'].')'."\n"; $vmrcprotocol = "VGA" ; } else { $graphics .= $arrDev['name']."\n"; $vmrcprotocol = "VGA" ; } } } } $graphics = str_replace("\n", "
", trim($graphics)); } unset($dom); $menu = sprintf("onclick=\"addVMContext('%s','%s','%s','%s','%s','%s','%s')\"", addslashes($vm),addslashes($uuid),addslashes($template),$state,addslashes($vmrcurl),strtoupper($vmrcprotocol),addslashes($log)); $kvm[] = "kvm.push({id:'$uuid',state:'$state'});"; switch ($state) { case 'running': $shape = 'play'; $status = 'started'; $color = 'green-text'; break; case 'paused': case 'pmsuspended': $shape = 'pause'; $status = 'paused'; $color = 'orange-text'; break; default: $shape = 'square'; $status = 'stopped'; $color = 'red-text'; break; } /* VM information */ echo ""; echo "$image$vm
"._($status).""; echo "$desc"; echo "$vcpu"; echo "$mem"; echo "$disks"; echo "$graphics"; echo ""; /* Disk device information */ echo "" : "' style='display:none'>"); echo ""; echo ""; echo ""; echo ""; /* Display VM disks */ foreach ($lv->get_disk_stats($res) as $arrDisk) { $capacity = $lv->format_size($arrDisk['capacity'], 0); $allocation = $lv->format_size($arrDisk['allocation'], 0); $disk = $arrDisk['file'] ?? $arrDisk['partition']; $dev = $arrDisk['device']; $bus = $arrValidDiskBuses[$arrDisk['bus']] ?? 'VirtIO'; $boot= $arrDisk["boot order"] ; $serial = $arrDisk["serial"] ; if ($boot < 1) $boot="Not set" ; echo ""; if ($state == 'shutoff') { echo ""; } else { echo ""; } echo ""; } /* Display VM cdroms */ foreach ($lv->get_cdrom_stats($res) as $arrCD) { $capacity = $lv->format_size($arrCD['capacity'], 0); $allocation = $lv->format_size($arrCD['allocation'], 0); $disk = $arrCD['file'] ?? $arrCD['partition']; $dev = $arrCD['device']; $bus = $arrValidDiskBuses[$arrCD['bus']] ?? 'VirtIO'; $boot= $arrCD["boot order"] ; if ($boot < 1) $boot="Not set" ; if ($disk != "" ) { $title = _("Eject CD Drive")."."; $changemedia = "changemedia(\"{$uuid}\",\"{$dev}\",\"{$bus}\", \"--eject\")" ; echo ""; } else { $title = _("Insert CD")."."; $changemedia = "changemedia(\"{$uuid}\",\"{$dev}\",\"{$bus}\",\"--select\")" ; $disk = _("No CD image inserted in to drive") ; echo ""; } } /* Display VM IP Addresses "execute":"guest-network-get-interfaces" --pretty */ echo ""; $gastate = getgastate($res) ; if ($gastate == "connected") { $ip = $lv->domain_interface_addresses($res, 1) ; if ($ip != false) { $duplicates = []; // hide duplicate interface names foreach ($ip as $arrIP) { $ipname = $arrIP["name"] ; if (preg_match('/^(lo|Loopback)/',$ipname)) continue; // omit loopback interface $iphdwadr = $arrIP["hwaddr"] == "" ? _("N/A") : $arrIP["hwaddr"] ; $iplist = $arrIP["addrs"] ; foreach ($iplist as $arraddr) { $ipaddrval = $arraddr["addr"] ; if (preg_match('/^f[c-f]/',$ipaddrval)) continue; // omit ipv6 private addresses $iptype = $arraddr["type"] ? "ipv6" : "ipv4" ; $ipprefix = $arraddr["prefix"] ; $ipnamemac = "$ipname ($iphdwadr)"; if (!in_array($ipnamemac,$duplicates)) $duplicates[] = $ipnamemac; else $ipnamemac = ""; echo ""; } } } } else { if ($gastate == "disconnected") echo ""; else echo "" ; } echo "

"._('Disk devices')."	"._('Serial')."	"._('Bus')."	"._('Capacity')."	"._('Allocation')."	Boot Order
$disk	$serial	$bus	"; echo " "; echo ""; echo ""; echo ""; echo ""; echo ""; echo "$capacity"; echo ""; echo "	$capacity	$allocation	$boot
$disk		$bus	$capacity	$allocation	$boot
$disk		$bus	$capacity	$allocation	$boot
"._('Interfaces')."			"._('Type')."	"._('IP Address')."	"._('Prefix')."
$ipnamemac			$iptype	$ipaddrval	$ipprefix
"._('Guest agent not installed')."
"._('Guest not running')."

"; echo ""; } echo "\0".implode($kvm); ?>