Moderator: Co-Administratoren
Klar stimmt das. Weil ein Datenpunktname automatisch ein . enthält. Hab ich ja geschrieben.
Also entweder reden wir jetzt aneinander vorbei oder warum stehen dann in meinem DEVLOGFILE die folgenden Einträge mit . und ich habe keine "invalid Date" Meldung im HighCharts?
Code: Alles auswählen
2020-02-17T16:00:12 000A9707A0A204:1.SET_POINT_TEMPERATURE 20.000000
2020-02-17T16:00:12 000A9707A0A204:1.ACTUAL_TEMPERATURE 20.500000
2020-02-17T17:00:10 000A9707A0A204:1.SET_POINT_TEMPERATURE 17.000000
2020-02-17T17:00:10 000A9707A0A204:1.ACTUAL_TEMPERATURE 20.500000
2020-02-17T17:10:24 000A9707A0A204:1.SET_POINT_TEMPERATURE 17.000000
2020-02-17T17:10:24 000A9707A0A204:1.ACTUAL_TEMPERATURE 20.600000
Download: CUxD 2.12, SSH KeyDirCode: Alles auswählen
var tmpArr = [];
for (var dp in cuxchart.dates) {
var tmp = dp.split(".");
if (!tmp[1]) { <-- im Fall von "_" true und ergibt einen leeren String
tmp[1] = "";
} else {
tmp[1] = "." + tmp[1];
}
tmpArr.push(cuxchart.dpInfos[dp].ChannelName + tmp[1]); <-- hier wird im Fall von "." der Teil danach ein zweites mal an den Channel gehängt
}
tmpArr.sort();
var serie;
for (var i = 0; i < tmpArr.length; i++) {
if (cuxchart.revDpInfos[tmpArr[i]]) {
serie = cuxchart.revDpInfos[tmpArr[i]];
} else {
serie = tmpArr[i];
}
cuxchart.addSeries(serie);
}
Code: Alles auswählen
case "TEMPERATURE":
case "ABS_HUMIDITY":
case "DEW_POINT":
case "TEMP_MAX_24H":
case "TEMP_MIN_24H":
valueDecimals = 1;
type = "spline";
break;
Code: Alles auswählen
object dp = dom.GetObject("$src$");
if (dp) {
dom.GetObject("CUxD.CUX2801001:1.POSTIT").State((dom.GetObject((dp.Channel()))).Address() #"."# dp.HssType() #";"#dp.Value());
}
Den Alias habe ich nur aus historischen Gründen noch drin. Ich denke er wird jetzt ans Ende der Zeile geschrieben und dann vor der Übergabe mittels logfilter weggefiltert. Das müsste man mal prüfen. Ich bin mir da nicht mehr so sicher.
Für den Zugriff auf die Logs habe ich dieses kleine Programm geschrieben: https://github.com/jens-maus/cuxd/tree/ ... /logfilter
Code: Alles auswählen
/usr/local/addons/cuxd/extra/logfilter
Ich bin jetzt auch nochmal über das Thema gestolpert, nachdem ich den POSTIT-Logger für ein Wrapper-Device ergänzt habe. Ich hatte mich schon länger geärgert, dass HmIP-Kanal-Umbenennungen in den Charts nicht nachgezogen wurden.uwe111 hat geschrieben: ↑15.02.2020, 20:01Wenn das so ist, dann sollte dieses Problem aber in CUxD Highcharts korrigiert werden. Denn die von mir im DEVLOGFILE definierte Schreibweise ist folgende:
Seriennummer:Kanal.Datenpunkt Wert
Genau so sehe ich das auch! Wenn dann noch der sporadisch auftretende "invalid Date" Fehler weg ist, wäre es wirklich perfekt.
Ich habe momentan leider nicht die Zeit, mich nebenbei auch noch mit CUxD Highcharts zu beschäftigen und würde es sehr begrüßen, wenn jemand das Projekt weiterführen würde: https://github.com/homematic-community/CUxD-Highcharts
Bis auf kleine Optimierungen, die ich vor 5 Jahren gemacht habe ist hier seit 7 Jahren nichts mehr passiert.
Dazu muss man auch kein Programmierexperte sein. Mit grundlegendem Programmierverständnis und viel Zeit sollte eigentlich jeder in der Lage sein sich in JavaScript einzuarbeiten. Bei den Schnittstellen-Scripts würde ich natürlich gerne unterstützend zur Verfügung stehen.
Viele Grüße
Uwe
Code: Alles auswählen
if { [string equal -length 3 $dp "CUX"] } {
append hm_script "o = dom.GetObject('CUxD.$dp');\n"
} else {
append hm_script "o = dom.GetObject('BidCos-RF.$dp');\nif (!o) \{\n"
append hm_script "o = dom.GetObject('BidCos-Wired.$dp');\n\}\n"
}Code: Alles auswählen
if { [string equal -length 3 $dp "CUX"] } {
append hm_script "o = dom.GetObject('CUxD.$dp');\n"
} else {
append hm_script "o = dom.GetObject('BidCos-RF.$dp');\nif (!o) \{\n"
append hm_script "o = dom.GetObject('BidCos-Wired.$dp');\n\}\n"
# NEU >>
append hm_script "if (!o) \{ o = dom.GetObject('HmIP-RF.$dp'); \}\n";
# NEU <<
}
Code: Alles auswählen
append hm_script "Write('\"ValueUnit\":\"' # o.ValueUnit() # '\"');\n"Code: Alles auswählen
append hm_script "string valueunit = o.ValueUnit();\n"
append hm_script "if (valueunit=='\"\"') \{ valueunit = \"\"; \}\n"
append hm_script "Write('\"ValueUnit\":\"' # valueunit # '\"');\n"
Code: Alles auswählen
#!/bin/tclsh
# meta.cgi
#
# 5'2013 hobbyquaker https://github.com/hobbyquaker
# 2'2015 Uwe Langhammer ulangham@gmx.de
#
load tclrega.so
puts "Content-Type: text/json;Charset=ISO-8859-1"
puts "Access-Control-Allow-Origin: *"
puts ""
set postdata [string trim [read stdin]]
set dps [split $postdata ";"]
set counter 0
foreach dp $dps {
if { $counter == 0 } {
set hm_script "object o;\nobject ch;\n"
}
incr counter
if { [string equal -length 3 $dp "CUX"] } {
append hm_script "o = dom.GetObject('CUxD.$dp');\n"
} else {
append hm_script "o = dom.GetObject('BidCos-RF.$dp');\nif (!o) \{\n"
append hm_script "o = dom.GetObject('BidCos-Wired.$dp');\n\}\n"
# NEU >>
append hm_script "if (!o) \{ o = dom.GetObject('HmIP-RF.$dp'); \}\n";
# NEU <<
}
append hm_script "if (o) \{\n"
append hm_script "Write('\"$dp\":\{');\n"
append hm_script "string valueunit = o.ValueUnit();\n"
append hm_script "if (valueunit=='\"\"') \{ valueunit = \"\"; \}\n"
append hm_script "Write('\"ValueUnit\":\"' # valueunit # '\"');\n"
# append hm_script "Write('\"ValueUnit\":\"' # o.ValueUnit() # '\"');\n"
# append hm_script "Write('\"ValueType\":\"' # o.ValueType() # '\",');\n"
# append hm_script "Write('\"ValueSubType\":\"' # o.ValueSubType() # '\",');\n"
# append hm_script "Write('\"ValueMin\":\"' # o.ValueMin() # '\",');\n"
# append hm_script "Write('\"ValueMax\":\"' # o.ValueMax() # '\"');\n"
append hm_script "ch = dom.GetObject(o.Channel());\nif (ch) \{\n"
append hm_script "Write(',\"ChannelName\":\"' # ch.Name() # '\"');\n"
# append hm_script "Write('\"ChannelHssType\":\"' # ch.HssType() # '\"');\n"
append hm_script "\}\nWriteLine('\},');\n"
append hm_script "\}\n"
if { $counter == 50 } {
#puts "query $counter"
#puts $hm_script
append ret [lindex [rega_script $hm_script] 1]
set counter 0
}
}
if { $counter > 0 } {
#puts "last query $counter"
#puts $hm_script
append ret [lindex [rega_script $hm_script] 1]
}
set retlen [string length $ret]
set retmin [expr { $retlen - 3 }]
puts -nonewline "{"
puts -nonewline [string replace $ret $retmin $retlen]
puts "}"
Aber wie?31.01.2023 Update: Hat sich erledigt, ich habs hinbekommen.
. Bin im Februar schon umgestiegen auf IoBroker, InfluxDB und Grafana. Natürlich habe ich dort die CCU3 angebunden und zeichne den Stromverbrauch, Temperaturen etc. auf. Code: Alles auswählen
object dp = dom.GetObject("$src$");
if (dp) {
dom.GetObject("CUxD.CUX2801001:1.LOGIT").State((dom.GetObject(("SD-09-PC-Johannes:6"))).Name() #"_"# dp.HssType() #";"#dp.Value());
}
Code: Alles auswählen
!- LOGIT Datenpunkte von IP-Geräten für CUxD [Highcharts]
object dp = dom.GetObject("$src$");
if (dp) {
if (dp.Value() == "true" | dp.Value() == "false") {
dom.GetObject("CUxD.CUX2801001:1.LOGIT").State( (dom.GetObject((dp.Channel()))).Name() #" "# dp.HssType() #";"#(dp.Value().ToInteger() * 10));
}
else {
dom.GetObject("CUxD.CUX2801001:1.LOGIT").State( (dom.GetObject((dp.Channel()))).Name() #" "# dp.HssType() #";"#dp.Value());
}}