* BIG rewrite of header handling and slimming of context_loop and session_loop; shuff...
[citadel.git] / webcit / mainmenu.c
index 5a9e0d74d2ac3f70a907c5b5caa040acbac993cd..ab3d2f38ab51ca6ebd484a74b41b52ffa924e335 100644 (file)
-/* $Id$ */
-
-
-
-
-#include <ctype.h>
-#include <stdlib.h>
-#include <unistd.h>
-#include <stdio.h>
-#include <fcntl.h>
-#include <signal.h>
-#include <sys/types.h>
-#include <sys/wait.h>
-#include <sys/socket.h>
-#include <sys/time.h>
-#include <limits.h>
-#include <netinet/in.h>
-#include <netdb.h>
-#include <string.h>
-#include <pwd.h>
-#include <errno.h>
-#include <stdarg.h>
-#include <pthread.h>
-#include <signal.h>
-#include "webcit.h"
-
+/*
+ * $Id$
+ */
 
+#include "webcit.h"
 
 /*
  * The Main Menu
  */
 void display_main_menu(void)
 {
-       output_headers(1, 1, 1, 0, 0, 0, 0);
-
-       wprintf("<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=100%%>"
-               "<TR>"
-               "<TD>");        /* start of first column */
-
-       wprintf("<A HREF=\"/knrooms\">"
-               "<span class=\"mainmenu\">"
-               "List known rooms</span></A><br />"
-               "<span class=\"menudesc\">"
-               "Where can I go from here?</span><br />\n"
-       );
-
-       wprintf("<A HREF=\"/gotonext\">"
-               "<span class=\"mainmenu\">"
-               "Goto next room</span></A><br />"
-               "<span class=\"menudesc\">"
-               "...with <EM>unread</EM> messages"
-               "</span><br />\n"
-       );
-
-       wprintf("<A HREF=\"/skip\">"
-               "<span class=\"mainmenu\">"
-               "Skip to next room</span></a><br />"
-               "<span class=\"menudesc\">"
-               "(come back here later)"
-               "</span>\n"
-       );
-
-       if ((strlen(WC->ugname) > 0) && (strcasecmp(WC->ugname, WC->wc_roomname))) {
-               wprintf("<br />"
-                       "<A HREF=\"/ungoto\">"
-                       "<span class=\"mainmenu\">"
-                       "Ungoto</span></A><br />"
-                       "<span class=\"menudesc\">"
-                       "(oops! Back to %s)"
-                       "</span>\n", WC->ugname
-               );
-       }
-
-       wprintf("</TD><TD>\n"); /* start of second column */
-
-       wprintf("<A HREF=\"/readnew\">"
-               "<span class=\"mainmenu\">"
-               "Read new messages</span></A><br />"
-               "<span class=\"menudesc\">"
-               "...in this room</span><br />\n"
-       );
-
-       wprintf("<A HREF=\"/readfwd\">"
-               "<span class=\"mainmenu\">"
-               "Read all messages</span></A><br />"
-               "<span class=\"menudesc\">"
-               "...old <EM>and</EM> new</span><br />\n"
-       );
-
-       wprintf("<A HREF=\"/display_enter\">"
-               "<span class=\"mainmenu\">"
-               "Enter a message</span></A><br />"
-               "<span class=\"menudesc\">"
-               "(post in this room)</span>\n"
-       );
-
-       wprintf("</TD><TD>");   /* start of third column */
-
-       wprintf("<A HREF=\"/summary\">"
-               "<span class=\"mainmenu\">"
-               "Summary page</span></A><br />"
-               "<span class=\"menudesc\">"
-               "Summary of my account</span><br />\n"
-       );
-
-       wprintf("<A HREF=\"/userlist\">\n"
-               "<span class=\"mainmenu\">"
-               "User list</span></A><br />"
-               "<span class=\"menudesc\">"
-               "(all registered users)</span><br />\n"
-       );
-
-       wprintf("<A HREF=\"/termquit\" TARGET=\"_top\">"
-               "<span class=\"mainmenu\">"
-               "Log off</span></A><br />"
-               "<span class=\"menudesc\">"
-               "Bye!</span>\n"
-       );
-
-       wprintf("</TD></TR></TABLE>\n");
-       do_template("endbox");
-
-       wprintf("</TD></TR>"
-               "<TR VALIGN=TOP><TD>");
-
-       svprintf("BOXTITLE", WCS_STRING, "Interaction");
-       do_template("beginbox");
-
-       wprintf("<A HREF=\"/whobbs\">"
-               "<span class=\"mainmenu\">"
-               "Who is online?</span></A>"
-               "<span class=\"menudesc\">"
-               " (users <EM>currently</EM> logged on)"
-               "</span><br />\n"
-       );
-
-       wprintf("<A HREF=\"#\" onClick=\"window.open('/chat', "
-               "'ctdl_chat_window', "
-               "'toolbar=no,location=no,directories=no,copyhistory=no,"
-               "status=no,scrollbars=yes,resizable=yes');\""
-               ">"
-               "<span class=\"mainmenu\">"
-               "Chat with other users in <i>"
-       );
-       escputs(WC->wc_roomname);
-       wprintf("</i></span></A><br />\n");
-
-       wprintf("<A HREF=\"/display_generic\">\n");
-       wprintf("<span class=\"menudesc\">"
-               "Generic server command</span></A>\n");
-
-       do_template("endbox");
-
-       wprintf("</TD><TD>");
-
-       svprintf("BOXTITLE", WCS_STRING, "Your info");
-       do_template("beginbox");
-
-       wprintf("<A HREF=\"/display_reg\">"
-               "<span class=\"mainmenu\">"
-               "Update your contact information "
-               "</span><span class=\"menudesc\">"
-               "(name, address, etc.)</span></A><br />\n");
-
-       wprintf("<A HREF=\"/display_changepw\">"
-               "<span class=\"mainmenu\">"
-               "Change your password</span></A><br />\n");
-
-       wprintf("<A HREF=\"/display_editbio\">"
-               "<span class=\"mainmenu\">"
-               "Enter your 'bio' "
-               "</span><span class=\"menudesc\">"
-               "(a few words about yourself)"
-               "</span></A><br />\n");
-
-       wprintf("<A HREF=\"/display_editpic\">"
-               "<span class=\"mainmenu\">"
-               "Edit your online photo</span></a>\n");
-
-       do_template("endbox");
-
-       wprintf("</TD></TR><TR VALIGN=TOP><TD>");
-
-       svprintf("BOXTITLE", WCS_STRING, "Advanced room commands");
-       do_template("beginbox");
-
-       if ((WC->axlevel >= 6) || (WC->is_room_aide)) {
-               wprintf("<A HREF=\"/display_editroom\">"
-                       "<span class=\"mainmenu\">"
-                       "Edit or delete this room</span></A><br />\n");
-       }
-
-       wprintf("<A HREF=\"/display_private\">"
-               "<span class=\"mainmenu\">"
-               "Go to a &quot;hidden&quot; room</span></A><br />\n");
-
-       wprintf("<A HREF=\"/display_entroom\">"
-               "<span class=\"mainmenu\">"
-               "Create a new room</span></A><br />\n");
-
-       wprintf("<A HREF=\"/display_zap\">"
-               "<span class=\"mainmenu\">"
-               "Zap (forget) this room (%s)</span></A><br />\n",
-               WC->wc_roomname);
-
-        wprintf("<A HREF=\"/display_whok\">\n"
-               "<span class=\"mainmenu\">"
-               "Access controls for this room</span></A><br />\n");
-
-       wprintf("<A HREF=\"/zapped_list\">"
-               "<span class=\"mainmenu\">"
-               "List all forgotten rooms</span></A>\n");
-
-       do_template("endbox");
-
-       wprintf("</TD><TD>");
-
-       if ((WC->axlevel >= 6) || (WC->is_room_aide)) {
-               svprintf("BOXTITLE", WCS_STRING, "Administrative functions");
-               do_template("beginbox");
-
-               wprintf("<A HREF=\"/display_siteconfig\">"
-                       "<span class=\"mainmenu\">"
-                       "Edit site-wide configuration</span></A>\n");
-
-               if (WC->axlevel >= 6) {
-                       wprintf("<br />"
-                               "<A HREF=\"/select_user_to_edit\">"
-                               "<span class=\"mainmenu\">"
-                               "Add, change, delete user accounts"
-                               "</span></A><br />\n");
-
-                       wprintf("<A HREF=\"/validate\">"
-                               "<span class=\"mainmenu\">"
-                               "Validate new users</span></A><br />\n");
-
-                       wprintf("<A HREF=\"/display_floorconfig\">"
-                               "<span class=\"mainmenu\">"
-                               "Add, change, or delete floors"
-                               "</span></A><br />\n");
-
-                       wprintf("<A HREF=\"/display_netconf\">"
-                               "<span class=\"mainmenu\">"
-                               "Configure networking with other systems"
-                               "</span></A><br />\n");
-
-                       wprintf("<A HREF=\"/display_inetconf\">"
-                               "<span class=\"mainmenu\">"
-                               "Internet configuration "
-                               "</span><span class=\"menudesc\">"
-                               "(domain names, etc.)</span></A><br />\n");
-               }
-               do_template("endbox");
-       }
-       wprintf("</TD></TR></TABLE>");
-       wDumpContent(2);
+       begin_burst();
+       output_headers(1, 0, 0, 0, 1, 0);
+       DoTemplate(HKEY("display_main_menu"), NULL, &NoCtx);
+       end_burst();
 }
 
 
