Moin,
hat jemand schon die Fritz Steckdosen mit dem EIBpc geschaltet? gibt es schon ein Macro Bibliothek?
hat jemand schon die Fritz Steckdosen mit dem EIBpc geschaltet? gibt es schon ein Macro Bibliothek?
FritzBoxConnect=9u08
FritzBoxIP=192.168.178.1
FritzBoxPort=80u16
FritzBoxResult=$ $c1400
FritzBoxChallenge=$1234567z$c08
FritzBoxChallengeUTF16=$31003200330034003500360037007a00$c32
//FritzBoxChallengeResponse=FritzBoxChallenge + MD5SUM(FritzBoxChallengeUTF16 + FritzBoxPasswortUTF16)c1400
FritzBoxSID=$0000000000000000$c16
FritzBoxBlockTime=0u16
FritzBoxCommand1=$GET $ + $/login_sid.lua$ + $ HTTP/1.1$+CRLF
FritzBoxTemp=$$c1400
FritzBoxPasswort=$äbc$c14
FritzBoxPasswortUTF16=$äbc$c14
FritzBoxCheck=$$c14
if pbutton(FritzBoxConnectButton,FritzBoxConnectButton_P)==1 then {
if FritzBoxConnect>5 then {
FritzBoxConnect=connecttcp(FritzBoxPort,FritzBoxIP);
vmDebugUDP($Verbunden$);
}endif;
}endif
if change(FritzBoxConnect) and FritzBoxConnect == 0 then {
sendtcparray(FritzBoxPort,FritzBoxIP,FritzBoxCommand1,size(FritzBoxCommand1));
vmDebugUDP($Ich war hier$);
vmDebugUDP(FritzBoxCommand1);
}endif
sendtcparray(FritzBoxPort,FritzBoxIP,FritzBoxCommand1,size(FritzBoxCommand1));
if event(readtcp(FritzBoxPort,FritzBoxIP,FritzBoxTemp)) then {
FritzBoxResult=FritzBoxTemp;
XMLParse(FritzBoxResult,SID,0,FritzBoxSID);
XMLParse(FritzBoxResult,Challenge,0,FritzBoxChallenge);
XMLParse(FritzBoxResult,BlockTime,0,FritzBoxBlockTime);
}endif
sendtcparray(FritzBoxPort,FritzBoxIP,FritzBoxCommand1,size(FritzBoxCommand1));
if event(readtcp(FritzBoxPort,FritzBoxIP,FritzBoxTemp)) then {
FritzBoxResult=FritzBoxTemp;
XMLParse(FritzBoxResult,SID,0,FritzBoxSID);
XMLParse(FritzBoxResult,Challenge,0,FritzBoxChallenge);
XMLParse(FritzBoxResult,BlockTime,0,FritzBoxBlockTime);
}endif

#define DEBUG_FUNCTIONS_HUE
#define DEBUG_FUNCTIONS_GLOBAL
FritzBoxConnect=9u08
FritzBoxIP=192.168.178.1
FritzBoxPort=80u16
FritzBoxResult=$ $c1400
FritzBoxChallenge=$1234567z$c08
FritzBoxChallengeUTF16=$31003200330034003500360037007a00$c32
//FritzBoxChallengeResponse=FritzBoxChallenge + MD5SUM(FritzBoxChallengeUTF16 + FritzBoxPasswortUTF16)c1400
FritzBoxSID=$0000000000000000$c16
FritzBoxBlockTime=0u16
FritzBoxCommand1=$GET $ + $/login_sid.lua$ + $ HTTP/1.1$+CRLF
FritzBoxTemp=$$c1400
FritzBoxPasswort=$äbc$c14
FritzBoxPasswortUTF16=$äbc$c14
FritzBoxCheck=$$c14
Port=0u16
IP=0u32
Data=$$
if pbutton(FritzBoxConnectButton,FritzBoxConnectButton_P)==1 then {
if FritzBoxConnect>5 then {
FritzBoxConnect=connecttcp(FritzBoxPort,FritzBoxIP);
vmDebugUDP($Verbunden$);
}endif;
}endif
if change(FritzBoxConnect) and FritzBoxConnect == 0 then {
sendtcp(80u16, 192.168.178.1, FritzBoxCommand1);
vmDebugUDP(FritzBoxCommand1);
}endif
if event(readtcp(Port,IP,Data)) and (IP == FritzBoxIP) and (Port == FritzBoxPort) then {
FritzBoxResult=Data;
XMLParse(FritzBoxResult,SID,0,FritzBoxSID);
XMLParse(FritzBoxResult,Challenge,0,FritzBoxChallenge);
XMLParse(FritzBoxResult,BlockTime,0,FritzBoxBlockTime);
}endif
| HTTP/1.1 500 Internal Server ErrorConnection: closeContent-Length: 198Content-Type: text/html; charset=utf-8 500 Internal Server Error ERR_NO_MEMORY Webserver Thu, 22 Aug 2019 17:20:50 GMT |
Wir verarbeiten personenbezogene Daten über die Nutzer unserer Website mithilfe von Cookies und anderen Technologien, um unsere Dienste bereitzustellen. Weitere Informationen findest Du in unserer Datenschutzerklärung.
Indem Du unten auf "ICH stimme zu" klickst, stimmst Du unserer Datenschutzerklärung und unseren persönlichen Datenverarbeitungs- und Cookie-Praktiken zu, wie darin beschrieben. Du erkennst außerdem an, dass dieses Forum möglicherweise außerhalb Deines Landes gehostet wird und bist damit einverstanden, dass Deine Daten in dem Land, in dem dieses Forum gehostet wird, gesammelt, gespeichert und verarbeitet werden.


Kommentar