Public/fhem-mirror
1
0
Fork 0
mirror of https://github.com/fhem/fhem-mirror.git synced 2025-05-07 22:29:19 +00:00
Code

FRITZBOX: get shellCommand

Browse Source 
git-svn-id: https://svn.fhem.de/fhem/trunk@7795 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
tpoitzsch 2015-01-31 13:06:18 +00:00
parent 761f00a17d
commit 271f779726
1 changed files with 40 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

47
fhem/FHEM/72_FRITZBOX.pm
View File

@ -131,7 +131,8 @@ sub FRITZBOX_Initialize($)
$hash->{SetFn} = "FRITZBOX_Set"; $hash->{SetFn} = "FRITZBOX_Set";
$hash->{GetFn} = "FRITZBOX_Get"; $hash->{GetFn} = "FRITZBOX_Get";
$hash->{AttrFn} = "FRITZBOX_Attr"; $hash->{AttrFn} = "FRITZBOX_Attr";
$hash->{AttrList} = "disable:0,1 " $hash->{AttrList} = "allowShellCommand:0,1 "
."disable:0,1 "
."defaultCallerName " ."defaultCallerName "
."defaultUploadDir " ."defaultUploadDir "
."fritzBoxIP " ."fritzBoxIP "
@ -418,7 +419,7 @@ sub FRITZBOX_Set($$@)
########################################## ##########################################
sub FRITZBOX_Get($@) sub FRITZBOX_Get($@)
{ {
my ($hash, $name, $cmd) = @_; my ($hash, $name, $cmd, @val) = @_;
my $returnStr; my $returnStr;
if (lc $cmd eq "ringtones") if (lc $cmd eq "ringtones")
@ -428,8 +429,14 @@ sub FRITZBOX_Get($@)
$returnStr .= join "\n", sort values %ringTone; $returnStr .= join "\n", sort values %ringTone;
return $returnStr; return $returnStr;
} }
elsif ( lc $cmd eq "shellcommand" && int @val && AttrVal( $name, "allowShellCommand", 0 ) )
{
my $shCmd = join " ", @val;
return FRITZBOX_Exec( $hash, $shCmd );
}
my $list = "ringTones:noArg"; my $list = "ringTones:noArg";
$list .= " shellCommand"
if AttrVal( $name, "allowShellCommand", 0 );
return "Unknown argument $cmd, choose one of $list"; return "Unknown argument $cmd, choose one of $list";
} # end FRITZBOX_Get } # end FRITZBOX_Get
@ -2676,13 +2683,26 @@ sub FRITZBOX_fritztris($)
<br> <br>
Shows the list of ring tones that can be used. Shows the list of ring tones that can be used.
</li><br> </li><br>
<li><code>get &lt;name&gt; shellCommand &lt;Command&gt;</code>
<br>
Runs the given command on the Fritz!Box shell and returns the result.
Can be used to run shell commands not included in this modul.
<br>
Only available if the attribute "allowShellCommand" is set.
</li><br>
</ul> </ul>
<a name="FRITZBOXattr"></a> <a name="FRITZBOXattr"></a>
<b>Attributes</b> <b>Attributes</b>
<ul> <ul>
<br> <br>
<li><code>defaultCallerName</code> <li><code>allowShellCommand &lt;0 | 1&gt;</code>
<br>
Enables the get command "shellCommand"
</li><br>
<li><code>defaultCallerName &lt;Text&gt;</code>
<br> <br>
The default text to show on the ringing phone as 'caller'. The default text to show on the ringing phone as 'caller'.
<br> <br>
@ -2698,7 +2718,7 @@ sub FRITZBOX_fritztris($)
It needs to be the name of the path on the Fritz!Box. So, it should start with /var/InternerSpeicher if it equals in Windows \\ip-address\fritz.nas It needs to be the name of the path on the Fritz!Box. So, it should start with /var/InternerSpeicher if it equals in Windows \\ip-address\fritz.nas
</li><br> </li><br>
<li><code>fritzBoxIP</code> <li><code>fritzBoxIP &lt;IP Address&gt;</code>
<br> <br>
IP address or URL of the Fritz!Box for remote telnet access. Default is "fritz.box". IP address or URL of the Fritz!Box for remote telnet access. Default is "fritz.box".
</li><br> </li><br>
@ -2940,13 +2960,26 @@ sub FRITZBOX_fritztris($)
<br> <br>
Zeigt die Liste der Klingelt&ouml;ne, die benutzt werden k&ouml;nnen. Zeigt die Liste der Klingelt&ouml;ne, die benutzt werden k&ouml;nnen.
</li><br> </li><br>
<li><code>get &lt;name&gt; shellCommand &lt;Befehl&gt;</code>
<br>
F&uuml;hrt den angegebenen Befehl auf der Fritz!Box-Shell aus und gibt das Ergebnis zur&uuml;ck.
Kann benuzt werden, um Shell-Befehle auszuf&uuml;hren, die nicht im Modul implementiert sind.
<br>
Muss zuvor &uuml;ber das Attribute "allowShellCommand" freigeschaltet werden.
</li><br>
</ul> </ul>
<a name="FRITZBOXattr"></a> <a name="FRITZBOXattr"></a>
<b>Attributes</b> <b>Attributes</b>
<ul> <ul>
<br> <br>
<li><code>defaultCallerName</code> <li><code>allowShellCommand &lt;0 | 1&gt;</code>
<br>
Freischalten des get-Befehls "shellCommand"
</li><br>
<li><code>defaultCallerName &lt;Text&gt;</code>
<br> <br>
Standard-Text, der auf dem angerufenen internen Telefon als "Anrufer" gezeigt wird. Standard-Text, der auf dem angerufenen internen Telefon als "Anrufer" gezeigt wird.
<br> <br>
@ -2962,7 +2995,7 @@ sub FRITZBOX_fritztris($)
Es muss ein Pfad auf der Fritz!Box sein. D.h., er sollte mit /var/InternerSpeicher starten, wenn es in Windows unter \\ip-address\fritz.nas erreichbar ist. Es muss ein Pfad auf der Fritz!Box sein. D.h., er sollte mit /var/InternerSpeicher starten, wenn es in Windows unter \\ip-address\fritz.nas erreichbar ist.
</li><br> </li><br>
<li><code>fritzBoxIP</code> <li><code>fritzBoxIP &lt;IP-Adresse&gt;</code>
<br> <br>
IP Adresse oder ULR der Fritz!Box f&uuml;r Fernzugriff per Telnet. Standard ist "fritz.box". IP Adresse oder ULR der Fritz!Box f&uuml;r Fernzugriff per Telnet. Standard ist "fritz.box".
</li><br> </li><br>