FritzBox: ActiveDevices - Versionsgeschichte

Krikan: FHEM(R)

2017-01-27T15:15:53Z

FHEM(R)

← Nächstältere Version		Version vom 27. Januar 2017, 17:15 Uhr
Zeile 3:		Zeile 3:
	Diese Funktion stellt fest, ob ein bestimmtes Gerät an der [[AVM Fritz!Box\|FritzBox]] angemeldet ist. Bei einem WLAN-Gerät kann es bis zu zehn Minuten dauern, bis die FritzBox feststellt, dass das Gerät nicht mehr angemeldet ist.		Diese Funktion stellt fest, ob ein bestimmtes Gerät an der [[AVM Fritz!Box\|FritzBox]] angemeldet ist. Bei einem WLAN-Gerät kann es bis zu zehn Minuten dauern, bis die FritzBox feststellt, dass das Gerät nicht mehr angemeldet ist.

	'''Hinweis''': Seit ~~fhem~~ 5.4 gibt es das Modul [[Anwesenheitserkennung\|PRESENCE]], das auch im Modus '''fritzbox''' definiert werden kann und dieselben Aufgaben übernimmt wie die hier vorgestellte Routine.		'''Hinweis''': Seit FHEM 5.4 gibt es das Modul [[Anwesenheitserkennung\|PRESENCE]], das auch im Modus '''fritzbox''' definiert werden kann und dieselben Aufgaben übernimmt wie die hier vorgestellte Routine.

	== fhem.cfg ==		== fhem.cfg ==
Zeile 39:		Zeile 39:

	== Test ==		== Test ==
	Die Funktion kann getestet werden durch die Eingabe im ~~fhem~~ Frontend:		Die Funktion kann getestet werden durch die Eingabe im FHEM Frontend:
	<nowiki>{ FBWLanDevActive('MyLANDeviceName', "MyAttendance")}</nowiki>		<nowiki>{ FBWLanDevActive('MyLANDeviceName', "MyAttendance")}</nowiki>

Ph1959de: Englisch/Deutsch Mischung komplett auf Deutsch umgestellt; html-Formatierungen entfernt

2013-10-08T07:58:37Z

Englisch/Deutsch Mischung komplett auf Deutsch umgestellt; html-Formatierungen entfernt

