Загрузка и температура CPU. Состояние ОЗУ на главной сцене. Курс валют.

Сегодня мы с вами отобразим на сцене данные о загрузке процессора, его температуре и состояние памяти. Для этого создадим сценарий. Открываем вкладку Объекты, переходим в меню Сценарии и нажимаем кнопку Добавить новый сценарий. В поле Название вводим Sys_Info, в поле Категория выбираем Режим работы и нажимаем кнопку Добавить. В появившемся ниже окне выбираем Код и заполняем его следующим кодом:

$color = "grey";
 
 $g_line[0] = "&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;";
 $g_line[1] = "&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; _";
 $g_line[2] = "&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; _ _";
 $g_line[3] = "&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; _ _ _";
 $g_line[4] = "&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; _ _ _ _";
 $g_line[5] = "&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; _ _ _ _ _";
 $g_line[6] = "&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; _ _ _ _ _ _";
 $g_line[7] = "&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; _ _ _ _ _ _ _";
 $g_line[8] = "&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; _ _ _ _ _ _ _ _";
 $g_line[9] = "&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; _ _ _ _ _ _ _ _ _";
$g_line[10] = "&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; _ _ _ _ _ _ _ _ _ _";
$g_line[11] = "&nbsp; &nbsp; &nbsp; &nbsp; _ _ _ _ _ _ _ _ _ _ _";
$g_line[12] = "&nbsp; &nbsp; &nbsp; _ _ _ _ _ _ _ _ _ _ _ _";
$g_line[13] = "&nbsp; &nbsp; _ _ _ _ _ _ _ _ _ _ _ _ _";
$g_line[14] = "&nbsp; _ _ _ _ _ _ _ _ _ _ _ _ _ _";
$g_line[15] = "_ _ _ _ _ _ _ _ _ _ _ _ _ _ _";
 
//----------------------- Название процессора ---------------------------------------------------------
$cpu_tip = exec("cat /proc/cpuinfo | grep Hardware | awk '{print $3}'");
sg('ThisComputer.CPUtip', $cpu_tip);
 
// -------------------- Температура процессора --------------------------------------------------------
$cpu_temp=shell_exec('cat /sys/class/thermal/thermal_zone0/temp') / 1000;
$cpu_temp=round($cpu_temp,0);
sg("ThisComputer.CPUtemp",$cpu_temp);
$maxtemp = 75;
$mintemp = 25;
$kf = ($maxtemp - $mintemp)/15; // 15 это делений на индикаторе
sg('ThisComputer.CPUtemp', $cpu_temp);
$t15 = round (($cpu_temp - $mintemp) / $kf); // чтобы шкала начиналась с $mintemp 
if ($cpu_temp <= $mintemp) { 
   $t15 = 0; // и оганичим нижнее значение на 0
} elseif ($cpu_temp >= $maxtemp) {
   $t15 = 15; // ограничим максимум на 15 делений
}
$t15_line = $g_line[$t15];
sg('ThisComputer.CPUtemp_-1', $t15_line);
 
 
// и цвет для неё
if (($cpu_temp >= 0) && ($cpu_temp < 45)) {
   $color = 'lime';
} else if (($cpu_temp >= 45) && ($cpu_temp < 60)) {
   $color = 'greenyellow';
} else if (($cpu_temp >= 60) && ($cpu_temp < 70)) {
   $color = 'yellow';
} else if ($cpu_temp >= 70) {
   $color = 'red';
} else {
   $color = 'grey';
}
 
sg ('ThisComputer.CPUtemp_color', $color);
sg ('ThisComputer.CPUtemp_color_-1', $color);
 
// сдвинем значения с вылетом последнего
for ($i = 9; $i >= 0; $i--) {
   $j = $i - 1;
   sg ('ThisComputer.CPUtemp_'.$i, gg('ThisComputer.CPUtemp_'.$j));
   sg ('ThisComputer.CPUtemp_color_'.$i, gg('ThisComputer.CPUtemp_color_'.$j));
}
 
