Below sketch may be an idea.
Dw.
Code: Select all
diff otmonitor.vfs/alerts.tcl otmonitor.vfs.orig/alerts.tcl
186c186
< global cfg gwname
---
> global cfg
192c192
< lappend msg "Subject: $gwname alert"
---
> lappend msg "Subject: Opentherm gateway alert"
477d476
< global gwname
479c478
< set message "$gwname test message"
---
> set message "Opentherm gateway test message"
Common subdirectories: otmonitor.vfs/docroot and otmonitor.vfs.orig/docroot
Common subdirectories: otmonitor.vfs/images and otmonitor.vfs.orig/images
Common subdirectories: otmonitor.vfs/lib and otmonitor.vfs.orig/lib
diff otmonitor.vfs/otmonitor.tcl otmonitor.vfs.orig/otmonitor.tcl
5d4
< set env(TCLLIBPATH) [list /Users/dirkx/Downloads/otmonitor.vfs/lib]
17d15
< set gwname Unknown
1396,1398d1393
< -n - --gwname {
< set optcfg(view,gwname) $arg
< }
1477d1471
< view,gwname "Opentherm Gateway"
1616,1619d1609
< # Expose the gateway name (falling through to Openthem Gateway if not set).
< #
< set gwname cfg(view,gwname)
<
diff otmonitor.vfs/sslwiz.tcl otmonitor.vfs.orig/sslwiz.tcl
144c144
< global tcl_platform gwname
---
> global tcl_platform
225c225
< set rc [dict create C "" ST "" L "" O "$gwname" \
---
> set rc [dict create C "" ST "" L "" O "Opentherm Gateway" \
diff otmonitor.vfs/upgrade.tcl otmonitor.vfs.orig/upgrade.tcl
232c232
< global mem dev devtype cocmd cocnt copct restore gwversion gwname
---
> global mem dev devtype cocmd cocnt copct restore gwversion
278c278
< $cmd status "Please manually reset the $gwname"
---
> $cmd status "Please manually reset the OpenTherm Gateway"
diff otmonitor.vfs/web.tcl otmonitor.vfs.orig/web.tcl
452c452
< global dump gui version gwversion gwname
---
> global dump gui version gwversion
460c460
< append ver $tab [format { "name": "%s",} $gwname] \n
---
> append ver $tab [format { "name": "%s",} "Opentherm Gateway"] \n