<?php
class SubPage
{
public static function doPreprocess()
{
User::assertPermission('view.list');
}
public static function doRender()
{
$filters = StatisticsFilter::parseQuery();
$filterSet = new StatisticsFilterSet($filters);
if (!$filterSet->setAllowedLocationsFromPermission('view.list')) {
Message::addError('main.no-permission');
Util::redirect('?do=main');
}
StatisticsFilter::renderFilterBox('list', $filterSet);
self::showMachineList($filterSet);
}
private static function showMachineList(StatisticsFilterSet $filterSet): void
{
Module::isAvailable('js_stupidtable');
$filterSet->makeFragments($where, $join, $args);
$xtra = '';
if (Module::isAvailable('runmode')) {
$xtra .= ', runmode.module AS rmmodule, runmode.isclient';
if (strpos($join, 'runmode') === false) {
$join .= ' LEFT JOIN runmode ON (m.machineuuid = runmode.machineuuid) ';
}
}
$allRows = Database::queryAll("SELECT m.machineuuid, m.locationid, m.macaddr, m.clientip, m.lastseen,
m.logintime, m.state, m.currentuser, m.currentrunmode, m.realcores, m.mbram, m.kvmstate, m.cpumodel, m.id44mb,
m.id45mb, m.hostname, m.notes IS NOT NULL AS hasnotes, m.firmware,
m.badsectors, Count(s.machineuuid) AS confvars $xtra FROM machine m
LEFT JOIN setting_machine s ON (m.machineuuid = s.machineuuid)
$join WHERE $where GROUP BY m.machineuuid", $args);
// If filter results in just one result, redirect to machine details
if (count($allRows) === 1) {
Util::redirect('?do=statistics&uuid=' . $allRows[0]['machineuuid']);
}
// Gather additional info that would be ugly to fetch via joins above
$uuids = array_column($allRows, 'machineuuid');
$machineWithHdds = Database::queryKeyValueList("SELECT mxx.machineuuid, Count(s.hwid) AS num
FROM statistic_hw s
INNER JOIN machine_x_hw AS mxx ON (s.hwid = mxx.hwid AND s.hwtype = :type
AND mxx.disconnecttime = 0 AND mxx.machineuuid IN (:ids))
GROUP BY mxx.machineuuid",
['type' => HardwareInfo::HDD, 'ids' => $uuids]);
$machineNicSpeed = Database::queryKeyValueList("SELECT mxx.machineuuid, Max(mxhp.`numeric`) AS num
FROM statistic_hw s
INNER JOIN machine_x_hw AS mxx ON (s.hwid = mxx.hwid AND s.hwtype = :type
AND mxx.disconnecttime = 0 AND mxx.machineuuid IN (:ids))
INNER JOIN machine_x_hw_prop mxhp ON (mxx.machinehwid = mxhp.machinehwid AND mxhp.prop = :prop)
GROUP BY mxx.machineuuid",
['type' => HardwareInfo::MAINBOARD, 'prop' => 'nic-speed', 'ids' => $uuids]);
$machineWithConfigOverrides = Database::queryKeyValueList("SELECT machineuuid, Count(machineuuid) AS num
FROM setting_machine WHERE machineuuid IN (:ids) GROUP BY machineuuid", ['ids' => $uuids]);
// TODO: Cannot disable checkbox for those where user has no permission, since we got multiple actions now
// We should pass these lists to the output and add some JS magic
// Either disable the delete/reboot/... buttons as soon as at least one "forbidden" client is selected (potentially annoying)
// or add a notice to the confirmation dialog of the according action (nicer but a little more work)
$deleteAllowedLocations = User::getAllowedLocations("machine.delete");
$rebootAllowedLocations = User::getAllowedLocations('.rebootcontrol.action.reboot');
$shutdownAllowedLocations = User::getAllowedLocations('.rebootcontrol.action.reboot');
$wolAllowedLocations = User::getAllowedLocations('.rebootcontrol.action.wol');
$execAllowedLocations = User::getAllowedLocations('.rebootcontrol.action.exec');
$benchmarkAllowedLocations = User::getAllowedLocations('.vmstore.benchmark');
// Only make client clickable if user is allowed to view details page
$detailsAllowedLocations = User::getAllowedLocations("machine.view-details");
$location = self::buildLocationLookup();
$rows = [];
$colValCount = []; // Count unique values for several columns
foreach ($allRows as &$row) {
settype($row['locationid'], 'int');
$row['link_details'] = in_array($row['locationid'], $detailsAllowedLocations);
//$row['firstseen'] = Util::prettyTime($row['firstseen']);
$row['lastseen_int'] = $row['lastseen'];
$row['lastseen'] = Util::prettyTime($row['lastseen']);
//$row['lastboot'] = Util::prettyTime($row['lastboot']);
$row['gbram'] = Dictionary::number(ceil($row['mbram'] / 512) / 2, 1); // Trial and error until we got "expected" rounding..
$row['gbtmp'] = Dictionary::number($row['id44mb'] / 1024);
$row['gbpersist'] = Dictionary::number($row['id45mb'] / 1024);
$octets = explode('.', $row['clientip']);
if (count($octets) === 4) {
$row['subnet'] = "$octets[0].$octets[1].$octets[2]";
$row['lastoctet'] = $octets[3];
}
$row['ramclass'] = StatisticsStyling::ramColorClass((int)$row['mbram']);
$row['kvmclass'] = StatisticsStyling::kvmColorClass($row['kvmstate']);
$row['hddclass'] = StatisticsStyling::hddColorClass((int)$row['gbtmp']);
if (empty($row['hostname'])) {
$row['hostname'] = $row['clientip'];
}
if (isset($machineWithConfigOverrides[$row['machineuuid']])) {
$row['confvars'] = $machineWithConfigOverrides[$row['machineuuid']];
}
if (isset($machineWithHdds[$row['machineuuid']])) {
$row['hddcount'] = $machineWithHdds[$row['machineuuid']];
} else if ($row['id44mb'] > 0) {
// This might be a machine that wasn't booted with a recent system, and hence doesn't have HWinfo in DB
// If we have ID44 space in our main table, we most likely got an HDD, so fake a count of 1
$row['hddcount'] = 1;
}
if (!isset($machineNicSpeed[$row['machineuuid']])) {
$row['nic-speed'] = 0;
$row['nic-speed_s'] = '???';
} else {
$row['nic-speed'] = $machineNicSpeed[$row['machineuuid']];
$row['nic-speed_s'] = Dictionary::number($machineNicSpeed[$row['machineuuid']]);
}
if (isset($row['data']) && !$row['data']) {
$row['nohdd'] = true;
}
// Shorten CPU names a bit for prettier display in small column
$row['cpumodel'] = preg_replace('/\(R\)|\(TM\)|\bintel\b|\bamd\b|\bcpu\b|dual-core|\bdual\s+core\b|\bdual\b|\bprocessor\b/i', ' ', $row['cpumodel']);
if (!empty($row['rmmodule'])) {
$data = RunMode::getRunMode($row['machineuuid'], RunMode::DATA_STRINGS);
if ($data !== false) {
$row['moduleName'] = $data['moduleName'];
$row['modeName'] = $data['modeName'];
}
if (!$row['isclient'] && $row['state'] === 'IDLE') {
$row['state'] = 'OCCUPIED';
}
if (!$row['isclient']) {
unset($row['currentuser']);
}
}
if ($row['state'] === 'IDLE' || $row['state'] === 'OCCUPIED') {
if ((!empty($row['currentrunmode']) || !empty($row['rmmodule']))
&& $row['currentrunmode'] !== $row['rmmodule']) {
$row['wrongRunMode'] = true;
if (!empty($row['currentrunmode'])) {
$wrongModule = Module::get($row['currentrunmode']);
$row['currentrunmode'] = $wrongModule === false ? $row['currentrunmode'] : $wrongModule->getDisplayName();
}
}
}
$row['state_' . $row['state']] = true;
if ($row['locationid'] > 0) {
$row['location'] = $location[$row['locationid']];
}
foreach (['locationid', 'cpumodel', 'nic-speed_s', 'gbram', 'gbtmp'] as $key) {
if (!isset($colValCount[$key][$row[$key]])) {
$colValCount[$key][$row[$key]] = [];
}
$colValCount[$key][$row[$key]][] = $row['machineuuid'];
}
$rows[] =& $row;
}
// Now if all machines are from the same location, try to load the roomplan
// Also, collect all properties that are the same across all machines for display in the sidebar
$roomsvg = null;
$side = [];
if (!empty($rows) && !empty($colValCount)) {
if (count($colValCount['locationid']) === 1
&& ($lid = array_key_first($colValCount['locationid'])) > 0
&& Module::isAvailable('roomplanner')) {
$roomsvg = PvsGenerator::generateSvg($lid, false, 0, 1, true, $colValCount['locationid'][$lid]);
}
// Handle our selected attributes
foreach (['locationid', 'cpumodel', 'nic-speed_s', 'gbram', 'gbtmp'] as $key) {
if (count($colValCount[$key]) === 1) {
$val = array_key_first($colValCount[$key]);
// Suffixes are not localized, but hopefully generic enough for now
switch ($key) {
case 'locationid':
if (!isset($location[$val]))
continue 2;
$val = $location[$val]['name'];
break;
case 'gbram':
$val .= ' GiB RAM';
break;
case 'gbtmp':
$val .= ' GiB ID-44';
break;
case 'nic-speed_s':
$val .= ' MBit/s';
break;
}
$side[] = $val;
}
}
}
$data = array(
'rowCount' => count($rows),
'rows' => $rows,
'showList' => 1,
'show' => 'list',
'redirect' => $_SERVER['QUERY_STRING'],
'rebootcontrol' => (Module::get('rebootcontrol') !== false),
'canReboot' => !empty($rebootAllowedLocations),
'canShutdown' => !empty($shutdownAllowedLocations),
'canDelete' => !empty($deleteAllowedLocations),
'canWol' => !empty($wolAllowedLocations),
'canExec' => !empty($execAllowedLocations),
'canBenchmark' => !empty($benchmarkAllowedLocations),
'roomsvg' => $roomsvg,
'sidebar' => $side,
);
Render::addTemplate('clientlist', $data);
}
private static function buildLocationLookup(): array
{
$ret = [];
$i = 0;
foreach (Location::getLocationsAssoc() as $lid => $data) {
$ret[$lid] = ['sort' => ++$i, 'name' => $data['locationname']];
}
return $ret;
}
}
