}
// list alias + cmd restriction
if ($is_cmdLic) {
$is_cmdFam = false;
} elseif ($is_cmdFam) {
$is_cmdLic = false;
}
if (preg_match('/^(?:(fam)|(lic))/i', $cmd, $m)) {
$is_cmdFam = $m[1] ? true : false;
$is_cmdLic = !$is_cmdFam;
} else {
$cmd = ($is_cmdFam ? 'fam' : 'lic') . $cmd;
}
$LST = [];
if ($list) {
$LST = array_combine_sum(explode(';', $list));
} else {
foreach ($_REQUEST as $k => $v) {
if (strlen($k) > 2 && is_numeric($v)) {
$LST[$k] = (double) $v;
}
}
}
$jresult = request_ws($cmd, $LST, $degVers);
if ($outmode == 'json') {
header('Content-Type: application/json');
print $jresult;
} else {
$aux = json_decode($jresult);
var_dump($aux);
}
/**
* Same as set_OpenMetricsBox() but using request_ws() data.
*/
function set_OpenMetricsBox_byFamList($params, $famList, $degVers = 2, $gbox_h = 0)
{
$jresult = request_ws('famqts_calc', $famList, $degVers, 1);
// list, version, retType
$relatMsg = $OUT = '';
foreach ($jresult as $k => $v) {
if (!is_array($v)) {
$relatMsg .= " {$k}={$v}";
}
}
$percs = [];
$avgs = [];
foreach ($jresult['scopes'] as $idx => $sc) {
$scope = $sc['scope'];
$percs[$scope] = round($sc['perc'], 1);
$avgs[$scope] = round($sc['avg_scope'], 1);
}
foreach ($jresult['list'] as $idx => $info) {
$perc = round($info['perc'], 1);
$relatMsg .= "<br/>   <i>{$info['name']}</i> (<i>{$info['scope']}</i> <b>{$info['deg']}</b>) com {$info['qt']} jous ({$perc}%)";
}
$OUT = set_OpenMetricsBox($params, $percs, $avgs, '480', true, 200, $gbox_h, $degVers, $relatMsg);
return $OUT;
}
