More work on aqhome-cgi.

apps/aqhome-cgi/modules/madmin.c

@@ -36,9 +36,12 @@
  * ------------------------------------------------------------------------------------------------
  */
 
+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);
+static int _handleRqIndex(AQH_MODULE *m, AQCGI_REQUEST *rq, GWEN_BUFFER *dbuf);
 
 
 /* ------------------------------------------------------------------------------------------------
@@ -55,6 +58,56 @@ void AQH_ModAdmin_Extend(AQH_MODULE *m, AQH_SERVICE *sv, const char *baseFolder)
 
 
 
+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;
@@ -74,7 +127,7 @@ AQH_MODULE *_loadSubModule(AQH_MODULE *m, AQCGI_REQUEST *rq, AQH_SESSION *sessio
 
       AQH_ModAdmModules_Extend(mSub, AQH_ModService_GetService(m), GWEN_Buffer_GetStart(nbuf));
       AQH_Module_Tree2_AddChild(m, mSub);
-    GWEN_Buffer_free(nbuf);
+      GWEN_Buffer_free(nbuf);
       return mSub;
     }
   }
@@ -85,22 +138,60 @@ AQH_MODULE *_loadSubModule(AQH_MODULE *m, AQCGI_REQUEST *rq, AQH_SESSION *sessio
 
 int _handleRequest(AQH_MODULE *m, AQCGI_REQUEST *rq, AQH_SESSION *session, const char *sLastPathElem)
 {
-  if (strcasecmp(sLastPathElem, "index.html")==0)
-    return _handleRqIndex(m, rq);
-  else {
-    AQCGI_SendResponseWithStatus(rq, 404, "Not Found");
-    return GWEN_ERROR_NOT_IMPLEMENTED;
+  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)
+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");
-  AQCGI_SendResponseWithStatus(rq, 404, "Not Found");
-  return GWEN_ERROR_GENERIC;
+  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;
 }