From 4f4810f6ebdeef1864a6aac5319576f1b1e30d33 Mon Sep 17 00:00:00 2001
From: betateilchen <>
Date: Sat, 15 Feb 2014 03:59:16 +0000
Subject: [PATCH] added: new module 51_BBB_WATCHDOG.pm fixed: added CUL_HM as
 "known type" in 98_PID.pm

git-svn-id: https://svn.fhem.de/fhem/trunk@4930 2b470e98-0d58-463d-a4d8-8e2adae1ed80
---
 fhem/CHANGED                 |   1 +
 fhem/FHEM/51_BBB_WATCHDOG.pm | 106 +++++++++++++++++++++++++++++++++++
 fhem/FHEM/98_PID.pm          |   2 +-
 fhem/MAINTAINER.txt          |   5 +-
 4 files changed, 111 insertions(+), 3 deletions(-)
 create mode 100644 fhem/FHEM/51_BBB_WATCHDOG.pm

diff --git a/fhem/CHANGED b/fhem/CHANGED
index 8ad3cfed0..884d3cf57 100644
--- a/fhem/CHANGED
+++ b/fhem/CHANGED
@@ -1,6 +1,7 @@
 # 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.
 - SVN
+  - added:   new module 51_BBB_WATCHDOG.pm (betateilchen)
   - bugfix:  SYSMON: Fix: uninitialized variable
   - feature: new modul 73_MPD added (Wzut) 
   - bugfix:  SYSMON: Fix: root fs with /dev/mapper
