44_TEK603: ser2net support

git-svn-id: https://svn.fhem.de/fhem/trunk/fhem@19936 2b470e98-0d58-463d-a4d8-8e2adae1ed80

CHANGED

@@ -1,5 +1,6 @@
 # Add changes at the top of the list. Keep it in ASCII, and 80-char wide.
 # Do not insert empty lines here, update check depends on it.
+ - feature: 44_TEK603: ser2net support
  - feature: 73_AutoShuttersControl: add new Dev TYPE in %posSetCmds,
                    remove old commandref text
  - bugfix:  73_AutoShuttersControl: fix bug in getShuttersPosCmdValueNegate

FHEM/44_TEK603.pm

@@ -65,7 +65,7 @@ sub TEK603_define($$) {
 	my $msg = '';
 
 	if( @a != 3) {
-		$msg = 'wrong syntax: define <name> TEK603 {none | devicename}';
+		$msg = 'wrong syntax: define <name> TEK603 {none | devicename | hostname:port}';
 		Log3 $name, 3, $msg;
 		return $msg;
 	}
@@ -92,6 +92,9 @@ sub TEK603_doInit($) {
 	my $dev = $hash->{DeviceName};
 	my $name = $hash->{NAME};
 
+	# Wenn / enthalten ist ist es kein ser2net-Device, daher initialisieren
+	if ($dev =~ m/\//)
+	{
 		# Parameter 115200, 8, 1, even, none
 		$po->reset_error();
 		$po->baudrate(115200);
@@ -108,6 +111,7 @@ sub TEK603_doInit($) {
 			Log3 $name, 3, $hash->{STATE};
 			return $hash->{STATE} . "\n";
 		}
+	}
 
 	Log3 $name, 3, "connected to device $dev";
 	$hash->{STATE} = 'open';
@@ -243,6 +247,17 @@ sub TEK603_reconnect($) {
     <ul>
       <code>define OelTank TEK603 /dev/ttyUSB0</code><br />
     </ul>
+    <br />
+    <br />
+    <code>define &lt;name&gt; TEK603 hostnameorip:port</code><br />
+    <br />
+
+    Defines an TEK603 Eco Monitor device via ethernet on a remote host running ser2net.<br /><br />
+
+    Examples:
+    <ul>
+      <code>define OelTank TEK603 somehost:23000</code><br />
+    </ul>
   </ul><br />
 
   <a name="TEK603_Readings"></a>