//---------------------- Загрузка процессора -----------------------------------------------------
//$cpu_load=gg(ThisComputer.CPU_usage); //shell_exec('cat /proc/loadavg');
$cpu_load=(exec("top -bn 1 | awk '{print $9}' | tail -n +8 | awk '{s+=$1} END {print s}'"))/4;
$cpu_load=round($cpu_load,0);
setGlobal("ThisComputer.CPUload",$cpu_load);
 
$l15 = round ($cpu_load / 6.66); // чтобы из 15 значений 100/15 = 6,(6)
$l15_line = $g_line[$l15];
sg('ThisComputer.CPUload_-1', $l15_line);
 
// и цвет для неё
if (($cpu_load >= 0) && ($cpu_load < 30)) {
   $color = 'lime';
} else if (($cpu_load >= 30) && ($cpu_load < 45)) {
   $color = 'greenyellow';
} else if (($cpu_load >= 45) && ($cpu_load < 60)) {
   $color = 'yellow';
} else if ($cpu_load >= 60) {
   $color = 'red';
} else {
   $color = 'grey';
}
 
sg ('ThisComputer.CPUload_color', $color);
sg ('ThisComputer.CPUload_color_-1', $color);
 
// сдвинем значения с вылетом последнего
for ($i = 9; $i >= 0; $i--) {
   $j = $i - 1;
   sg ('ThisComputer.CPUload_'.$i, gg('ThisComputer.CPUload_'.$j));
   sg ('ThisComputer.CPUload_color_'.$i, gg('ThisComputer.CPUload_color_'.$j));
}
 
// -------------------- Использование ОЗУ -------------------------------------------------------------
 
$mem_total=exec("cat /proc/meminfo | grep MemTotal | awk '{print $2}'");
$mem_free=exec("cat /proc/meminfo | grep MemFree | awk '{print $2}'");
$mem_usage=$mem_total - $mem_free;
$sys_memory=round($mem_usage * 100 / $mem_total, 0);
$mem_free=round($mem_free/1024,0);
$mem_total=round($mem_total/1024,0);
$mem_usage=round($mem_usage/1024,0);
sg("ThisComputer.memory_free",$mem_free);
sg("ThisComputer.memory_total",$mem_total);
sg("ThisComputer.memory_usage",$mem_usage);
sg("ThisComputer.System_memory",$sys_memory);
 
//say('total: '.$mem_total/1024);
//say('usage: '.$mem_usage/1024);
//say('free: '.$mem_free/1024);
 
$color = ($sys_memory < 80) ? "lime" : "red";
sg ('ThisComputer.System_memory_color', $color);
 
// -------------------- Использование Флеш-карты -------------------------------------------------------------
$bytes = disk_free_space("."); 
$si_prefix = array( 'B', 'KB', 'MB', 'GB', 'TB', 'EB', 'ZB', 'YB' );
$base = 1024;
$class = min((int)log($bytes , $base) , count($si_prefix) - 1);
$disk_used = round($bytes / pow($base,$class)); // . ' ' . $si_prefix[$class];
$disk_used_percent = round($disk_used*100/32, 0);
setGlobal('ThisComputer.DISKused', $disk_used);
setGlobal('ThisComputer.DISKusedPersent', $disk_used_percent);
$color = ($disk_used < 80) ? "lime" : "red";
sg ('ThisComputer.DISKused_color', $color);
 
 
// -------------------- преобразование Uptime ----------------------------------------------------------
 
 
//System uptime
$sys_uptime=shell_exec("uptime");
$sys_uptime = explode(" up ", $sys_uptime);
$sys_uptime = explode(",", $sys_uptime[1]);
$sys_uptime = $sys_uptime[0]; // .", ".$sys_uptime[1];
setGlobal("ThisComputer.System_uptime",$sys_uptime);
 
