final touches on dkim test harness
[citadel.git] / webcit / mainmenu.c
index 4373c76a2d02fc33b4b4282bf3251b97bd703fe9..2c326e001650e4756e7184f4b939966c8798cc6e 100644 (file)
 /*
- * $Id$
- */
-/**
- * \defgroup DispAdvancedMenu Displays the "advanced" (main) menu.
- * \ingroup MenuInfrastructure
+ * The main menu and other things
  *
+ * Copyright (c) 1996-2021 by the citadel.org team
+ *
+ * This program is open source software.  We call it open source, not
+ * free software, because Richard Stallman is a communist and an asshole.
+ *
+ * The program is licensed under the General Public License, version 3.
+ *
+ * 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.
  */
-/*@{*/
-#include "webcit.h"
-
-/**
- * \brief The Main Menu
- */
-void display_main_menu(void)
-{
-       char buf[SIZ];
-       output_headers(1, 1, 1, 0, 0, 0);
-
-       wprintf("<div class=\"fix_scrollbar_bug\">"
-               "<table width=100%%>"
-               "<tr><td colspan=\"2\">\n");
-
-       svprintf("BOXTITLE", WCS_STRING, _("Basic commands"));
-       do_template("beginbox");
-
-       wprintf("\n"
-               "<table border=0 cellspacing=1 cellpadding=1 width=99%%>"
-               "<tr>"
-               "<td>");        /**< start of first column */
-
-       wprintf("<ul class=\"adminitems\">");
-
-       wprintf("<li><a href=\"knrooms\">");
-       wprintf(_("List known rooms"));
-       wprintf("</a><span>");
-       wprintf(_("Where can I go from here?"));
-       wprintf("</span></li>\n");
-
-       wprintf("<li><a href=\"gotonext\">");
-       wprintf(_("Goto next room"));
-       wprintf("</a><span>");
-       wprintf(_("...with <em>unread</em> messages"));
-       wprintf("</span></li>\n");
-
-       wprintf("<li><a href=\"skip\">");
-       wprintf(_("Skip to next room"));
-       wprintf("</a><span>");
-       wprintf(_("(come back here later)"));
-       wprintf("</span></li>\n");
-
-       if ((!IsEmptyStr(WC->ugname)) && (strcasecmp(WC->ugname, WC->wc_roomname))) {
-               wprintf("<li><a href=\"ungoto\">");
-               wprintf(_("Ungoto"));
-               wprintf("</a><span>");
-               wprintf(_("(oops! Back to %s)"), WC->ugname);
-               wprintf("</span></li>\n");
-       }
-
-       wprintf("</ul>\n");
-
-       wprintf("</td><td>\n"); /* start of second column */
-
-       wprintf("<ul class=\"adminitems\">");
-
-       wprintf("<li><a href=\"readnew\">");
-       wprintf(_("Read new messages"));
-       wprintf("</a><span>");
-       wprintf(_("...in this room"));
-       wprintf("</span></li>\n");
-
-       wprintf("<li><a href=\"readfwd\">");
-       wprintf(_("Read all messages"));
-       wprintf("</a><span>");
-       wprintf(_("...old <EM>and</EM> new"));
-       wprintf("</span></li>\n");
-
-       wprintf("<li><a href=\"display_enter\">");
-       wprintf(_("Enter a message"));
-       wprintf("</a><span>");
-       wprintf(_("(post in this room)"));
-       wprintf("</span></li>\n");
 
-       if (WC->room_flags & QR_VISDIR) {
-               wprintf("<li><a href=\"display_room_directory\">");
-               wprintf(_("File library"));
-               wprintf("</a><span>");
-               wprintf(_("(List files available for download)"));
-               wprintf("</span></li>\n");
-       }
-
-       wprintf("</ul>\n");
-
-       wprintf("</td><td>");   /* start of third column */
-
-       wprintf("<ul class=\"adminitems\">");
-
-       wprintf("<li><a href=\"summary\">");
-       wprintf(_("Summary page"));
-       wprintf("</a><span>");
-       wprintf(_("Summary of my account"));
-       wprintf("</span></li>\n");
-
-       wprintf("<li><a href=\"userlist\">\n");
-       wprintf(_("User list"));
-       wprintf("</a><span>");
-       wprintf(_("(all registered users)"));
-       wprintf("</span></li>\n");
-
-       wprintf("<li><a href=\"termquit\" TARGET=\"_top\">");
-       wprintf(_("Log off"));
-       wprintf("</a><span>");
-       wprintf(_("Bye!"));
-       wprintf("</span></li>\n");
-
-       wprintf("</ul>\n");
-
-       wprintf("</td></tr></table>\n");
-       do_template("endbox");
-
-       wprintf("</td></tr>"
-               "<tr valign=top><td width=50%%>");
-
-       print_menu_box(_("Your info"), "adminitems", 6,
-                      "display_preferences", _("Change your preferences and settings"),
-                      "display_reg", _("Update your contact information"),
-                      "display_changepw", _("Change your password"),
-                      "display_editbio", _("Enter your 'bio'"),
-                      "display_editpic", _("Edit your online photo"), 
-                      "display_sieve", _("View/edit server-side mail filters"));
-
-       wprintf("</td><td width=50%%>");
-
-       snprintf(buf, SIZ, _("Zap (forget) this room (%s)"), WC->wc_roomname);
-
-       if ((WC->axlevel >= 6) || (WC->is_room_aide)) 
-               print_menu_box(_("Advanced room commands"),"adminitems", 5,
-                              "display_editroom", _("Edit or delete this room"),
-                              "display_private", _("Go to a 'hidden' room"),
-                              "display_entroom", _("Create a new room"),
-                              "display_zap",buf,
-                              "zapped_list",_("List all forgotten rooms"));
-       else
-               print_menu_box(_("Advanced room commands"),"adminitems", 4,
-                              "display_private", _("Go to a 'hidden' room"),
-                              "display_entroom", _("Create a new room"),
-                              "display_zap",buf,
-                              "zapped_list",_("List all forgotten rooms"));
+#include "webcit.h"
 
-       wprintf("</td></tr></table></div>");
-       wDumpContent(2);
+// The Main Menu
+void display_main_menu(void) {
+       begin_burst();
+       output_headers(1, 0, 0, 0, 1, 0);
+       DoTemplate(HKEY("display_main_menu"), NULL, &NoCtx);
+       end_burst();
 }
 
 
-/**
- * \brief System administration menu
- */
-void display_aide_menu(void)
-{
-       output_headers(1, 1, 2, 0, 0, 0);
-
-        wprintf("<div id=\"banner\" class=\"service\">\n");
-        wprintf("<h1>");
-       wprintf(_("System Administration Menu"));
-        wprintf("</h1>");
-        wprintf("</div>");
-
-       wprintf("<div id=\"content\">");
-
-       wprintf("<div class=\"fix_scrollbar_bug\">"
-               "<table border=0 width=99%%> "
-               "<tr valign=top><td width=50%% rowspan=2>");
-
-
-       print_menu_box(_("Global Configuration"), "adminitems", 4,
-                      "display_siteconfig", _("Edit site-wide configuration"), 
-                      "display_inetconf",_("Domain names and Internet mail configuration"),
-                      "display_netconf", _("Configure replication with other Citadel servers"), 
-                      "display_smtpqueue", _("View the outbound SMTP queue"));
-       
-       print_menu_box(_("Shutdown Citadel"), "adminitems", 3, 
-                      "server_shutdown?when=now", _("Restart Imediate"),
-                      "server_shutdown?when=page", _("Restart after paging Users"),
-                      "server_shutdown?when=idle", _("Restart when everybody is idle."));
-
-       wprintf("</td><td width=50%%>");
-
-       print_menu_box(_("User account management"), "adminitems", 2, 
-                      "select_user_to_edit", _("Add, change, delete user accounts"),
-                      "validate", _("Validate new users"));
-
-       wprintf("</td></tr><tr><td width=50%%>");
-
-       print_menu_box(_("Rooms and Floors"), "adminitems", 1, 
-                      "display_floorconfig", _("Add, change, or delete floors"));
-
-       wprintf("</td></tr></table></div>");
-       wDumpContent(2);
+// System administration menu
+void display_aide_menu(void) {
+       begin_burst();
+       output_headers(1, 0, 0, 0, 1, 0);
+       DoTemplate(HKEY("aide_display_menu"), NULL, &NoCtx);
+       end_burst();
 }
 
 
-
-
-
-/**
- * \brief Display the screen to enter a generic server command
- */
-void display_generic(void)
-{
-       output_headers(1, 1, 2, 0, 0, 0);
-       wprintf("<div id=\"banner\">\n"
-               "<table class=\"mainmenu_banner\"><tr><td>"
-               "<span class=\"titlebar\">");
-       wprintf(_("Enter a server command"));
-       wprintf("</span></td></tr></table>\n"
-               "</div>\n<div id=\"content\">\n"
-       );
-
-       wprintf("<div class=\"fix_scrollbar_bug\">"
-               "<table class=\"mainmenu_background\"><tr><td>\n");
-
-       wprintf("<center>");
-       wprintf(_("This screen allows you to enter Citadel server commands which are "
-               "not supported by WebCit.  If you do not know what that means, "
-               "then this screen will not be of much use to you."));
-       wprintf("<br />\n");
-
-       wprintf("<form method=\"post\" action=\"do_generic\">\n");
-       wprintf("<input type=\"hidden\" name=\"nonce\" value=\"%ld\">\n", WC->nonce);
-
-       wprintf(_("Enter command:"));
-       wprintf("<br /><input type=\"text\" name=\"g_cmd\" size=80 maxlength=\"250\"><br />\n");
-
-       wprintf(_("Command input (if requesting SEND_LISTING transfer mode):"));
-       wprintf("<br /><textarea name=\"g_input\" rows=10 cols=80 width=80></textarea><br />\n");
-
-       wprintf("<font size=-2>");
-       wprintf(_("Detected host header is %s://%s"), (is_https ? "https" : "http"), WC->http_host);
-       wprintf("</font>\n");
-       wprintf("<input type=\"submit\" name=\"sc_button\" value=\"%s\">", _("Send command"));
-       wprintf("&nbsp;");
-       wprintf("<input type=\"submit\" name=\"cancel_button\" value=\"%s\"><br />\n", _("Cancel"));
-
-       wprintf("</form></center>\n");
-       wprintf("</td></tr></table></div>\n");
-       wDumpContent(1);
-}
-
-/**
- * \brief Interactive window to perform generic Citadel server commands.
- */
-void do_generic(void)
-{
-       char buf[SIZ];
-       char gcontent[SIZ];
+// Handle generic server commands, possibly entered from a screen, possibly set up as a way to avoid custom code
+void do_generic(void) {
+        WCTemplputParams SubTP;
+       int Done = 0;
+       StrBuf *Buf;
+       StrBuf *LineBuf;
        char *junk;
        size_t len;
 
-       if (IsEmptyStr(bstr("sc_button"))) {
+       if ( (!havebstr("sc_button")) && (!havebstr("ok_button")) && (!havebstr("cancel_button")) ) {
                display_main_menu();
                return;
        }
 
-       output_headers(1, 1, 0, 0, 0, 0);
-
-       serv_printf("%s", bstr("g_cmd"));
-       serv_getln(buf, sizeof buf);
-
-       svprintf("BOXTITLE", WCS_STRING, _("Server command results"));
-       do_template("beginbox");
-
-       wprintf("<table border=0><tr><td>Command:</td><td><tt>");
-       escputs(bstr("g_cmd"));
-       wprintf("</tt></td></tr><tr><td>Result:</td><td><tt>");
-       escputs(buf);
-       wprintf("</tt></td></tr></table><br />\n");
-
-       if (buf[0] == '8') {
-               serv_printf("\n\n000");
+       if (havebstr("cancel_button")) {
+               AppendImportantMessage(_("Cancelled.  Changes were not saved."), -1);
        }
-       if ((buf[0] == '1') || (buf[0] == '8')) {
-               while (serv_getln(gcontent, sizeof gcontent), strcmp(gcontent, "000")) {
-                       escputs(gcontent);
-                       wprintf("<br />\n");
+
+       if (havebstr("ok_button")) {
+               Buf = NewStrBuf();
+               serv_puts(bstr("g_cmd"));
+               StrBuf_ServGetln(Buf);
+               
+               switch (GetServerStatus(Buf, NULL)) {
+               case 8:
+                       serv_puts("\n\n000");
+                       if ( (StrLength(Buf)==3) && 
+                       !strcmp(ChrPtr(Buf), "000")) {
+                               StrBufAppendBufPlain(Buf, HKEY("\000"), 0);
+                               break;
+                       }
+               case 1:
+                       LineBuf = NewStrBuf();
+                       StrBufAppendBufPlain(Buf, HKEY("\n"), 0);
+                       while (!Done) {
+                               if (StrBuf_ServGetln(LineBuf) < 0)
+                                       break;
+                               if ( (StrLength(LineBuf)==3) && 
+                               !strcmp(ChrPtr(LineBuf), "000")) {
+                                       Done = 1;
+                               }
+                               StrBufAppendBuf(Buf, LineBuf, 0);
+                               StrBufAppendBufPlain(Buf, HKEY("\n"), 0);
+                       }
+                       FreeStrBuf(&LineBuf);
+                       break;
+               case 2:
+                       break;
+               case 4:
+                       text_to_server(bstr("g_input"));
+                       serv_puts("000");
+                       break;
+               case 6:
+                       len = atol(&ChrPtr(Buf)[4]);
+                       StrBuf_ServGetBLOBBuffered(Buf, len);
+                       break;
+               case 7:
+                       len = atol(&ChrPtr(Buf)[4]);
+                       junk = malloc(len);
+                       memset(junk, 0, len);
+                       serv_write(junk, len);
+                       free(junk);
+                       break;
                }
-               wprintf("000");
-       }
-       if (buf[0] == '4') {
-               text_to_server(bstr("g_input"));
-               serv_puts("000");
+               FreeStrBuf(&Buf);
        }
-       if (buf[0] == '6') {
-               len = atol(&buf[4]);
-               junk = malloc(len);
-               serv_read(junk, len);
-               free(junk);
+       
+       // We may have been supplied with instructions regarding the location
+       // to which we must return after posting.  If found, go there.
+       if (havebstr("return_to")) {
+               syslog(LOG_DEBUG, "return_to = %s", bstr("return_to"));
+               http_redirect(bstr("return_to"));
        }
-       if (buf[0] == '7') {
-               len = atol(&buf[4]);
-               junk = malloc(len);
-               memset(junk, 0, len);
-               serv_write(junk, len);
-               free(junk);
+
+       // Otherwise, do the generic result screen.
+       else {
+               begin_burst();
+               output_headers(1, 0, 0, 0, 1, 0);
+       
+               StackContext(NULL, &SubTP, Buf, CTX_STRBUF, 0, NULL);
+               {
+                       DoTemplate(HKEY("aide_display_generic_result"), NULL, &SubTP);
+               }
+               UnStackContext(&SubTP);
+               wDumpContent(1);
        }
-       wprintf("<hr />");
-       wprintf("<a href=\"display_generic\">Enter another command</a><br />\n");
-       wprintf("<a href=\"display_advanced\">Return to menu</a>\n");
-       do_template("endbox");
-       wDumpContent(1);
-}
 
+}
 
-/**
- * \brief Display the menubar.  
- * \param as_single_page Set to display HTML headers and footers -- otherwise it's assumed
- * that the menubar is being embedded in another page.
- */
-void display_menubar(int as_single_page) {
 
-       if (as_single_page) {
-               output_headers(0, 0, 0, 0, 0, 0);
-               wprintf("<html>\n"
-                       "<head>\n"
-                       "<title>MenuBar</title>\n"
-                       "<style type=\"text/css\">\n"
-                       "body   { text-decoration: none; }\n"
-                       "</style>\n"
-                       "</head>\n");
-               do_template("background");
+// Display the wait / input dialog while restarting the server.
+void display_shutdown(void) {
+       StrBuf *Line;
+       char *when;
+       
+       Line = NewStrBuf();
+       when=bstr("when");
+       if (strcmp(when, "now") == 0){
+               serv_printf("DOWN 1");
+               StrBuf_ServGetln(Line);
+               GetServerStatusMsg(Line, NULL, 1, 5);
+
+               begin_burst();
+               output_headers(1, 0, 0, 0, 1, 0);
+               DoTemplate(HKEY("aide_display_serverrestart"), NULL, &NoCtx);
+               end_burst();
+               lingering_close(WC->Hdr->http_sock);
+               sleeeeeeeeeep(10);
+               serv_printf("NOOP");
+               serv_printf("NOOP");
        }
-
-       do_template("menubar");
-
-       if (as_single_page) {
-               wDumpContent(2);
+       else if (strcmp(when, "page") == 0) {
+               char *message;
+              
+               message = bstr("message");
+               if ((message == NULL) || (IsEmptyStr(message)))
+               {
+                       begin_burst();
+                       output_headers(1, 0, 0, 0, 1, 0);
+                       DoTemplate(HKEY("aide_display_serverrestart_page"), NULL, &NoCtx);
+                       end_burst();
+               }
+               else
+               {
+                       serv_printf("SEXP broadcast|%s", message);
+                       StrBuf_ServGetln(Line);
+                       GetServerStatusMsg(Line, NULL, 1, 0);
+
+                       begin_burst();
+                       output_headers(1, 0, 0, 0, 1, 0);
+                       DoTemplate(HKEY("aide_display_serverrestart_page"), NULL, &NoCtx);
+                       end_burst();                    
+               }
        }
-
-
+       else if (!strcmp(when, "idle")) {
+               serv_printf("SCDN 3");
+               StrBuf_ServGetln(Line);
+               GetServerStatusMsg(Line, NULL, 1, 2);
+
+               begin_burst();
+               output_headers(1, 0, 0, 0, 1, 0);
+               DoTemplate(HKEY("aide_display_menu"), NULL, &NoCtx);
+               end_burst();                    
+       }
+       FreeStrBuf(&Line);
 }
 
 
-/*@}*/
+void 
+InitModule_MAINMENU
+(void)
+{
+       WebcitAddUrlHandler(HKEY("display_aide_menu"), "", 0, display_aide_menu, 0);
+       WebcitAddUrlHandler(HKEY("server_shutdown"), "", 0, display_shutdown, 0);
+       WebcitAddUrlHandler(HKEY("display_main_menu"), "", 0, display_main_menu, 0);
+       WebcitAddUrlHandler(HKEY("do_generic"), "", 0, do_generic, 0);
+}