]> code.citadel.org Git - citadel.git/blobdiff - webcit/messages.c
* *** HUGE CHANGES *** *** WARNING: NOT FULLY FUNCTIONAL ***
[citadel.git] / webcit / messages.c
index c81b4d5e0f72974a73ccab33d73bfb9152a29c95..5030cb2faec8e0490de1061b6bdca75cf466ef95 100644 (file)
@@ -114,6 +114,12 @@ void fetchname_parsed_vcard(struct vCard *v, char *storename) {
  *
  * Set 'full' to nonzero to display the full card, otherwise it will only
  * show a summary line.
+ *
+ * This code is a bit ugly, so perhaps an explanation is due: we do this
+ * in two passes through the vCard fields.  On the first pass, we process
+ * fields we understand, and then render them in a pretty fashion at the
+ * end.  Then we make a second pass, outputting all the fields we don't
+ * understand in a simple two-column name/value format.
  */
 void display_parsed_vcard(struct vCard *v, int full) {
        int i, j;
@@ -122,6 +128,8 @@ void display_parsed_vcard(struct vCard *v, int full) {
        int is_qp = 0;
        int is_b64 = 0;
        char *thisname, *thisvalue;
+       char firsttoken[SIZ];
+       int pass;
 
        char displayname[SIZ];
        char phone[SIZ];
@@ -147,121 +155,138 @@ void display_parsed_vcard(struct vCard *v, int full) {
        }
 
        wprintf("<TABLE bgcolor=#888888>");
-       if (v->numprops) for (i=0; i<(v->numprops); ++i) {
+       for (pass=1; pass<=2; ++pass) {
 
-               thisname = strdup(v->prop[i].name);
+               if (v->numprops) for (i=0; i<(v->numprops); ++i) {
 
-               for (j=0; j<num_tokens(thisname, ';'); ++j) {
-                       extract_token(buf, thisname, j, ';');
-                       if (!strcasecmp(buf, "encoding=quoted-printable")) {
-                               is_qp = 1;
-                               remove_token(thisname, j, ';');
+                       thisname = strdup(v->prop[i].name);
+                       extract_token(firsttoken, thisname, 0, ';');
+       
+                       for (j=0; j<num_tokens(thisname, ';'); ++j) {
+                               extract_token(buf, thisname, j, ';');
+                               if (!strcasecmp(buf, "encoding=quoted-printable")) {
+                                       is_qp = 1;
+                                       remove_token(thisname, j, ';');
+                               }
+                               if (!strcasecmp(buf, "encoding=base64")) {
+                                       is_b64 = 1;
+                                       remove_token(thisname, j, ';');
+                               }
                        }
-                       if (!strcasecmp(buf, "encoding=base64")) {
-                               is_b64 = 1;
-                               remove_token(thisname, j, ';');
+       
+                       if (is_qp) {
+                               thisvalue = malloc(strlen(v->prop[i].value) + 50);
+                               j = CtdlDecodeQuotedPrintable(
+                                       thisvalue, v->prop[i].value,
+                                       strlen(v->prop[i].value) );
+                               thisvalue[j] = 0;
                        }
-               }
-
-               if (is_qp) {
-                       thisvalue = malloc(strlen(v->prop[i].value) + 50);
-                       j = CtdlDecodeQuotedPrintable(
-                               thisvalue, v->prop[i].value,
-                               strlen(v->prop[i].value) );
-                       thisvalue[j] = 0;
-               }
-               else if (is_b64) {
-                       thisvalue = malloc(strlen(v->prop[i].value) + 50);
-                       CtdlDecodeBase64(
-                               thisvalue, v->prop[i].value,
-                               strlen(v->prop[i].value) );
-               }
-               else {
-                       thisvalue = strdup(v->prop[i].value);
-               }
-
-               /*** Various fields we may encounter ***/
-
-               /* N is name, but only if there's no FN already there */
-               if (!strcasecmp(thisname, "n")
-                  || (!strncasecmp(thisname, "n;", 2)) ) {
-                       if (strlen(displayname) == 0) {
+                       else if (is_b64) {
+                               thisvalue = malloc(strlen(v->prop[i].value) + 50);
+                               CtdlDecodeBase64(
+                                       thisvalue, v->prop[i].value,
+                                       strlen(v->prop[i].value) );
+                       }
+                       else {
+                               thisvalue = strdup(v->prop[i].value);
+                       }
+       
+                       /*** Various fields we may encounter ***/
+       
+                       /* N is name, but only if there's no FN already there */
+                       if (!strcasecmp(firsttoken, "n")) {
+                               if (strlen(displayname) == 0) {
+                                       strcpy(displayname, thisvalue);
+                               }
+                       }
+       
+                       /* FN (full name) is a true 'display name' field */
+                       else if (!strcasecmp(firsttoken, "fn")) {
                                strcpy(displayname, thisvalue);
                        }
-               }
-
-               /* FN (full name) is a true 'display name' field */
-               else if (!strcasecmp(thisname, "fn")
-                  || (!strncasecmp(thisname, "fn;", 3)) ) {
-                       strcpy(displayname, thisvalue);
-               }
-
-               else if (!strncasecmp(thisname, "email", 5)) {
-                       if (strlen(mailto) > 0) strcat(mailto, "<BR>");
-                       strcat(mailto,
-                               "<A HREF=\"/display_enter"
-                               "?force_room=_MAIL_&recp=");
-                       urlesc(&mailto[strlen(mailto)], thisvalue);
-                       strcat(mailto, "\">");
-                       urlesc(&mailto[strlen(mailto)], thisvalue);
-                       strcat(mailto, "</A>");
-               }
-               else if (!strncasecmp(thisname, "tel;", 4)) {
-                       if (strlen(phone) > 0) strcat(phone, "<BR>");
-                       strcat(phone, thisvalue);
-                       for (j=0; j<num_tokens(thisname, ';'); ++j) {
-                               extract_token(buf, thisname, j, ';');
-                               if (!strcasecmp(buf, "tel"))
-                                       strcat(phone, "");
-                               else if (!strcasecmp(buf, "work"))
-                                       strcat(phone, " (work)");
-                               else if (!strcasecmp(buf, "home"))
-                                       strcat(phone, " (home)");
-                               else if (!strcasecmp(buf, "cell"))
-                                       strcat(phone, " (cell)");
-                               else {
-                                       strcat(phone, " (");
-                                       strcat(phone, buf);
-                                       strcat(phone, ")");
+       
+                       else if (!strcasecmp(firsttoken, "email")) {
+                               if (strlen(mailto) > 0) strcat(mailto, "<br />");
+                               strcat(mailto,
+                                       "<A HREF=\"/display_enter"
+                                       "?force_room=_MAIL_&recp=");
+                               urlesc(&mailto[strlen(mailto)], thisvalue);
+                               strcat(mailto, "\">");
+                               urlesc(&mailto[strlen(mailto)], thisvalue);
+                               strcat(mailto, "</A>");
+                       }
+                       else if (!strcasecmp(firsttoken, "tel")) {
+                               if (strlen(phone) > 0) strcat(phone, "<br />");
+                               strcat(phone, thisvalue);
+                               for (j=0; j<num_tokens(thisname, ';'); ++j) {
+                                       extract_token(buf, thisname, j, ';');
+                                       if (!strcasecmp(buf, "tel"))
+                                               strcat(phone, "");
+                                       else if (!strcasecmp(buf, "work"))
+                                               strcat(phone, " (work)");
+                                       else if (!strcasecmp(buf, "home"))
+                                               strcat(phone, " (home)");
+                                       else if (!strcasecmp(buf, "cell"))
+                                               strcat(phone, " (cell)");
+                                       else {
+                                               strcat(phone, " (");
+                                               strcat(phone, buf);
+                                               strcat(phone, ")");
+                                       }
                                }
                        }
-               }
-               else if (!strcasecmp(thisname, "adr")) {
-                       wprintf("<TR><TD>Address:</TD><TD>");
-                       for (j=0; j<num_tokens(thisvalue, ';'); ++j) {
-                               extract_token(buf, thisvalue, j, ';');
-                               if (strlen(buf) > 0) {
-                                       escputs(buf);
-                                       wprintf("<BR>");
+                       else if (!strcasecmp(firsttoken, "adr")) {
+                               if (pass == 2) {
+                                       wprintf("<TR><TD>Address:</TD><TD>");
+                                       for (j=0; j<num_tokens(thisvalue, ';'); ++j) {
+                                               extract_token(buf, thisvalue, j, ';');
+                                               if (strlen(buf) > 0) {
+                                                       escputs(buf);
+                                                       wprintf("<br />");
+                                               }
+                                       }
+                                       wprintf("</TD></TR>\n");
                                }
                        }
-                       wprintf("</TD></TR>\n");
+                       else if (!strcasecmp(firsttoken, "version")) {
+                               /* ignore */
+                       }
+                       else if (!strcasecmp(firsttoken, "rev")) {
+                               /* ignore */
+                       }
+                       else if (!strcasecmp(firsttoken, "label")) {
+                               /* ignore */
+                       }
+                       else {
+                               if (pass == 2) {
+                                       wprintf("<TR><TD>");
+                                       escputs(thisname);
+                                       wprintf("</TD><TD>");
+                                       escputs(thisvalue);
+                                       wprintf("</TD></TR>\n");
+                               }
+                       }
+       
+                       free(thisname);
+                       free(thisvalue);
                }
-               else {
-                       wprintf("<TR><TD>");
-                       escputs(thisname);
-                       wprintf("</TD><TD>");
-                       escputs(thisvalue);
-                       wprintf("</TD></TR>\n");
+       
+               if (pass == 1) {
+                       wprintf("<TR BGCOLOR=\"#AAAAAA\">"
+                       "<TD COLSPAN=2 BGCOLOR=\"#FFFFFF\">"
+                       "<IMG ALIGN=CENTER SRC=\"/static/vcard.gif\">"
+                       "<FONT SIZE=+1><B>");
+                       escputs(displayname);
+                       wprintf("</B></FONT></TD></TR>\n");
+               
+                       if (strlen(phone) > 0)
+                               wprintf("<TR><TD>Telephone:</TD><TD>%s</TD></TR>\n", phone);
+                       if (strlen(mailto) > 0)
+                               wprintf("<TR><TD>E-mail:</TD><TD>%s</TD></TR>\n", mailto);
                }
 
-               free(thisname);
-               free(thisvalue);
-
        }
 
-       wprintf("<TR BGCOLOR=\"#AAAAAA\">"
-       "<TD COLSPAN=2 BGCOLOR=\"#FFFFFF\">"
-       "<IMG ALIGN=CENTER SRC=\"/static/vcard.gif\">"
-       "<FONT SIZE=+1><B>");
-       escputs(displayname);
-       wprintf("</B></FONT></TD></TR>\n");
-
-       if (strlen(phone) > 0)
-               wprintf("<TR><TD>Telephone:</TD><TD>%s</TD></TR>\n", phone);
-       if (strlen(mailto) > 0)
-               wprintf("<TR><TD>E-mail:</TD><TD>%s</TD></TR>\n", mailto);
-
        wprintf("</TABLE>\n");
 }
 
@@ -339,10 +364,15 @@ void read_message(long msgnum) {
        serv_printf("MSG4 %ld", msgnum);
        serv_gets(buf);
        if (buf[0] != '1') {
-               wprintf("<STRONG>ERROR:</STRONG> %s<BR>\n", &buf[4]);
+               wprintf("<STRONG>ERROR:</STRONG> %s<br />\n", &buf[4]);
                return;
        }
 
+       /* begin everythingamundo table */
+       wprintf("<table width=100% border=1 cellspacing=0 "
+               "cellpadding=0><TR><TD>\n");
+
+       /* begin message header table */
        wprintf("<TABLE WIDTH=100%% BORDER=0 CELLSPACING=0 "
                "CELLPADDING=1 BGCOLOR=\"#CCCCCC\"><TR><TD>\n");
 
@@ -351,7 +381,7 @@ void read_message(long msgnum) {
 
        while (serv_gets(buf), strcasecmp(buf, "text")) {
                if (!strcmp(buf, "000")) {
-                       wprintf("<I>unexpected end of message</I><BR><BR>\n");
+                       wprintf("<I>unexpected end of message</I><br /><br />\n");
                        wprintf("</SPAN>\n");
                        return;
                }
@@ -417,7 +447,7 @@ void read_message(long msgnum) {
                                        "TARGET=\"wc.%ld.%s\">"
                                        "<IMG SRC=\"/static/attachment.gif\" "
                                        "BORDER=0 ALIGN=MIDDLE>\n"
-                                       "Part %s: %s (%s, %d bytes)</A><BR>\n",
+                                       "Part %s: %s (%s, %d bytes)</A><br />\n",
                                        msgnum, mime_partnum,
                                        msgnum, mime_partnum,
                                        mime_partnum, mime_filename,
@@ -468,56 +498,50 @@ void read_message(long msgnum) {
                wprintf("****");
        }
 
-       wprintf("</SPAN></TD>");
-
-       wprintf("<TD ALIGN=RIGHT>\n"
-               "<TABLE BORDER=0><TR>\n");
-
-       /***  "Read" button is now superfluous
-        ***
-        ***wprintf("<TD BGCOLOR=\"#AAAADD\">"
-        ***    "<A HREF=\"/readfwd?startmsg=%ld", msgnum);
-        ***wprintf("&maxmsgs=1&summary=0\">Read</A>"
-        ***    "</TD>\n", msgnum);
-        ***/
-
-       wprintf("<TD BGCOLOR=\"#AAAADD\">"
-               "<A HREF=\"/display_enter?recp=");
-       urlescputs(reply_to);
-       wprintf("\"><FONT SIZE=-1>Reply</FONT></A>"
-               "</TD>\n", msgnum);
+       wprintf("</SPAN>");
+       if (strlen(m_subject) > 0) {
+               wprintf("<br />"
+                       "<SPAN CLASS=\"message_subject\">"
+                       "Subject: %s"
+                       "</SPAN>", m_subject
+               );
+       }
+       wprintf("</TD>\n");
 
-       if (WC->is_room_aide) {
-               wprintf("<TD BGCOLOR=\"#AAAADD\">"
-                       "<A HREF=\"/confirm_move_msg"
-                       "&msgid=%ld"
-                       "\"><FONT SIZE=-1>Move</FONT></A>"
-                       "</TD>\n", msgnum);
+       /* start msg buttons */
+       wprintf("<TD ALIGN=RIGHT>\n");
+       wprintf("<FORM METHOD=\"POST\" ACTION=\"/do_stuff_to_one_msg\">\n");
+       wprintf("<INPUT TYPE=\"hidden\" NAME=\"msgid\" VALUE=\"%ld\">\n",
+               msgnum);
+       wprintf("<INPUT TYPE=\"hidden\" NAME=\"recp\" VALUE=\"");
+       escputs(reply_to);
+       wprintf("\">\n");
 
-               wprintf("<TD BGCOLOR=\"#AAAADD\">"
-                       "<A HREF=\"/delete_msg"
-                       "&msgid=%ld\""
-                       "onClick=\"return confirm('Delete this message?');\""
-                       "><FONT SIZE=-1>Del</FONT></A>"
-                       "</TD>\n", msgnum);
+       if (!strncasecmp(m_subject, "Re:", 2)) {
+               wprintf("<INPUT TYPE=\"hidden\" NAME=\"subject\" VALUE=\"");
+               escputs(m_subject);
+               wprintf("\">\n");
+       }
+       else if (strlen(m_subject) > 0) {
+               wprintf("<INPUT TYPE=\"hidden\" NAME=\"subject\" VALUE=\"Re: ");
+               escputs(m_subject);
+               wprintf("\">\n");
        }
 
-       wprintf("</TR></TABLE>\n"
-               "</TD>\n");
+       wprintf("<INPUT TYPE=\"submit\" NAME=\"msg_oper\" STYLE=\"font-family: Bitstream Vera Sans,Arial,Helvetica,sans-serif; font-size: 7pt; background: blue; color: #FFFFFF;\" VALUE=\"Reply\">\n");
 
-       if (strlen(m_subject) > 0) {
-               wprintf("<TR><TD>"
-                       "<SPAN CLASS=\"message_subject\">"
-                       "Subject: %s"
-                       "</SPAN>"
-                       "</TD><TD>&nbsp;</TD></TR>\n", m_subject);
+       if (WC->is_room_aide)  {
+               wprintf("<INPUT TYPE=\"submit\" NAME=\"msg_oper\" STYLE=\"font-family: Bitstream Vera Sans,Arial,Helvetica,sans-serif; font-size: 7pt; background: blue; color: #FFFFFF;\"VALUE=\"Move\">\n"
+                       "<INPUT TYPE=\"submit\" NAME=\"msg_oper\" STYLE=\"font-family: Bitstream Vera Sans,Arial,Helvetica,sans-serif; font-size: 7pt; background: blue; color: #FFFFFF;\" VALUE=\"Delete\""
+                       "onClick=\"return confirm('Delete this message?');\">\n");
        }
 
-       wprintf("</TR></TABLE>\n");
+       wprintf("</FORM>\n"
+               "</TD></TR></TABLE>\n");
 
        /* Begin body */
        wprintf("<TABLE BORDER=0 WIDTH=100%% BGCOLOR=#FFFFFF "
-               "CELLPADDING=0 CELLSPACING=0><TR><TD>");
+               "CELLPADDING=1 CELLSPACING=0><TR><TD>");
 
        /* 
         * Learn the content type
@@ -525,7 +549,7 @@ void read_message(long msgnum) {
        strcpy(mime_content_type, "text/plain");
        while (serv_gets(buf), (strlen(buf) > 0)) {
                if (!strcmp(buf, "000")) {
-                       wprintf("<I>unexpected end of message</I><BR><BR>\n");
+                       wprintf("<I>unexpected end of message</I><br /><br />\n");
                        goto ENDBODY;
                }
                if (!strncasecmp(buf, "Content-type: ", 14)) {
@@ -548,19 +572,19 @@ void read_message(long msgnum) {
                                buf[strlen(buf) - 1] = 0;
                        if ((bq == 0) &&
                        ((!strncmp(buf, ">", 1)) || (!strncmp(buf, " >", 2)) || (!strncmp(buf, " :-)", 4)))) {
-                               wprintf("<SPAN CLASS=\"pull_quote\">");
+                               wprintf("<BLOCKQUOTE>");
                                bq = 1;
                        } else if ((bq == 1) &&
                                (strncmp(buf, ">", 1)) && (strncmp(buf, " >", 2)) && (strncmp(buf, " :-)", 4))) {
-                               wprintf("</SPAN>");
+                               wprintf("</BLOCKQUOTE>");
                                bq = 0;
                        }
                        wprintf("<TT>");
                        url(buf);
                        escputs(buf);
-                       wprintf("</TT><BR>\n");
+                       wprintf("</TT><br />\n");
                }
-               wprintf("</I><BR>");
+               wprintf("</I><br />");
        }
 
        else /* HTML is fun, but we've got to strip it first */
@@ -570,7 +594,7 @@ void read_message(long msgnum) {
 
        /* Unknown weirdness */
        else {
-               wprintf("I don't know how to display %s<BR>\n",
+               wprintf("I don't know how to display %s<br />\n",
                        mime_content_type);
                while (serv_gets(buf), strcmp(buf, "000")) { }
        }
@@ -616,10 +640,13 @@ void read_message(long msgnum) {
 
 ENDBODY:
        wprintf("</TD></TR></TABLE>\n");
+
+       /* end everythingamundo table */
+       wprintf("</TD></TR></TABLE><br />\n");
 }
 
 
-void summarize_message(long msgnum) {
+void summarize_message(long msgnum, int is_new) {
        char buf[SIZ];
 
        struct {
@@ -633,7 +660,7 @@ void summarize_message(long msgnum) {
        memset(&summ, 0, sizeof(summ));
        strcpy(summ.subj, "(no subject)");
 
-       sprintf(buf, "MSG0 %ld|1", msgnum);     /* ask for headers only */
+       sprintf(buf, "MSG0 %ld|3", msgnum);     /* ask for headers only with no MIME */
        serv_puts(buf);
        serv_gets(buf);
        if (buf[0] != '1') return;
@@ -670,14 +697,22 @@ void summarize_message(long msgnum) {
                }
        }
 
-       wprintf("<TD><A HREF=\"/readfwd?startmsg=%ld"
+       wprintf("<TD>");
+       if (is_new) wprintf("<B>");
+       wprintf("<A HREF=\"/readfwd?startmsg=%ld"
                "&maxmsgs=1&summary=0\">", 
                msgnum);
        escputs(summ.subj);
-       wprintf("</A></TD><TD>");
+       wprintf("</A>");
+       if (is_new) wprintf("</B>");
+       wprintf("</TD><TD>");
+       if (is_new) wprintf("<B>");
        escputs(summ.from);
+       if (is_new) wprintf("</B>");
        wprintf(" </TD><TD>");
+       if (is_new) wprintf("<B>");
        escputs(summ.date);
+       if (is_new) wprintf("</B>");
        wprintf(" </TD>");
        wprintf("<TD>"
                "<INPUT TYPE=\"checkbox\" NAME=\"msg_%ld\" VALUE=\"yes\">"
@@ -783,6 +818,7 @@ void fetch_ab_name(long msgnum, char *namebuf) {
        int mime_length;
        char vcard_partnum[SIZ];
        char *vcard_source = NULL;
+       int i;
 
        struct {
                char date[SIZ];
@@ -830,6 +866,11 @@ void fetch_ab_name(long msgnum, char *namebuf) {
        }
 
        lastfirst_firstlast(namebuf);
+       striplt(namebuf);
+       for (i=0; i<strlen(namebuf); ++i) {
+               if (namebuf[i] != ';') return;
+       }
+       strcpy(namebuf, "(no name)");
 }
 
 
@@ -845,39 +886,99 @@ int abcmp(const void *ab1, const void *ab2) {
 }
 
 
+/*
+ * Helper function for do_addrbook_view()
+ * Converts a name into a three-letter tab label
+ */
+void nametab(char *tabbuf, char *name) {
+       stresc(tabbuf, name, 0, 0);
+       tabbuf[0] = toupper(tabbuf[0]);
+       tabbuf[1] = tolower(tabbuf[1]);
+       tabbuf[2] = tolower(tabbuf[2]);
+       tabbuf[3] = 0;
+}
+
+
 /*
  * Render the address book using info we gathered during the scan
  */
 void do_addrbook_view(struct addrbookent *addrbook, int num_ab) {
        int i = 0;
+       int displayed = 0;
        int bg = 0;
+       static int NAMESPERPAGE = 60;
+       int num_pages = 0;
+       int page = 0;
+       int tabfirst = 0;
+       char tabfirst_label[SIZ];
+       int tablast = 0;
+       char tablast_label[SIZ];
+
+       if (num_ab == 0) {
+               wprintf("<I>This address book is empty.</I>\n");
+               return;
+       }
 
        if (num_ab > 1) {
                qsort(addrbook, num_ab, sizeof(struct addrbookent), abcmp);
        }
 
+       num_pages = num_ab / NAMESPERPAGE;
+
+       page = atoi(bstr("page"));
+
+       wprintf("Page: ");
+       for (i=0; i<=num_pages; ++i) {
+               if (i != page) {
+                       wprintf("<A HREF=\"/readfwd?page=%d\">", i);
+               }
+               else {
+                       wprintf("<B>");
+               }
+               tabfirst = i * NAMESPERPAGE;
+               tablast = tabfirst + NAMESPERPAGE - 1;
+               if (tablast > (num_ab - 1)) tablast = (num_ab - 1);
+               nametab(tabfirst_label, addrbook[tabfirst].ab_name);
+               nametab(tablast_label, addrbook[tablast].ab_name);
+               wprintf("[%s&nbsp;-&nbsp;%s]",
+                       tabfirst_label, tablast_label
+               );
+               if (i != page) {
+                       wprintf("</A>\n");
+               }
+               else {
+                       wprintf("</B>\n");
+               }
+       }
+       wprintf("<br />\n");
+
        wprintf("<TABLE border=0 cellspacing=0 "
                "cellpadding=3 width=100%%>\n"
        );
 
        for (i=0; i<num_ab; ++i) {
 
-               if ((i % 4) == 0) {
-                       if (i > 0) {
-                               wprintf("</TR>\n");
+               if ((i / NAMESPERPAGE) == page) {
+
+                       if ((displayed % 4) == 0) {
+                               if (displayed > 0) {
+                                       wprintf("</TR>\n");
+                               }
+                               bg = 1 - bg;
+                               wprintf("<TR BGCOLOR=\"#%s\">",
+                                       (bg ? "DDDDDD" : "FFFFFF")
+                               );
                        }
-                       bg = 1 - bg;
-                       wprintf("<TR BGCOLOR=\"#%s\">",
-                               (bg ? "DDDDDD" : "FFFFFF")
-                       );
+       
+                       wprintf("<TD>");
+       
+                       wprintf("<A HREF=\"/readfwd?startmsg=%ld&is_singlecard=1",
+                               addrbook[i].ab_msgnum);
+                       wprintf("&maxmsgs=1&summary=0&alpha=%s\">", bstr("alpha"));
+                       escputs(addrbook[i].ab_name);
+                       wprintf("</A></TD>\n");
+                       ++displayed;
                }
-
-               wprintf("<TD>");
-               wprintf("<A HREF=\"/readfwd?startmsg=%ld&is_singlecard=1",
-                       addrbook[i].ab_msgnum);
-               wprintf("&maxmsgs=1&summary=0&alpha=%s\">", bstr("alpha"));
-               escputs(addrbook[i].ab_name);
-               wprintf("</A></TD>\n");
        }
 
        wprintf("</TR></TABLE>\n");
@@ -892,18 +993,21 @@ int load_msg_ptrs(char *servcmd)
 {
        char buf[SIZ];
        int nummsgs;
+       int maxload = 0;
 
        nummsgs = 0;
+       maxload = sizeof(WC->msgarr) / sizeof(long) ;
        serv_puts(servcmd);
        serv_gets(buf);
        if (buf[0] != '1') {
-               wprintf("<EM>%s</EM><BR>\n", &buf[4]);
+               wprintf("<EM>%s</EM><br />\n", &buf[4]);
                return (nummsgs);
        }
        while (serv_gets(buf), strcmp(buf, "000")) {
-               WC->msgarr[nummsgs] = atol(buf);
-               /* FIXME check for overflow */
-               ++nummsgs;
+               if (nummsgs < maxload) {
+                       WC->msgarr[nummsgs] = atol(buf);
+                       ++nummsgs;
+               }
        }
        return (nummsgs);
 }
@@ -916,7 +1020,9 @@ void readloop(char *oper)
 {
        char cmd[SIZ];
        char buf[SIZ];
-       int a, b, i;
+       char old_msgs[SIZ];
+       int is_new = 0;
+       int a, b;
        int nummsgs;
        long startmsg;
        int maxmsgs;
@@ -926,6 +1032,7 @@ void readloop(char *oper)
        int is_singlecard = 0;
        int is_calendar = 0;
        int is_tasks = 0;
+       int is_notes = 0;
        int remaining_messages;
        int lo, hi;
        int lowest_displayed = (-1);
@@ -934,94 +1041,85 @@ void readloop(char *oper)
        long pn_current = 0L;
        long pn_next = 0L;
        int bg = 0;
-       char alpha = 0;
-       char ab_alpha = 0;
        struct addrbookent *addrbook = NULL;
        int num_ab = 0;
 
        startmsg = atol(bstr("startmsg"));
        maxmsgs = atoi(bstr("maxmsgs"));
        is_summary = atoi(bstr("summary"));
-       if (maxmsgs == 0) maxmsgs = 20;
+       if (maxmsgs == 0) maxmsgs = DEFAULT_MAXMSGS;
 
-       output_headers(1);
+       output_headers(1, 1, 1, 0, 0, 0, 0);
 
+       /* When in summary mode, always show ALL messages instead of just
+        * new or old.  Otherwise, show what the user asked for.
+        */
        if (!strcmp(oper, "readnew")) {
                strcpy(cmd, "MSGS NEW");
-       } else if (!strcmp(oper, "readold")) {
+       }
+       else if (!strcmp(oper, "readold")) {
                strcpy(cmd, "MSGS OLD");
-       } else {
+       }
+       else {
                strcpy(cmd, "MSGS ALL");
        }
 
-       /* FIXME put in the correct constant #defs */
-       if ((WC->wc_view == 1) && (maxmsgs > 1)) {
+       if ((WC->wc_view == VIEW_MAILBOX) && (maxmsgs > 1)) {
                is_summary = 1;
                strcpy(cmd, "MSGS ALL");
-               maxmsgs = 32767;
        }
 
-       if ((WC->wc_view == 2) && (maxmsgs > 1)) {
+       if ((WC->wc_view == VIEW_ADDRESSBOOK) && (maxmsgs > 1)) {
                is_addressbook = 1;
                strcpy(cmd, "MSGS ALL");
                maxmsgs = 32767;
        }
 
-       is_singlecard = atoi(bstr("is_singlecard"));
-
-       /* Display the letter indices across the top */
-       if ((is_addressbook) || (is_singlecard)) {
-               if (strlen(bstr("alpha")) == 0) {
-                       alpha = 'a';
-               }
-               else {
-                       strcpy(buf, bstr("alpha"));
-                       alpha = buf[0];
-               }
+       if (is_summary) {
+               strcpy(cmd, "MSGS ALL");
+       }
 
-               for (i='1'; i<='z'; ++i) if ((i=='1')||(islower(i))) {
-                       if ((i != alpha) || (is_singlecard)) {
-                               wprintf("<A HREF=\"/readfwd?alpha=%c\">", i);
-                       }
-                       if (i == alpha) wprintf("<FONT SIZE=+2>");
-                       if (isalpha(i)) {
-                               wprintf("%c", toupper(i));
-                       }
-                       else {
-                               wprintf("(other)");
-                       }
-                       if (i == alpha) wprintf("</FONT>");
-                       if ((i != alpha) || (is_singlecard)) {
-                               wprintf("</A>\n");
-                       }
-                       wprintf("&nbsp;");
+       /* Are we doing a summary view?  If so, we need to know old messages
+        * and new messages, so we can do that pretty boldface thing for the
+        * new messages.
+        */
+       strcpy(old_msgs, "");
+       if (is_summary) {
+               serv_puts("GTSN");
+               serv_gets(buf);
+               if (buf[0] == '2') {
+                       strcpy(old_msgs, &buf[4]);
                }
-
-               wprintf("<HR width=100%%>\n");
        }
 
-       if (WC->wc_view == 3) {         /* calendar */
+       is_singlecard = atoi(bstr("is_singlecard"));
+
+       if (WC->wc_view == VIEW_CALENDAR) {             /* calendar */
                is_calendar = 1;
                strcpy(cmd, "MSGS ALL");
                maxmsgs = 32767;
        }
-       if (WC->wc_view == 4) {         /* tasks */
+       if (WC->wc_view == VIEW_TASKS) {                /* tasks */
                is_tasks = 1;
                strcpy(cmd, "MSGS ALL");
                maxmsgs = 32767;
-               wprintf("<UL>");
+       }
+       if (WC->wc_view == VIEW_NOTES) {                /* notes */
+               is_notes = 1;
+               strcpy(cmd, "MSGS ALL");
+               maxmsgs = 32767;
        }
 
        nummsgs = load_msg_ptrs(cmd);
        if (nummsgs == 0) {
 
-               if ((!is_tasks) && (!is_calendar)) {
+               if ((!is_tasks) && (!is_calendar) && (!is_notes)) {
                        if (!strcmp(oper, "readnew")) {
-                               wprintf("<EM>No new messages in this room.</EM>\n");
+                               wprintf("<EM>No new messages.</EM>\n");
                        } else if (!strcmp(oper, "readold")) {
-                               wprintf("<EM>No old messages in this room.</EM>\n");
+                               wprintf("<EM>No old messages.</EM>\n");
                        } else {
-                               wprintf("<EM>This room is empty.</EM>\n");
+                               wprintf("<EM>No messages here.</EM>\n");
                        }
                }
 
@@ -1053,6 +1151,17 @@ void readloop(char *oper)
        for (a = 0; a < nummsgs; ++a) {
                if ((WC->msgarr[a] >= startmsg) && (num_displayed < maxmsgs)) {
 
+                       /* Are you a new message, or an old message? */
+                       is_new = 0;
+                       if (is_summary) {
+                               if (is_msg_in_mset(old_msgs, WC->msgarr[a])) {
+                                       is_new = 0;
+                               }
+                               else {
+                                       is_new = 1;
+                               }
+                       }
+
                        /* Learn which msgs "Prev" & "Next" buttons go to */
                        pn_current = WC->msgarr[a];
                        if (a > 0) pn_previous = WC->msgarr[a-1];
@@ -1068,24 +1177,16 @@ void readloop(char *oper)
 
                        /* Display the message */
                        if (is_summary) {
-                               summarize_message(WC->msgarr[a]);
+                               summarize_message(WC->msgarr[a], is_new);
                        }
                        else if (is_addressbook) {
                                fetch_ab_name(WC->msgarr[a], buf);
-                               if ((strlen(buf) > 0) && (isalpha(buf[0]))) {
-                                       ab_alpha = tolower(buf[0]);
-                               }
-                               else {
-                                       ab_alpha = '1';
-                               }
-                               if (alpha == ab_alpha) {
-                                       ++num_ab;
-                                       addrbook = realloc(addrbook,
-                                               (sizeof(struct addrbookent) * num_ab) );
-                                       safestrncpy(addrbook[num_ab-1].ab_name, buf,
-                                               sizeof(addrbook[num_ab-1].ab_name));
-                                       addrbook[num_ab-1].ab_msgnum = WC->msgarr[a];
-                               }
+                               ++num_ab;
+                               addrbook = realloc(addrbook,
+                                       (sizeof(struct addrbookent) * num_ab) );
+                               safestrncpy(addrbook[num_ab-1].ab_name, buf,
+                                       sizeof(addrbook[num_ab-1].ab_name));
+                               addrbook[num_ab-1].ab_msgnum = WC->msgarr[a];
                        }
                        else if (is_calendar) {
                                display_calendar(WC->msgarr[a]);
@@ -1093,6 +1194,9 @@ void readloop(char *oper)
                        else if (is_tasks) {
                                display_task(WC->msgarr[a]);
                        }
+                       else if (is_notes) {
+                               display_note(WC->msgarr[a]);
+                       }
                        else {
                                read_message(WC->msgarr[a]);
                        }
@@ -1114,10 +1218,6 @@ void readloop(char *oper)
                wprintf("</TABLE>\n");
        }
 
-       if (is_tasks) {
-               wprintf("</UL>\n");
-       }
-
        /* Bump these because although we're thinking in zero base, the user
         * is a drooling idiot and is thinking in one base.
         */
@@ -1126,7 +1226,7 @@ void readloop(char *oper)
 
        /* If we're only looking at one message, do a prev/next thing */
        if (num_displayed == 1) {
-          if ((!is_tasks) && (!is_calendar) && (!is_addressbook) && (!is_singlecard)) {
+          if ((!is_tasks) && (!is_calendar) && (!is_addressbook) && (!is_notes) && (!is_singlecard)) {
 
                wprintf("<CENTER>"
                        "<TABLE BORDER=0 WIDTH=100%% BGCOLOR=\"#DDDDDD\"><TR><TD>"
@@ -1170,13 +1270,12 @@ void readloop(char *oper)
            }
        }
 
-
        /*
         * If we're not currently looking at ALL requested
         * messages, then display the selector bar
         */
        if (num_displayed > 1) {
-          if ((!is_tasks) && (!is_calendar) && (!is_addressbook) && (!is_singlecard)) {
+          if ((!is_tasks) && (!is_calendar) && (!is_addressbook) && (!is_notes) && (!is_singlecard)) {
                wprintf("<CENTER>"
                        "<TABLE BORDER=0 WIDTH=100%% BGCOLOR=\"#DDDDDD\"><TR><TD>"
                        "Reading #%d-%d of %d messages.</TD>\n"
@@ -1231,9 +1330,7 @@ void readloop(char *oper)
 
 DONE:
        if (is_tasks) {
-               wprintf("<A HREF=\"/display_edit_task?msgnum=0\">"
-                       "Add new task</A>\n"
-               );
+               do_tasks_view();        /* Render the task list */
        }
 
        if (is_calendar) {
@@ -1260,7 +1357,7 @@ void post_mime_to_server(void) {
        struct wc_attachment *att;
        char *encoded;
        size_t encoded_length;
-       
+
        /* If there are attachments, we have to do multipart/mixed */
        if (WC->first_attachment != NULL) {
                is_multipart = 1;
@@ -1282,7 +1379,10 @@ void post_mime_to_server(void) {
 
        serv_puts("Content-type: text/html");
        serv_puts("");
-       text_to_server(bstr("msgtext"), 1);
+       serv_puts("<HTML><BODY>\n");
+       text_to_server(bstr("msgtext"), 0);
+       serv_puts("</BODY></HTML>\n");
+       
 
        if (is_multipart) {
 
@@ -1327,17 +1427,27 @@ void post_message(void)
 {
        char buf[SIZ];
        static long dont_post = (-1L);
-       struct wc_attachment *att;
+       struct wc_attachment *att, *aptr;
 
        if (WC->upload_length > 0) {
 
+               /* There's an attachment.  Save it to this struct... */
                att = malloc(sizeof(struct wc_attachment));
                memset(att, 0, sizeof(struct wc_attachment));
-               att->next = WC->first_attachment;
-               WC->first_attachment = att;
                att->length = WC->upload_length;
                strcpy(att->content_type, WC->upload_content_type);
                strcpy(att->filename, WC->upload_filename);
+               att->next = NULL;
+
+               /* And add it to the list. */
+               if (WC->first_attachment == NULL) {
+                       WC->first_attachment = att;
+               }
+               else {
+                       aptr = WC->first_attachment;
+                       while (aptr->next != NULL) aptr = aptr->next;
+                       aptr->next = att;
+               }
 
                /* Netscape sends a simple filename, which is what we want,
                 * but Satan's browser sends an entire pathname.  Reduce
@@ -1360,9 +1470,12 @@ void post_message(void)
                return;
        }
 
-       if (strcasecmp(bstr("sc"), "Save message")) {
+       if (!strcasecmp(bstr("sc"), "Cancel")) {
                sprintf(WC->ImportantMessage, 
                        "Cancelled.  Message was not posted.");
+       } else if (!strcasecmp(bstr("attach"), "Add")) {
+               display_enter();
+               return;
        } else if (atol(bstr("postseq")) == dont_post) {
                sprintf(WC->ImportantMessage, 
                        "Automatically cancelled because you have already "
@@ -1401,10 +1514,37 @@ void display_enter(void)
        struct wc_attachment *att;
 
        if (strlen(bstr("force_room")) > 0) {
-               gotoroom(bstr("force_room"), 0);
+               gotoroom(bstr("force_room"));
+       }
+
+       /* Are we perhaps in an address book view?  If so, then an "enter
+        * message" command really means "add new entry."
+        */
+       if (WC->wc_view == VIEW_ADDRESSBOOK) {
+               do_edit_vcard(-1, "", "");
+               return;
+       }
+
+#ifdef WEBCIT_WITH_CALENDAR_SERVICE
+       /* Are we perhaps in a calendar view?  If so, then an "enter
+        * message" command really means "add new calendar item."
+        */
+       if (WC->wc_view == VIEW_CALENDAR) {
+               display_edit_event();
+               return;
+       }
+
+       /* Are we perhaps in a tasks view?  If so, then an "enter
+        * message" command really means "add new task."
+        */
+       if (WC->wc_view == VIEW_TASKS) {
+               display_edit_task();
+               return;
        }
+#endif
 
-       output_headers(1);
+       /* Otherwise proceed normally */
+       output_headers(1, 1, 1, 0, 0, 0, 0);
        sprintf(buf, "ENT0 0|%s|0|0", bstr("recp"));
        serv_puts(buf);
        serv_gets(buf);
@@ -1412,7 +1552,7 @@ void display_enter(void)
        if (!strncmp(buf, "570", 3)) {
                if (strlen(bstr("recp")) > 0) {
                        svprintf("RECPERROR", WCS_STRING,
-                               "<SPAN CLASS=\"errormsg\">%s</SPAN><BR>\n",
+                               "<SPAN CLASS=\"errormsg\">%s</SPAN><br />\n",
                                &buf[4]
                        );
                }
@@ -1420,20 +1560,20 @@ void display_enter(void)
                goto DONE;
        }
        if (buf[0] != '2') {
-               wprintf("<EM>%s</EM><BR>\n", &buf[4]);
+               wprintf("<EM>%s</EM><br />\n", &buf[4]);
                goto DONE;
        }
 
        now = time(NULL);
        fmt_date(buf, now);
        strcat(&buf[strlen(buf)], " <I>from</I> ");
-       stresc(&buf[strlen(buf)], WC->wc_username, 1);
+       stresc(&buf[strlen(buf)], WC->wc_username, 1, 1);
        if (strlen(bstr("recp")) > 0) {
                strcat(&buf[strlen(buf)], " <I>to</I> ");
-               stresc(&buf[strlen(buf)], bstr("recp"), 1);
+               stresc(&buf[strlen(buf)], bstr("recp"), 1, 1);
        }
        strcat(&buf[strlen(buf)], " <I>in</I> ");
-       stresc(&buf[strlen(buf)], WC->wc_roomname, 1);
+       stresc(&buf[strlen(buf)], WC->wc_roomname, 1, 1);
        svprintf("BOXTITLE", WCS_STRING, buf);
        do_template("beginbox");
 
@@ -1441,37 +1581,70 @@ void display_enter(void)
 
        wprintf("<FORM ENCTYPE=\"multipart/form-data\" "
                "METHOD=\"POST\" ACTION=\"/post\" "
-               "NAME=\"enterform\">\n");
+               "NAME=\"enterform\""
+               "onSubmit=\"return submitForm();\""
+               ">\n");
        wprintf("<INPUT TYPE=\"hidden\" NAME=\"recp\" VALUE=\"%s\">\n",
                bstr("recp"));
        wprintf("<INPUT TYPE=\"hidden\" NAME=\"postseq\" VALUE=\"%ld\">\n",
                now);
-       wprintf("<IMG SRC=\"static/enter.gif\" ALIGN=MIDDLE ALT=\" \" "
-               "onLoad=\"document.enterform.msgtext.focus();\" >");
+
+       wprintf("<TABLE border=0 cellspacing=0 cellpadding=0 width=100%%>\n");
+       wprintf("<TR><TD ALIGN=LEFT>");
+       wprintf("<IMG SRC=\"static/enter.gif\" ALIGN=MIDDLE ALT=\" \">");
+               /* "onLoad=\"document.enterform.msgtext.focus();\" " */
        wprintf("<FONT SIZE=-1>Subject (optional):</FONT>"
                "<INPUT TYPE=\"text\" NAME=\"subject\" VALUE=\"");
        escputs(bstr("subject"));
-       wprintf("\" MAXLENGTH=70>"
-               "&nbsp;&nbsp;&nbsp;"
-               "<INPUT TYPE=\"submit\" NAME=\"sc\" VALUE=\"Save message\">"
-               "<INPUT TYPE=\"submit\" NAME=\"sc\" VALUE=\"Cancel\"><BR>\n");
+       wprintf("\" SIZE=40 MAXLENGTH=70>"
+               "&nbsp;"
+       );
+       wprintf("</TD>");
+
+       wprintf("<TD ALIGN=RIGHT>");
+       wprintf("<INPUT TYPE=\"submit\" NAME=\"sc\" VALUE=\"Save message\">"
+               "&nbsp;"
+               "<INPUT TYPE=\"submit\" NAME=\"sc\" VALUE=\"Cancel\"><br />\n");
+       wprintf("</TD></TR></TABLE>\n");
+
+       wprintf("<script language=\"JavaScript\" type=\"text/javascript\" "
+               "src=\"static/richtext.js\"></script>\n"
+               "<script language=\"JavaScript\" type=\"text/javascript\">\n"
+               "function submitForm() { \n"
+               "  updateRTE('msgtext'); \n"
+               "  return true; \n"
+               "} \n"
+               "  \n"
+               "initRTE(\"static/\", \"static/\", \"\"); \n"
+               "</script> \n"
+               "<noscript>JAVAscript MUST BE ENABLED.</noscript> \n"
+               "<script language=\"javascript\" type=\"text/javascript\"> \n"
+               "writeRichText('msgtext', '");
+       msgescputs(bstr("msgtext"));
+       wprintf("', '100%%', 200, true, false); \n"
+               "</script> \n");
 
+/*
+ * Before we had the richedit widget, we did it this way...
+ *
        wprintf("<TEXTAREA NAME=\"msgtext\" wrap=soft ROWS=25 COLS=80 "
                "WIDTH=80>");
        escputs(bstr("msgtext"));
-       wprintf("</TEXTAREA><BR>\n");
+       wprintf("</TEXTAREA><br />\n");
+ */
 
        /* Enumerate any attachments which are already in place... */
        for (att = WC->first_attachment; att != NULL; att = att->next) {
                wprintf("<IMG SRC=\"/static/attachment.gif\" "
                        "BORDER=0 ALIGN=MIDDLE> Attachment: ");
                escputs(att->filename);
-               wprintf(" (%s, %d bytes)<BR>\n",
+               wprintf(" (%s, %d bytes)<br />\n",
                        att->content_type, att->length);
        }
 
        /* Now offer the ability to attach additional files... */
-       wprintf("Attach file: <input NAME=\"attachfile\" "
+       wprintf("&nbsp;&nbsp;&nbsp;"
+               "Attach file: <input NAME=\"attachfile\" "
                "SIZE=48 TYPE=\"file\">\n&nbsp;&nbsp;"
                "<input type=\"submit\" name=\"attach\" value=\"Add\">\n");
 
@@ -1494,12 +1667,12 @@ void delete_msg(void)
 
        msgid = atol(bstr("msgid"));
 
-       output_headers(1);
+       output_headers(1, 1, 1, 0, 0, 0, 0);
 
        sprintf(buf, "DELE %ld", msgid);
        serv_puts(buf);
        serv_gets(buf);
-       wprintf("<EM>%s</EM><BR>\n", &buf[4]);
+       wprintf("<EM>%s</EM><br />\n", &buf[4]);
 
        wDumpContent(1);
 }
@@ -1518,16 +1691,16 @@ void confirm_move_msg(void)
 
        msgid = atol(bstr("msgid"));
 
-       output_headers(1);
+       output_headers(1, 1, 1, 0, 0, 0, 0);
 
-       wprintf("<TABLE WIDTH=100%% BORDER=0 BGCOLOR=\"#770000\"><TR><TD>");
+       wprintf("<TABLE WIDTH=100%% BORDER=0 BGCOLOR=\"#444455\"><TR><TD>");
        wprintf("<FONT SIZE=+1 COLOR=\"#FFFFFF\"");
        wprintf("<B>Confirm move of message</B>\n");
        wprintf("</FONT></TD></TR></TABLE>\n");
 
        wprintf("<CENTER>");
 
-       wprintf("Please select the room to which you would like this message moved:<BR>\n");
+       wprintf("Move this message to:<br />\n");
 
        wprintf("<FORM METHOD=\"POST\" ACTION=\"/move_msg\">\n");
        wprintf("<INPUT TYPE=\"hidden\" NAME=\"msgid\" VALUE=\"%s\">\n",
@@ -1546,9 +1719,10 @@ void confirm_move_msg(void)
                }
        }
        wprintf("</SELECT>\n");
-       wprintf("<BR>\n");
+       wprintf("<br />\n");
 
        wprintf("<INPUT TYPE=\"submit\" NAME=\"yesno\" VALUE=\"Move\">");
+       wprintf("&nbsp;");
        wprintf("<INPUT TYPE=\"submit\" NAME=\"yesno\" VALUE=\"Cancel\">");
        wprintf("</FORM></CENTER>\n");
 
@@ -1565,22 +1739,51 @@ void move_msg(void)
 
        msgid = atol(bstr("msgid"));
 
-       output_headers(1);
+       output_headers(1, 1, 1, 0, 0, 0, 0);
 
        if (!strcasecmp(bstr("yesno"), "Move")) {
                sprintf(buf, "MOVE %ld|%s", msgid, bstr("target_room"));
                serv_puts(buf);
                serv_gets(buf);
-               wprintf("<EM>%s</EM><BR>\n", &buf[4]);
+               wprintf("<EM>%s</EM><br />\n", &buf[4]);
        } else {
-               wprintf("<EM>Message not moved.</EM><BR>\n");
+               wprintf("<EM>Message not moved.</EM><br />\n");
        }
 
        wDumpContent(1);
 }
 
+/*
+ * This gets called when a user selects Reply/Move/Del etc. on *one* message.
+ */
+void do_stuff_to_one_msg(void) {
+       char *msg_oper;
 
+       msg_oper = bstr("msg_oper");
 
+       if (!strcasecmp(msg_oper, "Delete")) {
+               delete_msg();   /* It's already been confirmed using JS */
+               return;
+       }
+       if (!strcasecmp(msg_oper, "Move")) {
+               confirm_move_msg();
+               return;
+       }
+       if (!strcasecmp(msg_oper, "Reply")) {
+               display_enter();        /* recp and subject already set */
+               return;
+       }
+
+       /* should never get here.  FIXME: display an error */
+
+}
+
+
+/*
+ * This gets called when a user selects multiple messages in a summary
+ * list and then clicks to perform a transformation of some sort on them
+ * (such as deleting them).
+ */
 void do_stuff_to_msgs(void) {
        char buf[SIZ];
        char sc[SIZ];