MegaD 328

Bluefox

~~@Bluefox:~~

3. Что надо вызвать чтобы появилась страница с настройками для порта? "http://192.168.0.14/sec/?pt=0" ?

А для P14 "http://192.168.0.14/sec/?pt=14" ? `

http://192.168.0.14/sec/?pt=0
filename="p0.png" index="2">~~

http://192.168.0.14/sec/?pt=7
filename="p7.png" index="1">~~

http://192.168.0.14/sec/?pt=14
filename="p14.png" index="0">~~ `
Вроде начинает проясняться. Спасибо!

> Надеюсь это только для симулятора :), не для парсинга %)
Именно для парсинга. Я хочу считать все "…sec/?pt=Х" и извлечь настройки. А что есть какой то другой путь?

vtec

Если я не ошибаюсь, то есть, т.к. есть скрипт который все настройки экспортирует.

Работа с настройками

При использовании ключа –ee (стирание EEPROM), часто необходимого при обновлении прошивки, из памяти устройства удаляется вся текущая нстройка портов. Это очень неудобно после перепрошивки восстанавливать настройки устройства и портов. Поэтому начиная с версии 1.1 скрипта megad-cfg.php была предусмотрена функция считывания и записи текущих настроек.

Считывание конфигурации устройства и запись в файл megad.cfg

php megad-cfg.php --ip 192.168.0.14 --read-conf megad.cfg -p sec

Считывание конфигурации из файла и запись в устройство

php megad-cfg.php --ip 192.168.0.14 --write-conf megad.cfg -p sec

Сканирование всех устройств типа MegaD-328 в сети

php megad-cfg.php –scan

vtec

Сканирование (из php файла):

$sock = socket_create(AF_INET, SOCK_DGRAM, SOL_UDP); 
socket_set_option($sock, SOL_SOCKET, SO_BROADCAST, 1); 
$broadcast_ip = preg_replace("/(\d+)\.(\d+)\.(\d+)\.(\d+)/", "$1.$2.$3.255", $local_ip);

# Prepearing sockets
if ( !empty($options['local-ip']) )
$local_ip = $options['local-ip'];
else
{
	$local_ip = gethostbyname(gethostname());
	if ( empty($local_ip) || preg_match("/127\./", $local_ip) )
	{
		if ( preg_match("/^WIN/", PHP_OS) )
		$local_ip = get_local_ip_win();
		else
		{
			$find_ip = get_local_ip();
			foreach ( $find_ip as $iface => $iface_ip)
			{
				if ( preg_match("/^192\.168/", $find_ip[$iface]) || preg_match("/^10\./", $find_ip[$iface]) )
				$local_ip = $find_ip[$iface];
			}
		}
	}

	if ( !preg_match("/192\.168\./", $local_ip) && !preg_match("/10\.0\./", $local_ip) && !preg_match("/172\.16\./", $local_ip) )
	{
		echo "Unable to detect local network\nPlase, specify local IP-address with --local-ip\n";
		exit;
	}
}

# Scanning network for Mega-cool MegaD-devices ;)
if ( array_key_exists('scan', $options) || array_key_exists('s', $options) )
{

	$broadcast_string = chr(0xAA).chr(0).chr(12);

	socket_sendto($sock, $broadcast_string, strlen($broadcast_string), 0, $broadcast_ip, 52000);
	usleep(100);
	do
	{
		$pkt = fread($socket, 10);
		if ( !empty($pkt) && ord($pkt[0]) == 0xAA )
		echo ord($pkt[1]).".".ord($pkt[2]).".".ord($pkt[3]).".".ord($pkt[4])."\n";
	}
	while ( $pkt != false );
}