/**
 * Секунды в строку
 * Эта функция возвращает кол-во секунд преобразованное в дни, часы, минуты, секунды
 *
 * @param integer $seconds всего время в секундах.
 * @return string "1234567" возвращает "14 дн., 6 час., 56 мин., 7 сек.".
 */
function secondsToString($seconds) {
    $result = '';
    if ($seconds >= 86400) {
        $days = floor($seconds / 86400);
        $seconds = $seconds % 86400;
        $result = $days.' д., ';
    }
    if ($seconds >= 3600) {
        $hours = floor($seconds / 3600);
        $seconds = $seconds % 3600;
        $result .= $hours.' час., ';
    }
    if ($seconds >= 60) {
        $minutes = floor($seconds / 60);
        $seconds = $seconds % 60;
        $result .= $minutes.' мин., ';
    }
    $result .= $seconds.' сек.';
    return $result;
}

100

101

102

103

104

105

106

107

108

109

110

111

112

113

114

115

116

117

118

119

120

121

122

123

124

125

126

127

128

129

130

131

132

133

134

135

136

137

138

139

140

141

142

143

144

145

146

147

148

149

150

151

152

153

154

155

156

157

158

159

160

161

162

163

164

165

166

167

168

$color = "grey";

$g_line[0] = "                             ";

$g_line[1] = "                            _";

$g_line[2] = "                          _ _";

$g_line[3] = "                        _ _ _";

$g_line[4] = "                      _ _ _ _";

$g_line[5] = "                    _ _ _ _ _";

$g_line[6] = "                  _ _ _ _ _ _";

$g_line[7] = "                _ _ _ _ _ _ _";

$g_line[8] = "              _ _ _ _ _ _ _ _";

$g_line[9] = "            _ _ _ _ _ _ _ _ _";

$g_line[10] = "          _ _ _ _ _ _ _ _ _ _";

$g_line[11] = "        _ _ _ _ _ _ _ _ _ _ _";

$g_line[12] = "      _ _ _ _ _ _ _ _ _ _ _ _";

$g_line[13] = "    _ _ _ _ _ _ _ _ _ _ _ _ _";

$g_line[14] = "  _ _ _ _ _ _ _ _ _ _ _ _ _ _";

$g_line[15] = "_ _ _ _ _ _ _ _ _ _ _ _ _ _ _";

//----------------------- Название процессора ---------------------------------------------------------

$cpu_tip = exec("cat /proc/cpuinfo | grep Hardware | awk '{print $3}'");

sg('ThisComputer.CPUtip', $cpu_tip);

// -------------------- Температура процессора --------------------------------------------------------

$cpu_temp=shell_exec('cat /sys/class/thermal/thermal_zone0/temp') / 1000;

$cpu_temp=round($cpu_temp,0);

sg("ThisComputer.CPUtemp",$cpu_temp);

$maxtemp = 75;

$mintemp = 25;

$kf = ($maxtemp - $mintemp)/15; // 15 это делений на индикаторе

sg('ThisComputer.CPUtemp', $cpu_temp);

$t15 = round (($cpu_temp - $mintemp) / $kf); // чтобы шкала начиналась с $mintemp

if ($cpu_temp <= $mintemp) {

$t15 = 0; // и оганичим нижнее значение на 0

} elseif ($cpu_temp >= $maxtemp) {

$t15 = 15; // ограничим максимум на 15 делений

}

$t15_line = $g_line[$t15];

sg('ThisComputer.CPUtemp_-1', $t15_line);

// и цвет для неё

if (($cpu_temp >= 0) && ($cpu_temp < 45)) {

$color = 'lime';

} else if (($cpu_temp >= 45) && ($cpu_temp < 60)) {

$color = 'greenyellow';

} else if (($cpu_temp >= 60) && ($cpu_temp < 70)) {

$color = 'yellow';

} else if ($cpu_temp >= 70) {

$color = 'red';

} else {

$color = 'grey';

}