+/*
+ * System administration menu
+ */
+void display_aide_menu(void)
+{
+       begin_burst();
+       output_headers(1, 0, 0, 0, 1, 0);
+       DoTemplate(HKEY("display_aide_menu"), NULL, &NoCtx);
+       end_burst();
+}
 
 
 
@@ -272,118 +34,140 @@ void display_main_menu(void)
  */
 void display_generic(void)
 {
-       output_headers(1, 1, 0, 0, 0, 0, 0);
+       output_headers(1, 1, 2, 0, 0, 0);
+       wprintf("<div id=\"banner\">\n");
+       wprintf("<h1>");
+       wprintf(_("Enter a server command"));
+       wprintf("</h1>");
+       wprintf("</div>\n");
+
+       wprintf("<div id=\"content\" class=\"service\">\n");
 
-       svprintf("BOXTITLE", WCS_STRING, "Enter a server command");
-       do_template("beginbox");
+       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\n");
-       wprintf("not supported by WebCit.  If you do not know what that means,\n");
-       wprintf("then this screen will not be of much use to you.<br />\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("<form method=\"post\" action=\"do_generic\">\n");
+       wprintf("<input type=\"hidden\" name=\"nonce\" value=\"%d\">\n", WC->nonce);
 
-       wprintf("Enter command:<br />\n");
-       wprintf("<INPUT TYPE=\"text\" NAME=\"g_cmd\" SIZE=80 MAXLENGTH=\"250\"><br />\n");
+       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):<br />\n");
-       wprintf("<TEXTAREA NAME=\"g_input\" ROWS=10 COLS=80 WIDTH=80></TEXTAREA><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>Detected host header is http://%s</FONT>\n",
-               WC->http_host);
-       wprintf("<INPUT TYPE=\"submit\" NAME=\"sc\" VALUE=\"Send command\">");
+       wprintf("<font size=-2>");
+       wprintf(_("Detected host header is %s://%s"), (is_https ? "https" : "http"), ChrPtr(WC->Hdr->http_host));
+       wprintf("</font>\n");
+       wprintf("<input type=\"submit\" name=\"sc_button\" value=\"%s\">", _("Send command"));
        wprintf("&nbsp;");