Чтение конфига

	if ( array_key_exists('read-conf', $options) )
	{
		echo "Reading configuration... ";

		$pages = array("cf=1", "cf=2");
		//$pages = array();
		$page = file_get_contents("http://".$options['ip']."/".$options['p']);
		$ports = preg_replace("/.*\?pt=(\d+).*/", "$1", $page);
		for ( $i = 0; $i <= $ports; $i++ )
		$pages[] = "pt=$i";

		$fh = fopen($options['read-conf'], "w");
		$dom = new DOMDocument();
		$preset_flag = 0;

		for ( $i = 0; $i < count($pages); $i++ )
		{
			if ( $preset_flag == 1 )			
			{
				//echo "Setting preset 0\n";
				$page = file_get_contents("http://".$options['ip']."/".$options['p']."/?cf=1&pr=0");
				sleep(1);
				$preset_flag = 2;
			}

			$page = file_get_contents("http://".$options['ip']."/".$options['p']."/?".$pages[$i]);

			@$dom->loadHTML($page);
			//$url = "http://".$options['ip']."/".$options['p']."/?";
			$url = "";

			$els=$dom->getelementsbytagname('input');
			foreach($els as $inp)
			{
				if ( $inp->getAttribute('type') != "submit" )
				{
					$name=$inp->getAttribute('name');
					//$value=urlencode($inp->getAttribute('value'));
					if ( $inp->getAttribute('type') == "checkbox" )
					{
						if ( $inp->hasAttribute('checked') )
						$value=1;
						else
						$value='';
					}
					else
					$value=$inp->getAttribute('value');
					if ( $name != "pt" )
					{
						if ( $name == "sl" && empty($value));
						else
						$url .= "$name=$value&";
					}
				}
			}

			$select = $dom->getelementsbytagname('select');

			foreach($select as $elem)
			{
				$name=$elem->getAttribute('name');
				$els=$elem->getelementsbytagname('option');

				$sel_flag = 0;
				foreach($els as $inp)
				{
					if ( $inp->hasAttribute('selected') )
					{
						//$name=$inp->getAttribute('name');
						$value=urlencode($inp->getAttribute('value'));
						$value=$inp->getAttribute('value');
						$url .= "$name=$value&";
						$sel_flag = 1;

						if ( $pages[$i] == "cf=1" && $name == "pr" && !empty($value) )
						{
							$preset_flag = 1;
							$stored_preset = $value;
						}

					}
				}
				// Хак ввиду того, что PHP DOM почему-то не может распарсить значение <> поля "Mode"
				if ( $sel_flag == 0 && $name == "m" )
				$url .= "m=3&";

			}

			$url = preg_replace("/&$/", "", $url);
			fwrite($fh, "$url\n");
		}

		fclose($fh);

		if ( $preset_flag == 2 )			
		{
			//echo "Setting preset 1\n";
			$page = file_get_contents("http://".$options['ip']."/".$options['p']."/?cf=1&pr=$stored_preset");
			sleep(1);
		}

		echo "OK\n";
	}

vtec

Посмотрел чтение конфига, там тот же парсинг идет :lol:

А вот поиск устройств, всего две строки, отправка udp запроса бродкастом на порт 52000

vtec

Из мануала:

Если порт настроен как вход, то через слеш указывается значение счетчика входа. То есть там может быть не 0, а любая цифра.

Bluefox

Спасибо. Вот теперь я знаю, что я буду делать на выходных.

Bluefox

Что возвращают?

Как HTML.

vtec