sg ('ThisComputer.CPUtemp_color', $color);

sg ('ThisComputer.CPUtemp_color_-1', $color);

// сдвинем значения с вылетом последнего

for ($i = 9; $i >= 0; $i--) {

$j = $i - 1;

sg ('ThisComputer.CPUtemp_'.$i, gg('ThisComputer.CPUtemp_'.$j));

sg ('ThisComputer.CPUtemp_color_'.$i, gg('ThisComputer.CPUtemp_color_'.$j));

}

//---------------------- Загрузка процессора -----------------------------------------------------

//$cpu_load=gg(ThisComputer.CPU_usage); //shell_exec('cat /proc/loadavg');

$cpu_load=(exec("top -bn 1 | awk '{print $9}' | tail -n +8 | awk '{s+=$1} END {print s}'"))/4;

$cpu_load=round($cpu_load,0);

setGlobal("ThisComputer.CPUload",$cpu_load);

$l15 = round ($cpu_load / 6.66); // чтобы из 15 значений 100/15 = 6,(6)

$l15_line = $g_line[$l15];

sg('ThisComputer.CPUload_-1', $l15_line);

// и цвет для неё

if (($cpu_load >= 0) && ($cpu_load < 30)) {

$color = 'lime';

} else if (($cpu_load >= 30) && ($cpu_load < 45)) {

$color = 'greenyellow';

} else if (($cpu_load >= 45) && ($cpu_load < 60)) {

$color = 'yellow';

} else if ($cpu_load >= 60) {

$color = 'red';

} else {

$color = 'grey';

}

sg ('ThisComputer.CPUload_color', $color);

sg ('ThisComputer.CPUload_color_-1', $color);

// сдвинем значения с вылетом последнего

for ($i = 9; $i >= 0; $i--) {

$j = $i - 1;

sg ('ThisComputer.CPUload_'.$i, gg('ThisComputer.CPUload_'.$j));

sg ('ThisComputer.CPUload_color_'.$i, gg('ThisComputer.CPUload_color_'.$j));

}

// -------------------- Использование ОЗУ -------------------------------------------------------------

$mem_total=exec("cat /proc/meminfo | grep MemTotal | awk '{print $2}'");

$mem_free=exec("cat /proc/meminfo | grep MemFree | awk '{print $2}'");

$mem_usage=$mem_total - $mem_free;

$sys_memory=round($mem_usage * 100 / $mem_total, 0);

$mem_free=round($mem_free/1024,0);

$mem_total=round($mem_total/1024,0);

$mem_usage=round($mem_usage/1024,0);

sg("ThisComputer.memory_free",$mem_free);

sg("ThisComputer.memory_total",$mem_total);

sg("ThisComputer.memory_usage",$mem_usage);

sg("ThisComputer.System_memory",$sys_memory);

//say('total: '.$mem_total/1024);

//say('usage: '.$mem_usage/1024);

//say('free: '.$mem_free/1024);

$color = ($sys_memory < 80) ? "lime" : "red";

sg ('ThisComputer.System_memory_color', $color);

// -------------------- Использование Флеш-карты -------------------------------------------------------------

$bytes = disk_free_space(".");

$si_prefix = array( 'B', 'KB', 'MB', 'GB', 'TB', 'EB', 'ZB', 'YB' );

$base = 1024;

$class = min((int)log($bytes , $base) , count($si_prefix) - 1);

$disk_used = round($bytes / pow($base,$class)); // . ' ' . $si_prefix[$class];

$disk_used_percent = round($disk_used*100/32, 0);

setGlobal('ThisComputer.DISKused', $disk_used);

setGlobal('ThisComputer.DISKusedPersent', $disk_used_percent);

$color = ($disk_used < 80) ? "lime" : "red";

sg ('ThisComputer.DISKused_color', $color);

// -------------------- преобразование Uptime ----------------------------------------------------------

