FHEM/fhem-mirror
2
0
Fork 0
mirror of https://github.com/fhem/fhem-mirror.git synced 2025-02-25 22:15:09 +00:00
Code Issues Releases Wiki Activity

72_FRITZBOX.pm: IP/URL um reinen DNS (ohne Domain) erweitert

Browse Source 
git-svn-id: https://svn.fhem.de/fhem/trunk@27343 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
jowiemann 2023-03-20 13:21:26 +00:00
parent 069e98eced
commit ae39488a57
1 changed files with 14 additions and 22 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

36
fhem/FHEM/72_FRITZBOX.pm
View File

@ -41,7 +41,7 @@ use warnings;
use Blocking; use Blocking;
use HttpUtils; use HttpUtils;
my $ModulVersion = "07.50.9c"; my $ModulVersion = "07.50.9d";
my $missingModul = ""; my $missingModul = "";
my $missingModulWeb = ""; my $missingModulWeb = "";
my $missingModulTR064 = ""; my $missingModulTR064 = "";
@ -248,6 +248,7 @@ sub FRITZBOX_Define($$)
$hash->{HOST} = "fritz.box"; $hash->{HOST} = "fritz.box";
$hash->{HOST} = $args[2] if defined $args[2] && $args[2] =~ m=$URL_MATCH=i; $hash->{HOST} = $args[2] if defined $args[2] && $args[2] =~ m=$URL_MATCH=i;
$hash->{fhem}{definedHost} = $hash->{HOST}; # to cope with old attribute definitions $hash->{fhem}{definedHost} = $hash->{HOST}; # to cope with old attribute definitions
my $msg; my $msg;
@ -402,7 +403,8 @@ sub FRITZBOX_Url_Regex {
my $domain = "(?:\\.$base)*"; my $domain = "(?:\\.$base)*";
my $tld = "(?:\\.(?:[${chars}]{2,}))"; my $tld = "(?:\\.(?:[${chars}]{2,}))";
my $fulldomain = $host . $domain . $tld . "\\.?"; my $fulldomain = $host . $domain . $tld . "\\.?";
my $name = "(?:$ip|$fulldomain)"; # my $name = "(?:$ip|$fulldomain)";
my $name = "(?:$ip|$host)";
my $port = "(?::\\d{2,5})?"; my $port = "(?::\\d{2,5})?";
my $path = "(?:[/?#]\\S*)?"; my $path = "(?:[/?#]\\S*)?";
@ -2530,6 +2532,8 @@ sub FRITZBOX_Readout_Run_Web($)
my $dName = $resultWan->{data}->{scanlist}->[$i]->{ssid}; my $dName = $resultWan->{data}->{scanlist}->[$i]->{ssid};
$dName .= " (Kanal: " . $resultWan->{data}->{scanlist}->[$i]->{channel}; $dName .= " (Kanal: " . $resultWan->{data}->{scanlist}->[$i]->{channel};
$dName .= ", Band: " . $resultWan->{data}->{scanlist}->[$i]->{bandId} . ")"; $dName .= ", Band: " . $resultWan->{data}->{scanlist}->[$i]->{bandId} . ")";
$dName =~ s/24ghz/2.4 GHz/;
$dName =~ s/5ghz/5 GHz/;
$rName = $resultWan->{data}->{scanlist}->[$i]->{mac}; $rName = $resultWan->{data}->{scanlist}->[$i]->{mac};
$rName =~ s/:/_/g; $rName =~ s/:/_/g;
@ -5965,7 +5969,7 @@ sub FRITZBOX_fritztris($)
<br/><br/> <br/><br/>
The box is partly controlled via the official TR-064 interface but also via undocumented interfaces between web interface and firmware kernel.</br> The box is partly controlled via the official TR-064 interface but also via undocumented interfaces between web interface and firmware kernel.</br>
<br> <br>
The modul was tested on FRITZ!BOX 7390 and 7490 with Fritz!OS 6.20 and higher. The modul was tested on FRITZ!BOX 7590, 7490 and FRITZ!WLAN Repeater 1750E with Fritz!OS 7.50 and higher.
<br> <br>
Check also the other FRITZ!BOX moduls: <a href="#SYSMON">SYSMON</a> and <a href="#FB_CALLMONITOR">FB_CALLMONITOR</a>. Check also the other FRITZ!BOX moduls: <a href="#SYSMON">SYSMON</a> and <a href="#FB_CALLMONITOR">FB_CALLMONITOR</a>.
<br> <br>
@ -5978,7 +5982,7 @@ sub FRITZBOX_fritztris($)
<br> <br>
<code>define &lt;name&gt; FRITZBOX [host]</code> <code>define &lt;name&gt; FRITZBOX [host]</code>
<br/> <br/>
The attribute <i>host</i> is the web address (name or IP) of the FRITZ!BOX. If it is missing, the modul switches in local mode or uses the default host address "fritz.box". The parameter <i>host</i> is the web address (name or IP) of the FRITZ!BOX. If it is missing, the modul uses the default host address "fritz.box".
<br/><br/> <br/><br/>
Example: <code>define Fritzbox FRITZBOX</code> Example: <code>define Fritzbox FRITZBOX</code>
<br/><br/> <br/><br/>
@ -6228,12 +6232,6 @@ sub FRITZBOX_fritztris($)
Polling-Interval. Default is 300 (seconds). Smallest possible value is 60. Polling-Interval. Default is 300 (seconds). Smallest possible value is 60.
</li><br> </li><br>
<li><a name="allowShellCommand"></a>
<dt><code>allowShellCommand &lt;0 | 1&gt;</code></dt>
<br>
Enables the get command "shellCommand"
</li><br>
<li><a name="boxUser"></a> <li><a name="boxUser"></a>
<dt><code>boxUser &lt;user name&gt;</code></dt> <dt><code>boxUser &lt;user name&gt;</code></dt>
<br> <br>
@ -6329,9 +6327,8 @@ sub FRITZBOX_fritztris($)
</li><br> </li><br>
<li><a name="fritzBoxIP"></a> <li><a name="fritzBoxIP"></a>
<dt><code>fritzBoxIP &lt;IP Address&gt;</code></dt> <dt><code>fritzBoxIP &lt;IP Address| DNS&gt;</code></dt>
<br> <br>
Depreciated.
</li><br> </li><br>
<li><a name="m3uFileLocal"></a> <li><a name="m3uFileLocal"></a>
@ -6478,6 +6475,8 @@ sub FRITZBOX_fritztris($)
<br/><br/> <br/><br/>
Die Steuerung erfolgt teilweise &uuml;ber die offizielle TR-064-Schnittstelle und teilweise &uuml;ber undokumentierte Schnittstellen zwischen Webinterface und Firmware Kern.</br> Die Steuerung erfolgt teilweise &uuml;ber die offizielle TR-064-Schnittstelle und teilweise &uuml;ber undokumentierte Schnittstellen zwischen Webinterface und Firmware Kern.</br>
<br> <br>
Das Modul wurde auf der FRITZ!BOX 7590, 7490 und dem FRITZ!WLAN Repeater 1750E mit Fritz!OS 7.50 und höer getestet.
<br>
Bitte auch die anderen FRITZ!BOX-Module beachten: <a href="#SYSMON">SYSMON</a> und <a href="#FB_CALLMONITOR">FB_CALLMONITOR</a>. Bitte auch die anderen FRITZ!BOX-Module beachten: <a href="#SYSMON">SYSMON</a> und <a href="#FB_CALLMONITOR">FB_CALLMONITOR</a>.
<br> <br>
<i>Das Modul nutzt das Perlmodule 'JSON::XS', 'LWP', 'SOAP::Lite' f&uuml;r den Fernzugriff.</i> <i>Das Modul nutzt das Perlmodule 'JSON::XS', 'LWP', 'SOAP::Lite' f&uuml;r den Fernzugriff.</i>
@ -6488,7 +6487,7 @@ sub FRITZBOX_fritztris($)
<br> <br>
<code>define &lt;name&gt; FRITZBOX [host]</code> <code>define &lt;name&gt; FRITZBOX [host]</code>
<br/> <br/>
Das Attribut <i>host</i> ist die Web-Adresse (Name oder IP) der FRITZ!BOX. Fehlt es, so schaltet das Modul in den lokalen Modus oder nutzt die Standardadresse "fritz.box". Der Parameter <i>host</i> ist die Web-Adresse (Name oder IP) der FRITZ!BOX / Repeater. Fehlt er, so wird die Standardadresse "fritz.box" genutzt.
<br/><br/> <br/><br/>
Beispiel: <code>define Fritzbox FRITZBOX</code> Beispiel: <code>define Fritzbox FRITZBOX</code>
<br/><br/> <br/><br/>
@ -6650,7 +6649,7 @@ sub FRITZBOX_fritztris($)
<li><a name="update"></a> <li><a name="update"></a>
<dt><code>set &lt;name&gt; update</code></dt> <dt><code>set &lt;name&gt; update</code></dt>
<br> <br>
Startet eine Aktualisierung der Ger&auml;tewerte. Startet eine Aktualisierung der Ger&auml;te Readings.
</li><br> </li><br>
<li><a name="wlan"></a> <li><a name="wlan"></a>
@ -6742,12 +6741,6 @@ sub FRITZBOX_fritztris($)
Abfrage-Interval. Standard ist 300 (Sekunden). Der kleinste m&ouml;gliche Wert ist 60. Abfrage-Interval. Standard ist 300 (Sekunden). Der kleinste m&ouml;gliche Wert ist 60.
</li><br> </li><br>
<li><a name="allowShellCommand"></a>
<dt><code>allowShellCommand &lt;0 | 1&gt;</code></dt>
<br>
Freischalten des get-Befehls "shellCommand"
</li><br>
<li><a name="boxUser"></a> <li><a name="boxUser"></a>
<dt><code>boxUser &lt;user name&gt;</code></dt> <dt><code>boxUser &lt;user name&gt;</code></dt>
<br> <br>
@ -6843,9 +6836,8 @@ sub FRITZBOX_fritztris($)
</li><br> </li><br>
<li><a name="fritzBoxIP"></a> <li><a name="fritzBoxIP"></a>
<dt><code>fritzBoxIP &lt;IP Address&gt;</code></dt> <dt><code>fritzBoxIP &lt;IP Address | DNS&gt;</code></dt>
<br> <br>
Veraltet.
</li><br> </li><br>
<li><a name="m3uFileLocal"></a> <li><a name="m3uFileLocal"></a>