MegaD-328 by [ab-log.ru](http://ab-log.ru) (fw: 3.30b5)
[Config](/sec/?cf=1)
-- Ports --
[P0 - IN](/sec/?pt=0)
[P1 - IN](/sec/?pt=1)
[P2 - IN](/sec/?pt=2)
[P3 - IN](/sec/?pt=3)
[P4 - IN](/sec/?pt=4)
[P5 - IN](/sec/?pt=5)
[P6 - IN](/sec/?pt=6)
[P7 - OUT](/sec/?pt=7)
[P8 - OUT](/sec/?pt=8)
[P9 - OUT](/sec/?pt=9)
[P10 - OUT](/sec/?pt=10)
[P11 - OUT](/sec/?pt=11)
[P12 - OUT](/sec/?pt=12)
[P13 - OUT](/sec/?pt=13)
[A6 - ADC](/sec/?pt=14)
[A7 - ADC](/sec/?pt=15)

2. Тоже самое что и первое

3.

[Back](/sec) | [Megad-ID](/sec/?cf=2)

<form action="/sec/">IP: 
Pwd: 
GW: 
SRV: 
Script: 
Preset: <select name="pr"><option value="0" selected="">Norm</option><option value="1">7I7O</option></select>
T check: 
Alarm T: 
Cur T: 37
</form>

[Back](/sec) | [Config](/sec/?cf=1)

<form action="/sec/">Megad-ID: 
srv loop: 
</form>

vtec

Предложение, если я выставляю режим кнопки "изменение", то соответственно, я буду использовать доп. режимы, это либо долгое нажатие, либо двойное, либо в сумме. Так вот предлагаю эти галочки у этих двух параметров по умолчанию чтобы были выставлены. Возможно такое?

Bluefox

Дописал драйвер с твоей помощью. Можешь попробовать?

Haus · javascript: 4.1.10

Привет

В новой прошивке Megad есть поддержка датчиков 1wire DS18B20 и DS1990A (считыватели ключей iButton, EM-Marene с поддержкой протокола TM/1-wire). Вместо DHT22 определился DHT11, а вместо 1W тоже определился DHT11.

1W

[Back](/sec)
P7
temp:26.81

<form action="/sec/">Type <select name="pty"><option value="255">NC</option><option value="0">In</option><option value="1">Out</option><option value="3" selected="">DSen</option></select>
Mode <select name="m"><option value="0">Norm</option><option value="1" selected="">></option><option value="2"><</option><option value="3"><></option></select>
Val 
Act 
Net  
Sensor: <select name="d"><option value="1">DHT11</option><option value="2">DHT22</option><option value="3" selected="">1W</option><option value="4">iB</option></select>
</form>

DHT22

[Back](/sec)
P0
temp:30.30
hum:38.70

<form action="/sec/">Type <select name="pty"><option value="255">NC</option><option value="0">In</option><option value="1">Out</option><option value="3" selected="">DSen</option><option value="2">ADC</option></select>
Sensor: <select name="d"><option value="1">DHT11</option><option value="2" selected="">DHT22</option><option value="3">1W</option><option value="4">iB</option></select>
</form>

443_screencapture-192-168-1-68-8081-1440449132648.png
443_screencapture-192-168-1-14-sec-1440449943300.png

Bluefox

В новой версии фирмваре поменялось значение аттрибута m для цифровых датчиков.

Я запрограммировал, как в новой версии. Кстати у неё есть номер, что бы я мог написать, что поддерживается версия от X.Y

Может кто нибудь попробовать новую версию?

cd /opt/iobroker
npm install https://github.com/ioBroker/ioBroker.megad/tarball/master

> В новой прошивке Megad есть поддержка датчиков 1wire DS18B20 и DS1990A (считыватели ключей iButton, EM-Marene с поддержкой протокола TM/1-wire). Вместо DHT22 определился DHT11, а вместо 1W тоже определился DHT11.
А всё остальное работает???

Andrei34

В настройках параметры считываются шыкарно , но не записываются . А в Vis ни на что не реагирует :( .

Bosya

Поигрался с новым драйвером и есть вопрос про длинное нажатие. Сейчас это работает как одинарное и двойное нажатие - true и сразу false, хотя я продолжаю держать кнопку.Хотелось бы иметь true после времени задержки, а false по отпусканию кнопки…

2015-09-03 13:54:06.920 - debug: inMem message * megad.0.p11_P11_long val=true, ack=true, ts=1441277647, from=system.adapter.megad.0, lc=1441277647

2015-09-03 13:54:07.126 - debug: inMem message * megad.0.p11_P11_long val=false, ack=true, ts=1441277647, from=system.adapter.megad.0, lc=1441277647

vtec

А зачем?

Вообще мега такой запрос отправляет, можете на свой скрипт направить мегу.

Bosya

~~@vtec:~~

А зачем? `
Мне это нужно для димирования. На одиночный и двойной клик вешаем какие то функции - например включение/выключение свете, общее выключение света. На длинное нажатие вешаем плавную регулировку яркости.
~~@vtec:~~

Вообще мега такой запрос отправляет, можете на свой скрипт направить мегу. `
Мега не может такой запрос отправлять, так как p11_P11_long, это чисто программная переменная, которая генерируется после определенной задержки длинного нажатия и выставляется в true, а вот после этого сразу скидывается в false. Не совсем логично. Если кому надо не для димирования, то он ловит только true и пользует его, а для димирования нужен реальный false который будет генерироваться по отпусканию кнопки.

Свой скрипт написать конечно могу, но мне тогда придется переписывать полностью все одинарные, двойные нажатия и полностью отказаться от достаточно удобного драйвера.

А чем может помешать правильная обработка конца нажатия?

Bluefox

~~@Andrei34:~~

В настройках параметры считываются шыкарно , но не записываются . `
А можно логи? (Предварительно выставить на level=debug)

~~@Andrei34:~~

А в Vis ни на что не реагирует :( . `
Поправил. Должно работать.

Осталось выяснить, что делать с выходом в режиме PWM.

Bluefox

~~@Bosya:~~

Поигрался с новым драйвером и есть вопрос про длинное нажатие. Сейчас это работает как одинарное и двойное нажатие - true и сразу false, хотя я продолжаю держать кнопку.Хотелось бы иметь true после времени задержки, а false по отпусканию кнопки…

2015-09-03 13:54:06.920 - debug: inMem message * megad.0.p11_P11_long val=true, ack=true, ts=1441277647, from=system.adapter.megad.0, lc=1441277647

2015-09-03 13:54:07.126 - debug: inMem message * megad.0.p11_P11_long val=false, ack=true, ts=1441277647, from=system.adapter.megad.0, lc=1441277647 `
Поправил. Установка через github, как сверху описано.

Bosya

~~@Bluefox:~~

Поправил. Установка через github, как сверху описано. `
Спасибо, это заработало отлично.

Есть следующая проблема. Для выходов ШИМ не правильно читаются данные. Если 0 то val=false, а если 1-255 то val = true.

Приєтом команды:

http://192.168.24.69/sec/?pt=12&cmd=get

255 (ШИМ Р12 - 250, val=true)

http://192.168.24.69/sec/?cmd=all

;;;;;;;temp:0/hum:0;;;ON;OFF/14;<color color="red">1;temp:25/hum:33;799;1023 (ШИМ р12 - 1, val=true)

2015-09-09 10:37:08.053 - debug: megad.0 detected new value on port [12]: false

2015-09-09 10:37:08.078 - debug: inMem message megad.0.* megad.0.p12_P12 val=false, ack=true, ts=1441784228, from=system.adapter.megad.0, lc=1441784228
645____.png

Bluefox

~~@Bosya:~~

~~@Bluefox:~~

Поправил. Установка через github, как сверху описано. `
Спасибо, это заработало отлично.

Есть следующая проблема. Для выходов ШИМ не правильно читаются данные. Если 0 то val=false, а если 1-255 то val = true.

Приєтом команды:

http://192.168.24.69/sec/?pt=12&cmd=get

255 (ШИМ Р12 - 250, val=true)

http://192.168.24.69/sec/?cmd=all

;;;;;;;temp:0/hum:0;;;ON;OFF/14;<color color="red">1;temp:25/hum:33;799;1023 (ШИМ р12 - 1, val=true)

2015-09-09 10:37:08.053 - debug: megad.0 detected new value on port [12]: false

2015-09-09 10:37:08.078 - debug: inMem message megad.0.* megad.0.p12_P12 val=false, ack=true, ts=1441784228, from=system.adapter.megad.0, lc=1441784228 `
Поправил. Только значение скалируется от 0 до 1. Что бы получить значение как в меге надо указать фактор 256.

Output 1 => 1 / 256 = 0.00390625

А запись настроек в мегу работает?

Community Forum

NEWS

MegaD 328

Support us

781

32.5k

81.7k

1.3m