//System uptime

$sys_uptime=shell_exec("uptime");

$sys_uptime = explode(" up ", $sys_uptime);

$sys_uptime = explode(",", $sys_uptime[1]);

$sys_uptime = $sys_uptime[0]; // .", ".$sys_uptime[1];

setGlobal("ThisComputer.System_uptime",$sys_uptime);

/**

* Секунды в строку

* Эта функция возвращает кол-во секунд преобразованное в дни, часы, минуты, секунды

* @param integer $seconds всего время в секундах.

* @return string "1234567" возвращает "14 дн., 6 час., 56 мин., 7 сек.".

function secondsToString($seconds) {

$result = '';

if ($seconds >= 86400) {

$days = floor($seconds / 86400);

$seconds = $seconds % 86400;

$result = $days.' д., ';

}

if ($seconds >= 3600) {

$hours = floor($seconds / 3600);

$seconds = $seconds % 3600;

$result .= $hours.' час., ';

}

if ($seconds >= 60) {

$minutes = floor($seconds / 60);

$seconds = $seconds % 60;

$result .= $minutes.' мин., ';

}

$result .= $seconds.' сек.';

return $result;

}

Данный сценарий отрабатывает только один раз. Создадим ещё один сценарий который будет запускать сценарий Sys_info каздые 3 секунды для обновления новых данных с Raspberry. Так же открываем вкладку Объекты, переходим в меню Сценарии и нажимаем кнопку Добавить новый сценарий. В поле Название вводим Timer_Sys_Info, в поле Категория выбираем Режим работы и нажимаем кнопку Добавить. В появившемся ниже окне выбираем Код и заполняем его следующим кодом:

runScript('MonitorSist');
setTimeOut("timer_Xs_timeout", "runScript('timer_Xs');", 3);

1 2	runScript('MonitorSist'); setTimeOut("timer_Xs_timeout", "runScript('timer_Xs');", 3);

Переходим в меню сцены. Там нас интересует элемент Проц, Память, Температура. Сначала выбираем элемент Проц, переходим почти в самый низ страницы до раздела Состояние. Видим там три состояния high, low и default. Нам нужно изменить код этих состояний по очереди. Начнём с состояния high и low.Для этих состояние изменения одинаковы. В поле Код здесь нужно server.cpuload заменить на ThisComputer.CPUload. Должна получиться вот такая строка :

%ThisComputer.CPUload%<font size="1">CPU</font>

1	%ThisComputer.CPUload%<font size="1">CPU</font>

В списке Cвязанный объект выбираем ThisComputer и нажимаем кнопку Сохранить.

Для состояния default в поле Код вводим тоже самое, связаный объект и свойство отсутсвуют. Вместо них нам нужно в первой строчке поля Advanced condition заменить server.cpuload на ThisComputer.CPUload. Стока кода должна выглядеть так:

if (gg('ThisComputer.CPUload')>=(float)'10' && gg('ThisComputer.CPUload')<=(float)'80') {

1	if (gg('ThisComputer.CPUload')>=(float)'10' && gg('ThisComputer.CPUload')<=(float)'80') {

Нажимаем сохранить и переходим к редактированию элемента Память. Элемент Память настраивается точно так же, как и элемент Проц. Здесь нам везде нужно заменить server.memload на ThisComputer.System_memory. Связанный объект мы так же выбираем ThisComputer.

Элемент Температура настраивается так. Значение поля Код нужно привести к следующему виду:

%ThisComputer.CPUtemp%°C

1	%ThisComputer.CPUtemp%°C

Теперь переходим во вкладку Приложения, выбираем Курс валют, на открывшейся странице снимаем все галочки кроме Курс Банка России (для России) и нажимаем кнопку Обновить. После этого появятся интересующие нас курсы валют.

На этом и порешим. В следующий раз будем подключать наши рампочки – розетки к сцене.

Добавить комментарий Отменить ответ