← Nächstältere Version		Version vom 8. Oktober 2013, 09:58 Uhr
Zeile 1:		Zeile 1:
	~~This is a derivate of the function~~ FBWlanStat ~~published~~ in "FritzBox: WhoIsAtHome". ~~Thanks to the original autor~~		'''FritzBox ActiveDevices''' ist eine von ''FBWlanStat'' abgeleitete Funktion (FBWlanStat ist im Detail beschrieben in [[FritzBox: WhoIsAtHome]]).

	~~Stellt~~ fest, ob ein bestimmtes ~~Device in~~ der FB angemeldet ist. ~~For a~~ WLAN ~~device it can take about 10 minutes before the FB knows it left~~.		Diese Funktion stellt fest, ob ein bestimmtes Gerät an der [[AVM Fritz!Box\|FritzBox]] angemeldet ist. Bei einem WLAN-Gerät kann es bis zu zehn Minuten dauern, bis die FritzBox feststellt, dass das Gerät nicht mehr angemeldet ist.
	~~<br><b>HINWEIS</b>~~: Seit fhem 5.4 gibt es das Modul PRESENCE, das auch im Modus '''fritzbox''' definiert werden kann und dieselben Aufgaben übernimmt wie die hier vorgestellte Routine.~~<br>~~
			'''Hinweis''': Seit fhem 5.4 gibt es das Modul [[Anwesenheitserkennung\|PRESENCE]], das auch im Modus '''fritzbox''' definiert werden kann und dieselben Aufgaben übernimmt wie die hier vorgestellte Routine.

	== fhem.cfg ==		== fhem.cfg ==
			Erforderliche Definitionen in der fhem.cfg:
			define MyAttendance dummy
			attr MyAttendance icon icoHouse.png
			attr MyAttendance room WhoIsAtHome
			define WLAN notify WLAN {FBWLanDevActive('MyWLANDeviceName', "MyAttendance")}
			define search_for_MyWLANDeviceName at +*00:05:00 trigger WLAN

	~~<pre>define MyAttendance dummy~~		== Unterroutine FBWLanDevActive ==
	~~attr MyAttendance icon icoHouse.png~~		Unterroutine, z. B. in MyUtils.pm definiert:
	~~attr MyAttendance room WhoIsAtHome~~		sub FBWLanDevActive($$) {
	~~define WLAN notify WLAN {~~FBWLanDevActive~~('MyWLANDeviceName', "MyAttendance")}~~		my ($net_device1)=@_[0];
	~~define search_for_MyWLANDeviceName at +*00:05:00 trigger WLAN~~		my $myLength=length($net_device1);
	~~</pre>~~		my $number=0;
			my $status=0;
	== ~~Sub~~ z.B. 99 MyUtils.pm ==		my $net_device="";
	~~<pre>~~		my $net_device2="";
	sub FBWLanDevActive($$) {		my $attendance="";
	my ($net_device1)=@_[0];		while($number <= 25){
	my $myLength=length($net_device1);		$net_device=
	my $number=0;		qx(/usr/bin/ctlmgr_ctl r landevice settings/landevice$number/name);
	my $status=0;		$net_device2=substr($net_device, 0, $myLength);
	my $net_device="";		if($net_device2 eq $net_device1){
	my $net_device2="";		$status=
	my $attendance="";		qx(/usr/bin/ctlmgr_ctl r landevice settings/landevice$number/active);
	while($number <= 25){		if ($status == 1) {last;}
	$net_device=		}
	qx(/usr/bin/ctlmgr_ctl r landevice settings/landevice$number/name);		$number++;
	$net_device2=substr($net_device, 0, $myLength);
	if($net_device2 eq $net_device1){
	$status=
	qx(/usr/bin/ctlmgr_ctl r landevice settings/landevice$number/active);
	if ($status == 1) {last;}
	}		}
	$~~number++~~;		if ($status == 1) {$attendance="Anwesend";}else{$attendance="Abwesend";}
			if(Value("@_[1]") ne $attendance){fhem "set @_[1] $attendance"}
	}		}
	~~if ($status == 1) {$attendance="Anwesend";}else{$attendance="Abwesend";}~~
	~~if(Value("@_[1]") ne $attendance){fhem "set @_[1] $attendance"}~~
	}
	~~</pre>~~

	== Test ==		== Test ==
	Eingabe im fhem Frontend:		Die Funktion kann getestet werden durch die Eingabe im fhem Frontend:
	<~~pre~~>		<nowiki>{ FBWLanDevActive('MyLANDeviceName', "MyAttendance")}</nowiki>
	{ FBWLanDevActive('MyLANDeviceName', "MyAttendance")}
	</~~pre~~>

	== Hinweis ==		== Hinweis ==
	~~Benutzername~~ (hier'MyLANDeviceName') aus dem FB Frontend ermitteln.		Benutzernamen (hier "MyLANDeviceName") aus dem FB Frontend ermitteln: es ist ausreichend, einen eindeutigen Teil am Anfang des Gerätenames anzugeben. Die Routine sucht über alle Gerätenamen, ob es ein Gerät gibt, dessen name mit dem angegebenen Suchbegriff beginnt.
	~~It is sufficient to specify the first unique part of the LanDevice. The routine searches all devices if it can find at least~~ 1 ~~device of which the name starts with~~ "~~MyLanDevicename~~".
			Beispiel: angenommen, der Gerätename ist "HTC-Harry" or "HTC-Harry-1", dann findet ein Aufruf
			:<code>FBWLanDevActive('HTC-Harry', "GSMHarry")</code>
			oder sogar auch "nur"
			:<code>FBWLanDevActive('HTC', "GSMHarry")</code>

	~~Example:~~		das Gerät (vorausgesetzt, es ist das einzige Gerät, das mit dieser Buchstabenfolge beginnt).
	~~if the devicename is HTC-Harry or HTC-Harry-1, a call with FBWLanDevActive~~(~~'HTC-Harry'~~, ~~"GSMHarry") or even FBWLanDevActive('HTC'~~, ~~"GSMHarry"~~) ~~is sufficient if this is the only device with a name starting with "HTC"~~

	~~== Links ==~~

	[[Kategorie:FritzBox]]		[[Kategorie:FritzBox]]
	[[Kategorie:Code Snippets]]		[[Kategorie:Code Snippets]]

Uli am 8. Oktober 2013 um 07:20 Uhr

2013-10-08T07:20:59Z

← Nächstältere Version		Version vom 8. Oktober 2013, 09:20 Uhr
Zeile 2:		Zeile 2:

	Stellt fest, ob ein bestimmtes Device in der FB angemeldet ist. For a WLAN device it can take about 10 minutes before the FB knows it left.		Stellt fest, ob ein bestimmtes Device in der FB angemeldet ist. For a WLAN device it can take about 10 minutes before the FB knows it left.
			<br><b>HINWEIS</b>: Seit fhem 5.4 gibt es das Modul PRESENCE, das auch im Modus '''fritzbox''' definiert werden kann und dieselben Aufgaben übernimmt wie die hier vorgestellte Routine.<br>

	== fhem.cfg ==		== fhem.cfg ==

Markusbloch am 11. Mai 2013 um 09:16 Uhr

2013-05-11T09:16:07Z

