Code: Alles auswählen
/**
* Switch Anel NET-PwrCtrl surge via UDP
*
* @param string $ip
* @param integer $surge_no
* @param integer $state
* @param integer $port
* @param string $password
* @return boolean
*/
function surge_switch($ip="192.168.0.244",$surge_no=0,$state=0,$port=75,$password="user") {
$port = intval($port);
$surge_no = intval($surge_no);
if(!$ip || !$port || !strlen($password) || !$surge_no)
return false;
$cmd = (!$state ? "Sw_off" : "Sw_on").$surge_no.$password.chr(0)."\r\n";
$fp = fsockopen("udp://".$ip, $port,$errno,$errstr);
if (!$fp) return false;
fwrite($fp, $cmd);
fclose($fp);
return true;
}
Code: Alles auswählen
/**
* Search Anel NET surges via UDP broadcast
*
* @param integer $listen_port
* @param string $ip
* @param integer $port
* @return array or false on failure
*/
function find_surge_switch($listen_port=77,$ip="255.255.255.255",$port=75) {
if(!$ip || !$port || !$listen_port)
return false;
$opts = array('socket' => array('bindto' => '0.0.0.0:'.$listen_port));
$context = stream_context_create($opts);
$fp = stream_socket_client("udp://".$ip.":".$port, $errno, $errstr, 30, STREAM_CLIENT_CONNECT, $context);
if (!$fp) {
echo $errstr;
return false;
}
fwrite($fp, $cmd);
usleep(500000);
fwrite($fp, "wer da?\r\n");
$data = fread($fp,1024);
fclose($fp);
$surgeinfo = array_combine(array("type","name","ip","mask","gateway","mac","surge1","surge2","surge3","surge4","surge5","surge6","surge7","surge8","disabled","http_port",),explode(":",trim($data)));
foreach ($surgeinfo as $k=>$v) {
if (preg_match("/^surge(\d)$/i",$k,$regs)) {
$no = $regs[1];
$surgeinfo["surge"][$no] = array_combine(array("name","state"),explode(",",$v));
$surgeinfo["surge"][$no]["disabled"] = ($surgeinfo["disabled"] & pow(2,$no-1)) >> ($no-1);
unset($surgeinfo[$k]);
}
}
unset($surgeinfo["disabled"]);
$surgeinfo["mac"] = array_reduce(explode(".",$surgeinfo["mac"]),create_function('$a,$b','return strtoupper((strlen($a) ? $a.":" : "").($b>15 ? dechex($b) : "0".dechex($b)));'));
return $surgeinfo;
}Code: Alles auswählen
Array
(
[type] => NET-PwrCtrl
[name] => NET-CONTROL
[ip] => 192.168.0.244
[mask] => 255.255.255.0
[gateway] => 192.168.0.1
[mac] => 00:11:22:33:44:55
[http_port] => 80
[surge] => Array
(
[1] => Array
(
[name] => Nr. 1
[state] => 0
[disabled] => 0
)
[2] => Array
(
[name] => Nr. 2
[state] => 1
[disabled] => 0
)
[3] => Array
(
[name] => Nr. 3
[state] => 0
[disabled] => 0
)
[4] => Array
(
[name] => Nr. 4
[state] => 0
[disabled] => 1
)
[5] => Array
(
[name] => Nr. 5
[state] => 0
[disabled] => 1
)
[6] => Array
(
[name] => Nr. 6
[state] => 0
[disabled] => 1
)
[7] => Array
(
[name] => Nr. 7
[state] => 0
[disabled] => 1
)
[8] => Array
(
[name] => Nr. 8
[state] => 0
[disabled] => 1
)
)
)Code: Alles auswählen
/**
* Switch Anel NET-PwrCtrl surge via UDP and check the result
*
* @param string $ip
* @param integer $surge_no
* @param integer $state
* @param integer $port
* @param string $password
* @return boolean
*/
function surge_switch($ip="192.168.0.244",$surge_no=0,$state=0,$port=75,$password="user") {
$port = intval($port);
$surge_no = intval($surge_no);
// Do some input checks.
if(!$ip || !$port || !strlen($password) || !$surge_no)
return false;
// Create the command for sending to the surge switch
$cmd = (!$state ? "Sw_off" : "Sw_on").$surge_no.$password.chr(0)."\r\n";
// Bind to port $port (send and recieve port are the same for compatibility reasons)
$opts = array('socket' => array('bindto' => '0.0.0.0:'.$port));
$context = stream_context_create($opts);
$fp = stream_socket_client("udp://".$ip.":".$port, $errno, $errstr, 30, STREAM_CLIENT_CONNECT, $context);
// Check if the binding succeded
if (!$fp) {
//echo $errstr;
return false;
}
// Loop until the surge has switched to the wanted state
do {
fwrite($fp, $cmd);
// Give surge 500ms time to switch
usleep(500000);
// Send the "wer da?" packet
fwrite($fp, "wer da?\r\n");
// Read and parse the data
$data = fread($fp,1024);
$surgeinfo = parse_surge_switch_response($data);
// loop until the surge has switched to the wanted state
} while ($surgeinfo["surge"][$surge_no]["state"] != $state);
// Close the UDP connection.
fclose($fp);
return true;
}
/**
* Parse the response of the "wer da?" packet from the Anel NET-PwrCtrl surge switch
*
* @param string $data
* @return array
*/
function parse_surge_switch_response($data) {
// Create an array with named keys out of the $data variable
$surgeinfo = array_combine(array("type","name","ip","mask","gateway","mac","surge1","surge2","surge3","surge4","surge5","surge6","surge7","surge8","disabled","http_port",),explode(":",trim($data)));
// Loop through the array and put surge1 ..2 ..3 into a single array
foreach ($surgeinfo as $k=>$v) {
// Parse the key if ist is surge1 ..2 ..3
if (preg_match("/^surge(\d)$/i",$k,$regs)) {
$no = $regs[1];
// Parse "name" and "state" into a subarray
$surgeinfo["surge"][$no] = array_combine(array("name","state"),explode(",",$v));
// Parse the "disabled" value and place it into a seperate key for this surge
$surgeinfo["surge"][$no]["disabled"] = ($surgeinfo["disabled"] & pow(2,$no-1)) >> ($no-1);
// Finally, delete the surge1 ..2 ..3 entry
unset($surgeinfo[$k]);
}
}
// Remove the "disabled" entry.
unset($surgeinfo["disabled"]);
// Parse the MAC which is in decimal into hexdecimal format
$surgeinfo["mac"] = array_reduce(explode(".",$surgeinfo["mac"]),create_function('$a,$b','return strtoupper((strlen($a) ? $a.":" : "").($b>15 ? dechex($b) : "0".dechex($b)));'));
// Finished :-)
return $surgeinfo;
}Vielleicht wäre hier eine Nachricht an den Anel Support angebracht, damit diese den Fehler in einer der nächsten Firmware-Versionen beheben können.Helli hat geschrieben:...
Die original "mobile.htm" ist leider nicht richtig programmiert...
-->