incremented version.

for unknown reasons avra doesn't check #if statements correctly which
are meant to protect against double includes...

0BUILD

@@ -2,7 +2,7 @@
 
 <gwbuild>
 
-  <project name="aqhome" version="0.0.4" so_current="0" so_age="0" so_revision="4" write_config_h="TRUE">
+  <project name="aqhome" version="0.3.0" so_current="4" so_age="3" so_revision="0" write_config_h="TRUE">
     <setVar name="package">$(project_name)</setVar>
     <setVar name="version">
       $(project_vmajor).$(project_vminor).$(project_vpatchlevel)
@@ -51,6 +51,8 @@
     <setVar name="pkgincludedir">$(includedir)/aqhome/$(package)</setVar>
     <setVar name="pkgdatadir">$(datadir)/$(package)</setVar>
 
+    <setVar name="httpdatadir">/var/www</setVar>
+
     <option id="enable_testcode" type="string">
       <default>TRUE</default>
       <choices>TRUE FALSE</choices>
@@ -126,6 +128,7 @@
     </option>
 
 
+
     <checkheaders>
       signal.h
       sys/stat.h
@@ -149,6 +152,8 @@
       <dep id="gwenhywfar" name="gwenhywfar" minversion="5.11.2" required="TRUE" >
         <variables>plugindir gwengui-fox16</variables>
       </dep>
+      <dep id="aqcgi" name="aqcgi" minversion="0.0.1" required="TRUE" />
+      <dep id="aqdiagram" name="aqdiagram" minversion="0.0.1" required="TRUE" />
 <!--      <dep id="aqdatabase" name="aqdatabase" minversion="1.99.1" required="TRUE" >
         <variables>aqdatabase_typemakerdir</variables>
       </dep>
@@ -175,6 +180,7 @@
       devices
       etc
       scripts
+      doc
     </subdirs>
 
     <ifVarMatches name="option_with_avr" value="TRUE" >
@@ -251,4 +257,10 @@
 
   </project>
 
+  <extradist>
+    COPYING
+    README.md
+  </extradist>
+
+
 </gwbuild>

COPYING

@@ -0,0 +1,344 @@
+License
+=======
+
+The following is the license text for the GPL in a version that applies to
+AqHome.
+
+                    GNU GENERAL PUBLIC LICENSE
+                       Version 2, June 1991
+
+ Copyright (C) 1989, 1991 Free Software Foundation, Inc.,
+ <https://fsf.org/>
+ Everyone is permitted to copy and distribute verbatim copies
+ of this license document, but changing it is not allowed.
+
+                            Preamble
+
+  The licenses for most software are designed to take away your
+freedom to share and change it.  By contrast, the GNU General Public
+License is intended to guarantee your freedom to share and change free
+software--to make sure the software is free for all its users.  This
+General Public License applies to most of the Free Software
+Foundation's software and to any other program whose authors commit to
+using it.  (Some other Free Software Foundation software is covered by
+the GNU Lesser General Public License instead.)  You can apply it to
+your programs, too.
+
+  When we speak of free software, we are referring to freedom, not
+price.  Our General Public Licenses are designed to make sure that you
+have the freedom to distribute copies of free software (and charge for
+this service if you wish), that you receive source code or can get it
+if you want it, that you can change the software or use pieces of it
+in new free programs; and that you know you can do these things.
+
+  To protect your rights, we need to make restrictions that forbid
+anyone to deny you these rights or to ask you to surrender the rights.
+These restrictions translate to certain responsibilities for you if you
+distribute copies of the software, or if you modify it.
+
+  For example, if you distribute copies of such a program, whether
+gratis or for a fee, you must give the recipients all the rights that
+you have.  You must make sure that they, too, receive or can get the
+source code.  And you must show them these terms so they know their
+rights.
+
+  We protect your rights with two steps: (1) copyright the software, and
+(2) offer you this license which gives you legal permission to copy,
+distribute and/or modify the software.
+
+  Also, for each author's protection and ours, we want to make certain
+that everyone understands that there is no warranty for this free
+software.  If the software is modified by someone else and passed on, we
+want its recipients to know that what they have is not the original, so
+that any problems introduced by others will not reflect on the original
+authors' reputations.
+
+  Finally, any free program is threatened constantly by software
+patents.  We wish to avoid the danger that redistributors of a free
+program will individually obtain patent licenses, in effect making the
+program proprietary.  To prevent this, we have made it clear that any
+patent must be licensed for everyone's free use or not licensed at all.
+
+  The precise terms and conditions for copying, distribution and
+modification follow.
+
+                    GNU GENERAL PUBLIC LICENSE
+   TERMS AND CONDITIONS FOR COPYING, DISTRIBUTION AND MODIFICATION
+
+  0. This License applies to any program or other work which contains
+a notice placed by the copyright holder saying it may be distributed
+under the terms of this General Public License.  The "Program", below,
+refers to any such program or work, and a "work based on the Program"
+means either the Program or any derivative work under copyright law:
+that is to say, a work containing the Program or a portion of it,
+either verbatim or with modifications and/or translated into another
+language.  (Hereinafter, translation is included without limitation in
+the term "modification".)  Each licensee is addressed as "you".
+
+Activities other than copying, distribution and modification are not
+covered by this License; they are outside its scope.  The act of
+running the Program is not restricted, and the output from the Program
+is covered only if its contents constitute a work based on the
+Program (independent of having been made by running the Program).
+Whether that is true depends on what the Program does.
+
+  1. You may copy and distribute verbatim copies of the Program's
+source code as you receive it, in any medium, provided that you
+conspicuously and appropriately publish on each copy an appropriate
+copyright notice and disclaimer of warranty; keep intact all the
+notices that refer to this License and to the absence of any warranty;
+and give any other recipients of the Program a copy of this License
+along with the Program.
+
+You may charge a fee for the physical act of transferring a copy, and
+you may at your option offer warranty protection in exchange for a fee.
+
+  2. You may modify your copy or copies of the Program or any portion
+of it, thus forming a work based on the Program, and copy and
+distribute such modifications or work under the terms of Section 1
+above, provided that you also meet all of these conditions:
+
+    a) You must cause the modified files to carry prominent notices
+    stating that you changed the files and the date of any change.
+
+    b) You must cause any work that you distribute or publish, that in
+    whole or in part contains or is derived from the Program or any
+    part thereof, to be licensed as a whole at no charge to all third
+    parties under the terms of this License.
+
+    c) If the modified program normally reads commands interactively
+    when run, you must cause it, when started running for such
+    interactive use in the most ordinary way, to print or display an
+    announcement including an appropriate copyright notice and a
+    notice that there is no warranty (or else, saying that you provide
+    a warranty) and that users may redistribute the program under
+    these conditions, and telling the user how to view a copy of this
+    License.  (Exception: if the Program itself is interactive but
+    does not normally print such an announcement, your work based on
+    the Program is not required to print an announcement.)
+
+These requirements apply to the modified work as a whole.  If
+identifiable sections of that work are not derived from the Program,
+and can be reasonably considered independent and separate works in
+themselves, then this License, and its terms, do not apply to those
+sections when you distribute them as separate works.  But when you
+distribute the same sections as part of a whole which is a work based
+on the Program, the distribution of the whole must be on the terms of
+this License, whose permissions for other licensees extend to the
+entire whole, and thus to each and every part regardless of who wrote it.
+
+Thus, it is not the intent of this section to claim rights or contest
+your rights to work written entirely by you; rather, the intent is to
+exercise the right to control the distribution of derivative or
+collective works based on the Program.
+
+In addition, mere aggregation of another work not based on the Program
+with the Program (or with a work based on the Program) on a volume of
+a storage or distribution medium does not bring the other work under
+the scope of this License.
+
+  3. You may copy and distribute the Program (or a work based on it,
+under Section 2) in object code or executable form under the terms of
+Sections 1 and 2 above provided that you also do one of the following:
+
+    a) Accompany it with the complete corresponding machine-readable
+    source code, which must be distributed under the terms of Sections
+    1 and 2 above on a medium customarily used for software interchange; or,
+
+    b) Accompany it with a written offer, valid for at least three
+    years, to give any third party, for a charge no more than your
+    cost of physically performing source distribution, a complete
+    machine-readable copy of the corresponding source code, to be
+    distributed under the terms of Sections 1 and 2 above on a medium
+    customarily used for software interchange; or,
+
+    c) Accompany it with the information you received as to the offer
+    to distribute corresponding source code.  (This alternative is
+    allowed only for noncommercial distribution and only if you
+    received the program in object code or executable form with such
+    an offer, in accord with Subsection b above.)
+
+The source code for a work means the preferred form of the work for
+making modifications to it.  For an executable work, complete source
+code means all the source code for all modules it contains, plus any
+associated interface definition files, plus the scripts used to
+control compilation and installation of the executable.  However, as a
+special exception, the source code distributed need not include
+anything that is normally distributed (in either source or binary
+form) with the major components (compiler, kernel, and so on) of the
+operating system on which the executable runs, unless that component
+itself accompanies the executable.
+
+If distribution of executable or object code is made by offering
+access to copy from a designated place, then offering equivalent
+access to copy the source code from the same place counts as
+distribution of the source code, even though third parties are not
+compelled to copy the source along with the object code.
+
+  4. You may not copy, modify, sublicense, or distribute the Program
+except as expressly provided under this License.  Any attempt
+otherwise to copy, modify, sublicense or distribute the Program is
+void, and will automatically terminate your rights under this License.
+However, parties who have received copies, or rights, from you under
+this License will not have their licenses terminated so long as such
+parties remain in full compliance.
+
+  5. You are not required to accept this License, since you have not
+signed it.  However, nothing else grants you permission to modify or
+distribute the Program or its derivative works.  These actions are
+prohibited by law if you do not accept this License.  Therefore, by
+modifying or distributing the Program (or any work based on the
+Program), you indicate your acceptance of this License to do so, and
+all its terms and conditions for copying, distributing or modifying
+the Program or works based on it.
+
+  6. Each time you redistribute the Program (or any work based on the
+Program), the recipient automatically receives a license from the
+original licensor to copy, distribute or modify the Program subject to
+these terms and conditions.  You may not impose any further
+restrictions on the recipients' exercise of the rights granted herein.
+You are not responsible for enforcing compliance by third parties to
+this License.
+
+  7. If, as a consequence of a court judgment or allegation of patent
+infringement or for any other reason (not limited to patent issues),
+conditions are imposed on you (whether by court order, agreement or
+otherwise) that contradict the conditions of this License, they do not
+excuse you from the conditions of this License.  If you cannot
+distribute so as to satisfy simultaneously your obligations under this
+License and any other pertinent obligations, then as a consequence you
+may not distribute the Program at all.  For example, if a patent
+license would not permit royalty-free redistribution of the Program by
+all those who receive copies directly or indirectly through you, then
+the only way you could satisfy both it and this License would be to
+refrain entirely from distribution of the Program.
+
+If any portion of this section is held invalid or unenforceable under
+any particular circumstance, the balance of the section is intended to
+apply and the section as a whole is intended to apply in other
+circumstances.
+
+It is not the purpose of this section to induce you to infringe any
+patents or other property right claims or to contest validity of any
+such claims; this section has the sole purpose of protecting the
+integrity of the free software distribution system, which is
+implemented by public license practices.  Many people have made
+generous contributions to the wide range of software distributed
+through that system in reliance on consistent application of that
+system; it is up to the author/donor to decide if he or she is willing
+to distribute software through any other system and a licensee cannot
+impose that choice.
+
+This section is intended to make thoroughly clear what is believed to
+be a consequence of the rest of this License.
+
+  8. If the distribution and/or use of the Program is restricted in
+certain countries either by patents or by copyrighted interfaces, the
+original copyright holder who places the Program under this License
+may add an explicit geographical distribution limitation excluding
+those countries, so that distribution is permitted only in or among
+countries not thus excluded.  In such case, this License incorporates
+the limitation as if written in the body of this License.
+
+  9. The Free Software Foundation may publish revised and/or new versions
+of the General Public License from time to time.  Such new versions will
+be similar in spirit to the present version, but may differ in detail to
+address new problems or concerns.
+
+Each version is given a distinguishing version number.  If the Program
+specifies a version number of this License which applies to it and "any
+later version", you have the option of following the terms and conditions
+either of that version or of any later version published by the Free
+Software Foundation.  If the Program does not specify a version number of
+this License, you may choose any version ever published by the Free Software
+Foundation.
+
+  10. If you wish to incorporate parts of the Program into other free
+programs whose distribution conditions are different, write to the author
+to ask for permission.  For software which is copyrighted by the Free
+Software Foundation, write to the Free Software Foundation; we sometimes
+make exceptions for this.  Our decision will be guided by the two goals
+of preserving the free status of all derivatives of our free software and
+of promoting the sharing and reuse of software generally.
+
+                            NO WARRANTY
+
+  11. BECAUSE THE PROGRAM IS LICENSED FREE OF CHARGE, THERE IS NO WARRANTY
+FOR THE PROGRAM, TO THE EXTENT PERMITTED BY APPLICABLE LAW.  EXCEPT WHEN
+OTHERWISE STATED IN WRITING THE COPYRIGHT HOLDERS AND/OR OTHER PARTIES
+PROVIDE THE PROGRAM "AS IS" WITHOUT WARRANTY OF ANY KIND, EITHER EXPRESSED
+OR IMPLIED, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF
+MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.  THE ENTIRE RISK AS
+TO THE QUALITY AND PERFORMANCE OF THE PROGRAM IS WITH YOU.  SHOULD THE
+PROGRAM PROVE DEFECTIVE, YOU ASSUME THE COST OF ALL NECESSARY SERVICING,
+REPAIR OR CORRECTION.
+
+  12. IN NO EVENT UNLESS REQUIRED BY APPLICABLE LAW OR AGREED TO IN WRITING
+WILL ANY COPYRIGHT HOLDER, OR ANY OTHER PARTY WHO MAY MODIFY AND/OR
+REDISTRIBUTE THE PROGRAM AS PERMITTED ABOVE, BE LIABLE TO YOU FOR DAMAGES,
+INCLUDING ANY GENERAL, SPECIAL, INCIDENTAL OR CONSEQUENTIAL DAMAGES ARISING
+OUT OF THE USE OR INABILITY TO USE THE PROGRAM (INCLUDING BUT NOT LIMITED
+TO LOSS OF DATA OR DATA BEING RENDERED INACCURATE OR LOSSES SUSTAINED BY
+YOU OR THIRD PARTIES OR A FAILURE OF THE PROGRAM TO OPERATE WITH ANY OTHER
+PROGRAMS), EVEN IF SUCH HOLDER OR OTHER PARTY HAS BEEN ADVISED OF THE
+POSSIBILITY OF SUCH DAMAGES.
+
+                     END OF TERMS AND CONDITIONS
+
+            How to Apply These Terms to Your New Programs
+
+  If you develop a new program, and you want it to be of the greatest
+possible use to the public, the best way to achieve this is to make it
+free software which everyone can redistribute and change under these terms.
+
+  To do so, attach the following notices to the program.  It is safest
+to attach them to the start of each source file to most effectively
+convey the exclusion of warranty; and each file should have at least
+the "copyright" line and a pointer to where the full notice is found.
+
+    <one line to give the program's name and a brief idea of what it does.>
+    Copyright (C) <year>  <name of author>
+
+    This program is free software; you can redistribute it and/or modify
+    it under the terms of the GNU General Public License as published by
+    the Free Software Foundation; either version 2 of the License, or
+    (at your option) any later version.
+
+    This program is distributed in the hope that it will be useful,
+    but WITHOUT ANY WARRANTY; without even the implied warranty of
+    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+    GNU General Public License for more details.
+
+    You should have received a copy of the GNU General Public License along
+    with this program; if not, see <https://www.gnu.org/licenses/>.
+
+Also add information on how to contact you by electronic and paper mail.
+
+If the program is interactive, make it output a short notice like this
+when it starts in an interactive mode:
+
+    Gnomovision version 69, Copyright (C) year name of author
+    Gnomovision comes with ABSOLUTELY NO WARRANTY; for details type `show w'.
+    This is free software, and you are welcome to redistribute it
+    under certain conditions; type `show c' for details.
+
+The hypothetical commands `show w' and `show c' should show the appropriate
+parts of the General Public License.  Of course, the commands you use may
+be called something other than `show w' and `show c'; they could even be
+mouse-clicks or menu items--whatever suits your program.
+
+You should also get your employer (if you work as a programmer) or your
+school, if any, to sign a "copyright disclaimer" for the program, if
+necessary.  Here is a sample; alter the names:
+
+  Yoyodyne, Inc., hereby disclaims all copyright interest in the program
+  `Gnomovision' (which makes passes at compilers) written by James Hacker.
+
+  <signature of Moe Ghoul>, 1 April 1989
+  Moe Ghoul, President of Vice
+
+This General Public License does not permit incorporating your program into
+proprietary programs.  If your program is a subroutine library, you may
+consider it more useful to permit linking proprietary applications with the
+library.  If this is what you want to do, use the GNU Lesser General
+Public License instead of this License.

README.md

@@ -0,0 +1,82 @@
+
+# Aquamaniac Home Control System (AqHomeControl)
+
+## Quickstart
+
+### Prerequisites
+
+To compile the project the following software needs to be installed:
+- gwenhywfar (general purpose library, also containing some development tools)
+- avrasm (Opensource avr assembler)
+- gcc  (GNU C compiler)
+
+
+### Building
+
+- download and unpack this project
+- cd into the main folder
+- create a build folder (e.g. "mkdir build")
+- cd into that "build" folder
+- configure package for building ("gwbuild -s ../")
+- build autogenerated files ("gwbuild -p" and "gwbuild -Btm2builder")
+- build project ("gwbuild -j NUM_OF_CPUS")
+- install project ("sudo gwbuild -i")
+
+
+## Overview
+
+See https://gitea.aqbanking.de/martin/aqhomecontrol/wiki for more information (in German).
+
+The Aquamaniac Home automation/control system consists of multiple parts:
+- nodes
+  - small PCBs with AVR microcontrollers, for now:
+    - AtTiny84
+    - AtTiny85
+    - AtTiny841
+    - AtMega644
+    - examples:
+      - [N28](https://gitea.aqbanking.de/martin/aqhomecontrol/src/branch/master/doc/mcu-examples/n28/)
+      - [N29](https://gitea.aqbanking.de/martin/aqhomecontrol/src/branch/master/doc/mcu-examples/n29/)
+      - [N30](https://gitea.aqbanking.de/martin/aqhomecontrol/src/branch/master/doc/mcu-examples/n30/)
+  - decentralized, nodes just broadcast measured data over a two-wire
+    communication network (clock/data), addresses are auto-assigned, no prior 
+    setup necessary, no central bottleneck or single point of failure
+  - node types
+    - environmental measuring (temperature, humidity, CO2 and others)
+    - motion detection, door/window sensors
+    - LED strip controllers
+  - modular operating system written in AVR assembler
+  - event-driven GUI for ATmega MCUs (work in progress)
+  - driver modules for busses:
+    - one-wire bus
+    - two-wire-bus
+    - SPI bus
+    - UART
+  - driver modules for devices/sensors (incomplete list):
+    - DS18b20  sensors for temperature measurement
+    - SI7021   sensors for temperature and humidity measurement
+    - SGP_30   sensors for air quality measurement
+    - ccs811   sensors for air quality measurement
+    - SK6812   LED driver
+    - ds3231   realtime clock module
+    - I2C displays (work-in-progress)
+    - SPI displays (work-in-progress)
+
+- PC applications
+  - aqhome-data
+    - TCP data service receiving sensor data
+  - aqhome-nodes
+    - service receiving sensor data via inter-node bus from nodes
+      and forwarding that data to aqhome-data
+  - aqhome-mqttlog
+    - service exchanging data between aqhome-data service and a
+      mqtt server
+  - aqhome-react
+    - service reacting to data received by aqhome-data (home automation service)
+  - aqhome-tool
+    - tool to manipulate aqhome-data (e.g. edit devices and values,
+      add data points, create graphs from aqhome-data)
+    - tool to flash firmware for nodes, list nodes
+  - aqhome-cgi
+    - HTTP service for user interaction with aqhome-data
+

apps/0BUILD

@@ -8,6 +8,7 @@
     aqhome-data
     aqhome-nodes
     aqhome-react
+    aqhome-cgi
   </subdirs>
 
 </gwbuild>

apps/aqhome-cgi/0BUILD

@@ -0,0 +1,150 @@
+<?xml?>
+
+<gwbuild>
+
+
+  <target type="Program" name="aqhome-cgi" install="$(libdir)/cgi-bin" >
+
+    <includes type="c" >
+      $(gwenhywfar_cflags)
+      $(aqcgi_cflags)
+      $(aqdiagram_cflags)
+      -I$(topsrcdir)
+      -I$(topbuilddir)
+      -I$(topsrcdir)/apps
+      -I$(topbuilddir)/apps
+      -I$(builddir)
+      -I$(srcdir)
+    </includes>
+  
+    <includes type="tm2" >
+      --include=$(builddir)
+      --include=$(srcdir)
+    </includes>
+
+    <define name="AQHOME_CGI_WWWDIR" value="$(httpdatadir)/aqhome-cgi" quoted="TRUE" />
+
+    <setVar name="local/cflags">$(visibility_cflags)</setVar>
+
+    <setVar name="tm2flags" >
+    </setVar>
+
+    <setVar name="local/typefiles" >
+    </setVar>
+  
+    <setVar name="local/built_sources" >
+    </setVar>
+  
+    <setVar name="local/built_headers_pub">
+    </setVar>
+  
+    <setVar name="local/built_headers_priv" >
+    </setVar>
+
+    <headers dist="true" >
+    </headers>
+  
+    <sources>
+      $(local/typefiles)
+      main.c
+    </sources>
+
+    <useTargets>
+      aqhomecgi
+      aqhcgi_service
+      aqhome
+    </useTargets>
+
+    <libraries>
+      $(gwenhywfar_libs)
+      -lm
+      $(aqcgi_libs)
+      $(aqdiagram_libs)
+    </libraries>
+
+    <subdirs>
+    </subdirs>
+
+
+    <extradist>
+    </extradist>
+
+
+  </target>
+
+
+
+  <target type="ConvenienceLibrary" name="aqhomecgi" >
+
+    <includes type="c" >
+      $(gwenhywfar_cflags)
+      -I$(topsrcdir)
+      -I$(topbuilddir)
+      -I$(topsrcdir)/apps
+      -I$(topbuilddir)/apps
+      -I$(builddir)
+      -I$(srcdir)
+    </includes>
+  
+    <includes type="tm2" >
+      --include=$(builddir)
+      --include=$(srcdir)
+    </includes>
+
+    <setVar name="local/cflags">$(visibility_cflags)</setVar>
+
+    <setVar name="tm2flags" >
+    </setVar>
+
+    <setVar name="local/typefiles" >
+    </setVar>
+  
+    <setVar name="local/built_sources" >
+    </setVar>
+  
+    <setVar name="local/built_headers_pub">
+    </setVar>
+  
+    <setVar name="local/built_headers_priv" >
+    </setVar>
+
+    <headers dist="true" >
+      service_file.h
+      service_file_p.h
+    </headers>
+  
+    <sources>
+      $(local/typefiles)
+
+      service_file.c
+    </sources>
+
+    <useTargets>
+      aqhome
+      aqhcgi_service
+      aqhcgi_modules
+    </useTargets>
+
+    <libraries>
+      $(gwenhywfar_libs)
+      -lm
+      $(aqcgi_libs)
+      $(aqdiagram_libs)
+    </libraries>
+
+    <subdirs>
+      service
+      modules
+    </subdirs>
+
+
+    <extradist>
+    </extradist>
+
+
+  </target>
+
+
+</gwbuild>
+
+

apps/aqhome-cgi/README

@@ -0,0 +1,23 @@
+
+
+Modules:
+- login
+- signup
+- main
+- devices
+  - list
+  - show?name="nodes/12345678"
+  - add
+  - edit
+  - delete
+- values
+- rooms
+
+- users
+  - list
+  - show?alias="admin"
+  - add
+  - edit
+  - delete
+
+- dashboards

apps/aqhome-cgi/main.c

@@ -0,0 +1,264 @@
+
+
+#include "./service_file.h"
+#include "aqhome-cgi/modules/mroot.h"
+#include "aqhome-cgi/modules/common/madmin.h"
+#include "aqhome-cgi/modules/common/mmodules.h"
+#include "aqhome-cgi/modules/common/musers.h"
+#include "aqhome-cgi/modules/devices/mdevices.h"
+#include "aqhome/aqhome.h"
+
+#include <aqcgi/cgi.h>
+#include <aqcgi/request.h>
+#include <aqdiagram/aqdiagram.h>
+
+#include <gwenhywfar/gwenhywfar.h>
+#include <gwenhywfar/nogui.h>
+#include <gwenhywfar/logger.h>
+#include <gwenhywfar/text.h>
+#include <gwenhywfar/debug.h>
+
+#include <string.h>
+#include <errno.h>
+#include <stdio.h>
+
+
+#define AQHOME_CGI_LOGFILE "/var/www/aqhome-cgi/log/aqhome-cgi.log"
+
+#define AQHOME_CGI_DEFAULT_STATIC_FILES  AQHOME_CGI_WWWDIR"/static"
+#define AQHOME_CGI_DEFAULT_RUNTIME_FILES AQHOME_CGI_WWWDIR"/data"
+#define AQHOME_CGI_DEFAULT_CACHE_FILES   AQHOME_CGI_WWWDIR"/cache"
+#define AQHOME_CGI_DEFAULT_BASE_URL      "http://127.0.0.1/aqbt"
+
+
+
+/* ------------------------------------------------------------------------------------------------
+ * forward declarations
+ * ------------------------------------------------------------------------------------------------
+ */
+
+static void _handleRequest(AQCGI_REQUEST *rq, const char *sPathStaticFiles, const char *sPathRuntimeFiles, const char *sBaseUrl);
+static int _handlePath(AQH_SERVICE *sv, AQCGI_REQUEST *rq, const char *sPathStaticFiles);
+static void logStart(void);
+static int _init(const char *sPathRuntimeFiles, const char *sBaseUrl);
+
+
+
+/* ------------------------------------------------------------------------------------------------
+ * code
+ * ------------------------------------------------------------------------------------------------
+ */
+
+int main(int argc, char **argv)
+{
+  GWEN_GUI *gui;
+  const char *sPathStaticFiles;
+  const char *sPathRuntimeFiles;
+  const char *sBaseUrl;
+
+  sPathStaticFiles=getenv("AQHOME_STATIC_FILES");
+  if (!(sPathStaticFiles && *sPathStaticFiles))
+    sPathStaticFiles=AQHOME_CGI_DEFAULT_STATIC_FILES;
+
+  sPathRuntimeFiles=getenv("AQHOME_RUNTIME_FILES");
+  if (!(sPathRuntimeFiles && *sPathRuntimeFiles))
+    sPathRuntimeFiles=AQHOME_CGI_DEFAULT_RUNTIME_FILES;
+
+  sBaseUrl=getenv("AQHOME_BASE_URL");
+  if (!(sBaseUrl && *sBaseUrl))
+    sBaseUrl=AQHOME_CGI_DEFAULT_BASE_URL;
+
+  GWEN_Init();
+  gui=GWEN_NoGui_new();
+  GWEN_Gui_SetGui(gui);
+
+  logStart();
+  GWEN_Logger_Open(GWEN_LOGDOMAIN, "gwenhywfar", AQHOME_CGI_LOGFILE, GWEN_LoggerType_File, GWEN_LoggerFacility_Daemon);
+  GWEN_Logger_Open(AQH_LOGDOMAIN, "aqhome", AQHOME_CGI_LOGFILE, GWEN_LoggerType_File, GWEN_LoggerFacility_Daemon);
+  GWEN_Logger_Open(AQCGI_LOGDOMAIN, "aqcgi", AQHOME_CGI_LOGFILE, GWEN_LoggerType_File, GWEN_LoggerFacility_Daemon);
+  GWEN_Logger_Open(AQDG_LOGDOMAIN, "aqdiagram", AQHOME_CGI_LOGFILE, GWEN_LoggerType_File, GWEN_LoggerFacility_Daemon);
+  GWEN_Logger_Open(NULL, "aqhome-cgi", AQHOME_CGI_LOGFILE, GWEN_LoggerType_File, GWEN_LoggerFacility_Daemon);
+
+  GWEN_Logger_SetLevel(GWEN_LOGDOMAIN, GWEN_LoggerLevel_Debug);
+  GWEN_Logger_SetLevel(AQCGI_LOGDOMAIN, GWEN_LoggerLevel_Debug);
+  GWEN_Logger_SetLevel(NULL, GWEN_LoggerLevel_Debug);
+
+  GWEN_Logger_Close(GWEN_LOGDOMAIN);
+  GWEN_Logger_Open(GWEN_LOGDOMAIN, "gwenhywfar", AQHOME_CGI_LOGFILE, GWEN_LoggerType_File, GWEN_LoggerFacility_Daemon);
+
+  GWEN_Logger_SetLevel(GWEN_LOGDOMAIN, GWEN_LoggerLevel_Debug);
+  GWEN_Logger_SetLevel(AQCGI_LOGDOMAIN, GWEN_LoggerLevel_Debug);
+  GWEN_Logger_SetLevel(AQDG_LOGDOMAIN, GWEN_LoggerLevel_Debug);
+  GWEN_Logger_SetLevel(NULL, GWEN_LoggerLevel_Debug);
+
+  if (argc>1 && argv[1]) {
+    if (0==strcasecmp(argv[1], "init")) {
+      int rv;
+
+      rv=_init(sPathRuntimeFiles, sBaseUrl);
+      if (rv<0) {
+	fprintf(stderr, "Error on init (%d)\n", rv);
+	return 2;
+      }
+
+    }
+  }
+  else {
+    AQCGI_REQUEST *rq;
+
+    DBG_ERROR(NULL, "Init CGI");
+    AQCGI_Init();
+    rq=AQCGI_ReadRequest();
+    if (rq) {
+      _handleRequest(rq, sPathStaticFiles, sPathRuntimeFiles, sBaseUrl);
+    }
+    else {
+      fprintf(stdout, "Content-type: text/plain\n\n");
+      fprintf(stdout, "Error: No Request!\n");
+    }
+    AQCGI_Fini();
+  }
+
+  return 0;
+}
+
+
+
+void _handleRequest(AQCGI_REQUEST *rq, const char *sPathStaticFiles, const char *sPathRuntimeFiles, const char *sBaseUrl)
+{
+  AQH_SERVICE *sv;
+  int rv;
+
+  sv=AQH_ServiceFiles_new(sPathRuntimeFiles, sBaseUrl);
+
+  rv=_handlePath(sv, rq, sPathStaticFiles);
+  if (rv<0) {
+    DBG_INFO(NULL, "here (%d)", rv);
+  }
+  AQH_Service_free(sv);
+}
+
+
+
+int _handlePath(AQH_SERVICE *sv, AQCGI_REQUEST *rq, const char *sPathStaticFiles)
+{
+  AQH_MODULE *mRoot;
+  AQH_MODULE *mParent;
+  AQH_SESSION *session;
+  const GWEN_STRINGLIST *sl;
+
+  mRoot=AQH_ModRoot_new(sv, sPathStaticFiles);
+  mParent=mRoot;
+  session=AQH_ModService_ReadSession(mRoot, rq);
+  AQH_ModService_CalcSessionModPerms(mRoot, session);
+
+  sl=AQCGI_Request_GetStringlistPath(rq);
+  if (sl) {
+    GWEN_STRINGLISTENTRY *se;
+
+    se=GWEN_StringList_FirstEntry(sl);
+    while(se) {
+      GWEN_STRINGLISTENTRY *seNext;
+      const char *s;
+
+      seNext=GWEN_StringListEntry_Next(se);
+      s=GWEN_StringListEntry_Data(se);
+       if (s && *s) {
+	if (seNext) {
+	  AQH_MODULE *m;
+
+	  DBG_ERROR(NULL, "Entry: %s (%s)", s, seNext?"not last":"last");
+	  m=AQH_ModService_LoadSubModule(mParent, rq, session, s);
+          if (m==NULL) {
+            AQH_Session_free(session);
+	    AQH_Module_free(mRoot);
+	    return GWEN_ERROR_GENERIC;
+	  }
+	  mParent=m;
+	}
+	else {
+	  int rv;
+
+	  /* last, let module handle remaining part */
+          DBG_ERROR(NULL, "Entry: %s (last)", s);
+	  rv=AQH_ModService_HandleRequest(mParent, rq, session, s);
+	  if (rv<0) {
+	    DBG_INFO(NULL, "here (%d)", rv);
+            AQH_Session_free(session);
+	    AQH_Module_free(mRoot);
+	    return rv;
+	  }
+	  break;
+	}
+      }
+
+      se=seNext;
+    }
+    AQH_Session_free(session);
+    AQH_Module_free(mRoot);
+    return 0;
+  }
+  else {
+    AQH_Session_free(session);
+    AQH_Module_free(mRoot);
+    return GWEN_ERROR_GENERIC;
+  }
+}
+
+
+
+void logStart()
+{
+  FILE *f;
+
+  f=fopen(AQHOME_CGI_LOGFILE, "a+");
+  if (f!=NULL) {
+    fprintf(f, "Started.\n");
+    fclose(f);
+  }
+}
+
+
+
+int _init(const char *sPathRuntimeFiles, const char *sBaseUrl)
+{
+  AQH_SERVICE *sv;
+  int rv;
+
+  DBG_ERROR(NULL, "Creating aqhome-cgi environment in \"%s\"", sPathRuntimeFiles);
+  sv=AQH_ServiceFiles_new(sPathRuntimeFiles, sBaseUrl);
+  rv=AQH_ModAdmin_Create(sv);
+  if (rv<0) {
+    DBG_ERROR(NULL, "Error creating module \"admin\"");
+    AQH_Service_free(sv);
+    return rv;
+  }
+
+  rv=AQH_ModAdmModules_Create(sv);
+  if (rv<0) {
+    DBG_ERROR(NULL, "Error creating module \"modules\"");
+    AQH_Service_free(sv);
+    return rv;
+  }
+
+  rv=AQH_ModAdmUsers_Create(sv);
+  if (rv<0) {
+    DBG_ERROR(NULL, "Error creating module \"users\"");
+    AQH_Service_free(sv);
+    return rv;
+  }
+
+  rv=AQH_ModDevices_Create(sv);
+  if (rv<0) {
+    DBG_ERROR(NULL, "Error creating module \"devices\"");
+    AQH_Service_free(sv);
+    return rv;
+  }
+
+  AQH_Service_free(sv);
+  return 0;
+}
+
+
+
+

apps/aqhome-cgi/modules/0BUILD

@@ -0,0 +1,87 @@
+<?xml?>
+
+<gwbuild>
+
+  <target type="ConvenienceLibrary" name="aqhcgi_modules" >
+
+    <includes type="c" >
+      $(gwenhywfar_cflags)
+      -I$(topsrcdir)
+      -I$(topbuilddir)
+      -I$(topsrcdir)/apps
+      -I$(topbuilddir)/apps
+      -I$(builddir)
+      -I$(srcdir)
+    </includes>
+  
+    <includes type="tm2" >
+      --include=$(builddir)
+      --include=$(srcdir)
+    </includes>
+
+
+    <define name="not_BUILDING_AQHOME" />
+
+    <setVar name="local/cflags">$(visibility_cflags)</setVar>
+
+  
+    <setVar name="tm2flags-INACTIVE" >
+      --api=AQHOME_API
+    </setVar>
+
+    <setVar name="local/typefiles" >
+    </setVar>
+  
+    <setVar name="local/built_sources" >
+    </setVar>
+  
+    <setVar name="local/built_headers_pub">
+    </setVar>
+  
+  
+    <setVar name="local/built_headers_priv" >
+    </setVar>
+
+
+    <headers dist="false" install="$(pkgincludedir)/service" >
+      $(local/built_headers_pub)
+    </headers>
+  
+  
+    <headers dist="true" install="$(pkgincludedir)/service" >
+      mdataclient.h
+      mroot.h
+    </headers>
+
+
+    <headers dist="true" >
+      mroot_p.h
+    </headers>
+  
+  
+    <sources>
+      $(local/typefiles)
+
+      mdataclient.c
+      mroot.c
+    </sources>
+
+
+    <extradist>
+    </extradist>
+
+
+    <useTargets>
+      aqhcgi_modcom
+      aqhcgi_mdevices
+    </useTargets>
+
+    <subdirs>
+      common
+      devices
+      static
+    </subdirs>
+
+  </target>
+  
+</gwbuild>

apps/aqhome-cgi/modules/common/0BUILD

@@ -0,0 +1,86 @@
+<?xml?>
+
+<gwbuild>
+
+  <target type="ConvenienceLibrary" name="aqhcgi_modcom" >
+
+    <includes type="c" >
+      $(gwenhywfar_cflags)
+      -I$(topsrcdir)
+      -I$(topbuilddir)
+      -I$(topsrcdir)/apps
+      -I$(topbuilddir)/apps
+      -I$(builddir)
+      -I$(srcdir)
+    </includes>
+  
+    <includes type="tm2" >
+      --include=$(builddir)
+      --include=$(srcdir)
+    </includes>
+
+
+    <define name="not_BUILDING_AQHOME" />
+
+    <setVar name="local/cflags">$(visibility_cflags)</setVar>
+
+  
+    <setVar name="tm2flags-INACTIVE" >
+      --api=AQHOME_API
+    </setVar>
+
+    <setVar name="local/typefiles" >
+    </setVar>
+  
+    <setVar name="local/built_sources" >
+    </setVar>
+  
+    <setVar name="local/built_headers_pub">
+    </setVar>
+  
+  
+    <setVar name="local/built_headers_priv" >
+    </setVar>
+
+
+    <headers dist="false" install="$(pkgincludedir)/service" >
+      $(local/built_headers_pub)
+    </headers>
+  
+  
+    <headers dist="true" install="$(pkgincludedir)/service" >
+      mservice.h
+      madmin.h
+      mmodules.h
+      musers.h
+    </headers>
+
+
+    <headers dist="true" >
+      mservice_p.h
+    </headers>
+  
+  
+    <sources>
+      $(local/typefiles)
+
+      mservice.c
+      madmin.c
+      mmodules.c
+      musers.c
+    </sources>
+
+
+    <extradist>
+    </extradist>
+
+
+    <useTargets>
+    </useTargets>
+
+    <subdirs>
+    </subdirs>
+
+  </target>
+  
+</gwbuild>

apps/aqhome-cgi/modules/common/madmin.c

@@ -0,0 +1,217 @@
+/****************************************************************************
+ * This file is part of the project AqHome.
+ * AqHome (c) by 2025 Martin Preuss, all rights reserved.
+ *
+ * The license for this file can be found in the file COPYING which you
+ * should have received along with this file.
+ ****************************************************************************/
+
+#ifdef HAVE_CONFIG_H
+# include <config.h>
+#endif
+
+
+#include "./madmin.h"
+
+#include "aqhome-cgi/service/module.h"
+#include "aqhome-cgi/modules/common/mmodules.h"
+#include "aqhome-cgi/modules/common/musers.h"
+
+#include <gwenhywfar/debug.h>
+#include <gwenhywfar/timestamp.h>
+
+
+
+/* ------------------------------------------------------------------------------------------------
+ * defs and enums
+ * ------------------------------------------------------------------------------------------------
+ */
+
+/* ------------------------------------------------------------------------------------------------
+ * global vars
+ * ------------------------------------------------------------------------------------------------
+ */
+
+/* ------------------------------------------------------------------------------------------------
+ * forward declarations
+ * ------------------------------------------------------------------------------------------------
+ */
+
+static void _createPermDefList(AQH_MODULE *m);
+static void _createRoleList(AQH_MODULE *m);
+
+static AQH_MODULE *_loadSubModule(AQH_MODULE *m, AQCGI_REQUEST *rq, AQH_SESSION *session, const char *sModuleName);
+static int _handleRequest(AQH_MODULE *m, AQCGI_REQUEST *rq, AQH_SESSION *session, const char *sLastPathElem);
+static int _handleRqIndex(AQH_MODULE *m, AQCGI_REQUEST *rq, GWEN_BUFFER *dbuf);
+
+
+/* ------------------------------------------------------------------------------------------------
+ * code
+ * ------------------------------------------------------------------------------------------------
+ */
+
+void AQH_ModAdmin_Extend(AQH_MODULE *m, AQH_SERVICE *sv, const char *baseFolder)
+{
+  AQH_ModService_Extend(m, sv, baseFolder);
+  AQH_ModService_SetHandleRequestFn(m, _handleRequest);
+  AQH_ModService_SetLoadSubModuleFn(m, _loadSubModule);
+}
+
+
+
+int AQH_ModAdmin_Create(AQH_SERVICE *sv)
+{
+  AQH_MODULE *m;
+  int rv;
+
+  m=AQH_Module_new();
+  AQH_Module_SetName(m, "admin");
+  AQH_Module_SetDescr(m, "administration module");
+  AQH_Module_SetGuestPerms(m, 0);
+
+  _createPermDefList(m);
+  _createRoleList(m);
+
+  rv=AQH_Service_AddModule(sv, m);
+  if (rv<0) {
+    DBG_INFO(NULL, "here (%d)", rv);
+  }
+  AQH_Module_free(m);
+  return rv;
+}
+
+
+
+void _createPermDefList(AQH_MODULE *m)
+{
+  AQH_PERMDEF_LIST *permDefList;
+
+  permDefList=AQH_PermDef_List_new();
+
+  AQH_ModService_AddPermDef(permDefList, "AdminUsers",    0x001, "User Administration");
+  AQH_ModService_AddPermDef(permDefList, "AdminModules",  0x002, "Module Administration");
+
+  AQH_Module_SetPermDefList(m, permDefList);
+}
+
+
+
+void _createRoleList(AQH_MODULE *m)
+{
+  AQH_ROLE_LIST *roleList;
+  int id=0;
+
+  roleList=AQH_Role_List_new();
+  AQH_ModService_AddRole(roleList, id++, "userAdmin",   AQH_MODADM_PERMS_ADMINUSERS,   "User administrator");
+  AQH_ModService_AddRole(roleList, id++, "moduleAdmin", AQH_MODADM_PERMS_ADMINMODULES, "Module administrator");
+  AQH_Module_SetRoleList(m, roleList);
+}
+
+
+
+AQH_MODULE *_loadSubModule(AQH_MODULE *m, AQCGI_REQUEST *rq, AQH_SESSION *session, const char *sModuleName)
+{
+  AQH_SERVICE *sv;
+
+  sv=AQH_ModService_GetService(m);
+  if (strcasecmp(sModuleName, "modules")==0) {
+    AQH_MODULE *mSub;
+
+    mSub=AQH_Service_LoadModule(sv, sModuleName);
+    if (mSub) {
+      const char *s;
+      GWEN_BUFFER *nbuf;
+
+      nbuf=GWEN_Buffer_new(0, 256, 0, 1);
+      s=AQH_ModService_GetBaseFolder(m);
+      GWEN_Buffer_AppendArgs(nbuf, "%s/modules", s?s:".");
+
+      AQH_ModAdmModules_Extend(mSub, AQH_ModService_GetService(m), GWEN_Buffer_GetStart(nbuf));
+      AQH_Module_Tree2_AddChild(m, mSub);
+      GWEN_Buffer_free(nbuf);
+      return mSub;
+    }
+  }
+  else if (strcasecmp(sModuleName, "users")==0) {
+    AQH_MODULE *mSub;
+
+    mSub=AQH_Service_LoadModule(sv, sModuleName);
+    if (mSub) {
+      const char *s;
+      GWEN_BUFFER *nbuf;
+
+      nbuf=GWEN_Buffer_new(0, 256, 0, 1);
+      s=AQH_ModService_GetBaseFolder(m);
+      GWEN_Buffer_AppendArgs(nbuf, "%s/modules", s?s:".");
+
+      AQH_ModAdmUsers_Extend(mSub, AQH_ModService_GetService(m), GWEN_Buffer_GetStart(nbuf));
+      AQH_Module_Tree2_AddChild(m, mSub);
+      GWEN_Buffer_free(nbuf);
+      return mSub;
+    }
+  }
+  return NULL;
+}
+
+
+
+int _handleRequest(AQH_MODULE *m, AQCGI_REQUEST *rq, AQH_SESSION *session, const char *sLastPathElem)
+{
+  GWEN_BUFFER *dbuf;
+  int rv=0;
+
+  dbuf=GWEN_Buffer_new(0, 256, 0, 1);
+  AQH_ModService_AddHeader(m, "en", dbuf);
+
+  if (strcasecmp(sLastPathElem, "index.html")==0) {
+    if (AQH_ModService_GetUserPerms(m) & (AQH_MODADM_PERMS_ADMINUSERS | AQH_MODADM_PERMS_ADMINMODULES))
+      rv=_handleRqIndex(m, rq, dbuf);
+    else {
+      AQCGI_Request_SetResponseCode(rq, 403);
+      AQCGI_Request_SetResponseText(rq, "Forbidden");
+    }
+  }
+  else {
+    AQCGI_Request_SetResponseCode(rq, 404);
+    AQCGI_Request_SetResponseText(rq, "Not Found");
+  }
+  AQH_ModService_AddFooter(m, "en", dbuf);
+  AQCGI_Request_SetBufferResponseBody(rq, dbuf);
+  AQCGI_Request_AddResponseHeaderData(rq, "Content-type: text/html");
+
+  return AQCGI_SendResponse(rq);
+}
+
+
+
+int _handleRqIndex(AQH_MODULE *m, AQCGI_REQUEST *rq, GWEN_BUFFER *dbuf)
+{
+  if (AQCGI_Request_GetRequestMethod(rq)==AQCGI_REQUEST_METHOD_GET) {
+    uint32_t userPerms;
+
+    GWEN_Buffer_AppendString(dbuf, "<table>");
+    userPerms=AQH_ModService_GetUserPerms(m);
+    if (userPerms & AQH_MODADM_PERMS_ADMINUSERS)
+      GWEN_Buffer_AppendString(dbuf,
+                               "<tr>"
+                               "<td><a href=\"users/index.html\" >User administration</a></td>"
+                               "<td>Add, remove or modify users</td>"
+                               "</tr>\n");
+    if (userPerms & AQH_MODADM_PERMS_ADMINMODULES)
+      GWEN_Buffer_AppendString(dbuf,
+                               "<tr>"
+                               "<td><a href=\"modules/index.html\" >Module administration</a></td>"
+                               "<td>Add, remove or modify modules</td>"
+                               "</tr>\n");
+    GWEN_Buffer_AppendString(dbuf, "</table>\n");
+    AQCGI_Request_SetResponseCode(rq, 200);
+    AQCGI_Request_SetResponseText(rq, "Ok");
+    return 0;
+  }
+  AQCGI_Request_SetResponseCode(rq, 405);
+  AQCGI_Request_SetResponseText(rq, "Method Not Allowed");
+  return 0;
+}
+
+
+

apps/aqhome-cgi/modules/common/madmin.h

@@ -0,0 +1,31 @@
+/****************************************************************************
+ * This file is part of the project AqHome.
+ * AqHome (c) by 2025 Martin Preuss, all rights reserved.
+ *
+ * The license for this file can be found in the file COPYING which you
+ * should have received along with this file.
+ ****************************************************************************/
+
+#ifndef AQHOME_CGI_MADMIN_H
+#define AQHOME_CGI_MADMIN_H
+
+#include <aqhome-cgi/modules/common/mservice.h>
+
+#include <aqcgi/request.h>
+
+#include <gwenhywfar/buffer.h>
+
+
+#define AQH_MODADM_PERMS_ADMINUSERS   0x001
+#define AQH_MODADM_PERMS_ADMINMODULES 0x002
+
+
+void AQH_ModAdmin_Extend(AQH_MODULE *m, AQH_SERVICE *sv, const char *baseFolder);
+
+int AQH_ModAdmin_Create(AQH_SERVICE *sv);
+
+
+
+
+#endif
+

apps/aqhome-cgi/modules/common/mmodules.c

@@ -0,0 +1,745 @@
+/****************************************************************************
+ * This file is part of the project AqHome.
+ * AqHome (c) by 2025 Martin Preuss, all rights reserved.
+ *
+ * The license for this file can be found in the file COPYING which you
+ * should have received along with this file.
+ ****************************************************************************/
+
+#ifdef HAVE_CONFIG_H
+# include <config.h>
+#endif
+
+
+#include "./mmodules.h"
+
+#include "aqhome-cgi/service/module.h"
+
+#include <gwenhywfar/debug.h>
+#include <gwenhywfar/timestamp.h>
+
+
+
+/* ------------------------------------------------------------------------------------------------
+ * defs and enums
+ * ------------------------------------------------------------------------------------------------
+ */
+
+#define GBAS GWEN_Buffer_AppendString
+#define GBAA GWEN_Buffer_AppendArgs
+
+
+
+/* ------------------------------------------------------------------------------------------------
+ * forward declarations
+ * ------------------------------------------------------------------------------------------------
+ */
+
+static void _createPermDefList(AQH_MODULE *m);
+static void _createRoleList(AQH_MODULE *m);
+
+static AQH_MODULE *_loadSubModule(AQH_MODULE *m, AQCGI_REQUEST *rq, AQH_SESSION *session, const char *sModuleName);
+static int _handleRequest(AQH_MODULE *m, AQCGI_REQUEST *rq, AQH_SESSION *session, const char *sLastPathElem);
+static void _handleRqIndex(AQH_MODULE *m, AQCGI_REQUEST *rq, AQH_SESSION *session, GWEN_BUFFER *dbuf);
+
+static void _handleRqEditModGet(AQH_MODULE *m, AQCGI_REQUEST *rq, AQH_SESSION *session, GWEN_BUFFER *dbuf);
+static void _handleRqEditModPost(AQH_MODULE *m, AQCGI_REQUEST *rq, AQH_SESSION *session, GWEN_BUFFER *dbuf);
+
+static void _handleRqAddRoleGet(AQH_MODULE *m, AQCGI_REQUEST *rq, AQH_SESSION *session, GWEN_BUFFER *dbuf);
+static void _handleRqAddRolePost(AQH_MODULE *m, AQCGI_REQUEST *rq, AQH_SESSION *session, GWEN_BUFFER *dbuf);
+
+static void _handleRqEditRoleGet(AQH_MODULE *m, AQCGI_REQUEST *rq, AQH_SESSION *session, GWEN_BUFFER *dbuf);
+static void _handleRqEditRolePost(AQH_MODULE *m, AQCGI_REQUEST *rq, AQH_SESSION *session, GWEN_BUFFER *dbuf);
+static int _getHighestUsedRoleId(const AQH_ROLE_LIST *roleList);
+
+static void _handleRqDeleteRole(AQH_MODULE *m, AQCGI_REQUEST *rq, AQH_SESSION *session, GWEN_BUFFER *dbuf);
+
+static void _writeEditModForm(const AQH_MODULE *currentMod, const char *sModName, GWEN_BUFFER *dbuf);
+static void _writeRoleListToForm(const AQH_ROLE_LIST *roleList,
+				 const char *sModName,
+				 const AQH_PERMDEF_LIST *permDefList,
+				 GWEN_BUFFER *dbuf);
+
+static void _setLocationHeaderForMod(AQCGI_REQUEST *rq, const char *page, const char *sModName);
+static void _writeEnabledPermissions(const AQH_PERMDEF_LIST *permDefList, uint32_t perms, GWEN_BUFFER *dbuf);
+
+
+
+/* ------------------------------------------------------------------------------------------------
+ * vars
+ * ------------------------------------------------------------------------------------------------
+ */
+
+static AQH_MODSERVICE_HANDLER_ENTRY _requestTable[]={
+  {"index.html",      AQCGI_REQUEST_METHOD_GET,  AQH_MODADMMODULES_PERMS_MODULESREAD,  _handleRqIndex},
+  {"editmodule.html", AQCGI_REQUEST_METHOD_GET,  AQH_MODADMMODULES_PERMS_MODULESWRITE, _handleRqEditModGet},
+  {"editmodule.html", AQCGI_REQUEST_METHOD_POST, AQH_MODADMMODULES_PERMS_MODULESWRITE, _handleRqEditModPost},
+  {"addrole.html",    AQCGI_REQUEST_METHOD_GET,  AQH_MODADMMODULES_PERMS_MODULESWRITE, _handleRqAddRoleGet},
+  {"addrole.html",    AQCGI_REQUEST_METHOD_POST, AQH_MODADMMODULES_PERMS_MODULESWRITE, _handleRqAddRolePost},
+  {"editrole.html",   AQCGI_REQUEST_METHOD_GET,  AQH_MODADMMODULES_PERMS_MODULESWRITE, _handleRqEditRoleGet},
+  {"editrole.html",   AQCGI_REQUEST_METHOD_POST, AQH_MODADMMODULES_PERMS_MODULESWRITE, _handleRqEditRolePost},
+  {"delrole.html",    AQCGI_REQUEST_METHOD_GET,  AQH_MODADMMODULES_PERMS_MODULESWRITE, _handleRqDeleteRole},
+  {NULL, 0, 0, NULL}
+};
+
+
+
+/* ------------------------------------------------------------------------------------------------
+ * code
+ * ------------------------------------------------------------------------------------------------
+ */
+
+void AQH_ModAdmModules_Extend(AQH_MODULE *m, AQH_SERVICE *sv, const char *baseFolder)
+{
+  AQH_ModService_Extend(m, sv, baseFolder);
+  AQH_ModService_SetHandleRequestFn(m, _handleRequest);
+  AQH_ModService_SetLoadSubModuleFn(m, _loadSubModule);
+}
+
+
+
+int AQH_ModAdmModules_Create(AQH_SERVICE *sv)
+{
+  AQH_MODULE *m;
+  int rv;
+
+  m=AQH_Module_new();
+  AQH_Module_SetName(m, "modules");
+  AQH_Module_SetDescr(m, "modules administration module");
+  AQH_Module_SetGuestPerms(m, 0);
+
+  _createPermDefList(m);
+  _createRoleList(m);
+
+  rv=AQH_Service_AddModule(sv, m);
+  if (rv<0) {
+    DBG_INFO(NULL, "here (%d)", rv);
+  }
+  AQH_Module_free(m);
+  return rv;
+}
+
+
+
+void _createPermDefList(AQH_MODULE *m)
+{
+  AQH_PERMDEF_LIST *permDefList;
+
+  permDefList=AQH_PermDef_List_new();
+
+  AQH_ModService_AddPermDef(permDefList, "ModuleRead",  0x001, "Read modules");
+  AQH_ModService_AddPermDef(permDefList, "ModuleWrite", 0x002, "Modify modules");
+  AQH_ModService_AddPermDef(permDefList, "ModuleAdd",   0x004, "Add modules");
+  AQH_ModService_AddPermDef(permDefList, "ModuleDel",   0x008, "Remove modules");
+
+  AQH_Module_SetPermDefList(m, permDefList);
+}
+
+
+
+void _createRoleList(AQH_MODULE *m)
+{
+  AQH_ROLE_LIST *roleList;
+  int id=0;
+
+  roleList=AQH_Role_List_new();
+  AQH_ModService_AddRole(roleList, id++, "admin",
+                         AQH_MODADMMODULES_PERMS_MODULESREAD |
+                         AQH_MODADMMODULES_PERMS_MODULESWRITE |
+                         AQH_MODADMMODULES_PERMS_MODULESADD |
+                         AQH_MODADMMODULES_PERMS_MODULESDEL,
+                         "Administrator Role");
+  AQH_Module_SetRoleList(m, roleList);
+}
+
+
+
+AQH_MODULE *_loadSubModule(AQH_MODULE *m, AQCGI_REQUEST *rq, AQH_SESSION *session, const char *sModuleName)
+{
+  /* no sub-modules */
+  return NULL;
+}
+
+
+
+int _handleRequest(AQH_MODULE *m, AQCGI_REQUEST *rq, AQH_SESSION *session, const char *sLastPathElem)
+{
+  AQH_ModService_HandleRequestWithTable(m, rq, session, sLastPathElem, _requestTable);
+  return AQCGI_SendResponse(rq);
+}
+
+
+
+void _handleRqIndex(AQH_MODULE *m, AQCGI_REQUEST *rq, AQH_SESSION *session, GWEN_BUFFER *dbuf)
+{
+  AQH_SERVICE *sv;
+  GWEN_STRINGLIST *slModules;
+  uint32_t perms;
+
+  perms=AQH_ModService_GetUserPerms(m);
+  sv=AQH_ModService_GetService(m);
+  slModules=AQH_Service_ListModules(sv);
+  if (slModules) {
+    GWEN_STRINGLISTENTRY *se;
+
+    GBAS(dbuf, "<h1>Modules</h1>\n");
+    GBAS(dbuf,
+         "<table class=\"datatable\">\n"
+         "<thead>"
+         "<tr><th>Id</th><th>Name</th><th>Description</th><th>Actions</th></tr>\n"
+         "</thead>\n"
+         "<tbody>\n");
+    se=GWEN_StringList_FirstEntry(slModules);
+    while(se) {
+      const char *sModName;
+
+      sModName=GWEN_StringListEntry_Data(se);
+      if (sModName && *sModName) {
+        AQH_MODULE *currentMod;
+
+        currentMod=AQH_Service_LoadModule(sv, sModName);
+        if (currentMod) {
+          const char *s;
+          const char *sName;
+
+          sName=AQH_Module_GetName(currentMod);
+          GBAS(dbuf, "<tr>");
+          GBAA(dbuf, "<td>%lu</td>", (unsigned long int) AQH_Module_GetId(currentMod));
+          GBAA(dbuf, "<td>%s</td>", sName?sName:"");
+          s=AQH_Module_GetDescr(currentMod);
+          GBAA(dbuf, "<td>%s</td>", s?s:"");
+
+          GBAS(dbuf, "<td>");
+          if (perms & AQH_MODADMMODULES_PERMS_MODULESWRITE)
+            GBAA(dbuf, "<a href=\"editmodule.html?name=%s\"><img src=\"/pics/edit.png\"></a>", sName?sName:"");
+          GBAA(dbuf, "</td>\n");
+          GBAA(dbuf, "</tr>\n");
+          AQH_Module_free(currentMod);
+        }
+      }
+      se=GWEN_StringListEntry_Next(se);
+    }
+    GBAS(dbuf,
+         "</tbody>\n"
+         "</table>\n");
+    GWEN_StringList_free(slModules);
+  }
+  if (perms & AQH_MODADMMODULES_PERMS_MODULESADD)
+    GBAS(dbuf, "<hr><a href=\"addmodule.html\">Add Module</a>");
+}
+
+
+
+void _handleRqEditModGet(AQH_MODULE *m, AQCGI_REQUEST *rq, AQH_SESSION *session, GWEN_BUFFER *dbuf)
+{
+  AQH_SERVICE *sv;
+  GWEN_DB_NODE *dbQuery;
+  const char *sModName;
+  AQH_MODULE *currentMod;
+
+  sv=AQH_ModService_GetService(m);
+  dbQuery=AQCGI_Request_GetDbQuery(rq);
+  sModName=dbQuery?GWEN_DB_GetCharValue(dbQuery, "name", 0, NULL):NULL;
+  currentMod=(sModName && *sModName)?AQH_Service_LoadModule(sv, sModName):NULL;
+  if (currentMod) {
+    _writeEditModForm(currentMod, sModName, dbuf);
+    AQH_Module_free(currentMod);
+  }
+  else {
+    AQCGI_Request_AddResponseHeaderData(rq, "Location: index.html");
+    AQCGI_Request_SetResponseCode(rq, 303);
+    AQCGI_Request_SetResponseText(rq, "See other");
+  }
+}
+
+
+
+void _handleRqEditModPost(AQH_MODULE *m, AQCGI_REQUEST *rq, AQH_SESSION *session, GWEN_BUFFER *dbuf)
+{
+  AQH_SERVICE *sv;
+  GWEN_DB_NODE *dbPost;
+  const char *sModName;
+  AQH_MODULE *currentMod;
+
+  sv=AQH_ModService_GetService(m);
+  dbPost=AQCGI_Request_GetDbPostBody(rq);
+  sModName=dbPost?GWEN_DB_GetCharValue(dbPost, "module", 0, NULL):NULL;
+  currentMod=(sModName && *sModName)?AQH_Service_LoadModule(sv, sModName):NULL;
+  if (currentMod) {
+    const char *sNewModName;
+    const char *sDescr;
+    int rv;
+    uint32_t perms;
+    const AQH_PERMDEF_LIST *permDefList;
+
+    permDefList=AQH_Module_GetPermDefList(currentMod);
+    sNewModName=GWEN_DB_GetCharValue(dbPost, "name", 0, NULL);
+    sDescr=GWEN_DB_GetCharValue(dbPost, "descr", 0, NULL);
+    perms=AQH_ModService_ReadPermsFromForm(dbPost, permDefList, NULL);
+    if (sNewModName && *sNewModName)
+      AQH_Module_SetName(currentMod, sNewModName);
+    AQH_Module_SetDescr(currentMod, sDescr);
+    AQH_Module_SetGuestPerms(currentMod, perms);
+
+    rv=AQH_Service_SaveModule(sv, currentMod);
+    if (rv<0) {
+      GBAS(dbuf, "<h2>Error</h2><p>Error saving module</p>");
+      DBG_ERROR(NULL, "Could not save module \"%s\"", sModName);
+      AQH_Module_free(currentMod);
+      return;
+    }
+    DBG_ERROR(NULL, "Module \"%s\" saved", sModName);
+    AQH_Module_free(currentMod);
+    AQCGI_Request_AddResponseHeaderData(rq, "Location: index.html");
+    AQCGI_Request_SetResponseCode(rq, 303);
+    AQCGI_Request_SetResponseText(rq, "See other");
+  }
+  else {
+    DBG_ERROR(NULL, "Could not load module \"%s\"", sModName?sModName:"<no name>");
+    GBAS(dbuf, "<p>Error loading module.</p>\n");
+  }
+}
+
+
+
+void _handleRqAddRoleGet(AQH_MODULE *m, AQCGI_REQUEST *rq, AQH_SESSION *session, GWEN_BUFFER *dbuf)
+{
+  AQH_SERVICE *sv;
+  GWEN_DB_NODE *dbQuery;
+  const char *sModName;
+  AQH_MODULE *currentMod;
+  const AQH_PERMDEF_LIST *permDefList;
+  uint32_t guestPerms;
+
+  sv=AQH_ModService_GetService(m);
+  dbQuery=AQCGI_Request_GetDbQuery(rq);
+  sModName=dbQuery?GWEN_DB_GetCharValue(dbQuery, "mod", 0, NULL):NULL;
+  currentMod=(sModName && *sModName)?AQH_Service_LoadModule(sv, sModName):NULL;
+  guestPerms=currentMod?AQH_Module_GetGuestPerms(currentMod):0;
+  permDefList=currentMod?AQH_Module_GetPermDefList(currentMod):NULL;
+
+  if (currentMod) {
+    if (permDefList) {
+      GBAA(dbuf, "<h2>Add Role for Module %s</h2>\n", sModName?sModName:"");
+      GBAS(dbuf,
+           "<form action=\"addrole.html\" method=\"post\">\n"
+           "<table class=\"formtable\">\n"
+           "<tr><td><label for=\"name\">Name:</label></td><td><input type=\"text\" name=\"name\"></td>"
+           "<tr><td><label for=\"descr\">Description:</label></td><td><input type=\"text\" name=\"descr\"></td></tr>\n");
+
+      GBAS(dbuf, "<tr><td><label>Permissions:</label></td><td>");
+      AQH_ModService_WritePermsToForm(guestPerms, permDefList, NULL, dbuf);
+      GBAS(dbuf, "</td></tr>\n");
+
+      GBAS(dbuf, "</table>\n");
+      GBAA(dbuf, "<input type=\"hidden\" name=\"mod\" value=\"%s\">\n", sModName?sModName:"");
+      GBAS(dbuf, "<input type=\"submit\" value=\"Add\">\n");
+      GBAS(dbuf, "</form>\n\n");
+    }
+    else {
+      GBAS(dbuf, "<p>Please add permission definitions first.</p>\n");
+      GBAA(dbuf, "<p><a href=\"editmodule.html?name=\"%s\"> back to module</p>\n", sModName?sModName:"");
+    }
+    AQH_Module_free(currentMod);
+  }
+  else {
+    GBAS(dbuf, "<p>Error loading module.</p>\n");
+    GBAS(dbuf, "<p><a href=\"index.html\"> back to module list</p>\n");
+  }
+}
+
+
+
+void _handleRqAddRolePost(AQH_MODULE *m, AQCGI_REQUEST *rq, AQH_SESSION *session, GWEN_BUFFER *dbuf)
+{
+  AQH_SERVICE *sv;
+  GWEN_DB_NODE *dbPost;
+  const char *sModName;
+  AQH_MODULE *currentMod;
+  int newId;
+  const char *sName;
+  const char *sDescr;
+  uint32_t perms;
+  AQH_PERMDEF_LIST *permDefList;
+  AQH_ROLE_LIST *roleList;
+  int rv;
+
+  /* sample data */
+  DBG_ERROR(NULL, "Handling POST request");
+  sv=AQH_ModService_GetService(m);
+  dbPost=AQCGI_Request_GetDbPostBody(rq);
+  sModName=dbPost?GWEN_DB_GetCharValue(dbPost, "mod", 0, NULL):NULL;
+  currentMod=(sModName && *sModName)?AQH_Service_LoadModule(sv, sModName):NULL;
+  permDefList=currentMod?AQH_Module_GetPermDefList(currentMod):NULL;
+  roleList=currentMod?AQH_Module_GetRoleList(currentMod):NULL;
+  /* read role values */
+  newId=(roleList?_getHighestUsedRoleId(roleList):0)+1;
+  sName=dbPost?GWEN_DB_GetCharValue(dbPost, "name", 0, NULL):NULL;
+  sDescr=dbPost?GWEN_DB_GetCharValue(dbPost, "descr", 0, NULL):NULL;
+  perms=(dbPost && permDefList)?AQH_ModService_ReadPermsFromForm(dbPost, permDefList, NULL):0;
+
+    /* validate */
+  if (!(sName && *sName)) {
+    DBG_ERROR(NULL, "Missing value for \"name\"");
+    GBAS(dbuf, "<p>Missing name.</p>\n");
+    GBAA(dbuf, "<p><a href=\"editmodule.html?name=\"%s\"> back to module</p>\n", sModName?sModName:"");
+    return;
+  }
+
+  if (currentMod) {
+    AQH_ROLE *role;
+
+    /* set new values */
+    role=AQH_Role_new();
+    AQH_Role_SetId(role, newId);
+    AQH_Role_SetName(role, sName);
+    AQH_Role_SetDescr(role, sDescr);
+    AQH_Role_SetPerms(role, perms);
+    /* add role */
+    if (roleList==NULL) {
+      roleList=AQH_Role_List_new();
+      AQH_Module_SetRoleList(currentMod, roleList);
+    }
+    AQH_Role_List_Add(role, roleList);
+
+    /* save module */
+    rv=AQH_Service_SaveModule(sv, currentMod);
+    if (rv<0) {
+      GBAS(dbuf, "<p>Error saving module.</p>\n");
+      GBAA(dbuf, "<p><a href=\"editmodule.html?name=\"%s\"> back to module</p>\n", sModName?sModName:"");
+      AQH_Module_free(currentMod);
+      return;
+    }
+    _setLocationHeaderForMod(rq, "editmodule.html", sModName);
+    AQCGI_Request_SetResponseCode(rq, 303);
+    AQCGI_Request_SetResponseText(rq, "See Other");
+    AQH_Module_free(currentMod);
+  }
+  else {
+    GBAS(dbuf, "<p>Error loading module.</p>\n");
+    GBAS(dbuf, "<p><a href=\"index.html\"> back to module list</p>\n");
+  }
+}
+
+
+
+void _handleRqEditRoleGet(AQH_MODULE *m, AQCGI_REQUEST *rq, AQH_SESSION *session, GWEN_BUFFER *dbuf)
+{
+  AQH_SERVICE *sv;
+  GWEN_DB_NODE *dbQuery;
+  const char *sModName;
+  int id;
+  const char *sName;
+  const char *sDescr;
+  uint32_t perms;
+  AQH_MODULE *currentMod;
+  const AQH_PERMDEF_LIST *permDefList;
+  const AQH_ROLE_LIST *roleList;
+  const AQH_ROLE *role;
+
+  sv=AQH_ModService_GetService(m);
+  dbQuery=AQCGI_Request_GetDbQuery(rq);
+  sModName=dbQuery?GWEN_DB_GetCharValue(dbQuery, "mod", 0, NULL):NULL;
+  id=dbQuery?GWEN_DB_GetIntValue(dbQuery, "id", 0, 0):0;
+  currentMod=(sModName && *sModName)?AQH_Service_LoadModule(sv, sModName):NULL;
+  permDefList=currentMod?AQH_Module_GetPermDefList(currentMod):NULL;
+  roleList=currentMod?AQH_Module_GetRoleList(currentMod):NULL;
+  role=roleList?AQH_Role_List_GetById(roleList, id):NULL;
+  sName=role?AQH_Role_GetName(role):NULL;
+  sDescr=role?AQH_Role_GetDescr(role):NULL;
+  perms=role?AQH_Role_GetPerms(role):0;
+
+  if (role) {
+    GBAA(dbuf, "<h2>Edit Role for Module %s</h2>\n", sModName?sModName:"");
+    GBAA(dbuf,
+         "<form action=\"editrole.html\" method=\"post\">\n"
+         "<table class=\"formtable\">\n"
+         "<tr><td><label for=\"name\">Name:</label></td><td><input type=\"text\" name=\"name\" value=\"%s\"></td></tr>\n"
+         "<tr><td><label for=\"descr\">Description:</label></td><td><input type=\"text\" name=\"descr\" value=\"%s\"></td></tr>\n",
+         sName, sDescr?sDescr:"");
+
+    GBAS(dbuf, "<tr><td><label>Permissions:</label></td><td>");
+    AQH_ModService_WritePermsToForm(perms, permDefList, NULL, dbuf);
+    GBAS(dbuf, "</td></tr>\n");
+
+    GBAS(dbuf, "</table>\n");
+
+    GBAA(dbuf, "<input type=\"hidden\" name=\"mod\" value=\"%s\">\n", sModName?sModName:"");
+    GBAA(dbuf, "<input type=\"hidden\" name=\"oldId\" value=\"%d\">\n", id);
+    GBAS(dbuf, "<input type=\"submit\" value=\"Save\">\n");
+    GBAS(dbuf, "</form>\n\n");
+  }
+  else {
+    GBAS(dbuf, "<p>Role not found.</p>\n");
+    GBAA(dbuf, "<p><a href=\"editmodule.html?name=\"%s\"> back to module</p>\n", sModName?sModName:"");
+  }
+}
+
+
+
+void _handleRqEditRolePost(AQH_MODULE *m, AQCGI_REQUEST *rq, AQH_SESSION *session, GWEN_BUFFER *dbuf)
+{
+  AQH_SERVICE *sv;
+  GWEN_DB_NODE *dbPost;
+  const char *sModName;
+  AQH_MODULE *currentMod;
+  int oldId;
+  const char *sName;
+  const char *sDescr;
+  uint32_t perms;
+  AQH_PERMDEF_LIST *permDefList;
+  AQH_ROLE_LIST *roleList;
+  AQH_ROLE *role;
+  int rv;
+
+  /* sample data */
+  sv=AQH_ModService_GetService(m);
+  dbPost=AQCGI_Request_GetDbPostBody(rq);
+  sModName=dbPost?GWEN_DB_GetCharValue(dbPost, "mod", 0, NULL):NULL;
+  currentMod=(sModName && *sModName)?AQH_Service_LoadModule(sv, sModName):NULL;
+  permDefList=currentMod?AQH_Module_GetPermDefList(currentMod):NULL;
+  roleList=currentMod?AQH_Module_GetRoleList(currentMod):NULL;
+  /* read role data */
+  oldId=dbPost?GWEN_DB_GetIntValue(dbPost, "oldId", 0, -1):-1;
+  sName=dbPost?GWEN_DB_GetCharValue(dbPost, "name", 0, NULL):NULL;
+  sDescr=dbPost?GWEN_DB_GetCharValue(dbPost, "descr", 0, NULL):NULL;
+  role=roleList?AQH_Role_List_GetById(roleList, oldId):NULL;
+  perms=(dbPost && permDefList)?AQH_ModService_ReadPermsFromForm(dbPost, permDefList, NULL):0;
+  /* validate */
+  if (!(sName && *sName)) {
+    DBG_ERROR(NULL, "Missing value for \"name\"");
+    GBAS(dbuf, "<p>Missing name.</p>\n");
+    GBAA(dbuf, "<p><a href=\"editmodule.html?name=\"%s\"> back to module</p>\n", sModName?sModName:"");
+    return;
+  }
+  if (role==NULL) {
+    DBG_ERROR(NULL, "Role %d not found", oldId);
+    GBAS(dbuf, "<p>Role not found.</p>\n");
+    GBAA(dbuf, "<p><a href=\"editmodule.html?name=\"%s\"> back to module</p>\n", sModName?sModName:"");
+    return;
+  }
+
+  if (currentMod) {
+    /* set new values */
+    AQH_Role_SetName(role, sName);
+    AQH_Role_SetDescr(role, sDescr);
+    AQH_Role_SetPerms(role, perms);
+
+    /* save module */
+    rv=AQH_Service_SaveModule(sv, currentMod);
+    if (rv<0) {
+      GBAS(dbuf, "<p>Error saving module.</p>\n");
+      GBAA(dbuf, "<p><a href=\"editmodule.html?name=\"%s\"> back to module</p>\n", sModName?sModName:"");
+      AQH_Module_free(currentMod);
+      return;
+    }
+
+    _setLocationHeaderForMod(rq, "editmodule.html", sModName);
+    AQCGI_Request_SetResponseCode(rq, 303);
+    AQCGI_Request_SetResponseText(rq, "See Other");
+    AQH_Module_free(currentMod);
+  }
+  else {
+    GBAS(dbuf, "<p>Error loading module.</p>\n");
+    GBAS(dbuf, "<p><a href=\"index.html\"> back to module list</p>\n");
+  }
+}
+
+
+
+void _handleRqDeleteRole(AQH_MODULE *m, AQCGI_REQUEST *rq, AQH_SESSION *session, GWEN_BUFFER *dbuf)
+{
+  AQH_SERVICE *sv;
+  GWEN_DB_NODE *dbQuery;
+  const char *sModName;
+  int id;
+  AQH_MODULE *currentMod;
+  const AQH_ROLE_LIST *roleList;
+  AQH_ROLE *role;
+
+  sv=AQH_ModService_GetService(m);
+  dbQuery=AQCGI_Request_GetDbQuery(rq);
+  sModName=dbQuery?GWEN_DB_GetCharValue(dbQuery, "mod", 0, NULL):NULL;
+  id=dbQuery?GWEN_DB_GetIntValue(dbQuery, "id", 0, 0):0;
+  currentMod=(sModName && *sModName)?AQH_Service_LoadModule(sv, sModName):NULL;
+  if (currentMod) {
+    roleList=currentMod?AQH_Module_GetRoleList(currentMod):NULL;
+    role=roleList?AQH_Role_List_GetById(roleList, id):NULL;
+    if (role) {
+      int rv;
+
+      AQH_Role_List_Del(role);
+      AQH_Role_free(role);
+
+      /* save module */
+      rv=AQH_Service_SaveModule(sv, currentMod);
+      if (rv<0) {
+        GBAS(dbuf, "<p>Error saving module.</p>\n");
+        GBAA(dbuf, "<p><a href=\"editmodule.html?name=\"%s\"> back to module</p>\n", sModName?sModName:"");
+        AQH_Module_free(currentMod);
+        return;
+      }
+
+      _setLocationHeaderForMod(rq, "editmodule.html", sModName);
+      AQCGI_Request_SetResponseCode(rq, 303);
+      AQCGI_Request_SetResponseText(rq, "See Other");
+    }
+    else {
+      GBAS(dbuf, "<p>Role not found.</p>\n");
+      GBAA(dbuf, "<p><a href=\"editmodule.html?name=\"%s\"> back to module</p>\n", sModName?sModName:"");
+    }
+    AQH_Module_free(currentMod);
+  }
+  else {
+    GBAS(dbuf, "<p>Error loading module.</p>\n");
+    GBAS(dbuf, "<p><a href=\"index.html\"> back to module list</p>\n");
+  }
+}
+
+
+
+void _setLocationHeaderForMod(AQCGI_REQUEST *rq, const char *page, const char *sModName)
+{
+  GWEN_BUFFER *tbuf;
+
+  tbuf=GWEN_Buffer_new(0, 256, 0, 1);
+  GBAA(tbuf, "Location: %s?name=%s", page?page:"", sModName?sModName:"");
+  AQCGI_Request_AddResponseHeaderData(rq, GWEN_Buffer_GetStart(tbuf));
+  GWEN_Buffer_free(tbuf);
+}
+
+
+
+int _getHighestUsedRoleId(const AQH_ROLE_LIST *roleList)
+{
+  int id=0;
+
+  if (roleList) {
+    const AQH_ROLE *role;
+
+    role=AQH_Role_List_First(roleList);
+    while(role) {
+      int rid;
+
+      rid=AQH_Role_GetId(role);
+      id=(rid>id)?rid:id;
+      role=AQH_Role_List_Next(role);
+    }
+  }
+  return id;
+}
+
+
+
+void _writeEditModForm(const AQH_MODULE *currentMod, const char *sModName, GWEN_BUFFER *dbuf)
+{
+  const char *sName;
+  const char *sDescr;
+  const AQH_PERMDEF_LIST *permDefList;
+  const AQH_ROLE_LIST *roleList;
+
+  permDefList=AQH_Module_GetPermDefList(currentMod);
+  roleList=AQH_Module_GetRoleList(currentMod);
+  sName=AQH_Module_GetName(currentMod);
+  sDescr=AQH_Module_GetDescr(currentMod);
+  /* write module info */
+  GBAS(dbuf, "<h2>Module Info</h2>\n");
+  GBAA(dbuf,
+       "<form action=\"editmodule.html\" method=\"post\">\n"
+       "<table class=\"formtable\">\n"
+       "<tr><td><label for=\"name\">Name:</label></td><td><input type=\"text\" name=\"name\" value=\"%s\"></td></tr>\n"
+       "<tr><td><label for=\"descr\">Description:</label></td><td><input type=\"text\" name=\"descr\" value=\"%s\"></td></tr>\n",
+       sName?sName:"", sDescr?sDescr:"");
+
+  if (permDefList) {
+    GBAA(dbuf, "<tr><td><label>Guest Permissions:</label></td>\n<td>");
+    AQH_ModService_WritePermsToForm(AQH_Module_GetGuestPerms(currentMod), permDefList, NULL, dbuf);
+    GBAA(dbuf, "</td></tr>");
+  }
+  
+  GBAS(dbuf, "</table>\n");
+  
+  GBAA(dbuf, "<input type=\"hidden\" name=\"module\" value=\"%s\">\n", sModName?sModName:"");
+  GBAS(dbuf, "<input type=\"submit\" value=\"Save\">\n</form>\n\n");
+
+  /* write role list */
+  GBAS(dbuf, "<h2>User Roles</h2>\n");
+  if (roleList)
+    _writeRoleListToForm(roleList, sModName, permDefList, dbuf);
+  else
+    GBAS(dbuf, "<p>none</p>");
+  GBAA(dbuf, "<a href=\"addrole.html?mod=%s\"><img src=\"/pics/plus.png\">Add Role</a>\n", sModName?sModName:"");
+}
+
+
+
+void _writeRoleListToForm(const AQH_ROLE_LIST *roleList,
+			  const char *sModName,
+			  const AQH_PERMDEF_LIST *permDefList,
+			  GWEN_BUFFER *dbuf)
+{
+  const AQH_ROLE *role;
+
+  GBAS(dbuf,
+       "<table class=\"datatable\">\n"
+       "<thead><tr><th>Id</th><th>Name</th><th>Permissions</th><th>Description</th><th>Actions</th></tr>\n</thead>\n"
+       "<tbody>\n");
+  role=AQH_Role_List_First(roleList);
+  while(role) {
+    uint8_t id;
+    const char *s;
+
+    GBAS(dbuf, "<tr>");
+    /* id */
+    id=AQH_Role_GetId(role);
+    GBAA(dbuf, "<td>%d</td>", id);
+    /* name */
+    s=AQH_Role_GetName(role);
+    GBAA(dbuf, "<td>%s</td>", s?s:"");
+    /* permissions */
+    GBAS(dbuf, "<td>");
+    if (permDefList)
+      _writeEnabledPermissions(permDefList, AQH_Role_GetPerms(role), dbuf);
+    GBAS(dbuf, "</td>");
+    /* description */
+    s=AQH_Role_GetDescr(role);
+    GBAA(dbuf, "<td>%s</td>", s?s:"");
+    /* actions */
+    GBAA(dbuf, "<td>");
+    GBAA(dbuf, "<a href=\"editrole.html?mod=%s&id=%d\"><img src=\"/pics/edit.png\"></a>", sModName?sModName:"", id);
+    GBAA(dbuf, "<a href=\"delrole.html?mod=%s&id=%d\"><img src=\"/pics/minus.png\"></a>", sModName?sModName:"", id);
+    GBAA(dbuf, "</td>");
+    GBAS(dbuf, "</tr>\n");
+
+    role=AQH_Role_List_Next(role);
+  }
+
+  GBAS(dbuf, "</tbody>\n</table>\n");
+}
+
+
+
+
+
+
+void _writeEnabledPermissions(const AQH_PERMDEF_LIST *permDefList, uint32_t perms, GWEN_BUFFER *dbuf)
+{
+  if (permDefList) {
+    const AQH_PERMDEF *permDef;
+
+    permDef=AQH_PermDef_List_First(permDefList);
+    while(permDef) {
+      const char *s;
+      uint32_t mask;
+
+      s=AQH_PermDef_GetId(permDef);
+      mask=AQH_PermDef_GetMask(permDef);
+      if (perms & mask)
+	GBAA(dbuf, "%s ", s?s:"");
+      permDef=AQH_PermDef_List_Next(permDef);
+    }
+  }
+}
+
+
+

apps/aqhome-cgi/modules/common/mmodules.h

@@ -0,0 +1,35 @@
+/****************************************************************************
+ * This file is part of the project AqHome.
+ * AqHome (c) by 2025 Martin Preuss, all rights reserved.
+ *
+ * The license for this file can be found in the file COPYING which you
+ * should have received along with this file.
+ ****************************************************************************/
+
+#ifndef AQHOME_CGI_MMODULES_H
+#define AQHOME_CGI_MMODULES_H
+
+#include <aqhome-cgi/modules/common/mservice.h>
+
+#include <aqcgi/request.h>
+
+#include <gwenhywfar/buffer.h>
+
+
+
+#define AQH_MODADMMODULES_PERMS_MODULESREAD  0x001
+#define AQH_MODADMMODULES_PERMS_MODULESWRITE 0x002
+#define AQH_MODADMMODULES_PERMS_MODULESADD   0x004
+#define AQH_MODADMMODULES_PERMS_MODULESDEL   0x008
+
+
+
+void AQH_ModAdmModules_Extend(AQH_MODULE *m, AQH_SERVICE *sv, const char *baseFolder);
+
+int AQH_ModAdmModules_Create(AQH_SERVICE *sv);
+
+
+
+
+#endif
+

apps/aqhome-cgi/modules/common/mservice.c

@@ -0,0 +1,820 @@
+/****************************************************************************
+ * This file is part of the project AqHome.
+ * AqHome (c) by 2025 Martin Preuss, all rights reserved.
+ *
+ * The license for this file can be found in the file COPYING which you
+ * should have received along with this file.
+ ****************************************************************************/
+
+#ifdef HAVE_CONFIG_H
+# include <config.h>
+#endif
+
+
+#include "./mservice_p.h"
+
+#include "aqhome-cgi/service/module.h"
+
+#include <gwenhywfar/debug.h>
+
+#include <string.h>
+#include <ctype.h>
+#include <time.h>
+
+#include <sys/stat.h>
+#include <string.h>
+#include <errno.h>
+
+
+
+/* ------------------------------------------------------------------------------------------------
+ * defs and enums
+ * ------------------------------------------------------------------------------------------------
+ */
+
+#define AQH_MOD_SERVICE_HEADERFILE "header.html"
+#define AQH_MOD_SERVICE_FOOTERFILE "footer.html"
+
+
+#define GBAS GWEN_Buffer_AppendString
+#define GBAA GWEN_Buffer_AppendArgs
+
+
+
+/* ------------------------------------------------------------------------------------------------
+ * global vars
+ * ------------------------------------------------------------------------------------------------
+ */
+
+GWEN_INHERIT(AQH_MODULE, AQH_MOD_SERVICE)
+
+
+
+/* ------------------------------------------------------------------------------------------------
+ * forward declarations
+ * ------------------------------------------------------------------------------------------------
+ */
+
+static void GWENHYWFAR_CB _freeData(void *bp, void *p);
+static void _calcUserModPerms(AQH_MODULE *m, const AQH_USER *user);
+static uint32_t _calcRolePerms(const AQH_MODULE *m, const AQH_MODULE_PERMS *modPerms);
+
+
+
+/* ------------------------------------------------------------------------------------------------
+ * code
+ * ------------------------------------------------------------------------------------------------
+ */
+
+void AQH_ModService_Extend(AQH_MODULE *m, AQH_SERVICE *sv, const char *baseFolder)
+{
+  AQH_MOD_SERVICE *xm;
+
+  GWEN_NEW_OBJECT(AQH_MOD_SERVICE, xm);
+  GWEN_INHERIT_SETDATA(AQH_MODULE, AQH_MOD_SERVICE, m, xm, _freeData);
+
+  xm->service=sv;
+  xm->baseFolder=(baseFolder && *baseFolder)?strdup(baseFolder):NULL;
+}
+
+
+
+void _freeData(GWEN_UNUSED void *bp, void *p)
+{
+  AQH_MOD_SERVICE *xm;
+
+  xm=(AQH_MOD_SERVICE*) p;
+  free(xm->baseFolder);
+  GWEN_FREE_OBJECT(xm);
+}
+
+
+
+AQH_SERVICE *AQH_ModService_GetService(const AQH_MODULE *m)
+{
+  if (m) {
+    AQH_MOD_SERVICE *xm;
+
+    xm=GWEN_INHERIT_GETDATA(AQH_MODULE, AQH_MOD_SERVICE, m);
+    if (xm) {
+      return xm->service;
+    }
+  }
+  return NULL;
+}
+
+
+
+const char *AQH_ModService_GetBaseFolder(const AQH_MODULE *m)
+{
+  if (m) {
+    AQH_MOD_SERVICE *xm;
+
+    xm=GWEN_INHERIT_GETDATA(AQH_MODULE, AQH_MOD_SERVICE, m);
+    if (xm) {
+      return xm->baseFolder;
+    }
+  }
+  return NULL;
+}
+
+
+
+uint32_t AQH_ModService_GetUserPerms(const AQH_MODULE *m)
+{
+  if (m) {
+    AQH_MOD_SERVICE *xm;
+
+    xm=GWEN_INHERIT_GETDATA(AQH_MODULE, AQH_MOD_SERVICE, m);
+    if (xm) {
+      return xm->userPerms;
+    }
+  }
+  return 0;
+}
+
+
+
+void AQH_ModService_SetHandleRequestFn(AQH_MODULE *m, AQH_MODSERVICE_HANDLEREQUEST_FN fn)
+{
+  if (m) {
+    AQH_MOD_SERVICE *xm;
+
+    xm=GWEN_INHERIT_GETDATA(AQH_MODULE, AQH_MOD_SERVICE, m);
+    if (xm) {
+      xm->handleRequestFn=fn;
+    }
+  }
+}
+
+
+
+void AQH_ModService_SetLoadSubModuleFn(AQH_MODULE *m, AQH_MODSERVICE_LOADSUBMODULE_FN fn)
+{
+  if (m) {
+    AQH_MOD_SERVICE *xm;
+
+    xm=GWEN_INHERIT_GETDATA(AQH_MODULE, AQH_MOD_SERVICE, m);
+    if (xm) {
+      xm->loadSubModuleFn=fn;
+    }
+  }
+}
+
+
+
+void AQH_ModService_SetAddHeaderFn(AQH_MODULE *m, AQH_MODSERVICE_ADDHEADER_FN fn)
+{
+  if (m) {
+    AQH_MOD_SERVICE *xm;
+
+    xm=GWEN_INHERIT_GETDATA(AQH_MODULE, AQH_MOD_SERVICE, m);
+    if (xm) {
+      xm->addHeaderFn=fn;
+    }
+  }
+}
+
+
+
+void AQH_ModService_SetAddFooterFn(AQH_MODULE *m, AQH_MODSERVICE_ADDFOOTER_FN fn)
+{
+  if (m) {
+    AQH_MOD_SERVICE *xm;
+
+    xm=GWEN_INHERIT_GETDATA(AQH_MODULE, AQH_MOD_SERVICE, m);
+    if (xm) {
+      xm->addFooterFn=fn;
+    }
+  }
+}
+
+
+
+void AQH_ModService_AddHeader(AQH_MODULE *m, const char *lang, GWEN_BUFFER *dbuf)
+{
+  if (m && dbuf) {
+    AQH_MOD_SERVICE *xm;
+
+    xm=GWEN_INHERIT_GETDATA(AQH_MODULE, AQH_MOD_SERVICE, m);
+    if (xm) {
+      if (xm->addHeaderFn)
+        xm->addHeaderFn(m, lang, dbuf);
+      else {
+        AQH_MODULE *mParent;
+
+        mParent=AQH_Module_Tree2_GetParent(m);
+        if (mParent)
+          AQH_ModService_AddHeader(mParent, lang, dbuf);
+        AQH_ModService_ReadStaticFile(m, lang, AQH_MOD_SERVICE_HEADERFILE, dbuf);
+      }
+    }
+  }
+}
+
+
+
+void AQH_ModService_AddFooter(AQH_MODULE *m, const char *lang, GWEN_BUFFER *dbuf)
+{
+  if (m && dbuf) {
+    AQH_MOD_SERVICE *xm;
+
+    xm=GWEN_INHERIT_GETDATA(AQH_MODULE, AQH_MOD_SERVICE, m);
+    if (xm) {
+      if (xm->addFooterFn)
+        xm->addFooterFn(m, lang, dbuf);
+      else {
+        AQH_MODULE *mParent;
+
+        AQH_ModService_ReadStaticFile(m, lang, AQH_MOD_SERVICE_FOOTERFILE, dbuf);
+
+        mParent=AQH_Module_Tree2_GetParent(m);
+        if (mParent)
+          AQH_ModService_AddFooter(mParent, lang, dbuf);
+      }
+    }
+  }
+}
+
+
+
+int AQH_ModService_RespondWithFile(AQH_MODULE *m, AQCGI_REQUEST *rq, const char *lang, const char *sFilename, GWEN_BUFFER *dbuf)
+{
+  int rv;
+
+  rv=AQH_ModService_ReadStaticFile(m, lang, sFilename, dbuf);
+  if (rv<0) {
+    AQCGI_Request_SetResponseCode(rq, 500);
+    AQCGI_Request_SetResponseText(rq, "Internal Error");
+    return GWEN_ERROR_INTERNAL;
+  }
+  AQCGI_Request_SetResponseCode(rq, 200);
+  AQCGI_Request_SetResponseText(rq, "Ok");
+
+  return 0;
+}
+
+
+
+int AQH_ModService_HandleRequest(AQH_MODULE *m, AQCGI_REQUEST *rq, AQH_SESSION *session, const char *sLastPathElem)
+{
+  if (m) {
+    AQH_MOD_SERVICE *xm;
+
+    xm=GWEN_INHERIT_GETDATA(AQH_MODULE, AQH_MOD_SERVICE, m);
+    if (xm && xm->handleRequestFn)
+      return xm->handleRequestFn(m, rq, session, sLastPathElem);
+  }
+  return GWEN_ERROR_NOT_IMPLEMENTED;
+}
+
+
+
+AQH_MODULE *AQH_ModService_LoadSubModule(AQH_MODULE *m, AQCGI_REQUEST *rq, AQH_SESSION *session, const char *sModuleName)
+{
+  if (m) {
+    AQH_MOD_SERVICE *xm;
+
+    xm=GWEN_INHERIT_GETDATA(AQH_MODULE, AQH_MOD_SERVICE, m);
+    if (xm && xm->loadSubModuleFn) {
+      AQH_MODULE *mReturn;
+
+      mReturn=xm->loadSubModuleFn(m, rq, session, sModuleName);
+      if (mReturn)
+        AQH_ModService_CalcSessionModPerms(mReturn, session);
+      return mReturn;
+    }
+  }
+  return NULL;
+}
+
+
+
+int AQH_ModService_ReadStaticFile(AQH_MODULE *m, const char *lang, const char *filename, GWEN_BUFFER *dbuf)
+{
+  if (m && filename && dbuf) {
+    AQH_MOD_SERVICE *xm;
+
+    xm=GWEN_INHERIT_GETDATA(AQH_MODULE, AQH_MOD_SERVICE, m);
+    if (xm) {
+      GWEN_BUFFER *fbuf;
+      int rv;
+
+      fbuf=GWEN_Buffer_new(0, 256, 0, 1);
+      GWEN_Buffer_AppendString(fbuf, xm->baseFolder);
+      GWEN_Buffer_AppendString(fbuf, GWEN_DIR_SEPARATOR_S);
+      GWEN_Buffer_AppendString(fbuf, (lang && *lang)?lang:"en");
+      GWEN_Buffer_AppendString(fbuf, GWEN_DIR_SEPARATOR_S);
+      GWEN_Buffer_AppendString(fbuf, filename);
+      DBG_ERROR(NULL, "Reading file \"%s\"", GWEN_Buffer_GetStart(fbuf));
+      rv=GWEN_SyncIo_Helper_ReadFile(GWEN_Buffer_GetStart(fbuf), dbuf);
+      if (rv<0) {
+        DBG_ERROR(NULL, "Read(%s): %d", GWEN_Buffer_GetStart(fbuf), rv);
+        GWEN_Buffer_free(fbuf);
+        return rv;
+      }
+      GWEN_Buffer_free(fbuf);
+      return 0;
+    }
+  }
+  DBG_ERROR(NULL, "Any arg is missing (or is not a AQH_MOD_SERVICE object)");
+  return GWEN_ERROR_INTERNAL;
+}
+
+
+
+AQH_SESSION *AQH_ModService_ReadSession(AQH_MODULE *m, AQCGI_REQUEST *rq)
+{
+  AQH_SERVICE *sv;
+  GWEN_DB_NODE *db;
+  const char *s;
+
+  sv=AQH_ModService_GetService(m);
+  db=AQCGI_Request_GetDbRequestHeader(rq);
+  s=GWEN_DB_GetCharValue(db, "cookies/session", 0, NULL);
+  if (s && *s) {
+    AQH_SESSION *session;
+
+    session=AQH_Service_LoadSession(sv, s);
+    if (session==NULL) {
+      DBG_ERROR(NULL, "Session \"%s\" not found", s);
+      return NULL;
+    }
+    else {
+      const char *sUserName;
+      GWEN_BUFFER *tbuf;
+
+      sUserName=AQH_Session_GetUserAlias(session);
+      if (sUserName && *sUserName) {
+        AQH_USER *user;
+
+        user=AQH_Service_LoadUser(sv, sUserName);
+        if (user==NULL) {
+          DBG_ERROR(NULL, "User \"%s\" not found", sUserName);
+          AQH_Session_free(session);
+          return NULL;
+        }
+        else {
+          DBG_ERROR(NULL, "User is \"%s\"", sUserName);
+        }
+        AQH_Session_SetUser(session, user);
+      }
+      /* renew session cookie */
+      tbuf=GWEN_Buffer_new(0, 256, 0, 1);
+      GWEN_Buffer_AppendArgs(tbuf, "Set-Cookie: session=%s; max-age=86400", AQH_Session_GetUid(session));
+      AQCGI_Request_AddResponseHeaderData(rq, GWEN_Buffer_GetStart(tbuf));
+      DBG_ERROR(NULL, "Renew session cookie");
+      GWEN_Buffer_free(tbuf);
+      return session;
+    }
+  }
+  else {
+    DBG_ERROR(NULL, "No session cookie");
+  }
+  return NULL;
+}
+
+
+
+void AQH_ModService_CalcSessionModPerms(AQH_MODULE *m, const AQH_SESSION *session)
+{
+  const AQH_USER *user;
+
+  user=session?AQH_Session_GetUser(session):NULL;
+  _calcUserModPerms(m, user);
+}
+
+
+
+void _calcUserModPerms(AQH_MODULE *m, const AQH_USER *user)
+{
+  if (m) {
+    AQH_MOD_SERVICE *xm;
+
+    xm=GWEN_INHERIT_GETDATA(AQH_MODULE, AQH_MOD_SERVICE, m);
+    if (xm) {
+      uint32_t perms=0;
+
+      if (user) {
+        if (AQH_User_GetFlags(user) & AQH_USER_FLAGS_ADMIN)
+          perms=0xffffffff;
+        else {
+          const char *sModName;
+          const AQH_MODULE_PERMS_LIST *modPermsList;
+          AQH_MODULE_PERMS *modPerms;
+
+          sModName=AQH_Module_GetName(m);
+          modPermsList=AQH_User_GetModulePermList(user);
+          modPerms=(sModName && modPermsList)?AQH_ModulePerms_List_GetByModuleId(modPermsList, sModName):NULL;
+          if (modPerms)
+            perms=_calcRolePerms(m, modPerms);
+          else
+            perms=AQH_Module_GetGuestPerms(m);
+        }
+      } /* if (user) */
+      else
+        perms=AQH_Module_GetGuestPerms(m);
+      xm->userPerms=perms;
+    }
+  } /* if (m) */
+}
+
+
+
+uint32_t _calcRolePerms(const AQH_MODULE *m, const AQH_MODULE_PERMS *modPerms)
+{
+  uint32_t perms=0;
+  const AQH_ROLE_LIST *roleList;
+
+  roleList=AQH_Module_GetRoleList(m);
+  if (roleList) {
+    int roleArraySize;
+    int i;
+    uint32_t explAddPerms=0;
+    uint32_t explDelPerms=0;
+
+    roleArraySize=AQH_ModulePerms_GetRoleArrayArraySize();
+    for (i=0; i<roleArraySize; i++) {
+      int roleId;
+
+      roleId=AQH_ModulePerms_GetRoleArrayAt(modPerms, i);
+      if (roleId) {
+        const AQH_ROLE *role;
+
+        role=AQH_Role_List_GetById(roleList, roleId);
+        if (role) {
+          perms|=AQH_Role_GetPerms(role);
+          explAddPerms|=AQH_Role_GetExplAddPerms(role);
+          explAddPerms|=AQH_Role_GetExplDelPerms(role);
+        }
+      }
+    } /* for */
+    /* collate permissions */
+    perms|=explAddPerms;
+    perms|=AQH_ModulePerms_GetExplAddPerms(modPerms);
+    perms&=~explDelPerms;
+    perms&=~AQH_ModulePerms_GetExplDelPerms(modPerms);
+  }
+  return perms;
+}
+
+
+
+
+void AQH_ModService_AddPermDef(AQH_PERMDEF_LIST *permDefList, const char *id, uint32_t mask, const char *descr)
+{
+  AQH_PERMDEF *permDef;
+
+  permDef=AQH_PermDef_new();
+  AQH_PermDef_SetId(permDef, id);
+  AQH_PermDef_SetMask(permDef, mask);
+  AQH_PermDef_SetDescr(permDef, descr);
+  AQH_PermDef_List_Add(permDef, permDefList);
+}
+
+
+
+void AQH_ModService_AddRole(AQH_ROLE_LIST *roleList, int id, const char *name, uint32_t perms, const char *descr)
+{
+  AQH_ROLE *role;
+
+  role=AQH_Role_new();
+  AQH_Role_SetId(role, id);
+  AQH_Role_SetName(role, name);
+  AQH_Role_SetPerms(role, perms);
+  AQH_Role_SetDescr(role, descr);
+  AQH_Role_List_Add(role, roleList);
+}
+
+
+
+void AQH_ModService_HandleRequestWithTable(AQH_MODULE *m,
+                                           AQCGI_REQUEST *rq,
+                                           AQH_SESSION *session,
+                                           const char *page,
+                                           const AQH_MODSERVICE_HANDLER_ENTRY *e)
+{
+  uint32_t perms;
+  GWEN_BUFFER *dbuf;
+  int i;
+
+  perms=AQH_ModService_GetUserPerms(m);
+  DBG_ERROR(NULL, "Perms=%08x", perms);
+
+  dbuf=GWEN_Buffer_new(0, 256, 0, 1);
+  AQH_ModService_AddHeader(m, "en", dbuf);
+
+  for (i=0; ; i++) {
+    if (e[i].page==NULL) {
+      AQCGI_Request_SetResponseCode(rq, 404);
+      AQCGI_Request_SetResponseText(rq, "Not Found");
+      break;
+    }
+    if ((AQCGI_Request_GetRequestMethod(rq)==e[i].httpMethod) &&
+        (strcasecmp(page, e[i].page)==0)) {
+      /* preset result */
+      AQCGI_Request_SetResponseCode(rq, 200);
+      AQCGI_Request_SetResponseText(rq, "Ok");
+      if ((perms & e[i].perms)==e[i].perms)
+        (e[i].handlerFn)(m, rq, session, dbuf);
+      else {
+        GWEN_Buffer_AppendString(dbuf, "<h1>Error</h1><p>No permissions for this request.</p>");
+        AQCGI_Request_SetResponseCode(rq, 403);
+        AQCGI_Request_SetResponseText(rq, "Forbidden");
+      }
+      break;
+    }
+  }
+
+  if (!(AQCGI_Request_GetFlags(rq) & AQH_MODSERVICE_RQFLAGS_RAWFILE)) {
+    DBG_ERROR(NULL, "Not adding footer");
+    AQH_ModService_AddFooter(m, "en", dbuf);
+  }
+  AQCGI_Request_SetBufferResponseBody(rq, dbuf);
+  if (AQCGI_Request_GetFlags(rq) & AQCGI_FLAGS_HAS_CONTENT_HEADER)
+    AQCGI_Request_AddResponseHeaderData(rq, "Content-type: text/html");
+}
+
+
+
+void AQH_ModService_WritePermsToForm(uint32_t perms, const AQH_PERMDEF_LIST *permDefList, const char *sPrefix, GWEN_BUFFER *dbuf)
+{
+  if (permDefList) {
+    const AQH_PERMDEF *permDef;
+    GWEN_BUFFER *tbuf;
+    uint32_t pos;
+
+    tbuf=GWEN_Buffer_new(0, 256, 0, 1);
+    if (sPrefix && *sPrefix)
+      GBAA(tbuf, "%s:", sPrefix);
+    pos=GWEN_Buffer_GetPos(tbuf);
+
+    permDef=AQH_PermDef_List_First(permDefList);
+    while(permDef) {
+      const char *s;
+
+      s=AQH_PermDef_GetId(permDef);
+      if (s && *s) {
+        uint32_t mask;
+
+        GBAS(tbuf, s);
+        mask=AQH_PermDef_GetMask(permDef);
+        if (perms & mask)
+          GBAA(dbuf, "<input type=\"checkbox\" name=\"%s\" checked>", GWEN_Buffer_GetStart(tbuf));
+        else
+          GBAA(dbuf, "<input type=\"checkbox\" name=\"%s\">", s?s:"");
+        GBAA(dbuf, "<label for=\"%s\">%s</label>", GWEN_Buffer_GetStart(tbuf), s?s:"");
+        GWEN_Buffer_Crop(tbuf, 0, pos);
+      }
+      permDef=AQH_PermDef_List_Next(permDef);
+    }
+    GWEN_Buffer_free(tbuf);
+  }
+}
+
+
+
+uint32_t AQH_ModService_ReadPermsFromForm(GWEN_DB_NODE *dbPost, const AQH_PERMDEF_LIST *permDefList, const char *sPrefix)
+{
+  uint32_t result=0;
+
+  if (permDefList) {
+    const AQH_PERMDEF *permDef;
+    GWEN_BUFFER *tbuf;
+    uint32_t pos;
+
+    tbuf=GWEN_Buffer_new(0, 256, 0, 1);
+    if (sPrefix && *sPrefix)
+      GBAA(tbuf, "%s:", sPrefix);
+    pos=GWEN_Buffer_GetPos(tbuf);
+
+    permDef=AQH_PermDef_List_First(permDefList);
+    while(permDef) {
+      const char *id;
+
+      id=AQH_PermDef_GetId(permDef);
+      if (id && *id) {
+        uint32_t mask;
+        const char *s;
+
+        GBAS(tbuf, id);
+        mask=AQH_PermDef_GetMask(permDef);
+        s=GWEN_DB_GetCharValue(dbPost, GWEN_Buffer_GetStart(tbuf), 0, NULL);
+        if (s && *s)
+          result|=mask;
+        GWEN_Buffer_Crop(tbuf, 0, pos);
+      }
+      permDef=AQH_PermDef_List_Next(permDef);
+    }
+    GWEN_Buffer_free(tbuf);
+  }
+
+  return result;
+}
+
+
+
+AQH_MODULE_LIST *AQH_ModService_LoadRawModules(AQH_MODULE *m)
+{
+  AQH_SERVICE *sv;
+  GWEN_STRINGLIST *slModuleNames;
+
+  sv=AQH_ModService_GetService(m);
+  slModuleNames=AQH_Service_ListModules(sv);
+  if (slModuleNames) {
+    AQH_MODULE_LIST *modList;
+    GWEN_STRINGLISTENTRY *se;
+
+    modList=AQH_Module_List_new();
+    se=GWEN_StringList_FirstEntry(slModuleNames);
+    while(se) {
+      const char *sModName;
+
+      sModName=GWEN_StringListEntry_Data(se);
+      if (sModName && *sModName) {
+        AQH_MODULE *currentMod;
+
+        currentMod=AQH_Service_LoadModule(sv, sModName);
+        if (currentMod)
+          AQH_Module_List_Add(currentMod, modList);
+      }
+      se=GWEN_StringListEntry_Next(se);
+    }
+    GWEN_StringList_free(slModuleNames);
+    if (AQH_Module_List_GetCount(modList))
+      return modList;
+    AQH_Module_List_free(modList);
+  }
+
+  return NULL;
+}
+
+
+
+AQH_USER_LIST *AQH_ModService_LoadRawUsers(AQH_MODULE *m)
+{
+  AQH_SERVICE *sv;
+  GWEN_STRINGLIST *slUserNames;
+
+  sv=AQH_ModService_GetService(m);
+  slUserNames=AQH_Service_ListUsers(sv);
+  if (slUserNames) {
+    AQH_USER_LIST *userList;
+    GWEN_STRINGLISTENTRY *se;
+
+    userList=AQH_User_List_new();
+    se=GWEN_StringList_FirstEntry(slUserNames);
+    while(se) {
+      const char *sModName;
+
+      sModName=GWEN_StringListEntry_Data(se);
+      if (sModName && *sModName) {
+        AQH_USER *u;
+
+        u=AQH_Service_LoadUser(sv, sModName);
+        if (u)
+          AQH_User_List_Add(u, userList);
+      }
+      se=GWEN_StringListEntry_Next(se);
+    }
+    GWEN_StringList_free(slUserNames);
+    if (AQH_User_List_GetCount(userList))
+      return userList;
+    AQH_User_List_free(userList);
+  }
+
+  return NULL;
+}
+
+
+
+void AQH_ModService_EscapeToBuffer(const char *src, GWEN_BUFFER *buf)
+{
+  while (*src) {
+    unsigned char x;
+
+    x=(unsigned char)*src;
+    if (!(
+          (x>='A' && x<='Z') ||
+          (x>='a' && x<='z') ||
+          (x>='0' && x<='9') ||
+          NULL!=strchr("-_", x)
+         )) {
+      unsigned char c;
+
+      GWEN_Buffer_AppendByte(buf, '%');
+      c=(((unsigned char)(*src))>>4)&0xf;
+      if (c>9)
+        c+=7;
+      c+='0';
+      GWEN_Buffer_AppendByte(buf, c);
+      c=((unsigned char)(*src))&0xf;
+      if (c>9)
+        c+=7;
+      c+='0';
+      GWEN_Buffer_AppendByte(buf, c);
+    }
+    else
+      GWEN_Buffer_AppendByte(buf, *src);
+
+    src++;
+  } /* while */
+}
+
+
+
+void AQH_ModService_UnescapeToBuffer(const char *src, GWEN_BUFFER *buf)
+{
+  while (*src) {
+    int charHandled=0;
+
+    if (*src=='%') {
+      if (strlen(src)>2) {
+        unsigned char d1, d2;
+        unsigned char c;
+
+        if (isxdigit((int)src[1]) && isxdigit((int)src[2])) {
+          /* skip '%' */
+          src++;
+          /* read first digit */
+          d1=(unsigned char)(toupper(*src));
+
+          /* get second digit */
+          src++;
+          d2=(unsigned char)(toupper(*src));
+          /* compute character */
+          d1-='0';
+          if (d1>9)
+            d1-=7;
+          c=(d1<<4)&0xf0;
+          d2-='0';
+          if (d2>9)
+            d2-=7;
+          c+=(d2&0xf);
+          /* store character */
+          GWEN_Buffer_AppendByte(buf, (char)c);
+          charHandled=1;
+        }
+      }
+    }
+    if (!charHandled)
+      GWEN_Buffer_AppendByte(buf, *src);
+    src++;
+  } /* while */
+}
+
+
+
+int AQH_ModService_FileIsCurrent(const char *sPath, int seconds)
+{
+  struct stat sb;
+  time_t t1;
+
+  if (lstat(sPath, &sb)==-1) {
+    DBG_ERROR(NULL, "Error on lstat(%s): %s (%d)", sPath, strerror(errno), errno);
+    return 0;
+  }
+  t1=time(0);
+  if ((t1-sb.st_mtime)<(time_t) seconds) {
+    DBG_DEBUG(NULL, "File %s is current", sPath);
+    return 1;
+  }
+
+  return 0;
+}
+
+
+
+int AQH_ModService_RespondWithMimeFile(AQCGI_REQUEST *rq, const char *sFilename, const char *sMimeType, GWEN_BUFFER *dbuf)
+{
+  GWEN_BUFFER *ibuf;
+  int rv;
+
+  ibuf=GWEN_Buffer_new(0, 1024, 0, 1);
+  /* read file */
+  rv=GWEN_SyncIo_Helper_ReadFile(sFilename, ibuf);
+  if (rv<0) {
+    DBG_ERROR(NULL, "Error reading \"%s\" (%d)", sFilename, rv);
+    return rv;
+  }
+  else {
+    GWEN_Buffer_Reset(dbuf);
+    GWEN_Buffer_AppendBytes(dbuf, GWEN_Buffer_GetStart(ibuf), GWEN_Buffer_GetUsedBytes(ibuf));
+
+    if (sMimeType && *sMimeType) {
+      GWEN_BUFFER *tbuf;
+
+      tbuf=GWEN_Buffer_new(0, 256, 0, 1);
+      GBAA(tbuf, "Content-type: %s", sMimeType);
+      AQCGI_Request_AddResponseHeaderData(rq, GWEN_Buffer_GetStart(tbuf));
+      GWEN_Buffer_free(tbuf);
+    }
+    AQCGI_Request_AddFlags(rq, AQH_MODSERVICE_RQFLAGS_RAWFILE);
+  }
+  GWEN_Buffer_free(ibuf);
+  return 0;
+}
+
+
+
+

apps/aqhome-cgi/modules/common/mservice.h

@@ -0,0 +1,91 @@
+/****************************************************************************
+ * This file is part of the project AqHome.
+ * AqHome (c) by 2025 Martin Preuss, all rights reserved.
+ *
+ * The license for this file can be found in the file COPYING which you
+ * should have received along with this file.
+ ****************************************************************************/
+
+#ifndef AQHOME_CGI_MSERVICE_H
+#define AQHOME_CGI_MSERVICE_H
+
+#include <aqhome-cgi/service/module.h>
+#include <aqhome-cgi/service/service.h>
+#include <aqhome-cgi/service/session.h>
+
+#include <aqcgi/request.h>
+
+#include <gwenhywfar/buffer.h>
+
+
+#define AQH_MODSERVICE_RQFLAGS_RAWFILE 0x10000000
+
+
+
+typedef int (*AQH_MODSERVICE_HANDLEREQUEST_FN)(AQH_MODULE *m, AQCGI_REQUEST *rq, AQH_SESSION *session, const char *sLastPathElem);
+typedef AQH_MODULE* (*AQH_MODSERVICE_LOADSUBMODULE_FN)(AQH_MODULE *m, AQCGI_REQUEST *rq, AQH_SESSION *session, const char *sModuleName);
+typedef void (*AQH_MODSERVICE_ADDHEADER_FN)(AQH_MODULE *m, const char *lang, GWEN_BUFFER *dbuf);
+typedef void (*AQH_MODSERVICE_ADDFOOTER_FN)(AQH_MODULE *m, const char *lang, GWEN_BUFFER *dbuf);
+
+
+typedef struct AQH_MODSERVICE_HANDLER_ENTRY AQH_MODSERVICE_HANDLER_ENTRY;
+struct AQH_MODSERVICE_HANDLER_ENTRY {
+  const char *page;
+  int httpMethod;
+  uint32_t perms;
+  void (*handlerFn)(AQH_MODULE *m, AQCGI_REQUEST *rq, AQH_SESSION *session, GWEN_BUFFER *dbuf);
+};
+
+
+
+void AQH_ModService_Extend(AQH_MODULE *m, AQH_SERVICE *sv, const char *baseFolder);
+
+AQH_SERVICE *AQH_ModService_GetService(const AQH_MODULE *m);
+const char *AQH_ModService_GetBaseFolder(const AQH_MODULE *m);
+
+uint32_t AQH_ModService_GetUserPerms(const AQH_MODULE *m);
+
+void AQH_ModService_AddHeader(AQH_MODULE *m, const char *lang, GWEN_BUFFER *dbuf);
+void AQH_ModService_AddFooter(AQH_MODULE *m, const char *lang, GWEN_BUFFER *dbuf);
+
+AQH_MODULE *AQH_ModService_LoadSubModule(AQH_MODULE *m, AQCGI_REQUEST *rq, AQH_SESSION *session, const char *sModuleName);
+int AQH_ModService_HandleRequest(AQH_MODULE *m, AQCGI_REQUEST *rq, AQH_SESSION *session, const char *sLastPathElem);
+
+AQH_SESSION *AQH_ModService_ReadSession(AQH_MODULE *m, AQCGI_REQUEST *rq);
+void AQH_ModService_CalcSessionModPerms(AQH_MODULE *m, const AQH_SESSION *session);
+
+void AQH_ModService_HandleRequestWithTable(AQH_MODULE *m,
+                                           AQCGI_REQUEST *rq,
+                                           AQH_SESSION *session,
+                                           const char *page,
+                                           const AQH_MODSERVICE_HANDLER_ENTRY *e);
+
+int AQH_ModService_RespondWithFile(AQH_MODULE *m, AQCGI_REQUEST *rq, const char *lang, const char *sFilename, GWEN_BUFFER *dbuf);
+int AQH_ModService_ReadStaticFile(AQH_MODULE *m, const char *lang, const char *filename, GWEN_BUFFER *dbuf);
+
+void AQH_ModService_AddPermDef(AQH_PERMDEF_LIST *permDefList, const char *id, uint32_t mask, const char *descr);
+void AQH_ModService_AddRole(AQH_ROLE_LIST *roleList, int id, const char *name, uint32_t perms, const char *descr);
+
+
+void AQH_ModService_WritePermsToForm(uint32_t perms, const AQH_PERMDEF_LIST *permDefList, const char *sPrefix, GWEN_BUFFER *dbuf);
+uint32_t AQH_ModService_ReadPermsFromForm(GWEN_DB_NODE *dbPost, const AQH_PERMDEF_LIST *permDefList, const char *sPrefix);
+
+AQH_MODULE_LIST *AQH_ModService_LoadRawModules(AQH_MODULE *m);
+AQH_USER_LIST *AQH_ModService_LoadRawUsers(AQH_MODULE *m);
+
+
+void AQH_ModService_SetHandleRequestFn(AQH_MODULE *m, AQH_MODSERVICE_HANDLEREQUEST_FN fn);
+void AQH_ModService_SetLoadSubModuleFn(AQH_MODULE *m, AQH_MODSERVICE_LOADSUBMODULE_FN fn);
+
+void AQH_ModService_SetAddHeaderFn(AQH_MODULE *m, AQH_MODSERVICE_ADDHEADER_FN fn);
+void AQH_ModService_SetAddFooterFn(AQH_MODULE *m, AQH_MODSERVICE_ADDFOOTER_FN fn);
+
+void AQH_ModService_EscapeToBuffer(const char *src, GWEN_BUFFER *buf);
+void AQH_ModService_UnescapeToBuffer(const char *src, GWEN_BUFFER *buf);
+
+int AQH_ModService_FileIsCurrent(const char *sPath, int seconds);
+
+int AQH_ModService_RespondWithMimeFile(AQCGI_REQUEST *rq, const char *sFilename, const char *sMimeType, GWEN_BUFFER *dbuf);
+
+#endif
+

apps/aqhome-cgi/modules/common/mservice_p.h

@@ -0,0 +1,30 @@
+/****************************************************************************
+ * This file is part of the project AqHome.
+ * AqHome (c) by 2025 Martin Preuss, all rights reserved.
+ *
+ * The license for this file can be found in the file COPYING which you
+ * should have received along with this file.
+ ****************************************************************************/
+
+#ifndef AQHOME_CGI_MSERVICE_P_H
+#define AQHOME_CGI_MSERVICE_P_H
+
+#include "aqhome-cgi/modules/common/mservice.h"
+
+
+typedef struct AQH_MOD_SERVICE AQH_MOD_SERVICE;
+struct AQH_MOD_SERVICE {
+  AQH_SERVICE *service;
+  char *baseFolder;
+  uint32_t userPerms;
+
+  AQH_MODSERVICE_HANDLEREQUEST_FN handleRequestFn;
+  AQH_MODSERVICE_LOADSUBMODULE_FN loadSubModuleFn;
+  AQH_MODSERVICE_ADDHEADER_FN addHeaderFn;
+  AQH_MODSERVICE_ADDFOOTER_FN addFooterFn;
+};
+
+
+
+#endif
+

apps/aqhome-cgi/modules/common/musers.c

@@ -0,0 +1,640 @@
+/****************************************************************************
+ * This file is part of the project AqHome.
+ * AqHome (c) by 2025 Martin Preuss, all rights reserved.
+ *
+ * The license for this file can be found in the file COPYING which you
+ * should have received along with this file.
+ ****************************************************************************/
+
+#ifdef HAVE_CONFIG_H
+# include <config.h>
+#endif
+
+
+#include "./musers.h"
+
+#include "aqhome-cgi/service/module.h"
+
+#include <gwenhywfar/debug.h>
+#include <gwenhywfar/timestamp.h>
+#include <gwenhywfar/text.h>
+
+
+
+/* ------------------------------------------------------------------------------------------------
+ * defs and enums
+ * ------------------------------------------------------------------------------------------------
+ */
+
+#define GBAS GWEN_Buffer_AppendString
+#define GBAA GWEN_Buffer_AppendArgs
+
+
+
+/* ------------------------------------------------------------------------------------------------
+ * forward declarations
+ * ------------------------------------------------------------------------------------------------
+ */
+
+static void _createPermDefList(AQH_MODULE *m);
+static void _createRoleList(AQH_MODULE *m);
+
+static AQH_MODULE *_loadSubModule(AQH_MODULE *m, AQCGI_REQUEST *rq, AQH_SESSION *session, const char *sModuleName);
+static int _handleRequest(AQH_MODULE *m, AQCGI_REQUEST *rq, AQH_SESSION *session, const char *sLastPathElem);
+static void _handleRqIndex(AQH_MODULE *m, AQCGI_REQUEST *rq, AQH_SESSION *session, GWEN_BUFFER *dbuf);
+static void _handleRqEditUserGet(AQH_MODULE *m, AQCGI_REQUEST *rq, AQH_SESSION *session, GWEN_BUFFER *dbuf);
+static void _handleRqEditUserPost(AQH_MODULE *m, AQCGI_REQUEST *rq, AQH_SESSION *session, GWEN_BUFFER *dbuf);
+static void _handleRqAddUserGet(AQH_MODULE *m, AQCGI_REQUEST *rq, AQH_SESSION *session, GWEN_BUFFER *dbuf);
+static void _handleRqAddUserPost(AQH_MODULE *m, AQCGI_REQUEST *rq, AQH_SESSION *session, GWEN_BUFFER *dbuf);
+
+static int _getHighestUserId(const AQH_USER_LIST *userList);
+static int _modulePermsHasRole(const AQH_MODULE_PERMS *modPerms, uint8_t rid);
+
+static void _writeEditUserForm(AQH_MODULE *m,
+                               const AQH_USER *u,
+                               const char *sAlias,
+                               const char *sUrl,
+                               const char *sSubmitText,
+                               GWEN_BUFFER *dbuf);
+static void _writeUserModRolesToForm(const AQH_ROLE_LIST *roles, const AQH_MODULE_PERMS *perms, const char *sModName, GWEN_BUFFER *dbuf);
+
+static void _readAllModRolesForUserFromForm(AQH_MODULE *m, GWEN_DB_NODE *dbPost, AQH_USER *u);
+static void _readModRolesFromForm(GWEN_DB_NODE *dbPost,
+                                  const AQH_ROLE_LIST *roleList,
+                                  const char *sPrefix,
+                                  AQH_MODULE_PERMS *modPerms);
+
+static void _addLabelAndInputToFormTableH(const char *title, const char *name, const char *value, const char *xxtra, GWEN_BUFFER *dbuf);
+static void _addUserStateLabelAndSelectionToFormTableH(const char *sTitle, const char *sName, int st, GWEN_BUFFER *dbuf);
+
+static void _setLocationHeaderForMod(AQCGI_REQUEST *rq, const char *page, const char *sModName);
+
+
+
+/* ------------------------------------------------------------------------------------------------
+ * vars
+ * ------------------------------------------------------------------------------------------------
+ */
+
+static AQH_MODSERVICE_HANDLER_ENTRY _requestTable[]={
+  {"index.html",      AQCGI_REQUEST_METHOD_GET,  AQH_MODADMUSERS_PERMS_USERSREAD,  _handleRqIndex},
+  {"edituser.html",   AQCGI_REQUEST_METHOD_GET,  AQH_MODADMUSERS_PERMS_USERSWRITE, _handleRqEditUserGet},
+  {"edituser.html",   AQCGI_REQUEST_METHOD_POST, AQH_MODADMUSERS_PERMS_USERSWRITE, _handleRqEditUserPost},
+  {"adduser.html",    AQCGI_REQUEST_METHOD_GET,  AQH_MODADMUSERS_PERMS_USERSWRITE, _handleRqAddUserGet},
+  {"adduser.html",    AQCGI_REQUEST_METHOD_POST, AQH_MODADMUSERS_PERMS_USERSWRITE, _handleRqAddUserPost},
+  {NULL, 0, 0, NULL}
+};
+
+
+
+/* ------------------------------------------------------------------------------------------------
+ * code
+ * ------------------------------------------------------------------------------------------------
+ */
+
+void AQH_ModAdmUsers_Extend(AQH_MODULE *m, AQH_SERVICE *sv, const char *baseFolder)
+{
+  AQH_ModService_Extend(m, sv, baseFolder);
+  AQH_ModService_SetHandleRequestFn(m, _handleRequest);
+  AQH_ModService_SetLoadSubModuleFn(m, _loadSubModule);
+}
+
+
+
+int AQH_ModAdmUsers_Create(AQH_SERVICE *sv)
+{
+  AQH_MODULE *m;
+  int rv;
+
+  m=AQH_Module_new();
+  AQH_Module_SetName(m, "users");
+  AQH_Module_SetDescr(m, "user administration module");
+  AQH_Module_SetGuestPerms(m, 0);
+
+  _createPermDefList(m);
+  _createRoleList(m);
+
+  rv=AQH_Service_AddModule(sv, m);
+  if (rv<0) {
+    DBG_INFO(NULL, "here (%d)", rv);
+  }
+  AQH_Module_free(m);
+  return rv;
+}
+
+
+
+void _createPermDefList(AQH_MODULE *m)
+{
+  AQH_PERMDEF_LIST *permDefList;
+
+  permDefList=AQH_PermDef_List_new();
+
+  AQH_ModService_AddPermDef(permDefList, "UserRead",  0x001, "Read users");
+  AQH_ModService_AddPermDef(permDefList, "UserWrite", 0x002, "Modify users");
+  AQH_ModService_AddPermDef(permDefList, "UserAdd",   0x004, "Add users");
+  AQH_ModService_AddPermDef(permDefList, "UserDel",   0x008, "Remove users");
+
+  AQH_Module_SetPermDefList(m, permDefList);
+}
+
+
+
+void _createRoleList(AQH_MODULE *m)
+{
+  AQH_ROLE_LIST *roleList;
+  int id=0;
+
+  roleList=AQH_Role_List_new();
+  AQH_ModService_AddRole(roleList, id++, "admin",
+                         AQH_MODADMUSERS_PERMS_USERSREAD |
+                         AQH_MODADMUSERS_PERMS_USERSWRITE |
+                         AQH_MODADMUSERS_PERMS_USERSADD |
+                         AQH_MODADMUSERS_PERMS_USERSDEL,
+                         "Administrator Role");
+  AQH_Module_SetRoleList(m, roleList);
+}
+
+
+
+AQH_MODULE *_loadSubModule(AQH_MODULE *m, AQCGI_REQUEST *rq, AQH_SESSION *session, const char *sModuleName)
+{
+  /* no sub-modules */
+  return NULL;
+}
+
+
+
+int _handleRequest(AQH_MODULE *m, AQCGI_REQUEST *rq, AQH_SESSION *session, const char *sLastPathElem)
+{
+  AQH_ModService_HandleRequestWithTable(m, rq, session, sLastPathElem, _requestTable);
+  return AQCGI_SendResponse(rq);
+}
+
+
+
+void _handleRqIndex(AQH_MODULE *m, AQCGI_REQUEST *rq, AQH_SESSION *session, GWEN_BUFFER *dbuf)
+{
+  AQH_USER_LIST *userList;
+  uint32_t perms;
+
+  perms=AQH_ModService_GetUserPerms(m);
+  userList=AQH_ModService_LoadRawUsers(m);
+
+  GBAS(dbuf, "<h1>Users</h1>\n");
+  GBAS(dbuf,
+       "<table class=\"datatable\">\n"
+       "<thead>"
+       "<tr><th>Id</th><th>Alias</th><th>Name</th><th>Status</th><th>Email</th><th>Notes</th><th>Actions</th></tr>\n"
+       "</thead>\n"
+       "<tbody>\n");
+  if (userList) {
+    const AQH_USER *u;
+
+    AQH_User_List_SortByAlias(userList, 1);
+    u=AQH_User_List_First(userList);
+    while(u) {
+      const char *sUserAlias;
+
+      sUserAlias=AQH_User_GetAlias(u);
+      if (sUserAlias && *sUserAlias) {
+        uint32_t id;
+        const char *s;
+        const char *sAlias;
+
+        id=AQH_User_GetId(u);
+        sAlias=AQH_User_GetAlias(u);
+        GBAS(dbuf, "<tr>");
+        GBAA(dbuf, "<td>%lu</td>", (unsigned long int) id);
+        GBAA(dbuf, "<td>%s</td>", sAlias?sAlias:"");
+        s=AQH_User_GetName(u);
+        GBAA(dbuf, "<td>%s</td>", s?s:"");
+        s=AQH_UserState_toString(AQH_User_GetState(u));
+        GBAA(dbuf, "<td>%s</td>", s?s:"");
+        s=AQH_User_GetEmail(u);
+        GBAA(dbuf, "<td>%s</td>", s?s:"");
+        s=AQH_User_GetNotes(u);
+        GBAA(dbuf, "<td>%s</td>", s?s:"");
+
+        GBAS(dbuf, "<td>");
+        if (perms & AQH_MODADMUSERS_PERMS_USERSWRITE) {
+          DBG_ERROR(NULL, "User=%s", sAlias?sAlias:"");
+          GBAS(dbuf, "<a href=\"edituser.html?alias=");
+          GWEN_Text_EscapeToBufferTolerant(sAlias?sAlias:"", dbuf);
+          GBAS(dbuf, "\"><img src=\"/pics/edit.png\"></a>");
+        }
+        GBAA(dbuf, "</td>\n");
+        GBAA(dbuf, "</tr>\n");
+      }
+      u=AQH_User_List_Next(u);
+    }
+    GBAS(dbuf,
+         "</tbody>\n"
+         "</table>\n");
+    AQH_User_List_free(userList);
+  }
+  if (perms & AQH_MODADMUSERS_PERMS_USERSADD)
+    GBAS(dbuf, "<hr><a href=\"adduser.html\">Add User</a>");
+}
+
+
+
+void _handleRqEditUserGet(AQH_MODULE *m, AQCGI_REQUEST *rq, AQH_SESSION *session, GWEN_BUFFER *dbuf)
+{
+  AQH_SERVICE *sv;
+  GWEN_DB_NODE *dbQuery;
+  const char *sAlias;
+  AQH_USER *user;
+
+  sv=AQH_ModService_GetService(m);
+  dbQuery=AQCGI_Request_GetDbQuery(rq);
+  sAlias=dbQuery?GWEN_DB_GetCharValue(dbQuery, "alias", 0, NULL):NULL;
+  user=(sAlias && *sAlias)?AQH_Service_LoadUser(sv, sAlias):NULL;
+  if (user) {
+    _writeEditUserForm(m, user, sAlias, "edituser.html", "Save", dbuf);
+    AQH_User_free(user);
+  }
+  else {
+    AQCGI_Request_AddResponseHeaderData(rq, "Location: index.html");
+    AQCGI_Request_SetResponseCode(rq, 303);
+    AQCGI_Request_SetResponseText(rq, "See other");
+  }
+}
+
+
+
+void _handleRqEditUserPost(AQH_MODULE *m, AQCGI_REQUEST *rq, AQH_SESSION *session, GWEN_BUFFER *dbuf)
+{
+  AQH_SERVICE *sv;
+  GWEN_DB_NODE *dbPost;
+  const char *sAlias;
+  AQH_USER *u;
+
+  sv=AQH_ModService_GetService(m);
+  dbPost=AQCGI_Request_GetDbPostBody(rq);
+  sAlias=dbPost?GWEN_DB_GetCharValue(dbPost, "alias", 0, NULL):NULL;
+  u=(sAlias && *sAlias)?AQH_Service_LoadUser(sv, sAlias):NULL;
+  if (u) {
+    const char *s;
+    int state;
+    int rv;
+
+    s=GWEN_DB_GetCharValue(dbPost, "name", 0, NULL);
+    AQH_User_SetName(u, s);
+    s=GWEN_DB_GetCharValue(dbPost, "email", 0, NULL);
+    AQH_User_SetEmail(u, s);
+    s=GWEN_DB_GetCharValue(dbPost, "notes", 0, NULL);
+    AQH_User_SetNotes(u, s);
+    s=GWEN_DB_GetCharValue(dbPost, "status", 0, NULL);
+    state=(s && *s)?AQH_UserState_fromString(s):AQH_UserState_Unknown;
+    if (state!=AQH_UserState_Unknown)
+      AQH_User_SetState(u, state);
+
+    _readAllModRolesForUserFromForm(m, dbPost, u);
+
+    rv=AQH_Service_SaveUser(sv, u);
+    if (rv<0) {
+      GBAS(dbuf, "<h2>Error</h2><p>Error saving user</p>");
+      DBG_ERROR(NULL, "Could not save user \"%s\"", sAlias);
+      AQH_User_free(u);
+      return;
+    }
+    DBG_ERROR(NULL, "User \"%s\" saved", sAlias);
+    AQH_User_free(u);
+    AQCGI_Request_AddResponseHeaderData(rq, "Location: index.html");
+    AQCGI_Request_SetResponseCode(rq, 303);
+    AQCGI_Request_SetResponseText(rq, "See other");
+  }
+  else {
+    DBG_ERROR(NULL, "Could not load user \"%s\"", sAlias?sAlias:"<no name>");
+    GBAS(dbuf, "<p>Error loading user.</p>\n");
+  }
+}
+
+
+
+void _handleRqAddUserGet(AQH_MODULE *m, AQCGI_REQUEST *rq, AQH_SESSION *session, GWEN_BUFFER *dbuf)
+{
+  DBG_ERROR(NULL, "AddUser");
+  _writeEditUserForm(m, NULL, NULL, "adduser.html", "Add", dbuf);
+}
+
+
+
+void _handleRqAddUserPost(AQH_MODULE *m, AQCGI_REQUEST *rq, AQH_SESSION *session, GWEN_BUFFER *dbuf)
+{
+  AQH_SERVICE *sv;
+  GWEN_DB_NODE *dbPost;
+  const char *sAlias;
+
+  sv=AQH_ModService_GetService(m);
+  dbPost=AQCGI_Request_GetDbPostBody(rq);
+  sAlias=dbPost?GWEN_DB_GetCharValue(dbPost, "alias", 0, NULL):NULL;
+  // TODO: check alias validity
+  if (sAlias) {
+    AQH_USER *u;
+    const char *s;
+    int state;
+    int rv;
+    uint32_t userId;
+    AQH_USER_LIST *userList;
+
+    u=AQH_User_new();
+    userList=AQH_ModService_LoadRawUsers(m);
+    userId=_getHighestUserId(userList)+1;
+    AQH_User_SetId(u, userId);
+    AQH_User_SetAlias(u, sAlias);
+    s=GWEN_DB_GetCharValue(dbPost, "name", 0, NULL);
+    AQH_User_SetName(u, s);
+    s=GWEN_DB_GetCharValue(dbPost, "email", 0, NULL);
+    AQH_User_SetEmail(u, s);
+    s=GWEN_DB_GetCharValue(dbPost, "notes", 0, NULL);
+    AQH_User_SetNotes(u, s);
+    s=GWEN_DB_GetCharValue(dbPost, "status", 0, NULL);
+    state=(s && *s)?AQH_UserState_fromString(s):AQH_UserState_Unknown;
+    if (state!=AQH_UserState_Unknown)
+      AQH_User_SetState(u, state);
+
+    rv=AQH_Service_AddUser(sv, u);
+    if (rv<0) {
+      GBAS(dbuf, "<h2>Error</h2><p>Error saving user</p>");
+      DBG_ERROR(NULL, "Could not save user \"%s\" (%d)", sAlias, rv);
+      AQH_User_free(u);
+      AQH_User_List_free(userList);
+      return;
+    }
+    DBG_ERROR(NULL, "User \"%s\" saved", sAlias);
+    AQH_User_free(u);
+    AQCGI_Request_AddResponseHeaderData(rq, "Location: index.html");
+    AQCGI_Request_SetResponseCode(rq, 303);
+    AQCGI_Request_SetResponseText(rq, "See other");
+    AQH_User_List_free(userList);
+  }
+  else {
+    DBG_ERROR(NULL, "Missing alias");
+    GBAS(dbuf, "<p>Missing alias.</p>\n");
+  }
+}
+
+
+
+int _getHighestUserId(const AQH_USER_LIST *userList)
+{
+  int id=0;
+
+  if (userList) {
+    const AQH_USER *user;
+
+    user=AQH_User_List_First(userList);
+    while(user) {
+      int uid;
+
+      uid=AQH_User_GetId(user);
+      id=(uid>id)?uid:id;
+      user=AQH_User_List_Next(user);
+    }
+  }
+  return id;
+}
+
+
+
+int _modulePermsHasRole(const AQH_MODULE_PERMS *modPerms, uint8_t rid)
+{
+  if (modPerms) {
+    int arraySize;
+    int i;
+
+    arraySize=AQH_ModulePerms_GetRoleArrayArraySize();
+    for(i=0; i<arraySize; i++) {
+      if (AQH_ModulePerms_GetRoleArrayAt(modPerms, i)==rid)
+        return 1;
+    }
+  }
+
+  return 0;
+}
+
+
+
+
+
+void _writeEditUserForm(AQH_MODULE *m,
+                        const AQH_USER *u,
+                        const char *sAlias,
+                        const char *sUrl,
+                        const char *sSubmitText,
+                        GWEN_BUFFER *dbuf)
+{
+  AQH_MODULE_LIST *moduleList;
+
+  /* write user info */
+  GBAS(dbuf, "<h2>User Info</h2>\n");
+  GBAA(dbuf,
+       "<form action=\"%s\" method=\"post\">\n"
+       "<table class=\"formtable\">\n",
+       sUrl?sUrl:"");
+  _addLabelAndInputToFormTableH("Alias", "alias", sAlias,                      "required", dbuf);
+  _addLabelAndInputToFormTableH("Name",  "name",  u?AQH_User_GetName(u):NULL,  NULL,       dbuf);
+  _addLabelAndInputToFormTableH("Email", "email", u?AQH_User_GetEmail(u):NULL, NULL,       dbuf);
+  _addLabelAndInputToFormTableH("Notes", "notes", u?AQH_User_GetNotes(u):NULL, NULL,       dbuf);
+  _addUserStateLabelAndSelectionToFormTableH("Status", "status", u?AQH_User_GetState(u):AQH_UserState_Unknown, dbuf);
+
+  GBAS(dbuf, "</table>\n");
+
+  /* module permissions */
+  GBAS(dbuf, "<h2>Module Roles</h2>\n");
+    GBAS(dbuf,
+         "<table class=\"datatable\">\n"
+         "<thead>"
+         "<tr><th>Module</th><th>Roles</th></tr>\n"
+         "</thead>\n"
+         "<tbody>\n");
+  moduleList=AQH_ModService_LoadRawModules(m);
+  if (moduleList) {
+    const AQH_MODULE_PERMS_LIST *modPermsList;
+    const AQH_MODULE *currentMod;
+
+    modPermsList=u?AQH_User_GetModulePermList(u):NULL;
+    currentMod=AQH_Module_List_First(moduleList);
+    while(currentMod) {
+      const char *sModName;
+      const AQH_MODULE_PERMS *modPerms;
+
+      sModName=AQH_Module_GetName(currentMod);
+      GBAA(dbuf, "<tr><td>%s</td><td>", sModName);
+
+      modPerms=modPermsList?AQH_ModulePerms_List_GetByModuleId(modPermsList, sModName):NULL;
+      _writeUserModRolesToForm(AQH_Module_GetRoleList(currentMod), modPerms, sModName, dbuf);
+      GBAS(dbuf, "</td></tr>\n");
+      GBAS(dbuf, "<td>");
+
+      currentMod=AQH_Module_List_Next(currentMod);
+    } /* while */
+    AQH_Module_List_free(moduleList);
+  }
+  GBAS(dbuf,
+       "</tbody>\n"
+       "</table>\n");
+
+
+  GBAA(dbuf, "<input type=\"hidden\" name=\"alias\" value=\"%s\">\n", sAlias?sAlias:"");
+  GBAA(dbuf, "<input type=\"submit\" value=\"%s\">\n</form>\n\n", sSubmitText?sSubmitText:"Save");
+
+}
+
+
+
+void _readAllModRolesForUserFromForm(AQH_MODULE *m, GWEN_DB_NODE *dbPost, AQH_USER *u)
+{
+  AQH_MODULE_LIST *moduleList;
+
+  moduleList=AQH_ModService_LoadRawModules(m);
+  if (moduleList) {
+    AQH_MODULE_PERMS_LIST *permsList;
+    const AQH_MODULE *module;
+
+    permsList=AQH_User_GetModulePermList(u);
+    if (permsList==NULL) {
+      DBG_ERROR(NULL, "Creating module perms list for user");
+      permsList=AQH_ModulePerms_List_new();
+      AQH_User_SetModulePermList(u, permsList);
+    }
+
+    module=AQH_Module_List_First(moduleList);
+    while(module) {
+      const char *sModName;
+      const AQH_ROLE_LIST *roleList;
+
+      sModName=AQH_Module_GetName(module);
+      roleList=AQH_Module_GetRoleList(module);
+      if (sModName && *sModName && roleList) {
+        AQH_MODULE_PERMS *modPerms;
+
+        modPerms=AQH_ModulePerms_List_GetByModuleId(permsList, sModName);
+        if (modPerms==NULL) {
+          modPerms=AQH_ModulePerms_new();
+          AQH_ModulePerms_SetModuleId(modPerms, sModName);
+          AQH_ModulePerms_List_Add(modPerms, permsList);
+        }
+        _readModRolesFromForm(dbPost, roleList, sModName, modPerms);
+      }
+      module=AQH_Module_List_Next(module);
+    }
+
+    AQH_Module_List_free(moduleList);
+  }
+}
+
+
+
+void _writeUserModRolesToForm(const AQH_ROLE_LIST *roleList, const AQH_MODULE_PERMS *modPerms, const char *sModName, GWEN_BUFFER *dbuf)
+{
+  if (roleList) {
+    const AQH_ROLE *role;
+
+    role=AQH_Role_List_First(roleList);
+    while(role) {
+      const char *sRoleName;
+      uint8_t roleId;
+
+      roleId=AQH_Role_GetId(role);
+      sRoleName=AQH_Role_GetName(role);
+      if (sRoleName && *sRoleName) {
+        int isChecked;
+
+        isChecked=(modPerms && _modulePermsHasRole(modPerms, roleId));
+        if (sModName && *sModName) {
+          GBAA(dbuf, "<input type=\"checkbox\" name=\"%s:%s\" %s>", sModName, sRoleName, isChecked?"checked":"");
+          GBAA(dbuf, "<label for=\"%s:%s\">%s</label>", sModName, sRoleName, sRoleName);
+        }
+        else {
+          GBAA(dbuf, "<input type=\"checkbox\" name=\"%s\" %s>", sRoleName, isChecked?"checked":"");
+          GBAA(dbuf, "<label for=\"%s\">%s</label>", sRoleName, sRoleName);
+        }
+      }
+      role=AQH_Role_List_Next(role);
+    }
+  }
+}
+
+
+
+void _readModRolesFromForm(GWEN_DB_NODE *dbPost,
+                           const AQH_ROLE_LIST *roleList,
+                           const char *sPrefix,
+                           AQH_MODULE_PERMS *modPerms)
+{
+  AQH_ModulePerms_PresetRoleArray(modPerms, 0);
+  if (roleList) {
+    GWEN_BUFFER *tbuf;
+    uint32_t pos;
+    const AQH_ROLE *role;
+    int nextRolePos=0;
+
+    tbuf=GWEN_Buffer_new(0, 256, 0, 1);
+    if (sPrefix && *sPrefix)
+      GBAA(tbuf, "%s:", sPrefix);
+    pos=GWEN_Buffer_GetPos(tbuf);
+
+    role=AQH_Role_List_First(roleList);
+    while(role) {
+      const char *roleName;
+
+      roleName=AQH_Role_GetName(role);
+      if (roleName && *roleName) {
+        const char *s;
+
+        GBAS(tbuf, roleName);
+        s=GWEN_DB_GetCharValue(dbPost, GWEN_Buffer_GetStart(tbuf), 0, NULL);
+        if (s && *s) {
+          if (nextRolePos<AQH_ModulePerms_GetRoleArrayArraySize())
+            AQH_ModulePerms_SetRoleArrayAt(modPerms, nextRolePos++, AQH_Role_GetId(role));
+        }
+        GWEN_Buffer_Crop(tbuf, 0, pos);
+      }
+
+      role=AQH_Role_List_Next(role);
+    } /* while */
+    GWEN_Buffer_free(tbuf);
+  }
+}
+
+
+
+
+
+
+
+void _addUserStateLabelAndSelectionToFormTableH(const char *sTitle, const char *sName, int st, GWEN_BUFFER *dbuf)
+{
+  int i;
+
+  GBAA(dbuf, "<tr><td><label for=\"%s\">%s:</label></td>", sName?sName:"", sTitle?sTitle:"");
+  GBAA(dbuf, "<td><select name=\"%s\">", sName?sName:"");
+  for(i=AQH_UserState_Unknown; i<=AQH_UserState_Active; i++) {
+    const char *s;
+
+    s=AQH_UserState_toString(i);
+    GBAA(dbuf, "<option value=\"%s\" %s>%s</option>", s, (i==st)?"selected":"", s);
+  }
+  GBAS(dbuf, "</select></td></tr>");
+}
+
+
+
+void _addLabelAndInputToFormTableH(const char *sTitle, const char *sName, const char *sValue, const char *sExtra, GWEN_BUFFER *dbuf)
+{
+  GBAS(dbuf, "<tr>");
+  GBAA(dbuf, "<td><label for=\"%s:\">%s</label></td>", sName?sName:"", sTitle?sTitle:"");
+  GBAA(dbuf, "<td><input type=\"text\" name=\"%s\"", sName?sName:"");
+  if (sValue && *sValue)
+    GBAA(dbuf, " value=\"%s\"", sValue);
+  if (sExtra && *sExtra)
+    GBAA(dbuf, " %s", sExtra);
+  GBAS(dbuf, "></td>");
+  GBAS(dbuf, "</tr>\n");
+}
+
+
+

apps/aqhome-cgi/modules/common/musers.h

@@ -0,0 +1,35 @@
+/****************************************************************************
+ * This file is part of the project AqHome.
+ * AqHome (c) by 2025 Martin Preuss, all rights reserved.
+ *
+ * The license for this file can be found in the file COPYING which you
+ * should have received along with this file.
+ ****************************************************************************/
+
+#ifndef AQHOME_CGI_MUSERS_H
+#define AQHOME_CGI_MUSERS_H
+
+#include <aqhome-cgi/modules/common/mservice.h>
+
+#include <aqcgi/request.h>
+
+#include <gwenhywfar/buffer.h>
+
+
+
+#define AQH_MODADMUSERS_PERMS_USERSREAD  0x001
+#define AQH_MODADMUSERS_PERMS_USERSWRITE 0x002
+#define AQH_MODADMUSERS_PERMS_USERSADD   0x004
+#define AQH_MODADMUSERS_PERMS_USERSDEL   0x008
+
+
+
+void AQH_ModAdmUsers_Extend(AQH_MODULE *m, AQH_SERVICE *sv, const char *baseFolder);
+
+int AQH_ModAdmUsers_Create(AQH_SERVICE *sv);
+
+
+
+
+#endif
+

apps/aqhome-cgi/modules/devices/0BUILD

@@ -0,0 +1,101 @@
+<?xml?>
+
+<gwbuild>
+
+  <target type="ConvenienceLibrary" name="aqhcgi_mdevices" >
+
+    <includes type="c" >
+      $(gwenhywfar_cflags)
+      $(aqcgi_cflags)
+      $(aqdiagram_cflags)
+      -I$(topsrcdir)
+      -I$(topbuilddir)
+      -I$(topsrcdir)/apps
+      -I$(topbuilddir)/apps
+      -I$(builddir)
+      -I$(srcdir)
+    </includes>
+  
+    <includes type="tm2" >
+      --include=$(builddir)
+      --include=$(srcdir)
+    </includes>
+
+
+    <define name="not_BUILDING_AQHOME" />
+
+    <setVar name="local/cflags">$(visibility_cflags)</setVar>
+
+  
+    <setVar name="tm2flags-INACTIVE" >
+      --api=AQHOME_API
+    </setVar>
+
+    <setVar name="local/typefiles" >
+    </setVar>
+  
+    <setVar name="local/built_sources" >
+    </setVar>
+  
+    <setVar name="local/built_headers_pub">
+    </setVar>
+  
+  
+    <setVar name="local/built_headers_priv" >
+    </setVar>
+
+
+    <headers dist="false" install="$(pkgincludedir)/service" >
+      $(local/built_headers_pub)
+    </headers>
+  
+  
+    <headers dist="true" install="$(pkgincludedir)/service" >
+      mdevices.h
+      mdevices_init.h
+      mdevices_index.h
+      mdevices_valuestable.h
+      mdevices_valuesgraph.h
+      mdevices_value.h
+      mdevices_setdata.h
+      mdevices_vgraph.h
+      mdevices_device.h
+      mdevices_setdevice.h
+      mdevices_page.h
+    </headers>
+
+
+    <headers dist="true" >
+    </headers>
+  
+  
+    <sources>
+      $(local/typefiles)
+
+      mdevices.c
+      mdevices_init.c
+      mdevices_index.c
+      mdevices_valuestable.c
+      mdevices_valuesgraph.c
+      mdevices_value.c
+      mdevices_setdata.c
+      mdevices_vgraph.c
+      mdevices_device.c
+      mdevices_setdevice.c
+      mdevices_page.c
+    </sources>
+
+
+    <extradist>
+    </extradist>
+
+
+    <useTargets>
+    </useTargets>
+
+    <subdirs>
+    </subdirs>
+
+  </target>
+  
+</gwbuild>

apps/aqhome-cgi/modules/devices/mdevices.c

@@ -0,0 +1,565 @@
+/****************************************************************************
+ * This file is part of the project AqHome.
+ * AqHome (c) by 2025 Martin Preuss, all rights reserved.
+ *
+ * The license for this file can be found in the file COPYING which you
+ * should have received along with this file.
+ ****************************************************************************/
+
+#ifdef HAVE_CONFIG_H
+# include <config.h>
+#endif
+
+
+#include "./mdevices.h"
+
+#include "aqhome-cgi/modules/devices/mdevices_index.h"
+#include "aqhome-cgi/modules/devices/mdevices_valuestable.h"
+#include "aqhome-cgi/modules/devices/mdevices_valuesgraph.h"
+#include "aqhome-cgi/modules/devices/mdevices_value.h"
+#include "aqhome-cgi/modules/devices/mdevices_setdata.h"
+#include "aqhome-cgi/modules/devices/mdevices_vgraph.h"
+#include "aqhome-cgi/modules/devices/mdevices_device.h"
+#include "aqhome-cgi/modules/devices/mdevices_setdevice.h"
+#include "aqhome-cgi/modules/devices/mdevices_page.h"
+#include "aqhome-cgi/service/module.h"
+#include "aqhome-cgi/modules/mdataclient.h"
+
+#include <gwenhywfar/debug.h>
+#include <gwenhywfar/timestamp.h>
+#include <gwenhywfar/text.h>
+
+
+
+/* ------------------------------------------------------------------------------------------------
+ * defs and enums
+ * ------------------------------------------------------------------------------------------------
+ */
+
+#define GBAS GWEN_Buffer_AppendString
+#define GBAA GWEN_Buffer_AppendArgs
+
+#define P_DEVICEREAD AQH_MODDEVICES_PERMS_DEVICEREAD
+#define P_DEVICEWRITE AQH_MODDEVICES_PERMS_DEVICEWRITE
+#define P_VALUEREAD  AQH_MODDEVICES_PERMS_VALUEREAD
+#define P_VALUEWRITE AQH_MODDEVICES_PERMS_VALUEWRITE
+
+
+
+/* ------------------------------------------------------------------------------------------------
+ * forward declarations
+ * ------------------------------------------------------------------------------------------------
+ */
+
+static AQH_MODULE *_loadSubModule(AQH_MODULE *m, AQCGI_REQUEST *rq, AQH_SESSION *session, const char *sModuleName);
+static int _handleRequest(AQH_MODULE *m, AQCGI_REQUEST *rq, AQH_SESSION *session, const char *sLastPathElem);
+
+static void _handleRqIndexGet(AQH_MODULE *m, AQCGI_REQUEST *rq, AQH_SESSION *session, GWEN_BUFFER *dbuf);
+static void _handleRqValuesTableGet(AQH_MODULE *m, AQCGI_REQUEST *rq, AQH_SESSION *session, GWEN_BUFFER *dbuf);
+static void _handleRqValuesGraphGet(AQH_MODULE *m, AQCGI_REQUEST *rq, AQH_SESSION *session, GWEN_BUFFER *dbuf);
+static void _handleRqValueGet(AQH_MODULE *m, AQCGI_REQUEST *rq, AQH_SESSION *session, GWEN_BUFFER *dbuf);
+static void _handleRqSetDataPost(AQH_MODULE *m, AQCGI_REQUEST *rq, AQH_SESSION *session, GWEN_BUFFER *dbuf);
+static void _handleRqGraphGet(AQH_MODULE *m, AQCGI_REQUEST *rq, AQH_SESSION *session, GWEN_BUFFER *dbuf);
+static void _handleRqDeviceGet(AQH_MODULE *m, AQCGI_REQUEST *rq, AQH_SESSION *session, GWEN_BUFFER *dbuf);
+static void _handleRqDevicePost(AQH_MODULE *m, AQCGI_REQUEST *rq, AQH_SESSION *session, GWEN_BUFFER *dbuf);
+static void _handleRqPageGet(AQH_MODULE *m, AQCGI_REQUEST *rq, AQH_SESSION *session, GWEN_BUFFER *dbuf);
+static void _handleRqPagePost(AQH_MODULE *m, AQCGI_REQUEST *rq, AQH_SESSION *session, GWEN_BUFFER *dbuf);
+static void _handleRqPageGraphGet(AQH_MODULE *m, AQCGI_REQUEST *rq, AQH_SESSION *session, GWEN_BUFFER *dbuf);
+
+static AQDG_GRAPH_DATAPAIR_LIST *_createDataPairListFromDataPoints(const uint64_t *dataPoints, uint64_t numValues);
+
+static void _addValueActionToForm(const AQH_VALUE *value, GWEN_BUFFER *dbuf);
+static void _addLastValueToForm(AQH_DATACLIENT *dc, const AQH_VALUE *value, GWEN_BUFFER *dbuf);
+
+
+
+/* ------------------------------------------------------------------------------------------------
+ * vars
+ * ------------------------------------------------------------------------------------------------
+ */
+
+static AQH_MODSERVICE_HANDLER_ENTRY _requestTable[]={
+  {"index.html",   AQCGI_REQUEST_METHOD_GET,   P_DEVICEREAD,                _handleRqIndexGet},
+  {"device.html",  AQCGI_REQUEST_METHOD_GET,   P_DEVICEREAD | P_VALUEREAD,  _handleRqDeviceGet},
+  {"device.html",  AQCGI_REQUEST_METHOD_POST,  P_DEVICEWRITE,               _handleRqDevicePost},
+  {"vtable.html",  AQCGI_REQUEST_METHOD_GET,   P_DEVICEREAD | P_VALUEREAD,  _handleRqValuesTableGet},
+  {"vgraph.html",  AQCGI_REQUEST_METHOD_GET,   P_DEVICEREAD | P_VALUEREAD,  _handleRqValuesGraphGet},
+  {"value.html",   AQCGI_REQUEST_METHOD_GET,   P_DEVICEREAD | P_VALUEREAD,  _handleRqValueGet},
+  {"setdata.html", AQCGI_REQUEST_METHOD_POST,  P_VALUEWRITE,                _handleRqSetDataPost},
+  {"graph.html",   AQCGI_REQUEST_METHOD_GET,   P_DEVICEREAD | P_VALUEREAD,  _handleRqGraphGet},
+  {"page.html",    AQCGI_REQUEST_METHOD_GET,   P_DEVICEREAD | P_VALUEREAD,  _handleRqPageGet},
+  {"page.html",    AQCGI_REQUEST_METHOD_POST,  P_VALUEWRITE,                _handleRqPagePost},
+  {"pgraph.html",  AQCGI_REQUEST_METHOD_GET,   P_DEVICEREAD | P_VALUEREAD,  _handleRqPageGraphGet},
+  {NULL, 0, 0, NULL}
+};
+
+
+
+/* ------------------------------------------------------------------------------------------------
+ * code
+ * ------------------------------------------------------------------------------------------------
+ */
+
+void AQH_ModDevices_Extend(AQH_MODULE *m, AQH_SERVICE *sv, const char *baseFolder)
+{
+  AQH_ModService_Extend(m, sv, baseFolder);
+  AQH_ModService_SetHandleRequestFn(m, _handleRequest);
+  AQH_ModService_SetLoadSubModuleFn(m, _loadSubModule);
+}
+
+
+
+AQH_MODULE *_loadSubModule(AQH_MODULE *m, AQCGI_REQUEST *rq, AQH_SESSION *session, const char *sModuleName)
+{
+  return NULL;
+}
+
+
+
+int _handleRequest(AQH_MODULE *m, AQCGI_REQUEST *rq, AQH_SESSION *session, const char *sLastPathElem)
+{
+  AQH_ModService_HandleRequestWithTable(m, rq, session, sLastPathElem, _requestTable);
+  return AQCGI_SendResponse(rq);
+}
+
+
+
+void _handleRqIndexGet(AQH_MODULE *m, AQCGI_REQUEST *rq, AQH_SESSION *session, GWEN_BUFFER *dbuf)
+{
+  AQH_ModDataClient_HandleRequest(m, rq, session, AQH_ModDevices_RunIndex, dbuf);
+}
+
+
+
+void _handleRqValuesTableGet(AQH_MODULE *m, AQCGI_REQUEST *rq, AQH_SESSION *session, GWEN_BUFFER *dbuf)
+{
+  AQH_ModDataClient_HandleRequest(m, rq, session, AQH_ModDevices_RunValuesAsTable, dbuf);
+}
+
+
+
+void _handleRqValuesGraphGet(AQH_MODULE *m, AQCGI_REQUEST *rq, AQH_SESSION *session, GWEN_BUFFER *dbuf)
+{
+  AQH_ModDataClient_HandleRequest(m, rq, session, AQH_ModDevices_RunValuesAsGraph, dbuf);
+}
+
+
+
+void _handleRqValueGet(AQH_MODULE *m, AQCGI_REQUEST *rq, AQH_SESSION *session, GWEN_BUFFER *dbuf)
+{
+  AQH_ModDataClient_HandleRequest(m, rq, session, AQH_ModDevices_RunValue, dbuf);
+}
+
+
+
+void _handleRqSetDataPost(AQH_MODULE *m, AQCGI_REQUEST *rq, AQH_SESSION *session, GWEN_BUFFER *dbuf)
+{
+  AQH_ModDataClient_HandleRequest(m, rq, session, AQH_ModDevices_RunSetData, dbuf);
+}
+
+
+
+void _handleRqGraphGet(AQH_MODULE *m, AQCGI_REQUEST *rq, AQH_SESSION *session, GWEN_BUFFER *dbuf)
+{
+  AQH_ModDataClient_HandleRequest(m, rq, session, AQH_ModDevices_RunGraphValue, dbuf);
+}
+
+
+
+void _handleRqDeviceGet(AQH_MODULE *m, AQCGI_REQUEST *rq, AQH_SESSION *session, GWEN_BUFFER *dbuf)
+{
+  AQH_ModDataClient_HandleRequest(m, rq, session, AQH_ModDevices_RunDevice, dbuf);
+}
+
+
+
+void _handleRqDevicePost(AQH_MODULE *m, AQCGI_REQUEST *rq, AQH_SESSION *session, GWEN_BUFFER *dbuf)
+{
+  AQH_ModDataClient_HandleRequest(m, rq, session, AQH_ModDevices_RunSetDevice, dbuf);
+}
+
+
+
+void _handleRqPageGet(AQH_MODULE *m, AQCGI_REQUEST *rq, AQH_SESSION *session, GWEN_BUFFER *dbuf)
+{
+  AQH_ModDataClient_HandleRequest(m, rq, session, AQH_ModDevices_RunPageGet, dbuf);
+}
+
+
+
+void _handleRqPagePost(AQH_MODULE *m, AQCGI_REQUEST *rq, AQH_SESSION *session, GWEN_BUFFER *dbuf)
+{
+  AQH_ModDataClient_HandleRequest(m, rq, session, AQH_ModDevices_RunPagePost, dbuf);
+}
+
+
+
+void _handleRqPageGraphGet(AQH_MODULE *m, AQCGI_REQUEST *rq, AQH_SESSION *session, GWEN_BUFFER *dbuf)
+{
+  AQH_ModDataClient_HandleRequest(m, rq, session, AQH_ModDevices_RunPageGraph, dbuf);
+}
+
+
+
+
+
+
+
+
+
+uint32_t AQH_ModDevices_ColorFromHexString(const char *s)
+{
+  uint32_t colorIn=0;
+
+  while(*s && *s<33)
+    s++;
+  if (*s=='#')
+    s++;
+  while(*s) {
+    uint c;
+
+    c=(*s)-'0';
+    if (c>9)
+      c-=7;
+    colorIn<<=4;
+    colorIn|=c & 0xf;
+    s++;
+  }
+
+  /* hex 00RRGGBB -> GGRRWWBB  */
+  //return _htmlColorToValueRGBW(colorIn);
+  return colorIn;
+}
+
+
+
+uint32_t AQH_ModDevices_HtmlColorToValueRGBW(uint32_t colorIn)
+{
+  uint32_t colorOut;
+  /* hex 00RRGGBB -> GGRRWWBB  */
+  /*   RGBW             GGRRWWBB                       GGRRWWBB                 GGRRWWBB */
+  /*   html             00RRGGBB                       00RRGGBB                 00RRGGBB*/
+  colorOut=(colorIn & 0x00ff0000) | ((colorIn<<16) & 0xff000000) | (colorIn & 0x000000ff);
+  return colorOut;
+}
+
+
+
+uint32_t AQH_ModDevices_RgbwToHtmlColor(uint32_t colorIn)
+{
+  uint32_t colorOut;
+  /*   RGBW             GGRRWWBB                        GGRRWWBB                      GGRRWWBB */
+  /*   hex              00RRGGBB                        00RRGGBB                      00RRGGBB*/
+  colorOut=(colorIn & 0x00ff0000) | ( (colorIn>>16) & 0x0000ff00) | (colorIn & 0x000000ff);
+  return colorOut;
+}
+
+
+
+uint32_t AQH_ModDevices_RgbwFromComponents(int r, int g, int b, int w)
+{
+  uint32_t colorOut;
+
+  colorOut=((r & 0xff)<<16) | ((g & 0xff)<<24) | (b & 0xff) | ((w & 0xff)<<8);
+  return colorOut;
+}
+
+
+
+int AQH_ModDevices_RgbwGetR(uint32_t color)
+{                /* GGRRWWBB */
+  return (color & 0x00ff0000)>>16;
+}
+
+
+
+int AQH_ModDevices_RgbwGetG(uint32_t color)
+{                /* GGRRWWBB */
+  return (color & 0xff000000)>>24;
+}
+
+
+
+int AQH_ModDevices_RgbwGetB(uint32_t color)
+{                /* GGRRWWBB */
+  return (color & 0x000000ff);
+}
+
+
+
+int AQH_ModDevices_RgbwGetW(uint32_t color)
+{                /* GGRRWWBB */
+  return (color & 0x0000ff00)>>8;
+}
+
+
+
+void _addValueActionToForm(const AQH_VALUE *value, GWEN_BUFFER *dbuf)
+{
+  const char *sValueName;
+
+  sValueName=AQH_Value_GetName(value);
+  switch(AQH_Value_GetModality(value)) {
+  case AQH_ValueModality_RGBW:
+    GBAA(dbuf, "<input type=\"color\" name=\"%s\" value=\"refresh\"/>", sValueName);
+    break;
+  case AQH_ValueModality_OnOff:
+    GBAA(dbuf,
+         "<select name=\"%s\">"
+         "<option value=\"unchanged\">unchanged</option>"
+         "<option value=\"off\">off</option>"
+         "<option value=\"on\">on</option>"
+         "</select>",
+         sValueName);
+    break;
+  case AQH_ValueModality_OnOffAuto:
+    GBAA(dbuf,
+         "<select name=\"%s\">"
+         "<option value=\"unchanged\">unchanged</option>"
+         "<option value=\"off\">off</option>"
+         "<option value=\"on\">on</option>"
+         "<option value=\"auto\">auto</option>"
+         "</select>",
+         sValueName);
+    break;
+  default:
+    break;
+  }
+}
+
+
+
+void _addLastValueToForm(AQH_DATACLIENT *dc, const AQH_VALUE *value, GWEN_BUFFER *dbuf)
+{
+  const char *sValueSystemName;
+  const char *sValueName;
+  uint64_t dataPoints[2];
+  uint64_t recvdNum;
+//  uint64_t timestamp;
+  union {double f; uint64_t i;} u;
+  int intVal;
+
+  sValueSystemName=AQH_Value_GetNameForSystem(value);
+  sValueName=AQH_Value_GetName(value);
+  recvdNum=AQH_DataClient_GetLastData(dc, sValueSystemName, &dataPoints[0], 1);
+  if (recvdNum>0) {
+//    timestamp=dataPoints[0];
+    u.i=dataPoints[1];
+    intVal=(int) u.f;
+  }
+  else {
+    u.i=0;
+    intVal=-1;
+  }
+
+  if (AQH_Value_GetValueType(value)==AQH_ValueType_Actor) {
+    DBG_ERROR(NULL, "Adding actor");
+    switch(AQH_Value_GetModality(value)) {
+    case AQH_ValueModality_RGBW:
+      DBG_ERROR(NULL, "Color: %.f RGBW=%08x HTML=%08x, RGBW2=%08x",
+                u.f,
+                (uint32_t) (u.f),
+                AQH_ModDevices_RgbwToHtmlColor(u.f),
+                AQH_ModDevices_HtmlColorToValueRGBW(AQH_ModDevices_RgbwToHtmlColor(u.f)));
+#if 1
+      GBAA(dbuf, "<input type=\"text\" name=\"%s\" value=\"#%08x\"/>", sValueName, (uint32_t) (u.f));
+#else
+      GBAA(dbuf, "<input type=\"color\" name=\"%s\" value=\"#%08x\"/>#%08x (#%08x)",
+           sValueName,
+           _rgbwToHtmlColor((unsigned int) (u.f)),
+           _rgbwToHtmlColor((unsigned int) (u.f)),
+           (uint32_t) (u.f));
+#endif
+      break;
+    case AQH_ValueModality_OnOff:
+      GBAA(dbuf, "<select name=\"%s\">" "<option value=\"unchanged\" >unchanged</option>", sValueName);
+      GBAA(dbuf, "<option value=\"off\" %s>off</option>", (intVal==0)?"selected":"");
+      GBAA(dbuf, "<option value=\"on\" %s>on</option>", (intVal==1)?"selected":"");
+      GBAS(dbuf, "</select>");
+      break;
+    case AQH_ValueModality_OnOffAuto:
+      GBAA(dbuf, "<select name=\"%s\">" "<option value=\"unchanged\" >unchanged</option>", sValueName);
+      GBAA(dbuf, "<option value=\"off\" %s>off</option>", (intVal==0)?"selected":"");
+      GBAA(dbuf, "<option value=\"on\" %s>on</option>", (intVal==1)?"selected":"");
+      GBAA(dbuf, "<option value=\"auto\" %s>auto</option>", (intVal==2)?"selected":"");
+      GBAS(dbuf, "</select>");
+      break;
+    default:
+      //      GBAA(dbuf, "<input type=\"text\" name=\"%s\" value=\"%.2f\"/>", sValueName, u.f);
+      GBAA(dbuf, "%.2f", u.f);
+      break;
+    } /* switch */
+  } /* if actor */
+  else {
+    DBG_ERROR(NULL, "Adding sensor (%s=%.2f)", sValueName, u.f);
+    GBAA(dbuf, "%.2f", u.f);
+  }
+}
+
+
+
+AQH_VALUE *AQH_ModDevices_GetValueForDevice(AQH_DATACLIENT *dc, const char *sDeviceName, const char *sValueName)
+{
+  AQH_VALUE_LIST *valueList;
+
+  valueList=AQH_DataClient_GetValues(dc, sDeviceName, 0);
+  if (valueList) {
+    AQH_VALUE *value;
+
+    value=AQH_Value_List_First(valueList);
+    while(value) {
+      const char *s;
+
+      s=AQH_Value_GetName(value);
+      if (s && *s && strcasecmp(s, sValueName)==0) {
+        break;
+      }
+      value=AQH_Value_List_Next(value);
+    }
+
+    if (value) {
+      AQH_Value_List_Del(value);
+      AQH_Value_List_free(valueList);
+      return value;
+    }
+
+    AQH_Value_List_free(valueList);
+  }
+
+  return NULL;
+}
+
+
+
+AQH_DEVICE *AQH_ModDevices_GetDevice(AQH_DATACLIENT *dc, const char *sDeviceName)
+{
+  AQH_DEVICE_LIST *deviceList;
+
+  deviceList=AQH_DataClient_GetDevices(dc, sDeviceName);
+  if (deviceList) {
+    AQH_DEVICE *device;
+
+    device=AQH_Device_List_First(deviceList);
+    while(device) {
+      const char *s;
+
+      s=AQH_Device_GetNameForSystem(device);
+      if (s && *s && 0==strcasecmp(s, sDeviceName)) {
+        AQH_Device_List_Del(device);
+        AQH_Device_List_free(deviceList);
+        return device;
+      }
+      device=AQH_Device_List_Next(device);
+    }
+    AQH_Device_List_free(deviceList);
+  }
+
+  return NULL;
+}
+
+
+
+int AQH_ModDevices_ValueGetLastDataAsInt(AQH_DATACLIENT *dc, const AQH_VALUE *value, int defaultValue)
+{
+  const char *sValueSystemName;
+  uint64_t dataPoints[2];
+  uint64_t recvdNum;
+  //  uint64_t timestamp;
+  union {double f; uint64_t i;} u;
+  int intVal;
+
+  sValueSystemName=AQH_Value_GetNameForSystem(value);
+  recvdNum=AQH_DataClient_GetLastData(dc, sValueSystemName, &dataPoints[0], 1);
+  if (recvdNum>0) {
+    //    timestamp=dataPoints[0];
+    u.i=dataPoints[1];
+    intVal=(int) u.f;
+  }
+  else {
+    DBG_INFO(NULL, "No last value for \"%s\"", sValueSystemName);
+    intVal=defaultValue;
+  }
+
+  return intVal;
+}
+
+
+
+uint32_t AQH_ModDevices_ValueGetLastDataAsUint32(AQH_DATACLIENT *dc, const AQH_VALUE *value, uint32_t defaultValue)
+{
+  const char *sValueSystemName;
+  uint64_t dataPoints[2];
+  uint64_t recvdNum;
+  //  uint64_t timestamp;
+  union {double f; uint64_t i;} u;
+  uint32_t uintVal;
+
+  sValueSystemName=AQH_Value_GetNameForSystem(value);
+  recvdNum=AQH_DataClient_GetLastData(dc, sValueSystemName, &dataPoints[0], 1);
+  if (recvdNum>0) {
+    //    timestamp=dataPoints[0];
+    u.i=dataPoints[1];
+    uintVal=(uint32_t) u.f;
+    DBG_ERROR(NULL, "Transformed value %.2f -> %08x", u.f, uintVal);
+  }
+  else {
+    DBG_INFO(NULL, "No last value for \"%s\"", sValueSystemName);
+    uintVal=defaultValue;
+  }
+
+  return uintVal;
+}
+
+
+
+
+AQDG_GRAPH_DATAPAIR_LIST *AQH_ModDevices_RequestDataPairList(AQH_DATACLIENT *dc, const char *systemValueName,
+                                                             uint64_t tsBegin, uint64_t tsEnd, uint64_t num)
+{
+  uint64_t *dataPoints;
+  uint64_t recvdNum;
+
+  dataPoints=malloc(num*sizeof(uint64_t)*2);
+
+  recvdNum=AQH_DataClient_GetPeriodData(dc, systemValueName, dataPoints, num, tsBegin, tsEnd);
+  if (recvdNum>0) {
+    AQDG_GRAPH_DATAPAIR_LIST *dpList;
+
+    dpList=_createDataPairListFromDataPoints(dataPoints, recvdNum);
+    free(dataPoints);
+    return dpList;
+  }
+  else {
+    DBG_ERROR(NULL, "No data received for %s", systemValueName);
+    free(dataPoints);
+    return NULL;
+  }
+}
+
+
+
+AQDG_GRAPH_DATAPAIR_LIST *_createDataPairListFromDataPoints(const uint64_t *dataPoints, uint64_t numValues)
+{
+  AQDG_GRAPH_DATAPAIR_LIST *dpList;
+  uint64_t i;
+
+  DBG_DEBUG(NULL, "Got %d datapoints", (int) numValues);
+  dpList=AQDG_Graph_DataPair_List_new();
+  for(i=0; i<numValues; i++) {
+    AQDG_GRAPH_DATAPAIR *dp;
+    double timestamp;
+    union {double f; uint64_t i;} u;
+  
+    timestamp=(double)(*(dataPoints++));
+    u.i=*(dataPoints++);
+    dp=AQDG_Graph_DataPair_new();
+    AQDG_Graph_DataPair_SetValueX(dp, timestamp);
+    AQDG_Graph_DataPair_SetValueY(dp, u.f);
+    AQDG_Graph_DataPair_List_Add(dp, dpList);
+  }
+  AQDG_Graph_DataPair_List_SortByValueX(dpList, 1);
+  return dpList;
+}
+
+
+

apps/aqhome-cgi/modules/devices/mdevices.h

@@ -0,0 +1,71 @@
+/****************************************************************************
+ * This file is part of the project AqHome.
+ * AqHome (c) by 2025 Martin Preuss, all rights reserved.
+ *
+ * The license for this file can be found in the file COPYING which you
+ * should have received along with this file.
+ ****************************************************************************/
+
+#ifndef AQHOME_CGI_MODULES_DEVICES_H
+#define AQHOME_CGI_MODULES_DEVICES_H
+
+
+#include "aqhome-cgi/modules/mdataclient.h"
+
+#include "aqhome/aqhome.h"
+#include "aqhome/dataclient/client.h"
+
+#include <aqcgi/request.h>
+
+#include <aqdiagram/graph/datapair.h>
+
+#include <gwenhywfar/buffer.h>
+
+
+#define AQH_MODDEVICES_PERMS_DEVICEREAD  0x001
+#define AQH_MODDEVICES_PERMS_DEVICEWRITE 0x002
+#define AQH_MODDEVICES_PERMS_DEVICEADD   0x004
+#define AQH_MODDEVICES_PERMS_DEVICEDEL   0x008
+
+#define AQH_MODDEVICES_PERMS_VALUEREAD   0x010
+#define AQH_MODDEVICES_PERMS_VALUEWRITE  0x020
+#define AQH_MODDEVICES_PERMS_VALUEADD    0x040
+#define AQH_MODDEVICES_PERMS_VALUEDEL    0x080
+#define AQH_MODDEVICES_PERMS_VALUESET    0x100
+
+
+#define AQH_MODDEVICES_GRAPH_WIDTH  640
+#define AQH_MODDEVICES_GRAPH_HEIGHT 480
+
+
+
+void AQH_ModDevices_Extend(AQH_MODULE *m, AQH_SERVICE *sv, const char *baseFolder);
+int AQH_ModDevices_Create(AQH_SERVICE *sv);
+
+
+uint32_t AQH_ModDevices_ColorFromHexString(const char *s);
+uint32_t AQH_ModDevices_HtmlColorToValueRGBW(uint32_t colorIn);
+uint32_t AQH_ModDevices_RgbwToHtmlColor(uint32_t colorIn);
+uint32_t AQH_ModDevices_RgbwFromComponents(int r, int g, int b, int w);
+
+int AQH_ModDevices_RgbwGetR(uint32_t color);
+int AQH_ModDevices_RgbwGetG(uint32_t color);
+int AQH_ModDevices_RgbwGetB(uint32_t color);
+int AQH_ModDevices_RgbwGetW(uint32_t color);
+
+
+
+
+AQH_VALUE *AQH_ModDevices_GetValueForDevice(AQH_DATACLIENT *dc, const char *sDeviceName, const char *sValueName);
+AQH_DEVICE *AQH_ModDevices_GetDevice(AQH_DATACLIENT *dc, const char *sDeviceName);
+int AQH_ModDevices_ValueGetLastDataAsInt(AQH_DATACLIENT *dc, const AQH_VALUE *value, int defaultValue);
+uint32_t AQH_ModDevices_ValueGetLastDataAsUint32(AQH_DATACLIENT *dc, const AQH_VALUE *value, uint32_t defaultValue);
+
+AQDG_GRAPH_DATAPAIR_LIST *AQH_ModDevices_RequestDataPairList(AQH_DATACLIENT *dc, const char *systemValueName,
+                                                             uint64_t tsBegin, uint64_t tsEnd, uint64_t num);
+
+
+
+
+#endif
+

apps/aqhome-cgi/modules/devices/mdevices_device.c

@@ -0,0 +1,131 @@
+/****************************************************************************
+ * This file is part of the project AqHome.
+ * AqHome (c) by 2025 Martin Preuss, all rights reserved.
+ *
+ * The license for this file can be found in the file COPYING which you
+ * should have received along with this file.
+ ****************************************************************************/
+
+#ifdef HAVE_CONFIG_H
+# include <config.h>
+#endif
+
+
+#include "./mdevices_device.h"
+
+#include "aqhome-cgi/service/module.h"
+#include "aqhome-cgi/modules/mdataclient.h"
+
+#include <gwenhywfar/debug.h>
+#include <gwenhywfar/timestamp.h>
+#include <gwenhywfar/text.h>
+
+
+/* ------------------------------------------------------------------------------------------------
+ * defs and enums
+ * ------------------------------------------------------------------------------------------------
+ */
+
+#define GBAS GWEN_Buffer_AppendString
+#define GBAA GWEN_Buffer_AppendArgs
+
+#define I18N(msg) msg
+
+
+
+/* ------------------------------------------------------------------------------------------------
+ * forward declarations
+ * ------------------------------------------------------------------------------------------------
+ */
+
+static void _runDeviceWithArgs(AQH_MODULE *m,
+                               AQCGI_REQUEST *rq,
+                               AQH_SESSION *session,
+                               AQH_DATACLIENT *dc,
+                               const char *sDeviceName,
+                               GWEN_BUFFER *dbuf);
+static void _mkDeviceForm(AQH_DATACLIENT *dc, const char *sDeviceName, const AQH_DEVICE *device, GWEN_BUFFER *dbuf);
+static void _addFieldToForm(const char *sFieldTitle, const char *sFieldName, const char *sFieldContent, GWEN_BUFFER *dbuf);
+
+
+
+/* ------------------------------------------------------------------------------------------------
+ * code
+ * ------------------------------------------------------------------------------------------------
+ */
+
+void AQH_ModDevices_RunDevice(AQH_MODULE *m, AQCGI_REQUEST *rq, AQH_SESSION *session, AQH_DATACLIENT *dc, GWEN_BUFFER *dbuf)
+{
+  GWEN_DB_NODE *dbQuery;
+  const char *sDeviceName;
+
+  DBG_ERROR(NULL, "RunValue");
+  dbQuery=AQCGI_Request_GetDbQuery(rq);
+  sDeviceName=GWEN_DB_GetCharValue(dbQuery, "device", 0, NULL);
+  if (sDeviceName && *sDeviceName) {
+    GWEN_BUFFER *bufDeviceName;
+
+    bufDeviceName=GWEN_Buffer_new(0, 64, 0, 1);
+    GWEN_Text_UnescapeToBufferTolerant(sDeviceName, bufDeviceName);
+    _runDeviceWithArgs(m, rq, session, dc, GWEN_Buffer_GetStart(bufDeviceName), dbuf);
+    GWEN_Buffer_free(bufDeviceName);
+  }
+}
+
+
+
+void _runDeviceWithArgs(AQH_MODULE *m,
+                        AQCGI_REQUEST *rq,
+                        AQH_SESSION *session,
+                        AQH_DATACLIENT *dc,
+                        const char *sDeviceName,
+                        GWEN_BUFFER *dbuf)
+{
+  GWEN_DB_NODE *dbQuery;
+  AQH_DEVICE *device;
+
+  dbQuery=AQCGI_Request_GetDbQuery(rq);
+  DBG_ERROR(NULL, "Device=%s", sDeviceName?sDeviceName:"<empty>");
+
+  GBAA(dbuf,"<h1>Device %s</h1>\n", sDeviceName);
+
+  device=AQH_ModDevices_GetDevice(dc, sDeviceName);
+  if (device) {
+    _mkDeviceForm(dc, sDeviceName, device, dbuf);
+    AQH_Device_free(device);
+  }
+}
+
+
+
+void _mkDeviceForm(AQH_DATACLIENT *dc, const char *sDeviceName, const AQH_DEVICE *device, GWEN_BUFFER *dbuf)
+{
+  const char *s;
+
+  GBAS(dbuf,"<form action=\"device.html\" method=\"post\">\n");
+  GBAA(dbuf, "<input type=\"hidden\" name=\"device\" value=\"%s\">\n", sDeviceName);
+
+  GBAS(dbuf,"<table>\n");
+  _addFieldToForm(I18N("Room"), "roomName", AQH_Device_GetRoomName(device), dbuf);
+  _addFieldToForm(I18N("GUI Name"), "nameForGui", AQH_Device_GetNameForGui(device), dbuf);
+  _addFieldToForm(I18N("Location"), "location", AQH_Device_GetLocation(device), dbuf);
+  _addFieldToForm(I18N("Description"), "description", AQH_Device_GetDescription(device), dbuf);
+  GBAS(dbuf,"</table>\n");
+  GBAS(dbuf,"<br>\n");
+
+  GBAS(dbuf,"<input type=\"submit\" name=\"action\" value=\"Send\"/>");
+  GBAS(dbuf, "</form>\n\n");
+}
+
+
+
+void _addFieldToForm(const char *sFieldTitle, const char *sFieldName, const char *sFieldContent, GWEN_BUFFER *dbuf)
+{
+  GBAS(dbuf, "<tr>");
+  GBAA(dbuf, "<td><label for=\"%s\">%s</label></td>", sFieldName, sFieldTitle);
+  GBAA(dbuf, "<td><input type=\"text\" name=\"%s\" value=\"%s\"/></td>", sFieldName, sFieldContent?sFieldContent:"");
+  GBAS(dbuf, "</tr>");
+}
+
+
+

apps/aqhome-cgi/modules/devices/mdevices_device.h

@@ -0,0 +1,27 @@
+/****************************************************************************
+ * This file is part of the project AqHome.
+ * AqHome (c) by 2025 Martin Preuss, all rights reserved.
+ *
+ * The license for this file can be found in the file COPYING which you
+ * should have received along with this file.
+ ****************************************************************************/
+
+#ifndef AQHOME_CGI_MDEVICES_DEVICE_H
+#define AQHOME_CGI_MDEVICES_DEVICE_H
+
+
+#include "aqhome-cgi/modules/devices/mdevices.h"
+
+#include "aqhome/aqhome.h"
+#include "aqhome/dataclient/client.h"
+
+#include <aqcgi/request.h>
+
+#include <gwenhywfar/buffer.h>
+
+
+
+void AQH_ModDevices_RunDevice(AQH_MODULE *m, AQCGI_REQUEST *rq, AQH_SESSION *session, AQH_DATACLIENT *dc, GWEN_BUFFER *dbuf);
+
+
+#endif

apps/aqhome-cgi/modules/devices/mdevices_index.c

@@ -0,0 +1,135 @@
+/****************************************************************************
+ * This file is part of the project AqHome.
+ * AqHome (c) by 2025 Martin Preuss, all rights reserved.
+ *
+ * The license for this file can be found in the file COPYING which you
+ * should have received along with this file.
+ ****************************************************************************/
+
+#ifdef HAVE_CONFIG_H
+# include <config.h>
+#endif
+
+
+#include "./mdevices_index.h"
+
+#include "aqhome-cgi/service/module.h"
+#include "aqhome-cgi/modules/mdataclient.h"
+
+#include <gwenhywfar/debug.h>
+#include <gwenhywfar/timestamp.h>
+#include <gwenhywfar/text.h>
+
+
+/* ------------------------------------------------------------------------------------------------
+ * defs and enums
+ * ------------------------------------------------------------------------------------------------
+ */
+
+#define GBAS GWEN_Buffer_AppendString
+#define GBAA GWEN_Buffer_AppendArgs
+
+
+
+/* ------------------------------------------------------------------------------------------------
+ * forward declarations
+ * ------------------------------------------------------------------------------------------------
+ */
+
+static void _addLinkForDevice(const char *page, const char *sDevice, const char *action, const char *imgName, GWEN_BUFFER *dbuf);
+
+
+
+/* ------------------------------------------------------------------------------------------------
+ * code
+ * ------------------------------------------------------------------------------------------------
+ */
+
+void AQH_ModDevices_RunIndex(AQH_MODULE *m, AQCGI_REQUEST *rq, AQH_SESSION *session, AQH_DATACLIENT *dc, GWEN_BUFFER *dbuf)
+{
+  AQH_DEVICE_LIST *deviceList;
+  AQH_DEVICE *device;
+  uint32_t perms;
+
+  perms=AQH_ModService_GetUserPerms(m);
+
+  deviceList=AQH_DataClient_GetDevices(dc, NULL);
+  if (deviceList==NULL)  {
+    DBG_ERROR(NULL, "No device received");
+    GBAS(dbuf, "<p>No devices.</p>");
+    return;
+  }
+
+  GBAS(dbuf, "<h1>Devices</h1>\n");
+  GBAS(dbuf,
+       "<table class=\"datatable\">\n"
+       "<thead>\n"
+       "<tr>"
+       "<th>Name For System</th>"
+       "<th>Name For GUI</th>"
+       "<th>Room</th>"
+       "<th>Location</th>"
+       "<th>Description</th>"
+       "<th>Actions</th>"
+       "</tr>\n"
+       "</thead>\n"
+       "<tbody>\n");
+
+  device=AQH_Device_List_First(deviceList);
+  while(device) {
+    const char *s;
+    const char *sDevice;
+
+    GBAA(dbuf, "<tr>");
+    /* name for system */
+    sDevice=AQH_Device_GetNameForSystem(device);
+    GBAA(dbuf,"<td>%s</td>", sDevice?sDevice:"");
+    /* nameForGui */
+    s=AQH_Device_GetNameForGui(device);
+    GBAA(dbuf, "<td>%s</td>", s?s:"");
+    /* room */
+    s=AQH_Device_GetRoomName(device);
+    GBAA(dbuf, "<td>%s</td>", s?s:"");
+    /* location */
+    s=AQH_Device_GetLocation(device);
+    GBAA(dbuf, "<td>%s</td>", s?s:"");
+    /* description */
+    s=AQH_Device_GetDescription(device);
+    GBAA(dbuf, "<td>%s</td>", s?s:"");
+
+    GBAS(dbuf, "<td>");
+    if (perms & AQH_MODDEVICES_PERMS_VALUEREAD) {
+      _addLinkForDevice("vtable.html", sDevice, "table view", "/pics/document-table.png", dbuf);
+      _addLinkForDevice("vgraph.html", sDevice, "graph view", "/pics/graph.png", dbuf);
+    }
+
+    if (perms & AQH_MODDEVICES_PERMS_DEVICEWRITE) {
+      _addLinkForDevice("device.html", sDevice, "edit device", "/pics/edit.png", dbuf);
+    }
+
+    GBAS(dbuf, "</td>");
+
+    GBAA(dbuf, "</tr>");
+    device=AQH_Device_List_Next(device);
+  }
+
+  GBAS(dbuf,
+       "</tbody>\n"
+       "</table>\n");
+  AQH_Device_List_free(deviceList);
+}
+
+
+
+void _addLinkForDevice(const char *page, const char *sDevice, const char *action, const char *imgName, GWEN_BUFFER *dbuf)
+{
+  GBAA(dbuf,"<a href=\"%s?device=", page);
+  GWEN_Text_EscapeToBufferTolerant(sDevice, dbuf);
+  GBAS(dbuf,"\">");
+  GBAA(dbuf,"<img src=\"%s\" alt=\"%s\" title=\"%s\" />", imgName, action, action);
+  GBAS(dbuf,"</a>");
+}
+
+
+
+

apps/aqhome-cgi/modules/devices/mdevices_index.h

@@ -0,0 +1,27 @@
+/****************************************************************************
+ * This file is part of the project AqHome.
+ * AqHome (c) by 2025 Martin Preuss, all rights reserved.
+ *
+ * The license for this file can be found in the file COPYING which you
+ * should have received along with this file.
+ ****************************************************************************/
+
+#ifndef AQHOME_CGI_MDEVICES_INDEX_H
+#define AQHOME_CGI_MDEVICES_INDEX_H
+
+
+#include "aqhome-cgi/modules/devices/mdevices.h"
+
+#include "aqhome/aqhome.h"
+#include "aqhome/dataclient/client.h"
+
+#include <aqcgi/request.h>
+
+#include <gwenhywfar/buffer.h>
+
+
+
+void AQH_ModDevices_RunIndex(AQH_MODULE *m, AQCGI_REQUEST *rq, AQH_SESSION *session, AQH_DATACLIENT *dc, GWEN_BUFFER *dbuf);
+
+
+#endif

apps/aqhome-cgi/modules/devices/mdevices_init.c

@@ -0,0 +1,129 @@
+/****************************************************************************
+ * This file is part of the project AqHome.
+ * AqHome (c) by 2025 Martin Preuss, all rights reserved.
+ *
+ * The license for this file can be found in the file COPYING which you
+ * should have received along with this file.
+ ****************************************************************************/
+
+#ifdef HAVE_CONFIG_H
+# include <config.h>
+#endif
+
+
+#include "./mdevices_init.h"
+
+#include "aqhome-cgi/service/module.h"
+#include "aqhome-cgi/modules/mdataclient.h"
+
+#include <gwenhywfar/debug.h>
+#include <gwenhywfar/timestamp.h>
+#include <gwenhywfar/text.h>
+
+
+/* ------------------------------------------------------------------------------------------------
+ * defs and enums
+ * ------------------------------------------------------------------------------------------------
+ */
+
+#define GBAS GWEN_Buffer_AppendString
+#define GBAA GWEN_Buffer_AppendArgs
+
+#define P_DEVICEREAD AQH_MODDEVICES_PERMS_DEVICEREAD
+#define P_VALUEREAD  AQH_MODDEVICES_PERMS_VALUEREAD
+#define P_VALUEWRITE AQH_MODDEVICES_PERMS_VALUEWRITE
+
+
+
+/* ------------------------------------------------------------------------------------------------
+ * forward declarations
+ * ------------------------------------------------------------------------------------------------
+ */
+
+static void _createPermDefList(AQH_MODULE *m);
+static void _createRoleList(AQH_MODULE *m);
+
+
+
+/* ------------------------------------------------------------------------------------------------
+ * code
+ * ------------------------------------------------------------------------------------------------
+ */
+
+int AQH_ModDevices_Create(AQH_SERVICE *sv)
+{
+  AQH_MODULE *m;
+  int rv;
+
+  m=AQH_Module_new();
+  AQH_Module_SetName(m, "devices");
+  AQH_Module_SetDescr(m, "device module");
+  AQH_Module_SetGuestPerms(m, 0);
+
+  _createPermDefList(m);
+  _createRoleList(m);
+
+  rv=AQH_Service_AddModule(sv, m);
+  if (rv<0) {
+    DBG_INFO(NULL, "here (%d)", rv);
+  }
+  AQH_Module_free(m);
+  return rv;
+}
+
+
+
+void _createPermDefList(AQH_MODULE *m)
+{
+  AQH_PERMDEF_LIST *permDefList;
+
+  permDefList=AQH_PermDef_List_new();
+
+  AQH_ModService_AddPermDef(permDefList, "DeviceRead",    0x001, "Read and list devices");
+  AQH_ModService_AddPermDef(permDefList, "DeviceWrite",   0x002, "Modify devices");
+  AQH_ModService_AddPermDef(permDefList, "DeviceAdd",     0x004, "Add devices");
+  AQH_ModService_AddPermDef(permDefList, "DeviceDel",     0x008, "Remove devices");
+
+  AQH_ModService_AddPermDef(permDefList, "ValueRead",     0x010, "Read and list values");
+  AQH_ModService_AddPermDef(permDefList, "ValueWrite",    0x020, "Modify values");
+  AQH_ModService_AddPermDef(permDefList, "ValueAdd",      0x040, "Add values");
+  AQH_ModService_AddPermDef(permDefList, "ValueDel",      0x080, "Remove values");
+  AQH_ModService_AddPermDef(permDefList, "ValueSet",      0x100, "Set values");
+
+  AQH_Module_SetPermDefList(m, permDefList);
+}
+
+
+
+void _createRoleList(AQH_MODULE *m)
+{
+  AQH_ROLE_LIST *roleList;
+  int id=0;
+
+  roleList=AQH_Role_List_new();
+  AQH_ModService_AddRole(roleList, id++, "Reader",
+                         AQH_MODDEVICES_PERMS_DEVICEREAD |
+                         AQH_MODDEVICES_PERMS_VALUEREAD,
+                         "Read devices and values");
+  AQH_ModService_AddRole(roleList, id++, "Writer",
+                         AQH_MODDEVICES_PERMS_DEVICEREAD |
+                         AQH_MODDEVICES_PERMS_DEVICEWRITE |
+                         AQH_MODDEVICES_PERMS_DEVICEADD |
+                         AQH_MODDEVICES_PERMS_DEVICEDEL |
+                         AQH_MODDEVICES_PERMS_VALUEREAD |
+                         AQH_MODDEVICES_PERMS_VALUEWRITE |
+                         AQH_MODDEVICES_PERMS_VALUEADD |
+                         AQH_MODDEVICES_PERMS_VALUEDEL |
+                         AQH_MODDEVICES_PERMS_VALUESET,
+                         "Read and write devices and values");
+  AQH_ModService_AddRole(roleList, id++, "Setter",
+                         AQH_MODDEVICES_PERMS_DEVICEREAD |
+                         AQH_MODDEVICES_PERMS_VALUEREAD |
+                         AQH_MODDEVICES_PERMS_VALUESET,
+                         "Set values");
+  AQH_Module_SetRoleList(m, roleList);
+}
+
+
+
+

apps/aqhome-cgi/modules/devices/mdevices_init.h

@@ -0,0 +1,27 @@
+/****************************************************************************
+ * This file is part of the project AqHome.
+ * AqHome (c) by 2025 Martin Preuss, all rights reserved.
+ *
+ * The license for this file can be found in the file COPYING which you
+ * should have received along with this file.
+ ****************************************************************************/
+
+#ifndef AQHOME_CGI_MDEVICES_INIT_H
+#define AQHOME_CGI_MDEVICES_INIT_H
+
+
+#include "aqhome-cgi/modules/devices/mdevices.h"
+
+#include "aqhome/aqhome.h"
+#include "aqhome/dataclient/client.h"
+
+#include <aqcgi/request.h>
+
+#include <gwenhywfar/buffer.h>
+
+
+
+int AQH_ModDevices_Create(AQH_SERVICE *sv);
+
+
+#endif

apps/aqhome-cgi/modules/devices/mdevices_page.c

@@ -0,0 +1,961 @@
+/****************************************************************************
+ * This file is part of the project AqHome.
+ * AqHome (c) by 2025 Martin Preuss, all rights reserved.
+ *
+ * The license for this file can be found in the file COPYING which you
+ * should have received along with this file.
+ ****************************************************************************/
+
+#ifdef HAVE_CONFIG_H
+# include <config.h>
+#endif
+
+
+#include "./mdevices_page.h"
+
+#include "aqhome-cgi/service/module.h"
+#include "aqhome-cgi/modules/mdataclient.h"
+
+#include <aqdiagram/graph/timegraph.h>
+#include <aqdiagram/graph/w_graph.h>
+#include <aqdiagram/draw/context_cairo.h>
+
+#include <gwenhywfar/debug.h>
+#include <gwenhywfar/timestamp.h>
+#include <gwenhywfar/text.h>
+#include <gwenhywfar/directory.h>
+
+#include <sys/stat.h>
+#include <string.h>
+#include <errno.h>
+#include <ctype.h>
+
+
+
+/* ------------------------------------------------------------------------------------------------
+ * defs and enums
+ * ------------------------------------------------------------------------------------------------
+ */
+
+#define GBAS GWEN_Buffer_AppendString
+#define GBAA GWEN_Buffer_AppendArgs
+
+
+enum {
+  MY_LAYOUT_NONE=0,
+  MY_LAYOUT_HORIZONTAL,
+  MY_LAYOUT_VERTICAL
+};
+
+
+
+/* ------------------------------------------------------------------------------------------------
+ * forward declarations
+ * ------------------------------------------------------------------------------------------------
+ */
+
+static void _writePage(AQH_MODULE *m, AQH_DATACLIENT *dc, GWEN_XMLNODE *nPage, GWEN_BUFFER *dbuf);
+static void _writeItem(AQH_MODULE *m, AQH_DATACLIENT *dc, const char *sPageId, GWEN_XMLNODE *nItem, GWEN_BUFFER *dbuf);
+static void _writeActor(AQH_DATACLIENT *dc, const char *sPageId, GWEN_XMLNODE *n, int layout, GWEN_BUFFER *dbuf);
+static void _writeGraph(const char *sPageId, GWEN_XMLNODE *n, int layout, GWEN_BUFFER *dbuf);
+
+static void _handlePageActor(AQCGI_REQUEST *rq, AQH_DATACLIENT *dc, const char *sActorId, GWEN_XMLNODE *nActor);
+static void _handlePageGraph(AQH_MODULE *m, AQCGI_REQUEST *rq, AQH_DATACLIENT *dc, const char *sGraphId, GWEN_XMLNODE *nGraph, GWEN_BUFFER *dbuf);
+static void _genPageGraph(AQH_DATACLIENT *dc, const char *sGraphId, const char *sFilename, GWEN_XMLNODE *nGraph);
+static void _addCurves(AQH_DATACLIENT *dc, AQDG_GRAPH *g, GWEN_XMLNODE *nGraph, uint64_t tsBegin, uint64_t tsEnd);
+static AQDG_GRAPH_DATAPAIR_LIST *_readCurveData(AQH_DATACLIENT *dc, GWEN_XMLNODE *nCurve, uint64_t tsBegin, uint64_t tsEnd);
+static uint64_t _parseTime(const char *s);
+static GWEN_XMLNODE *_getSubItemNode(GWEN_XMLNODE *nPage, const char *sId, const char *sElementName);
+static void _mkPathForGraph(AQH_MODULE *m, const char *sGraphId, GWEN_BUFFER *dbuf);
+static void _addGraphLink(const char *sPageId, const char *sGraphId, int w, int h, GWEN_BUFFER *dbuf);
+static void _writeRgbwToForm(const char *sValueName, uint32_t color, GWEN_BUFFER *dbuf);
+static void _writeOnOffToForm(const char *sValueName, int intVal, GWEN_BUFFER *dbuf);
+static void _writeOnOffAutoToForm(const char *sValueName, int intVal, GWEN_BUFFER *dbuf);
+static void _setRgbwData(AQH_DATACLIENT *dc, GWEN_DB_NODE *dbPost, const char *sValueName, const AQH_VALUE *value);
+static int _getColorComponent(GWEN_DB_NODE *dbPost, const char *sValueName, const char *sComponent, int defaultValue);
+static void _setOnOffData(AQH_DATACLIENT *dc, const AQH_VALUE *value, const char *sValue);
+static void _setOnOffAutoData(AQH_DATACLIENT *dc, const AQH_VALUE *value, const char *sValue);
+
+static void _sendPageList(AQH_MODULE *m, GWEN_BUFFER *dbuf);
+static GWEN_STRINGLIST *_listPageFiles(AQH_MODULE *m);
+static GWEN_XMLNODE *_readPage(AQH_MODULE *m, const char *sPageName);
+static GWEN_XMLNODE *_readPageFile(const char *sFilename);
+static int _layoutFromString(const char *s);
+
+
+
+/* ------------------------------------------------------------------------------------------------
+ * code
+ * ------------------------------------------------------------------------------------------------
+ */
+
+void AQH_ModDevices_RunPageGet(AQH_MODULE *m, AQCGI_REQUEST *rq, AQH_SESSION *session, AQH_DATACLIENT *dc, GWEN_BUFFER *dbuf)
+{
+  GWEN_DB_NODE *dbQuery;
+  const char *sPageId;
+
+  DBG_INFO(NULL, "RunPageGet");
+  dbQuery=AQCGI_Request_GetDbQuery(rq);
+  sPageId=dbQuery?GWEN_DB_GetCharValue(dbQuery, "page", 0, NULL):NULL;
+  if (sPageId && *sPageId) {
+    GWEN_XMLNODE *fileNode;
+
+    fileNode=_readPage(m, sPageId);
+    if (fileNode) {
+      GWEN_XMLNODE *nPage;
+
+      nPage=GWEN_XMLNode_FindFirstTag(fileNode, "page", NULL, NULL);
+      if (nPage) {
+	_writePage(m, dc, nPage, dbuf);
+	AQCGI_Request_AddResponseHeaderData(rq, "Refresh: 120");
+      }
+      else {
+	DBG_ERROR(NULL, "No page element in file for \"%s\"", sPageId);
+      }
+      GWEN_XMLNode_free(fileNode);
+    }
+    else {
+      DBG_INFO(NULL, "here");
+    }
+  }
+  else {
+    DBG_ERROR(NULL, "Reading page list");
+    _sendPageList(m, dbuf);
+  }
+}
+
+
+
+void AQH_ModDevices_RunPageGraph(AQH_MODULE *m, AQCGI_REQUEST *rq, AQH_SESSION *session, AQH_DATACLIENT *dc, GWEN_BUFFER *dbuf)
+{
+  GWEN_DB_NODE *dbQuery;
+  const char *sPageId;
+  const char *sGraphId;
+
+  DBG_INFO(NULL, "RunPageGraphGet");
+  dbQuery=AQCGI_Request_GetDbQuery(rq);
+  sPageId=GWEN_DB_GetCharValue(dbQuery, "page", 0, NULL);
+  sGraphId=GWEN_DB_GetCharValue(dbQuery, "graph", 0, NULL);
+  if (sPageId && *sPageId && sGraphId && *sGraphId) {
+    GWEN_XMLNODE *fileNode;
+
+    fileNode=_readPage(m, sPageId);
+    if (fileNode) {
+      GWEN_XMLNODE *nPage;
+      GWEN_XMLNODE *nGraph;
+
+      nPage=GWEN_XMLNode_FindFirstTag(fileNode, "page", "id", sPageId);
+      nGraph=_getSubItemNode(nPage, sGraphId, "graph");
+      if (nPage && nGraph)
+	_handlePageGraph(m, rq, dc, sGraphId, nGraph, dbuf);
+      else {
+	DBG_ERROR(NULL, "Graph %s/%s not found", sPageId, sGraphId);
+      }
+      GWEN_XMLNode_free(fileNode);
+    }
+    else {
+      DBG_INFO(NULL, "here");
+    }
+  }
+}
+
+
+
+void AQH_ModDevices_RunPagePost(AQH_MODULE *m, AQCGI_REQUEST *rq, AQH_SESSION *session, AQH_DATACLIENT *dc, GWEN_BUFFER *dbuf)
+{
+  GWEN_DB_NODE *dbPost;
+  const char *sPageId;
+  const char *sActorId;
+
+  DBG_INFO(NULL, "RunPagePost");
+  dbPost=AQCGI_Request_GetDbPostBody(rq);
+  sPageId=GWEN_DB_GetCharValue(dbPost, "page", 0, NULL);
+  sActorId=GWEN_DB_GetCharValue(dbPost, "actor", 0, NULL);
+  if (sPageId && *sPageId && sActorId && *sActorId) {
+    GWEN_XMLNODE *fileNode;
+
+    fileNode=_readPage(m, sPageId);
+    if (fileNode) {
+      GWEN_XMLNODE *nPage;
+      GWEN_XMLNODE *nActor;
+
+      nPage=GWEN_XMLNode_FindFirstTag(fileNode, "page", "id", sPageId);
+      nActor=_getSubItemNode(nPage, sActorId, "actor");
+      if (nPage && nActor) {
+	_handlePageActor(rq, dc, sActorId, nActor);
+      }
+      else {
+	DBG_ERROR(NULL, "Actor %s/%s not found", sPageId, sActorId);
+      }
+      GWEN_XMLNode_free(fileNode);
+    }
+    else {
+      DBG_INFO(NULL, "here");
+    }
+  }
+
+  if (sPageId && *sPageId) {
+    GWEN_BUFFER *pbuf;
+
+    pbuf=GWEN_Buffer_new(0, 256, 0, 1);
+    GBAS(pbuf, "Location: page.html?page=");
+    GWEN_Text_EscapeToBuffer(sPageId, pbuf);
+    AQCGI_Request_AddResponseHeaderData(rq, GWEN_Buffer_GetStart(pbuf));
+    GWEN_Buffer_free(pbuf);
+  }
+  AQCGI_Request_SetResponseCode(rq, 303);
+  AQCGI_Request_SetResponseText(rq, "See other");
+}
+
+
+
+void _handlePageActor(AQCGI_REQUEST *rq, AQH_DATACLIENT *dc, const char *sActorId, GWEN_XMLNODE *nActor)
+{
+  GWEN_DB_NODE *dbPost;
+  const char *sDeviceName;
+  const char *sValueName;
+
+  dbPost=AQCGI_Request_GetDbPostBody(rq);
+  sDeviceName=GWEN_XMLNode_GetProperty(nActor, "device", NULL);
+  sValueName=GWEN_XMLNode_GetProperty(nActor, "value", NULL);
+
+  if (sDeviceName && *sDeviceName && sValueName && *sValueName) {
+    AQH_VALUE *value;
+
+    value=AQH_ModDevices_GetValueForDevice(dc, sDeviceName, sValueName);
+    if (value) {
+      const char *sSystemValueName;
+
+      sSystemValueName=AQH_Value_GetNameForSystem(value);
+      if (sSystemValueName) {
+	const char *sData;
+
+	sData=GWEN_DB_GetCharValue(dbPost, sActorId, 0, NULL);
+	DBG_INFO(NULL, "Setting value %s to %s", sSystemValueName, sData?sData:"empty/no value");
+	switch(AQH_Value_GetModality(value)) {
+	case AQH_ValueModality_RGBW:      _setRgbwData(dc, dbPost, sActorId, value); break;
+	case AQH_ValueModality_OnOff:     _setOnOffData(dc, value, sData);           break;
+	case AQH_ValueModality_OnOffAuto: _setOnOffAutoData(dc, value, sData);       break;
+	default:
+	  break;
+	} /* switch */
+      }
+    }
+  }
+}
+
+
+
+void _handlePageGraph(AQH_MODULE *m, AQCGI_REQUEST *rq, AQH_DATACLIENT *dc, const char *sGraphId, GWEN_XMLNODE *nGraph, GWEN_BUFFER *dbuf)
+{
+  GWEN_BUFFER *fbuf;
+  int refreshTime;
+
+  refreshTime=GWEN_XMLNode_GetIntProperty(nGraph, "refreshTime", 120);
+  fbuf=GWEN_Buffer_new(0, 256, 0, 1);
+  _mkPathForGraph(m, sGraphId, fbuf);
+  if (!AQH_ModService_FileIsCurrent(GWEN_Buffer_GetStart(fbuf), refreshTime)) {
+    _genPageGraph(dc, sGraphId, GWEN_Buffer_GetStart(fbuf), nGraph);
+  }
+  AQH_ModService_RespondWithMimeFile(rq, GWEN_Buffer_GetStart(fbuf), "image/png", dbuf);
+  GWEN_Buffer_free(fbuf);
+}
+
+
+
+void _genPageGraph(AQH_DATACLIENT *dc, const char *sGraphId, const char *sFilename, GWEN_XMLNODE *nGraph)
+{
+  const char *s;
+  const char *sTitle;
+  int w;
+  int h;
+  int precision;
+  uint64_t tsBegin;
+  uint64_t tsEnd;
+  AQDG_GRAPH *g;
+  AQDG_DRAW_CONTEXT *drawContext;
+  AQDG_OBJECT *graphObject;
+  uint32_t tickFlags=0;
+  double upperLimit;
+  double lowerLimit;
+
+  sTitle=GWEN_XMLNode_GetProperty(nGraph, "title", "untitled");
+  w=GWEN_XMLNode_GetIntProperty(nGraph, "width", AQH_MODDEVICES_GRAPH_WIDTH);
+  h=GWEN_XMLNode_GetIntProperty(nGraph, "height", AQH_MODDEVICES_GRAPH_HEIGHT);
+  precision=GWEN_XMLNode_GetIntProperty(nGraph, "precision", 2);
+  tsBegin=_parseTime(GWEN_XMLNode_GetProperty(nGraph, "begin", "-4h"));
+  tsEnd=_parseTime(GWEN_XMLNode_GetProperty(nGraph, "end", "0"));
+
+  s=GWEN_XMLNode_GetProperty(nGraph, "lowerLimit", NULL);
+  if (s && *s) {
+    if (1==sscanf(s, "%lf", &lowerLimit))
+      tickFlags|=AQDG_TIMEGRAPH_SETUPTICKS_FLAGS_MINY;
+    else {
+      DBG_ERROR(NULL, "Ignoring invalid lowerLimit (%s)", s);
+    }
+  }
+
+  s=GWEN_XMLNode_GetProperty(nGraph, "upperLimit", NULL);
+  if (s && *s) {
+    if (1==sscanf(s, "%lf", &upperLimit))
+      tickFlags|=AQDG_TIMEGRAPH_SETUPTICKS_FLAGS_MAXY;
+    else {
+      DBG_ERROR(NULL, "Ignoring invalid upperLimit (%s)", s);
+    }
+  }
+
+  g=AQDG_TimeGraph_new(sTitle, NULL, "Value", NULL, precision);
+  _addCurves(dc, g, nGraph, tsBegin, tsEnd);
+  AQDG_TimeGraph_SetupTicks(g, tickFlags, lowerLimit, upperLimit);
+
+  DBG_DEBUG(NULL, "Draw graph for %s", sGraphId);
+  drawContext=AQDG_Draw_ContextCairo_Png_new(sFilename, w, h);
+  graphObject=AQDG_GraphWidget_new(NULL, AQDG_OBJECT_OPTIONS_STRETCHX | AQDG_OBJECT_OPTIONS_STRETCHY, drawContext);
+  AQDG_Object_SetWidth(graphObject, w);
+  AQDG_Object_SetHeight(graphObject, h);
+
+  AQDG_GraphWidget_SetupDefaultPens(graphObject);
+  AQDG_GraphWidget_SetupDefaultFonts(graphObject);
+
+  AQDG_GraphWidget_FinishWithGraph(graphObject, g);
+
+  AQDG_Object_free(graphObject);
+}
+
+
+
+void _addCurves(AQH_DATACLIENT *dc, AQDG_GRAPH *g, GWEN_XMLNODE *nGraph, uint64_t tsBegin, uint64_t tsEnd)
+{
+  GWEN_XMLNODE *nCurve;
+
+  nCurve=GWEN_XMLNode_FindFirstTag(nGraph, "curve", NULL, NULL);
+  while(nCurve) {
+    const char *sModifier;
+
+    sModifier=GWEN_XMLNode_GetProperty(nCurve, "modifier", NULL);
+    if (sModifier && *sModifier) {
+      AQDG_GRAPH_DATAPAIR_LIST *dpList;
+
+      dpList=_readCurveData(dc, nCurve, tsBegin, tsEnd);
+      if (dpList) {
+	const char *sCurveLabel;
+
+	sCurveLabel=GWEN_XMLNode_GetProperty(nCurve, "title", NULL);
+	DBG_DEBUG(NULL, "Adding data for %s", sCurveLabel?sCurveLabel:"<no title>");
+	AQDG_TimeGraph_ModifyDataAndAddCurve(g, sCurveLabel?sCurveLabel:"<no title>", sModifier, dpList);
+      }
+    }
+    nCurve=GWEN_XMLNode_FindNextTag(nCurve, "curve", NULL, NULL);
+  }
+}
+
+
+
+AQDG_GRAPH_DATAPAIR_LIST *_readCurveData(AQH_DATACLIENT *dc, GWEN_XMLNODE *nCurve, uint64_t tsBegin, uint64_t tsEnd)
+{
+  const char *sDeviceName;
+  const char *sValueName;
+
+  sDeviceName=GWEN_XMLNode_GetProperty(nCurve, "device", NULL);
+  sValueName=GWEN_XMLNode_GetProperty(nCurve, "value", NULL);
+
+  if (sDeviceName && *sDeviceName && sValueName && *sValueName) {
+    AQDG_GRAPH_DATAPAIR_LIST *dpList;
+    GWEN_BUFFER *vbuf;
+
+    vbuf=GWEN_Buffer_new(0, 64, 0, 1);
+    GBAA(vbuf, "%s/%s", sDeviceName, sValueName);
+    dpList=AQH_ModDevices_RequestDataPairList(dc, GWEN_Buffer_GetStart(vbuf), tsBegin, tsEnd, 100000);
+    if (dpList) {
+      GWEN_Buffer_free(vbuf);
+      return dpList;
+    }
+    GWEN_Buffer_free(vbuf);
+  }
+  return NULL;
+}
+
+
+
+// TODO: move to aqhome.{c,h}
+uint64_t _parseTime(const char *s)
+{
+  if (s && *s) {
+    if (*s=='-') {
+      uint64_t x=0;
+      uint64_t now=time(NULL);
+
+      s++;
+      while(*s && isdigit(*s)) {
+        unsigned int i;
+
+        i=*(s++)-'0';
+        x*=10;
+        x+=i;
+      }
+      if (*s) {
+        switch(*s) {
+        case 0:
+        case 'm': x*=60; break;
+        case 'h': x*=(60*60); break;
+        case 'd': x*=(60*60*24); break;
+        case 'w': x*=(60*60*24*7); break;
+        case 'M': x*=(60*60*24*30); break;
+        case 'y': x*=(60*60*24*365); break;
+        default:  break;
+        }
+      }
+      return (now-x);
+    }
+    if (*s=='@') {
+      int y, m, d, H, M, S;
+
+      if (6==sscanf(s+1, "%d/%d/%d-%d:%d:%d", &y, &m, &d, &H, &M, &S)) {
+        GWEN_TIMESTAMP *ts;
+        uint64_t x=0;
+
+        ts=GWEN_Timestamp_new(y, m, d, H, M, S);
+        x=GWEN_Timestamp_toTimeT(ts);
+        GWEN_Timestamp_free(ts);
+        return x;
+      }
+      else {
+        DBG_ERROR(NULL, "Invalid timespec [%s], expected: @YYYY/MM/DD-HH:MM:SS", s);
+        return (uint64_t) (-1);
+      }
+    }
+    else {
+      unsigned long int x;
+
+      if (1!=sscanf(s, "%lu", &x)) {
+        DBG_ERROR(NULL, "ERROR: Invalid timestamp");
+        return (uint64_t) (-1);
+      }
+      return (uint64_t) x;
+    }
+  }
+  return 0;
+}
+
+
+
+
+GWEN_XMLNODE *_getSubItemNode(GWEN_XMLNODE *nPage, const char *sId, const char *sElementName)
+{
+  GWEN_XMLNODE *nItem;
+
+  nItem=GWEN_XMLNode_FindFirstTag(nPage, "item", NULL, NULL);
+  while(nItem) {
+    GWEN_XMLNODE *nGraph;
+
+    nGraph=GWEN_XMLNode_FindFirstTag(nItem, sElementName, "id", sId);
+    if (nGraph)
+      return nGraph;
+    nItem=GWEN_XMLNode_FindNextTag(nItem, "item", NULL, NULL);
+  }
+
+  return NULL;
+}
+
+
+
+void _mkPathForGraph(AQH_MODULE *m, const char *sGraphId, GWEN_BUFFER *buf)
+{
+  AQH_SERVICE *sv;
+  const char *s;
+
+  sv=AQH_ModService_GetService(m);
+  s=AQH_Service_GetCacheFolder(sv);
+  GBAA(buf, "%s%s%s", s, GWEN_DIR_SEPARATOR_S, sGraphId);
+  AQH_ModService_EscapeToBuffer(s, buf);
+  GBAS(buf, ".png");
+}
+
+
+
+void _writePage(AQH_MODULE *m, AQH_DATACLIENT *dc, GWEN_XMLNODE *nPage, GWEN_BUFFER *dbuf)
+{
+  const char *sPageId;
+  GWEN_XMLNODE *nItem;
+  int layout;
+  const char *s;
+
+  sPageId=GWEN_XMLNode_GetProperty(nPage, "id", NULL);
+
+  /* title */
+  s=GWEN_XMLNode_GetProperty(nPage, "title", NULL);
+  if (s && *s)
+    GBAA(dbuf, "<h1>%s</h1>\n", s);
+
+  layout=_layoutFromString(GWEN_XMLNode_GetProperty(nPage, "layout", "none"));
+  if (layout!=MY_LAYOUT_NONE)
+    GBAS(dbuf, "<table class=\"pageTable\">\n");
+  if (layout==MY_LAYOUT_HORIZONTAL)
+    GBAS(dbuf, "<tr>\n");
+  nItem=GWEN_XMLNode_FindFirstTag(nPage, "item", NULL, NULL);
+  while(nItem) {
+    if (layout==MY_LAYOUT_VERTICAL)
+      GBAS(dbuf, "<tr>\n");
+
+    if (layout!=MY_LAYOUT_NONE)
+      GBAS(dbuf, "<td>");
+    _writeItem(m, dc, sPageId, nItem, dbuf);
+    if (layout!=MY_LAYOUT_NONE)
+      GBAS(dbuf, "</td>");
+
+    if (layout==MY_LAYOUT_VERTICAL)
+      GBAS(dbuf, "</tr>\n");
+    nItem=GWEN_XMLNode_FindNextTag(nItem, "item", NULL, NULL);
+  } /* while */
+  if (layout==MY_LAYOUT_HORIZONTAL)
+    GBAS(dbuf, "</tr>\n");
+  if (layout!=MY_LAYOUT_NONE)
+    GBAS(dbuf, "</table> <!-- pageTable -->\n");
+}
+
+
+
+void _writeItem(AQH_MODULE *m, AQH_DATACLIENT *dc, const char *sPageId, GWEN_XMLNODE *nItem, GWEN_BUFFER *dbuf)
+{
+  GWEN_XMLNODE *n;
+  uint32_t perms;
+  int layout;
+
+  perms=AQH_ModService_GetUserPerms(m);
+  layout=_layoutFromString(GWEN_XMLNode_GetProperty(nItem, "layout", "none"));
+  if (layout!=MY_LAYOUT_NONE)
+    GBAS(dbuf, "<table class=\"itemTable\">\n");
+  if (layout==MY_LAYOUT_HORIZONTAL)
+    GBAS(dbuf, "<tr>\n");
+  n=GWEN_XMLNode_GetFirstTag(nItem);
+  while(n) {
+    const char *sName;
+
+    if (layout==MY_LAYOUT_VERTICAL)
+      GBAS(dbuf, "<tr>\n");
+    sName=GWEN_XMLNode_GetData(n);
+    if (sName && *sName) {
+      if (strcasecmp(sName, "actor")==0) {
+	if (perms && AQH_MODDEVICES_PERMS_VALUEWRITE)
+	  _writeActor(dc, sPageId, n, layout, dbuf);
+	else {
+	  DBG_ERROR(NULL, "No permissions to write values");
+	}
+
+      }
+      else if (strcasecmp(sName, "graph")==0)
+	_writeGraph(sPageId, n, layout, dbuf);
+      else {
+	DBG_ERROR(NULL, "Ignoring element \"%s\"", sName);
+      }
+    }
+    if (layout==MY_LAYOUT_VERTICAL)
+      GBAS(dbuf, "</tr>\n");
+    n=GWEN_XMLNode_GetNextTag(n);
+  }
+  if (layout==MY_LAYOUT_HORIZONTAL)
+    GBAS(dbuf, "</tr>\n");
+  if (layout!=MY_LAYOUT_NONE)
+    GBAS(dbuf, "</table>  <!-- itemTable -->\n");
+}
+
+
+
+void _writeActor(AQH_DATACLIENT *dc, const char *sPageId, GWEN_XMLNODE *n, int layout, GWEN_BUFFER *dbuf)
+{
+  const char *sActorId;
+  const char *sDeviceName;
+  const char *sValueName;
+  const char *sLabel;
+
+  sActorId=GWEN_XMLNode_GetProperty(n, "id", NULL);
+  sLabel=GWEN_XMLNode_GetProperty(n, "label", NULL);
+  sDeviceName=GWEN_XMLNode_GetProperty(n, "device", NULL);
+  sValueName=GWEN_XMLNode_GetProperty(n, "value", NULL);
+  if (sActorId && *sActorId && sDeviceName && *sDeviceName && sValueName && *sValueName) {
+    AQH_VALUE *value;
+
+    value=AQH_ModDevices_GetValueForDevice(dc, sDeviceName, sValueName);
+    if (value) {
+      uint32_t lastData;
+
+      if (layout!=MY_LAYOUT_NONE)
+	GBAS(dbuf, "<td>\n");
+      lastData=AQH_ModDevices_ValueGetLastDataAsUint32(dc, value, 0);
+      GBAS(dbuf,"<form action=\"page.html\" method=\"post\">\n");
+      GBAA(dbuf, "<input type=\"hidden\" name=\"page\"   value=\"%s\">\n", sPageId);
+      GBAA(dbuf, "<input type=\"hidden\" name=\"actor\"  value=\"%s\">\n", sActorId);
+
+      DBG_INFO(NULL, "Adding actor");
+      if (sLabel && *sLabel)
+	GBAA(dbuf,"<label for=\"%s\">%s</label>", sActorId, sLabel);
+      if (layout!=MY_LAYOUT_NONE) {
+	GBAS(dbuf, "</td>\n");
+	GBAS(dbuf, "<td>\n");
+      }
+      switch(AQH_Value_GetModality(value)) {
+      case AQH_ValueModality_RGBW:      _writeRgbwToForm(sActorId, lastData, dbuf);      break;
+      case AQH_ValueModality_OnOff:     _writeOnOffToForm(sActorId, lastData, dbuf);     break;
+      case AQH_ValueModality_OnOffAuto: _writeOnOffAutoToForm(sActorId, lastData, dbuf); break;
+      default:                          GBAA(dbuf, "%d", lastData);                      break;
+      } /* switch */
+      if (layout!=MY_LAYOUT_NONE) {
+	GBAS(dbuf, "</td>\n");
+	GBAS(dbuf, "<td>\n");
+      }
+      GBAS(dbuf,"<input type=\"submit\" name=\"action\" value=\"Send\"/>");
+      GBAS(dbuf, "</form>\n\n");
+      if (layout!=MY_LAYOUT_NONE)
+	GBAS(dbuf, "</td>\n");
+    }
+  }
+}
+
+
+
+void _writeGraph(const char *sPageId, GWEN_XMLNODE *n, int layout, GWEN_BUFFER *dbuf)
+{
+  const char *sGraphId;
+  int w;
+  int h;
+
+  w=GWEN_XMLNode_GetIntProperty(n, "width", AQH_MODDEVICES_GRAPH_WIDTH);
+  h=GWEN_XMLNode_GetIntProperty(n, "height", AQH_MODDEVICES_GRAPH_HEIGHT);
+  sGraphId=GWEN_XMLNode_GetProperty(n, "id", NULL);
+  if (layout!=MY_LAYOUT_NONE)
+    GBAS(dbuf, "<td colspan=\"3\">\n");
+  if (sGraphId && *sGraphId)
+    _addGraphLink(sPageId, sGraphId, w, h, dbuf);
+  if (layout!=MY_LAYOUT_NONE)
+    GBAS(dbuf, "</td>\n");
+}
+
+
+
+
+void _addGraphLink(const char *sPageId, const char *sGraphId, int w, int h, GWEN_BUFFER *dbuf)
+{
+  GBAS(dbuf, "<img src=\"pgraph.html?page=");
+  AQH_ModService_EscapeToBuffer(sPageId, dbuf);
+  GBAS(dbuf, "&graph=");
+  AQH_ModService_EscapeToBuffer(sGraphId, dbuf);
+  GBAA(dbuf, "\" alt=\"%s\" width=\"%d\" height=\"%d\"", sGraphId, w, h);
+  GBAS(dbuf, "/>");
+}
+
+
+
+
+
+
+
+void _writeRgbwToForm(const char *sValueName, uint32_t color, GWEN_BUFFER *dbuf)
+{
+#if 1
+  DBG_ERROR(NULL, "Color=%08x (%d, %d, %d, %d)",
+	    color,
+	    AQH_ModDevices_RgbwGetR(color),
+	    AQH_ModDevices_RgbwGetG(color),
+	    AQH_ModDevices_RgbwGetB(color),
+	    AQH_ModDevices_RgbwGetW(color));
+  GBAA(dbuf, "<label for=\"%s_r\">R:</label>", sValueName);
+  GBAA(dbuf, "<input type=\"number\" min=\"0\" max=\"255\" name=\"%s_r\" id=name=\"%s_r\" value=\"%d\">",
+       sValueName, sValueName, AQH_ModDevices_RgbwGetR(color));
+
+  GBAA(dbuf, "<label for=\"%s_g\">G:</label>", sValueName);
+  GBAA(dbuf, "<input type=\"number\" min=\"0\" max=\"255\" name=\"%s_g\" id=name=\"%s_g\" value=\"%d\">",
+       sValueName, sValueName, AQH_ModDevices_RgbwGetG(color));
+
+  GBAA(dbuf, "<label for=\"%s_b\">B:</label>", sValueName);
+  GBAA(dbuf, "<input type=\"number\" min=\"0\" max=\"255\" name=\"%s_b\" id=name=\"%s_b\" value=\"%d\">",
+       sValueName, sValueName, AQH_ModDevices_RgbwGetB(color));
+
+  GBAA(dbuf, "<label for=\"%s_w\">W:</label>", sValueName);
+  GBAA(dbuf, "<input type=\"number\" min=\"0\" max=\"255\" name=\"%s_w\" id=name=\"%s_w\" value=\"%d\">",
+       sValueName, sValueName, AQH_ModDevices_RgbwGetW(color));
+
+#else
+  GBAA(dbuf, "<input type=\"text\" name=\"%s\" id=\"%s\" value=\"#%08x\"/>", sValueName, sValueName, color);
+  // else
+  GBAA(dbuf, "<input type=\"color\" name=\"%s\" id=\"%s\" value=\"#%08x\"/>#%08x (#%08x)",
+       sValueName, sValueName,
+       AQH_ModDevices_RgbwToHtmlColor(color),
+       AQH_ModDevices_RgbwToHtmlColor(color),
+       color);
+#endif
+}
+
+
+
+void _setRgbwData(AQH_DATACLIENT *dc, GWEN_DB_NODE *dbPost, const char *sValueName, const AQH_VALUE *value)
+{
+  const char *sValueSystemName;
+  uint32_t color;
+  int rv;
+
+  sValueSystemName=AQH_Value_GetNameForSystem(value);
+  DBG_INFO(NULL, "Set value %s", sValueName);
+  color=AQH_ModDevices_RgbwFromComponents(_getColorComponent(dbPost, sValueName, "r", 0),
+					  _getColorComponent(dbPost, sValueName, "g", 0),
+					  _getColorComponent(dbPost, sValueName, "b", 0),
+					  _getColorComponent(dbPost, sValueName, "w", 0));
+  DBG_INFO(NULL, "Send value [#%08x] to %s", color, sValueSystemName);
+  rv=AQH_DataClient_SetData(dc, value, (double) color);
+  if (rv<0) {
+    DBG_INFO(NULL, "Error sending data: %d", rv);
+  }
+}
+
+
+
+int _getColorComponent(GWEN_DB_NODE *dbPost, const char *sValueName, const char *sComponent, int defaultValue)
+{
+  GWEN_BUFFER *buf;
+  const char *sData;
+  int result;
+
+  buf=GWEN_Buffer_new(0, 64, 0, 1);
+  GBAA(buf, "%s_%s", sValueName, sComponent);
+  DBG_INFO(NULL, "Read value %s", GWEN_Buffer_GetStart(buf));
+  sData=GWEN_DB_GetCharValue(dbPost, GWEN_Buffer_GetStart(buf), 0, NULL);
+  GWEN_Buffer_free(buf);
+  if (sData) {
+    if (1==sscanf(sData, "%u", &result))
+      return result;
+  }
+  return defaultValue;
+}
+
+
+
+void _writeOnOffToForm(const char *sValueName, int intVal, GWEN_BUFFER *dbuf)
+{
+  GBAA(dbuf, "<select name=\"%s\" id=\"%s\">" "<option value=\"unchanged\" >unchanged</option>", sValueName, sValueName);
+  GBAA(dbuf, "<option value=\"off\" %s>off</option>", (intVal==0)?"selected":"");
+  GBAA(dbuf, "<option value=\"on\" %s>on</option>", (intVal==1)?"selected":"");
+  GBAS(dbuf, "</select>");
+}
+
+
+
+void _setOnOffData(AQH_DATACLIENT *dc, const AQH_VALUE *value, const char *sValue)
+{
+  if (sValue) {
+    const char *sValueSystemName;
+    int rv;
+
+    sValueSystemName=AQH_Value_GetNameForSystem(value);
+    if (strcasecmp(sValue, "unchanged")==0) {
+      DBG_INFO(NULL, "Value %s unchanged", sValueSystemName);
+    }
+    else if (strcasecmp(sValue, "on")==0) {
+      DBG_INFO(NULL, "Send value 1 to %s", sValueSystemName);
+      rv=AQH_DataClient_SetData(dc, value, 1.0);
+      if (rv<0) {
+        DBG_INFO(NULL, "Error sending data: %d", rv);
+      }
+    }
+    else if (strcasecmp(sValue, "off")==0) {
+      DBG_INFO(NULL, "Send value 0 to %s", sValueSystemName);
+      rv=AQH_DataClient_SetData(dc, value, 0.0);
+      if (rv<0) {
+        DBG_INFO(NULL, "Error sending data: %d", rv);
+      }
+    }
+    else {
+    }
+  }
+}
+
+
+
+void _writeOnOffAutoToForm(const char *sValueName, int intVal, GWEN_BUFFER *dbuf)
+{
+  GBAA(dbuf, "<select name=\"%s\" id=\"%s\" >" "<option value=\"unchanged\" >unchanged</option>", sValueName, sValueName);
+  GBAA(dbuf, "<option value=\"off\" %s>off</option>", (intVal==0)?"selected":"");
+  GBAA(dbuf, "<option value=\"on\" %s>on</option>", (intVal==1)?"selected":"");
+  GBAA(dbuf, "<option value=\"auto\" %s>auto</option>", (intVal==2)?"selected":"");
+  GBAS(dbuf, "</select>");
+}
+
+
+
+void _setOnOffAutoData(AQH_DATACLIENT *dc, const AQH_VALUE *value, const char *sValue)
+{
+  if (sValue) {
+    const char *sValueSystemName;
+    int rv;
+
+    sValueSystemName=AQH_Value_GetNameForSystem(value);
+    if (strcasecmp(sValue, "unchanged")==0) {
+      DBG_INFO(NULL, "Value %s unchanged", sValueSystemName);
+    }
+    else if (strcasecmp(sValue, "on")==0) {
+      DBG_INFO(NULL, "Send value 1 to %s", sValueSystemName);
+      rv=AQH_DataClient_SetData(dc, value, 1.0);
+      if (rv<0) {
+        DBG_INFO(NULL, "Error sending data: %d", rv);
+      }
+    }
+    else if (strcasecmp(sValue, "off")==0) {
+      DBG_INFO(NULL, "Send value 0 to %s", sValueSystemName);
+      rv=AQH_DataClient_SetData(dc, value, 0.0);
+      if (rv<0) {
+        DBG_INFO(NULL, "Error sending data: %d", rv);
+      }
+    }
+    else if (strcasecmp(sValue, "auto")==0) {
+      DBG_INFO(NULL, "Send value 2 to %s", sValueSystemName);
+      rv=AQH_DataClient_SetData(dc, value, 2.0);
+      if (rv<0) {
+        DBG_INFO(NULL, "Error sending data: %d", rv);
+      }
+    }
+    else {
+      DBG_INFO(NULL, "Invalid value [%s] for %s", sValue, sValueSystemName);
+    }
+  }
+}
+
+
+
+void _sendPageList(AQH_MODULE *m, GWEN_BUFFER *dbuf)
+{
+  GWEN_STRINGLIST *sl;
+
+  GBAS(dbuf, "<h1>Page List</h1>\n");
+  sl=_listPageFiles(m);
+  if (sl) {
+    GWEN_STRINGLISTENTRY *se;
+
+    GBAS(dbuf,
+	 "<table class=\"datatable\">\n"
+	 "<thead><tr><th>Page</th><th>Title</th></tr></thead>\n"
+	 "<tbody>\n");
+    se=GWEN_StringList_FirstEntry(sl);
+    while(se) {
+      const char *filename;
+
+      filename=GWEN_StringListEntry_Data(se);
+      if (filename && *filename) {
+	GWEN_XMLNODE *node;
+
+	DBG_ERROR(NULL, "Reading file \"%s\"", filename);
+	node=_readPageFile(filename);
+	if (node) {
+	  GWEN_XMLNODE *nPage;
+
+	  nPage=GWEN_XMLNode_FindFirstTag(node, "page", NULL, NULL);
+	  if (nPage) {
+	    const char *sId;
+	    const char *sTitle;
+
+	    sId=GWEN_XMLNode_GetProperty(nPage, "id", NULL);
+	    sTitle=GWEN_XMLNode_GetProperty(nPage, "title", sId);
+	    if (sId && *sId)
+	      GBAA(dbuf, "<tr><td><a href=\"page.html?page=%s\">%s</a></td><td>%s</td></tr>\n", sId, sId, sTitle);
+	  }
+	  GWEN_XMLNode_free(node);
+	}
+      }
+      se=GWEN_StringListEntry_Next(se);
+    }
+    GBAS(dbuf, "</tbody></table>");
+    GWEN_StringList_free(sl);
+  }
+  else {
+    GBAS(dbuf, "No pages.");
+  }
+}
+
+
+
+GWEN_STRINGLIST *_listPageFiles(AQH_MODULE *m)
+{
+  GWEN_BUFFER *fbuf;
+  AQH_SERVICE *sv;
+  GWEN_STRINGLIST *sl;
+  int rv;
+
+  sv=AQH_ModService_GetService(m);
+  fbuf=GWEN_Buffer_new(0, 256, 0, 1);
+  GBAA(fbuf, "%s%spages", AQH_Service_GetRuntimeFolder(sv), GWEN_DIR_SEPARATOR_S);
+  sl=GWEN_StringList_new();
+  rv=GWEN_Directory_GetMatchingFilesRecursively(GWEN_Buffer_GetStart(fbuf), sl, "*.xml");
+  if (rv<0) {
+    DBG_INFO(NULL, "Error reading pages (%d)", rv);
+    GWEN_StringList_free(sl);
+    GWEN_Buffer_free(fbuf);
+    return NULL;
+  }
+  if (GWEN_StringList_Count(sl)<1) {
+    GWEN_StringList_free(sl);
+    GWEN_Buffer_free(fbuf);
+    return NULL;
+  }
+  GWEN_Buffer_free(fbuf);
+
+  return sl;
+}
+
+
+
+GWEN_XMLNODE *_readPage(AQH_MODULE *m, const char *sPageName)
+{
+  GWEN_BUFFER *fbuf;
+  AQH_SERVICE *sv;
+  GWEN_XMLNODE *fileNode;
+
+  sv=AQH_ModService_GetService(m);
+  fbuf=GWEN_Buffer_new(0, 256, 0, 1);
+  GBAA(fbuf, "%s%spages%s", AQH_Service_GetRuntimeFolder(sv), GWEN_DIR_SEPARATOR_S, GWEN_DIR_SEPARATOR_S);
+  AQH_ModService_EscapeToBuffer(sPageName, fbuf);
+  GBAS(fbuf, ".xml");
+
+  fileNode=_readPageFile(GWEN_Buffer_GetStart(fbuf));
+  if (fileNode==NULL) {
+    DBG_INFO(NULL, "here");
+    GWEN_Buffer_free(fbuf);
+    return NULL;
+  }
+
+  GWEN_Buffer_free(fbuf);
+  return fileNode;
+}
+
+
+
+GWEN_XMLNODE *_readPageFile(const char *sFilename)
+{
+  GWEN_XMLNODE *fileNode;
+  int rv;
+
+  fileNode=GWEN_XMLNode_new(GWEN_XMLNodeTypeTag, sFilename);
+  rv=GWEN_XML_ReadFile(fileNode, sFilename, GWEN_XML_FLAGS_DEFAULT);
+  if (rv<0) {
+    DBG_ERROR(NULL, "Error reading \"%s\": %s (%d)", sFilename?sFilename:"<no name>", strerror(errno), errno);
+    GWEN_XMLNode_free(fileNode);
+    return NULL;
+  }
+
+  return fileNode;
+}
+
+
+
+int _layoutFromString(const char *s)
+{
+  if (s && *s) {
+    if (strcasecmp(s, "none")==0)
+      return MY_LAYOUT_NONE;
+    else if (strcasecmp(s, "horizontal")==0)
+      return MY_LAYOUT_HORIZONTAL;
+    else if (strcasecmp(s, "vertical")==0)
+      return MY_LAYOUT_VERTICAL;
+  }
+  return MY_LAYOUT_NONE;
+}
+
+
+
+

apps/aqhome-cgi/modules/devices/mdevices_page.h

@@ -0,0 +1,29 @@
+/****************************************************************************
+ * This file is part of the project AqHome.
+ * AqHome (c) by 2025 Martin Preuss, all rights reserved.
+ *
+ * The license for this file can be found in the file COPYING which you
+ * should have received along with this file.
+ ****************************************************************************/
+
+#ifndef AQHOME_CGI_MDEVICES_PAGE_H
+#define AQHOME_CGI_MDEVICES_PAGE_H
+
+
+#include "aqhome-cgi/modules/devices/mdevices.h"
+
+#include "aqhome/aqhome.h"
+#include "aqhome/dataclient/client.h"
+
+#include <aqcgi/request.h>
+
+#include <gwenhywfar/buffer.h>
+
+
+
+void AQH_ModDevices_RunPageGet(AQH_MODULE *m, AQCGI_REQUEST *rq, AQH_SESSION *session, AQH_DATACLIENT *dc, GWEN_BUFFER *dbuf);
+void AQH_ModDevices_RunPagePost(AQH_MODULE *m, AQCGI_REQUEST *rq, AQH_SESSION *session, AQH_DATACLIENT *dc, GWEN_BUFFER *dbuf);
+void AQH_ModDevices_RunPageGraph(AQH_MODULE *m, AQCGI_REQUEST *rq, AQH_SESSION *session, AQH_DATACLIENT *dc, GWEN_BUFFER *dbuf);
+
+
+#endif

apps/aqhome-cgi/modules/devices/mdevices_setdata.c

@@ -0,0 +1,194 @@
+/****************************************************************************
+ * This file is part of the project AqHome.
+ * AqHome (c) by 2025 Martin Preuss, all rights reserved.
+ *
+ * The license for this file can be found in the file COPYING which you
+ * should have received along with this file.
+ ****************************************************************************/
+
+#ifdef HAVE_CONFIG_H
+# include <config.h>
+#endif
+
+
+#include "./mdevices_setdata.h"
+
+#include "aqhome-cgi/service/module.h"
+#include "aqhome-cgi/modules/mdataclient.h"
+
+#include <gwenhywfar/debug.h>
+#include <gwenhywfar/timestamp.h>
+#include <gwenhywfar/text.h>
+
+
+/* ------------------------------------------------------------------------------------------------
+ * defs and enums
+ * ------------------------------------------------------------------------------------------------
+ */
+
+#define GBAS GWEN_Buffer_AppendString
+#define GBAA GWEN_Buffer_AppendArgs
+
+
+
+/* ------------------------------------------------------------------------------------------------
+ * forward declarations
+ * ------------------------------------------------------------------------------------------------
+ */
+
+static void _setRgbwData(AQH_DATACLIENT *dc, const AQH_VALUE *value, const char *sValue);
+static void _setOnOffData(AQH_DATACLIENT *dc, const AQH_VALUE *value, const char *sValue);
+static void _setOnOffAutoData(AQH_DATACLIENT *dc, const AQH_VALUE *value, const char *sValue);
+
+
+
+/* ------------------------------------------------------------------------------------------------
+ * code
+ * ------------------------------------------------------------------------------------------------
+ */
+
+void AQH_ModDevices_RunSetData(AQH_MODULE *m, AQCGI_REQUEST *rq, AQH_SESSION *session, AQH_DATACLIENT *dc, GWEN_BUFFER *dbuf)
+{
+  AQH_SERVICE *sv;
+  GWEN_DB_NODE *dbPost;
+  const char *sDeviceName;
+  const char *sValueName;
+  const AQH_VALUE *value;
+
+  /* sample data */
+  sv=AQH_ModService_GetService(m);
+  dbPost=AQCGI_Request_GetDbPostBody(rq);
+  sDeviceName=dbPost?GWEN_DB_GetCharValue(dbPost, "device", 0, NULL):NULL;
+  sValueName=dbPost?GWEN_DB_GetCharValue(dbPost, "value", 0, NULL):NULL;
+  DBG_ERROR(NULL, "Device=[%s], value=[%s]", sDeviceName?sDeviceName:"", sValueName?sValueName:"");
+
+  value=AQH_ModDevices_GetValueForDevice(dc, sDeviceName, sValueName);
+  if(value && AQH_Value_GetValueType(value)==AQH_ValueType_Actor) {
+    const char *sValueName;
+    const char *sValue;
+
+    sValueName=AQH_Value_GetName(value);
+    sValue=GWEN_DB_GetCharValue(dbPost, sValueName, 0, NULL);
+    if (sValueName && *sValueName) {
+      DBG_ERROR(NULL, "Setting value %s to %s", sValueName?sValueName:"no name", sValue?sValue:"no value");
+      switch(AQH_Value_GetModality(value)) {
+      case AQH_ValueModality_RGBW:      _setRgbwData(dc, value, sValue);      break;
+      case AQH_ValueModality_OnOff:     _setOnOffData(dc, value, sValue);     break;
+      case AQH_ValueModality_OnOffAuto: _setOnOffAutoData(dc, value, sValue); break;
+      default:
+        break;
+      } /* switch */
+    } /* if (sValueName) */
+  }
+
+  if (sDeviceName && *sDeviceName) {
+    GWEN_BUFFER *pbuf;
+
+    pbuf=GWEN_Buffer_new(0, 256, 0, 1);
+    if (sValueName && *sValueName) {
+      GBAS(pbuf, "Location: value.html?device=");
+      GWEN_Text_EscapeToBuffer(sDeviceName, pbuf);
+      GBAS(pbuf, "&value=");
+      GWEN_Text_EscapeToBuffer(sValueName, pbuf);
+    }
+    else {
+      GBAS(pbuf, "Location: values.html?device=");
+      GWEN_Text_EscapeToBuffer(sDeviceName, pbuf);
+    }
+    AQCGI_Request_AddResponseHeaderData(rq, GWEN_Buffer_GetStart(pbuf));
+    GWEN_Buffer_free(pbuf);
+  }
+  AQCGI_Request_SetResponseCode(rq, 303);
+  AQCGI_Request_SetResponseText(rq, "See other");
+}
+
+
+
+void _setRgbwData(AQH_DATACLIENT *dc, const AQH_VALUE *value, const char *sValue)
+{
+  if (sValue) {
+    const char *sValueSystemName;
+    uint32_t color;
+    int rv;
+
+    sValueSystemName=AQH_Value_GetNameForSystem(value);
+    color=AQH_ModDevices_ColorFromHexString(sValue);
+    DBG_ERROR(NULL, "Send value [#%08x] to %s", color, sValueSystemName);
+    rv=AQH_DataClient_SetData(dc, value, (double) color);
+    if (rv<0) {
+      DBG_ERROR(NULL, "Error sending data: %d", rv);
+    }
+  }
+}
+
+
+
+void _setOnOffData(AQH_DATACLIENT *dc, const AQH_VALUE *value, const char *sValue)
+{
+  if (sValue) {
+    const char *sValueSystemName;
+    int rv;
+
+    sValueSystemName=AQH_Value_GetNameForSystem(value);
+    if (strcasecmp(sValue, "unchanged")==0) {
+      DBG_ERROR(NULL, "Value %s unchanged", sValueSystemName);
+    }
+    else if (strcasecmp(sValue, "on")==0) {
+      DBG_ERROR(NULL, "Send value 1 to %s", sValueSystemName);
+      rv=AQH_DataClient_SetData(dc, value, 1.0);
+      if (rv<0) {
+        DBG_ERROR(NULL, "Error sending data: %d", rv);
+      }
+    }
+    else if (strcasecmp(sValue, "off")==0) {
+      DBG_ERROR(NULL, "Send value 0 to %s", sValueSystemName);
+      rv=AQH_DataClient_SetData(dc, value, 0.0);
+      if (rv<0) {
+        DBG_ERROR(NULL, "Error sending data: %d", rv);
+      }
+    }
+    else {
+    }
+  }
+}
+
+
+
+void _setOnOffAutoData(AQH_DATACLIENT *dc, const AQH_VALUE *value, const char *sValue)
+{
+  if (sValue) {
+    const char *sValueSystemName;
+    int rv;
+
+    sValueSystemName=AQH_Value_GetNameForSystem(value);
+    if (strcasecmp(sValue, "unchanged")==0) {
+      DBG_ERROR(NULL, "Value %s unchanged", sValueSystemName);
+    }
+    else if (strcasecmp(sValue, "on")==0) {
+      DBG_ERROR(NULL, "Send value 1 to %s", sValueSystemName);
+      rv=AQH_DataClient_SetData(dc, value, 1.0);
+      if (rv<0) {
+        DBG_ERROR(NULL, "Error sending data: %d", rv);
+      }
+    }
+    else if (strcasecmp(sValue, "off")==0) {
+      DBG_ERROR(NULL, "Send value 0 to %s", sValueSystemName);
+      rv=AQH_DataClient_SetData(dc, value, 0.0);
+      if (rv<0) {
+        DBG_ERROR(NULL, "Error sending data: %d", rv);
+      }
+    }
+    else if (strcasecmp(sValue, "auto")==0) {
+      DBG_ERROR(NULL, "Send value 2 to %s", sValueSystemName);
+      rv=AQH_DataClient_SetData(dc, value, 2.0);
+      if (rv<0) {
+        DBG_ERROR(NULL, "Error sending data: %d", rv);
+      }
+    }
+    else {
+      DBG_ERROR(NULL, "Invalid value [%s] for %s", sValue, sValueSystemName);
+    }
+  }
+}
+
+

apps/aqhome-cgi/modules/devices/mdevices_setdata.h

@@ -0,0 +1,27 @@
+/****************************************************************************
+ * This file is part of the project AqHome.
+ * AqHome (c) by 2025 Martin Preuss, all rights reserved.
+ *
+ * The license for this file can be found in the file COPYING which you
+ * should have received along with this file.
+ ****************************************************************************/
+
+#ifndef AQHOME_CGI_MDEVICES_SETVALUE_H
+#define AQHOME_CGI_MDEVICES_SETVALUE_H
+
+
+#include "aqhome-cgi/modules/devices/mdevices.h"
+
+#include "aqhome/aqhome.h"
+#include "aqhome/dataclient/client.h"
+
+#include <aqcgi/request.h>
+
+#include <gwenhywfar/buffer.h>
+
+
+
+void AQH_ModDevices_RunSetData(AQH_MODULE *m, AQCGI_REQUEST *rq, AQH_SESSION *session, AQH_DATACLIENT *dc, GWEN_BUFFER *dbuf);
+
+
+#endif

apps/aqhome-cgi/modules/devices/mdevices_setdevice.c

@@ -0,0 +1,105 @@
+/****************************************************************************
+ * This file is part of the project AqHome.
+ * AqHome (c) by 2025 Martin Preuss, all rights reserved.
+ *
+ * The license for this file can be found in the file COPYING which you
+ * should have received along with this file.
+ ****************************************************************************/
+
+#ifdef HAVE_CONFIG_H
+# include <config.h>
+#endif
+
+
+#include "./mdevices_setdevice.h"
+
+#include "aqhome-cgi/service/module.h"
+#include "aqhome-cgi/modules/mdataclient.h"
+
+#include <gwenhywfar/debug.h>
+#include <gwenhywfar/timestamp.h>
+#include <gwenhywfar/text.h>
+
+
+/* ------------------------------------------------------------------------------------------------
+ * defs and enums
+ * ------------------------------------------------------------------------------------------------
+ */
+
+#define GBAS GWEN_Buffer_AppendString
+#define GBAA GWEN_Buffer_AppendArgs
+
+
+
+/* ------------------------------------------------------------------------------------------------
+ * forward declarations
+ * ------------------------------------------------------------------------------------------------
+ */
+
+static void _handleDeviceForm(AQH_DATACLIENT *dc, AQH_DEVICE *device, GWEN_DB_NODE *dbPost, GWEN_BUFFER *dbuf);
+
+
+
+/* ------------------------------------------------------------------------------------------------
+ * code
+ * ------------------------------------------------------------------------------------------------
+ */
+
+void AQH_ModDevices_RunSetDevice(AQH_MODULE *m, AQCGI_REQUEST *rq, AQH_SESSION *session, AQH_DATACLIENT *dc, GWEN_BUFFER *dbuf)
+{
+  AQH_SERVICE *sv;
+  GWEN_DB_NODE *dbPost;
+  const char *sDeviceName;
+  AQH_DEVICE *device;
+
+  DBG_ERROR(NULL, "Post device.html");
+  /* sample data */
+  sv=AQH_ModService_GetService(m);
+  dbPost=AQCGI_Request_GetDbPostBody(rq);
+  sDeviceName=dbPost?GWEN_DB_GetCharValue(dbPost, "device", 0, NULL):NULL;
+  DBG_ERROR(NULL, "Device=[%s]", sDeviceName?sDeviceName:"");
+
+  device=AQH_ModDevices_GetDevice(dc, sDeviceName);
+  if (device) {
+    int rv;
+
+    DBG_ERROR(NULL, "Reading data from form");
+    _handleDeviceForm(dc, device, dbPost, dbuf);
+    DBG_ERROR(NULL, "Updating device on server");
+    rv=AQH_DataClient_ModDevice(dc, device);
+    if (rv<0) {
+      DBG_ERROR(NULL, "here (%d)", rv);
+    }
+    AQH_Device_free(device);
+  }
+  else {
+    DBG_ERROR(NULL, "device not found");
+  }
+
+  if (sDeviceName && *sDeviceName) {
+    GWEN_BUFFER *pbuf;
+
+    pbuf=GWEN_Buffer_new(0, 256, 0, 1);
+    GBAS(pbuf, "Location: device.html?device=");
+    GWEN_Text_EscapeToBuffer(sDeviceName, pbuf);
+    AQCGI_Request_AddResponseHeaderData(rq, GWEN_Buffer_GetStart(pbuf));
+    GWEN_Buffer_free(pbuf);
+  }
+  AQCGI_Request_SetResponseCode(rq, 303);
+  AQCGI_Request_SetResponseText(rq, "See other");
+}
+
+
+
+void _handleDeviceForm(AQH_DATACLIENT *dc, AQH_DEVICE *device, GWEN_DB_NODE *dbPost, GWEN_BUFFER *dbuf)
+{
+  AQH_Device_SetRoomName(device, GWEN_DB_GetCharValue(dbPost, "roomName", 0, NULL));
+  AQH_Device_SetNameForGui(device, GWEN_DB_GetCharValue(dbPost, "nameForGui", 0, NULL));
+  AQH_Device_SetLocation(device, GWEN_DB_GetCharValue(dbPost, "location", 0, NULL));
+  AQH_Device_SetDescription(device, GWEN_DB_GetCharValue(dbPost, "description", 0, NULL));
+}
+
+
+
+
+

apps/aqhome-cgi/modules/devices/mdevices_setdevice.h

@@ -0,0 +1,27 @@
+/****************************************************************************
+ * This file is part of the project AqHome.
+ * AqHome (c) by 2025 Martin Preuss, all rights reserved.
+ *
+ * The license for this file can be found in the file COPYING which you
+ * should have received along with this file.
+ ****************************************************************************/
+
+#ifndef AQHOME_CGI_MDEVICES_SETDEVICE_H
+#define AQHOME_CGI_MDEVICES_SETDEVICE_H
+
+
+#include "aqhome-cgi/modules/devices/mdevices.h"
+
+#include "aqhome/aqhome.h"
+#include "aqhome/dataclient/client.h"
+
+#include <aqcgi/request.h>
+
+#include <gwenhywfar/buffer.h>
+
+
+
+void AQH_ModDevices_RunSetDevice(AQH_MODULE *m, AQCGI_REQUEST *rq, AQH_SESSION *session, AQH_DATACLIENT *dc, GWEN_BUFFER *dbuf);
+
+
+#endif

apps/aqhome-cgi/modules/devices/mdevices_value.c

@@ -0,0 +1,245 @@
+/****************************************************************************
+ * This file is part of the project AqHome.
+ * AqHome (c) by 2025 Martin Preuss, all rights reserved.
+ *
+ * The license for this file can be found in the file COPYING which you
+ * should have received along with this file.
+ ****************************************************************************/
+
+#ifdef HAVE_CONFIG_H
+# include <config.h>
+#endif
+
+
+#include "./mdevices_value.h"
+
+#include "aqhome-cgi/service/module.h"
+#include "aqhome-cgi/modules/mdataclient.h"
+
+#include <gwenhywfar/debug.h>
+#include <gwenhywfar/timestamp.h>
+#include <gwenhywfar/text.h>
+
+
+/* ------------------------------------------------------------------------------------------------
+ * defs and enums
+ * ------------------------------------------------------------------------------------------------
+ */
+
+#define GBAS GWEN_Buffer_AppendString
+#define GBAA GWEN_Buffer_AppendArgs
+
+
+
+/* ------------------------------------------------------------------------------------------------
+ * forward declarations
+ * ------------------------------------------------------------------------------------------------
+ */
+
+static void _runValueWithArgs(AQH_MODULE *m,
+                              AQCGI_REQUEST *rq,
+                              AQH_SESSION *session,
+                              AQH_DATACLIENT *dc,
+                              const char *sDeviceName,
+                              const char *sValueName,
+                              GWEN_BUFFER *dbuf);
+static void _mkValueForm(AQH_DATACLIENT *dc, const char *sDeviceName, const AQH_VALUE *value, GWEN_BUFFER *dbuf);
+static void _writeRgbwToForm(const char *sValueName, uint32_t color, GWEN_BUFFER *dbuf);
+static void _writeOnOffToForm(const char *sValueName, int intVal, GWEN_BUFFER *dbuf);
+static void _writeOnOffAutoToForm(const char *sValueName, int intVal, GWEN_BUFFER *dbuf);
+
+
+
+/* ------------------------------------------------------------------------------------------------
+ * code
+ * ------------------------------------------------------------------------------------------------
+ */
+
+void AQH_ModDevices_RunValue(AQH_MODULE *m, AQCGI_REQUEST *rq, AQH_SESSION *session, AQH_DATACLIENT *dc, GWEN_BUFFER *dbuf)
+{
+  GWEN_DB_NODE *dbQuery;
+  const char *sDeviceName;
+  const char *sValueName;
+
+  DBG_ERROR(NULL, "RunValue");
+  dbQuery=AQCGI_Request_GetDbQuery(rq);
+  sDeviceName=GWEN_DB_GetCharValue(dbQuery, "device", 0, NULL);
+  sValueName=GWEN_DB_GetCharValue(dbQuery, "value", 0, NULL);
+  if (sDeviceName && *sDeviceName && sValueName && *sValueName) {
+    GWEN_BUFFER *bufDeviceName;
+    GWEN_BUFFER *bufValueName;
+
+    bufDeviceName=GWEN_Buffer_new(0, 64, 0, 1);
+    GWEN_Text_UnescapeToBufferTolerant(sDeviceName, bufDeviceName);
+    bufValueName=GWEN_Buffer_new(0, 64, 0, 1);
+    GWEN_Text_UnescapeToBufferTolerant(sValueName, bufValueName);
+    _runValueWithArgs(m, rq, session, dc,
+                      GWEN_Buffer_GetStart(bufDeviceName),
+                      GWEN_Buffer_GetStart(bufValueName),
+                      dbuf);
+    GWEN_Buffer_free(bufValueName);
+    GWEN_Buffer_free(bufDeviceName);
+  }
+
+#if 0
+  if (sDeviceName && *sDeviceName && sValueName && *sValueName) {
+    GWEN_BUFFER *pbuf;
+
+    pbuf=GWEN_Buffer_new(0, 256, 0, 1);
+    GBAS(pbuf, "Location: /aqbt/devices/value.html?device=");
+    GWEN_Text_EscapeToBufferTolerant(sDeviceName, pbuf);
+    GBAS(pbuf, "&value=");
+    GWEN_Text_EscapeToBufferTolerant(sValueName, pbuf);
+    AQCGI_Request_AddResponseHeaderData(rq, GWEN_Buffer_GetStart(pbuf));
+    GWEN_Buffer_free(pbuf);
+  }
+  AQCGI_Request_SetResponseCode(rq, 303);
+  AQCGI_Request_SetResponseText(rq, "See other");
+#endif
+}
+
+
+
+void _runValueWithArgs(AQH_MODULE *m,
+                       AQCGI_REQUEST *rq,
+                       AQH_SESSION *session,
+                       AQH_DATACLIENT *dc,
+                       const char *sDeviceName,
+                       const char *sValueName,
+                       GWEN_BUFFER *dbuf)
+{
+  GWEN_DB_NODE *dbQuery;
+  AQH_VALUE_LIST *valueList;
+
+  dbQuery=AQCGI_Request_GetDbQuery(rq);
+  DBG_ERROR(NULL, "Device=%s, value=%s", sDeviceName?sDeviceName:"<empty>", sValueName?sValueName:"<empty>");
+
+  GBAA(dbuf,"<h1>Value %s/%s</h1>\n", sDeviceName, sValueName);
+
+  valueList=AQH_DataClient_GetValues(dc, sDeviceName, 0);
+  if (valueList) {
+    const AQH_VALUE *value;
+
+    value=AQH_Value_List_First(valueList);
+    while(value) {
+      const char *s;
+
+      s=AQH_Value_GetName(value);
+      if (s && *s && strcasecmp(s, sValueName)==0)
+        break;
+      value=AQH_Value_List_Next(value);
+    }
+    if (value && AQH_Value_GetValueType(value)==AQH_ValueType_Actor) {
+      _mkValueForm(dc, sDeviceName, value, dbuf);
+    }
+    else {
+      GBAS(dbuf, "<table>\n");
+      GBAS(dbuf, "<tr><td>");
+      GBAS(dbuf, "<img src=\"graph.html?device=");
+      GWEN_Text_EscapeToBufferTolerant(sDeviceName, dbuf);
+      GBAS(dbuf, "&value=");
+      GWEN_Text_EscapeToBufferTolerant(sValueName, dbuf);
+      GBAS(dbuf, "&period=4h\"/>");
+      GBAS(dbuf, "</td></tr>");
+
+      GBAS(dbuf, "<tr><td>");
+      GBAS(dbuf, "<img src=\"graph.html?device=");
+      GWEN_Text_EscapeToBufferTolerant(sDeviceName, dbuf);
+      GBAS(dbuf, "&value=");
+      GWEN_Text_EscapeToBufferTolerant(sValueName, dbuf);
+      GBAS(dbuf, "&period=1d\"/>");
+      GBAS(dbuf, "</td></tr>");
+
+      GBAS(dbuf, "<tr><td>");
+      GBAS(dbuf, "<img src=\"graph.html?device=");
+      GWEN_Text_EscapeToBufferTolerant(sDeviceName, dbuf);
+      GBAS(dbuf, "&value=");
+      GWEN_Text_EscapeToBufferTolerant(sValueName, dbuf);
+      GBAS(dbuf, "&period=1w\"/>");
+      GBAS(dbuf, "</td></tr>");
+
+      GBAS(dbuf, "</table>");
+    }
+    AQH_Value_List_free(valueList);
+  }
+}
+
+
+
+void _mkValueForm(AQH_DATACLIENT *dc, const char *sDeviceName, const AQH_VALUE *value, GWEN_BUFFER *dbuf)
+{
+  const char *sValueSystemName;
+  const char *sValueName;
+  uint64_t dataPoints[2];
+  uint64_t recvdNum;
+  //  uint64_t timestamp;
+  union {double f; uint64_t i;} u;
+  int intVal;
+
+  sValueSystemName=AQH_Value_GetNameForSystem(value);
+  sValueName=AQH_Value_GetName(value);
+  recvdNum=AQH_DataClient_GetLastData(dc, sValueSystemName, &dataPoints[0], 1);
+  if (recvdNum>0) {
+    //    timestamp=dataPoints[0];
+    u.i=dataPoints[1];
+    intVal=(int) u.f;
+  }
+  else {
+    u.i=0;
+    intVal=-1;
+  }
+
+  GBAS(dbuf,"<form action=\"setdata.html\" method=\"post\">\n");
+  GBAA(dbuf, "<input type=\"hidden\" name=\"device\" value=\"%s\">\n", sDeviceName);
+  GBAA(dbuf, "<input type=\"hidden\" name=\"value\"  value=\"%s\">\n", sValueName);
+
+  DBG_ERROR(NULL, "Adding actor");
+  switch(AQH_Value_GetModality(value)) {
+  case AQH_ValueModality_RGBW:      _writeRgbwToForm(sValueName, u.f, dbuf);         break;
+  case AQH_ValueModality_OnOff:     _writeOnOffToForm(sValueName, intVal, dbuf);     break;
+  case AQH_ValueModality_OnOffAuto: _writeOnOffAutoToForm(sValueName, intVal, dbuf); break;
+  default:                          GBAA(dbuf, "%.2f", u.f);                         break;
+  } /* switch */
+
+  GBAS(dbuf,"<input type=\"submit\" name=\"action\" value=\"Send\"/>");
+  GBAS(dbuf, "</form>\n\n");
+}
+
+
+
+void _writeRgbwToForm(const char *sValueName, uint32_t color, GWEN_BUFFER *dbuf)
+{
+#if 1
+  GBAA(dbuf, "<input type=\"text\" name=\"%s\" value=\"#%08x\"/>", sValueName, color);
+#else
+  GBAA(dbuf, "<input type=\"color\" name=\"%s\" value=\"#%08x\"/>#%08x (#%08x)",
+       sValueName,
+       AQH_ModDevices_RgbwToHtmlColor(color),
+       AQH_ModDevices_RgbwToHtmlColor(color),
+       color);
+#endif
+}
+
+
+
+void _writeOnOffToForm(const char *sValueName, int intVal, GWEN_BUFFER *dbuf)
+{
+  GBAA(dbuf, "<select name=\"%s\">" "<option value=\"unchanged\" >unchanged</option>", sValueName);
+  GBAA(dbuf, "<option value=\"off\" %s>off</option>", (intVal==0)?"selected":"");
+  GBAA(dbuf, "<option value=\"on\" %s>on</option>", (intVal==1)?"selected":"");
+  GBAS(dbuf, "</select>");
+}
+
+
+
+void _writeOnOffAutoToForm(const char *sValueName, int intVal, GWEN_BUFFER *dbuf)
+{
+  GBAA(dbuf, "<select name=\"%s\">" "<option value=\"unchanged\" >unchanged</option>", sValueName);
+  GBAA(dbuf, "<option value=\"off\" %s>off</option>", (intVal==0)?"selected":"");
+  GBAA(dbuf, "<option value=\"on\" %s>on</option>", (intVal==1)?"selected":"");
+  GBAA(dbuf, "<option value=\"auto\" %s>auto</option>", (intVal==2)?"selected":"");
+  GBAS(dbuf, "</select>");
+}
+
+
+

apps/aqhome-cgi/modules/devices/mdevices_value.h

@@ -0,0 +1,27 @@
+/****************************************************************************
+ * This file is part of the project AqHome.
+ * AqHome (c) by 2025 Martin Preuss, all rights reserved.
+ *
+ * The license for this file can be found in the file COPYING which you
+ * should have received along with this file.
+ ****************************************************************************/
+
+#ifndef AQHOME_CGI_MDEVICES_VALUE_H
+#define AQHOME_CGI_MDEVICES_VALUE_H
+
+
+#include "aqhome-cgi/modules/devices/mdevices.h"
+
+#include "aqhome/aqhome.h"
+#include "aqhome/dataclient/client.h"
+
+#include <aqcgi/request.h>
+
+#include <gwenhywfar/buffer.h>
+
+
+
+void AQH_ModDevices_RunValue(AQH_MODULE *m, AQCGI_REQUEST *rq, AQH_SESSION *session, AQH_DATACLIENT *dc, GWEN_BUFFER *dbuf);
+
+
+#endif

apps/aqhome-cgi/modules/devices/mdevices_valuesgraph.c

@@ -0,0 +1,175 @@
+/****************************************************************************
+ * This file is part of the project AqHome.
+ * AqHome (c) by 2025 Martin Preuss, all rights reserved.
+ *
+ * The license for this file can be found in the file COPYING which you
+ * should have received along with this file.
+ ****************************************************************************/
+
+#ifdef HAVE_CONFIG_H
+# include <config.h>
+#endif
+
+
+#include "./mdevices_valuesgraph.h"
+#include "./mdevices_index.h"
+
+#include "aqhome-cgi/service/module.h"
+#include "aqhome-cgi/modules/mdataclient.h"
+
+#include <gwenhywfar/debug.h>
+#include <gwenhywfar/timestamp.h>
+#include <gwenhywfar/text.h>
+
+
+/* ------------------------------------------------------------------------------------------------
+ * defs and enums
+ * ------------------------------------------------------------------------------------------------
+ */
+
+#define GBAS GWEN_Buffer_AppendString
+#define GBAA GWEN_Buffer_AppendArgs
+
+
+
+/* ------------------------------------------------------------------------------------------------
+ * forward declarations
+ * ------------------------------------------------------------------------------------------------
+ */
+
+static void _writeValueToDetailedTable(const char *sDeviceName, const AQH_VALUE *value, GWEN_BUFFER *dbuf);
+static void _writeValueListToTable(const char *sDeviceName, const AQH_VALUE_LIST *valueList, GWEN_BUFFER *dbuf);
+static void _writeValueToTable(const char *sDeviceName, const AQH_VALUE *value, GWEN_BUFFER *dbuf);
+static void _addGraphLink(const char *sDeviceName, const char *sValueName, const char *sPeriod, GWEN_BUFFER *dbuf, int withLink);
+
+
+
+/* ------------------------------------------------------------------------------------------------
+ * code
+ * ------------------------------------------------------------------------------------------------
+ */
+
+void AQH_ModDevices_RunValuesAsGraph(AQH_MODULE *m, AQCGI_REQUEST *rq, AQH_SESSION *session, AQH_DATACLIENT *dc, GWEN_BUFFER *dbuf)
+{
+  GWEN_DB_NODE *dbQuery;
+  const char *sDeviceName;
+
+  dbQuery=AQCGI_Request_GetDbQuery(rq);
+  sDeviceName=GWEN_DB_GetCharValue(dbQuery, "device", 0, NULL);
+  if (!(sDeviceName && *sDeviceName))
+    AQH_ModDevices_RunIndex(m, rq, session, dc, dbuf);
+  else {
+    const char *sValueName;
+
+    sValueName=GWEN_DB_GetCharValue(dbQuery, "value", 0, NULL);
+    if (sValueName && *sValueName) {
+      AQH_VALUE *value;
+
+      GBAA(dbuf,"<h1>Value %s/%s</h1>\n", sDeviceName, sValueName);
+      value=AQH_ModDevices_GetValueForDevice(dc, sDeviceName, sValueName);
+      if (value) {
+        _writeValueToDetailedTable(sDeviceName, value, dbuf);
+        AQH_Value_free(value);
+        AQCGI_Request_AddResponseHeaderData(rq, "Refresh: 120");
+      }
+    }
+    else {
+      AQH_VALUE_LIST *valueList;
+
+      valueList=AQH_DataClient_GetValues(dc, sDeviceName, 0);
+      if (valueList && AQH_Value_List_GetCount(valueList)) {
+
+        GBAA(dbuf,"<h1>Values for Device %s</h1>\n", sDeviceName);
+        _writeValueListToTable(sDeviceName, valueList, dbuf);
+        GBAS(dbuf, "\n");
+      }
+      else {
+        GBAS(dbuf,"<p>No values.</p>\n");
+      }
+      AQH_Value_List_free(valueList);
+      AQCGI_Request_AddResponseHeaderData(rq, "Refresh: 305");
+    }
+  }
+}
+
+
+
+void _writeValueToDetailedTable(const char *sDeviceName, const AQH_VALUE *value, GWEN_BUFFER *dbuf)
+{
+  const char *sValueName;
+
+  GBAS(dbuf, "<table>\n");
+  sValueName=AQH_Value_GetName(value);
+
+  GBAS(dbuf, "<tr><td>");
+  _addGraphLink(sDeviceName, sValueName, "4h", dbuf, 0);
+  GBAS(dbuf, "</td><td>");
+  _addGraphLink(sDeviceName, sValueName, "1d", dbuf, 0);
+  GBAS(dbuf, "</td></tr><tr><td>");
+  _addGraphLink(sDeviceName, sValueName, "1w", dbuf, 0);
+  GBAS(dbuf, "</td><td>");
+  _addGraphLink(sDeviceName, sValueName, "12m", dbuf, 0);
+  GBAS(dbuf, "</td></tr>\n");
+}
+
+
+
+void _writeValueListToTable(const char *sDeviceName, const AQH_VALUE_LIST *valueList, GWEN_BUFFER *dbuf)
+{
+  const AQH_VALUE *value;
+
+  GBAS(dbuf, "<table>\n");
+
+
+  value=AQH_Value_List_First(valueList);
+  while(value) {
+    if (AQH_Value_GetValueType(value)!=AQH_ValueType_Actor)
+      _writeValueToTable(sDeviceName, value, dbuf);
+    value=AQH_Value_List_Next(value);
+  }
+  GBAS(dbuf, "</table>\n");
+}
+
+
+
+void _writeValueToTable(const char *sDeviceName, const AQH_VALUE *value, GWEN_BUFFER *dbuf)
+{
+  const char *sValueName;
+  
+  /* name */
+  sValueName=AQH_Value_GetName(value);
+
+  GBAS(dbuf, "<tr><td>");
+  _addGraphLink(sDeviceName, sValueName, "1d", dbuf, 1);
+  GBAS(dbuf, "</td><td>");
+  _addGraphLink(sDeviceName, sValueName, "1w", dbuf, 1);
+  GBAS(dbuf, "</td></tr>\n");
+}
+
+
+
+void _addGraphLink(const char *sDeviceName, const char *sValueName, const char *sPeriod, GWEN_BUFFER *dbuf, int withLink)
+{
+  if (withLink) {
+    GBAS(dbuf, "<a href=\"vgraph.html?device=");
+    GWEN_Text_EscapeToBufferTolerant(sDeviceName, dbuf);
+    GBAS(dbuf, "&value=");
+    GWEN_Text_EscapeToBufferTolerant(sValueName, dbuf);
+    GBAS(dbuf, "\">");
+  }
+
+  GBAS(dbuf, "<img src=\"graph.html?device=");
+  GWEN_Text_EscapeToBufferTolerant(sDeviceName, dbuf);
+  GBAS(dbuf, "&value=");
+  GWEN_Text_EscapeToBufferTolerant(sValueName, dbuf);
+  GBAA(dbuf, "&period=%s\"", sPeriod);
+  GBAA(dbuf, " alt=\"%s\" width=\"%d\" height=\"%d\"", sValueName, AQH_MODDEVICES_GRAPH_WIDTH, AQH_MODDEVICES_GRAPH_HEIGHT);
+  GBAS(dbuf, "/>");
+
+  if (withLink) {
+    GBAS(dbuf, "</a>");
+  }
+}
+
+
+

apps/aqhome-cgi/modules/devices/mdevices_valuesgraph.h

@@ -0,0 +1,27 @@
+/****************************************************************************
+ * This file is part of the project AqHome.
+ * AqHome (c) by 2025 Martin Preuss, all rights reserved.
+ *
+ * The license for this file can be found in the file COPYING which you
+ * should have received along with this file.
+ ****************************************************************************/
+
+#ifndef AQHOME_CGI_MDEVICES_VALUESGRAPH_H
+#define AQHOME_CGI_MDEVICES_VALUESGRAPH_H
+
+
+#include "aqhome-cgi/modules/devices/mdevices.h"
+
+#include "aqhome/aqhome.h"
+#include "aqhome/dataclient/client.h"
+
+#include <aqcgi/request.h>
+
+#include <gwenhywfar/buffer.h>
+
+
+
+void AQH_ModDevices_RunValuesAsGraph(AQH_MODULE *m, AQCGI_REQUEST *rq, AQH_SESSION *session, AQH_DATACLIENT *dc, GWEN_BUFFER *dbuf);
+
+
+#endif

apps/aqhome-cgi/modules/devices/mdevices_valuestable.c

@@ -0,0 +1,145 @@
+/****************************************************************************
+ * This file is part of the project AqHome.
+ * AqHome (c) by 2025 Martin Preuss, all rights reserved.
+ *
+ * The license for this file can be found in the file COPYING which you
+ * should have received along with this file.
+ ****************************************************************************/
+
+#ifdef HAVE_CONFIG_H
+# include <config.h>
+#endif
+
+
+#include "./mdevices_valuestable.h"
+#include "./mdevices_index.h"
+
+#include "aqhome-cgi/service/module.h"
+#include "aqhome-cgi/modules/mdataclient.h"
+
+#include <gwenhywfar/debug.h>
+#include <gwenhywfar/timestamp.h>
+#include <gwenhywfar/text.h>
+
+
+/* ------------------------------------------------------------------------------------------------
+ * defs and enums
+ * ------------------------------------------------------------------------------------------------
+ */
+
+#define GBAS GWEN_Buffer_AppendString
+#define GBAA GWEN_Buffer_AppendArgs
+
+
+
+/* ------------------------------------------------------------------------------------------------
+ * forward declarations
+ * ------------------------------------------------------------------------------------------------
+ */
+
+static void _writeValueListToTable(const char *sDeviceName, const AQH_VALUE_LIST *valueList, uint32_t perms, GWEN_BUFFER *dbuf);
+static void _writeValueToTable(const char *sDeviceName, const AQH_VALUE *value, uint32_t perms, GWEN_BUFFER *dbuf);
+
+
+
+/* ------------------------------------------------------------------------------------------------
+ * code
+ * ------------------------------------------------------------------------------------------------
+ */
+
+void AQH_ModDevices_RunValuesAsTable(AQH_MODULE *m, AQCGI_REQUEST *rq, AQH_SESSION *session, AQH_DATACLIENT *dc, GWEN_BUFFER *dbuf)
+{
+  GWEN_DB_NODE *dbQuery;
+  const char *sDeviceName;
+  uint32_t perms;
+
+  perms=AQH_ModService_GetUserPerms(m);
+
+  dbQuery=AQCGI_Request_GetDbQuery(rq);
+  sDeviceName=GWEN_DB_GetCharValue(dbQuery, "device", 0, NULL);
+  if (!(sDeviceName && *sDeviceName))
+    AQH_ModDevices_RunIndex(m, rq, session, dc, dbuf);
+  else {
+    AQH_VALUE_LIST *valueList;
+
+    valueList=AQH_DataClient_GetValues(dc, sDeviceName, 0);
+    if (valueList && AQH_Value_List_GetCount(valueList)) {
+
+      GBAA(dbuf,"<h1>Values for Device %s</h1>\n", sDeviceName);
+      _writeValueListToTable(sDeviceName, valueList, perms, dbuf);
+      GBAS(dbuf, "\n");
+    }
+    else {
+      GBAS(dbuf,"<p>No values.</p>\n");
+    }
+    AQH_Value_List_free(valueList);
+  }
+}
+
+
+
+void _writeValueListToTable(const char *sDeviceName, const AQH_VALUE_LIST *valueList, uint32_t perms, GWEN_BUFFER *dbuf)
+{
+  const AQH_VALUE *value;
+
+  GBAS(dbuf,
+       "<table class=\"datatable\">\n"
+       "<thead>"
+       "<tr>"
+       "<th>Name</th>"
+       "<th>Type</th>"
+       "<th>Modality</th>"
+#if 0
+       "<th>Driver</th>"
+       "<th>Device</th>"
+       "<th>Name for System</th>"
+#endif
+       "</tr>"
+       "</thead>\n"
+       "<tbody>\n");
+
+  value=AQH_Value_List_First(valueList);
+  while(value) {
+    //if (AQH_Value_GetModality(value)!=AQH_ValueModality_Stats)
+      _writeValueToTable(sDeviceName, value, perms, dbuf);
+    value=AQH_Value_List_Next(value);
+  }
+  GBAS(dbuf,
+       "</tbody>\n"
+       "</table>\n");
+}
+
+
+
+void _writeValueToTable(const char *sDeviceName, const AQH_VALUE *value, uint32_t perms, GWEN_BUFFER *dbuf)
+{
+  const char *s;
+  
+  GBAS(dbuf, "<tr>");
+
+  /* name for system */
+  s=AQH_Value_GetName(value);
+  if (perms & AQH_MODDEVICES_PERMS_VALUEREAD) {
+    uint32_t pos;
+
+    pos=GWEN_Buffer_GetPos(dbuf);
+    GBAS(dbuf,"<td><a href=\"value.html?device=");
+    GWEN_Text_EscapeToBuffer(sDeviceName, dbuf);
+    GBAS(dbuf,"&value=");
+    GWEN_Text_EscapeToBuffer(s, dbuf);
+    GBAA(dbuf,"\">%s</a></td>", s);
+  }
+  else
+    GBAA(dbuf,"<td>%s</td>", s?s:"");
+
+  s=AQH_ValueType_toString(AQH_Value_GetValueType(value));
+  GBAA(dbuf, "<td>%s</td>", s?s:"");
+  
+  s=AQH_ValueModality_toString(AQH_Value_GetModality(value));
+  GBAA(dbuf, "<td>%s</td>", s?s:"");
+  
+  GBAA(dbuf, "</tr>\n");
+}
+
+
+

apps/aqhome-cgi/modules/devices/mdevices_valuestable.h

@@ -0,0 +1,27 @@
+/****************************************************************************
+ * This file is part of the project AqHome.
+ * AqHome (c) by 2025 Martin Preuss, all rights reserved.
+ *
+ * The license for this file can be found in the file COPYING which you
+ * should have received along with this file.
+ ****************************************************************************/
+
+#ifndef AQHOME_CGI_MDEVICES_VALUESTABLE_H
+#define AQHOME_CGI_MDEVICES_VALUESTABLE_H
+
+
+#include "aqhome-cgi/modules/devices/mdevices.h"
+
+#include "aqhome/aqhome.h"
+#include "aqhome/dataclient/client.h"
+
+#include <aqcgi/request.h>
+
+#include <gwenhywfar/buffer.h>
+
+
+
+void AQH_ModDevices_RunValuesAsTable(AQH_MODULE *m, AQCGI_REQUEST *rq, AQH_SESSION *session, AQH_DATACLIENT *dc, GWEN_BUFFER *dbuf);
+
+
+#endif

apps/aqhome-cgi/modules/devices/mdevices_vgraph.c

@@ -0,0 +1,279 @@
+/****************************************************************************
+ * This file is part of the project AqHome.
+ * AqHome (c) by 2025 Martin Preuss, all rights reserved.
+ *
+ * The license for this file can be found in the file COPYING which you
+ * should have received along with this file.
+ ****************************************************************************/
+
+#ifdef HAVE_CONFIG_H
+# include <config.h>
+#endif
+
+
+#include "./mdevices_vgraph.h"
+
+#include "aqhome-cgi/service/module.h"
+#include "aqhome-cgi/modules/mdataclient.h"
+
+#include <aqdiagram/graph/timegraph.h>
+#include <aqdiagram/graph/w_graph.h>
+#include <aqdiagram/draw/context_cairo.h>
+//#include <aqdiagram/data/date.h>
+//#include <aqdiagram/data/floatingavg.h>
+
+#include <gwenhywfar/debug.h>
+#include <gwenhywfar/timestamp.h>
+#include <gwenhywfar/text.h>
+
+
+
+/* ------------------------------------------------------------------------------------------------
+ * defs and enums
+ * ------------------------------------------------------------------------------------------------
+ */
+
+#define GBAS GWEN_Buffer_AppendString
+#define GBAA GWEN_Buffer_AppendArgs
+
+
+
+/* ------------------------------------------------------------------------------------------------
+ * vars
+ * ------------------------------------------------------------------------------------------------
+ */
+
+typedef struct MY_GRAPH_PARAMS MY_GRAPH_PARAMS;
+struct MY_GRAPH_PARAMS {
+  const char *name;
+  const char *title;
+  const char *modifiers;
+  int startTimeDiff;
+  int acceptedAgeInSeconds;
+};
+
+
+
+static MY_GRAPH_PARAMS _graphParams[]={
+  {"4h", "last 4 hours",   "Lm5",    4*60*60,      2*60},
+  {"1d", "last 24 hours",  "Lm30",   24*60*60,     5*60},
+  {"1w", "last 7 days",    "Lm240",  7*24*60*60,   15*60},
+  {"1m", "last 30 days",   "Lm480",  30*24*60*60,  60*60},
+  {"6m", "last 6 months",  "Lm720",  182*24*60*60, 60*60},
+  {"12m","last 12 months", "Lm1440", 365*24*60*60, 60*60},
+  {NULL, NULL, NULL, 0, 0}
+};
+
+
+
+/* ------------------------------------------------------------------------------------------------
+ * forward declarations
+ * ------------------------------------------------------------------------------------------------
+ */
+
+static void _runGraphValueWithArgs(AQH_MODULE *m,
+                                   AQCGI_REQUEST *rq,
+                                   AQH_DATACLIENT *dc,
+                                   const char *sDeviceName,
+                                   const char *sValueName,
+                                   GWEN_BUFFER *dbuf);
+static void _createGraph(AQH_DATACLIENT *dc,
+                         const AQH_VALUE *v,
+                         const MY_GRAPH_PARAMS *graphParams,
+                         const char *graphTitle, int precision, const char *curveLabel,
+                         const char *sImgFile, int imgWidth, int imgHeight, uint64_t numDataPoints);
+static AQDG_GRAPH *_mkGraphObjectWithTitle(const char *graphTitle, const MY_GRAPH_PARAMS *graphParams, int precision);
+static void _mkPathForValueAndPeriod(AQH_MODULE *m, const AQH_VALUE *v, const MY_GRAPH_PARAMS *graphParams, GWEN_BUFFER *dbuf);
+static const MY_GRAPH_PARAMS *_getParamsByName(const char *s);
+
+
+
+/* ------------------------------------------------------------------------------------------------
+ * code
+ * ------------------------------------------------------------------------------------------------
+ */
+
+void AQH_ModDevices_RunGraphValue(AQH_MODULE *m, AQCGI_REQUEST *rq, AQH_SESSION *session, AQH_DATACLIENT *dc, GWEN_BUFFER *dbuf)
+{
+  GWEN_DB_NODE *dbQuery;
+  const char *sDeviceName;
+  const char *sValueName;
+
+  DBG_DEBUG(NULL, "GraphValue");
+  dbQuery=AQCGI_Request_GetDbQuery(rq);
+  sDeviceName=GWEN_DB_GetCharValue(dbQuery, "device", 0, NULL);
+  sValueName=GWEN_DB_GetCharValue(dbQuery, "value", 0, NULL);
+  DBG_DEBUG(NULL, "Device=%s, value=%s", sDeviceName?sDeviceName:"<empty>", sValueName?sValueName:"<empty>");
+  if (sDeviceName && *sDeviceName && sValueName && *sValueName) {
+    GWEN_BUFFER *bufDeviceName;
+    GWEN_BUFFER *bufValueName;
+
+    bufDeviceName=GWEN_Buffer_new(0, 64, 0, 1);
+    GWEN_Text_UnescapeToBufferTolerant(sDeviceName, bufDeviceName);
+    bufValueName=GWEN_Buffer_new(0, 64, 0, 1);
+    GWEN_Text_UnescapeToBufferTolerant(sValueName, bufValueName);
+    _runGraphValueWithArgs(m, rq, dc,
+                           GWEN_Buffer_GetStart(bufDeviceName),
+                           GWEN_Buffer_GetStart(bufValueName),
+                           dbuf);
+    GWEN_Buffer_free(bufValueName);
+    GWEN_Buffer_free(bufDeviceName);
+  }
+}
+
+
+
+void _runGraphValueWithArgs(AQH_MODULE *m,
+                            AQCGI_REQUEST *rq,
+                            AQH_DATACLIENT *dc,
+                            const char *sDeviceName,
+                            const char *sValueName,
+                            GWEN_BUFFER *dbuf)
+{
+  GWEN_DB_NODE *dbQuery;
+  AQH_VALUE *value;
+  const MY_GRAPH_PARAMS *graphParams;
+  const char *sPeriod;
+
+  DBG_DEBUG(NULL, "GraphValue with args");
+  dbQuery=AQCGI_Request_GetDbQuery(rq);
+  sPeriod=GWEN_DB_GetCharValue(dbQuery, "period", 0, NULL);
+  graphParams=_getParamsByName(sPeriod);
+  if (graphParams==NULL)
+    graphParams=&_graphParams[0];
+  DBG_DEBUG(NULL, "Device=%s, value=%s, period=%s",
+            sDeviceName?sDeviceName:"<empty>", sValueName?sValueName:"<empty>",
+            sPeriod?sPeriod:"<empty>");
+
+  value=AQH_ModDevices_GetValueForDevice(dc, sDeviceName, sValueName);
+  if (value) {
+    GWEN_BUFFER *fbuf;
+
+    fbuf=GWEN_Buffer_new(0, 256, 0, 1);
+    _mkPathForValueAndPeriod(m, value, graphParams, fbuf);
+    if (!AQH_ModService_FileIsCurrent(GWEN_Buffer_GetStart(fbuf), graphParams->acceptedAgeInSeconds)) {
+      DBG_DEBUG(NULL, "Creating graph");
+      _createGraph(dc,
+                   value,
+                   graphParams,
+                   sValueName,
+                   2,
+                   AQH_ValueModality_toString(AQH_Value_GetModality(value)),
+                   GWEN_Buffer_GetStart(fbuf),
+                   AQH_MODDEVICES_GRAPH_WIDTH, AQH_MODDEVICES_GRAPH_HEIGHT,
+                   100000);
+    }
+
+    AQH_ModService_RespondWithMimeFile(rq, GWEN_Buffer_GetStart(fbuf), "image/png", dbuf);
+
+    GWEN_Buffer_free(fbuf);
+    AQH_Value_free(value);
+  }
+  else {
+    DBG_ERROR(NULL, "Could not get value \"%s/%s\"", sDeviceName, sValueName);
+  }
+}
+
+
+
+
+void _createGraph(AQH_DATACLIENT *dc,
+                  const AQH_VALUE *v,
+                  const MY_GRAPH_PARAMS *graphParams,
+                  const char *graphTitle, int precision,
+                  const char *curveLabel,
+                  const char *sImgFile, int imgWidth, int imgHeight, uint64_t numDataPoints)
+{
+  const char *sValue;
+  AQDG_GRAPH *g;
+  AQDG_DRAW_CONTEXT *drawContext;
+  AQDG_OBJECT *graphObject;
+  uint64_t tsBegin;
+  uint64_t tsEnd;
+  AQDG_GRAPH_DATAPAIR_LIST *dpList;
+
+  sValue=AQH_Value_GetNameForSystem(v);
+  tsEnd=time(0);
+  tsBegin=time(0)-(graphParams->startTimeDiff);
+  g=_mkGraphObjectWithTitle(graphTitle, graphParams, precision);
+
+  dpList=AQH_ModDevices_RequestDataPairList(dc, sValue, tsBegin, tsEnd, numDataPoints);
+  if (dpList) {
+    DBG_DEBUG(NULL, "Adding data for %s", sValue);
+    AQDG_TimeGraph_ModifyDataAndAddCurve(g, curveLabel?curveLabel:sValue, graphParams->modifiers, dpList);
+  }
+  else {
+    DBG_ERROR(NULL, "No data for %s", sValue);
+    AQDG_Graph_free(g);
+    return;
+  }
+
+  AQDG_TimeGraph_SetupTicks(g, 0, 0.0, 0.0);
+
+  DBG_DEBUG(NULL, "Draw graph for %s", sValue);
+  drawContext=AQDG_Draw_ContextCairo_Png_new(sImgFile, imgWidth, imgHeight);
+  graphObject=AQDG_GraphWidget_new(NULL, AQDG_OBJECT_OPTIONS_STRETCHX | AQDG_OBJECT_OPTIONS_STRETCHY, drawContext);
+  AQDG_Object_SetWidth(graphObject, imgWidth);
+  AQDG_Object_SetHeight(graphObject, imgHeight);
+
+  AQDG_GraphWidget_SetupDefaultPens(graphObject);
+  AQDG_GraphWidget_SetupDefaultFonts(graphObject);
+
+  AQDG_GraphWidget_FinishWithGraph(graphObject, g);
+
+  AQDG_Object_free(graphObject);
+}
+
+
+
+AQDG_GRAPH *_mkGraphObjectWithTitle(const char *graphTitle, const MY_GRAPH_PARAMS *graphParams, int precision)
+{
+  AQDG_GRAPH *g;
+  GWEN_BUFFER *tbuf;
+
+  tbuf=GWEN_Buffer_new(0, 256, 0, 1);
+
+  GBAA(tbuf, "%s - %s", graphTitle, graphParams->title);
+
+  g=AQDG_TimeGraph_new(GWEN_Buffer_GetStart(tbuf), NULL, "Value", NULL, precision);
+  GWEN_Buffer_free(tbuf);
+  return g;
+}
+
+
+void _mkPathForValueAndPeriod(AQH_MODULE *m, const AQH_VALUE *v, const MY_GRAPH_PARAMS *graphParams, GWEN_BUFFER *dbuf)
+{
+  AQH_SERVICE *sv;
+  const char *s;
+
+  sv=AQH_ModService_GetService(m);
+
+  /* cache folder */
+  s=AQH_Service_GetCacheFolder(sv);
+  GBAA(dbuf, "%s%s", s, GWEN_DIR_SEPARATOR_S);
+
+  /* var name */
+  s=AQH_Value_GetNameForSystem(v);
+  AQH_ModService_EscapeToBuffer(s, dbuf);
+
+  GBAA(dbuf, "-%s.png", graphParams->name);
+}
+
+
+
+const MY_GRAPH_PARAMS *_getParamsByName(const char *s)
+{
+  const MY_GRAPH_PARAMS *p;
+
+  p=_graphParams;
+  while(p->name) {
+    if (strcasecmp(p->name, s)==0)
+      return p;
+    p++;
+  }
+
+  return NULL;
+}
+
+
+

apps/aqhome-cgi/modules/devices/mdevices_vgraph.h

@@ -0,0 +1,27 @@
+/****************************************************************************
+ * This file is part of the project AqHome.
+ * AqHome (c) by 2025 Martin Preuss, all rights reserved.
+ *
+ * The license for this file can be found in the file COPYING which you
+ * should have received along with this file.
+ ****************************************************************************/
+
+#ifndef AQHOME_CGI_MDEVICES_VGRAPH_H
+#define AQHOME_CGI_MDEVICES_VGRAPH_H
+
+
+#include "aqhome-cgi/modules/devices/mdevices.h"
+
+#include "aqhome/aqhome.h"
+#include "aqhome/dataclient/client.h"
+
+#include <aqcgi/request.h>
+
+#include <gwenhywfar/buffer.h>
+
+
+
+void AQH_ModDevices_RunGraphValue(AQH_MODULE *m, AQCGI_REQUEST *rq, AQH_SESSION *session, AQH_DATACLIENT *dc, GWEN_BUFFER *dbuf);
+
+
+#endif

apps/aqhome-cgi/modules/html/0BUILD

@@ -0,0 +1,12 @@
+<?xml?>
+
+<gwbuild>
+
+  <data dist="true" install="$(httpdatadir)/aqhome-cgi/html">
+    style.css
+  </data>
+
+  <subdirs>
+    pics
+  </subdirs>
+</gwbuild>

apps/aqhome-cgi/modules/html/pics/0BUILD

@@ -0,0 +1,17 @@
+<?xml?>
+
+<gwbuild>
+
+  <data dist="true" install="$(httpdatadir)/aqhome-cgi/html/pics">
+    cancel.png
+    document-table.png
+    edit.png
+    graph.png
+    minus.png
+    ok.png
+    plus.png
+    user-add.png
+    user-edit.png
+  </data>
+
+</gwbuild>

apps/aqhome-cgi/modules/html/style.css

@@ -0,0 +1,63 @@
+body {
+  background-color: whitesmoke;
+}
+
+table.datatable { 
+  border: thin solid; 
+  border-collapse: collapse;
+}
+
+
+table.datatable th, td { 
+  border: thin solid; 
+  border-collapse: collapse;
+  padding: 5px;
+}
+
+
+table.datatable tbody tr:nth-child(odd) {
+  background-color: #ffffff;
+}
+
+
+
+table.formtable { 
+  border: thin solid; 
+  border-collapse: collapse;
+}
+
+
+table.formtable th, td { 
+  border: thin solid; 
+  border-collapse: collapse;
+  padding: 5px;
+}
+
+
+
+ul.mainmenu {
+  list-style-type: none;
+  margin: 0;
+  padding: 0;
+  overflow: hidden;
+  background-color: #333333;
+}
+
+
+ul.mainmenu li {
+  float: left;
+}
+
+ul.mainmenu li a {
+  display: block;
+  color: white;
+  text-align: center;
+  padding: 14px 16px;
+  text-decoration: none;
+}
+
+ul.mainmenu li a:hover {
+  background-color: #111111;
+}
+
+

apps/aqhome-cgi/modules/mdataclient.c

@@ -0,0 +1,102 @@
+/****************************************************************************
+ * This file is part of the project AqHome.
+ * AqHome (c) by 2025 Martin Preuss, all rights reserved.
+ *
+ * The license for this file can be found in the file COPYING which you
+ * should have received along with this file.
+ ****************************************************************************/
+
+#ifdef HAVE_CONFIG_H
+# include <config.h>
+#endif
+
+
+#include "./mdataclient.h"
+
+#include "aqhome-cgi/service/module.h"
+
+#include "aqhome/msg/ipc/m_ipc.h"
+#include "aqhome/msg/ipc/data/m_ipcd.h"
+
+#include <gwenhywfar/debug.h>
+#include <gwenhywfar/timestamp.h>
+
+
+
+/* ------------------------------------------------------------------------------------------------
+ * defs and enums
+ * ------------------------------------------------------------------------------------------------
+ */
+
+/* ------------------------------------------------------------------------------------------------
+ * global vars
+ * ------------------------------------------------------------------------------------------------
+ */
+
+/* ------------------------------------------------------------------------------------------------
+ * forward declarations
+ * ------------------------------------------------------------------------------------------------
+ */
+
+/* ------------------------------------------------------------------------------------------------
+ * code
+ * ------------------------------------------------------------------------------------------------
+ */
+
+void AQH_ModDataClient_Extend(AQH_MODULE *m, AQH_SERVICE *sv, const char *baseFolder)
+{
+
+  AQH_ModService_Extend(m, sv, baseFolder);
+}
+
+
+
+void AQH_ModDataClient_HandleRequest(AQH_MODULE *m,
+                                     AQCGI_REQUEST *rq,
+                                     AQH_SESSION *session,
+                                     AQH_MODDATACLIENT_RUN_FN runFn,
+                                     GWEN_BUFFER *dbuf)
+{
+  AQH_EVENT_LOOP *eventLoop;
+  AQH_DATACLIENT *dc;
+  int rv;
+
+  rv=AQH_Init();
+  if (rv<0) {
+    DBG_ERROR(NULL, "here (%d)", rv);
+    AQCGI_Request_SetResponseCode(rq, 500);
+    AQCGI_Request_SetResponseText(rq, "Internal Error");
+    return;
+  }
+
+  eventLoop=AQH_EventLoop_new();
+  dc=AQH_DataClient_new(eventLoop, AQH_IPC_PROTOCOL_DATA_ID, AQH_IPC_PROTOCOL_DATA_VERSION);
+  rv=AQH_DataClient_ReadConfigFile(dc);
+  if (rv<0) {
+    DBG_ERROR(NULL, "here (%d)", rv);
+    AQCGI_Request_SetResponseCode(rq, 500);
+    AQCGI_Request_SetResponseText(rq, "Internal Error");
+    return;
+  }
+
+  rv=AQH_DataClient_ConnectWithArgs(dc, 0);
+  if (rv<0) {
+    DBG_ERROR(NULL, "Error connecting (%d)", rv);
+    AQH_DataClient_free(dc);
+    AQH_EventLoop_free(eventLoop);
+    AQCGI_Request_SetResponseCode(rq, 500);
+    AQCGI_Request_SetResponseText(rq, "Internal Error");
+    return;
+  }
+
+  if (runFn)
+    runFn(m, rq, session, dc, dbuf);
+
+  AQH_DataClient_free(dc);
+  AQH_EventLoop_free(eventLoop);
+
+  AQH_Fini();
+}
+
+
+

apps/aqhome-cgi/modules/mdataclient.h

@@ -0,0 +1,37 @@
+/****************************************************************************
+ * This file is part of the project AqHome.
+ * AqHome (c) by 2025 Martin Preuss, all rights reserved.
+ *
+ * The license for this file can be found in the file COPYING which you
+ * should have received along with this file.
+ ****************************************************************************/
+
+#ifndef AQHOME_CGI_MDATACLIENT_H
+#define AQHOME_CGI_MDATACLIENT_H
+
+#include <aqhome-cgi/modules/common/mservice.h>
+
+#include <aqcgi/request.h>
+
+#include "aqhome/aqhome.h"
+#include "aqhome/dataclient/client.h"
+
+#include <gwenhywfar/buffer.h>
+
+
+
+typedef void (*AQH_MODDATACLIENT_RUN_FN)(AQH_MODULE *m, AQCGI_REQUEST *rq, AQH_SESSION *session, AQH_DATACLIENT *dc, GWEN_BUFFER *dbuf);
+
+
+void AQH_ModDataClient_Extend(AQH_MODULE *m, AQH_SERVICE *sv, const char *baseFolder);
+void AQH_ModDataClient_HandleRequest(AQH_MODULE *m,
+                                     AQCGI_REQUEST *rq,
+                                     AQH_SESSION *session,
+                                     AQH_MODDATACLIENT_RUN_FN runFn,
+                                     GWEN_BUFFER *dbuf);
+
+
+
+
+#endif
+

apps/aqhome-cgi/modules/mroot.c

@@ -0,0 +1,326 @@
+/****************************************************************************
+ * This file is part of the project AqHome.
+ * AqHome (c) by 2025 Martin Preuss, all rights reserved.
+ *
+ * The license for this file can be found in the file COPYING which you
+ * should have received along with this file.
+ ****************************************************************************/
+
+#ifdef HAVE_CONFIG_H
+# include <config.h>
+#endif
+
+
+#include "./mroot_p.h"
+
+#include "aqhome-cgi/service/module.h"
+#include "aqhome-cgi/modules/devices/mdevices.h"
+#include "aqhome-cgi/modules/common/madmin.h"
+
+#include <gwenhywfar/debug.h>
+#include <gwenhywfar/timestamp.h>
+
+
+
+/* ------------------------------------------------------------------------------------------------
+ * defs and enums
+ * ------------------------------------------------------------------------------------------------
+ */
+
+/* ------------------------------------------------------------------------------------------------
+ * global vars
+ * ------------------------------------------------------------------------------------------------
+ */
+
+/* ------------------------------------------------------------------------------------------------
+ * forward declarations
+ * ------------------------------------------------------------------------------------------------
+ */
+
+static AQH_MODULE *_loadSubModule(AQH_MODULE *m, AQCGI_REQUEST *rq, AQH_SESSION *session, const char *sModuleName);
+static int _handleRequest(AQH_MODULE *m, AQCGI_REQUEST *rq, AQH_SESSION *session, const char *sLastPathElem);
+static int _handleRqIndex(AQH_MODULE *m, AQCGI_REQUEST *rq, GWEN_BUFFER *dbuf);
+static int _handleRqLogin(AQH_MODULE *m, AQCGI_REQUEST *rq, GWEN_BUFFER *dbuf);
+static int _handleRqLoginPost(AQH_MODULE *m, AQCGI_REQUEST *rq, GWEN_BUFFER *dbuf);
+static AQH_USER *_getAndCheckUser(AQH_MODULE *m, AQCGI_REQUEST *rq, GWEN_BUFFER *dbuf);
+
+
+/* ------------------------------------------------------------------------------------------------
+ * code
+ * ------------------------------------------------------------------------------------------------
+ */
+
+AQH_MODULE *AQH_ModRoot_new(AQH_SERVICE *sv, const char *baseFolder)
+{
+  AQH_MODULE *m;
+
+  m=AQH_Module_new();
+  AQH_ModService_Extend(m, sv, baseFolder);
+  AQH_ModService_SetHandleRequestFn(m, _handleRequest);
+  AQH_ModService_SetLoadSubModuleFn(m, _loadSubModule);
+
+  return m;
+}
+
+
+
+AQH_MODULE *_loadSubModule(AQH_MODULE *m, AQCGI_REQUEST *rq, AQH_SESSION *session, const char *sModuleName)
+{
+  AQH_SERVICE *sv;
+
+  sv=AQH_ModService_GetService(m);
+  if (strcasecmp(sModuleName, "devices")==0) {
+    AQH_MODULE *mSub;
+
+    mSub=AQH_Service_LoadModule(sv, sModuleName);
+    if (mSub) {
+      const char *s;
+      GWEN_BUFFER *nbuf;
+
+      nbuf=GWEN_Buffer_new(0, 256, 0, 1);
+      s=AQH_ModService_GetBaseFolder(m);
+      GWEN_Buffer_AppendArgs(nbuf, "%s/devices", s?s:".");
+
+      AQH_ModDevices_Extend(mSub, AQH_ModService_GetService(m), GWEN_Buffer_GetStart(nbuf));
+      AQH_Module_Tree2_AddChild(m, mSub);
+      GWEN_Buffer_free(nbuf);
+      return mSub;
+    }
+  }
+  else if (strcasecmp(sModuleName, "admin")==0) {
+    AQH_MODULE *mSub;
+
+    mSub=AQH_Service_LoadModule(sv, sModuleName);
+    if (mSub) {
+      const char *s;
+      GWEN_BUFFER *nbuf;
+
+      nbuf=GWEN_Buffer_new(0, 256, 0, 1);
+      s=AQH_ModService_GetBaseFolder(m);
+      GWEN_Buffer_AppendArgs(nbuf, "%s/admin", s?s:".");
+
+      AQH_ModAdmin_Extend(mSub, AQH_ModService_GetService(m), GWEN_Buffer_GetStart(nbuf));
+      AQH_Module_Tree2_AddChild(m, mSub);
+      GWEN_Buffer_free(nbuf);
+      return mSub;
+    }
+  }
+  return NULL;
+}
+
+
+
+int _handleRequest(AQH_MODULE *m, AQCGI_REQUEST *rq, AQH_SESSION *session, const char *sLastPathElem)
+{
+  GWEN_BUFFER *dbuf;
+
+  dbuf=GWEN_Buffer_new(0, 256, 0, 1);
+  AQH_ModService_AddHeader(m, "en", dbuf);
+
+  if (strcasecmp(sLastPathElem, "login")==0)
+    _handleRqLogin(m, rq, dbuf);
+  else if (strcasecmp(sLastPathElem, "signup")==0) {
+    AQCGI_Request_SetResponseCode(rq, 501);
+    AQCGI_Request_SetResponseText(rq, "Not Implemented");
+  }
+  else if (strcasecmp(sLastPathElem, "confirm")==0) {
+    AQCGI_Request_SetResponseCode(rq, 501);
+    AQCGI_Request_SetResponseText(rq, "Not Implemented");
+  }
+  else if (strcasecmp(sLastPathElem, "index.html")==0)
+    _handleRqIndex(m, rq, dbuf);
+  else {
+    AQCGI_Request_SetResponseCode(rq, 404);
+    AQCGI_Request_SetResponseText(rq, "Not Found");
+  }
+
+  AQH_ModService_AddFooter(m, "en", dbuf);
+  AQCGI_Request_SetBufferResponseBody(rq, dbuf);
+  AQCGI_Request_AddResponseHeaderData(rq, "Content-type: text/html");
+
+  return AQCGI_SendResponse(rq);
+}
+
+
+
+int _handleRqIndex(AQH_MODULE *m, AQCGI_REQUEST *rq, GWEN_BUFFER *dbuf)
+{
+  if (AQCGI_Request_GetRequestMethod(rq)==AQCGI_REQUEST_METHOD_GET)
+    return AQH_ModService_RespondWithFile(m, rq, "en", "index.html", dbuf);
+  else {
+    DBG_ERROR(NULL, "Invalid request method %d", AQCGI_Request_GetRequestMethod(rq));
+    AQCGI_Request_SetResponseCode(rq, 405);
+    AQCGI_Request_SetResponseText(rq, "Method Not Allowed");
+    return GWEN_ERROR_GENERIC;
+  }
+}
+
+
+
+int _handleRqLogin(AQH_MODULE *m, AQCGI_REQUEST *rq, GWEN_BUFFER *dbuf)
+{
+  if (AQCGI_Request_GetRequestMethod(rq)==AQCGI_REQUEST_METHOD_GET)
+    AQH_ModService_RespondWithFile(m, rq, "en", "login.html", dbuf);
+  else if (AQCGI_Request_GetRequestMethod(rq)==AQCGI_REQUEST_METHOD_POST)
+    _handleRqLoginPost(m, rq, dbuf);
+  else {
+    DBG_ERROR(NULL, "Invalid request method %d", AQCGI_Request_GetRequestMethod(rq));
+    AQCGI_Request_SetResponseCode(rq, 405);
+    AQCGI_Request_SetResponseText(rq, "Method Not Allowed");
+    return GWEN_ERROR_GENERIC;
+  }
+  return 0;
+}
+
+
+
+int _handleRqLoginPost(AQH_MODULE *m, AQCGI_REQUEST *rq, GWEN_BUFFER *dbuf)
+{
+  AQH_SERVICE *sv;
+  AQH_USER *user;
+  AQH_SESSION *session;
+  GWEN_BUFFER *tbuf;
+  GWEN_TIMESTAMP *ts;
+  int rv;
+
+  DBG_ERROR(NULL, "Handling request");
+  sv=AQH_ModService_GetService(m);
+  user=_getAndCheckUser(m, rq, dbuf);
+  if (user==NULL) {
+    DBG_INFO(NULL, "here");
+    AQCGI_Request_SetResponseCode(rq, 500);
+    AQCGI_Request_SetResponseText(rq, "Internal Error");
+    return GWEN_ERROR_GENERIC;
+  }
+
+  ts=GWEN_Timestamp_NowInLocalTime();
+  AQH_User_SetTimestampLastLogin(user, ts);
+  DBG_ERROR(NULL, "Saving user");
+  rv=AQH_Service_SaveUser(sv, user);
+  if (rv<0) {
+    DBG_ERROR(NULL, "Error saving user \"%s\"", AQH_User_GetAlias(user));
+    AQCGI_Request_SetResponseCode(rq, 500);
+    AQCGI_Request_SetResponseText(rq, "Internal Error");
+    AQH_User_free(user);
+    return rv;
+  }
+
+  /* generate session */
+  DBG_ERROR(NULL, "Generating session");
+  tbuf=GWEN_Buffer_new(0, 64, 0, 1);
+  AQCGI_GenerateSessionId(tbuf);
+  session=AQH_Session_new();
+  AQH_Session_SetTimestampCreation(session, ts);
+  AQH_Session_SetTimestampLastAccess(session, ts);
+  AQH_Session_SetUid(session, GWEN_Buffer_GetStart(tbuf));
+  GWEN_Buffer_free(tbuf);
+  AQH_Session_SetUserAlias(session, AQH_User_GetAlias(user));
+  rv=AQH_Service_AddSession(sv, session);
+  if (rv<0) {
+    DBG_ERROR(NULL, "Error adding session for user \"%s\" (%d)", AQH_User_GetAlias(user), rv);
+    AQCGI_Request_SetResponseCode(rq, 500);
+    AQCGI_Request_SetResponseText(rq, "Internal Error");
+    AQH_Session_free(session);
+    AQH_User_free(user);
+    return GWEN_ERROR_INTERNAL;
+  }
+
+  /* add Set-Cookie header */
+  tbuf=GWEN_Buffer_new(0, 256, 0, 1);
+  GWEN_Buffer_AppendArgs(tbuf, "Set-Cookie: session=%s; max-age=86400", AQH_Session_GetUid(session));
+  AQCGI_Request_AddResponseHeaderData(rq, GWEN_Buffer_GetStart(tbuf));
+  GWEN_Buffer_free(tbuf);
+
+  /* finish */
+  AQCGI_Request_AddResponseHeaderData(rq, "Location: index.html");
+  AQCGI_Request_SetResponseCode(rq, 303);
+  AQCGI_Request_SetResponseText(rq, "See other");
+  AQH_Session_free(session);
+  AQH_User_free(user);
+
+  return 0;
+}
+
+
+
+AQH_USER *_getAndCheckUser(AQH_MODULE *m, AQCGI_REQUEST *rq, GWEN_BUFFER *dbuf)
+{
+  GWEN_DB_NODE *dbPost;
+
+  dbPost=AQCGI_Request_GetDbPostBody(rq);
+  if (dbPost) {
+    AQH_SERVICE *sv;
+    const char *sUserName;
+    const char *sPasswd;
+    AQH_USER *user;
+    const char *hashedPaswd;
+    GWEN_BUFFER *buf;
+
+    sv=AQH_ModService_GetService(m);
+    sUserName=GWEN_DB_GetCharValue(dbPost, "userid", 0, NULL);
+    sPasswd=GWEN_DB_GetCharValue(dbPost, "password", 0, NULL);
+    if (!(sUserName && *sUserName && sPasswd && *sPasswd)) {
+      DBG_ERROR(NULL, "Either user name or password missing");
+      AQCGI_Request_SetResponseCode(rq, 400);
+      AQCGI_Request_SetResponseText(rq, "Bad Request");
+      return NULL;
+    }
+
+    DBG_ERROR(NULL, "Loading user \"%s\" (%p)", sUserName, sv);
+    user=AQH_Service_LoadUser(sv, sUserName);
+    if (user==NULL) {
+      DBG_ERROR(NULL, "User \"%s\" not found", sUserName);
+      AQCGI_Request_SetResponseCode(rq, 403);
+      AQCGI_Request_SetResponseText(rq, "Forbidden");
+      return NULL;
+    }
+    DBG_ERROR(NULL, "Loaded user \"%s\"", sUserName);
+
+    if (AQH_User_GetState(user)!=AQH_UserState_Active) {
+      DBG_ERROR(NULL, "User \"%s\" not active", sUserName);
+      AQCGI_Request_SetResponseCode(rq, 403);
+      AQCGI_Request_SetResponseText(rq, "Forbidden");
+      AQH_User_free(user);
+      return NULL;
+    }
+
+    hashedPaswd=AQH_User_GetHashedPassword(user);
+    if (!(hashedPaswd && *hashedPaswd)) {
+      DBG_ERROR(NULL, "User \"%s\" has no hashed password", sUserName);
+      AQCGI_Request_SetResponseCode(rq, 403);
+      AQCGI_Request_SetResponseText(rq, "Forbidden");
+      AQH_User_free(user);
+      return NULL;
+    }
+    buf=GWEN_Buffer_new(0, 256, 0, 1);
+    AQCGI_HashMd256ToBuffer(sPasswd, buf);
+    DBG_ERROR(NULL, "Password: [%s]", sPasswd); // TODO: Remove!!!
+    DBG_ERROR(NULL, "Hashed password: [%s]", GWEN_Buffer_GetStart(buf));
+    if (strcasecmp(GWEN_Buffer_GetStart(buf), hashedPaswd)!=0) {
+      DBG_ERROR(NULL, "Bad password for user \"%s\"", sUserName);
+      AQCGI_Request_SetResponseCode(rq, 403);
+      AQCGI_Request_SetResponseText(rq, "Forbidden");
+      GWEN_Buffer_free(buf);
+      AQH_User_free(user);
+      return NULL;
+    }
+    GWEN_Buffer_free(buf);
+
+    DBG_ERROR(NULL, "User \"%s\" accepted", sUserName);
+    return user;
+  }
+  else {
+    DBG_ERROR(NULL, "No POST data");
+    AQCGI_SendResponseWithStatus(rq, 400, "Bad Request");
+    AQCGI_Request_SetResponseCode(rq, 400);
+    AQCGI_Request_SetResponseText(rq, "Bad Request");
+    return NULL;
+  }
+}
+
+
+
+
+
+
+

apps/aqhome-cgi/modules/mroot.h

@@ -0,0 +1,27 @@
+/****************************************************************************
+ * This file is part of the project AqHome.
+ * AqHome (c) by 2025 Martin Preuss, all rights reserved.
+ *
+ * The license for this file can be found in the file COPYING which you
+ * should have received along with this file.
+ ****************************************************************************/
+
+#ifndef AQHOME_CGI_MROOT_H
+#define AQHOME_CGI_MROOT_H
+
+#include <aqhome-cgi/modules/common/mservice.h>
+
+#include <aqcgi/request.h>
+
+#include <gwenhywfar/buffer.h>
+
+
+AQH_MODULE *AQH_ModRoot_new(AQH_SERVICE *sv, const char *baseFolder);
+
+AQH_MODULE *AQH_ModRoot_LoadSubModule(AQH_MODULE *m, AQCGI_REQUEST *rq, const char *sModuleName);
+int AQH_ModRoot_HandleRequest(AQH_MODULE *m, AQCGI_REQUEST *rq, const char *sLastPathElem);
+
+
+
+#endif
+

apps/aqhome-cgi/modules/mroot_p.h

@@ -0,0 +1,18 @@
+/****************************************************************************
+ * This file is part of the project AqHome.
+ * AqHome (c) by 2025 Martin Preuss, all rights reserved.
+ *
+ * The license for this file can be found in the file COPYING which you
+ * should have received along with this file.
+ ****************************************************************************/
+
+#ifndef AQHOME_CGI_MROOT_P_H
+#define AQHOME_CGI_MROOT_P_H
+
+#include "aqhome-cgi/modules/mroot.h"
+
+
+
+
+#endif
+

apps/aqhome-cgi/modules/static/0BUILD

@@ -0,0 +1,7 @@
+<?xml?>
+
+<gwbuild>
+  <subdirs>
+    en
+  </subdirs>
+</gwbuild>

apps/aqhome-cgi/modules/static/en/0BUILD

@@ -0,0 +1,14 @@
+<?xml?>
+
+<gwbuild>
+
+  <data dist="true" install="$(httpdatadir)/aqhome-cgi/static/en">
+    header.html
+    footer.html
+    login.html
+    index.html
+  </data>
+  
+
+</gwbuild>
+

apps/aqhome-cgi/modules/static/en/footer.html

@@ -0,0 +1,4 @@
+
+</body>
+
+</html>

apps/aqhome-cgi/modules/static/en/header.html

@@ -0,0 +1,27 @@
+<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
+
+<html>
+
+<head>
+<!-- copyright (c) 2025 by martin@libchipcard.de -->
+<meta name="generator" content="FTE 1.1" />
+<meta name="revised" content="martin,2025-06-12" />
+<meta name="keywords" content="" />
+<meta name="description" content="" />
+<meta name="author" content="martin" />
+<meta http-equiv="content-type" content="text/html; charset=ISO-8859-1" />
+<link rel="stylesheet" href="/style.css" >
+<title>AqHome</title>
+</head>
+
+<ul class="mainmenu" >
+  <li><a href="/aqhome/devices/index.html">Devices</a></li>
+  <li><a href="/aqhome/devices/page.html">Pages</a></li>
+  <li><a href="/aqhome/admin/index.html">Admin</a></li>
+  <li><a href="#news">News</a></li>
+  <li><a href="#contact">Contact</a></li>
+  <li style="float:right"><a href="/aqhome/login">Login</a></li>
+</ul>
+
+<body>
+

apps/aqhome-cgi/modules/static/en/index.html

@@ -0,0 +1,6 @@
+
+
+<h1> AqHome Main Page </h1>
+
+<p>Nothing to see for now</p>
+

apps/aqhome-cgi/modules/static/en/login.html

@@ -0,0 +1,25 @@
+
+    <div class="main">
+        <h1>AqHome</h1>
+        <h3>Enter your login credentials</h3>
+
+        <form action="login" method="post">
+            <label for="userid">Username:</label>
+            <input type="text" id="userid" name="userid" placeholder="Enter your Username" required>
+            <label for="password">Password:</label>
+            <input type="password" id="password" name="password" placeholder="Enter your Password" required>
+
+            <div class="wrap">
+                <button type="submit">Submit</button>
+            </div>
+        </form>
+        
+        <p>Not registered?
+            <a href="signup" style="text-decoration: none;">
+                Create an account
+            </a>
+        </p>
+    </div>
+</body>
+
+</html>

apps/aqhome-cgi/service/0BUILD

@@ -0,0 +1,86 @@
+<?xml?>
+
+<gwbuild>
+
+  <target type="ConvenienceLibrary" name="aqhcgi_service" >
+
+    <includes type="c" >
+      $(gwenhywfar_cflags)
+      -I$(topsrcdir)
+      -I$(topbuilddir)
+      -I$(topsrcdir)/apps
+      -I$(topbuilddir)/apps
+      -I$(builddir)
+      -I$(srcdir)
+    </includes>
+  
+    <includes type="tm2" >
+      --include=$(builddir)
+      --include=$(srcdir)
+    </includes>
+
+
+    <define name="not_BUILDING_AQHOME" />
+
+    <setVar name="local/cflags">$(visibility_cflags)</setVar>
+
+  
+    <setVar name="tm2flags-INACTIVE" >
+      --api=AQHOME_API
+    </setVar>
+
+    <setVar name="local/typefiles" >
+      module.t2d
+      moduleperms.t2d
+      role.t2d
+      user.t2d
+      session.t2d
+      permdef.t2d
+    </setVar>
+  
+    <setVar name="local/built_sources" >
+    </setVar>
+  
+    <setVar name="local/built_headers_pub">
+    </setVar>
+  
+  
+    <setVar name="local/built_headers_priv" >
+    </setVar>
+
+
+    <headers dist="false" install="$(pkgincludedir)/service" >
+      $(local/built_headers_pub)
+    </headers>
+  
+  
+    <headers dist="true" install="$(pkgincludedir)/service" >
+      service.h
+    </headers>
+
+
+    <headers dist="true" >
+      service_p.h
+    </headers>
+  
+  
+    <sources>
+      $(local/typefiles)
+
+      service.c
+    </sources>
+
+
+    <extradist>
+    </extradist>
+
+
+    <useTargets>
+    </useTargets>
+
+    <subdirs>
+    </subdirs>
+
+  </target>
+  
+</gwbuild>

apps/aqhome-cgi/service/README

@@ -0,0 +1,20 @@
+
+
+- service:
+  - userList
+  - rootModule
+  - sessionList
+
+- user:
+  - modulePerms
+
+- module:
+  - roleList
+  - permDefList
+
+- session
+
+
+
+
+

apps/aqhome-cgi/service/module.t2d

@@ -0,0 +1,103 @@
+<?xml?>
+
+<tm2>
+  <type id="AQH_MODULE" type="pointer">
+    <descr>
+    </descr>
+    <lang id="c">
+      <identifier>AQH_MODULE</identifier>
+      <prefix>AQH_Module</prefix>
+      <baseFileName>module</baseFileName>
+      
+      <flags>
+        with_inherit
+        with_xml
+        with_db
+        with_list1
+        with_list2
+        with_tree2
+        nodup
+        nocopy
+      </flags>
+      
+      <headers>
+        <header type="sys" loc="pre">aqhome/api.h</header>
+        <header type="sys" loc="pre">gwenhywfar/error.h</header>
+        <header type="sys" loc="post">aqhome-cgi/service/role.h</header>
+        <header type="sys" loc="post">aqhome-cgi/service/permdef.h</header>
+      </headers>
+
+      <inlines>
+      </inlines>
+
+    </lang>
+
+    <defines>
+      <define id="AQH_MODULE_FLAGS" prefix="AQH_MODULE_FLAGS_">
+        <item name="ACTIVE"      value="0x00000001" />
+     </define>
+      
+    </defines>
+
+
+    <members>
+  
+      <member name="id" type="uint32_t" maxlen="4">
+        <default>0</default>
+        <preset>0</preset>
+        <access>public</access>
+        <flags>with_getbymember sortbymember</flags>
+      </member>
+
+      <member name="flags" type="uint32_t" maxlen="4">
+        <default>0</default>
+        <preset>0</preset>
+        <access>public</access>
+        <flags>with_flags</flags>
+      </member>
+
+      <member name="name" type="char_ptr" maxlen="16">
+        <default>0</default>
+        <preset>0</preset>
+        <access>public</access>
+        <flags>own with_getbymember sortbymember</flags>
+      </member>
+
+      <member name="descr" type="char_ptr" maxlen="256">
+        <default>0</default>
+        <preset>0</preset>
+        <access>public</access>
+        <flags>own</flags>
+      </member>
+
+      <member name="guestPerms" type="uint32_t" maxlen="4">
+        <default>0</default>
+        <preset>0</preset>
+        <access>public</access>
+        <flags></flags>
+      </member>
+
+      <member name="roleList" type="AQH_ROLE_LIST" elementName="role" >
+        <default>NULL</default>
+        <preset>NULL</preset>
+        <access>public</access>
+        <flags>own</flags>
+        <getflags>none</getflags>
+        <setflags>none</setflags>
+      </member>
+
+      <member name="permDefList" type="AQH_PERMDEF_LIST" elementName="permdef" >
+        <default>NULL</default>
+        <preset>NULL</preset>
+        <access>public</access>
+        <flags>own</flags>
+        <getflags>none</getflags>
+        <setflags>none</setflags>
+      </member>
+
+    </members>
+    
+  </type>
+  
+</tm2>
+

apps/aqhome-cgi/service/moduleperms.t2d

@@ -0,0 +1,67 @@
+<?xml?>
+
+<tm2>
+  <type id="AQH_MODULE_PERMS" type="pointer">
+    <descr>
+    </descr>
+    <lang id="c">
+      <identifier>AQH_MODULE_PERMS</identifier>
+      <prefix>AQH_ModulePerms</prefix>
+      <baseFileName>moduleperms</baseFileName>
+      
+      <flags>
+        with_inherit
+        with_xml
+        with_db
+        with_list1
+        with_list2
+      </flags>
+      
+      <headers>
+        <header type="sys" loc="pre">aqhome/api.h</header>
+        <header type="sys" loc="pre">gwenhywfar/error.h</header>
+        <header type="sys" loc="post">aqhome-cgi/service/role.h</header>
+      </headers>
+
+      <inlines>
+      </inlines>
+
+    </lang>
+
+
+    <members>
+  
+      <member name="moduleId" type="char_ptr" maxlen="256">
+        <default>0</default>
+        <preset>0</preset>
+        <access>public</access>
+        <flags>with_getbymember sortbymember</flags>
+      </member>
+
+      <member name="explAddPerms" type="uint32_t" maxlen="4">
+        <default>0</default>
+        <preset>0</preset>
+        <access>public</access>
+        <flags></flags>
+      </member>
+
+      <member name="explDelPerms" type="uint32_t" maxlen="4">
+        <default>0</default>
+        <preset>0</preset>
+        <access>public</access>
+        <flags></flags>
+      </member>
+
+      <member name="roleArray" type="uint8_t_array" maxlen="16">
+        <default>0</default>
+        <preset>0</preset>
+        <access>public</access>
+        <flags></flags>
+      </member>
+
+    </members>
+    
+  </type>
+  
+</tm2>
+

apps/aqhome-cgi/service/role.t2d

@@ -0,0 +1,79 @@
+<?xml?>
+
+<tm2>
+  <type id="AQH_ROLE" type="pointer">
+    <descr>
+    </descr>
+    <lang id="c">
+      <identifier>AQH_ROLE</identifier>
+      <prefix>AQH_Role</prefix>
+      <baseFileName>role</baseFileName>
+      
+      <flags>
+        with_xml
+        with_db
+        with_list1
+        with_list2
+      </flags>
+      
+      <headers>
+        <header type="sys" loc="pre">aqhome/api.h</header>
+        <header type="sys" loc="pre">gwenhywfar/error.h</header>
+      </headers>
+
+      <inlines>
+      </inlines>
+
+    </lang>
+
+
+    <members>
+  
+      <member name="id" type="uint8_t" maxlen="1">
+        <default>0</default>
+        <preset>0</preset>
+        <access>public</access>
+        <flags>with_getbymember</flags>
+      </member>
+
+      <member name="name" type="char_ptr" maxlen="16">
+        <default>0</default>
+        <preset>0</preset>
+        <access>public</access>
+        <flags>own</flags>
+      </member>
+
+      <member name="descr" type="char_ptr" maxlen="256">
+        <default>0</default>
+        <preset>0</preset>
+        <access>public</access>
+        <flags>own</flags>
+      </member>
+
+      <member name="perms" type="uint32_t" maxlen="4">
+        <default>0</default>
+        <preset>0</preset>
+        <access>public</access>
+        <flags></flags>
+      </member>
+
+      <member name="explAddPerms" type="uint32_t" maxlen="4">
+        <default>0</default>
+        <preset>0</preset>
+        <access>public</access>
+        <flags></flags>
+      </member>
+
+      <member name="explDelPerms" type="uint32_t" maxlen="4">
+        <default>0</default>
+        <preset>0</preset>
+        <access>public</access>
+        <flags></flags>
+      </member>
+
+    </members>
+    
+  </type>
+  
+</tm2>
+

apps/aqhome-cgi/service/service.c

@@ -0,0 +1,414 @@
+/****************************************************************************
+ * This file is part of the project AqHome.
+ * AqHome (c) by 2025 Martin Preuss, all rights reserved.
+ *
+ * The license for this file can be found in the file COPYING which you
+ * should have received along with this file.
+ ****************************************************************************/
+
+#ifdef HAVE_CONFIG_H
+# include <config.h>
+#endif
+
+//#define DISABLE_DEBUGLOG
+
+
+#include "aqhome-cgi/service/service_p.h"
+
+#include <gwenhywfar/stringlist.h>
+#include <gwenhywfar/text.h>
+#include <gwenhywfar/debug.h>
+
+
+
+GWEN_INHERIT_FUNCTIONS(AQH_SERVICE);
+GWEN_LIST_FUNCTIONS(AQH_SERVICE, AQH_Service);
+
+
+
+
+AQH_SERVICE *AQH_Service_new(const char *baseFolder, const char *baseUrl)
+{
+  AQH_SERVICE *sv;
+
+  GWEN_NEW_OBJECT(AQH_SERVICE, sv);
+  GWEN_INHERIT_INIT(AQH_SERVICE, sv);
+  GWEN_LIST_INIT(AQH_SERVICE, sv);
+
+  sv->baseUrl=baseUrl?strdup(baseUrl):NULL;
+  sv->baseFolder=baseFolder?strdup(baseFolder):NULL;
+
+  if (sv->baseFolder) {
+    GWEN_BUFFER *dbuf;
+    uint32_t pos;
+
+    dbuf=GWEN_Buffer_new(0, 256, 0, 1);
+    GWEN_Buffer_AppendArgs(dbuf, "%s%s", sv->baseFolder, GWEN_DIR_SEPARATOR_S);
+    pos=GWEN_Buffer_GetPos(dbuf);
+
+    /* data folder */
+    GWEN_Buffer_AppendString(dbuf, "data");
+    sv->runtimeFolder=strdup(GWEN_Buffer_GetStart(dbuf));
+    DBG_ERROR(NULL, "Runtime folder: %s", GWEN_Buffer_GetStart(dbuf));
+    GWEN_Buffer_Crop(dbuf, 0, pos);
+
+    /* cache folder */
+    GWEN_Buffer_AppendString(dbuf, "cache");
+    sv->cacheFolder=strdup(GWEN_Buffer_GetStart(dbuf));
+    DBG_ERROR(NULL, "Cache folder: %s", GWEN_Buffer_GetStart(dbuf));
+    GWEN_Buffer_Crop(dbuf, 0, pos);
+
+    GWEN_Buffer_free(dbuf);
+  }
+
+  return sv;
+}
+
+
+
+void AQH_Service_free(AQH_SERVICE *sv)
+{
+  if (sv) {
+    GWEN_LIST_FINI(AQH_SERVICE, sv);
+    GWEN_INHERIT_FINI(AQH_SERVICE, sv);
+
+    free(sv->baseUrl);
+    free(sv->baseFolder);
+    free(sv->runtimeFolder);
+    free(sv->cacheFolder);
+    GWEN_FREE_OBJECT(sv);
+  }
+}
+
+
+
+const char *AQH_Service_GetBaseUrl(const AQH_SERVICE *sv)
+{
+  return sv?sv->baseUrl:NULL;
+}
+
+
+
+const char *AQH_Service_GetBaseFolder(const AQH_SERVICE *sv)
+{
+  return sv?sv->baseFolder:NULL;
+}
+
+
+
+const char *AQH_Service_GetRuntimeFolder(const AQH_SERVICE *sv)
+{
+  return sv?sv->runtimeFolder:NULL;
+}
+
+
+
+const char *AQH_Service_GetCacheFolder(const AQH_SERVICE *sv)
+{
+  return sv?sv->cacheFolder:NULL;
+}
+
+
+
+#if 0
+AQH_MODULE *AQH_Service_GetModuleByPath(const AQH_SERVICE *sv, const char *s)
+{
+  if (sv && s && *s) {
+    GWEN_STRINGLIST *sl;
+
+    sl=GWEN_StringList_fromString2(s, "/", 0,
+                                   GWEN_TEXT_FLAGS_DEL_QUOTES |
+                                   GWEN_TEXT_FLAGS_DEL_LEADING_BLANKS |
+                                   GWEN_TEXT_FLAGS_DEL_MULTIPLE_BLANKS |
+                                   GWEN_TEXT_FLAGS_DEL_TRAILING_BLANKS);
+    if (sl) {
+      GWEN_STRINGLISTENTRY *se;
+      AQH_MODULE *m;
+
+      m=sv->rootModule;
+      se=GWEN_StringList_FirstEntry(sl);
+      while(se && m) {
+        const char *sWantedName;
+
+        sWantedName=GWEN_StringListEntry_Data(se);
+        if (sWantedName && *sWantedName) {
+          AQH_MODULE *mTemp;
+
+          mTemp=AQH_Module_Tree2_GetFirstChild(m);
+          while(mTemp) {
+            const char *sModName;
+
+            sModName=AQH_Module_GetName(mTemp);
+            if (sModName && *sModName && 0==strcasecmp(sModName, sWantedName))
+              break;
+            mTemp=AQH_Module_Tree2_GetNext(mTemp);
+          }
+          if (mTemp==NULL) {
+            DBG_ERROR(NULL, "Module \%s\" not found", sWantedName);
+            GWEN_StringList_free(sl);
+            return NULL;
+          }
+          m=mTemp;
+        }
+        else {
+          DBG_ERROR(NULL, "Empty path element in \"%s\"", s);
+          GWEN_StringList_free(sl);
+          return NULL;
+        }
+
+        se=GWEN_StringListEntry_Next(se);
+      } /* while(se && m) */
+      GWEN_StringList_free(sl);
+      return m;
+    }
+    else {
+      DBG_ERROR(NULL, "Bad path \"%s\"", s);
+    }
+  }
+  return NULL;
+}
+#endif
+
+
+
+int AQH_Service_HandleRequest(AQH_SERVICE *sv, AQCGI_REQUEST *req)
+{
+  return (sv && sv->handleRequestFn)?(sv->handleRequestFn(sv, req)):GWEN_ERROR_NOT_IMPLEMENTED;
+}
+
+
+
+AQH_USER *AQH_Service_LoadUser(AQH_SERVICE *sv, const char *s)
+{
+  return (sv && sv->loadUserFn)?(sv->loadUserFn(sv, s)):NULL;
+}
+
+
+
+int AQH_Service_SaveUser(AQH_SERVICE *sv, AQH_USER *user)
+{
+  return (sv && sv->saveUserFn)?(sv->saveUserFn(sv, user)):GWEN_ERROR_NOT_IMPLEMENTED;
+}
+
+
+
+int AQH_Service_AddUser(AQH_SERVICE *sv, AQH_USER *user)
+{
+  return (sv && sv->addUserFn)?(sv->addUserFn(sv, user)):GWEN_ERROR_NOT_IMPLEMENTED;
+}
+
+
+
+int AQH_Service_DelUser(AQH_SERVICE *sv, const char *s)
+{
+  return (sv && sv->delUserFn)?(sv->delUserFn(sv, s)):GWEN_ERROR_NOT_IMPLEMENTED;
+}
+
+
+
+GWEN_STRINGLIST *AQH_Service_ListUsers(AQH_SERVICE *sv)
+{
+  return (sv && sv->listUsersFn)?(sv->listUsersFn(sv)):NULL;
+}
+
+
+
+AQH_MODULE *AQH_Service_LoadModule(AQH_SERVICE *sv, const char *s)
+{
+  return (sv && sv->loadModuleFn)?(sv->loadModuleFn(sv, s)):NULL;
+}
+
+
+
+int AQH_Service_SaveModule(AQH_SERVICE *sv, AQH_MODULE *module)
+{
+  return (sv && sv->saveModuleFn)?(sv->saveModuleFn(sv, module)):GWEN_ERROR_NOT_IMPLEMENTED;
+}
+
+
+
+int AQH_Service_AddModule(AQH_SERVICE *sv, AQH_MODULE *module)
+{
+  return (sv && sv->addModuleFn)?(sv->addModuleFn(sv, module)):GWEN_ERROR_NOT_IMPLEMENTED;
+}
+
+
+
+int AQH_Service_DelModule(AQH_SERVICE *sv, const char *s)
+{
+  return (sv && sv->delModuleFn)?(sv->delModuleFn(sv, s)):GWEN_ERROR_NOT_IMPLEMENTED;
+}
+
+
+
+GWEN_STRINGLIST *AQH_Service_ListModules(AQH_SERVICE *sv)
+{
+  return (sv && sv->listModulesFn)?(sv->listModulesFn(sv)):NULL;
+}
+
+
+
+AQH_SESSION* AQH_Service_LoadSession(AQH_SERVICE *sv, const char *s)
+{
+  return (sv && sv->loadSessionFn)?(sv->loadSessionFn(sv, s)):NULL;
+}
+
+
+
+int AQH_Service_SaveSession(AQH_SERVICE *sv, AQH_SESSION *session)
+{
+  return (sv && sv->saveSessionFn)?(sv->saveSessionFn(sv, session)):GWEN_ERROR_NOT_IMPLEMENTED;
+}
+
+
+
+int AQH_Service_AddSession(AQH_SERVICE *sv, AQH_SESSION *session)
+{
+  return (sv && sv->addSessionFn)?(sv->addSessionFn(sv, session)):GWEN_ERROR_NOT_IMPLEMENTED;
+}
+
+
+
+int AQH_Service_DelSession(AQH_SERVICE *sv, const char *s)
+{
+  return (sv && sv->delSessionFn)?(sv->delSessionFn(sv, s)):GWEN_ERROR_NOT_IMPLEMENTED;
+}
+
+
+
+
+
+
+void AQH_Service_SetHandleRequestFn(AQH_SERVICE *sv, AQH_SERVICE_HANDLEREQUEST_FN f)
+{
+  if (sv)
+    sv->handleRequestFn=f;
+}
+
+
+
+void AQH_Service_SetLoadUserFn(AQH_SERVICE *sv, AQH_SERVICE_LOADUSER_FN f)
+{
+  if (sv)
+    sv->loadUserFn=f;
+}
+
+
+
+void AQH_Service_SetSaveUserFn(AQH_SERVICE *sv, AQH_SERVICE_SAVEUSER_FN f)
+{
+  if (sv)
+    sv->saveUserFn=f;
+}
+
+
+
+void AQH_Service_SetAddUserFn(AQH_SERVICE *sv, AQH_SERVICE_ADDUSER_FN f)
+{
+  if (sv)
+    sv->addUserFn=f;
+}
+
+
+
+void AQH_Service_SetDelUserFn(AQH_SERVICE *sv, AQH_SERVICE_DELUSER_FN f)
+{
+  if (sv)
+    sv->delUserFn=f;
+}
+
+
+
+void AQH_Service_SetListUsersFn(AQH_SERVICE *sv, AQH_SERVICE_LISTUSERS_FN f)
+{
+  if (sv)
+    sv->listUsersFn=f;
+}
+
+
+
+void AQH_Service_SetLoadModuleFn(AQH_SERVICE *sv, AQH_SERVICE_LOADMODULE_FN f)
+{
+  if (sv)
+    sv->loadModuleFn=f;
+}
+
+
+
+void AQH_Service_SetSaveModuleFn(AQH_SERVICE *sv, AQH_SERVICE_SAVEMODULE_FN f)
+{
+  if (sv)
+    sv->saveModuleFn=f;
+}
+
+
+
+void AQH_Service_SetAddModuleFn(AQH_SERVICE *sv, AQH_SERVICE_ADDMODULE_FN f)
+{
+  if (sv)
+    sv->addModuleFn=f;
+}
+
+
+
+void AQH_Service_SetDelModuleFn(AQH_SERVICE *sv, AQH_SERVICE_DELMODULE_FN f)
+{
+  if (sv)
+    sv->delModuleFn=f;
+}
+
+
+
+void AQH_Service_SetListModulesFn(AQH_SERVICE *sv, AQH_SERVICE_LISTMODULES_FN f)
+{
+  if (sv)
+    sv->listModulesFn=f;
+}
+
+
+
+void AQH_Service_SetLoadSessionFn(AQH_SERVICE *sv, AQH_SERVICE_LOADSESSION_FN f)
+{
+  if (sv)
+    sv->loadSessionFn=f;
+}
+
+
+
+void AQH_Service_SetSaveSessionFn(AQH_SERVICE *sv, AQH_SERVICE_SAVESESSION_FN f)
+{
+  if (sv)
+    sv->saveSessionFn=f;
+}
+
+
+
+void AQH_Service_SetAddSessionFn(AQH_SERVICE *sv, AQH_SERVICE_ADDSESSION_FN f)
+{
+  if (sv)
+    sv->addSessionFn=f;
+}
+
+
+
+void AQH_Service_SetDelSessionFn(AQH_SERVICE *sv, AQH_SERVICE_DELSESSION_FN f)
+{
+  if (sv)
+    sv->delSessionFn=f;
+}
+
+
+
+void AQH_Service_SetListSessionsFn(AQH_SERVICE *sv, AQH_SERVICE_LISTSESSIONS_FN f)
+{
+  if (sv)
+    sv->listSessionsFn=f;
+}
+
+
+
+
+
+
+
+

apps/aqhome-cgi/service/service.h

@@ -0,0 +1,107 @@
+/****************************************************************************
+ * This file is part of the project AqHome.
+ * AqHome (c) by 2025 Martin Preuss, all rights reserved.
+ *
+ * The license for this file can be found in the file COPYING which you
+ * should have received along with this file.
+ ****************************************************************************/
+
+#ifndef AQHOME_SERVICE_H
+#define AQHOME_SERVICE_H
+
+
+#include <aqhome/api.h>
+
+#include <gwenhywfar/inherit.h>
+#include <gwenhywfar/list.h>
+#include <gwenhywfar/stringlist.h>
+
+
+typedef struct AQH_SERVICE AQH_SERVICE;
+GWEN_INHERIT_FUNCTION_DEFS(AQH_SERVICE);
+GWEN_LIST_FUNCTION_DEFS(AQH_SERVICE, AQH_Service);
+
+
+#include "aqhome-cgi/service/user.h"
+#include "aqhome-cgi/service/module.h"
+#include "aqhome-cgi/service/session.h"
+
+#include <aqcgi/cgi.h>
+
+
+typedef int (*AQH_SERVICE_HANDLEREQUEST_FN)(AQH_SERVICE *sv, AQCGI_REQUEST *req);
+
+typedef AQH_USER* (*AQH_SERVICE_LOADUSER_FN)(AQH_SERVICE *sv, const char *s);
+typedef int (*AQH_SERVICE_SAVEUSER_FN)(AQH_SERVICE *sv, AQH_USER *user);
+typedef int (*AQH_SERVICE_ADDUSER_FN)(AQH_SERVICE *sv, AQH_USER *user);
+typedef int (*AQH_SERVICE_DELUSER_FN)(AQH_SERVICE *sv, const char *s);
+typedef GWEN_STRINGLIST* (*AQH_SERVICE_LISTUSERS_FN)(AQH_SERVICE *sv);
+
+typedef AQH_MODULE* (*AQH_SERVICE_LOADMODULE_FN)(AQH_SERVICE *sv, const char *s);
+typedef int (*AQH_SERVICE_SAVEMODULE_FN)(AQH_SERVICE *sv, AQH_MODULE *module);
+typedef int (*AQH_SERVICE_ADDMODULE_FN)(AQH_SERVICE *sv, AQH_MODULE *module);
+typedef int (*AQH_SERVICE_DELMODULE_FN)(AQH_SERVICE *sv, const char *s);
+typedef GWEN_STRINGLIST* (*AQH_SERVICE_LISTMODULES_FN)(AQH_SERVICE *sv);
+
+
+typedef AQH_SESSION* (*AQH_SERVICE_LOADSESSION_FN)(AQH_SERVICE *sv, const char *s);
+typedef int (*AQH_SERVICE_SAVESESSION_FN)(AQH_SERVICE *sv, AQH_SESSION *session);
+typedef int (*AQH_SERVICE_ADDSESSION_FN)(AQH_SERVICE *sv, AQH_SESSION *session);
+typedef int (*AQH_SERVICE_DELSESSION_FN)(AQH_SERVICE *sv, const char *s);
+typedef GWEN_STRINGLIST* (*AQH_SERVICE_LISTSESSIONS_FN)(AQH_SERVICE *sv);
+
+
+
+AQH_SERVICE *AQH_Service_new(const char *baseFolder, const char *baseUrl);
+void AQH_Service_free(AQH_SERVICE *sv);
+
+const char *AQH_Service_GetBaseUrl(const AQH_SERVICE *sv);
+const char *AQH_Service_GetBaseFolder(const AQH_SERVICE *sv);
+const char *AQH_Service_GetRuntimeFolder(const AQH_SERVICE *sv);
+const char *AQH_Service_GetCacheFolder(const AQH_SERVICE *sv);
+
+int AQH_Service_HandleRequest(AQH_SERVICE *sv, AQCGI_REQUEST *req);
+
+AQH_USER *AQH_Service_LoadUser(AQH_SERVICE *sv, const char *s);
+int AQH_Service_SaveUser(AQH_SERVICE *sv, AQH_USER *user);
+int AQH_Service_AddUser(AQH_SERVICE *sv, AQH_USER *user);
+int AQH_Service_DelUser(AQH_SERVICE *sv, const char *s);
+GWEN_STRINGLIST *AQH_Service_ListUsers(AQH_SERVICE *sv);
+
+AQH_MODULE *AQH_Service_LoadModule(AQH_SERVICE *sv, const char *s);
+int AQH_Service_SaveModule(AQH_SERVICE *sv, AQH_MODULE *module);
+int AQH_Service_AddModule(AQH_SERVICE *sv, AQH_MODULE *module);
+int AQH_Service_DelModule(AQH_SERVICE *sv, const char *s);
+GWEN_STRINGLIST *AQH_Service_ListModules(AQH_SERVICE *sv);
+
+AQH_SESSION* AQH_Service_LoadSession(AQH_SERVICE *sv, const char *s);
+int AQH_Service_SaveSession(AQH_SERVICE *sv, AQH_SESSION *session);
+int AQH_Service_AddSession(AQH_SERVICE *sv, AQH_SESSION *session);
+int AQH_Service_DelSession(AQH_SERVICE *sv, const char *s);
+GWEN_STRINGLIST *AQH_Service_ListSessions(AQH_SERVICE *sv);
+
+
+
+void AQH_Service_SetHandleRequestFn(AQH_SERVICE *sv, AQH_SERVICE_HANDLEREQUEST_FN f);
+
+void AQH_Service_SetLoadUserFn(AQH_SERVICE *sv, AQH_SERVICE_LOADUSER_FN f);
+void AQH_Service_SetSaveUserFn(AQH_SERVICE *sv, AQH_SERVICE_SAVEUSER_FN f);
+void AQH_Service_SetAddUserFn(AQH_SERVICE *sv, AQH_SERVICE_ADDUSER_FN f);
+void AQH_Service_SetDelUserFn(AQH_SERVICE *sv, AQH_SERVICE_DELUSER_FN f);
+void AQH_Service_SetListUsersFn(AQH_SERVICE *sv, AQH_SERVICE_LISTUSERS_FN f);
+
+void AQH_Service_SetLoadModuleFn(AQH_SERVICE *sv, AQH_SERVICE_LOADMODULE_FN f);
+void AQH_Service_SetSaveModuleFn(AQH_SERVICE *sv, AQH_SERVICE_SAVEMODULE_FN f);
+void AQH_Service_SetAddModuleFn(AQH_SERVICE *sv, AQH_SERVICE_ADDMODULE_FN f);
+void AQH_Service_SetDelModuleFn(AQH_SERVICE *sv, AQH_SERVICE_DELMODULE_FN f);
+void AQH_Service_SetListModulesFn(AQH_SERVICE *sv, AQH_SERVICE_LISTMODULES_FN f);
+
+void AQH_Service_SetLoadSessionFn(AQH_SERVICE *sv, AQH_SERVICE_LOADSESSION_FN f);
+void AQH_Service_SetSaveSessionFn(AQH_SERVICE *sv, AQH_SERVICE_SAVESESSION_FN f);
+void AQH_Service_SetAddSessionFn(AQH_SERVICE *sv, AQH_SERVICE_ADDSESSION_FN f);
+void AQH_Service_SetDelSessionFn(AQH_SERVICE *sv, AQH_SERVICE_DELSESSION_FN f);
+void AQH_Service_SetListSessionsFn(AQH_SERVICE *sv, AQH_SERVICE_LISTSESSIONS_FN f);
+
+
+
+#endif

apps/aqhome-cgi/service/service_p.h

@@ -0,0 +1,50 @@
+/****************************************************************************
+ * This file is part of the project AqHome.
+ * AqHome (c) by 2023 Martin Preuss, all rights reserved.
+ *
+ * The license for this file can be found in the file COPYING which you
+ * should have received along with this file.
+ ****************************************************************************/
+
+#ifndef AQHOME_SERVICE_P_H
+#define AQHOME_SERVICE_P_H
+
+
+#include "aqhome-cgi/service/service.h"
+
+
+struct AQH_SERVICE {
+  GWEN_INHERIT_ELEMENT(AQH_SERVICE);
+  GWEN_LIST_ELEMENT(AQH_SERVICE);
+
+  char *baseUrl;
+  char *baseFolder;
+  char *runtimeFolder;
+  char *cacheFolder;
+
+  AQH_SERVICE_HANDLEREQUEST_FN handleRequestFn;
+
+  AQH_SERVICE_LOADUSER_FN loadUserFn;
+  AQH_SERVICE_SAVEUSER_FN saveUserFn;
+  AQH_SERVICE_ADDUSER_FN addUserFn;
+  AQH_SERVICE_DELUSER_FN delUserFn;
+  AQH_SERVICE_LISTUSERS_FN listUsersFn;
+
+  AQH_SERVICE_LOADMODULE_FN loadModuleFn;
+  AQH_SERVICE_SAVEMODULE_FN saveModuleFn;
+  AQH_SERVICE_ADDMODULE_FN addModuleFn;
+  AQH_SERVICE_DELMODULE_FN delModuleFn;
+  AQH_SERVICE_LISTMODULES_FN listModulesFn;
+
+  AQH_SERVICE_LOADSESSION_FN loadSessionFn;
+  AQH_SERVICE_SAVESESSION_FN saveSessionFn;
+  AQH_SERVICE_ADDSESSION_FN addSessionFn;
+  AQH_SERVICE_DELSESSION_FN delSessionFn;
+  AQH_SERVICE_LISTSESSIONS_FN listSessionsFn;
+
+};
+
+
+
+
+#endif

apps/aqhome-cgi/service/session.t2d

@@ -0,0 +1,117 @@
+<?xml?>
+
+<tm2>
+  <type id="AQH_SESSION" type="pointer">
+    <descr>
+    </descr>
+    <lang id="c">
+      <identifier>AQH_SESSION</identifier>
+      <prefix>AQH_Session</prefix>
+      <baseFileName>session</baseFileName>
+      
+      <flags>
+        with_xml
+        with_db
+        with_list1
+        with_list2
+        nodup
+        nocopy
+      </flags>
+      
+      <headers>
+        <header type="sys" loc="pre">aqhome/api.h</header>
+        <header type="sys" loc="pre">gwenhywfar/error.h</header>
+        <header type="sys" loc="pre">gwenhywfar/timestamp.h</header>
+        <header type="sys" loc="post">aqhome-cgi/service/user.h</header>
+      </headers>
+
+      <inlines>
+      </inlines>
+
+    </lang>
+
+
+
+    <defines>
+      <define id="AQH_SESSION_RTFLAGS" prefix="AQH_SESSION_RTFLAGS_">
+        <item name="MODIFIED"    value="0x00000001" />
+      </define>
+    </defines>
+
+
+    <members>
+  
+      <member name="uid" type="char_ptr" maxlen="64">
+        <default>0</default>
+        <preset>0</preset>
+        <access>public</access>
+        <flags>own with_getbymember</flags>
+      </member>
+
+      <member name="flags" type="uint32_t" maxlen="4">
+        <default>0</default>
+        <preset>0</preset>
+        <access>public</access>
+        <flags>with_flags</flags>
+      </member>
+
+      <member name="userAlias" type="char_ptr" maxlen="64">
+        <default>NULL</default>
+        <preset>NULL</preset>
+        <access>public</access>
+        <flags>own</flags>
+      </member>
+
+      <member name="state" type="int" maxlen="4">
+        <default>0</default>
+        <preset>0</preset>
+        <access>public</access>
+        <flags></flags>
+      </member>
+
+      <member name="tempToken" type="char_ptr" maxlen="64">
+        <default>0</default>
+        <preset>0</preset>
+        <access>public</access>
+        <flags>own</flags>
+      </member>
+
+      <member name="timestampCreation" type="gwen_timestamp" maxlen="8">
+        <default>NULL</default>
+        <preset>NULL</preset>
+        <access>public</access>
+        <flags>own</flags>
+      </member>
+
+      <member name="timestampLastAccess" type="gwen_timestamp" maxlen="8">
+        <default>NULL</default>
+        <preset>NULL</preset>
+        <access>public</access>
+        <flags>own</flags>
+      </member>
+
+
+      <member name="user" type="AQH_USER">
+        <default>NULL</default>
+        <preset>NULL</preset>
+        <access>public</access>
+        <setflags>assign</setflags>
+        <getflags>none</getflags>
+        <flags>volatile nodup nocopy</flags>
+      </member>
+
+
+
+      <member name="runtimeFlags" type="uint32_t" maxlen="4">
+        <default>0</default>
+        <preset>0</preset>
+        <access>public</access>
+        <flags>with_flags volatile</flags>
+      </member>
+
+    </members>
+    
+  </type>
+  
+</tm2>
+

apps/aqhome-cgi/service/user.t2d

@@ -0,0 +1,164 @@
+<?xml?>
+
+<tm2>
+  <type id="AQH_USER" type="pointer">
+    <descr>
+    </descr>
+    <lang id="c">
+      <identifier>AQH_USER</identifier>
+      <prefix>AQH_User</prefix>
+      <baseFileName>user</baseFileName>
+      
+      <flags>
+        with_xml
+        with_db
+        with_list1
+        with_list2
+        with_refcount
+        nodup
+        nocopy
+      </flags>
+      
+      <headers>
+        <header type="sys" loc="pre">aqhome/api.h</header>
+        <header type="sys" loc="pre">gwenhywfar/error.h</header>
+        <header type="sys" loc="pre">gwenhywfar/timestamp.h</header>
+        <header type="sys" loc="post">aqhome-cgi/service/moduleperms.h</header>
+      </headers>
+
+      <inlines>
+      </inlines>
+
+    </lang>
+
+    <defines>
+      <define id="AQH_USER_FLAGS" prefix="AQH_USER_FLAGS_">
+        <item name="ADMIN"    value="0x00000001" />
+     </define>
+
+      <define id="AQH_USER_RTFLAGS" prefix="AQH_USER_RTFLAGS_">
+        <item name="MODIFIED"    value="0x00000001" />
+        <item name="PERMSCALC"   value="0x00000002" />
+     </define>
+      
+    </defines>
+
+    <enums>
+
+      <enum id="AQH_USER_STATE" prefix="AQH_UserState_">
+        <item name="suspended">
+          <descr>User suspended</descr>
+        </item>
+
+        <item name="waitForConfirmation">
+          <descr>Waiting for email confirmation</descr>
+        </item>
+
+        <item name="waitForApproval">
+          <descr>Waiting for approval by admin</descr>
+        </item>
+
+        <item name="active">
+          <descr>User active</descr>
+        </item>
+
+      </enum>
+
+    </enums>
+
+
+    <members>
+  
+      <member name="id" type="uint32_t" maxlen="4">
+        <default>0</default>
+        <preset>0</preset>
+        <access>public</access>
+        <flags>with_getbymember sortbymember</flags>
+      </member>
+
+      <member name="flags" type="uint32_t" maxlen="4">
+        <default>0</default>
+        <preset>0</preset>
+        <access>public</access>
+        <flags>with_flags</flags>
+      </member>
+
+      <member name="state" type="int" maxlen="4">
+        <default>0</default>
+        <preset>0</preset>
+        <access>public</access>
+        <flags>sortbymember</flags>
+      </member>
+
+      <member name="name" type="char_ptr" maxlen="16">
+        <default>0</default>
+        <preset>0</preset>
+        <access>public</access>
+        <flags>own sortbymember</flags>
+      </member>
+
+      <member name="alias" type="char_ptr" maxlen="16">
+        <default>0</default>
+        <preset>0</preset>
+        <access>public</access>
+        <flags>own with_getbymember sortbymember</flags>
+      </member>
+
+      <member name="hashedPassword" type="char_ptr" maxlen="128">
+        <default>0</default>
+        <preset>0</preset>
+        <access>public</access>
+        <flags>own</flags>
+      </member>
+
+      <member name="email" type="char_ptr" maxlen="128">
+        <default>0</default>
+        <preset>0</preset>
+        <access>public</access>
+        <flags>own with_getbymember sortbymember</flags>
+      </member>
+
+      <member name="notes" type="char_ptr" maxlen="256">
+        <default>0</default>
+        <preset>0</preset>
+        <access>public</access>
+        <flags>own</flags>
+      </member>
+
+      <member name="timestampCreation" type="gwen_timestamp" maxlen="8">
+        <default>NULL</default>
+        <preset>NULL</preset>
+        <access>public</access>
+        <flags>own sortbymember</flags>
+      </member>
+
+      <member name="timestampLastLogin" type="gwen_timestamp" maxlen="8">
+        <default>NULL</default>
+        <preset>NULL</preset>
+        <access>public</access>
+        <flags>own sortbymember</flags>
+      </member>
+
+      <member name="modulePermList" type="AQH_MODULE_PERMS_LIST">
+        <default>NULL</default>
+        <preset>NULL</preset>
+        <access>public</access>
+        <getflags>none</getflags>
+        <setflags>none</setflags>
+        <flags>own</flags>
+      </member>
+
+
+      <member name="runtimeFlags" type="uint32_t" maxlen="4">
+        <default>0</default>
+        <preset>0</preset>
+        <access>public</access>
+        <flags>volatile with_flags</flags>
+      </member>
+
+    </members>
+    
+  </type>
+  
+</tm2>
+

apps/aqhome-cgi/service_file.c

@@ -0,0 +1,612 @@
+/****************************************************************************
+ * This file is part of the project AqHome.
+ * AqHome (c) by 2025 Martin Preuss, all rights reserved.
+ *
+ * The license for this file can be found in the file COPYING which you
+ * should have received along with this file.
+ ****************************************************************************/
+
+#ifdef HAVE_CONFIG_H
+# include <config.h>
+#endif
+
+//#define DISABLE_DEBUGLOG
+
+
+#include "./service_file_p.h"
+
+#include <gwenhywfar/misc.h>
+#include <gwenhywfar/debug.h>
+
+
+
+/* ------------------------------------------------------------------------------------------------
+ * defs and enums
+ * ------------------------------------------------------------------------------------------------
+ */
+
+#define AQH_SERVICE_FILE_GROUP_USERS    "users"
+#define AQH_SERVICE_FILE_GROUP_MODULES  "modules"
+#define AQH_SERVICE_FILE_GROUP_SESSIONS "sessions"
+
+
+/* ------------------------------------------------------------------------------------------------
+ * global vars
+ * ------------------------------------------------------------------------------------------------
+ */
+
+GWEN_INHERIT(AQH_SERVICE, AQH_SERVICE_FILE)
+
+
+
+/* ------------------------------------------------------------------------------------------------
+ * forward declarations
+ * ------------------------------------------------------------------------------------------------
+ */
+
+static void GWENHYWFAR_CB _freeData(void *bp, void *p);
+
+static AQH_USER *_loadUser(AQH_SERVICE *sv, const char *s);
+static int _saveUser(AQH_SERVICE *sv, AQH_USER *user);
+static int _addUser(AQH_SERVICE *sv, AQH_USER *user);
+static int _delUser(AQH_SERVICE *sv, const char *s);
+static GWEN_STRINGLIST *_listUsers(AQH_SERVICE *sv);
+
+static AQH_MODULE *_loadModule(AQH_SERVICE *sv, const char *s);
+static int _saveModule(AQH_SERVICE *sv, AQH_MODULE *module);
+static int _addModule(AQH_SERVICE *sv, AQH_MODULE *module);
+static int _delModule(AQH_SERVICE *sv, const char *s);
+static GWEN_STRINGLIST *_listModules(AQH_SERVICE *sv);
+
+static AQH_SESSION* _loadSession(AQH_SERVICE *sv, const char *s);
+static int _saveSession(AQH_SERVICE *sv, AQH_SESSION *session);
+static int _addSession(AQH_SERVICE *sv, AQH_SESSION *session);
+static int _delSession(AQH_SERVICE *sv, const char *s);
+static GWEN_STRINGLIST *_listSessions(AQH_SERVICE *sv);
+
+static GWEN_DB_NODE *_loadGroupLocked(AQH_SERVICE *sv, const char *groupName, const char *subGroupName);
+static int _saveGroupLocked(AQH_SERVICE *sv, const char *groupName, const char *subGroupName, GWEN_DB_NODE *db);
+static int _addGroupLocked(AQH_SERVICE *sv, const char *groupName, const char *subGroupName, GWEN_DB_NODE *db);
+static int _deleteGroup(AQH_SERVICE *sv, const char *groupName, const char *subGroupName);
+static GWEN_STRINGLIST *_listGroup(AQH_SERVICE *sv, const char *groupName);
+
+//static void _logGroup(const char *groupName, const char *subGroupName, GWEN_DB_NODE *db);
+
+
+
+/* ------------------------------------------------------------------------------------------------
+ * code
+ * ------------------------------------------------------------------------------------------------
+ */
+
+AQH_SERVICE *AQH_ServiceFiles_new(const char *baseFolder, const char *baseUrl)
+{
+  AQH_SERVICE *sv;
+  AQH_SERVICE_FILE *xs;
+  GWEN_BUFFER *dbuf;
+
+  sv=AQH_Service_new(baseFolder, baseUrl);
+  GWEN_NEW_OBJECT(AQH_SERVICE_FILE, xs);
+  GWEN_INHERIT_SETDATA(AQH_SERVICE, AQH_SERVICE_FILE, sv, xs, _freeData);
+
+  AQH_Service_SetLoadUserFn(sv, _loadUser);
+  AQH_Service_SetSaveUserFn(sv, _saveUser);
+  AQH_Service_SetAddUserFn(sv, _addUser);
+  AQH_Service_SetDelUserFn(sv, _delUser);
+  AQH_Service_SetListUsersFn(sv, _listUsers);
+
+  AQH_Service_SetLoadModuleFn(sv, _loadModule);
+  AQH_Service_SetSaveModuleFn(sv, _saveModule);
+  AQH_Service_SetAddModuleFn(sv, _addModule);
+  AQH_Service_SetDelModuleFn(sv, _delModule);
+  AQH_Service_SetListModulesFn(sv, _listModules);
+
+  AQH_Service_SetLoadSessionFn(sv, _loadSession);
+  AQH_Service_SetSaveSessionFn(sv, _saveSession);
+  AQH_Service_SetAddSessionFn(sv, _addSession);
+  AQH_Service_SetDelSessionFn(sv, _delSession);
+  AQH_Service_SetListSessionsFn(sv, _listSessions);
+
+  dbuf=GWEN_Buffer_new(0, 256, 0, 1);
+  GWEN_Buffer_AppendArgs(dbuf, "dir://%s", AQH_Service_GetRuntimeFolder(sv));
+  DBG_ERROR(NULL, "Creating config mgr \"%s\"", GWEN_Buffer_GetStart(dbuf));
+  xs->configMgr=GWEN_ConfigMgr_Factory(GWEN_Buffer_GetStart(dbuf));
+  if (xs->configMgr==NULL) {
+    DBG_ERROR(NULL, "Error creating config mgr \"%s\"", GWEN_Buffer_GetStart(dbuf));
+    GWEN_Buffer_free(dbuf);
+    AQH_Service_free(sv);
+    return NULL;
+  }
+  GWEN_Buffer_free(dbuf);
+
+  return sv;
+}
+
+
+
+void GWENHYWFAR_CB _freeData(GWEN_UNUSED void *bp, void *p)
+{
+  AQH_SERVICE_FILE *xs;
+
+  xs=(AQH_SERVICE_FILE*) p;
+  GWEN_ConfigMgr_free(xs->configMgr);
+  GWEN_FREE_OBJECT(xs);
+}
+
+
+
+AQH_USER *_loadUser(AQH_SERVICE *sv, const char *s)
+{
+  GWEN_DB_NODE *db;
+
+  db=_loadGroupLocked(sv, AQH_SERVICE_FILE_GROUP_USERS, s);
+  if (db) {
+    AQH_USER *user;
+
+    user=AQH_User_fromDb(db);
+    GWEN_DB_Group_free(db);
+    return user;
+  }
+
+  return NULL;
+}
+
+
+
+int _saveUser(AQH_SERVICE *sv, AQH_USER *user)
+{
+  const char *s;
+
+  s=AQH_User_GetAlias(user);
+  if (s && *s) {
+    GWEN_DB_NODE *db;
+    int rv;
+
+    db=GWEN_DB_Group_new(s);
+    rv=AQH_User_toDb(user, db);
+    if (rv<0) {
+      DBG_ERROR(NULL, "here (%d)", rv);
+      GWEN_DB_Group_free(db);
+      return rv;
+    }
+
+    //_logGroup(AQH_SERVICE_FILE_GROUP_USERS, s, db);
+
+    rv=_saveGroupLocked(sv, AQH_SERVICE_FILE_GROUP_USERS, s, db);
+    if (rv<0) {
+      DBG_ERROR(NULL, "here (%d)", rv);
+      GWEN_DB_Group_free(db);
+      return rv;
+    }
+    GWEN_DB_Group_free(db);
+    return 0;
+  }
+  return GWEN_ERROR_INVALID;
+}
+
+
+
+int _addUser(AQH_SERVICE *sv, AQH_USER *user)
+{
+  const char *s;
+
+  s=AQH_User_GetAlias(user);
+  if (s && *s) {
+    GWEN_DB_NODE *db;
+    int rv;
+
+    db=GWEN_DB_Group_new(s);
+    rv=AQH_User_toDb(user, db);
+    if (rv<0) {
+      DBG_ERROR(NULL, "here (%d)", rv);
+      GWEN_DB_Group_free(db);
+      return rv;
+    }
+    rv=_addGroupLocked(sv, AQH_SERVICE_FILE_GROUP_USERS, s, db);
+    if (rv<0) {
+      DBG_ERROR(NULL, "here (%d)", rv);
+      GWEN_DB_Group_free(db);
+      return rv;
+    }
+    GWEN_DB_Group_free(db);
+    return 0;
+  }
+  else {
+    DBG_ERROR(NULL, "Missing alias");
+  }
+  return GWEN_ERROR_INVALID;
+}
+
+
+
+int _delUser(AQH_SERVICE *sv, const char *s)
+{
+  return _deleteGroup(sv, AQH_SERVICE_FILE_GROUP_USERS, s);
+}
+
+
+
+GWEN_STRINGLIST *_listUsers(AQH_SERVICE *sv)
+{
+  return _listGroup(sv, AQH_SERVICE_FILE_GROUP_USERS);
+}
+
+
+
+AQH_MODULE *_loadModule(AQH_SERVICE *sv, const char *s)
+{
+  GWEN_DB_NODE *db;
+
+  db=_loadGroupLocked(sv, AQH_SERVICE_FILE_GROUP_MODULES, s);
+  if (db) {
+    AQH_MODULE *module;
+
+    module=AQH_Module_fromDb(db);
+    GWEN_DB_Group_free(db);
+    return module;
+  }
+
+  return NULL;
+}
+
+
+
+int _saveModule(AQH_SERVICE *sv, AQH_MODULE *module)
+{
+  const char *s;
+
+  s=AQH_Module_GetName(module);
+  if (s && *s) {
+    GWEN_DB_NODE *db;
+    int rv;
+
+    db=GWEN_DB_Group_new(s);
+    rv=AQH_Module_toDb(module, db);
+    if (rv<0) {
+      DBG_ERROR(NULL, "here (%d)", rv);
+      GWEN_DB_Group_free(db);
+      return rv;
+    }
+    rv=_saveGroupLocked(sv, AQH_SERVICE_FILE_GROUP_MODULES, s, db);
+    if (rv<0) {
+      DBG_ERROR(NULL, "here (%d)", rv);
+      GWEN_DB_Group_free(db);
+      return rv;
+    }
+    GWEN_DB_Group_free(db);
+    return 0;
+  }
+  return GWEN_ERROR_INVALID;
+}
+
+
+
+int _addModule(AQH_SERVICE *sv, AQH_MODULE *module)
+{
+  const char *s;
+
+  s=AQH_Module_GetName(module);
+  if (s && *s) {
+    GWEN_DB_NODE *db;
+    int rv;
+
+    db=GWEN_DB_Group_new(s);
+    rv=AQH_Module_toDb(module, db);
+    if (rv<0) {
+      DBG_ERROR(NULL, "here (%d)", rv);
+      GWEN_DB_Group_free(db);
+      return rv;
+    }
+    rv=_addGroupLocked(sv, AQH_SERVICE_FILE_GROUP_MODULES, s, db);
+    if (rv<0) {
+      DBG_ERROR(NULL, "here (%d)", rv);
+      GWEN_DB_Group_free(db);
+      return rv;
+    }
+    GWEN_DB_Group_free(db);
+    return 0;
+  }
+  return GWEN_ERROR_INVALID;
+}
+
+
+
+int _delModule(AQH_SERVICE *sv, const char *s)
+{
+  return _deleteGroup(sv, AQH_SERVICE_FILE_GROUP_MODULES, s);
+}
+
+
+
+GWEN_STRINGLIST *_listModules(AQH_SERVICE *sv)
+{
+  return _listGroup(sv, AQH_SERVICE_FILE_GROUP_MODULES);
+}
+
+
+
+
+AQH_SESSION* _loadSession(AQH_SERVICE *sv, const char *s)
+{
+  GWEN_DB_NODE *db;
+
+  db=_loadGroupLocked(sv, AQH_SERVICE_FILE_GROUP_SESSIONS, s);
+  if (db) {
+    AQH_SESSION *session;
+
+    session=AQH_Session_fromDb(db);
+    GWEN_DB_Group_free(db);
+    return session;
+  }
+
+  return NULL;
+}
+
+
+
+int _saveSession(AQH_SERVICE *sv, AQH_SESSION *session)
+{
+  const char *s;
+
+  s=AQH_Session_GetUid(session);
+  if (s && *s) {
+    GWEN_DB_NODE *db;
+    int rv;
+
+    db=GWEN_DB_Group_new(s);
+    rv=AQH_Session_toDb(session, db);
+    if (rv<0) {
+      DBG_ERROR(NULL, "here (%d)", rv);
+      GWEN_DB_Group_free(db);
+      return rv;
+    }
+    rv=_saveGroupLocked(sv, AQH_SERVICE_FILE_GROUP_SESSIONS, s, db);
+    if (rv<0) {
+      DBG_ERROR(NULL, "here (%d)", rv);
+      GWEN_DB_Group_free(db);
+      return rv;
+    }
+    GWEN_DB_Group_free(db);
+    return 0;
+  }
+  return GWEN_ERROR_INVALID;
+}
+
+
+
+int _addSession(AQH_SERVICE *sv, AQH_SESSION *session)
+{
+  const char *s;
+
+  s=AQH_Session_GetUid(session);
+  if (s && *s) {
+    GWEN_DB_NODE *db;
+    int rv;
+
+    db=GWEN_DB_Group_new(s);
+    rv=AQH_Session_toDb(session, db);
+    if (rv<0) {
+      DBG_ERROR(NULL, "here (%d)", rv);
+      GWEN_DB_Group_free(db);
+      return rv;
+    }
+    rv=_addGroupLocked(sv, AQH_SERVICE_FILE_GROUP_SESSIONS, s, db);
+    if (rv<0) {
+      DBG_ERROR(NULL, "here (%d)", rv);
+      GWEN_DB_Group_free(db);
+      return rv;
+    }
+    GWEN_DB_Group_free(db);
+    return 0;
+  }
+  return GWEN_ERROR_INVALID;
+}
+
+
+
+int _delSession(AQH_SERVICE *sv, const char *s)
+{
+  return _deleteGroup(sv, AQH_SERVICE_FILE_GROUP_SESSIONS, s);
+}
+
+
+
+GWEN_STRINGLIST *_listSessions(AQH_SERVICE *sv)
+{
+  return _listGroup(sv, AQH_SERVICE_FILE_GROUP_SESSIONS);
+}
+
+
+
+GWEN_DB_NODE *_loadGroupLocked(AQH_SERVICE *sv, const char *groupName, const char *subGroupName)
+{
+  DBG_ERROR(NULL, "Lock and load group %s/%s", groupName, subGroupName);
+  if (sv && groupName && subGroupName) {
+    AQH_SERVICE_FILE *xs;
+
+    xs=GWEN_INHERIT_GETDATA(AQH_SERVICE, AQH_SERVICE_FILE, sv);
+    if (xs) {
+      GWEN_DB_NODE *db=NULL;
+      int rv;
+
+      DBG_ERROR(NULL, "Locking group %s/%s", groupName, subGroupName);
+      rv=GWEN_ConfigMgr_LockGroup(xs->configMgr, groupName, subGroupName);
+      if (rv<0) {
+	DBG_ERROR(NULL, "Error locking group \"%s/%s\": %d", groupName, subGroupName, rv);
+	return NULL;
+      }
+      DBG_ERROR(NULL, "Loading group %s/%s", groupName, subGroupName);
+      rv=GWEN_ConfigMgr_GetGroup(xs->configMgr, groupName, subGroupName, &db);
+      if (rv<0) {
+	DBG_ERROR(NULL, "Error reading group \"%s/%s\": %d", groupName, subGroupName, rv);
+	GWEN_ConfigMgr_UnlockGroup(xs->configMgr, groupName, subGroupName);
+	return NULL;
+      }
+      DBG_ERROR(NULL, "Unlocking group %s/%s", groupName, subGroupName);
+      rv=GWEN_ConfigMgr_UnlockGroup(xs->configMgr, groupName, subGroupName);
+      if (rv<0) {
+	DBG_ERROR(NULL, "Error unlocking group \"%s/%s\": %d", groupName, subGroupName, rv);
+	GWEN_DB_Group_free(db);
+	return NULL;
+      }
+      return db;
+    }
+  }
+  else {
+    DBG_ERROR(NULL, "Missing argument");
+  }
+  return NULL;
+}
+
+
+
+int _saveGroupLocked(AQH_SERVICE *sv, const char *groupName, const char *subGroupName, GWEN_DB_NODE *db)
+{
+  if (sv && groupName && subGroupName && db) {
+    AQH_SERVICE_FILE *xs;
+
+    xs=GWEN_INHERIT_GETDATA(AQH_SERVICE, AQH_SERVICE_FILE, sv);
+    if (xs) {
+      int rv;
+
+      DBG_ERROR(NULL, "Locking group %s/%s", groupName, subGroupName);
+      rv=GWEN_ConfigMgr_LockGroup(xs->configMgr, groupName, subGroupName);
+      if (rv<0) {
+	DBG_ERROR(NULL, "Error locking group \"%s/%s\": %d", groupName, subGroupName, rv);
+	return rv;
+      }
+
+      DBG_ERROR(NULL, "Writing group %s/%s", groupName, subGroupName);
+      rv=GWEN_ConfigMgr_SetGroup(xs->configMgr, groupName, subGroupName, db);
+      if (rv<0) {
+	DBG_ERROR(NULL, "Error writing group \"%s/%s\": %d", groupName, subGroupName, rv);
+	return rv;
+      }
+
+      DBG_ERROR(NULL, "Unlocking group %s/%s", groupName, subGroupName);
+      rv=GWEN_ConfigMgr_UnlockGroup(xs->configMgr, groupName, subGroupName);
+      if (rv<0) {
+	DBG_ERROR(NULL, "Error unlocking group \"%s/%s\": %d", groupName, subGroupName, rv);
+	return rv;
+      }
+
+      return 0;
+    }
+  }
+  return GWEN_ERROR_INVALID;
+}
+
+
+
+int _addGroupLocked(AQH_SERVICE *sv, const char *groupName, const char *subGroupName, GWEN_DB_NODE *db)
+{
+  if (sv && groupName && subGroupName && db) {
+    AQH_SERVICE_FILE *xs;
+
+    xs=GWEN_INHERIT_GETDATA(AQH_SERVICE, AQH_SERVICE_FILE, sv);
+    if (xs) {
+      int rv;
+
+      rv=GWEN_ConfigMgr_HasGroup(xs->configMgr, groupName, subGroupName);
+      if (rv>=0) {
+	DBG_ERROR(NULL, "Group \"%s/%s\" already exists", groupName, subGroupName);
+	return GWEN_ERROR_FOUND;
+      }
+
+      rv=GWEN_ConfigMgr_LockGroup(xs->configMgr, groupName, subGroupName);
+      if (rv<0) {
+	DBG_ERROR(NULL, "Error locking group \"%s/%s\": %d", groupName, subGroupName, rv);
+	return rv;
+      }
+
+      rv=GWEN_ConfigMgr_SetGroup(xs->configMgr, groupName, subGroupName, db);
+      if (rv<0) {
+	DBG_ERROR(NULL, "Error writing group \"%s/%s\": %d", groupName, subGroupName, rv);
+	return rv;
+      }
+
+      rv=GWEN_ConfigMgr_UnlockGroup(xs->configMgr, groupName, subGroupName);
+      if (rv<0) {
+	DBG_ERROR(NULL, "Error unlocking group \"%s/%s\": %d", groupName, subGroupName, rv);
+	return rv;
+      }
+
+      return 0;
+    }
+  }
+  return GWEN_ERROR_INVALID;
+}
+
+
+
+int _deleteGroup(AQH_SERVICE *sv, const char *groupName, const char *subGroupName)
+{
+  if (sv && groupName && subGroupName) {
+    AQH_SERVICE_FILE *xs;
+
+    xs=GWEN_INHERIT_GETDATA(AQH_SERVICE, AQH_SERVICE_FILE, sv);
+    if (xs) {
+      int rv;
+
+      rv=GWEN_ConfigMgr_DeleteGroup(xs->configMgr, groupName, subGroupName);
+      if (rv<0) {
+	DBG_ERROR(NULL, "Error writing group \"%s/%s\": %d", groupName, subGroupName, rv);
+	return rv;
+      }
+      return 0;
+    }
+  }
+  return GWEN_ERROR_INVALID;
+}
+
+
+
+GWEN_STRINGLIST *_listGroup(AQH_SERVICE *sv, const char *groupName)
+{
+  if (sv && groupName) {
+    AQH_SERVICE_FILE *xs;
+
+    xs=GWEN_INHERIT_GETDATA(AQH_SERVICE, AQH_SERVICE_FILE, sv);
+    if (xs) {
+      GWEN_STRINGLIST *sl;
+      int rv;
+
+      sl=GWEN_StringList_new();
+      rv=GWEN_ConfigMgr_ListSubGroups(xs->configMgr, groupName, sl);
+      if (rv<0) {
+	DBG_ERROR(NULL, "Error listing group \"%s\": %d", groupName, rv);
+	GWEN_StringList_free(sl);
+	return NULL;
+      }
+      if (GWEN_StringList_Count(sl)==0) {
+	GWEN_StringList_free(sl);
+	return NULL;
+      }
+      return sl;
+    }
+  }
+  return NULL;
+}
+
+
+
+#if 0
+void _logGroup(const char *groupName, const char *subGroupName, GWEN_DB_NODE *db)
+{
+  if (db) {
+    GWEN_BUFFER *dbuf;
+
+    dbuf=GWEN_Buffer_new(0, 256, 0, 1);
+    GWEN_DB_WriteToBuffer(db, dbuf, GWEN_DB_FLAGS_DEFAULT);
+    DBG_ERROR(NULL, "Group %s/%s:\n%s", groupName?groupName:"<empty>", subGroupName?subGroupName:"<empty>",
+              GWEN_Buffer_GetStart(dbuf));
+    GWEN_Buffer_free(dbuf);
+  }
+  else {
+    DBG_ERROR(NULL, "Group %s/%s empty", groupName?groupName:"<empty>", subGroupName?subGroupName:"<empty>");
+  }
+}
+#endif
+
+
+

apps/aqhome-cgi/service_file.h

@@ -0,0 +1,21 @@
+/****************************************************************************
+ * This file is part of the project AqHome.
+ * AqHome (c) by 2025 Martin Preuss, all rights reserved.
+ *
+ * The license for this file can be found in the file COPYING which you
+ * should have received along with this file.
+ ****************************************************************************/
+
+#ifndef AQHOME_SERVICE_FILE_H
+#define AQHOME_SERVICE_FILE_H
+
+
+#include "aqhome-cgi/service/service.h"
+
+
+AQH_SERVICE *AQH_ServiceFiles_new(const char *baseFolder, const char *baseUrl);
+
+
+
+
+#endif

apps/aqhome-cgi/service_file_p.h

@@ -0,0 +1,27 @@
+/****************************************************************************
+ * This file is part of the project AqHome.
+ * AqHome (c) by 2025 Martin Preuss, all rights reserved.
+ *
+ * The license for this file can be found in the file COPYING which you
+ * should have received along with this file.
+ ****************************************************************************/
+
+#ifndef AQHOME_SERVICE_FILE_P_H
+#define AQHOME_SERVICE_FILE_P_H
+
+
+#include "aqhome-cgi/service_file.h"
+
+#include <gwenhywfar/configmgr.h>
+
+
+
+typedef struct AQH_SERVICE_FILE AQH_SERVICE_FILE;
+struct AQH_SERVICE_FILE {
+  GWEN_CONFIGMGR *configMgr;
+};
+
+
+
+
+#endif

apps/aqhome-data/main.c

@@ -120,8 +120,9 @@ int main(int argc, char **argv)
 
   _runService(aqh, eventLoop);
 
-  //AqHomeData_Fini(aqh);
+  AqHomeDataServer_Fini(aqh);
   AQH_Object_free(aqh);
+  AQH_EventLoop_free(eventLoop);
 
   GWEN_Gui_SetGui(NULL);
   GWEN_Gui_free(gui);

apps/aqhome-data/s_getdatapoints.c

@@ -1,6 +1,6 @@
 /****************************************************************************
  * This file is part of the project AqHome.
- * AqHome (c) by 2023 Martin Preuss, all rights reserved.
+ * AqHome (c) by 2025 Martin Preuss, all rights reserved.
  *
  * The license for this file can be found in the file COPYING which you
  * should have received along with this file.
@@ -33,8 +33,8 @@
  * ------------------------------------------------------------------------------------------------
  */
 
-#define AQHOMEDATA_HANDLEGETDATAPOINTS_MAXTABLEENTRIES     2048
-#define AQHOMEDATA_HANDLEGETDATAPOINTS_MAXDATAPOINTS       1024
+#define AQHOMEDATA_HANDLEGETDATAPOINTS_MAXTABLEENTRIES     1024
+#define AQHOMEDATA_HANDLEGETDATAPOINTS_MAXDATAPOINTS        512
 
 
 /* ------------------------------------------------------------------------------------------------
@@ -44,13 +44,15 @@
 
 static int _getAndSendDataPoints(AQH_STORAGE *storage, AQH_OBJECT *ep,
                                  const AQH_VALUE *value,
+                                 int mode,
                                  uint64_t tsBegin, uint64_t tsEnd, uint64_t num, uint32_t refMsgId);
-static int _getAndSendDataPointsNoNum(AQH_STORAGE *storage, AQH_OBJECT *ep, const AQH_VALUE *value, uint64_t tsBegin, uint64_t tsEnd,
+static int _getAndSendDataPointsPeriod(AQH_STORAGE *storage, AQH_OBJECT *ep, const AQH_VALUE *value,
+                                       uint64_t tsBegin, uint64_t tsEnd, uint64_t num,
                                       uint32_t refMsgId);
-static int _getAndSendDataPointsWithNum(AQH_STORAGE *storage, AQH_OBJECT *ep, const AQH_VALUE *value, uint64_t num, uint32_t refMsgId);
+static int _getAndSendDataPointsFirst(AQH_STORAGE *storage, AQH_OBJECT *ep, const AQH_VALUE *value, uint64_t num, uint32_t refMsgId);
+static int _getAndSendDataPointsLast(AQH_STORAGE *storage, AQH_OBJECT *ep, const AQH_VALUE *value, uint64_t num, uint32_t refMsgId);
 static void _sendDataPointsResponse(AQH_OBJECT *ep, const AQH_VALUE *value, const uint64_t *tablePtr,
                                     uint32_t refMsgId);
-static void _getAndSendLastDatapoint(AQH_STORAGE *storage, AQH_OBJECT *ep, const AQH_VALUE *value, uint32_t refMsgId);
 
 
 
@@ -79,16 +81,18 @@ void AqHomeDataServer_HandleGetDataPoints(AQH_OBJECT *o, AQH_OBJECT *ep, const A
           uint64_t tsBegin;
           uint64_t tsEnd;
           uint64_t numRequested;
+          int mode;
   
           tsBegin=AQH_Tag16_GetTagDataAsUint64(tagList, AQH_MSGDATA_GETDATA_TAGS_BEGIN, 0);
           tsEnd=AQH_Tag16_GetTagDataAsUint64(tagList, AQH_MSGDATA_GETDATA_TAGS_END, 0);
           numRequested=AQH_Tag16_GetTagDataAsUint64(tagList, AQH_MSGDATA_GETDATA_TAGS_NUM, 0);
+          mode=AQH_Tag16_GetTagDataAsUint64(tagList, AQH_MSGDATA_GETDATA_TAGS_MODE, AQH_MSGDATA_GETDATA_MODE_FIRST);
   
           value=AQH_Storage_GetValueByNameForSystem(xo->storage, valueName);
           if (value) {
             int resultCode;
   
-            resultCode=_getAndSendDataPoints(xo->storage, ep, value, tsBegin, tsEnd, numRequested, refMsgId);
+            resultCode=_getAndSendDataPoints(xo->storage, ep, value, mode, tsBegin, tsEnd, numRequested, refMsgId);
             AqHomeDataServer_SendResponseResultToEndpoint(ep, refMsgId, resultCode);
           }
           else {
@@ -114,30 +118,29 @@ void AqHomeDataServer_HandleGetDataPoints(AQH_OBJECT *o, AQH_OBJECT *ep, const A
 
 int _getAndSendDataPoints(AQH_STORAGE *storage, AQH_OBJECT *ep,
                           const AQH_VALUE *value,
+                          int mode,
                           uint64_t tsBegin, uint64_t tsEnd, uint64_t num,
                           uint32_t refMsgId)
 {
-  if (num==0)
-    return _getAndSendDataPointsNoNum(storage, ep, value, tsBegin, tsEnd, refMsgId);
-  else if (num==1) {
-    _getAndSendLastDatapoint(storage, ep, value, refMsgId);
-    return AQH_MSGDATA_RESULT_SUCCESS;
+  switch(mode) {
+  case AQH_MSGDATA_GETDATA_MODE_FIRST:  return _getAndSendDataPointsFirst(storage, ep, value, num, refMsgId);
+  case AQH_MSGDATA_GETDATA_MODE_PERIOD: return _getAndSendDataPointsPeriod(storage, ep, value, tsBegin, tsEnd, num, refMsgId);
+  default:
+  case AQH_MSGDATA_GETDATA_MODE_LAST:   return _getAndSendDataPointsLast(storage, ep, value, num, refMsgId);
   }
-  else
-    return _getAndSendDataPointsWithNum(storage, ep, value, num, refMsgId);
 }
 
 
 
-int _getAndSendDataPointsNoNum(AQH_STORAGE *storage, AQH_OBJECT *ep,
-                               const AQH_VALUE *value, uint64_t tsBegin, uint64_t tsEnd,
-                               uint32_t refMsgId)
+int _getAndSendDataPointsPeriod(AQH_STORAGE *storage, AQH_OBJECT *ep,
+                                const AQH_VALUE *value, uint64_t tsBegin, uint64_t tsEnd, uint64_t num,
+                                uint32_t refMsgId)
 {
   uint64_t valueId;
   uint64_t *tablePtr;
-  
+
   valueId=AQH_Value_GetId(value);
-  tablePtr=AQH_Storage_GetDataPoints(storage, valueId, tsBegin, tsEnd, AQHOMEDATA_HANDLEGETDATAPOINTS_MAXTABLEENTRIES);
+  tablePtr=AQH_Storage_GetDataPoints(storage, valueId, tsBegin, tsEnd, num);
   if (tablePtr) {
     _sendDataPointsResponse(ep, value, tablePtr, refMsgId);
     free(tablePtr);
@@ -151,15 +154,13 @@ int _getAndSendDataPointsNoNum(AQH_STORAGE *storage, AQH_OBJECT *ep,
 
 
 
-int _getAndSendDataPointsWithNum(AQH_STORAGE *storage, AQH_OBJECT *ep,
-                                 const AQH_VALUE *value, uint64_t num,
-                                 uint32_t refMsgId)
+int _getAndSendDataPointsLast(AQH_STORAGE *storage, AQH_OBJECT *ep,
+                              const AQH_VALUE *value, uint64_t num,
+                              uint32_t refMsgId)
 {
   uint64_t valueId;
   uint64_t *tablePtr;
 
-  if (num>AQHOMEDATA_HANDLEGETDATAPOINTS_MAXDATAPOINTS)
-    num=AQHOMEDATA_HANDLEGETDATAPOINTS_MAXDATAPOINTS;
   valueId=AQH_Value_GetId(value);
   tablePtr=AQH_Storage_GetLastNDataPoints(storage, valueId, num);
   if (tablePtr) {
@@ -175,54 +176,57 @@ int _getAndSendDataPointsWithNum(AQH_STORAGE *storage, AQH_OBJECT *ep,
 
 
 
+int _getAndSendDataPointsFirst(AQH_STORAGE *storage, AQH_OBJECT *ep,
+                               const AQH_VALUE *value, uint64_t num,
+                               uint32_t refMsgId)
+{
+  uint64_t valueId;
+  uint64_t *tablePtr;
+
+  valueId=AQH_Value_GetId(value);
+  tablePtr=AQH_Storage_GetFirstNDataPoints(storage, valueId, num);
+  if (tablePtr) {
+    _sendDataPointsResponse(ep, value, tablePtr, refMsgId);
+    free(tablePtr);
+    return AQH_MSGDATA_RESULT_SUCCESS;
+  }
+  else {
+    DBG_INFO(NULL, "No matching datapoints for value \"%s\"", AQH_Value_GetNameForSystem(value));
+    return AQH_MSGDATA_RESULT_ERROR_NODATA;
+  }
+}
+
+
+
 void _sendDataPointsResponse(AQH_OBJECT *ep,
                              const AQH_VALUE *value, const uint64_t *tablePtr,
                              uint32_t refMsgId)
 {
   int numTableEntries;
   int numDataPoints;
-  AQH_MESSAGE *outMsg;
 
   numTableEntries=(int)(tablePtr[0]);
   numDataPoints=numTableEntries/2;
-  outMsg=AQH_IpcdMessageMultiData_new(AQH_MSGTYPE_IPC_DATA_GETDATA_RSP,
-                                      AQH_Endpoint_GetNextMessageId(ep), refMsgId,
-                                      value, &(tablePtr[1]), numDataPoints);
-  AQH_Endpoint_AddMsgOut(ep, outMsg);
-}
+  tablePtr++;
 
-
-
-void _getAndSendLastDatapoint(AQH_STORAGE *storage, AQH_OBJECT *ep,
-                              const AQH_VALUE *value, uint32_t refMsgId)
-{
-  int rv;
-  uint64_t timestamp=0;
-  double data=0.0;
-
-  rv=AQH_Storage_GetLastDataPoint(storage, AQH_Value_GetId(value), &timestamp, &data);
-  if (rv<0) {
-    int resultCode;
-
-    switch(rv) {
-    case GWEN_ERROR_INVALID:   resultCode=AQH_MSGDATA_RESULT_ERROR_INVALID; break;
-    case GWEN_ERROR_NO_DATA:   resultCode=AQH_MSGDATA_RESULT_ERROR_NODATA;  break;
-    default:                   resultCode=AQH_MSGDATA_RESULT_ERROR_GENERIC; break;
-    }
-    AqHomeDataServer_SendResponseResultToEndpoint(ep, refMsgId, resultCode);
-  }
-  else {
+  while(numDataPoints) {
     AQH_MESSAGE *outMsg;
+    int toSend;
+    uint32_t flags=0;
 
-    outMsg=AQH_IpcdMessageMultiData_newForOne(AQH_MSGTYPE_IPC_DATA_GETDATA_RSP,
-                                              AQH_Endpoint_GetNextMessageId(ep), refMsgId,
-                                              value, timestamp, data);
+    toSend=numDataPoints;
+    if (toSend>AQHOMEDATA_HANDLEGETDATAPOINTS_MAXDATAPOINTS)
+      toSend=AQHOMEDATA_HANDLEGETDATAPOINTS_MAXDATAPOINTS;
+    numDataPoints-=toSend;
+    if (numDataPoints==0)
+      flags|=AQH_MSGDATA_MULTIDATA_FLAGS_LASTMSG;
+    outMsg=AQH_IpcdMessageMultiData_new(AQH_MSGTYPE_IPC_DATA_GETDATA_RSP,
+                                        AQH_Endpoint_GetNextMessageId(ep), refMsgId, flags,
+                                        value, tablePtr, toSend);
+    tablePtr+=(toSend*2);
     AQH_Endpoint_AddMsgOut(ep, outMsg);
   }
 }
 
 
 
-
-
-

apps/aqhome-data/s_getdevices.c

@@ -16,11 +16,13 @@
 #include "aqhome/ipc2/endpoint.h"
 #include "aqhome/msg/ipc/m_ipc.h"
 #include "aqhome/msg/ipc/data/m_ipcd.h"
+#include "aqhome/msg/ipc/data/m_ipcd_getdevices.h"
 #include "aqhome/msg/ipc/data/m_ipcd_devices.h"
 #include "aqhome/msg/ipc/m_ipc_result.h"
 #include "aqhome/msg/ipc/m_ipc_tag16.h"
 
 #include <gwenhywfar/debug.h>
+#include <gwenhywfar/text.h>
 
 
 
@@ -38,7 +40,10 @@
  * ------------------------------------------------------------------------------------------------
  */
 
-static void _sendDeviceList(AQH_OBJECT *ep, const AQH_DEVICE_LIST *vl, uint32_t flags, uint32_t refMsgId);
+static AQH_DEVICE_LIST *_getMatchingDeviceList(AQHOME_SERVER *xo, const GWEN_TAG16_LIST *tagList);
+static int _deviceMatches(const AQH_DEVICE *dev, const char *deviceName);
+static void _sendDeviceList(AQH_OBJECT *ep, const AQH_DEVICE_LIST *vl, uint32_t refMsgId);
+static void _sendDeviceListMsg(AQH_OBJECT *ep, const AQH_DEVICE_LIST *vl, uint32_t flags, uint32_t refMsgId);
 
 
 
@@ -49,67 +54,116 @@ static void _sendDeviceList(AQH_OBJECT *ep, const AQH_DEVICE_LIST *vl, uint32_t
 
 void AqHomeDataServer_HandleGetDevices(AQH_OBJECT *o, AQH_OBJECT *ep, const AQH_MESSAGE *msg, const GWEN_TAG16_LIST *tagList)
 {
-  if (tagList) {
-    AQHOME_SERVER *xo;
-  
-    xo=AqHomeDataServer_GetServerData(o);
-    if (xo) {
-      const AQH_DEVICE_LIST *origDeviceList;
-      uint32_t refMsgId;
-  
-      refMsgId=AQH_IpcMessage_GetMsgId(msg);
-  
-      DBG_ERROR(NULL, "HandleGetDevices");
-      origDeviceList=AQH_Storage_GetDeviceList(xo->storage);
-      if (origDeviceList) {
-        DBG_ERROR(NULL, "Have a list of %d devices", AQH_Device_List_GetCount(origDeviceList));
-        if (AQH_Device_List_GetCount(origDeviceList)<AQHOMEDATA_DEVICESPERMSG) {
-          DBG_ERROR(NULL, "Sending all entries in one message");
-          _sendDeviceList(ep, origDeviceList, AQH_MSGDATA_DEVICES_FLAGS_LASTMSG, refMsgId);
-        }
-        else {
-          AQH_DEVICE_LIST *tmpDeviceList;
-          const AQH_DEVICE *v;
-    
-          DBG_INFO(NULL, "Sending entries in multiple messages");
-          tmpDeviceList=AQH_Device_List_new();
-          v=AQH_Device_List_First(origDeviceList);
-          while(v) {
-            const AQH_DEVICE *next;
-            AQH_DEVICE *copyOfDevice;
-    
-            next=AQH_Device_List_Next(v);
-            copyOfDevice=AQH_Device_dup(v);
-            AQH_Device_List_Add(copyOfDevice, tmpDeviceList);
-            if (AQH_Device_List_GetCount(tmpDeviceList)>=AQHOMEDATA_DEVICESPERMSG) {
-              DBG_ERROR(NULL, "Sending %d devices", AQH_Device_List_GetCount(tmpDeviceList));
-              _sendDeviceList(ep, tmpDeviceList, next?0:AQH_MSGDATA_DEVICES_FLAGS_LASTMSG, refMsgId);
-              AQH_Device_List_Clear(tmpDeviceList);
-            }
-            v=next;
-          }
-          if (AQH_Device_List_GetCount(tmpDeviceList)) {
-            DBG_ERROR(NULL, "Sending %d devices", AQH_Device_List_GetCount(tmpDeviceList));
-            _sendDeviceList(ep, tmpDeviceList, AQH_MSGDATA_DEVICES_FLAGS_LASTMSG, refMsgId); /* send remaining */
-          }
-          AQH_Device_List_free(tmpDeviceList);
-        }
-      }
-      else {
-        /* empty list */
-        _sendDeviceList(ep, NULL, AQH_MSGDATA_DEVICES_FLAGS_LASTMSG, refMsgId);
-      }
+  AQHOME_SERVER *xo;
+
+  xo=AqHomeDataServer_GetServerData(o);
+  if (xo) {
+    AQH_DEVICE_LIST *deviceList;
+    uint32_t refMsgId;
+
+    refMsgId=AQH_IpcMessage_GetMsgId(msg);
+
+    DBG_INFO(NULL, "HandleGetDevices");
+    deviceList=_getMatchingDeviceList(xo, tagList);
+    if (deviceList) {
+      _sendDeviceList(ep, deviceList, refMsgId);
+      AQH_Device_List_free(deviceList);
+    }
+    else {
+      /* empty list */
+      _sendDeviceListMsg(ep, NULL, AQH_MSGDATA_DEVICES_FLAGS_LASTMSG, refMsgId);
     }
   }
 }
 
 
 
-void _sendDeviceList(AQH_OBJECT *ep, const AQH_DEVICE_LIST *vl, uint32_t flags, uint32_t refMsgId)
+AQH_DEVICE_LIST *_getMatchingDeviceList(AQHOME_SERVER *xo, const GWEN_TAG16_LIST *tagList)
+{
+  const AQH_DEVICE_LIST *origDeviceList;
+  AQH_DEVICE_LIST *tmpDeviceList=NULL;
+  char *deviceName;
+
+  deviceName=tagList?AQH_Tag16_GetTagDataAsNewString(tagList, AQH_MSGDATA_GETDEVICES_TAGS_DEVICENAME, NULL):NULL;
+
+  origDeviceList=AQH_Storage_GetDeviceList(xo->storage);
+  if (origDeviceList) {
+    const AQH_DEVICE *dev;
+
+    tmpDeviceList=AQH_Device_List_new();
+    dev=AQH_Device_List_First(origDeviceList);
+    while(dev) {
+      if (_deviceMatches(dev, deviceName)) {
+	AQH_DEVICE *copyOfDevice;
+
+	copyOfDevice=AQH_Device_dup(dev);
+	AQH_Device_List_Add(copyOfDevice, tmpDeviceList);
+      }
+      dev=AQH_Device_List_Next(dev);
+    }
+    if (AQH_Device_List_GetCount(tmpDeviceList)<1) {
+      AQH_Device_List_free(tmpDeviceList);
+      tmpDeviceList=NULL;
+    }
+  }
+  free(deviceName);
+
+  return tmpDeviceList;
+}
+
+
+
+int _deviceMatches(const AQH_DEVICE *dev, const char *deviceName)
+{
+  if (deviceName && *deviceName) {
+    const char *s;
+
+    s=AQH_Device_GetNameForSystem(dev);
+    if (s && *s && GWEN_Text_ComparePattern(s, deviceName, 0)==-1)
+      return 0;
+  }
+
+  return 1;
+}
+
+
+
+void _sendDeviceList(AQH_OBJECT *ep, const AQH_DEVICE_LIST *deviceList, uint32_t refMsgId)
+{
+  AQH_DEVICE_LIST *tmpDeviceList;
+  const AQH_DEVICE *dev;
+  
+  DBG_INFO(NULL, "Sending entries in multiple messages");
+  tmpDeviceList=AQH_Device_List_new();
+  dev=AQH_Device_List_First(deviceList);
+  while(dev) {
+    const AQH_DEVICE *next;
+    AQH_DEVICE *copyOfDevice;
+  
+    next=AQH_Device_List_Next(dev);
+    copyOfDevice=AQH_Device_dup(dev);
+    AQH_Device_List_Add(copyOfDevice, tmpDeviceList);
+    if (AQH_Device_List_GetCount(tmpDeviceList)>=AQHOMEDATA_DEVICESPERMSG) {
+      DBG_INFO(NULL, "Sending %d devices", AQH_Device_List_GetCount(tmpDeviceList));
+      _sendDeviceListMsg(ep, tmpDeviceList, next?0:AQH_MSGDATA_DEVICES_FLAGS_LASTMSG, refMsgId);
+      AQH_Device_List_Clear(tmpDeviceList);
+    }
+    dev=next;
+  }
+  if (AQH_Device_List_GetCount(tmpDeviceList)) {
+    DBG_INFO(NULL, "Sending %d devices", AQH_Device_List_GetCount(tmpDeviceList));
+    _sendDeviceListMsg(ep, tmpDeviceList, AQH_MSGDATA_DEVICES_FLAGS_LASTMSG, refMsgId); /* send remaining */
+  }
+  AQH_Device_List_free(tmpDeviceList);
+}
+
+
+
+void _sendDeviceListMsg(AQH_OBJECT *ep, const AQH_DEVICE_LIST *vl, uint32_t flags, uint32_t refMsgId)
 {
   AQH_MESSAGE *msg;
 
-  DBG_ERROR(NULL, "Sending msg (refMsgId=%d)", refMsgId);
+  DBG_INFO(NULL, "Sending msg (refMsgId=%d)", refMsgId);
   msg=AQH_IpcdMessageDevices_new(AQH_MSGTYPE_IPC_DATA_GETDEVICES_RSP, AQH_Endpoint_GetNextMessageId(ep), refMsgId, flags, vl);
   AQH_Endpoint_AddMsgOut(ep, msg);
 }

apps/aqhome-data/s_getvalues.c

@@ -13,13 +13,16 @@
 
 #include "./s_getvalues.h"
 #include "./server_p.h"
+#include "aqhome/aqhome.h"
 #include "aqhome/ipc2/endpoint.h"
 #include "aqhome/msg/ipc/m_ipc.h"
 #include "aqhome/msg/ipc/data/m_ipcd.h"
+#include "aqhome/msg/ipc/data/m_ipcd_getvalues.h"
 #include "aqhome/msg/ipc/data/m_ipcd_values.h"
 #include "aqhome/msg/ipc/m_ipc_result.h"
 #include "aqhome/msg/ipc/m_ipc_tag16.h"
 
+#include <gwenhywfar/text.h>
 #include <gwenhywfar/debug.h>
 
 
@@ -38,7 +41,10 @@
  * ------------------------------------------------------------------------------------------------
  */
 
-static void _sendValueList(AQH_OBJECT *ep, const AQH_VALUE_LIST *vl, uint32_t flags, uint32_t refMsgId);
+static AQH_VALUE_LIST *_getMatchingValueList(AQHOME_SERVER *xo, const GWEN_TAG16_LIST *tagList);
+static void _sendValueList(AQH_OBJECT *ep, const AQH_VALUE_LIST *vl, uint32_t refMsgId);
+static void _sendValueListMsg(AQH_OBJECT *ep, const AQH_VALUE_LIST *vl, uint32_t flags, uint32_t refMsgId);
+static int _valueMatches(const AQH_VALUE *v, const char *deviceName, int modality);
 
 
 
@@ -49,71 +55,129 @@ static void _sendValueList(AQH_OBJECT *ep, const AQH_VALUE_LIST *vl, uint32_t fl
 
 void AqHomeDataServer_HandleGetValues(AQH_OBJECT *o, AQH_OBJECT *ep, const AQH_MESSAGE *msg, const GWEN_TAG16_LIST *tagList)
 {
-  if (tagList) {
-    AQHOME_SERVER *xo;
-  
-    xo=AqHomeDataServer_GetServerData(o);
-    if (xo) {
-      const AQH_VALUE_LIST *origValueList;
-  
-      uint32_t refMsgId;
-  
-      refMsgId=AQH_IpcMessage_GetMsgId(msg);
-  
-      DBG_INFO(NULL, "HandleGetValues");
-      origValueList=AQH_Storage_GetValueList(xo->storage);
-      if (origValueList) {
-        DBG_INFO(NULL, "Have a list of %d values", AQH_Value_List_GetCount(origValueList));
-        if (AQH_Value_List_GetCount(origValueList)<AQHOMEDATA_VALUESPERMSG) {
-          DBG_INFO(NULL, "Sending all entries in one message");
-          _sendValueList(ep, origValueList, AQH_MSGDATA_VALUES_FLAGS_LASTMSG, refMsgId);
-        }
-        else {
-          AQH_VALUE_LIST *tmpValueList;
-          const AQH_VALUE *v;
-    
-          DBG_INFO(NULL, "Sending entries in multiple messages");
-          tmpValueList=AQH_Value_List_new();
-          v=AQH_Value_List_First(origValueList);
-          while(v) {
-            const AQH_VALUE *next;
-            AQH_VALUE *copyOfValue;
-    
-            next=AQH_Value_List_Next(v);
-            copyOfValue=AQH_Value_dup(v);
-            AQH_Value_List_Add(copyOfValue, tmpValueList);
-            if (AQH_Value_List_GetCount(tmpValueList)>=AQHOMEDATA_VALUESPERMSG) {
-              DBG_INFO(NULL, "Sending %d values", AQH_Value_List_GetCount(tmpValueList));
-              _sendValueList(ep, tmpValueList, next?0:AQH_MSGDATA_VALUES_FLAGS_LASTMSG, refMsgId);
-              AQH_Value_List_Clear(tmpValueList);
-            }
-            v=next;
-          }
-          if (AQH_Value_List_GetCount(tmpValueList)) {
-            DBG_INFO(NULL, "Sending %d values", AQH_Value_List_GetCount(tmpValueList));
-            _sendValueList(ep, tmpValueList, AQH_MSGDATA_VALUES_FLAGS_LASTMSG, refMsgId); /* send remaining */
-          }
-          AQH_Value_List_free(tmpValueList);
-        }
-      }
-      else {
-        /* empty list */
-        _sendValueList(ep, NULL, AQH_MSGDATA_VALUES_FLAGS_LASTMSG, refMsgId);
-      }
+  AQHOME_SERVER *xo;
+
+  xo=AqHomeDataServer_GetServerData(o);
+  if (xo) {
+    AQH_VALUE_LIST *valueList;
+    uint32_t refMsgId;
+
+    refMsgId=AQH_IpcMessage_GetMsgId(msg);
+
+    DBG_INFO(NULL, "HandleGetValues");
+    valueList=_getMatchingValueList(xo, tagList);
+    if (valueList) {
+      _sendValueList(ep, valueList, refMsgId);
+      AQH_Value_List_free(valueList);
+    }
+    else {
+      /* empty list */
+      _sendValueListMsg(ep, NULL, AQH_MSGDATA_VALUES_FLAGS_LASTMSG, refMsgId);
     }
   }
 }
 
 
 
-void _sendValueList(AQH_OBJECT *ep, const AQH_VALUE_LIST *vl, uint32_t flags, uint32_t refMsgId)
+AQH_VALUE_LIST *_getMatchingValueList(AQHOME_SERVER *xo, const GWEN_TAG16_LIST *tagList)
+{
+  const AQH_VALUE_LIST *origValueList;
+  AQH_VALUE_LIST *tmpValueList=NULL;
+  char *deviceName;
+  int modality;
+
+  deviceName=tagList?AQH_Tag16_GetTagDataAsNewString(tagList, AQH_MSGDATA_GETVALUES_TAGS_DEVICENAME, NULL):NULL;
+  modality=tagList?AQH_Tag16_GetTagDataAsUint64(tagList, AQH_MSGDATA_GETVALUES_TAGS_MODALITY, 0):0;
+
+  origValueList=AQH_Storage_GetValueList(xo->storage);
+  if (origValueList) {
+    const AQH_VALUE *v;
+
+    tmpValueList=AQH_Value_List_new();
+    v=AQH_Value_List_First(origValueList);
+    while(v) {
+      if (_valueMatches(v, deviceName, modality)) {
+	AQH_VALUE *copyOfValue;
+
+	copyOfValue=AQH_Value_dup(v);
+	AQH_Value_List_Add(copyOfValue, tmpValueList);
+      }
+      v=AQH_Value_List_Next(v);
+    }
+    if (AQH_Value_List_GetCount(tmpValueList)<1) {
+      AQH_Value_List_free(tmpValueList);
+      tmpValueList=NULL;
+    }
+  }
+  free(deviceName);
+
+  return tmpValueList;
+}
+
+
+
+void _sendValueList(AQH_OBJECT *ep, const AQH_VALUE_LIST *vl, uint32_t refMsgId)
+{
+  AQH_VALUE_LIST *tmpValueList;
+  const AQH_VALUE *v;
+
+  tmpValueList=AQH_Value_List_new();
+  v=AQH_Value_List_First(vl);
+  while(v) {
+    const AQH_VALUE *next;
+    AQH_VALUE *copyOfValue;
+
+    next=AQH_Value_List_Next(v);
+    copyOfValue=AQH_Value_dup(v);
+    AQH_Value_List_Add(copyOfValue, tmpValueList);
+    if (AQH_Value_List_GetCount(tmpValueList)>=AQHOMEDATA_VALUESPERMSG) {
+      DBG_INFO(NULL, "Sending %d values", AQH_Value_List_GetCount(tmpValueList));
+      _sendValueListMsg(ep, tmpValueList, next?0:AQH_MSGDATA_VALUES_FLAGS_LASTMSG, refMsgId);
+      AQH_Value_List_Clear(tmpValueList);
+    }
+    v=next;
+  }
+  if (AQH_Value_List_GetCount(tmpValueList)) {
+    DBG_INFO(NULL, "Sending %d values", AQH_Value_List_GetCount(tmpValueList));
+    _sendValueListMsg(ep, tmpValueList, AQH_MSGDATA_VALUES_FLAGS_LASTMSG, refMsgId); /* send remaining */
+  }
+  AQH_Value_List_free(tmpValueList);
+}
+
+
+
+void _sendValueListMsg(AQH_OBJECT *ep, const AQH_VALUE_LIST *vl, uint32_t flags, uint32_t refMsgId)
 {
   AQH_MESSAGE *msg;
 
-  DBG_ERROR(NULL, "Sending msg (refMsgId=%d)", refMsgId);
+  DBG_INFO(NULL, "Sending msg (refMsgId=%d)", refMsgId);
   msg=AQH_IpcdMessageValues_new(AQH_MSGTYPE_IPC_DATA_GETVALUES_RSP, AQH_Endpoint_GetNextMessageId(ep), refMsgId, flags, vl);
   AQH_Endpoint_AddMsgOut(ep, msg);
 }
 
 
 
+int _valueMatches(const AQH_VALUE *v, const char *deviceName, int modality)
+{
+  if (modality!=AQH_ValueModality_Unknown) {
+    int valModality;
+
+    valModality=AQH_Value_GetModality(v);
+    if (valModality!=modality)
+      return 0;
+  }
+  if (deviceName && *deviceName) {
+    const char *s;
+
+    s=AQH_Value_GetDeviceNameForSystem(v);
+    if (s && *s && GWEN_Text_ComparePattern(s, deviceName, 0)==-1)
+      return 0;
+  }
+
+  return 1;
+}
+
+
+
+
+

apps/aqhome-data/s_setdata.c

@@ -42,14 +42,15 @@
  * ------------------------------------------------------------------------------------------------
  */
 
+static void _storeDatapoint(AQHOME_SERVER *xo, const AQH_VALUE *v, double valueData);
 static AQH_MSG_REQUEST *_mkRequest_SetData(AQH_OBJECT *o,
                                            AQH_OBJECT *epSrc, uint32_t requestMsgId,
                                            AQH_OBJECT *epDriver,
-                                           const AQH_VALUE *v, const char *data);
+                                           const AQH_VALUE *v, double data);
 static void _rqSubRequestFinished(AQH_MSG_REQUEST *rq, AQH_MSG_REQUEST *subRq, int reason);
 static void _rqAbort(AQH_MSG_REQUEST *rq, int reason);
 
-static AQH_MSG_REQUEST *_mkSubRequest_SetData(AQH_OBJECT *o, AQH_OBJECT *epDriver, const AQH_VALUE *v, const char *data);
+static AQH_MSG_REQUEST *_mkSubRequest_SetData(AQH_OBJECT *o, AQH_OBJECT *epDriver, const AQH_VALUE *v, double data);
 static int _subRqHandleResponse(AQH_MSG_REQUEST *rq, const AQH_MESSAGE *msg);
 static void _subRqAbort(AQH_MSG_REQUEST *rq, int reason);
 
@@ -76,11 +77,11 @@ void AqHomeDataServer_HandleSetData(AQH_OBJECT *o, AQH_OBJECT *epSrc, const AQH_
       recvdValue=AQH_IpcdMessageSetData_ReadValue(tagList);
       if (recvdValue) {
         const char *valueName;
-        char *valueDataFreeable;
+        double valueData;
         AQH_VALUE *systemValue;
   
         valueName=AQH_Value_GetNameForSystem(recvdValue);
-        valueDataFreeable=AQH_IpcdMessageSetData_ReadData(tagList);
+        valueData=AQH_IpcdMessageSetData_ReadData(tagList);
   
         systemValue=AQH_Storage_GetValueByNameForSystem(xo->storage, valueName);
         if (systemValue) {
@@ -96,8 +97,10 @@ void AqHomeDataServer_HandleSetData(AQH_OBJECT *o, AQH_OBJECT *epSrc, const AQH_
                 AQH_MSG_REQUEST *rq;
   
                 DBG_ERROR(NULL, "Creating SETDATA request for driver endpoint (%s)", AQH_Endpoint_GetServiceName(epDriver));
-                rq=_mkRequest_SetData(o, epSrc, msgId, epDriver, systemValue, valueDataFreeable);
+                rq=_mkRequest_SetData(o, epSrc, msgId, epDriver, systemValue, valueData);
                 AqHomeDataServer_AddRequestToTree(o, rq);
+
+                _storeDatapoint(xo, systemValue, valueData);
               }
               else {
                 DBG_ERROR(NULL, "Driver \"%s\" not available", driverName);
@@ -119,7 +122,6 @@ void AqHomeDataServer_HandleSetData(AQH_OBJECT *o, AQH_OBJECT *epSrc, const AQH_
           AqHomeDataServer_SendResponseResultToEndpoint(epSrc, msgId, AQH_MSGDATA_RESULT_ERROR_NOTFOUND);
         }
         AQH_Value_free(recvdValue);
-        free(valueDataFreeable);
       } /* if recvdValue */
       else {
         DBG_ERROR(NULL, "No value in message");
@@ -131,6 +133,23 @@ void AqHomeDataServer_HandleSetData(AQH_OBJECT *o, AQH_OBJECT *epSrc, const AQH_
 
 
 
+void _storeDatapoint(AQHOME_SERVER *xo, const AQH_VALUE *v, double valueData)
+{
+  uint64_t timestamp;
+  int rv;
+  
+  timestamp=(uint64_t) time(NULL);
+  rv=AQH_Storage_AddDatapoint(xo->storage, AQH_Value_GetId(v), timestamp, valueData);
+  if (rv<0) {
+    DBG_INFO(NULL, "here (%d)", rv);
+  }
+  else {
+    DBG_INFO(NULL, "Datapoint added for value \"%s\"", AQH_Value_GetNameForSystem(v));
+  }
+}
+
+
+
 /* ------------------------------------------------------------------------------------------------
  * IPC Request SETDATA
  */
@@ -138,7 +157,7 @@ void AqHomeDataServer_HandleSetData(AQH_OBJECT *o, AQH_OBJECT *epSrc, const AQH_
 AQH_MSG_REQUEST *_mkRequest_SetData(AQH_OBJECT *o,
                                     AQH_OBJECT *epSrc, uint32_t requestMsgId,
                                     AQH_OBJECT *epDriver,
-                                    const AQH_VALUE *v, const char *data)
+                                    const AQH_VALUE *v, double data)
 {
   AQH_MSG_REQUEST *rq;
   AQH_MSG_REQUEST *subRq;
@@ -205,7 +224,7 @@ void _rqAbort(AQH_MSG_REQUEST *rq, int reason)
  */
 
 
-AQH_MSG_REQUEST *_mkSubRequest_SetData(AQH_OBJECT *o, AQH_OBJECT *epDriver, const AQH_VALUE *v, const char *data)
+AQH_MSG_REQUEST *_mkSubRequest_SetData(AQH_OBJECT *o, AQH_OBJECT *epDriver, const AQH_VALUE *v, double data)
 {
   AQH_MSG_REQUEST *rq;
   uint16_t msgId;

apps/aqhome-data/s_updatedata.c

@@ -152,7 +152,7 @@ void _sendDataChangedMsgToAllClients(AQHOME_SERVER *xo, AQH_OBJECT *epSrc, const
 
         DBG_DEBUG(AQH_LOGDOMAIN, "Sending update msg to endpoint");
         msg=AQH_IpcdMessageMultiData_new(AQH_MSGTYPE_IPC_DATA_DATACHANGED,
-                                         AQH_Endpoint_GetNextMessageId(ep), 0,
+                                         AQH_Endpoint_GetNextMessageId(ep), 0, 0,
                                          v, dataPoints, numValues);
         AQH_Endpoint_AddMsgOut(ep, msg);
       }

apps/aqhome-data/server.c

@@ -79,6 +79,9 @@ static int _handleNewClient(AQH_OBJECT *o, AQH_OBJECT *clientEndpoint);
 static int _handleClientDown(AQH_OBJECT *o, AQH_OBJECT *clientEndpoint);
 static void _handleMsgsFromClient(AQH_OBJECT *o, AQHOME_SERVER *xo, AQH_OBJECT *ep);
 static void _handleMsgFromClient(AQH_OBJECT *o, AQH_OBJECT *ep, const AQH_MESSAGE *msg);
+static void _createValue(AQHOME_SERVER *xo, AQH_OBJECT *epDriver,
+			 const char *deviceName, const char *valueNameForSystem, const AQH_VALUE *valueTemplate);
+static void _updateValue(AQHOME_SERVER *xo, AQH_VALUE *v, const char *deviceName, const AQH_VALUE *valueTemplate);
 static AQH_DEVICE *_getOrCreateDeviceForDriver(AQHOME_SERVER *xo, AQH_OBJECT *epDriver, const char *deviceName);
 static int _createPidFile(const char *pidFilename);
 static int _readArgs(int argc, char **argv, GWEN_DB_NODE *dbArgs);
@@ -126,6 +129,7 @@ void GWENHYWFAR_CB _freeData(GWEN_UNUSED void *bp, void *p)
   }
   GWEN_DB_Group_free(xo->dbArgs);
   AQH_Storage_free(xo->storage);
+  AQH_MsgRequest_free(xo->requestTree);
   free(xo->pidFile);
 
   GWEN_FREE_OBJECT(xo);
@@ -304,6 +308,24 @@ int _setupIpc(AQH_OBJECT *o, AQHOME_SERVER *xo, GWEN_DB_NODE *dbArgs)
 
 
 
+/* xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx
+ * fini
+ * xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx
+ */
+
+void AqHomeDataServer_Fini(AQH_OBJECT *o)
+{
+  AQHOME_SERVER *xo;
+
+  xo=GWEN_INHERIT_GETDATA(AQH_OBJECT, AQHOME_SERVER, o);
+  if (xo) {
+    if (xo->pidFile)
+      remove(xo->pidFile);
+  }
+}
+
+
+
 /* xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx
  * signal handler
  * xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx
@@ -329,7 +351,7 @@ int _handleNewClient(AQH_OBJECT *o, AQH_OBJECT *clientEndpoint)
 
   xo=GWEN_INHERIT_GETDATA(AQH_OBJECT, AQHOME_SERVER, o);
   if (xo) {
-    DBG_ERROR(NULL, "New IPC client");
+    DBG_INFO(NULL, "New IPC client");
     AQH_Object_AddLink(clientEndpoint, AQH_ENDPOINT_SIGNAL_CLOSED, AQH_AQHOME_SERVER_SLOT_CLOSED, o);
     AQH_Object_List_Add(clientEndpoint, xo->tcpClientList);
     return 1; /* handled */
@@ -346,7 +368,7 @@ int _handleClientDown(AQH_OBJECT *o, AQH_OBJECT *clientEndpoint)
 
   xo=GWEN_INHERIT_GETDATA(AQH_OBJECT, AQHOME_SERVER, o);
   if (xo) {
-    DBG_ERROR(NULL, "IPC client down");
+    DBG_INFO(NULL, "IPC client down");
     AQH_Object_AddFlags(clientEndpoint, AQH_OBJECT_FLAGS_DELETE);
     return 1; /* handled */
   }
@@ -633,32 +655,16 @@ AQH_VALUE *AqHomeDataServer_GetOrCreateValueForDriverWithTemplate(AQH_OBJECT *o,
 
     v=AQH_Storage_GetValueByNameForSystem(xo->storage, GWEN_Buffer_GetStart(buf));
     if (v==NULL) {
-      if (AQH_Endpoint_GetPermissions(epDriver) & AQH_ENDPOINT_PERMS_ADDVALUE) {
-        AQH_DEVICE *device;
-
-        DBG_INFO(AQH_LOGDOMAIN, "Creating value \"%s\"", GWEN_Buffer_GetStart(buf));
-        device=(deviceName && *deviceName)?_getOrCreateDeviceForDriver(xo, epDriver, deviceName):NULL;
-
-        v=AQH_Value_new();
-        AQH_Value_SetDriver(v, serviceName);
-        AQH_Value_SetName(v, AQH_Value_GetName(valueTemplate));
-        AQH_Value_SetNameForSystem(v, GWEN_Buffer_GetStart(buf));
-        AQH_Value_SetValueUnits(v, AQH_Value_GetValueUnits(valueTemplate));
-        AQH_Value_SetValueType(v, AQH_Value_GetValueType(valueTemplate));
-        AQH_Value_SetModality(v, AQH_Value_GetModality(valueTemplate));
-        AQH_Value_SetTimestampCreation(v, (uint64_t) time(NULL));
-        if (device) {
-          AQH_Value_SetDeviceNameForSystem(v, AQH_Device_GetNameForSystem(device));
-          AQH_Value_SetDeviceName(v, AQH_Device_GetName(device));
-        }
-        AQH_Storage_AddValue(xo->storage, v);
-      }
+      if (AQH_Endpoint_GetPermissions(epDriver) & AQH_ENDPOINT_PERMS_ADDVALUE)
+	_createValue(xo, epDriver, deviceName, GWEN_Buffer_GetStart(buf), valueTemplate);
       else {
         DBG_ERROR(AQH_LOGDOMAIN, "No permissions to create value \"%s\"", GWEN_Buffer_GetStart(buf));
         GWEN_Buffer_free(buf);
         return NULL;
       }
     }
+    else
+      _updateValue(xo, v, GWEN_Buffer_GetStart(buf), valueTemplate);
     GWEN_Buffer_free(buf);
     return v;
   }
@@ -667,6 +673,80 @@ AQH_VALUE *AqHomeDataServer_GetOrCreateValueForDriverWithTemplate(AQH_OBJECT *o,
 
 
 
+void _createValue(AQHOME_SERVER *xo, AQH_OBJECT *epDriver,
+		  const char *deviceName, const char *valueNameForSystem, const AQH_VALUE *valueTemplate)
+{
+  AQH_DEVICE *device;
+  const char *serviceName;
+  const char *valueName;
+  AQH_VALUE *v;
+
+  serviceName=AQH_Endpoint_GetServiceName(epDriver);
+  valueName=AQH_Value_GetName(valueTemplate);
+  device=(deviceName && *deviceName)?_getOrCreateDeviceForDriver(xo, epDriver, deviceName):NULL;
+  
+  DBG_ERROR(AQH_LOGDOMAIN,
+	    "Creating value: service=\"%s\", device=\"%s\", value \"%s\"",
+	    serviceName?serviceName:"<no service>", deviceName?deviceName:"<no device>", valueName?valueName:"<no value>");
+  v=AQH_Value_new();
+  AQH_Value_SetDriver(v, serviceName);
+  AQH_Value_SetName(v, AQH_Value_GetName(valueTemplate));
+  AQH_Value_SetNameForSystem(v, valueNameForSystem);
+  AQH_Value_SetValueUnits(v, AQH_Value_GetValueUnits(valueTemplate));
+  AQH_Value_SetValueType(v, AQH_Value_GetValueType(valueTemplate));
+  AQH_Value_SetModality(v, AQH_Value_GetModality(valueTemplate));
+  AQH_Value_SetTimestampCreation(v, (uint64_t) time(NULL));
+  if (device) {
+    AQH_Value_SetDeviceNameForSystem(v, AQH_Device_GetNameForSystem(device));
+    AQH_Value_SetDeviceName(v, AQH_Device_GetName(device));
+  }
+  AQH_Storage_AddValue(xo->storage, v);
+}
+
+
+
+void _updateValue(AQHOME_SERVER *xo, AQH_VALUE *value, const char *deviceName, const AQH_VALUE *valueTemplate)
+{
+  int chg=0;
+  const char *s1;
+  const char *s2;
+  int i1;
+  int i2;
+
+  DBG_INFO(AQH_LOGDOMAIN, "Updating value \"%s\"", deviceName);
+  s1=AQH_Value_GetValueUnits(valueTemplate);
+  s2=AQH_Value_GetValueUnits(value);
+  if (s1 && *s1) {
+    if (!(s2 && *s2) || (strcasecmp(s1, s2)!=0)) {
+      AQH_Value_SetValueUnits(value, s1);
+      chg=1;
+    }
+  }
+
+  i1=AQH_Value_GetValueType(valueTemplate);
+  i2=AQH_Value_GetValueType(value);
+  if (i1!=AQH_ValueDataType_Unknown) {
+    if (i1!=i2) {
+      AQH_Value_SetValueType(value, i1);
+      chg=1;
+    }
+  }
+
+  i1=AQH_Value_GetModality(valueTemplate);
+  i2=AQH_Value_GetModality(value);
+  if (i1!=AQH_ValueModality_Unknown) {
+    if (i1!=i2) {
+      AQH_Value_SetModality(value, i1);
+      chg=1;
+    }
+  }
+
+  if (chg)
+    AQH_Storage_AddRuntimeFlags(xo->storage, AQH_STORAGE_RTFLAGS_MODIFIED);
+}
+
+
+
 AQH_DEVICE *_getOrCreateDeviceForDriver(AQHOME_SERVER *xo, AQH_OBJECT *epDriver, const char *deviceName)
 {
   const char *serviceName;
@@ -681,7 +761,7 @@ AQH_DEVICE *_getOrCreateDeviceForDriver(AQHOME_SERVER *xo, AQH_OBJECT *epDriver,
   device=AQH_Storage_GetDeviceByNameForSystem(xo->storage, GWEN_Buffer_GetStart(buf));
   if (device==NULL) {
     if (AQH_Endpoint_GetPermissions(epDriver) & AQH_ENDPOINT_PERMS_ADDDEVICE) {
-      DBG_INFO(AQH_LOGDOMAIN, "Creating device \"%s\"", GWEN_Buffer_GetStart(buf));
+      DBG_ERROR(AQH_LOGDOMAIN, "Creating device \"%s\"", GWEN_Buffer_GetStart(buf));
       device=AQH_Device_new();
       AQH_Device_SetDriver(device, serviceName);
       AQH_Device_SetName(device, deviceName);

apps/aqhome-data/server.h

@@ -33,6 +33,7 @@
 
 AQH_OBJECT *AqHomeDataServer_new(AQH_EVENT_LOOP *eventLoop);
 int AqHomeDataServer_Init(AQH_OBJECT *o, int argc, char **argv);
+void AqHomeDataServer_Fini(AQH_OBJECT *o);
 
 int AqHomeDataServer_GetTimeout(const AQH_OBJECT *o);
 int AqHomeDataServer_GetClientNum(const AQH_OBJECT *o);

apps/aqhome-mqttlog/main.c

@@ -130,6 +130,7 @@ int main(int argc, char **argv)
 
   AQH_MqttLogServer_Fini(aqh);
   AQH_Object_free(aqh);
+  AQH_EventLoop_free(eventLoop);
 
   GWEN_Gui_SetGui(NULL);
   GWEN_Gui_free(gui);

apps/aqhome-mqttlog/s_publish.c

@@ -31,7 +31,7 @@
  * ------------------------------------------------------------------------------------------------
  */
 
-static int _handlePublish(AQH_OBJECT *o, const char *rcvdTopic, const char *rcvdValue);
+static int _handlePublish(AQH_OBJECT *o, AQH_MQTTLOG_SERVER *xo, const char *rcvdTopic, const char *rcvdValue);
 static void _handleNumTopic(AQH_MQTTLOG_SERVER *xo, AQHMQTT_DEVICE *device,
                             AQHMQTT_TOPIC *topic, const char *rcvdValue);
 static void _handleJsonTopic(AQH_MQTTLOG_SERVER *xo, AQHMQTT_DEVICE *device,
@@ -69,12 +69,12 @@ void AQH_MqttLogServer_HandlePublishMsg(AQH_OBJECT *o, GWEN_UNUSED AQH_OBJECT *e
       if (topic && value) {
         int rv;
 
-        rv=_handlePublish(o, topic, value);
+        rv=_handlePublish(o, xo, topic, value);
         if (rv!=1) {
           DBG_INFO(NULL, "New topic \"%s\", trying to register", topic);
           rv=_registerNewDeviceForTopic(xo, topic);
           if (rv==1) {
-            rv=_handlePublish(o, topic, value);
+            rv=_handlePublish(o, xo, topic, value);
             if (rv!=1) {
               DBG_ERROR(NULL, "Topic \"%s\" still not handled, SNH!", topic);
             }
@@ -92,53 +92,48 @@ void AQH_MqttLogServer_HandlePublishMsg(AQH_OBJECT *o, GWEN_UNUSED AQH_OBJECT *e
 
 
 
-int _handlePublish(AQH_OBJECT *o, const char *rcvdTopic, const char *rcvdValue)
+int _handlePublish(AQH_OBJECT *o, AQH_MQTTLOG_SERVER *xo, const char *rcvdTopic, const char *rcvdValue)
 {
-  if (o && rcvdTopic && *rcvdTopic) {
-    AQH_MQTTLOG_SERVER *xo;
+  if (o && rcvdTopic && *rcvdTopic && xo && xo->registeredDeviceList) {
+    AQHMQTT_DEVICE *device;
 
-    xo=AQH_MqttLogServer_GetServerData(o);
-    if (xo && xo->registeredDeviceList) {
-      AQHMQTT_DEVICE *device;
+    device=AQHMQTT_Device_List_First(xo->registeredDeviceList);
+    while(device) {
+      AQHMQTT_TOPIC_LIST *topicList;
+      const char *sDeviceName;
+      const char *sDeviceId;
 
-      device=AQHMQTT_Device_List_First(xo->registeredDeviceList);
-      while(device) {
-        AQHMQTT_TOPIC_LIST *topicList;
-        const char *sDeviceName;
-        const char *sDeviceId;
+      sDeviceName=AQHMQTT_Device_GetName(device);
+      sDeviceId=AQHMQTT_Device_GetId(device);
 
-        sDeviceName=AQHMQTT_Device_GetName(device);
-        sDeviceId=AQHMQTT_Device_GetId(device);
+      topicList=AQHMQTT_Device_GetTopicList(device);
+      if (topicList) {
+        AQHMQTT_TOPIC *topic;
 
-        topicList=AQHMQTT_Device_GetTopicList(device);
-        if (topicList) {
-          AQHMQTT_TOPIC *topic;
-
-          topic=_findTopicMatchingTopic(topicList, rcvdTopic, AQHMQTT_TopicDir_In);
+        topic=_findTopicMatchingTopic(topicList, rcvdTopic, AQHMQTT_TopicDir_In);
 #if 0
-          if (topic==NULL) {
-            topic=_findMaskMatchingTopic(topicList, rcvdTopic, AQHMQTT_TopicDir_In);
-            if (topic)
-              AQHMQTT_Topic_SetTopic(topic, rcvdTopic);
-          }
-#endif
-          if (topic) {
-            DBG_INFO(AQH_LOGDOMAIN,
-                     "Handling topic \"%s\" for device type %s (id: %s)",
-                     rcvdTopic,
-                     sDeviceName, sDeviceId?sDeviceId:"<no id>");
-            if (AQHMQTT_Topic_GetTopicType(topic)==AQHMQTT_TopicType_Json)
-              _handleJsonTopic(xo, device, topic, rcvdValue);
-            else
-              _handleNumTopic(xo, device, topic, rcvdValue);
-            return 1;
-          }
+        if (topic==NULL) {
+          topic=_findMaskMatchingTopic(topicList, rcvdTopic, AQHMQTT_TopicDir_In);
+          if (topic)
+            AQHMQTT_Topic_SetTopic(topic, rcvdTopic);
+        }
+#endif
+        if (topic) {
+          DBG_INFO(AQH_LOGDOMAIN,
+                   "Handling topic \"%s\" for device type %s (id: %s)",
+                   rcvdTopic,
+                   sDeviceName, sDeviceId?sDeviceId:"<no id>");
+          if (AQHMQTT_Topic_GetTopicType(topic)==AQHMQTT_TopicType_Json)
+            _handleJsonTopic(xo, device, topic, rcvdValue);
+          else
+            _handleNumTopic(xo, device, topic, rcvdValue);
+          return 1;
         }
-
-        device=AQHMQTT_Device_List_Next(device);
       }
-      DBG_INFO(AQH_LOGDOMAIN, "ignoring topic \"%s\"", rcvdTopic);
+
+      device=AQHMQTT_Device_List_Next(device);
     }
+    DBG_INFO(AQH_LOGDOMAIN, "ignoring topic \"%s\"", rcvdTopic);
   }
   return 0;
 }
@@ -223,7 +218,7 @@ void _sendMessage(AQH_MQTTLOG_SERVER *xo, const AQHMQTT_DEVICE *device, const AQ
       AQH_MESSAGE *pubMsg;
 
       pubMsg=AQH_IpcdMessageMultiData_newForOne(AQH_MSGTYPE_IPC_DATA_UPDATEDATA,
-                                                AQH_Endpoint_GetNextMessageId(xo->brokerEndpoint), 0,
+                                                AQH_Endpoint_GetNextMessageId(xo->brokerEndpoint), 0, 0,
                                                 msgValue, now, f);
       DBG_INFO(AQH_LOGDOMAIN, "BROKER UPDATE_DATA %s/%s: %f",
                deviceName?deviceName:"<no device name>",
@@ -282,7 +277,7 @@ void _sendAnnounceValueMessage(AQH_MQTTLOG_SERVER *xo, const AQHMQTT_DEVICE *dev
                                            AQH_Endpoint_GetNextMessageId(xo->brokerEndpoint), 0,
                                            0, msgValue);
     if (pubMsg) {
-      DBG_INFO(AQH_LOGDOMAIN, "BROKER ANNOUNCE_VALUE %s", AQH_Value_GetName(msgValue));
+      DBG_ERROR(AQH_LOGDOMAIN, "BROKER ANNOUNCE_VALUE %s/%s", AQH_Value_GetDeviceName(msgValue), AQH_Value_GetName(msgValue));
       AQH_Endpoint_AddMsgOut(xo->brokerEndpoint, pubMsg);
     }
     AQH_Value_free(msgValue);

apps/aqhome-mqttlog/s_publish.h

@@ -10,7 +10,7 @@
 #define AQHOMEMQTT_S_PUBLISH_H
 
 
-#include "./aqhome_mqtt.h"
+#include "./server.h"
 
 #include <aqhome/events2/object.h>
 #include <aqhome/ipc2/message.h>

apps/aqhome-mqttlog/s_setdata.c

@@ -20,7 +20,7 @@
 #include <gwenhywfar/debug.h>
 
 
-#define DEBUG_DRY_RUN 1 /* don't actually set value if "1" */
+#define DEBUG_DRY_RUN 0 /* don't actually set value if "1" */
 
 
 
@@ -30,9 +30,13 @@
  */
 
 static void _sendDataForDevice(AQH_MQTTLOG_SERVER *xo, const AQHMQTT_DEVICE *device,
-                               const char *valueName, const char *valueData);
-static void _sendValueToMqtt(AQH_MQTTLOG_SERVER *xo, const char *deviceId,
-                             const AQHMQTT_TOPIC *topic, const char *valueData);
+                               const char *valueName, double valueData);
+static void _sendValueToMqtt(AQH_MQTTLOG_SERVER *xo,
+                             const AQHMQTT_DEVICE *device,
+                             const AQHMQTT_TOPIC *topic,
+                             const AQHMQTT_VALUE *value,
+                             double valueData);
+static const char *_valueTranslatedForDriver(const AQHMQTT_VALUE *value, double valueData);
 static GWEN_BUFFER *_createBufferForTopic(const char *deviceId, const AQHMQTT_TOPIC *topic);
 
 
@@ -66,12 +70,11 @@ void AQH_MqttLogServer_HandleSetData(AQH_OBJECT *o,
     
           device=AQH_MqttLogServer_FindRegisteredDevice(o, deviceName);
           if (device) {
-            char *valueDataFreeable;
+            double valueData;
     
             DBG_ERROR(NULL, "Sending data to value \"%s\" of device \"%s\"", valueName, deviceName);
-            valueDataFreeable=AQH_IpcdMessageSetData_ReadData(tagList);
-            _sendDataForDevice(xo, device, valueName, valueDataFreeable);
-            free(valueDataFreeable);
+            valueData=AQH_IpcdMessageSetData_ReadData(tagList);
+            _sendDataForDevice(xo, device, valueName, valueData);
           }
           else {
             DBG_ERROR(NULL, "Device \"%s\" not found", deviceName);
@@ -94,7 +97,7 @@ void AQH_MqttLogServer_HandleSetData(AQH_OBJECT *o,
 
 void _sendDataForDevice(AQH_MQTTLOG_SERVER *xo,
                         const AQHMQTT_DEVICE *device,
-                        const char *valueName, const char *valueData)
+                        const char *valueName, double valueData)
 {
   const char *deviceId;
 
@@ -117,7 +120,7 @@ void _sendDataForDevice(AQH_MQTTLOG_SERVER *xo,
           if (value) {
             /* found value, create publish msg, send */
             DBG_ERROR(NULL, "Topic \"%s\" contains value \"%s\"", AQHMQTT_Topic_GetName(topic), valueName);
-            _sendValueToMqtt(xo, deviceId, topic, valueData);
+            _sendValueToMqtt(xo, device, topic, value, valueData);
           }
         } /* if out */
         topic=AQHMQTT_Topic_List_Next(topic);
@@ -131,32 +134,82 @@ void _sendDataForDevice(AQH_MQTTLOG_SERVER *xo,
 
 
 
-void _sendValueToMqtt(AQH_MQTTLOG_SERVER *xo,  const char *deviceId, const AQHMQTT_TOPIC *topic, const char *valueData)
+void _sendValueToMqtt(AQH_MQTTLOG_SERVER *xo,
+                      const AQHMQTT_DEVICE *device,
+                      const AQHMQTT_TOPIC *topic,
+                      const AQHMQTT_VALUE *value,
+                      double valueData)
 {
+  const char *deviceId;
+  const char *translatedValue;
   GWEN_BUFFER *buf;
 #if !DEBUG_DRY_RUN
   AQH_MESSAGE *msgOut;
 #endif
 
+  deviceId=AQHMQTT_Device_GetId(device);
   buf=_createBufferForTopic(deviceId, topic);
+  translatedValue=_valueTranslatedForDriver(value, valueData);
+  if (translatedValue && *translatedValue) {
+    DBG_ERROR(NULL, "MQTT PUBLISH: %s = %s", GWEN_Buffer_GetStart(buf), translatedValue);
+    msgOut=AQH_MqttMessagePublish_new(0, 0, GWEN_Buffer_GetStart(buf), (const uint8_t*)translatedValue, strlen(translatedValue));
+  }
+  else {
+    GWEN_BUFFER *vbuf;
+
+    vbuf=GWEN_Buffer_new(0, 64, 0, 1);
+    GWEN_Buffer_AppendArgs(vbuf, "%f", valueData);
+    DBG_ERROR(NULL, "MQTT PUBLISH: %s = %s", GWEN_Buffer_GetStart(buf), GWEN_Buffer_GetStart(vbuf));
+    msgOut=AQH_MqttMessagePublish_new(0, 0,
+                                      GWEN_Buffer_GetStart(buf),
+                                      (const uint8_t*)GWEN_Buffer_GetStart(vbuf),
+                                      GWEN_Buffer_GetUsedBytes(vbuf));
+    GWEN_Buffer_free(vbuf);
+  }
+
 #if !DEBUG_DRY_RUN
-  DBG_ERROR(NULL, "MQTT PUBLISH: %s = %s", GWEN_Buffer_GetStart(buf), valueData?valueData:"<empty>");
-  msgOut=AQH_MqttMessagePublish_new(0, 0, GWEN_Buffer_GetStart(buf),
-                                    (const uint8_t*) (valueData?valueData:NULL),
-                                    valueData?strlen(valueData):0);
   if (msgOut)
     AQH_Endpoint_AddMsgOut(xo->mqttEndpoint, msgOut);
   else {
     DBG_ERROR(NULL, "Error creating message");
   }
-#else
-  DBG_ERROR(NULL, "Would MQTT PUBLISH: %s = %s", GWEN_Buffer_GetStart(buf), valueData?valueData:"<empty>");
 #endif
   GWEN_Buffer_free(buf);
 }
 
 
 
+const char *_valueTranslatedForDriver(const AQHMQTT_VALUE *value, double valueData)
+{
+  const AQHMQTT_TRANSLATION_LIST *translationList;
+
+  translationList=AQHMQTT_Value_GetTranslationList(value);
+  if (translationList) {
+    const AQHMQTT_TRANSLATION *t;
+    int valueAsInt;
+
+    valueAsInt=(int) valueData;
+    t=AQHMQTT_Translation_List_GetByAqhValue(translationList, valueAsInt);
+    if (t) {
+      const char *s;
+
+      s=AQHMQTT_Translation_GetDriverValue(t);
+      DBG_ERROR(NULL, "Translated value %d to %s", valueAsInt, s);
+      return s;
+    }
+    else {
+      DBG_ERROR(NULL, "No translation found for %d", valueAsInt);
+    }
+  }
+  else {
+    DBG_ERROR(NULL, "No translation list");
+  }
+
+  return NULL;
+}
+
+
+
 GWEN_BUFFER *_createBufferForTopic(const char *deviceId, const AQHMQTT_TOPIC *topic)
 {
   GWEN_BUFFER *buf;

apps/aqhome-mqttlog/s_setdata.h

@@ -10,7 +10,7 @@
 #define AQHOMEMQTT_S_SETDATA_H
 
 
-#include "./aqhome_mqtt.h"
+#include "./server.h"
 
 #include <aqhome/events2/object.h>
 #include <aqhome/ipc2/message.h>

apps/aqhome-mqttlog/server.c

@@ -109,10 +109,10 @@ static int _handleSignal(AQH_OBJECT *o, uint32_t slotId, AQH_OBJECT *senderObjec
 static int _handleBrokerDown(AQH_MQTTLOG_SERVER *xo);
 static int _handleMqttDown(AQH_MQTTLOG_SERVER *xo);
 
-static void _handleMsgFromBroker(AQH_OBJECT *o, AQH_OBJECT *ep, const AQH_MESSAGE *msg);
+static void _handleMsgFromBroker(AQH_OBJECT *o, const AQH_MESSAGE *msg);
 
 static void _handleMsgFromMqtt(AQH_OBJECT *o, AQH_OBJECT *ep, const AQH_MESSAGE *msg);
-static void _handleMqttMsgPingRsp(AQH_OBJECT *o, AQH_OBJECT *ep, const AQH_MESSAGE *msg);
+static void _handleMqttMsgPingRsp(void);
 
 static int _createPidFile(const char *pidFilename);
 static int _diffInSeconds(time_t t1, time_t t0);
@@ -156,8 +156,15 @@ void GWENHYWFAR_CB _freeData(GWEN_UNUSED void *bp, void *p)
 
   AQH_Object_free(xo->mqttEndpoint);
   AQH_Object_free(xo->brokerEndpoint);
-
-
+  AQHMQTT_Device_List_free(xo->availableDeviceList);
+  AQHMQTT_Device_List_free(xo->registeredDeviceList);
+  GWEN_DB_Group_free(xo->dbArgs);
+  free(xo->deviceFile);
+  free(xo->pidFile);
+  free(xo->mqttAddress);
+  free(xo->mqttClientId);
+  free(xo->brokerAddress);
+  free(xo->brokerClientId);
 
   GWEN_FREE_OBJECT(xo);
 }
@@ -474,7 +481,7 @@ int _startBroker(AQH_OBJECT *o, AQH_MQTTLOG_SERVER *xo)
       DBG_ERROR(NULL, "Error connecting to broker: %d", rv);
       return (rv<0)?rv:GWEN_ERROR_PERMISSIONS;
     }
-    DBG_NOTICE(NULL, "Connected to broker at %s:%d", xo->brokerAddress, xo->brokerPort);
+    DBG_NOTICE(NULL, "Fully connected to broker at %s:%d", xo->brokerAddress, xo->brokerPort);
     return 0;
   }
   else {
@@ -658,7 +665,7 @@ void AQH_MqttLogServer_HandleBrokerMsgs(AQH_OBJECT *o)
   
     while( (msg=AQH_Endpoint_GetNextMsgIn(xo->brokerEndpoint)) ) {
       AQH_Message_SetObject(msg, xo->brokerEndpoint);
-      _handleMsgFromBroker(o, xo->brokerEndpoint, msg);
+      _handleMsgFromBroker(o, msg);
       AQH_Message_free(msg);
     }
   }
@@ -666,7 +673,7 @@ void AQH_MqttLogServer_HandleBrokerMsgs(AQH_OBJECT *o)
 
 
 
-void _handleMsgFromBroker(AQH_OBJECT *o, AQH_OBJECT *ep, const AQH_MESSAGE *msg)
+void _handleMsgFromBroker(AQH_OBJECT *o, const AQH_MESSAGE *msg)
 {
   GWEN_TAG16_LIST *tagList;
 
@@ -762,14 +769,14 @@ void _handleMsgFromMqtt(AQH_OBJECT *o, AQH_OBJECT *ep, const AQH_MESSAGE *msg)
   code=AQH_MqttMessage_GetTypeAndFlags(msg);
   switch(code & 0xf0) {
   case (AQH_MQTTMSG_MSGTYPE_PUBLISH  & 0xf0): AQH_MqttLogServer_HandlePublishMsg(o, ep, msg); break;
-  case (AQH_MQTTMSG_MSGTYPE_PINGRESP & 0xf0): _handleMqttMsgPingRsp(o, ep, msg); break;
+  case (AQH_MQTTMSG_MSGTYPE_PINGRESP & 0xf0): _handleMqttMsgPingRsp(); break;
   default:                            break;
   }
 }
 
 
 
-void _handleMqttMsgPingRsp(AQH_OBJECT *o, AQH_OBJECT *ep, const AQH_MESSAGE *msg)
+void _handleMqttMsgPingRsp(void)
 {
   DBG_INFO(NULL, "PING response received");
 }
@@ -962,8 +969,9 @@ void AQH_MqttLogServer_LoadRuntimeDeviceFiles(AQH_OBJECT *o)
 
       DBG_INFO(NULL, "Loading registered devices from file \"%s\"", xo->deviceFile);
       deviceList=AQH_MqttLogServer_ReadDeviceFile(o, xo->deviceFile);
-      if (deviceList)
-        AQH_MqttLogServer_SetRegisteredDeviceList(o, deviceList);
+      if (deviceList==NULL)
+        deviceList=AQHMQTT_Device_List_new();
+      AQH_MqttLogServer_SetRegisteredDeviceList(o, deviceList);
     }
   }
 }
@@ -999,7 +1007,7 @@ int AQH_MqttLogServer_SaveRuntimeDeviceFiles(AQH_OBJECT *o)
  * xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx
  */
 
-int _handleSignal(AQH_OBJECT *o, uint32_t slotId, AQH_OBJECT *senderObject, GWEN_UNUSED int param1, void *param2)
+int _handleSignal(AQH_OBJECT *o, uint32_t slotId, GWEN_UNUSED AQH_OBJECT *senderObject, GWEN_UNUSED int param1, GWEN_UNUSED void *param2)
 {
   AQH_MQTTLOG_SERVER *xo;
 
@@ -1100,11 +1108,11 @@ int _readArgs(int argc, char **argv, GWEN_DB_NODE *dbArgs)
     { A_ARG, A_CHAR, "loglevel",       0,  1,  "L",  "loglevel",       I18S("Specify loglevel"), NULL},
     { A_ARG, A_CHAR, "cfgdir",         0,  1,  "D",  "cfgdir",         I18S("Specify the configuration folder"), NULL},
     { A_ARG, A_CHAR, "charset",        0,  1,  NULL, "charset",        I18S("Specify the output character set"), NULL},
-    { A_ARG, A_CHAR, "mqttAddress",    0,  1,  "t",  "mqttaddress",    I18S("Address of MQTT server"), NULL},
-    { A_ARG, A_INT,  "mqttPort",       0,  1,  "P",  "mqttport",       I18S("Port of MQTT server (default: 1883)"), NULL},
+    { A_ARG, A_CHAR, "mqttAddress",    0,  1,  "ma", "mqttaddress",    I18S("Address of MQTT server"), NULL},
+    { A_ARG, A_INT,  "mqttPort",       0,  1,  "mp", "mqttport",       I18S("Port of MQTT server (default: 1883)"), NULL},
     { A_ARG, A_CHAR, "mqttClientId",   0,  1,  NULL, "mqttclientid",   I18S("MQTT client id"), NULL},
     { A_ARG, A_INT,  "mqttKeepAlive",  0,  1,  "P",  "mqttkeepalive",  I18S("MQTT keep-alive time"), NULL},
-    { A_ARG, A_CHAR, "brokerAddress",  0,  1,  "ba", "brokerddress",   I18S("Broker address [127.0.0.1]"), NULL},
+    { A_ARG, A_CHAR, "brokerAddress",  0,  1,  "ba", "brokeraddress",   I18S("Broker address [127.0.0.1]"), NULL},
     { A_ARG, A_INT,  "brokerPort",     0,  1,  "bp", "brokerport",     I18S("Broker port [1899]"), NULL},
     { A_ARG, A_CHAR, "brokerClientId", 0,  1,  NULL, "brokerclientid", I18S("Broker client id"), NULL},
     { A_ARG, A_CHAR, "deviceFile",     0,  1,  "d",  "devicefile",     I18S("Device file"), NULL},

apps/aqhome-mqttlog/types/translation.t2d

@@ -32,18 +32,18 @@
 
     <members>
 
-      <member name="aqhValue" type="char_ptr" maxlen="128">
+      <member name="aqhValue" type="int" maxlen="8">
         <default>0</default>
         <preset>0</preset>
         <access>public</access>
-        <flags>own</flags>
+        <flags>with_getByMember</flags>
       </member>
 
       <member name="driverValue" type="char_ptr" maxlen="128">
         <default>0</default>
         <preset>0</preset>
         <access>public</access>
-        <flags>own</flags>
+        <flags>own with_getByMember</flags>
       </member>
 
 

apps/aqhome-mqttlog/xmlread.c

@@ -62,6 +62,7 @@ static AQHMQTT_TRANSLATION *_readXmlTranslation(GWEN_XMLNODE *translationNode);
 
 AQHMQTT_DEVICE_LIST *AQH_MqttLogServer_ReadDeviceFile(AQH_OBJECT *o, const char *sFilename)
 {
+  DBG_ERROR(NULL, "Reading device file \"%s\"", sFilename);
   if (o) {
     AQH_MQTTLOG_SERVER *xo;
 
@@ -80,7 +81,7 @@ AQHMQTT_DEVICE_LIST *AQH_MqttLogServer_ReadDeviceFile(AQH_OBJECT *o, const char
         deviceList=AQHMQTT_Device_List_new();
         rv=_readDeviceFileToList(sFilename, deviceList);
         if (rv<0) {
-          DBG_ERROR(NULL, "File \"%s\" not found", sFilename);
+          DBG_ERROR(NULL, "Could not read file \"%s\" (empty?)", sFilename);
           AQHMQTT_Device_List_free(deviceList);
           return NULL;
         }
@@ -390,13 +391,15 @@ AQHMQTT_VALUE_LIST *_readXmlValueList(GWEN_XMLNODE *parentNode)
 
 AQHMQTT_VALUE *_readXmlValue(GWEN_XMLNODE *valueNode)
 {
+  const char *sValueName;
   AQHMQTT_VALUE *value;
   GWEN_XMLNODE *translationNode;
   const char *s;
   int i;
 
+  sValueName=GWEN_XMLNode_GetProperty(valueNode, "name", NULL);
   value=AQHMQTT_Value_new();
-  AQHMQTT_Value_SetName(value, GWEN_XMLNode_GetProperty(valueNode, "name", NULL));
+  AQHMQTT_Value_SetName(value, sValueName);
   AQHMQTT_Value_SetValueUnits(value, GWEN_XMLNode_GetProperty(valueNode, "units", NULL));
   AQHMQTT_Value_SetPath(value, GWEN_XMLNode_GetProperty(valueNode, "path", NULL));
 
@@ -415,12 +418,12 @@ AQHMQTT_VALUE *_readXmlValue(GWEN_XMLNODE *valueNode)
 
     translationList=_readXmlTranslationList(translationNode);
     if (translationList) {
-      DBG_INFO(NULL, "Translations read");
+      DBG_ERROR(NULL, "Translations read for value \"%s\"", sValueName);
       AQHMQTT_Value_SetTranslationList(value, translationList);
     }
   }
   else {
-    DBG_INFO(NULL, "No <translations> element");
+    DBG_ERROR(NULL, "No <translations> element in value %s", sValueName);
   }
 
   return value;
@@ -440,7 +443,7 @@ AQHMQTT_TRANSLATION_LIST *_readXmlTranslationList(GWEN_XMLNODE *parentNode)
     if (translation)
       AQHMQTT_Translation_List_Add(translation, translationList);
     else {
-      DBG_INFO(NULL, "Error reading <translation> element");
+      DBG_ERROR(NULL, "Error reading <translation> element");
       AQHMQTT_Translation_List_free(translationList);
       return NULL;
     }
@@ -458,16 +461,16 @@ AQHMQTT_TRANSLATION_LIST *_readXmlTranslationList(GWEN_XMLNODE *parentNode)
 
 AQHMQTT_TRANSLATION *_readXmlTranslation(GWEN_XMLNODE *translationNode)
 {
-  const char *sAqhValue;
+  int aqhValue;
   const char *sDriverValue;
 
-  sAqhValue=GWEN_XMLNode_GetProperty(translationNode, "aqhValue", NULL);
+  aqhValue=GWEN_XMLNode_GetIntProperty(translationNode, "aqhValue", 0);
   sDriverValue=GWEN_XMLNode_GetProperty(translationNode, "driverValue", NULL);
-  if (sAqhValue && *sAqhValue && sDriverValue && *sDriverValue) {
+  if (sDriverValue && *sDriverValue) {
     AQHMQTT_TRANSLATION *translation;
 
     translation=AQHMQTT_Translation_new();
-    AQHMQTT_Translation_SetAqhValue(translation, sAqhValue);
+    AQHMQTT_Translation_SetAqhValue(translation, aqhValue);
     AQHMQTT_Translation_SetDriverValue(translation, sDriverValue);
     return translation;
   }

apps/aqhome-mqttlog/xmlread.h

@@ -10,7 +10,6 @@
 #define AQHOME_MQTTLOG_XMLREAD_H
 
 #include "aqhome-mqttlog/server.h"
-#include "aqhome-mqttlog/aqhome_mqtt.h"
 #include "aqhome-mqttlog/types/device.h"
 
 

apps/aqhome-mqttlog/xmlwrite.c

@@ -11,7 +11,6 @@
 #endif
 
 #include "./xmlwrite.h"
-#include "./aqhome_mqtt_p.h"
 #include "aqhome-mqttlog/types/topic.h"
 #include "aqhome-mqttlog/types/value.h"
 #include "aqhome-mqttlog/types/translation.h"
@@ -223,7 +222,7 @@ void _writeValueToXml(const AQHMQTT_VALUE *value, GWEN_XMLNODE *node)
 
 void _writeTranslationToXml(const AQHMQTT_TRANSLATION *t, GWEN_XMLNODE *nTranslation)
 {
-  _setXmlPropertyIfNotNull(nTranslation, "aqhValue", AQHMQTT_Translation_GetAqhValue(t));
+  GWEN_XMLNode_SetIntProperty(nTranslation, "aqhValue", AQHMQTT_Translation_GetAqhValue(t));
   _setXmlPropertyIfNotNull(nTranslation, "driverValue", AQHMQTT_Translation_GetDriverValue(t));
 }
 

apps/aqhome-mqttlog/xmlwrite.h

@@ -10,7 +10,6 @@
 #define AQHOME_MQTTLOG_XMLWRITE_H
 
 #include "aqhome-mqttlog/server.h"
-#include "aqhome-mqttlog/aqhome_mqtt.h"
 #include "aqhome-mqttlog/types/device.h"
 
 

apps/aqhome-nodes/0BUILD

@@ -44,6 +44,8 @@
       r_forward.h
       r_setaccmsggrps.h
       r_getnodes.h
+      server.h
+      server_p.h
     </headers>
   
     <sources>

apps/aqhome-nodes/db.c

@@ -117,6 +117,26 @@ void _handleMsgValue(AQH_NODE_SERVER *xo, const AQH_MESSAGE *msg)
   if (ni==NULL) {
     DBG_INFO(AQH_LOGDOMAIN, "Error handling message");
   }
+  else {
+    uint8_t valueId;
+    uint16_t val;
+
+    val=AQH_ValueMessage_GetValueNom(msg);
+    valueId=AQH_ValueMessage_GetValueId(msg);
+
+    switch(valueId) {
+    case AQH_ENDPOINT_VID_STATS_PACKETS_IN:      AQH_NodeInfo_SetStatsPacketsIn(ni, val);  AQH_NodeDb_SetModified(xo->nodeDb); break;
+    case AQH_ENDPOINT_VID_STATS_PACKETS_OUT:     AQH_NodeInfo_SetStatsPacketsOut(ni, val); AQH_NodeDb_SetModified(xo->nodeDb); break;
+    case AQH_ENDPOINT_VID_STATS_ERRS_CONTENT:    AQH_NodeInfo_SetStatsCrcErrors(ni, val);  AQH_NodeDb_SetModified(xo->nodeDb); break;
+    case AQH_ENDPOINT_VID_STATS_ERRS_IO:         AQH_NodeInfo_SetStatsIoErrors(ni, val);   AQH_NodeDb_SetModified(xo->nodeDb); break;
+    case AQH_ENDPOINT_VID_STATS_ERRS_NOBUF:      break;
+    case AQH_ENDPOINT_VID_STATS_ERRS_COLLISIONS: AQH_NodeInfo_SetStatsCollisions(ni, val); AQH_NodeDb_SetModified(xo->nodeDb); break;
+    case AQH_ENDPOINT_VID_STATS_ERRS_BUSY:       AQH_NodeInfo_SetStatsBusy(ni, val);       AQH_NodeDb_SetModified(xo->nodeDb); break;
+    case AQH_ENDPOINT_VID_STATS_HEAP_USED:       break;
+    case AQH_ENDPOINT_VID_STATS_HEAP_FREE:       break;
+    default:
+    }
+  }
 }
 
 
@@ -145,11 +165,13 @@ void _handleMsgComSendStat(AQH_NODE_SERVER *xo, const AQH_MESSAGE *msg)
   if (ni==NULL) {
     DBG_INFO(AQH_LOGDOMAIN, "Error handling message");
   }
-  AQH_NodeInfo_SetStatsPacketsOut(ni, AQH_SendStatsMessage_GetPacketsOut(msg));
-  AQH_NodeInfo_SetStatsCollisions(ni, AQH_SendStatsMessage_GetCollisions(msg));
-  AQH_NodeInfo_SetStatsBusy(ni, AQH_SendStatsMessage_GetBusyErrors(msg));
-  AQH_NodeDb_SetModified(xo->nodeDb);
-  _updateTimestampLastChange(ni);
+  else {
+    AQH_NodeInfo_SetStatsPacketsOut(ni, AQH_SendStatsMessage_GetPacketsOut(msg));
+    AQH_NodeInfo_SetStatsCollisions(ni, AQH_SendStatsMessage_GetCollisions(msg));
+    AQH_NodeInfo_SetStatsBusy(ni, AQH_SendStatsMessage_GetBusyErrors(msg));
+    AQH_NodeDb_SetModified(xo->nodeDb);
+    _updateTimestampLastChange(ni);
+  }
 }
 
 
@@ -258,22 +280,24 @@ void _setDeviceName(AQH_VALUE *value, uint32_t uid)
 
 void _announceValue(AQH_NODE_SERVER *xo, uint32_t uid, const AQHNODE_VALUE *v)
 {
-  AQH_VALUE *value;
-  AQH_MESSAGE *msg;
-  
-  value=AQH_Value_new();
-  _setDeviceName(value, uid);
-  AQH_Value_SetDriver(value, "nodes");
-  AQH_Value_SetName(value, AQHNODE_Value_GetName(v));
-  AQH_Value_SetValueUnits(value, AQHNODE_Value_GetValueUnits(v));
-  AQH_Value_SetValueType(value, AQHNODE_Value_GetValueType(v));
-  AQH_Value_SetModality(value, AQHNODE_Value_GetModality(v));
+  if (xo && xo->brokerEndpoint) {
+    AQH_VALUE *value;
+    AQH_MESSAGE *msg;
 
-  msg=AQH_IpcdMessageValues_newForOne(AQH_MSGTYPE_IPC_DATA_ANNOUNCEVALUE,
-                                      AQH_Endpoint_GetNextMessageId(xo->brokerEndpoint), 0,
-                                      0, value);
-  AQH_Endpoint_AddMsgOut(xo->brokerEndpoint, msg);
-  AQH_Value_free(value);
+    value=AQH_Value_new();
+    _setDeviceName(value, uid);
+    AQH_Value_SetDriver(value, "nodes");
+    AQH_Value_SetName(value, AQHNODE_Value_GetName(v));
+    AQH_Value_SetValueUnits(value, AQHNODE_Value_GetValueUnits(v));
+    AQH_Value_SetValueType(value, AQHNODE_Value_GetValueType(v));
+    AQH_Value_SetModality(value, AQHNODE_Value_GetModality(v));
+
+    msg=AQH_IpcdMessageValues_newForOne(AQH_MSGTYPE_IPC_DATA_ANNOUNCEVALUE,
+                                        AQH_Endpoint_GetNextMessageId(xo->brokerEndpoint), 0,
+                                        0, value);
+    AQH_Endpoint_AddMsgOut(xo->brokerEndpoint, msg);
+    AQH_Value_free(value);
+  }
 }