Архив рубрики: Блог

Подключаем Bluetooth колонку к Raspberry.

Дмитрий 09.11.2020 Комментариев нет

Здравствуйте! Сегодня мы переселим нашу Алису в Bluetooth колонку. Для начала подключаемся к консоли платы и устанавливаем пакеты: apt-get install pulseaudio pulseaudio-module-bluetooth bluez pi-bluetooth mpg123 Пользователя pi и www-data добавляем в группу bluetooth sudo usermod -a -G bluetooth -a pi sudo usermod -a -G bluetooth -a www-data И в группу audio sudo usermod -a -G audio -a pi sudo usermod… Читать далее »

Установка брокера сообщений Mosquitto

Дмитрий 03.11.2020 Комментариев нет

MQTT – это протокол сообщений machine-to-machine, предназначенный для коммуникации между устройствами интернета вещей. Он используется для отслеживания перемещения транспортных средств, настройки сенсорных сетей, домашней автоматизации и сбора данных. Mosquitto – это популярный MQTT-сервер (на языке MQTT это называется брокер). Его несложно установить и настроить, а еще он активно поддерживается сообществом. Этот мануал поможет установить Mosquitto, настроить поддержку SSL и безопасное взаимодействие… Читать далее »

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

Дмитрий 02.11.2020 Комментариев нет

Сегодня мы с вами отобразим на сцене данные о загрузке процессора, его температуре и состояние памяти. Для этого создадим сценарий. Открываем вкладку Объекты, переходим в меню Сценарии и нажимаем кнопку Добавить новый сценарий. В поле Название вводим 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;

}

Даём право голоса нашей Алисе

Дмитрий 01.11.2020 Комментариев нет

Здравствуйте мои дорогие внедрители. Ну что, разрешим нашей Алисе говорить?! Тогда поехали. Воспроизведение оповещений происходит при помощи mplayer. Давайте его установим. sudo apt-get install mplayer И так у нас появился звук кукушки но голоса так и не появилось. Нам необходим голосовой движок. Будем устанавливать из маркета приложений RHVoice. Но сначала установим все зависимости: sudo apt-get install -y scons gcc git flite flite1-dev… Читать далее »

Основные циклы Majordomo

Дмитрий 01.11.2020 Комментариев нет

Без циклов система работать не будет. Иногда эти циклы сами останавливаются. Давайте настроим автоматический запуск циклов сервера если они остановятся. Чтобы реализовать перезапуск, нам нужно создать сценарий и шаблон поведения. До создания сценария и шаблона, создадим файл restart.sh sudo nano /var/www/restart.sh Заполним файл следующим кодом:

#!/bin/bash
sudo systemctl restart majordomo

1 2	#!/bin/bash sudo systemctl restart majordomo

Сохраним изменения Ctrl+O, Enter, Ctrl+X. Теперь надо установить пользователя и группу на созданный файл… Читать далее »

Установка сервера MajorDomo на Raspberry-PI с чистого листа.

Дмитрий 01.11.2020 Комментариев нет

Приветствую вас. Всех тех кто только начал изучать тему “Безумного дома” и всех тех кто уже давно в теме. В этой статье я хочу поделиться своим опытом установки и настройки сервера с самого начала на raspberry. Начиная с установки образа системы Debian и заканчивая входом на уже установленный но не настроенный сервер используя web интерфейс. Для работы нам понадобится: Raspberry… Читать далее »

Лабораторный блок питания

Дмитрий 29.10.2020 Комментариев нет

Здравствуйте! Предлагаю вашему вниманию интересную конструкцию лабораторного блока питания. Этот блок питания я повторил вот с этого сайта. Так как статью я не писал про то как я его собирал и ребята из аккаунта fasebook попросили поделиться проверенной схемой, тогда я могу смело порекомендовать именно эту конструкцию. Так как всё это делаю в спешке то обещаю немного позже оформить свою… Читать далее »

Полевой день 2020. Тестируем 5.7 гиг

Дмитрий 17.10.2020 Комментариев нет

Автоматическое управление радиостанцией.

Дмитрий 16.10.2020 Комментариев нет

Я тут для своих “друзей” один незатейливый гаджет сконструировал. Хе, они ещё не догадываются, что там будет далее. Ну да ладно, о чем это я…. Аааа, устройство. С его помощью можно абсолютно любую радиостанцию перевести в автоматический режим передачи любого сигнала. В моём случае я передаю текстовое сообщение используя азбуку Морзе. В прошивку устройства входит и генератор CW. Так же… Читать далее »

а как же без этого :)

Дмитрий 16.10.2020 Комментариев нет