-       wprintf("<INPUT TYPE=\"submit\" NAME=\"sc\" VALUE=\"Cancel\"><br />\n");
+       wprintf("<input type=\"submit\" name=\"cancel_button\" value=\"%s\"><br />\n", _("Cancel"));
 
-       wprintf("</FORM></CENTER>\n");
-       do_template("endbox");
+       wprintf("</form></center>\n");
+       wprintf("</td></tr></table></div>\n");
        wDumpContent(1);
 }
 
+/*
+ * Interactive window to perform generic Citadel server commands.
+ */
 void do_generic(void)
 {
-       char buf[SIZ];
-       char gcontent[SIZ];
+
+       wcsession *WCC = WC;
+       int Done = 0;
+       StrBuf *Buf;
        char *junk;
        size_t len;
 
-       if (strcasecmp(bstr("sc"), "Send command")) {
+       if (!havebstr("sc_button")) {
                display_main_menu();
                return;
        }
 
-       output_headers(1, 1, 0, 0, 0, 0, 0);
-
-       serv_printf("%s", bstr("g_cmd"));
-       serv_gets(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 ((buf[0] == '1') || (buf[0] == '8')) {
-               while (serv_gets(gcontent), strcmp(gcontent, "000")) {
-                       escputs(gcontent);
-                       wprintf("<br />\n");
+       output_headers(1, 1, 0, 0, 0, 0);
+
+       serv_puts(bstr("g_cmd"));
+
+       svput("BOXTITLE", WCS_STRING, _("Server command results"));
+       do_template("beginboxx", NULL);
+
+       wprintf("<table border=0><tr><td>Command:</td><td><tt>");
+       StrEscAppend(WCC->WBuf, sbstr("g_cmd"), NULL, 0, 0);
+       wprintf("</tt></td></tr><tr><td>Result:</td><td><tt>");
+       StrEscAppend(WCC->WBuf, Buf, NULL, 0, 0);
+       StrBufAppendBufPlain(WCC->WBuf, HKEY("<br>\n"), 0);
+       wprintf("</tt></td></tr></table><br />\n");
+       
+       switch (GetServerStatus(Buf, NULL)) {
+       case 8:
+               serv_puts("\n\n000");
+               if ( (StrLength(Buf)==3) && 
+                    !strcmp(ChrPtr(Buf), "000")) {
+                       StrBufAppendBufPlain(WCC->WBuf, HKEY("\000"), 0);
+                       break;
                }
-               wprintf("000");
-       }
-       if (buf[0] == '4') {
-               text_to_server(bstr("g_input"), 0);
+       case 1:
+               while (!Done) {
+                       StrBuf_ServGetln(Buf);
+                       if ( (StrLength(Buf)==3) && 
+                            !strcmp(ChrPtr(Buf), "000")) {
+                               Done = 1;
+                       }
+                       StrEscAppend(WCC->WBuf, Buf, NULL, 0, 0);
+                       StrBufAppendBufPlain(WCC->WBuf, HKEY("<br>\n"), 0);
+               }
+               break;
+       case 4:
+               text_to_server(bstr("g_input"));
                serv_puts("000");
-       }
-       if (buf[0] == '6') {
-               len = atol(&buf[4]);
-               junk = malloc(len);
-               serv_read(junk, len);
-               free(junk);
-       }
-       if (buf[0] == '7') {
-               len = atol(&buf[4]);
+               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);
        }
+       
        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");
+       wprintf("<a href=\"display_generic\">Enter another command</a><br />\n");
+       wprintf("<a href=\"display_advanced\">Return to menu</a>\n");
+       do_template("endbox", NULL);
        wDumpContent(1);
 }
 
 
-
-
 /*
- * Display the menubar.  Set as_single_page to
- * display HTML headers and footers -- otherwise it's assumed
+ * Display the menubar.  
+ *
+ * Set 'as_single_page' 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, 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");
+               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", NULL);
        }
 
-       do_template("menubar");
+       do_template("menubar", NULL);
 
        if (as_single_page) {
                wDumpContent(2);
@@ -393,3 +177,82 @@ void display_menubar(int as_single_page) {
 }
 
 
+/*
+ * Display the wait / input dialog while restarting the server.
+ */
+void display_shutdown(void)
+{
+       char buf[SIZ];
+       char *when;
+       
+       when=bstr("when");
+       if (strcmp(when, "now") == 0){
+               serv_printf("DOWN 1");
+               serv_getln(buf, sizeof buf);
+               if (atol(buf) == 500)
+               { /* upsie. maybe the server is not running as daemon? */
+                       
+                       safestrncpy(WC->ImportantMessage,
+                                   &buf[4],
+                                   sizeof WC->ImportantMessage);
+               }
+               begin_burst();
+               output_headers(1, 0, 0, 0, 1, 0);
+               DoTemplate(HKEY("display_serverrestart"), NULL, &NoCtx);
+               end_burst();
+               lingering_close(WC->Hdr->http_sock);
+               sleeeeeeeeeep(10);
+               serv_printf("NOOP");
+               serv_printf("NOOP");
+       }
+       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("display_serverrestartpage"), NULL, &NoCtx);
+                       end_burst();
+               }
+               else
+               {
+                       serv_printf("SEXP broadcast|%s", message);
+                       serv_getln(buf, sizeof buf); /* TODO: should we care? */
+                       begin_burst();
+                       output_headers(1, 0, 0, 0, 1, 0);
+                       DoTemplate(HKEY("display_serverrestartpagedo"), NULL, &NoCtx);
+                       end_burst();                    
+               }
+       }
+       else if (!strcmp(when, "idle")) {
+               serv_printf("SCDN 3");
+               serv_getln(buf, sizeof buf);
+
+               if (atol(buf) == 500)
+               { /* upsie. maybe the server is not running as daemon? */
+                       safestrncpy(WC->ImportantMessage,
+                                   &buf[4],
+                                   sizeof WC->ImportantMessage);
+               }
+               begin_burst();
+               output_headers(1, 0, 0, 0, 1, 0);
+               DoTemplate(HKEY("display_aide_menu"), NULL, &NoCtx);
+               end_burst();                    
+       }
+}
+
+void _display_menubar(void) { display_menubar(0); }
+
+void 
+InitModule_MAINMENU
+(void)
+{
+       WebcitAddUrlHandler(HKEY("display_aide_menu"), display_aide_menu, 0);
+       WebcitAddUrlHandler(HKEY("server_shutdown"), display_shutdown, 0);
+       WebcitAddUrlHandler(HKEY("display_main_menu"), display_main_menu, 0);
+       WebcitAddUrlHandler(HKEY("display_generic"), display_generic, 0);
+       WebcitAddUrlHandler(HKEY("do_generic"), do_generic, 0);
+       WebcitAddUrlHandler(HKEY("display_menubar"), _display_menubar, 0);
+}