← Nächstältere Version		Version vom 11. Mai 2013, 11:16 Uhr
Zeile 2:		Zeile 2:

	Stellt fest, ob ein bestimmtes Device in der FB angemeldet ist. For a WLAN device it can take about 10 minutes before the FB knows it left.		Stellt fest, ob ein bestimmtes Device in der FB angemeldet ist. For a WLAN device it can take about 10 minutes before the FB knows it left.

	== fhem.cfg ==		== fhem.cfg ==
	<~~nowiki~~>define MyAttendance dummy
			<pre>define MyAttendance dummy
	attr MyAttendance icon icoHouse.png		attr MyAttendance icon icoHouse.png
	attr MyAttendance room WhoIsAtHome		attr MyAttendance room WhoIsAtHome
	define WLAN notify WLAN {FBWLanDevActive('MyWLANDeviceName', "MyAttendance")}		define WLAN notify WLAN {FBWLanDevActive('MyWLANDeviceName', "MyAttendance")}
	define search_for_MyWLANDeviceName at +*00:05:00 trigger WLAN</~~nowiki~~>		define search_for_MyWLANDeviceName at +*00:05:00 trigger WLAN
			</pre>

	== Sub z.B. 99 MyUtils.pm ==		== Sub z.B. 99 MyUtils.pm ==
	<~~nowiki~~>sub FBWLanDevActive($$) {		<pre>
			sub FBWLanDevActive($$) {
	my ($net_device1)=@_[0];		my ($net_device1)=@_[0];
	my $myLength=length($net_device1);		my $myLength=length($net_device1);
Zeile 30:		Zeile 35:
	if ($status == 1) {$attendance="Anwesend";}else{$attendance="Abwesend";}		if ($status == 1) {$attendance="Anwesend";}else{$attendance="Abwesend";}
	if(Value("@_[1]") ne $attendance){fhem "set @_[1] $attendance"}		if(Value("@_[1]") ne $attendance){fhem "set @_[1] $attendance"}
	}</~~nowiki~~>		}
			</pre>

	== Test ==		== Test ==
	Eingabe im fhem Frontend:		Eingabe im fhem Frontend:
			<pre>
	{ FBWLanDevActive('MyLANDeviceName', "MyAttendance")}		{ FBWLanDevActive('MyLANDeviceName', "MyAttendance")}
			</pre>

	== Hinweis ==		== Hinweis ==
Zeile 43:		Zeile 52:

	== Links ==		== Links ==

			[[Kategorie:FritzBox]]
			[[Kategorie:Code Snippets]]

Generix: Die Seite wurde neu angelegt: „This is a derivate of the function FBWlanStat published in "FritzBox: WhoIsAtHome". Thanks to the original autor Stellt fest, ob ein bestimmtes Device in der …“

2013-05-10T20:45:08Z

Die Seite wurde neu angelegt: „This is a derivate of the function FBWlanStat published in "FritzBox: WhoIsAtHome". Thanks to the original autor Stellt fest, ob ein bestimmtes Device in der …“

Neue Seite

This is a derivate of the function FBWlanStat published in "FritzBox: WhoIsAtHome". Thanks to the original autor

Stellt fest, ob ein bestimmtes Device in der FB angemeldet ist. For a WLAN device it can take about 10 minutes before the FB knows it left.
== fhem.cfg ==
<nowiki>define MyAttendance dummy
attr MyAttendance icon icoHouse.png
attr MyAttendance room WhoIsAtHome
define WLAN notify WLAN {FBWLanDevActive('MyWLANDeviceName', "MyAttendance")}
define search_for_MyWLANDeviceName at +*00:05:00 trigger WLAN</nowiki>
== Sub z.B. 99 MyUtils.pm ==
<nowiki>sub FBWLanDevActive($$) {
my ($net_device1)=@_[0];
my $myLength=length($net_device1);
my $number=0;
my $status=0;
my $net_device="";
my $net_device2="";
my $attendance="";
while($number <= 25){
$net_device=
qx(/usr/bin/ctlmgr_ctl r landevice settings/landevice$number/name);
$net_device2=substr($net_device, 0, $myLength);
if($net_device2 eq $net_device1){
$status=
qx(/usr/bin/ctlmgr_ctl r landevice settings/landevice$number/active);
if ($status == 1) {last;}
}
$number++;
}
if ($status == 1) {$attendance="Anwesend";}else{$attendance="Abwesend";}
if(Value("@_[1]") ne $attendance){fhem "set @_[1] $attendance"}
}</nowiki>
== Test ==
Eingabe im fhem Frontend:
{ FBWLanDevActive('MyLANDeviceName', "MyAttendance")}

== Hinweis ==
Benutzername (hier'MyLANDeviceName') aus dem FB Frontend ermitteln.
It is sufficient to specify the first unique part of the LanDevice. The routine searches all devices if it can find at least 1 device of which the name starts with "MyLanDevicename".

Example:
if the devicename is HTC-Harry or HTC-Harry-1, a call with FBWLanDevActive('HTC-Harry', "GSMHarry") or even FBWLanDevActive('HTC', "GSMHarry") is sufficient if this is the only device with a name starting with "HTC"

== Links ==