diff --git a/fhem/FHEM/51_BBB_WATCHDOG.pm b/fhem/FHEM/51_BBB_WATCHDOG.pm
new file mode 100644
index 000000000..5c49638b8
--- /dev/null
+++ b/fhem/FHEM/51_BBB_WATCHDOG.pm
@@ -0,0 +1,106 @@
+# $Id: 
+
+package main;
+
+use strict;
+use warnings;
+use Time::HiRes qw(gettimeofday);
+
+sub BBB_WATCHDOG_Initialize($){
+	my ($hash) = @_;
+	require "$attr{global}{modpath}/FHEM/DevIo.pm";
+	$hash->{DefFn}		=	"BBB_WATCHDOG_Define";
+	$hash->{UndefFn}	=	"BBB_WATCHDOG_Undefine";
+	$hash->{ShutdownFn}	=	"BBB_WATCHDOG_Shutdown";
+	$hash->{AttrList}	=	$readingFnAttributes;
+}
+
+sub BBB_WATCHDOG_Define($$){
+	my ($hash, $def) = @_;
+	my $name = $hash->{NAME};
+	my @a = split("[ \t][ \t]*", $def);
+	my $dev = '/dev/watchdog@directio';
+
+	DevIo_CloseDev($hash);
+	$hash->{PARTIAL} = "";
+	$hash->{DeviceName} = $dev;
+	my $ret = DevIo_OpenDev($hash, 0, undef);
+	triggerWD($hash);
+	return $ret;
+}
+
+sub BBB_WATCHDOG_Undefine($$){
+	my($hash, $name) = @_;
+	DevIo_CloseDev($hash); 
+	RemoveInternalTimer($hash);
+	return;
+}
+
+sub BBB_WATCHDOG_Shutdown($) {
+	my ($hash) = @_;
+	my $name = $hash->{NAME};
+	Log3 ($name,4,"BBB_WATCHDOG $name: shutdown requested");
+	DevIo_CloseDev($hash); 
+	return undef;
+}
+
+sub triggerWD($) {
+	my ($hash) = @_;
+	Log3(undef, 4, "triggered");
+	DevIo_SimpleWrite($hash, "X", undef);
+	InternalTimer(gettimeofday()+40, "triggerWD", $hash, 0);
+}
+
+1;
+
+=pod
+not to be translated
+=begin html
+
+<a name="BBB_WATCHDOG"></a>
+<h3>BBB_WATCHDOG</h3>
+<ul>
+
+	<b>Prerequesits</b>
+	<ul><br/>
+		<li><b>Module was developed for use with Beaglebone Black.</b><br/><br/></li>
+		<li>To use this module, you have to create an udev-Rule for accessing /dev/watchdog<br/><br/>
+		<code>SUBSYSTEM=="misc" ACTION=="add" DRIVER=="" KERNEL=="watchdog" MODE=="666"</code></li>
+	</ul><br/><br/>
+	
+	<a name="BBB_WATCHDOGdefine"></a>
+	<b>Define</b>
+	<ul><br/>
+		<code>define &lt;name&gt; BBB_WATCHDOG</code><br/><br/>
+		This module provides a heartbeat signal to BBB internal watchdog device<br/>
+		If this signal fails for more than 60 seconds, the BBB will perform a reboot.<br/>
+	</ul><br/><br/>
+
+	<a name="BBB_WATCHDOGset"></a>
+	<b>Set-Commands</b><br/><br/>
+	<ul>No set commands implemented.</ul><br/><br/>
+
+	<a name="BBB_WATCHDOGget"></a>
+	<b>Get-Commands</b><br/><br/>
+	<ul>No get commands implemented.</ul><br/><br/>
+
+	<a name="BBB_WATCHDOGattr"></a>
+	<b>Attributes</b><br/><br/>
+	<ul><a href="#readingFnAttributes">readingFnAttributes</a></ul><br/><br/>
+
+	<b>Author's notes</b><br/><br/>
+	<ul>Have fun!</ul>
+
+</ul>
+
+=end html
+=begin html_DE
+
+<a name="BBB_BMP180"></a>
+<h3>BBB_BMP180</h3>
+<ul>
+Sorry, keine deutsche Dokumentation vorhanden.<br/><br/>
+Die englische Doku gibt es hier: <a href='http://fhem.de/commandref.html#BBB_BMP180'>BBB_BMP180</a><br/>
+</ul>
+=end html_DE
+=cut
diff --git a/fhem/FHEM/98_PID.pm b/fhem/FHEM/98_PID.pm
index a2cfec7fc..334dea79e 100644
--- a/fhem/FHEM/98_PID.pm
+++ b/fhem/FHEM/98_PID.pm
@@ -45,7 +45,7 @@ PID_Define($$$)
   $pid->{sensor} = $sensor;
   if(!$regexp) {
     my $t = $defs{$sensor}{TYPE};
-    if($t eq "HMS" || $t eq "CUL_WS") {
+    if($t eq "HMS" || $t eq "CUL_WS" || $t eq "CUL_HM" ) {
       $reading = "temperature";
       $regexp = '([\\d\\.]*)';
     } else {
diff --git a/fhem/MAINTAINER.txt b/fhem/MAINTAINER.txt
index 3ffdf0398..71974a8fc 100644
--- a/fhem/MAINTAINER.txt
+++ b/fhem/MAINTAINER.txt
@@ -112,8 +112,9 @@ FHEM/46_TRX_SECURITY.pm      wherzig              http://forum.fhem.de RFXTRX
 FHEM/46_TRX_WEATHER.pm       wherzig              http://forum.fhem.de RFXTRX
 FHEM/49_IPCAM.pm             mfr69bs              http://forum.fhem.de Sonstiges
 FHEM/50_WS300.pm             Dirk                 http://forum.fhem.de SlowRF
-FHEM/51_BBB_BMP180.pm        betateilchen         http://forum.fhem.de Raspberry Pi
-FHEM/51_I2C_BMP180.pm        Dirk                 http://forum.fhem.de Raspberry Pi
+FHEM/51_BBB_BMP180.pm        betateilchen         http://forum.fhem.de Einplatinencomputer
+FHEM/51_BBB_WATCHDOG.pm      betateilchen         http://forum.fhem.de Einplatinencomputer
+FHEM/51_I2C_BMP180.pm        Dirk                 http://forum.fhem.de Einplatinencomputer
 FHEM/51_RPI_GPIO.pm          klausw               http://forum.fhem.de Einplatinencomputer
 FHEM/55_GDS.pm               betateilchen         http://forum.fhem.de Unterstuetzende Dienste
 FHEM/55_PIFACE.pm            klaus.schauer        http://forum.fhem.de Einplatinencomputer