add more informations in md file, change telnet data to config file

This commit is contained in:
Marko Oldenburg
2019-02-19 21:57:40 +01:00
parent 4d7774689d
commit 7386104025
3 changed files with 8 additions and 1 deletions

View File

@ -5,6 +5,7 @@
- die Konsolenprogramme tar und bzip2 - die Konsolenprogramme tar und bzip2
- optional für den MySQL Dump das Programm mysqldump - optional für den MySQL Dump das Programm mysqldump
- optional für CleanUp das Programm find - optional für CleanUp das Programm find
- für das senden an FHEM wird eine passwortlose telnet Instanz benötigt
Alle Abhängikeiten werden vor dem eigentlichen Start geprüft. Die optionalen werden nur bei aktiver Verwendung überprüft. Alle Abhängikeiten werden vor dem eigentlichen Start geprüft. Die optionalen werden nur bei aktiver Verwendung überprüft.
@ -65,6 +66,9 @@ FHEMSUPPORT=1
#### Name des FHEM Dummys für das schreiben des Ergebnisses #### Name des FHEM Dummys für das schreiben des Ergebnisses
FHEMDUMMY=dummyBackupScript FHEMDUMMY=dummyBackupScript
FHEMHOST=
TELNETPORT=
### MySQL DB Dumps ### MySQL DB Dumps
#### soll ein MYSQL Dump erstellt werden 0 nein 1 ja #### soll ein MYSQL Dump erstellt werden 0 nein 1 ja

View File

@ -32,6 +32,9 @@ CLEAN_UP_DAYS=4
# soll das Ergebnis des Backups (ok|error) in ein FHEM Dummy geschrieben werden? 0 nein 1 ja # soll das Ergebnis des Backups (ok|error) in ein FHEM Dummy geschrieben werden? 0 nein 1 ja
# telnet Instanz muss ohne SSL und Passwort vorhanden sein # telnet Instanz muss ohne SSL und Passwort vorhanden sein
FHEMSUPPORT=1 FHEMSUPPORT=1
FHEMDUMMY=
FHEMHOST=
TELNETPORT=
# Name des FHEM Dummys für das schreiben des Ergebnisses # Name des FHEM Dummys für das schreiben des Ergebnisses
FHEMDUMMY=dummyBackupScript FHEMDUMMY=dummyBackupScript

View File

@ -326,7 +326,7 @@ sub sendStateToFHEM($) {
my $HOSTNAME = "127.0.0.1"; my $HOSTNAME = "127.0.0.1";
my $HOSTPORT = "7072"; my $HOSTPORT = "7072";
my $socket = IO::Socket::INET->new('PeerAddr' => $HOSTNAME,'PeerPort' => $HOSTPORT,'Proto' => 'tcp') my $socket = IO::Socket::INET->new('PeerAddr' => $self->{config}->{FHEMHOST},'PeerPort' => $self->{config}->{TELNETPORT},'Proto' => 'tcp')
or return 0; or return 0;
print $socket 'setreading ' . $self->{config}->{FHEMDUMMY} . ' state ' . $bckState ."\n"; print $socket 'setreading ' . $self->{config}->{FHEMDUMMY} . ' state ' . $bckState ."\n";